workbench/devs/AHI/Drivers/SB128/MODEFILE.s

   1
   2         .MACRO  LONG num
   3 .ifdef  LITTLE_ENDIAN
   4         .byte   ((\num)>>24)&255
   5         .byte   ((\num)>>16)&255
   6         .byte   ((\num)>> 8)&255
   7         .byte   ((\num)>> 0)&255
   8 .else
   9         .long   \num
  10 .endif
  11         .ENDM
  12
  13         .MACRO  LONG2 num1,num2
  14 .ifdef  LITTLE_ENDIAN
  15         .byte   ((\num1)>>24)&255
  16         .byte   ((\num1)>>16)&255
  17         .byte   ((\num1)>> 8)&255
  18         .byte   ((\num1)>> 0)&255
  19
  20         .byte   ((\num2)>>24)&255
  21         .byte   ((\num2)>>16)&255
  22         .byte   ((\num2)>> 8)&255
  23         .byte   ((\num2)>> 0)&255
  24 .else
  25         .long   \num1, \num2
  26 .endif
  27         .ENDM
  28
  29         .MACRO  FORM_START name
  30 CHUNKCNT        .ASSIGNA 0
  31         .ascii  "FORM"
  32         LONG    FORMEND-FORMSTART
  33 FORMSTART:
  34         .ascii  "\name"
  35         .ENDM
  36
  37         .MACRO  FORM_END name
  38 FORMEND:
  39         .balign 2,0
  40         .ENDM
  41
  42         .MACRO  CHUNK_START name
  43         .ascii  "\name"
  44         LONG    CHUNKEND\&CHUNKCNT-CHUNKSTART\&CHUNKCNT
  45 CHUNKSTART\&CHUNKCNT:
  46         .ENDM
  47
  48         .MACRO  CHUNK_END
  49 CHUNKEND\&CHUNKCNT:
  50 CHUNKCNT        .ASSIGNA \&CHUNKCNT+1
  51         .balign 2,0
  52         .ENDM
  53
  54 AHI_TagBase     .EQU    2147483648
  55 AHI_TagBaseR    .EQU    AHI_TagBase+32768
  56
  57 AHIDB_AudioID   .EQU    AHI_TagBase+100
  58 AHIDB_Volume    .EQU    AHI_TagBase+103
  59 AHIDB_Panning   .EQU    AHI_TagBase+104
  60 AHIDB_Stereo    .EQU    AHI_TagBase+105
  61 AHIDB_HiFi      .EQU    AHI_TagBase+106
  62 AHIDB_MultTable .EQU    AHI_TagBase+108
  63 AHIDB_Name      .EQU    AHI_TagBaseR+109
  64
  65 AHIDB_UserBase  .EQU    AHI_TagBase+500
  66
  67 TAG_DONE        .EQU    0
  68
  69 TRUE            .EQU    1
  70 FALSE           .EQU    0