DEFINITION MODULE LoadSHAM;

(*======================================================================*)
(*                    Amiga M2Sprint Support Routines                   *)
(*======================================================================*)
(*         © Copyright 1989 Robert Salesas, All Rights Reserved         *)
(*        Re-Distribute as you wish but DO NOT alter the contents       *)
(*            of this file.  Moral Rights remain my property.           *)
(*              You May NOT sell this pogram in any form!!!             *)
(*======================================================================*)
(*      Version: 3.00           Author : Robert Salesas                 *)
(*      Date   : 29-Sept-89     Changes: Original                       *)
(*======================================================================*)

FROM Intuition        IMPORT  ScreenPtr;
FROM BufferedDOS      IMPORT  BufHandle;

TYPE
  SHAMRegsPtr = POINTER TO SHAMRegs;
  SHAMRegs = ARRAY [0..199], [0..15] OF CARDINAL;
  
  GetScreenProc = PROCEDURE(BOOLEAN) : ScreenPtr;


  PROCEDURE LoadSHAMPicture(Fh : BufHandle;  GetScreen : GetScreenProc;
                            Registers : SHAMRegsPtr) : BOOLEAN;

END LoadSHAM.