home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 25 / AACD 25.iso / AACD / Programming / yaec / modules / amigaguide.e next >
Encoding:
Text File  |  2001-08-12  |  2.0 KB  |  27 lines
  1. OPT MODULE
  2. OPT EXPORT
  3. -> Module created with E:bin/fd2module from YAECv18 package.
  4. OPT NDDC
  5. -> --- functions in V40 or higher (Release 3.1) ---
  6. -> 
  7. ->  Public entries
  8. -> 
  9. #macro LockAmigaGuideBase(handle) IS (A0:=handle) BUT (A6:=amigaguidebase) BUT ASM ' jsr -36(a6)'
  10. #macro UnlockAmigaGuideBase(key) IS (D0:=key) BUT (A6:=amigaguidebase) BUT ASM ' jsr -42(a6)'
  11. #macro OpenAmigaGuideA(nag,*) IS Stores(amigaguidebase,nag,*) BUT Loads(A6,A0,A1) BUT ASM ' jsr -54(a6)'
  12. #macro OpenAmigaGuideAsyncA(nag,attrs) IS Stores(amigaguidebase,nag,attrs) BUT Loads(A6,A0,D0) BUT ASM ' jsr -60(a6)'
  13. #macro CloseAmigaGuide(cl) IS (A0:=cl) BUT (A6:=amigaguidebase) BUT ASM ' jsr -66(a6)'
  14. #macro AmigaGuideSignal(cl) IS (A0:=cl) BUT (A6:=amigaguidebase) BUT ASM ' jsr -72(a6)'
  15. #macro GetAmigaGuideMsg(cl) IS (A0:=cl) BUT (A6:=amigaguidebase) BUT ASM ' jsr -78(a6)'
  16. #macro ReplyAmigaGuideMsg(amsg) IS (A0:=amsg) BUT (A6:=amigaguidebase) BUT ASM ' jsr -84(a6)'
  17. #macro SetAmigaGuideContextA(cl,id,attrs) IS Stores(amigaguidebase,cl,id,attrs) BUT Loads(A6,A0,D0,D1) BUT ASM ' jsr -90(a6)'
  18. #macro SendAmigaGuideContextA(cl,attrs) IS Stores(amigaguidebase,cl,attrs) BUT Loads(A6,A0,D0) BUT ASM ' jsr -96(a6)'
  19. #macro SendAmigaGuideCmdA(cl,cmd,attrs) IS Stores(amigaguidebase,cl,cmd,attrs) BUT Loads(A6,A0,D0,D1) BUT ASM ' jsr -102(a6)'
  20. #macro SetAmigaGuideAttrsA(cl,attrs) IS Stores(amigaguidebase,cl,attrs) BUT Loads(A6,A0,A1) BUT ASM ' jsr -108(a6)'
  21. #macro GetAmigaGuideAttr(tag,cl,storage) IS Stores(amigaguidebase,tag,cl,storage) BUT Loads(A6,D0,A0,A1) BUT ASM ' jsr -114(a6)'
  22. #macro LoadXRef(lock,name) IS Stores(amigaguidebase,lock,name) BUT Loads(A6,A0,A1) BUT ASM ' jsr -126(a6)'
  23. #macro ExpungeXRef() IS (A6:=amigaguidebase) BUT ASM ' jsr -132(a6)'
  24. #macro AddAmigaGuideHostA(h,name,attrs) IS Stores(amigaguidebase,h,name,attrs) BUT Loads(A6,A0,D0,A1) BUT ASM ' jsr -138(a6)'
  25. #macro RemoveAmigaGuideHostA(hh,attrs) IS Stores(amigaguidebase,hh,attrs) BUT Loads(A6,A0,A1) BUT ASM ' jsr -144(a6)'
  26. #macro GetAmigaGuideString(id) IS (D0:=id) BUT (A6:=amigaguidebase) BUT ASM ' jsr -210(a6)'
  27.