home *** CD-ROM | disk | FTP | other *** search
/ Dave Lowe: Ghostbusters I…C Atari ST-SS 1989.10.05 / Lowe_GhostbustersIIDiskC_AtariST-SS_1989.10.05.img / STABLE1.ASM < prev    next >
Encoding:
Assembly Source File  |  1990-07-16  |  30.8 KB  |  1,917 lines

  1. ;********************************* stable1.asm ******************************
  2. ;*                                                                          *
  3. ;* Ad Lib Sound Effects Driver                                              *
  4. ;* Copyright 1990, Ad Lib Inc.                                              *
  5. ;*                                                                          *
  6. ;****************************************************************************
  7.  
  8. include    tables.inc
  9.  
  10. _TEXT segment byte public  'code'
  11.     assume CS:_TEXT
  12.     assume DS:_TEXT
  13.  
  14. ;----------------------------------------------------------------------------
  15.  
  16.     public _SoundTable1
  17.  
  18. _SoundTable1    label    byte
  19.     dw    killall            ;0
  20.  
  21. ;** Cartoon **;    
  22.     dw     START,jump2,fall1        ;1,2,3        
  23.     dw    fall2,jump1,bounce    ;4,5,6
  24.     dw    bounce2,bounce4,bounce5    ;7,8,9
  25.     dw    fall4,gas,hop        ;10,11,12
  26.     dw    tweedy4,danger,hit1    ;13,14,15
  27.     dw    bonk2,boing1,boing    ;16,17,18
  28.     dw    spacefall            ;19
  29.     dw    null,null,null        ;20,21,22
  30.     dw    null,null,null        ;23,24,25
  31.     dw    null,null,null        ;26,27,28
  32.  
  33.     dw    null,null        ;29,30
  34.  
  35. ;** Imitative **;
  36.     dw    pigfrog            ;31
  37.     dw    pig,null,fsteps        ;32,33,34
  38.     dw    door,open,hitbeam    ;35,36,37
  39.     dw    null,bigben,electric    ;38,39,40
  40.     dw    null,sword,null        ;41,42,43
  41.     dw    null,drip,bird        ;44,45,46
  42.     dw    cricket,chirp,bird4    ;47,48,49
  43.      dw    bird5,alarm1,plane1    ;50,51,52
  44.     dw    hel1,ocean3,quack1    ;53,54,55
  45.     dw    bird1,ocean1,bell2    ;56,57,58
  46.     dw    belltree,swipe,wave    ;59,60,61
  47.     dw    hitpost,birdfly,deadxylo    ;62,63,64
  48.     dw    clave,EGuitar,kick3    ;65,66,67
  49.     dw    snare2,cym2,hihat2C    ;68,69,70
  50.     dw    hihat2O,ride3,tom1    ;71,72,73
  51.     dw  tom1LICK,crash1,trek    ;74,75,76
  52.     dw    null,null,null        ;77,78,79
  53.  
  54. ;** Engines **; 
  55.     dw  killmotor,packocycles,engine1    ;80,81,82
  56.     dw    jet1,motor1,motor2    ;83,84,85        
  57.     dw    null,null,null        ;86,87,88          
  58.     dw    null,null,null        ;89,90,91          
  59.     dw    null,null,null        ;92,93,94       
  60.     dw    null,null,null        ;95,96,97
  61.     dw    null,null,null        ;98,99,100
  62.     dw    null,null,null        ;101,102,103
  63.     dw    null,null,null        ;104,105,106
  64.     dw    null,null,null        ;107,108,109
  65.  
  66.     dw    null,null,null        ;110,111,112
  67.     dw    null,null,null        ;113,114,115
  68.     dw    null,null,null        ;116,117,118
  69.     dw    null,null,null        ;119,120,121
  70.     dw    null,null,null        ;122,123,124
  71.     dw    null,null,null        ;125,126,127
  72.  
  73. ;** Cartoon Internals **;
  74.     dw    hop2,hop3,null        ;128,129,130
  75.     dw    null,null,null        ;131,132,133
  76.     dw     null,null,null        ;134,135,136
  77.     dw    null,null,null        ;137,138,139
  78.     dw    null,null,null        ;140,141,142
  79.     dw    null,null,null        ;143,144,145
  80.  
  81. ;** Imitative Internals **;
  82.     dw    birdfade,bigbeni,null    ;146,147,148
  83.     dw    wavecrash,null,null    ;149,150,151
  84.  
  85.     dw    belltree2,belltree3,belltree4    ;152,153,154
  86.     dw    belltree5,belltree6,belltree7    ;155,156,157
  87.     dw    belltree8,belltree9,null    ;158,159,160
  88.     dw  STBEEP,STSONAR,stback       ;161,162,163
  89.     dw  stback2,null,null       ;164,165,166
  90.     dw    null,null,null        ;167,168,169
  91.     dw    null,null,null        ;170,171,172
  92.     dw    null,null,null        ;173,174,175
  93.  
  94. ;** Motor Internals  **;
  95.     dw    cycle2,cycle3,cycle4    ;176,177,178
  96.     dw    motorcycle,siren1,horn2    ;179,180,181
  97.     dw    null,null,null        ;182,183,184
  98.     dw    null,null,null        ;185,186,187
  99.     dw    null,null,null        ;188,189,190
  100.     dw    null,null,null        ;191,192,193
  101.     dw    null,null,null        ;194,195,196
  102.     dw    null,null,null        ;197,198,199
  103.     dw    null,null,null        ;200,201,202
  104.     dw    null,null,null        ;203,204,205
  105.     dw    null,null,null        ;206,207,208
  106.     dw    null,null,null        ;209,210,211
  107.     dw    null            ;212
  108.  
  109.     dw    null            ;213
  110.     dw    null            ;214
  111.     dw    null,null,null        ;215,216,217
  112.     dw    null,null,null        ;218,219,220
  113.     dw    null,null,null        ;221,222,223
  114.     dw    null,null,null        ;224,225,226
  115.     dw    null,null,null        ;227,228,229
  116.     dw    null,null,null        ;230,231,232
  117.     dw    null,null,null        ;233,234,235
  118.  
  119.               
  120.  
  121. ;----------------------------------------------------------------------------
  122. killall    db    009h,10
  123.         db    0b3h,000h
  124.         db    0b3h,001h
  125.         db    0b3h,002h
  126.         db    0b3h,003h
  127.         db    0b3h,004h
  128.         db    0b3h,005h
  129.         db    0b3h,006h
  130.         db    0b3h,007h
  131.         db    0b3h,008h
  132.         db    0c3h
  133.         db    088h
  134.  
  135. null         db  000h,00h,088h
  136.  
  137.  
  138.  
  139. trek    label   byte
  140.     db  009h,004h
  141.     db  082h,161
  142.     db  082h,162
  143.     db  082h,163
  144.     db  082h,164
  145.     db  088h
  146.     ;sound string formatted dump   filename: STSONAR
  147.  
  148. STSONAR label   byte
  149.     db  001h,004h
  150.     db  SETCHANNELATTN,00ah
  151.     db  SETPATCH,99
  152.     db  SNOP
  153.     db  SNOP
  154.     db  SNOP
  155. STSONARLUP  label byte
  156.     db  PITCHDELTA,0ffh,000h,006h
  157.     db  SETGATETHRESHOLD,00fh
  158.     db  59h,010h
  159.     db  59h,00fh
  160.     db  59h,00fh
  161.     db  59h,00bh
  162.     db  PITCHDELTA,0ffh,0ffh,0f9h
  163.     db  STAY,012h
  164.     db  REST,00ch
  165.     db  PITCHDELTA,0ffh,000h,006h
  166.     db  BRANCH
  167.     dw  STSONARLUP
  168.     ;sound string formatted dump   filename: STBEEP
  169.  
  170.     ;sound string formatted dump   filename: stbeep
  171.  
  172. stbeep  label   byte
  173.     db  000h,004h
  174.     db  SETCHANNELATTN,018h
  175.     db  SETPATCH,98
  176.     db  SNOP
  177.     db  SNOP
  178. STBEEPLUP   label byte
  179.     db  PITCHDELTA,0a0h,000h,001h
  180.     db  SETGATETHRESHOLD,010h
  181.     db  40h,01eh
  182.     db  BRANCH
  183.     dw  STBEEPLUP
  184.     ;sound string formatted dump   filename: JUNK
  185.  
  186.  
  187. stback2 label   byte
  188.     db  003h,004h
  189.     db  SETCHANNELATTN,016h
  190.     db  SETPATCH,065h
  191.     db  TABLEMODOP,0ffh,001h,023h
  192.     dw  TBACKTBL
  193.     db  SETGATETHRESHOLD,008h
  194. STBACKLUP2  label byte
  195.     db  89h,010h
  196.     db  3bh,030h
  197.     db  89h,010h
  198.     db  3bh,040h
  199.     db  89h,010h
  200.     db  REST,060h
  201.     db  89h,010h
  202.     db  3bh,030h
  203.     db  89h,010h
  204.     db  3bh,040h
  205.     db  REST,080h
  206.     db  BRANCH
  207.     dw  STBACKLUP2
  208. TBACKTBL    db  002h,001h
  209.  
  210.     ;sound string formatted dump   filename: stback
  211. stback  label   byte
  212.     db  002h,004h
  213.     db  SETCHANNELATTN,006h
  214.     db  SETPATCH,100
  215.     db  PITCHDELTA,020h,0ffh,0ffh
  216. STBACKLUP   label byte
  217.     db  SETPATCH,100
  218.     db  52h,01ah
  219.     db  89h,030h
  220.     db  52h,010h
  221.     db  89h,040h
  222.     db  52h,010h
  223.     db  REST,060h
  224.     db  52h,010h
  225.     db  89h,030h
  226.     db  52h,010h
  227.     db  89h,040h
  228.     db  REST,076h
  229.     db  BRANCH
  230.     dw  STBACKLUP
  231.  
  232. spacefall    label    byte
  233.     db    000h,000h
  234.     db    SETGATETHRESHOLD,001h
  235.     db    SETPATCH,042h+100
  236.     db    74h,001h
  237.     db    SETLOOP,00fh
  238. spflup    label    byte
  239.     db    PITCHDELTA,0ffh,000h,001h
  240.     db    STAY,006h
  241.     db    PITCHDELTA,0ffh,0ffh,0feh
  242.     db    STAY,006h
  243.     db    TESTLOOP
  244.     dw    spflup
  245.     db    ENDOFSTRING
  246.  
  247.  
  248. jump1    label    byte
  249.     db    000h,000h
  250.     db    SETGATETHRESHOLD,001h
  251.     db    SETPATCH,051h+100
  252.     db    58h,001h
  253.     db    SETLOOP,004h
  254. j1lup    label byte
  255.     db    PITCHDELTA,0ffh,000h,014h
  256.     db    STAY,007h
  257.     db    PITCHDELTA,0ffh,0ffh,0e8h
  258.     db    STAY,004h
  259.     db    TESTLOOP
  260.     dw    j1lup
  261.     db    REST,001h
  262.     db    ENDOFSTRING
  263.  
  264. jump2    label    byte
  265.     db    000h,000h
  266.     db    SETGATETHRESHOLD,001h
  267.     db    SETPATCH,04eh+100
  268.     db    37h,006h
  269.     db    PITCHDELTA,0ffh,000h,007h
  270.     db    STAY,030h
  271.     db    ENDOFSTRING
  272.  
  273. gas    label    byte
  274.     db    000h,000h
  275.     db    SETGATETHRESHOLD,001h
  276.     db    SETPATCH,054h+100
  277.     db    08h,00ch
  278.     db    PITCHDELTA,0ffh,000h,070h
  279.     db    STAY,030h
  280.     db    ENDOFSTRING
  281.  
  282.  
  283. bounce    label    byte
  284.     db    000h,000h
  285.     db    SETGATETHRESHOLD,001h
  286.     db    SETPATCH,052h+100
  287.     db    01h,006h
  288.     db    PITCHDELTA,0ffh,000h,007h
  289.     db    STAY,030h
  290.     db    ENDOFSTRING
  291.  
  292. bounce2    label    byte
  293.     db    000h,000h
  294.     db    SETGATETHRESHOLD,001h
  295.     db    SETPATCH,053h+100
  296.     db    07h,006h
  297.     db    PITCHDELTA,089h,000h,011h
  298.     db    STAY,030h
  299.     db    ENDOFSTRING
  300.  
  301. bounce4    label    byte
  302.     db    000h,000h
  303.     db    SETGATETHRESHOLD,001h
  304.     db    SETPATCH,04eh+100
  305.     db    VIBRATO,0ffh,008h,006h,000h
  306.     db    0ah,009h
  307.     db    ENDOFSTRING
  308.  
  309. bounce5    label    byte
  310.     db    000h,000h
  311.     db    SETGATETHRESHOLD,001h
  312.     db    SETPATCH,04eh+100
  313.     db    VIBRATO,0ffh,008h,006h,000h
  314.     db    3bh,006h
  315.     db    ENDOFSTRING
  316.  
  317. fall1    label    byte
  318.     db    000h,000h
  319.     db    SETGATETHRESHOLD,001h
  320.     db    SETPATCH,043h+100
  321.     db    58h,001h
  322.     db    SETLOOP,00fh
  323. f1lup    label    byte
  324.     db    PITCHDELTA,0ffh,000h,013h
  325.     db    STAY,006h
  326.     db    SNOP
  327.     db    SNOP
  328.     db    PITCHDELTA,0ffh,0ffh,0deh
  329.     db    STAY,006h
  330.     db    TESTLOOP
  331.     dw    f1lup
  332.     db    ENDOFSTRING
  333.  
  334. fall2    label    byte
  335.     db    000h,000h
  336.     db    SETGATETHRESHOLD,001h
  337.     db    SETPATCH,046h+100
  338.     db    58h,001h
  339.     db    SETLOOP,02ch
  340. f2lup    label    byte
  341.     db    PITCHDELTA,0ffh,000h,013h
  342.     db    STAY,004h
  343.     db    PITCHDELTA,0ffh,0ffh,0e8h
  344.     db    STAY,004h
  345.     db    TESTLOOP
  346.     dw    f2lup
  347.     db    ENDOFSTRING
  348.  
  349.  
  350. fall4    label    byte
  351.     db    001h,000h
  352.     db    SETGATETHRESHOLD,001h
  353.     db    SETPATCH,055h+100
  354.     db    PITCHDELTA,0ffh,0ffh,0fch
  355.     db    7bh,0ffh
  356.     db    PITCHDELTA,0ffh,0ffh,0f7h
  357.     db    STAY,060h
  358.     db    ENDOFSTRING
  359.  
  360.  
  361. hop    label    byte
  362.     db    000h,008h
  363.     db    STARTVOICE,128
  364.     db    STARTVOICE,129
  365.     db    SETGATETHRESHOLD,001h
  366.     db    SETPATCH,01eh
  367.     db    01h,002h
  368.     db    PITCHDELTA,0ffh,000h,025h
  369.     db    SETPATCH,020h
  370.     db    50h,00ah
  371.     db    ENDOFSTRING
  372.         
  373.  
  374. hop2    label    byte
  375.     db    001h,008h
  376.     db    SETGATETHRESHOLD,001h
  377.     db    SETPATCH,01eh
  378.     db    01h,002h
  379.     db    PITCHDELTA,0ffh,000h,025h
  380.     db    SETPATCH,020h
  381.     db    41h,00ah
  382.     db    ENDOFSTRING
  383.  
  384.  
  385. hop3    label    byte
  386.     db    002h,008h
  387.     db    SETGATETHRESHOLD,001h
  388.     db    SETPATCH,01eh
  389.     db    01h,002h
  390.     db    PITCHDELTA,0ffh,000h,025h
  391.     db    SETPATCH,020h
  392.     db    42h,00ah
  393.     db    ENDOFSTRING
  394.  
  395.  
  396. tweedy4    db    000h,000h    ;pitch delta drives down through 0 and wraps 
  397.     db    0abh,008h
  398.     db    083h,001h
  399.     db    090h,01eh
  400.     db    001h,002h
  401.     db    090h,034h
  402.     db    091h,0ffh,0ffh,0f0h
  403.     db    006h,010h
  404.     db    089h,006h
  405.     db    088h
  406.  
  407. danger db    000h,000h    ;musical effect
  408.     db    0abh,08h
  409.     db    083h,001h
  410.     db    090h,01eh
  411.     db    001h,002h
  412.     db    090h,118
  413.     db    007h,078h
  414.     db    003h,074h
  415.     db    007h,070h
  416.     db    003h,06ch
  417.     db    007h,068h
  418.     db    003h,064h
  419.     db    007h,060h
  420.     db    003h,05ch
  421.     db    088h
  422.  
  423. hit1        db    000h,000h
  424.         db    090h,124
  425.         db    083h,0ffh
  426.         db    030h,001h
  427.         db    091h,0ffh,0ffh,0d0h
  428.         db    0a0h,010h
  429.         db    091h,0ffh,000h,001h
  430.         db    0a0h,010h
  431.         db    088h
  432.  
  433. metalbonk    db    000h,000h
  434.         db    090h,132
  435.         db    083h,0ffh
  436.         db    093h,0f9h
  437.         db    0bbh,0bbh
  438.         db    020h,00ch
  439.         db    080h,008h
  440.  
  441. bonkloop    db    091h,0ffh,000h,009h
  442.         db    0a0h,004h
  443.         db    091h,0ffh,0ffh,0f6h
  444.         db    0a0h,004h
  445.         db    081h
  446.         dw    bonkloop
  447.         db    088h
  448.  
  449. bonk2    db    000h,000h
  450.         db    090h,0
  451.         db    001h,002h
  452.         db    090h,126
  453.         db    083h,0ffh
  454.         db    020h,001h
  455.         db    091h,0ffh,0ffh,090h
  456.         db    0a0h,002h
  457.         db    091h,07fh,000h,001h
  458.         db    08bh,028h,010h
  459.         db    088h
  460.  
  461. boing1    db    000h,000h
  462.         db    090h,0
  463.         db    001h,002h
  464.         db    090h,127
  465.         db    083h,0ffh
  466.         db    020h,001h
  467.         db    091h,0ffh,0ffh,090h
  468.         db    0a0h,002h
  469.         db    091h,07fh,000h,001h
  470.         db    08bh,028h,010h
  471.         db    088h
  472.  
  473.  
  474. BOING    label    byte
  475.     db    000h,004h
  476.     db    SETGATETHRESHOLD,001h
  477.     db    SETPATCH,32
  478.     db    SETGATETHRESHOLD,0ffh
  479.     db    20h,001h
  480.     db    SETLOOP,010h
  481. boinglup    label byte
  482.     db    PITCHDELTA,0c0h,0ffh,0ddh
  483.     db    STAY,004h
  484.     db    PITCHDELTA,0ffh,000h,02bh
  485.     db    STAY,007h
  486.     db    TESTLOOP
  487.     dw    boinglup
  488.     db    REST,001h
  489.     db    STAY,020h
  490.     db    ENDOFSTRING
  491.  
  492. pig    label    byte
  493.     db    000h,000h
  494.     db    SETGATETHRESHOLD,001h
  495.     db    SETPATCH,050h+100
  496.     db    VIBRATO,0ffh,002h,008h,000h
  497.     db    10h,015h
  498.     db    ENDOFSTRING
  499.  
  500. pigfrog    label    byte
  501.     db    000h,000h
  502.     db    SETGATETHRESHOLD,001h
  503.     db    SETPATCH,040h+100
  504.     db    23h,00ah
  505.     db    2ah,00ah
  506.     db    ENDOFSTRING
  507.  
  508. fsteps    label    byte
  509.     db    000h,000h
  510.     db    SETGATETHRESHOLD,001h
  511.     db    SETCHANNELATTN,010h
  512.     db    SETPATCH,049h+100
  513.     db    SETLOOP,004h
  514. fslup    label     byte
  515.     db    08h,006h
  516.     db    RANDOMDURATION,007h
  517.     db    REST,027h
  518.     db    RANDOMDURATION,000h
  519.     db    05h,006h
  520.     db    RANDOMDURATION,007h
  521.     db    REST,027h
  522.     db    RANDOMDURATION,000h
  523.     db    TESTLOOP
  524.     dw    fslup
  525.     db    ENDOFSTRING
  526.  
  527. open    label    byte
  528.     db    000h,000h
  529.     db    SETGATETHRESHOLD,001h
  530.     db    SETCHANNELATTN,008h
  531.     db    SETPATCH,04dh+100
  532.     db    OCTAVEOFFSET,040h
  533.     db    PITCHDELTA,0ffh,0ffh,0f5h
  534.     db    RANDOMDURATION,001h
  535.     db    CALLSTRING
  536.     dw    OPENSUB
  537.  
  538.     db    SETSIGNEDATTN,0feh
  539.     db    RANDOMDURATION,000h
  540.     db    RANDOMPITCH,009h,000h
  541.     db    CALLSTRING
  542.     dw    OPENSUB
  543.     db    SETSIGNEDATTN,0feh
  544.     db    RANDOMDURATION,000h
  545.     db    RANDOMPITCH,00ah,000h
  546.     db    CALLSTRING
  547.     dw    OPENSUB
  548.     db    SETSIGNEDATTN,0feh
  549.     db    RANDOMDURATION,002h
  550.     db    RANDOMPITCH,0c0h,000h
  551.     db    CALLSTRING
  552.     dw    OPENSUB
  553.     db    NOTEOFFSET,000h,0bch
  554.     db    03h,0b5h
  555.     db    07h,000h
  556.     db    CALLSTRING
  557.     dw    OPENSUB
  558.     db    SETSIGNEDATTN,003h
  559.     db    RANDOMDURATION,003h
  560.     db    RANDOMPITCH,000h,000h
  561.     db    CALLSTRING
  562.     dw    OPENSUB
  563.     db    SETSIGNEDATTN,003h
  564.     db    RANDOMDURATION,005h
  565.     db    CALLSTRING
  566.     dw    OPENSUB
  567.     db    ENDOFSTRING
  568.  
  569.  
  570. OPENSUB LABEL BYTE
  571.     DB    080H,5    
  572. OSUBLUP LABEL BYTE
  573.     db    017h,002h
  574.     db    09eh,00dh
  575.     db    00Ah,002h
  576.     db    09eh,000h
  577.     db    081h
  578.     dW    OSUBLUP
  579.     db    086h
  580.  
  581. door    label    byte
  582.     db    000h,000h
  583.     db    SETGATETHRESHOLD,001h
  584.     db    SETPATCH,04fh+100
  585.     db    OCTAVEOFFSET,030h
  586.     db    PITCHDELTA,0ffh,0ffh,0f5h
  587.     db    SETLOOP,004h
  588. doorlup    label    byte
  589.     db    01h,006h
  590.     db    SETACCENTATTN,016h
  591.     db    RANDOMDURATION,00fh
  592.     db    01h,00fh
  593.     db    SETACCENTATTN,000h
  594.     db    RANDOMDURATION,000h
  595.     db    TESTLOOP
  596.     dw    doorlup
  597.     db    ENDOFSTRING
  598.  
  599. hitbeam    label    byte
  600.     db    000h,000h
  601.     db    SETGATETHRESHOLD,001h
  602.     db    SETPATCH,05ch+100
  603.     db    74h,0bdh
  604.     db    ENDOFSTRING
  605.  
  606. bigben    label    byte
  607.     db    000h,000h
  608.     db    STARTVOICE,147
  609.     db    SETGATETHRESHOLD,001h
  610.     db    SETPATCH,057h+100
  611.     db    04h,001h
  612.     db    STAY,01fh
  613.     db    ENDOFSTRING
  614.  
  615. bigbeni    label    byte
  616.     db    001h,000h
  617.     db    SETGATETHRESHOLD,001h
  618.     db    SETPATCH,057h+100
  619.     db    01h,001h
  620.     db    STAY,01fh
  621.     db    ENDOFSTRING
  622.  
  623. birdfade    label    byte
  624.     db    009h,004h
  625.     db    SETSYSATTN,000h,000h
  626.     db    SETLOOP,008h
  627. bflup    label    byte
  628.     db    STAY,027h
  629.     db    SETSYSATTNDELTA,000h,001h
  630.     db    TESTLOOP
  631.     dw    bflup
  632.     db    SETSYSATTN,000h,000h
  633.     db    ENDOFSTRING
  634.  
  635. birdfly    label    byte
  636.     db    000h,000h
  637.     db    STARTVOICE,146
  638.     db    SETCHANNELATTN,010h
  639.     db    SETGATETHRESHOLD,001h
  640.     db    SETPATCH,059h+100
  641.     db    01h,03eh
  642.     db    ENDOFSTRING
  643.  
  644. electric    label    byte
  645.     db    000h,000h
  646.     db    SETGATETHRESHOLD,001h
  647.     db    SETPATCH,048h
  648.     db    30h,40h
  649.     db    30h,40h
  650.     db    30h,50h
  651.     db    30h,40h
  652.     db    ENDOFSTRING
  653.  
  654.  
  655.  
  656. swipe    label    byte
  657.     db    000h,000h
  658.     db    SETGATETHRESHOLD,001h
  659.     db    SETPATCH,01eh
  660.     db    01h,002h
  661.     db    SETPATCH,040h
  662.     db    10h,010h
  663.     db    ENDOFSTRING
  664.  
  665.  
  666.  
  667. sword    label    byte
  668.     db    000h,000h
  669.     db    SETGATETHRESHOLD,001h
  670.     db    SETPATCH,01eh
  671.     db    01h,002h
  672.     db    SETPATCH,041h
  673.     db    37h,00fh
  674.     db    ENDOFSTRING
  675.  
  676. wave    label    byte
  677.     db    000h,000h
  678.     db    STARTVOICE,149
  679.     db    SETGATETHRESHOLD,001h
  680.     db    SETPATCH,01eh
  681.     db    01h,002h
  682.     db    SETPATCH,046h
  683.     db    20h,0efh
  684.     db    20h,0ffh
  685.     db    ENDOFSTRING
  686.  
  687.  
  688. wavecrash    label    byte
  689.     db    001h,000h
  690.     db    SETGATETHRESHOLD,001h
  691.     db    SETPATCH,01eh
  692.     db    01h,002h
  693.     db    REST,070h
  694.     db    SETPATCH,047h
  695.     db    20h,010h
  696.     db    20h,0dfh
  697.     db    20h,010h
  698.     db    20h,0efh
  699.     db    ENDOFSTRING
  700.  
  701.  
  702. BIRDATTEN EQU 013H
  703.  
  704.  
  705. cricket    label    byte
  706.     db    002h,000h
  707.     db    SETCHANNELATTN,BIRDATTEN-8
  708.     db    SETGATETHRESHOLD,001h
  709.     db    SETACCENTATTN,015h
  710.     db    SETPATCH,01eh
  711.     db    01h,002h
  712.     db    SETPATCH,04ch
  713.     db    OCTAVEOFFSET,060h
  714.     db    PITCHDELTA,0ffh,0ffh,0f5h
  715.     db    SETLOOP,004h
  716. cricketlup label byte
  717.     db    20h,002h
  718.     db    20h,002h
  719.     db    20h,002h
  720.     db    20h,002h
  721.     db    20h,002h
  722.     db    20h,002h
  723.     db    20h,002h
  724.     db    20h,002h
  725.     db    20h,002h
  726.     db    20h,002h
  727.     db    RANDOMDURATION,01fh
  728.     db    REST,090h
  729.     db    RANDOMDURATION,000h
  730.     db    TESTLOOP
  731.     dw    cricketlup
  732.     db    ENDOFSTRING
  733.  
  734.  
  735.  
  736. chirp    label    byte
  737.     db    003h,000h
  738.     db    SETCHANNELATTN,013h
  739.     db    SETGATETHRESHOLD,001h
  740.     db    SETACCENTATTN,00ah
  741.     db    SETPATCH,01eh
  742.     db    01h,002h
  743.     db    SETPATCH,077h
  744.     db    PITCHDELTA,0ffh,0ffh,0f5h
  745.     db    41h,009h
  746.     db    ENDOFSTRING
  747.  
  748. bird4    label    byte
  749.     db    005h,000h
  750.     db    SETCHANNELATTN,013h
  751.     db    SETGATETHRESHOLD,001h
  752.     db    SETPATCH,01eh
  753.     db    01h,002h
  754.     db    SETPATCH,051h
  755.     db    PITCHDELTA,0ffh,0ffh,0f6h
  756.     db    SETACCENTATTN,012h
  757.     db    PITCHDELTA,0ffh,0ffh,0ceh
  758.     db    0ch,009h
  759.     db    ENDOFSTRING
  760.  
  761. bird5    label    byte
  762.     db    005h,000h
  763.     db    SETCHANNELATTN,013h
  764.     db    SETGATETHRESHOLD,001h
  765.     db    SETPATCH,01eh
  766.     db    01h,002h
  767.     db    SETPATCH,051h
  768.     db    PITCHDELTA,0ffh,0ffh,0f6h
  769.     db    SETACCENTATTN,012h
  770.     db    PITCHDELTA,0ffh,0ffh,0ceh
  771.     db    0ch,009h
  772.     db    ENDOFSTRING
  773.  
  774. alarm1    db    000h,000h    ;this uses pitch delta up with repeated notes
  775.     db    0abh,08h
  776.     db    083h,001h
  777.     db    090h,01eh
  778.     db    001h,002h
  779.     db    090h,39
  780.     db    091h,0ffh,000h,00dh
  781.     db    001h,028h
  782.     db    001h,028h
  783.     db    001h,028h
  784.     db    001h,028h
  785.     db    001h,028h
  786.     db    089h,004h
  787.     db    088h
  788.  
  789. plane1    db    000h,000h    ;this uses slow pitch delt down for diving plane
  790.     db    0abh,08h
  791.     db    083h,001h
  792.     db    090h,01eh
  793.     db    001h,002h
  794.     db    090h,40
  795.     db    091h,0ffh,0ffh,0feh
  796.     db    017h,0e6h
  797.     db    092h
  798.     db    004h,0c0h
  799.     db    088h
  800.  
  801.  
  802. hel1    db    000h,000h    ;this uses pitch delta to slowly increase rate
  803.     db    0abh,08h
  804.     db    090h,01eh
  805.     db    001h,002h
  806.     db    090h,41
  807.     db    091h,0ffh,000h,002h
  808.     db    004h,0ffh
  809.     db    0a0h,0ffh
  810.     db    088h
  811.  
  812. ocean1 db    000h,000h    ;noise with slow envelope
  813.     db    0abh,08h
  814.     db    083h,001h
  815.     db    090h,01eh
  816.     db    001h,002h
  817.     db    090h,45
  818.     db    083h,001h
  819.     db    053h,0ffh
  820.     db    088h
  821.  
  822. ocean3    db    000h,000h    ;noise with slow envelope and pitch delta
  823.     db    0abh,008h
  824.     db    083h,001h
  825.     db    090h,01eh
  826.     db    001h,002h
  827.     db    090h,030h
  828.     db    091h,0ffh,0ffh,0ffh
  829.     db    078h,070h
  830.     db    088h
  831.  
  832. quack1 db    000h
  833.     db    000h
  834.     db    0abh,BIRDATTEN-3
  835.     db    083h
  836.     db    001h
  837.     db    090h
  838.     db    01eh
  839.     db    001h
  840.     db    002h
  841.     db    090h
  842.     db    46
  843.     db    091h
  844.     db    0ffh
  845.     db    080h
  846.     db    007h
  847.     db    070h
  848.     db    008h
  849.     db    088h
  850.  
  851.  
  852.  
  853. bird1 db    000h
  854.     db    000h
  855.     db    0abh,BIRDATTEN-5
  856.     db    083h
  857.     db    001h
  858.     db    090h
  859.     db    01eh
  860.     db    001h
  861.     db    002h
  862.     db    090h
  863.     db    47
  864.     db    091h
  865.     db    0ffh
  866.     db    0ffh
  867.     db    0ffh
  868.     db    012h
  869.     db    020h
  870.     db    088h
  871.     db    004h
  872.     db    070h
  873.     db    004h
  874.     db    070h
  875.     db    004h
  876.     db    070h
  877.     db    004h
  878.     db    088h
  879.  
  880. bell2    db    000h,000h    ;frac pitch and high multiplier on modulator
  881.     db    0abh,008h
  882.     db    083h,001h
  883.     db    090h,01eh
  884.     db    001h,002h
  885.     db    090h,039h
  886.     db    093h,07fh
  887.     db    060h,002h
  888.     db    088h
  889.  
  890. BELLTEMPO    equ    0e0h
  891. BELLATTN    equ    008h
  892.  
  893.  
  894. BellTree    db    000h,004h
  895.         db    0abh,BELLATTN
  896.  
  897.         db    082h,152
  898.         db    082h,153
  899.         db    082h,154
  900.         db    082h,155
  901.         db    082h,156
  902.         db    082h,157
  903.         db    082h,158
  904.         db    082h,159
  905.  
  906.         db    0a9h,BELLTEMPO
  907.         db    090h,001h
  908.         db    001h,002h
  909.         db    090h,125
  910.  
  911.         db    020h,02h    ;1
  912.         db    089h,02h    ;2
  913.         db    089h,02h    ;3
  914.         db    089h,02h    ;4
  915.         db    089h,02h    ;5
  916.         db    089h,02h    ;6
  917.  
  918.         db    089h,02h    ;7
  919.         db    089h,02h    ;8
  920.         db    089h,02h    ;9
  921.         db    036h,02h    ;1
  922.         db    089h,02h    ;2
  923.         db    089h,02h    ;3
  924.  
  925.         db    089h,02h    ;4
  926.         db    089h,02h    ;5
  927.         db    089h,02h    ;6
  928.         db    089h,02h    ;7
  929.         db    089h,02h    ;8
  930.         db    089h,02h    ;9
  931.  
  932.         db    050h,02h    ;1
  933.         db    089h,02h    ;2
  934.         db    089h,02h    ;3
  935.         db    089h,02h    ;4
  936.         db    089h,02h    ;5
  937.         db    089h,02h    ;6
  938.  
  939.         db    089h,02h    ;7
  940.         db    089h,02h    ;8
  941.         db    089h,02h    ;9
  942.         db    066h,02h    ;1
  943.         db    089h,02h    ;2
  944.         db    089h,02h    ;3
  945.         db    088h
  946.  
  947. BellTree2    db    001h,004h
  948.         db    0abh,BELLATTN
  949.         db    0a9h,BELLTEMPO
  950.         db    090h,001h
  951.         db    001h,002h
  952.         db    090h,125
  953.  
  954.         db    089h,02h    ;1
  955.         db    022h,02h    ;2
  956.         db    089h,02h    ;3
  957.         db    089h,02h    ;4
  958.         db    089h,02h    ;5
  959.         db    089h,02h    ;6
  960.  
  961.         db    089h,02h    ;7
  962.         db    089h,02h    ;8
  963.         db    089h,02h    ;9
  964.         db    089h,02h    ;1
  965.         db    038h,02h    ;2
  966.         db    089h,02h    ;3
  967.  
  968.         db    089h,02h    ;4
  969.         db    089h,02h    ;5
  970.         db    089h,02h    ;6
  971.         db    089h,02h    ;7
  972.         db    089h,02h    ;8
  973.         db    089h,02h    ;9
  974.  
  975.         db    089h,02h    ;1
  976.         db    052h,02h    ;2
  977.         db    089h,02h    ;3
  978.         db    089h,02h    ;4
  979.         db    089h,02h    ;5
  980.         db    089h,02h    ;6
  981.  
  982.         db    089h,02h    ;7
  983.         db    089h,02h    ;8
  984.         db    089h,02h    ;9
  985.         db    089h,02h    ;1
  986.         db    068h,02h    ;2
  987.         db    089h,02h    ;3
  988.         db    088h
  989.  
  990. BellTree3    db    002h,004h
  991.         db    0abh,BELLATTN
  992.         db    0a9h,BELLTEMPO
  993.         db    090h,001h
  994.         db    001h,002h
  995.         db    090h,125
  996.  
  997.         db    089h,02h    ;1
  998.         db    089h,02h    ;2
  999.         db    024h,02h    ;3
  1000.         db    089h,02h    ;4
  1001.         db    089h,02h    ;5
  1002.         db    089h,02h    ;6
  1003.  
  1004.         db    089h,02h    ;7
  1005.         db    089h,02h    ;8
  1006.         db    089h,02h    ;9
  1007.         db    089h,02h    ;1
  1008.         db    089h,02h    ;2
  1009.         db    03ah,02h    ;3
  1010.  
  1011.         db    089h,02h    ;4
  1012.         db    089h,02h    ;5
  1013.         db    089h,02h    ;6
  1014.         db    089h,02h    ;7
  1015.         db    089h,02h    ;8
  1016.         db    089h,02h    ;9
  1017.  
  1018.         db    089h,02h    ;1
  1019.         db    089h,02h    ;2
  1020.         db    054h,02h    ;3
  1021.         db    089h,02h    ;4
  1022.         db    089h,02h    ;5
  1023.         db    089h,02h    ;6
  1024.  
  1025.         db    089h,02h    ;7
  1026.         db    089h,02h    ;8
  1027.         db    089h,02h    ;9
  1028.         db    089h,02h    ;1
  1029.         db    089h,02h    ;2
  1030.         db    06ah,02h    ;3
  1031.         db    088h
  1032.  
  1033. BellTree4    db    003h,004h
  1034.         db    0abh,BELLATTN
  1035.         db    0a9h,BELLTEMPO
  1036.         db    090h,001h
  1037.         db    001h,002h
  1038.         db    090h,125
  1039.  
  1040.         db    089h,02h    ;1
  1041.         db    089h,02h    ;2
  1042.         db    089h,02h    ;3
  1043.         db    026h,02h    ;4
  1044.         db    089h,02h    ;5
  1045.         db    089h,02h    ;6
  1046.  
  1047.         db    089h,02h    ;7
  1048.         db    089h,02h    ;8
  1049.         db    089h,02h    ;9
  1050.         db    089h,02h    ;1
  1051.         db    089h,02h    ;2
  1052.         db    089h,02h    ;3
  1053.  
  1054.         db    040h,02h    ;4
  1055.         db    089h,02h    ;5
  1056.         db    089h,02h    ;6
  1057.         db    089h,02h    ;7
  1058.         db    089h,02h    ;8
  1059.         db    089h,02h    ;9
  1060.  
  1061.         db    089h,02h    ;1
  1062.         db    089h,02h    ;2
  1063.         db    089h,02h    ;3
  1064.         db    056h,02h    ;4
  1065.         db    089h,02h    ;5
  1066.         db    089h,02h    ;6
  1067.  
  1068.         db    089h,02h    ;7
  1069.         db    089h,02h    ;8
  1070.         db    089h,02h    ;9
  1071.         db    089h,02h    ;1
  1072.         db    089h,02h    ;2
  1073.         db    089h,02h    ;3
  1074.         db    088h
  1075.  
  1076. BellTree5    db    004h,004h
  1077.         db    0abh,BELLATTN
  1078.         db    0a9h,BELLTEMPO
  1079.         db    090h,001h
  1080.         db    001h,002h
  1081.         db    090h,125
  1082.  
  1083.         db    089h,02h    ;1
  1084.         db    089h,02h    ;2
  1085.         db    089h,02h    ;3
  1086.         db    089h,02h    ;4
  1087.         db    028h,02h    ;5
  1088.         db    089h,02h    ;6
  1089.  
  1090.         db    089h,02h    ;7
  1091.         db    089h,02h    ;8
  1092.         db    089h,02h    ;9
  1093.         db    089h,02h    ;1
  1094.         db    089h,02h    ;2
  1095.         db    089h,02h    ;3
  1096.  
  1097.         db    089h,02h    ;4
  1098.         db    042h,02h    ;5
  1099.         db    089h,02h    ;6
  1100.         db    089h,02h    ;7
  1101.         db    089h,02h    ;8
  1102.         db    089h,02h    ;9
  1103.  
  1104.         db    089h,02h    ;1
  1105.         db    089h,02h    ;2
  1106.         db    089h,02h    ;3
  1107.         db    089h,02h    ;4
  1108.         db    058h,02h    ;5
  1109.         db    089h,02h    ;6
  1110.  
  1111.         db    089h,02h    ;7
  1112.         db    089h,02h    ;8
  1113.         db    089h,02h    ;9
  1114.         db    089h,02h    ;1
  1115.         db    089h,02h    ;2
  1116.         db    089h,02h    ;3
  1117.         db    088h
  1118.  
  1119. BellTree6    db    005h,004h
  1120.         db    0abh,BELLATTN
  1121.         db    0a9h,BELLTEMPO
  1122.         db    090h,001h
  1123.         db    001h,002h
  1124.         db    090h,125
  1125.  
  1126.         db    089h,02h    ;1
  1127.         db    089h,02h    ;2
  1128.         db    089h,02h    ;3
  1129.         db    089h,02h    ;4
  1130.         db    089h,02h    ;5
  1131.         db    02ah,02h    ;6
  1132.  
  1133.         db    089h,02h    ;7
  1134.         db    089h,02h    ;8
  1135.         db    089h,02h    ;9
  1136.         db    089h,02h    ;1
  1137.         db    089h,02h    ;2
  1138.         db    089h,02h    ;3
  1139.  
  1140.         db    089h,02h    ;4
  1141.         db    089h,02h    ;5
  1142.         db    044h,02h    ;6
  1143.         db    089h,02h    ;7
  1144.         db    089h,02h    ;8
  1145.         db    089h,02h    ;9
  1146.  
  1147.         db    089h,02h    ;1
  1148.         db    089h,02h    ;2
  1149.         db    089h,02h    ;3
  1150.         db    089h,02h    ;4
  1151.         db    089h,02h    ;5
  1152.         db    05ah,02h    ;6
  1153.  
  1154.         db    089h,02h    ;7
  1155.         db    089h,02h    ;8
  1156.         db    089h,02h    ;9
  1157.         db    089h,02h    ;1
  1158.         db    089h,02h    ;2
  1159.         db    089h,02h    ;3
  1160.         db    088h
  1161.  
  1162. BellTree7    db    006h,004h
  1163.         db    0abh,BELLATTN
  1164.         db    0a9h,BELLTEMPO
  1165.         db    090h,001h
  1166.         db    001h,002h
  1167.         db    090h,125
  1168.  
  1169.         db    089h,02h    ;1
  1170.         db    089h,02h    ;2
  1171.         db    089h,02h    ;3
  1172.         db    089h,02h    ;4
  1173.         db    089h,02h    ;5
  1174.         db    089h,02h    ;6
  1175.  
  1176.         db    030h,02h    ;7
  1177.         db    089h,02h    ;8
  1178.         db    089h,02h    ;9
  1179.         db    089h,02h    ;1
  1180.         db    089h,02h    ;2
  1181.         db    089h,02h    ;3
  1182.  
  1183.         db    089h,02h    ;4
  1184.         db    089h,02h    ;5
  1185.         db    089h,02h    ;6
  1186.         db    046h,02h    ;7
  1187.         db    089h,02h    ;8
  1188.         db    089h,02h    ;9
  1189.  
  1190.         db    089h,02h    ;1
  1191.         db    089h,02h    ;2
  1192.         db    089h,02h    ;3
  1193.         db    089h,02h    ;4
  1194.         db    089h,02h    ;5
  1195.         db    089h,02h    ;6
  1196.  
  1197.         db    060h,02h    ;7
  1198.         db    089h,02h    ;8
  1199.         db    089h,02h    ;9
  1200.         db    089h,02h    ;1
  1201.         db    089h,02h    ;2
  1202.         db    089h,02h    ;3
  1203.         db    088h
  1204.  
  1205. BellTree8    db    007h,004h
  1206.         db    0abh,BELLATTN
  1207.         db    0a9h,BELLTEMPO
  1208.         db    090h,001h
  1209.         db    001h,002h
  1210.         db    090h,125
  1211.  
  1212.         db    089h,02h    ;1
  1213.         db    089h,02h    ;2
  1214.         db    089h,02h    ;3
  1215.         db    089h,02h    ;4
  1216.         db    089h,02h    ;5
  1217.         db    089h,02h    ;6
  1218.  
  1219.         db    089h,02h    ;7
  1220.         db    032h,02h    ;8
  1221.         db    089h,02h    ;9
  1222.         db    089h,02h    ;1
  1223.         db    089h,02h    ;2
  1224.         db    089h,02h    ;3
  1225.  
  1226.         db    089h,02h    ;4
  1227.         db    089h,02h    ;5
  1228.         db    089h,02h    ;6
  1229.         db    089h,02h    ;7
  1230.         db    048h,02h    ;8
  1231.         db    089h,02h    ;9
  1232.  
  1233.         db    089h,02h    ;1
  1234.         db    089h,02h    ;2
  1235.         db    089h,02h    ;3
  1236.         db    089h,02h    ;4
  1237.         db    089h,02h    ;5
  1238.         db    089h,02h    ;6
  1239.  
  1240.         db    089h,02h    ;7
  1241.         db    062h,02h    ;8
  1242.         db    089h,02h    ;9
  1243.         db    089h,02h    ;1
  1244.         db    089h,02h    ;2
  1245.         db    089h,02h    ;3
  1246.         db    088h
  1247.  
  1248. BellTree9    db    008h,004h
  1249.         db    0abh,BELLATTN
  1250.         db    0a9h,BELLTEMPO
  1251.         db    090h,001h
  1252.         db    001h,002h
  1253.         db    090h,125
  1254.  
  1255.         db    089h,02h    ;1
  1256.         db    089h,02h    ;2
  1257.         db    089h,02h    ;3
  1258.         db    089h,02h    ;4
  1259.         db    089h,02h    ;5
  1260.         db    089h,02h    ;6
  1261.  
  1262.         db    089h,02h    ;7
  1263.         db    089h,02h    ;8
  1264.         db    034h,02h    ;9
  1265.         db    089h,02h    ;1
  1266.         db    089h,02h    ;2
  1267.         db    089h,02h    ;3
  1268.  
  1269.         db    089h,02h    ;4
  1270.         db    089h,02h    ;5
  1271.         db    089h,02h    ;6
  1272.         db    089h,02h    ;7
  1273.         db    089h,02h    ;8
  1274.         db    04ah,02h    ;9
  1275.  
  1276.         db    089h,02h    ;1
  1277.         db    089h,02h    ;2
  1278.         db    089h,02h    ;3
  1279.         db    089h,02h    ;4
  1280.         db    089h,02h    ;5
  1281.         db    089h,02h    ;6
  1282.  
  1283.         db    089h,02h    ;7
  1284.         db    089h,02h    ;8
  1285.         db    064h,02h    ;9
  1286.         db    089h,02h    ;1
  1287.         db    089h,02h    ;2
  1288.         db    089h,02h    ;3
  1289.         db    088h
  1290.  
  1291.  
  1292.  
  1293. bird    label    byte
  1294.     db    000h,000h
  1295.     db    SETTEMPO,0ffh
  1296.     db    SETCHANNELATTN,01dh
  1297.     db    SETACCENTATTN,005h
  1298.     db    SETGATETHRESHOLD,001h
  1299.     db    SETPATCH,01eh
  1300.     db    01h,002h
  1301.     db    SETPATCH,040h
  1302.     db    37h,00ch
  1303.     db    REST,012h
  1304.     db    37h,00ch
  1305.     db    REST,036h
  1306.     db    37h,00ch
  1307.     db    37h,00ch
  1308.     db    REST,030h
  1309.     db    42h,014h
  1310.     db    42h,007h
  1311.     db    42h,009h
  1312.     db    42h,00ah
  1313.     db    42h,007h
  1314.     db    ENDOFSTRING
  1315.  
  1316. hitpost    label    byte
  1317.     db    000h,000h
  1318. hitpostint label byte
  1319.     db    SETGATETHRESHOLD,001h
  1320.     db    SETPATCH,01eh
  1321.     db    01h,002h
  1322.     db    SETPATCH,04ch
  1323.     db    OCTAVEOFFSET,040h
  1324.     db    PITCHDELTA,0ffh,0ffh,0f5h
  1325.     db    20h,005h
  1326.     db    SETACCENTATTN,00dh
  1327.     db    20h,004h
  1328.     db    SETACCENTATTN,000h
  1329.     db    ENDOFSTRING
  1330.  
  1331.  
  1332.  
  1333. drip    label    byte
  1334.     db    000h,000h
  1335.     db    SETGATETHRESHOLD,001h
  1336.     db    SETPATCH,01eh
  1337.     db    01h,002h
  1338.     db    SETPATCH,04dh
  1339.     db    OCTAVEOFFSET,050h
  1340.     db    PITCHDELTA,0ffh,000h,025h
  1341.     db    20h,04fh
  1342.     db    20h,012h
  1343.     db    20h,040h
  1344.     db    20h,032h
  1345.     db    20h,040h
  1346.     db    ENDOFSTRING
  1347.  
  1348. killmotor   label   byte
  1349.    db   000h, 020h
  1350.    db   0c0h
  1351.    db   088h
  1352.  
  1353. CopAtten equ 00bh
  1354. CYCLEATTEN EQU 00dH
  1355.  
  1356. packocycles    label    byte
  1357.     db    009h,000h
  1358.     db    STARTVOICE,176
  1359.     db    STARTVOICE,177
  1360.     db    STARTVOICE,178
  1361.     db    STARTVOICE,179
  1362.     db    STAY,0ffh
  1363.     db    STAY,0ffh
  1364.     db    STAY,0ffh
  1365.     db    STAY,0ffh
  1366.     db    STAY,0ffh
  1367.     db    STAY,0ffh
  1368.     db    STAY,04fh
  1369.     db    STARTVOICE,180
  1370.     db    STAY,0ffh
  1371.     db    STARTVOICE,181
  1372.     db    STAY,02ch
  1373.     db    STARTVOICE,181
  1374.     db    STAY,020h
  1375.     db    STAY,0ffh
  1376.     db    STARTVOICE,181
  1377.     db    STAY,013h
  1378.     db    STARTVOICE,181
  1379.     db    STAY,0e0h
  1380.     db    STARTVOICE,181
  1381.     db    STAY,02ch
  1382.     db    STARTVOICE,181
  1383.     db    STAY,0ach
  1384.     db    KILLCHANNEL,002h
  1385.     db    ENDOFSTRING
  1386.  
  1387.  
  1388. cycle2    DB    7,0
  1389.     db    0abh,CYCLEATTEN
  1390.     db    083h,001h
  1391.     db    090h,01eh
  1392.     db    001h,002h
  1393.     db    090h,92
  1394.     db    087h,0f0h
  1395.     db    08Ch,6
  1396.     DB    0A9H,0E0H
  1397.     DB    09EH,10
  1398.     
  1399.     db    089h,041h
  1400.     db    084h
  1401.     dw    cycleint
  1402.  
  1403. cycle3    DB    6,0
  1404.     db    0abh,CYCLEATTEN
  1405.     db    083h,001h
  1406.     db    090h,01eh
  1407.     db    001h,002h
  1408.     db    090h,92
  1409.     db    087h,0f0h
  1410.     db    08Ch,3
  1411.     DB    0A9H,0E0H
  1412.     DB    09EH,5
  1413.     
  1414.     db    089h,061h
  1415.     db    084h
  1416.     dw    cycleint
  1417.  
  1418. cycle4    DB    5,0
  1419.     db    0abh,CYCLEATTEN
  1420.     db    083h,001h
  1421.     db    090h,01eh
  1422.     db    001h,002h
  1423.     db    090h,92
  1424.     db    087h,0f0h
  1425.     db    08Ch,6
  1426.     DB    0A9H,0E0H
  1427.     DB    09EH,08
  1428.     
  1429.     db    089h,020h
  1430.     db    084h
  1431.     dw    cycleint
  1432.  
  1433. motorcycle    db    004h,000h
  1434.     db    0abh,CYCLEATTEN
  1435.     db    083h,001h
  1436.     db    090h,01eh
  1437.     db    001h,002h
  1438.     db    090h,92
  1439.     db    087h,0f0h
  1440.     db    08Ch,5;;2
  1441.     DB    0A9H,0E0H
  1442.     
  1443.     db    089h,011h
  1444.     db    025h,01
  1445.     db    085h
  1446.     dw    throttle1
  1447.     db    089h,074h
  1448. ;;    db    089h,084h
  1449.     DB    09EH,05
  1450.  
  1451.     
  1452. cycleint    db    087h,0E0h
  1453.     db    090h,91
  1454.     db    025h,01
  1455.     db    085h
  1456.     dw    throttle1
  1457.     db    092h
  1458.     db    0A0h,030h
  1459.     db    085h
  1460.     dw    throttle1
  1461.  
  1462.     db    092h
  1463.     db    0a0h,15
  1464.       db    085h
  1465.     dw    throttle2
  1466.     db    085h
  1467.     dw    throttle2
  1468.  
  1469.     db    091h,0ffh,0ffh,0f9h
  1470.     db    0a0h,70
  1471.     db    085h
  1472.     dw    throttle1
  1473.  
  1474.     db    091h,0C0h,00,01
  1475.     db    0a0h,0cfH
  1476. lap    db    080h,8
  1477.  
  1478. away1    db    0b0h,001h
  1479.     db    0a0h,010H
  1480.     db    081h
  1481.     dw    away1
  1482. ;;    db    085h
  1483. ;;    dw    throttle1
  1484.     
  1485.     db    091h,0A0H,00,01
  1486.     db    0a0h,07fH
  1487.  
  1488.     db    080h,9
  1489. away2    db    0b0h,002h
  1490.     db    0a0h,010H
  1491.     db    081h
  1492.     dw    away2
  1493. ;;    db    090h,92
  1494. ;;    db    0a0h,001h
  1495.  
  1496.     DB    092H 
  1497.     db    0A0H,04FH
  1498.  
  1499.     db    080h,08
  1500. back2    db    0b0h,0ffh
  1501.     db    0a0h,010H
  1502.     db    081h
  1503.     dw    back2
  1504.  
  1505.     
  1506.     db    091h,080H,00,01
  1507.  
  1508.  
  1509.  
  1510.     db    080h,11
  1511. back3    db    0b0h,0feh
  1512.     db    0a0h,010H
  1513.     db    081h
  1514.     dw    back3
  1515.  
  1516.     db    091h,0f0H,00,01
  1517.     db    0a0h,005H
  1518.  
  1519.     db    091h,0c0H,0ffh,0f5h
  1520.     db    0a0h,010H
  1521.  
  1522.     db    092h
  1523.     db    080h,10
  1524. away3    db    0b0h,003h
  1525.     db    0a0h,010H
  1526.     db    081h
  1527.     dw    away3
  1528.  
  1529.     db    0a0h,0Ffh
  1530.  
  1531.     db    080h,10
  1532. back4    db    0b0h,0feh;03
  1533.     db    0a0h,010H
  1534.     db    081h
  1535.     dw    back4
  1536.  
  1537. ;    db    090h,92
  1538. ;    db    09eh,03fh
  1539. ;    db    0a0h,20h
  1540.     
  1541.  
  1542.     db    091h,0c0H,0ffh,0f5h
  1543.     db    0a0h,010H
  1544.  
  1545.  
  1546. ;           db    087h,0E0h
  1547.     db    090h,91
  1548.     db    025h,01
  1549.     db    085h
  1550.     dw    throttle1
  1551.     db    092h
  1552.     db    0A0h,030h
  1553.     db    085h
  1554.     dw    throttle1
  1555.  
  1556.     db    092h
  1557.     db    0a0h,15
  1558.       db    085h
  1559.     dw    throttle2
  1560.     db    085h
  1561.     dw    throttle2
  1562.  
  1563.     db    091h,0dfh,0ffh,0f9h
  1564.     db    0a0h,70
  1565.     
  1566.            db    087h,0E0h
  1567.  
  1568.     db    090h,92
  1569.     db    087h,0f0h
  1570.     db    08Ch,2
  1571.     DB    0A9H,0E0H
  1572.     
  1573.     db    025h,01
  1574.     db    085h
  1575.     dw    throttle1
  1576.     
  1577.  
  1578.  
  1579.     db    088h
  1580.     
  1581. throttle1    db    091h,0ffh,000h,025h
  1582.     db    0a0h,00Fh
  1583.     db    091h,0ffh,0ffh,0Eeh
  1584.     db    0a0h,017h
  1585.     db    086h
  1586.  
  1587. throttle2    db    091h,0ffh,000h,020h
  1588.     db    0a0h,05
  1589.     db    091h,0ffh,0ffh,0efh
  1590.     db    0a0h,05
  1591.     db    086h
  1592.  
  1593.  
  1594.  
  1595. cycle5    DB    8,0
  1596.     db    0abh,CYCLEATTEN
  1597.     db    083h,001h
  1598.     db    090h,01eh
  1599.     db    001h,002h
  1600.     db    090h,92
  1601.     db    087h,0f0h
  1602.     db    08Ch,3
  1603.     DB    0A9H,0E0H
  1604.     DB    09EH,12
  1605.     
  1606.     db    025h,01
  1607.     db    085h
  1608.     dw    throttle1
  1609.     db    089h,084h
  1610.  
  1611.     db    087h,0E0h
  1612.     db    090h,91
  1613.     db    025h,01
  1614.     db    085h
  1615.     dw    throttle1
  1616.     db    092h
  1617.     db    0A0h,030h
  1618.     db    085h
  1619.     dw    throttle1
  1620.  
  1621.     db    092h
  1622.     db    0a0h,15
  1623.       db    085h
  1624.     dw    throttle2
  1625.     db    085h
  1626.     dw    throttle2
  1627.  
  1628.     db    091h,0ffh,0ffh,0f9h
  1629.     db    0a0h,70
  1630.     db    085h
  1631.     dw    throttle1
  1632.  
  1633. ;    db    091h,0C0h,00,01
  1634.     db    092
  1635.     db    0a0h,0AfH
  1636.  
  1637.     db    090h,92
  1638.     db    0a0h,001h
  1639.     db    088h
  1640.  
  1641. motor1    db    000h,000h
  1642.         db    090h,129
  1643.         db    083h,0ffh        ;gate always on
  1644.         db    0bfh,002h,0        ;turn motor on
  1645.         db    010h,02h
  1646. motor1loop    db    0a0h,040h
  1647.         db    084h
  1648.         dw    motor1loop
  1649.  
  1650. jet1        db    000h,000h
  1651.         db    090h,130
  1652.         db    0bfh,002h,2        ;turn motor on to setup table addresses
  1653.         db    0c0h        ;turn motor off (no gate toggle)
  1654.         db    083h,0ffh        ;gate always on
  1655.         db    030h,002h
  1656. jetlup    db    0a0h,040h
  1657.         db    084h
  1658.         dw    jetlup
  1659.  
  1660.  
  1661. motor2    db    000h,000h
  1662.         db    090h,131
  1663.         db    083h,0ffh        ;gate always on
  1664.         db    0bfh,002h,4        ;turn motor on
  1665.         db    010h,02h
  1666. motor2loop    db    0a0h,040h
  1667.         db    084h
  1668.         dw    motor2loop
  1669.  
  1670.  
  1671. ENGINE1    label    byte
  1672.     db    000h,000h
  1673.     db    SETPATCH,28
  1674.     db    SETLOOP,023h
  1675. englup    label byte
  1676.     db    06h,009h
  1677.     db    TESTLOOP
  1678.     dw    englup
  1679.     db    ENDOFSTRING
  1680.  
  1681. horn2    db    1,0
  1682.         db    090h,14
  1683.         db    09Eh,CopAtten
  1684.         db    10h,10h    ;030h
  1685.         db    89h,4
  1686.         db    88h
  1687.  
  1688. siren1    db    2,0
  1689.         db    083h,0ffh
  1690.         db    090h,15
  1691.         db    09Eh,CopAtten
  1692.         db    1,1
  1693.         db    95h,0ffh,6,6,1
  1694.         db    38h,0feh
  1695.  
  1696. noend        db    0a0h,0feh
  1697.         db    084h
  1698.         dw    noend
  1699.  
  1700.  
  1701. deadxylo    label    byte
  1702.     db    000h,000h
  1703.     db    SETGATETHRESHOLD,001h
  1704.     db    SETPATCH,01eh
  1705.     db    01h,002h
  1706.     db    SETPATCH,04ch
  1707.     db    OCTAVEOFFSET,050h
  1708.     db    PITCHDELTA,0ffh,0ffh,0f5h
  1709.     db    SETLOOP,00ah
  1710. xylolup label byte
  1711.     db    20h,006h
  1712.     db    TESTLOOP
  1713.     dw    xylolup
  1714.     db    ENDOFSTRING
  1715. clave    label    byte
  1716.     db    000h,000h
  1717.     db    SETGATETHRESHOLD,001h
  1718.     db    SETPATCH,01eh
  1719.     db    01h,002h
  1720.     db    SETPATCH,04ch
  1721.     db    OCTAVEOFFSET,040h
  1722.     db    PITCHDELTA,0ffh,0ffh,0f5h
  1723.     db    34h,005h
  1724.     db    SETACCENTATTN,025h
  1725.     db    34h,005h
  1726.     db    SETACCENTATTN,000h
  1727.     db    ENDOFSTRING
  1728.  
  1729. EGuitar    label    byte
  1730.     db    000h,000h
  1731.     db    SETGATETHRESHOLD,001h
  1732.     db    SETPATCH,048h+100
  1733.     db    24h,024h
  1734.     db    29h,024h
  1735.     db    27h,024h
  1736.     db    STAY,012h
  1737.     db    24h,024h
  1738.     db    27h,024h
  1739.     db    29h,012h
  1740.     db    2ah,0ffh
  1741.     db    STAY,0ffh
  1742.     db    VIBRATO,0ffh,006h,003h,000h
  1743.     db    STAY,0ffh
  1744.     db    STAY,0ffh
  1745.     db    STAY,0ffh
  1746.     db    STAY,0ffh
  1747.     db    ENDOFSTRING
  1748.  
  1749. kick3 label byte
  1750.     db    000h,000h
  1751.     db    SETGATETHRESHOLD,001h
  1752.     db    SETPATCH,18
  1753.     db    020h,06h
  1754.     db    089h,040h
  1755.     db    020h,08h
  1756.     db    ENDOFSTRING
  1757.  
  1758. snare2 label byte
  1759.     db    001h,000h
  1760.     db    SETGATETHRESHOLD,001h
  1761.     db    SETPATCH,19
  1762.     db    033h,02h
  1763.     db    089h,040h
  1764.     db    033h,04h
  1765.     db    089h,040h
  1766.     db    033h,06h
  1767.     db    089h,040h
  1768.     db    033h,08h
  1769.     db    ENDOFSTRING
  1770.  
  1771. cym2 label byte
  1772.     db    002h,000h
  1773.     db    SETGATETHRESHOLD,001h
  1774.     db    SETPATCH,20
  1775.     db    033h,010h
  1776.     db    089h,040h
  1777.     db    033h,016h
  1778.     db    ENDOFSTRING
  1779.  
  1780. hihatC label byte
  1781.     db    003h,000h
  1782.     db    SETGATETHRESHOLD,001h
  1783.     db    SETPATCH,21
  1784.     db    037h,02h
  1785.     db    ENDOFSTRING
  1786.  
  1787. hihat2O label byte
  1788.     db    004h,000h
  1789.     db    SETGATETHRESHOLD,001h
  1790.     db    SETPATCH,21
  1791.     db    037h,12
  1792.     db    ENDOFSTRING
  1793.  
  1794. hihat2C label byte
  1795.     db    005h,000h
  1796.     db    SETGATETHRESHOLD,001h
  1797.     db    SETPATCH,21
  1798.     db    037h,02h
  1799.     db    ENDOFSTRING
  1800.  
  1801. ride3 label byte
  1802.     db    006h,000h
  1803.     db    SETGATETHRESHOLD,001h
  1804.     db    SETPATCH,22
  1805.     db    033h,02h
  1806.     db    089h,040h
  1807.     db    033h,06h
  1808.     db    ENDOFSTRING
  1809.  
  1810.  
  1811.  
  1812. tom1 label byte
  1813.     db    007h,000h
  1814.     db    SETGATETHRESHOLD,004h
  1815.     db    SETPATCH,7
  1816.     db    037h,06h
  1817.         DB    088H
  1818.  
  1819.  
  1820. tom1LICK label byte
  1821.     db    007h,000h
  1822.     db    SETGATETHRESHOLD,004h
  1823.     db    SETPATCH,7
  1824.     DB    080h,2
  1825.  
  1826. TOMLUP LABEL BYTE
  1827.     db    037h,06h
  1828.     db    037h,06h
  1829.  
  1830.     db    034h,06h
  1831.     db    034h,06h
  1832.     db    08ch,0f7h
  1833.     db    081h
  1834.     dw    tomlup
  1835.  
  1836.     db    030h,06h
  1837.     DB    082H,75
  1838.     db    ENDOFSTRING
  1839.  
  1840. crash1 label byte
  1841.     db    008h,000h
  1842.     db    SETGATETHRESHOLD,001h
  1843.     db    SETPATCH,12
  1844.     db    033h,06h
  1845.     db    ENDOFSTRING
  1846.  
  1847. ;start address 077bbh
  1848. START    label    byte
  1849.     db    000h
  1850.     db    000h
  1851.     db    0abh
  1852.     db    008h
  1853.     db    083h
  1854.     db    001h
  1855.     db    090h
  1856.     db    000h
  1857.     db    0bbh
  1858.     db    0bbh
  1859.     db    0bbh
  1860.     db    0bbh
  1861.     db    0bbh
  1862.     db    0bbh
  1863.     db    0bbh
  1864.     db    0bbh
  1865.     db    030h
  1866.     db    040h
  1867.     db    037h
  1868.     db    040h
  1869.     db    040h
  1870.     db    040h
  1871.     db    0bbh
  1872.     db    0bbh
  1873.     db    0bbh
  1874.     db    0bbh
  1875.     db    0bbh
  1876.     db    0bbh
  1877.     db    0bbh
  1878.     db    0bbh
  1879.     db    0bbh
  1880.     db    0bbh
  1881.     db    0bbh
  1882.     db    0bbh
  1883.     db    0bbh
  1884.     db    0bbh
  1885.     db    0bbh
  1886.     db    0bbh
  1887.     db    0bbh
  1888.     db    0bbh
  1889.     db    0bbh
  1890.     db    0bbh
  1891.     db    0bbh
  1892.     db    0bbh
  1893.     db    0bbh
  1894.     db    0bbh
  1895.     db    0bbh
  1896.     db    0bbh
  1897.     db    0bbh
  1898.     db    0bbh
  1899.     db    0bbh
  1900.     db    0bbh
  1901.     db    0bbh
  1902.     db    0bbh
  1903.     db    0bbh
  1904.     db    0bbh
  1905.     db    0bbh
  1906.     db    0bbh
  1907.     db    0bbh
  1908.     db    0bbh
  1909.     db    0bbh
  1910.     db    0bbh
  1911.     db    0bbh
  1912.     db    088h
  1913.  
  1914. _TEXT    ends
  1915. end
  1916.  
  1917.