home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d5xx / d556 / asmonedemo.lha / ASMOneDemo / ASMOneDemo.lzh / ASM-One / Include.Strip / exec / initializers.i < prev    next >
Text File  |  1991-10-17  |  490b  |  41 lines
  1.     IFND    EXEC_INITIALIZERS_I
  2. EXEC_INITIALIZERS_I    SET    1
  3. INITBYTE    MACRO    *
  4.     DC.B    $e0
  5.     DC.B    0
  6.     DC.W    \1
  7.     DC.B    \2
  8.     DC.B    0
  9.     ENDM
  10. INITWORD    MACRO    *
  11.     DC.B    $d0
  12.     DC.B    0
  13.     DC.W    \1
  14.     DC.W    \2
  15.     ENDM
  16. INITLONG    MACRO    *
  17.     DC.B    $c0
  18.     DC.B    0
  19.     DC.W    \1
  20.     DC.L    \2
  21.     ENDM
  22. INITSTRUCT    MACRO    *
  23.     DS.W    0
  24.     IFC    '\4',''
  25. COUNT\@    SET    0
  26.     ENDC
  27.     IFNC    '\4',''
  28. COUNT\@    SET    \4
  29.     ENDC
  30. CMD\@    SET    (((\1)<<4)!COUNT\@)
  31.     IFLE    (\2)-255
  32.     DC.B    (CMD\@)!$80
  33.     DC.B    \2
  34.     MEXIT
  35.     ENDC
  36.     DC.B    CMD\@!$0C0
  37.     DC.B    (((\2)>>16)&$0FF)
  38.     DC.W    ((\2)&$0FFFF)
  39.     ENDM
  40.     ENDC
  41.