home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 18
/
aminetcdnumber181997.iso
/
Aminet
/
dev
/
m2
/
CycloneModules.lha
/
modules
/
txt
/
LowlevelL.def
< prev
next >
Wrap
Text File
|
1996-09-23
|
1KB
|
53 lines
DEFINITION MODULE LowlevelL {"lowlevel.library",40};
(*$ Implementation- *)
(* Generated with FDToM2 by M. Timmermans *)
FROM SYSTEM IMPORT ADDRESS;
IMPORT ed:ExecD,Reg;
VAR
LowLevelBase : ed.LibraryPtr;
CONST
lowlevelMinVersion=40;
lowlevelName="lowlevel.library";
PROCEDURE ReadJoyPort(port{Reg.D0}:LONGINT):LONGINT; CODE -30;
PROCEDURE GetLanguageSelection():LONGINT; CODE -36;
PROCEDURE GetKey():LONGINT; CODE -48;
PROCEDURE QueryKeys(queryArray{Reg.A0}:ADDRESS;arraySize{Reg.D1}:LONGINT):LONGINT; CODE -54;
PROCEDURE AddKBInt(intRoutine{Reg.A0},intData{Reg.A1}:ADDRESS):LONGINT; CODE -60;
PROCEDURE RemKBInt(intHandle{Reg.A1}:ADDRESS):LONGINT; CODE -66;
PROCEDURE SystemControlA(tagList{Reg.A1}:ADDRESS):LONGINT; CODE -72;
PROCEDURE AddTimerInt(intRoutine{Reg.A0},intData{Reg.A1}:ADDRESS):LONGINT; CODE -78;
PROCEDURE RemTimerInt(intHandle{Reg.A1}:ADDRESS):LONGINT; CODE -84;
PROCEDURE StopTimerInt(intHandle{Reg.A1}:ADDRESS):LONGINT; CODE -90;
PROCEDURE StartTimerInt(intHandle{Reg.A1}:ADDRESS;timeInterval{Reg.D0},continuous{Reg.D1}:LONGINT):LONGINT; CODE -96;
PROCEDURE ElapsedTime(context{Reg.A0}:ADDRESS):LONGINT; CODE -102;
PROCEDURE AddVBlankInt(intRoutine{Reg.A0},intData{Reg.A1}:ADDRESS):LONGINT; CODE -108;
PROCEDURE RemVBlankInt(intHandle{Reg.A1}:ADDRESS):LONGINT; CODE -114;
PROCEDURE SetJoyPortAttrsA(portNumber{Reg.D0}:LONGINT;tagList{Reg.A1}:ADDRESS):LONGINT; CODE -132;
END LowlevelL.