home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Assembler / wst!oma3.lha / OMA / Include / exec / initializers.i < prev    next >
Encoding:
Text File  |  1994-12-23  |  836 b   |  59 lines
  1.     IFND    EXEC_INITIALIZERS_I
  2. EXEC_INITIALIZERS_I    EQU    1
  3. *    $Filename: exec/initializers.i $
  4. *    $Release: 2.04 Includes, V37.4 $
  5. *    $Revision: 36.5 $
  6. *    $Date: 90/05/10 $
  7. *    Macros for creating InitStruct() tables
  8. *    (C) Copyright 1985-1991 Commodore-Amiga, Inc.
  9. *        All Rights Reserved
  10. INITBYTE    MACRO
  11.     IFLE    (\1)-255
  12.     DC.B    $a0,\1
  13.     DC.B    \2,0
  14.     MEXIT
  15.     ENDC
  16.     DC.B    $e0,0
  17.     DC.W    \1
  18.     DC.B    \2,0
  19.     ENDM
  20. INITWORD    MACRO
  21.     IFLE    (\1)-255
  22.     DC.B    $90,\1
  23.     DC.W    \2
  24.     MEXIT
  25.     ENDC
  26.     DC.B    $d0,0
  27.     DC.W    \1
  28.     DC.W    \2
  29.     ENDM
  30. INITLONG    MACRO
  31.     IFLE    (\1)-255
  32.     DC.B    $80,\1
  33.     DC.L    \2
  34.     MEXIT
  35.     ENDC
  36.     DC.B    $c0,0
  37.     DC.W    \1
  38.     DC.L    \2
  39.     ENDM
  40. INITSTRUCT    MACRO
  41.     DS.W    0
  42.     IFC    '\4',''
  43. COUNT\@    SET    0
  44.     ENDC
  45.     IFNC    '\4',''
  46. COUNT\@    SET    \4
  47.     ENDC
  48. CMD\@    SET    (((\1)<<4)!COUNT\@)
  49.     IFLE    (\2)-255
  50.     DC.B    (CMD\@)!$80
  51.     DC.B    \2
  52.     MEXIT
  53.     ENDC
  54.     DC.B    CMD\@!$0C0
  55.     DC.B    (((\2)>>16)&$0FF)
  56.     DC.W    ((\2)&$0FFFF)
  57.     ENDM
  58.     ENDC
  59.