home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 18
/
aminetcdnumber181997.iso
/
Aminet
/
dev
/
m2
/
CycloneModules.lha
/
modules
/
txt
/
LayersL.def
< prev
next >
Wrap
Text File
|
1996-09-23
|
3KB
|
87 lines
DEFINITION MODULE LayersL {"layers.library",33};
(*$ Implementation- *)
(* Generated with FDToM2 by M. Timmermans *)
FROM SYSTEM IMPORT ADDRESS;
IMPORT ed:ExecD,Reg;
VAR
LayersBase : ed.LibraryPtr;
CONST
layersMinVersion=33;
layersName="layers.library";
PROCEDURE InitLayers(li{Reg.A0}:ADDRESS):LONGINT; CODE -30;
PROCEDURE CreateUpfrontLayer(li{Reg.A0},bm{Reg.A1}:ADDRESS;x0{Reg.D0},y0{Reg.D1},x1{Reg.D2},y1{Reg.D3},flags{Reg.D4}:LONGINT;bm2{Reg.A2}:ADDRESS):LONGINT; CODE -36;
PROCEDURE CreateBehindLayer(li{Reg.A0},bm{Reg.A1}:ADDRESS;x0{Reg.D0},y0{Reg.D1},x1{Reg.D2},y1{Reg.D3},flags{Reg.D4}:LONGINT;bm2{Reg.A2}:ADDRESS):LONGINT; CODE -42;
PROCEDURE UpfrontLayer(dummy{Reg.A0},layer{Reg.A1}:ADDRESS):LONGINT; CODE -48;
PROCEDURE BehindLayer(dummy{Reg.A0},layer{Reg.A1}:ADDRESS):LONGINT; CODE -54;
PROCEDURE MoveLayer(dummy{Reg.A0},layer{Reg.A1}:ADDRESS;dx{Reg.D0},dy{Reg.D1}:LONGINT):LONGINT; CODE -60;
PROCEDURE SizeLayer(dummy{Reg.A0},layer{Reg.A1}:ADDRESS;dx{Reg.D0},dy{Reg.D1}:LONGINT):LONGINT; CODE -66;
PROCEDURE ScrollLayer(dummy{Reg.A0},layer{Reg.A1}:ADDRESS;dx{Reg.D0},dy{Reg.D1}:LONGINT):LONGINT; CODE -72;
PROCEDURE BeginUpdate(l{Reg.A0}:ADDRESS):LONGINT; CODE -78;
PROCEDURE EndUpdate(layer{Reg.A0}:ADDRESS;flag{Reg.D0}:LONGINT):LONGINT; CODE -84;
PROCEDURE DeleteLayer(dummy{Reg.A0},layer{Reg.A1}:ADDRESS):LONGINT; CODE -90;
PROCEDURE LockLayer(dummy{Reg.A0},layer{Reg.A1}:ADDRESS):LONGINT; CODE -96;
PROCEDURE UnlockLayer(layer{Reg.A0}:ADDRESS):LONGINT; CODE -102;
PROCEDURE LockLayers(li{Reg.A0}:ADDRESS):LONGINT; CODE -108;
PROCEDURE UnlockLayers(li{Reg.A0}:ADDRESS):LONGINT; CODE -114;
PROCEDURE LockLayerInfo(li{Reg.A0}:ADDRESS):LONGINT; CODE -120;
PROCEDURE SwapBitsRastPortClipRect(rp{Reg.A0},cr{Reg.A1}:ADDRESS):LONGINT; CODE -126;
PROCEDURE WhichLayer(li{Reg.A0}:ADDRESS;x{Reg.D0},y{Reg.D1}:LONGINT):LONGINT; CODE -132;
PROCEDURE UnlockLayerInfo(li{Reg.A0}:ADDRESS):LONGINT; CODE -138;
PROCEDURE NewLayerInfo():LONGINT; CODE -144;
PROCEDURE DisposeLayerInfo(li{Reg.A0}:ADDRESS):LONGINT; CODE -150;
PROCEDURE FattenLayerInfo(li{Reg.A0}:ADDRESS):LONGINT; CODE -156;
PROCEDURE ThinLayerInfo(li{Reg.A0}:ADDRESS):LONGINT; CODE -162;
PROCEDURE MoveLayerInFrontOf(layer_to_move{Reg.A0},other_layer{Reg.A1}:ADDRESS):LONGINT; CODE -168;
PROCEDURE InstallClipRegion(layer{Reg.A0},region{Reg.A1}:ADDRESS):LONGINT; CODE -174;
PROCEDURE MoveSizeLayer(layer{Reg.A0}:ADDRESS;dx{Reg.D0},dy{Reg.D1},dw{Reg.D2},dh{Reg.D3}:LONGINT):LONGINT; CODE -180;
PROCEDURE CreateUpfrontHookLayer(li{Reg.A0},bm{Reg.A1}:ADDRESS;x0{Reg.D0},y0{Reg.D1},x1{Reg.D2},y1{Reg.D3},flags{Reg.D4}:LONGINT;hook{Reg.A3},bm2{Reg.A2}:ADDRESS):LONGINT; CODE -186;
PROCEDURE CreateBehindHookLayer(li{Reg.A0},bm{Reg.A1}:ADDRESS;x0{Reg.D0},y0{Reg.D1},x1{Reg.D2},y1{Reg.D3},flags{Reg.D4}:LONGINT;hook{Reg.A3},bm2{Reg.A2}:ADDRESS):LONGINT; CODE -192;
PROCEDURE InstallLayerHook(layer{Reg.A0},hook{Reg.A1}:ADDRESS):LONGINT; CODE -198;
PROCEDURE InstallLayerInfoHook(li{Reg.A0},hook{Reg.A1}:ADDRESS):LONGINT; CODE -204;
PROCEDURE SortLayerCR(layer{Reg.A0}:ADDRESS;dx{Reg.D0},dy{Reg.D1}:LONGINT):LONGINT; CODE -210;
PROCEDURE DoHookClipRects(hook{Reg.A0},rport{Reg.A1},rect{Reg.A2}:ADDRESS):LONGINT; CODE -216;
END LayersL.