home *** CD-ROM | disk | FTP | other *** search
/ The Best of Mecomp Multimedia 1 / Mecomp-CD.iso / amiga / player / ahi / developer / include / macros.i next >
Encoding:
Text File  |  1996-03-03  |  887 b   |  68 lines
  1.  
  2. TRUE    equ    1
  3. FALSE    equ    0
  4. NULL    equ    0
  5.  
  6. AMIGA   EQU     1
  7. A1200   EQU     2
  8. A4000   EQU     4
  9.  
  10. MC000   EQU     $010
  11. MC010   EQU     $020
  12. MC020   EQU     $040
  13. MC030   EQU     $080
  14. MC040   EQU     $100
  15. MC060   EQU     $200
  16.  
  17. MC000p    EQU    MC000!MC010!MC020!MC030!MC040!MC060
  18. MC010p    EQU    MC010!MC020!MC030!MC040!MC060
  19. MC020p    EQU    MC020!MC030!MC040!MC060
  20. MC030p    EQU    MC030!MC040!MC060
  21. MC040p    EQU    MC040!MC060
  22. MC060p    EQU    MC060
  23.  
  24. call    MACRO
  25.     jsr    _LVO\1(a6)
  26.     ENDM
  27.  
  28.  
  29. skipw    MACRO
  30.     IFNE    NARG
  31.     FAIL    !!! NO ARGUMENTS ALLOWED !!!
  32.     ENDC
  33.  
  34.     dc.w    $0c40                    ;CMPI.W #????,d0
  35.     ENDM
  36.  
  37. skipl    MACRO
  38.     IFNE    NARG
  39.     FAIL    !!! NO ARGUMENTS ALLOWED !!!
  40.     ENDC
  41.  
  42.     dc.w    $0c80                    ;CMPI.L #????????,d0
  43.     ENDM
  44.  
  45. base    MACRO
  46.     IFC    '\1','exec'
  47.         move.l    4.w,a6
  48.     ELSE
  49.         move.l    \1base(pc),a6
  50.     ENDC
  51.     ENDM
  52.  
  53. push    MACRO
  54.     move.l    \1,-(sp)
  55.     ENDM
  56.  
  57. pop    MACRO
  58.     move.l    (sp)+,\1
  59.     ENDM
  60.  
  61. pushm    MACRO
  62.     movem.l    \1,-(sp)
  63.     ENDM
  64.  
  65. popm    MACRO
  66.     movem.l    (sp)+,\1
  67.     ENDM
  68.