home *** CD-ROM | disk | FTP | other *** search
Modula Definition | 1989-10-20 | 1.2 KB | 28 lines |
- 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.