home *** CD-ROM | disk | FTP | other *** search
/ Dave Lowe: Amiga Krusty Music PC Disk / Lowe_AmigaKrustyMusic_PCDisk.img / notedata.s < prev    next >
Encoding:
Text File  |  1993-01-01  |  33.9 KB  |  1,780 lines
  1.  
  2. ; "Krusty" Music note-data etc.  14 June 1993  David Whittaker.
  3.  
  4.  
  5. ; Theses are MY equates, for notes, lemgths and 'control' commands etc...
  6.  
  7. ; Note Lengths  1-32
  8. l1    equ    $e0
  9. l2    equ    l1+1
  10. l3    equ    l1+2
  11. l4    equ    l1+3
  12. l5    equ    l1+4
  13. l6    equ    l1+5
  14. l7    equ    l1+6
  15. l8    equ    l1+7
  16. l9    equ    l1+8
  17. l10    equ    l1+9
  18. l11    equ    l1+10
  19. l12    equ    l1+11
  20. l13    equ    l1+12
  21. l14    equ    l1+13
  22. l15    equ    l1+14
  23. l16    equ    l1+15
  24. l17    equ    l1+16
  25. l18    equ    l1+17
  26. l19    equ    l1+18
  27. l20    equ    l1+19
  28. l21    equ    l1+20
  29. l22    equ    l1+21
  30. l23    equ    l1+22
  31. l24    equ    l1+23
  32. l25    equ    l1+24
  33. l26    equ    l1+25
  34. l27    equ    l1+26
  35. l28    equ    l1+27
  36. l29    equ    l1+28
  37. l30    equ    l1+29
  38. l31    equ    l1+30
  39. l32    equ    l1+31
  40.  
  41.  
  42. ; Actual Notes (obvious)...
  43. c0    equ    0
  44. cs0    equ    1
  45. d0    equ    2
  46. ds0    equ    3
  47. e0    equ    4
  48. f0    equ    5
  49. fs0    equ    6
  50. g0    equ    7
  51. gs0    equ    8
  52. a0    equ    9
  53. as0    equ    10
  54. b0    equ    11
  55.  
  56. c1    equ    12
  57. cs1    equ    13
  58. d1    equ    14
  59. ds1    equ    15
  60. e1    equ    16
  61. f1    equ    17
  62. fs1    equ    18
  63. g1    equ    19
  64. gs1    equ    20
  65. a1    equ    21
  66. as1    equ    22
  67. b1    equ    23
  68.  
  69. c2    equ    24    
  70. cs2    equ    25
  71. d2    equ    26
  72. ds2    equ    27
  73. e2    equ    28
  74. f2    equ    29
  75. fs2    equ    30
  76. g2    equ    31
  77. gs2    equ    32
  78. a2    equ    33
  79. as2    equ    34
  80. b2    equ    35
  81.  
  82. c3    equ    36
  83. cs3    equ    37
  84. d3    equ    38
  85. ds3    equ    39
  86. e3    equ    40
  87. f3    equ    41
  88. fs3    equ    42
  89. g3    equ    43
  90. gs3    equ    44
  91. a3    equ    45
  92. as3    equ    46
  93. b3    equ    47
  94.  
  95. c4    equ    48    
  96. cs4    equ    49
  97. d4    equ    50
  98. ds4    equ    51
  99. e4    equ    52
  100. f4    equ    53
  101. fs4    equ    54
  102. g4    equ    55
  103. gs4    equ    56
  104. a4    equ    57
  105. as4    equ    58
  106. b4    equ    59
  107.  
  108. c5    equ    60
  109. cs5    equ    61
  110. d5    equ    62
  111. ds5    equ    63
  112. e5    equ    64
  113. f5    equ    65
  114. fs5    equ    66
  115. g5    equ    67
  116. gs5    equ    68
  117. a5    equ    69
  118. as5    equ    70
  119. b5    equ    71
  120.  
  121. c6    equ    72
  122. cs6    equ    73
  123. d6    equ    74
  124. ds6    equ    75
  125. e6    equ    76
  126. f6    equ    77
  127. fs6    equ    78
  128. g6    equ    79
  129. gs6    equ    80
  130. a6    equ    81
  131. as6    equ    82
  132. b6    equ    83
  133.  
  134. ; Control commands...
  135. x    equ    $80    ; marks end of a 'phrase'
  136. s    equ    $81    ; slide, qty, delay in frames
  137. p    equ    $82    ; pause (rest)
  138. ti    equ    $83    ; tied-note
  139. cut    equ    $84    ; stop song dead (end of a jingle)
  140. tra    equ    $85    ; global transpose (in semitones)
  141. v    equ    $86    ; vibrato, qty, limit (e.g. v,1,2)
  142. v0    equ    $87    ; vibrato off (same as v,0,0)
  143. ctra    equ    $88    ; channel transpose (affects current channel only)
  144. lp    equ    $89    ; loop-point (so song can loop to skip intro etc.)
  145. te    equ    $8a    ; tempo change
  146. fade    equ    $8b    ; fade-out, time/delay
  147. chvol    equ    $8c    ; change global music volume
  148.  
  149.  
  150. ; Silly warbly chords (not used much these days)...
  151. ch    equ    $90
  152.  
  153. nn    equ    ch+0
  154. m    equ    ch+1
  155. j    equ    ch+2
  156. fm    equ    ch+3
  157. fj    equ    ch+4
  158. m1    equ    ch+5
  159. j1    equ    ch+6
  160. m2    equ    ch+7
  161. j2    equ    ch+8
  162. o    equ    ch+9
  163. thd    equ    ch+10
  164. for    equ    ch+11
  165. fth    equ    ch+12
  166. mth    equ    ch+13
  167. ec8    equ    ch+14
  168. odd    equ    ch+15
  169.  
  170. ch_tab
  171.     dc.w    ch_0-q,ch_1-q,ch_2-q,ch_3-q
  172.     dc.w    ch_4-q,ch_5-q,ch_6-q,ch_7-q
  173.     dc.w    ch_8-q,ch_9-q,ch_10-q,ch_11-q
  174.     dc.w    ch_12-q,ch_13-q,ch_14-q,ch_15-q
  175.  
  176. ch_0    dc.b    c0,c0!z
  177. ch_1    dc.b    c0,ds0,g0!z
  178. ch_2    dc.b    c0,e0,g0!z
  179. ch_3    dc.b    c0,ds0,g0,c1!z
  180. ch_4    dc.b    c0,e0,g0,c1!z
  181. ch_5    dc.b    g0,c1,ds1!z
  182. ch_6    dc.b    g0,c1,e1!z
  183. ch_7    dc.b    ds0,g0,c1!z
  184. ch_8    dc.b    e0,g0,c1!z
  185. ch_9    dc.b    c0,c1!z
  186. ch_10    dc.b    c0,e0!z
  187. ch_11    dc.b    c0,f0!z
  188. ch_12    dc.b    c0,g0!z
  189. ch_13    dc.b    c0,ds0!z
  190. ch_14    dc.b    c1,c0,c0,c0,c0,c0,c0,c0!z
  191. ch_15    dc.b    c0,cs0,d0!z
  192.     even
  193.  
  194.  
  195. ; Patches (instruments/samples)...
  196. p0    equ    $b0    to $df
  197.  
  198. Anlg3     equ    p0
  199. BDR1    equ    Anlg3+1
  200. CHH1    equ    BDR1+1
  201. Clav1    equ    CHH1+1
  202. Clav3    equ    Clav1+1
  203. Clav4    equ    Clav3+1
  204. ClXylo5    equ    Clav4+1
  205. EP2    equ    ClXylo5+1
  206. Flute3    equ    EP2+1
  207. Flute4    equ    Flute3+1
  208. Flute5    equ    Flute4+1
  209. FM4    equ    Flute5+1
  210. Harp3    equ    FM4+1
  211. Harp4    equ    Harp3+1
  212. OStab5    equ    Harp4+1
  213. SDR1    equ    OStab5+1
  214. SynBass1 equ    SDR1+1
  215. SynBass3 equ    SynBass1+1
  216. TP1    equ    SynBass3+1
  217. TP3    equ    TP1+1
  218. TP4    equ    TP3+1
  219. TP5    equ    TP4+1
  220.  
  221.  
  222. ; Drum note equates...
  223. bd = c3
  224. sn = c3
  225. sd = sn+2
  226. hi = c4
  227.  
  228.  
  229. ; *************************************************************************
  230. ; **                          ACTUAL MUSIC DATA...                       **
  231. ; *************************************************************************
  232.  
  233. ; The initial start-point data is like this...
  234.  
  235.     dc.b    Tempo,FineTempo
  236.     dc.w    PhraseList1,PhraseList2,PhraseList3,PhraseList4
  237.  
  238.  
  239.     dc.b    6,16    ; Presentation
  240.     dc.w    tuneh2,tuneh1,tuneh3,tuneh4
  241.     dc.b    5,30    ; Section #1
  242.     dc.w    tunea4,tunea1,tunea3,tunea5
  243.     dc.b    6,16    ; NEW Section #2 NEW
  244.     dc.w    tuned4,tuned1,tuned3,tuned5
  245.     dc.b    4,32    ; Section #3
  246.     dc.w    tunec4,tunec1,tunec5,tunec3
  247.     dc.b    6,0    ; NEW Section #4 NEW
  248.     dc.w    tuneb2,tuneb1,tuneb3,tuneb5
  249.     dc.b    6,8    ; Section #5
  250.     dc.w    tunee3,tunee1,tunee2,tunee5
  251.     dc.b    5,35    ; NuBonus
  252.     dc.w    tunef3,tunef1,tunef4,tunef5
  253.     dc.b    6,14    ; HiScore
  254.     dc.w    tuneg4,tuneg1,tuneg3,tuneg5
  255.     dc.b    4,0    ; Krusty Grow    jingle
  256.     dc.w    tunei1,tunei2,tunei3,restt
  257.     dc.b    4,0    ; Krusty Shrink    jingle
  258.     dc.w    tunej1,tunej2,tunej3,restt
  259.     dc.b    8,0    ; Lose a Life    jingle
  260.     dc.w    tunek1,tunek2,tunek3,restt
  261.  
  262.  
  263. tuneh1    dc.w    h1p1
  264.     dc.w    0
  265.  
  266. tuneh2    dc.w    h2p1
  267.     dc.w    0
  268.  
  269. tuneh3    dc.w    h3p1
  270.     dc.w    0
  271.  
  272. tuneh4    dc.w    h6p1
  273.     dc.w    0
  274.  
  275.  
  276. h1p1    dc.b    chvol,64
  277.  
  278.     dc.b    TP1,v,1,2,ctra,24
  279.     dc.b    ev1
  280. ;1
  281.     dc.b    l4,g1,d1,l3,g1,l2,d1,l1,e1,l2,fs1
  282.     dc.b    l4,g1,d1,l3,g1,l1,d1,p,e1,l2,fs1
  283.     dc.b    l4,g1,d1,l3,g1,l2,d1,l1,e1,l2,fs1
  284.     dc.b    l4,g1,d1,l3,g1,l1,d1,p,e1,l2,fs1
  285. ;5
  286.     dc.b    l4,c1,g1,l3,c1,l2,ds1,l1,e1,l2,d1
  287.     dc.b    l4,c1,g1,l3,c1,l2,ds1,l1,e1,l2,d1
  288.     dc.b    l4,c1,g1,l3,c1,l2,ds1,l1,e1,l2,d1
  289.     dc.b    l4,c1,g1,l3,c1,l2,d1,l1,ds1,l2,e1
  290. ;9
  291.     dc.b    l4,g1,d1,l3,g1,l2,e1,l1,f1,l2,fs1
  292.     dc.b    l4,g1,d1,l3,g1,l2,d1,l1,e1,l2,fs1
  293.     dc.b    l4,g1,d1,l3,g1,l2,d1,l1,e1,l2,fs1
  294.     dc.b    l4,g1,d1,l3,g1,l1,d1,l2,e1,fs1
  295. ;13
  296.     dc.b    l2,a1,a1,a1,a1,a1,a1,a1,a1
  297.     dc.b    gs1,gs1,gs1,gs1,gs1,gs1,gs1,gs1
  298.     dc.b    g1,g1,g1,g1,g1,g1,g1,g1
  299.     dc.b    fs1,fs1,fs1,fs1,fs1,fs1,fs1,fs1
  300.     dc.b    x
  301.  
  302.  
  303. h2p1    dc.b    ClXylo5,ev7,v,2,4,ctra,-24
  304. ;1
  305.     dc.b    l10,p,l1,as3,b3,p,as3,b3,ti
  306.     dc.b    l4,d4,l6,p,l1,as3,b3,p,as3,b3,ti
  307.     dc.b    l4,g3,l6,p,l1,as3,b3,p,as3,b3,ti
  308.     dc.b    l4,d4,l6,p,l1,as3,b3,p,as3,b3,ti
  309. ;5
  310.     dc.b    l4,g3,l6,p,l1,ds4,e4,p,ds4,e4,ti
  311.     dc.b    l4,g4,l6,p,l1,ds4,e4,p,ds4,e4,ti
  312.     dc.b    l4,c4,l6,p,l1,ds4,e4,p,ds4,e4,ti
  313.     dc.b    l4,g4,l6,p,l1,ds4,e4,p,ds4,e4,ti
  314. ;9
  315.     dc.b    l4,d4,l6,p,l1,as3,b3,p,as3,b3,ti
  316.     dc.b    l4,d4,l6,p,l1,as3,b3,p,as3,b3,ti
  317.     dc.b    l4,g3,l6,p,l1,as3,b3,p,as3,b3,ti
  318.     dc.b    l4,d4,l6,p,l1,as3,b3,p,as3,b3,ti
  319. ;13
  320.     dc.b    TP5,ev2,v,2,4,ctra,-24
  321.     dc.b    l2
  322.     dc.b    p,c4,c4,c4,c4,c4,c4,c4
  323.     dc.b    cs4,cs4,cs4,cs4,cs4,cs4,cs4,cs4
  324.     dc.b    d4,d4,d4,d4,d4,d4,d4,d4
  325.     dc.b    ds4,ds4,ds4,ds4,ds4,ds4,ds4,ds4
  326.  
  327.     dc.b    ctra,0
  328.     dc.b    x
  329.  
  330.  
  331. h3p1    dc.b    TP5,ev2,v,2,4,ctra,-24
  332. ;1
  333.     dc.b    l4,g4,g3,l1,d4,ds4,ti,e4,p,f4,l2,fs4
  334.     dc.b    l4,g4,d4,l1,d4,ds4,ti,e4,p,f4,l2,fs4
  335.     dc.b    g4,d4,l4,g4,l1,d4,ds4,ti,e4,p,f4,l2,fs4
  336.     dc.b    g4,d4,l1,g4,d4,g4,ti,d4,ds4,ti,e4,p,f4,l2,g4
  337. ;5
  338.     dc.b    p,c5,l1,as4,c5,ti,ds5,p,ds5,ti,ds5,ds5,c5,l2,as4
  339.     dc.b    g4,g4,l1,g4,as4,l2,c5,b4,as4,l1,a4,as4,l2,g4
  340.     dc.b    p,ds5,e5,ds5,l1,c5,as4,ti,g4,p,g4,l2,as4
  341.     dc.b    c5,as4,l1,g4,as4,l2,c5,b4,as4,l1,a4,as4,l2,g4
  342. ;9
  343.     dc.b    l4,g4,g3,l1,d4,ds4,ti,e4,p,f4,l2,fs4
  344.     dc.b    g4,d4,l4,g4,l1,d4,ds4,ti,e4,p,f4,l2,fs4
  345.     dc.b    g4,d4,l1,g4,d4,g4,ti,d4,ds4,ti,e4,p,f4,l2,fs4
  346.     dc.b    g4,d4,l1,g4,d4,g4,ti,d4,ds4,ti,e4,p,f4,l2,fs4
  347. ;13
  348.     dc.b    p,c4,c4,c4,c4,c4,c4,c4
  349.     dc.b    cs4,cs4,cs4,cs4,cs4,cs4,cs4,cs4
  350.     dc.b    d4,d4,d4,d4,d4,d4,d4,d4
  351.     dc.b    ds4,ds4,ds4,ds4,ds4,ds4,ds4,ds4
  352.     dc.b    x
  353.  
  354.  
  355. h6p1    dc.b    CHH1
  356.     dc.b    ev6 ;13
  357. ;1
  358.     dc.b    l2,hi,hi,l3,hi,l1,hi,p,hi,sd,sd,hi,sd,sd,hi
  359.     dc.b    l2,hi,hi,l3,hi,l1,hi,p,hi,sd,sd,hi,sd,sd,hi
  360.     dc.b    l2,hi,hi,l3,hi,l1,hi,p,hi,sd,sd,hi,sd,sd,hi
  361.     dc.b    l2,hi,hi,l3,hi,l1,hi,p,hi,sd,sd,sd,sd,sd,hi
  362. ;5
  363.     dc.b    l2,hi,l1,hi,hi,hi,hi,hi,hi,hi,ti,sd,sd,hi,sd,sd,hi
  364.     dc.b    l2,hi,l1,hi,hi,hi,ti,hi,hi,hi,hi,sd,sd,hi,sd,sd,hi
  365.     dc.b    l2,hi,l1,hi,hi,hi,ti,hi,hi,hi,ti,sd,sd,hi,sd,sd,hi
  366.     dc.b    l2,hi,l1,hi,hi,hi,ti,hi,hi,hi,ti,sd,sd,hi,sd,sd,hi
  367. ;9
  368.     dc.b    l2,hi,hi,l3,hi,l1,hi,p,hi,sd,sd,hi,sd,sd,hi
  369.     dc.b    l2,hi,hi,l3,hi,l1,hi,p,hi,sd,sd,hi,sd,sd,hi
  370.     dc.b    l2,hi,hi,l3,hi,l1,hi,p,p,sd,sd,hi,sd,sd,hi
  371.     dc.b    l2,hi,hi,l3,hi,l1,hi,p,hi,sd,sd,hi,sd,sd,hi
  372. ;13
  373.     dc.b    hi,hi,sd,hi,hi,hi,sd,hi,hi,hi,sd,hi,hi,hi,sd,hi
  374.     dc.b    l2,hi,sd,p,sd,l1,hi,hi,sd,sd,p,sd,sd,hi
  375.     dc.b    hi,hi,sd,hi,hi,hi,sd,hi,hi,hi,sd,sd,hi,sd,sd,hi
  376.     dc.b    l2,hi,sd,p,sd,l1,hi,hi,sd,sd,p,sd,sd,hi
  377.     dc.b    x
  378.  
  379.     even
  380.  
  381.  
  382. tunea1    dc.w    a1pb
  383. a1loop    dc.w    a1p1
  384.     dc.w    0
  385.  
  386. tunea3    dc.w    a3pb
  387. a3loop    dc.w    a3p1
  388.     dc.w    0
  389.  
  390. tunea4    dc.w    a4pb
  391. a4loop    dc.w    a4p1
  392.     dc.w    0
  393.  
  394. tunea5    dc.w    a5p1
  395.     dc.w    0
  396.  
  397.  
  398. a1pb    dc.b    EP2,ctra,24
  399.     dc.b    v,1,2
  400.     dc.b    ev9
  401.     dc.b    lp
  402.     dc.b    (a1loop)/256,(a1loop)&255
  403.     dc.b    x
  404.  
  405. a1p1    dc.b    l4,c1,as0,l3,ds1,e1,l2,g1
  406.     dc.b    l4,as1,g1,l3,ds1,e1,l2,b0
  407.     dc.b    l4,c1,e1,l3,g1,as1,l2,a1
  408.     dc.b    l3,gs1,g1,l2,fs1,l3,f1,ds1,l2,c1
  409.  
  410.     dc.b    l4,ds1,c1,f1,gs1
  411.     dc.b    a1,f1,ds1,d1
  412.     dc.b    c1,f1,ds1,f1
  413.     dc.b    gs1,a1,as1,b1
  414.  
  415.     dc.b    c2,c1,l3,ds1,e1,l2,g1
  416.     dc.b    l4,as1,g1,l3,ds1,e1,l2,c1
  417.     dc.b    l4,ds1,e1,l3,g1,as1,l2,a1
  418.     dc.b    l3,gs1,g1,l2,fs1,l3,f1,ds1,l2,c1
  419.  
  420.     dc.b    p,g0,gs0,a0,as0,b0,c1,cs1
  421.     dc.b    l16,p
  422.     dc.b    l2,p,c1,b0,as0,a0,gs0,g0,c1
  423.     dc.b    l10,p,l2,c1,l1,p,l3,c1
  424.     dc.b    x
  425.  
  426.  
  427. a3pb    dc.b    TP5,ctra,-24
  428.     dc.b    v,1,2
  429.     dc.b    lp
  430.     dc.b    (a3loop)/256,(a3loop)&255
  431.     dc.b    x
  432.  
  433. a3p1    dc.b    l1
  434.     dc.b    ev12,c3,p,ev11,a4,p,g4,p,a4,p,c4,p,a4,g4,p,g4,a4,p
  435.     dc.b    ev12,c3,p,ev11,a4,p,g4,p,a4,p,as4,p,a4,g4,p,g4,a4,p
  436.     dc.b    ev12,c3,p,ev11,a4,p,g4,p,as4,p,c3,p,a4,g4,p,ds4,a4,p
  437.     dc.b    c4,p,a4,p,gs4,p,g4,p,as4,p,fs4,f4,p,ds4,cs4,b3
  438.  
  439.     dc.b    c4,p,f4,p,ds4,p,f4,p,ev12,c3,p,ev11,f4,ds4,p,ds4,f4,p
  440.     dc.b    c4,p,f4,p,ds4,p,f4,p,f3,p,g4,fs4,p,gs4,a4,p
  441.     dc.b    c4,p,f4,p,fs4,p,e4,p,ds4,p,f4,fs4,p,g4,ds4,p
  442.     dc.b    c4,p,b3,p,as3,p,a3,p,gs3,g3,p,fs3,p,f3,e3,ds3
  443.  
  444.     dc.b    ev12,c3,p,ev11,a4,p,g4,p,a4,p,c4,p,a4,g4,p,g4,a4,p
  445.     dc.b    ev12,c3,p,ev11,a4,p,g4,p,a4,p,as4,p,a4,g4,p,g4,a4,p
  446.     dc.b    c4,p,a4,p,g4,p,a4,p,ds3,p,c5,as4,p,as4,c5,p
  447.     dc.b    gs4,p,f5,p,ds5,p,f5,p,as3,p,a4,g4,p,f4,ds4,b3
  448.  
  449.     dc.b    ev12,c3,p,ev11,f4,p,f4,p,f4,p,fs4,p,g4,p,gs4,p,a4,p
  450.     dc.b    l16,p,l1
  451.     dc.b    p,p,f4,p,f4,p,f4,p,f4,p,fs4,p,g4,p,g4,p
  452.     dc.b    l10,p,l3,g4,l1,p,l2,g4
  453.     dc.b    x
  454.  
  455.  
  456. a4pb    dc.b    Harp3
  457.     dc.b    lp
  458.     dc.b    (a4loop)/256,(a4loop)&255
  459.     dc.b    x
  460.  
  461. a4p1    dc.b    ev0,l2,p,ev7,e3,l8,p,l4,ds3
  462.     dc.b    l2,p,e3,l4,p,l3,ds3,l1,ds3,l4,p
  463.     dc.b    l2,p,e3,l8,p,l4,ds3
  464.     dc.b    l2,p,e3,l6,p,l2,ds3,l1,p,l3,ds3
  465.  
  466.     dc.b    l2,p,ds3,p,gs3,l8,p
  467.     dc.b    l2,p,ds3,p,gs3,l8,p
  468.     dc.b    l2,p,ds3,p,gs3,l8,p
  469.     dc.b    l2,p,ds3,p,ds3,l8,p
  470.  
  471.     dc.b    l2,p,e3,l8,p,l4,ds3
  472.     dc.b    l2,p,e3,l6,p,l3,ds3,ds3
  473.     dc.b    l2,p,e3,l8,p,l4,ds3
  474.     dc.b    l2,p,e3,l6,p,l3,ds3,ds3
  475.  
  476.     dc.b    l2,p,as3,g3,as3,g3,as3,g3,as3
  477.     dc.b    l16,p
  478.     dc.b    l2,p,a3,gs3,a3,gs3,a3,gs3,a3
  479.  
  480.     dc.b    l8,p,l1,e3,e3,b2,e3,b2,e3,e3,b2
  481.     dc.b    x
  482.  
  483.  
  484. a5p1    dc.b    chvol,32
  485.  
  486.     dc.b    ev14
  487.  
  488.     dc.b    BDR1,l2,bd,ev13,CHH1,hi,ev14
  489.     dc.b    SDR1,sn
  490.     dc.b    BDR1,bd,bd,ev13,CHH1,hi,ev14
  491.     dc.b    SDR1,sn,ev13,CHH1,l1,hi,ev14
  492.     dc.b    BDR1,bd
  493.  
  494.     dc.b    l2,ti,bd
  495.     dc.b    SDR1,sn
  496.     dc.b    BDR1,bd,bd,ev13,CHH1,hi,ev14
  497.     dc.b    SDR1,sn,ev13,CHH1,hi,ev14
  498.  
  499.  
  500.     dc.b    BDR1,bd,ev13,CHH1,hi,ev14
  501.     dc.b    SDR1,sn
  502.     dc.b    BDR1,bd,bd,ev13,CHH1,hi,ev14
  503.     dc.b    SDR1,sn,ev13,CHH1,hi,ev14
  504.  
  505.     dc.b    BDR1,bd,bd
  506.     dc.b    SDR1,sn
  507.     dc.b    BDR1,bd,bd
  508.     dc.b    SDR1,l3,sn,sn
  509.     dc.b    x
  510.  
  511.     even
  512.  
  513.  
  514. tuned1    dc.w    d1p1
  515. ;2
  516.     dc.w    d1p2
  517.     dc.w    d1p2
  518. ;10
  519.     dc.w    d1p3
  520.     dc.w    d1p3
  521. ;18
  522.     dc.w    d1p4
  523.     dc.w    d1p4
  524. ;26
  525.     dc.w    d1p1
  526.     dc.w    0
  527.  
  528.  
  529. tuned3    dc.w    d3p1
  530. ;2
  531.     dc.w    d3p2
  532.     dc.w    d3p2
  533. ;10
  534.     dc.w    d3p3
  535.     dc.w    d3p3
  536. ;18
  537.     dc.w    d3p2
  538.     dc.w    d3p2
  539. ;26
  540.     dc.w    d3p1
  541.     dc.w    0
  542.  
  543.  
  544. tuned4    dc.w    d4p1
  545. ;2
  546.     dc.w    d4p2
  547.     dc.w    d4p2
  548. ;10
  549.     dc.w    d4p3
  550.     dc.w    d4p3
  551. ;18
  552.     dc.w    d4p4
  553.     dc.w    d4p4
  554.     dc.w    d4p4
  555.     dc.w    d4p4
  556. ;26
  557.     dc.w    d4p1
  558.     dc.w    0
  559.  
  560.  
  561. tuned5    dc.w    d5p1
  562.     dc.w    d5p2,d5p2,d5p2,d5p2
  563.     dc.w    d5p2,d5p2,d5p2,d5p2
  564.     dc.w    d5p2,d5p2,d5p2,d5p2
  565.     dc.w    d5p2,d5p2,d5p2,d5p2
  566.     dc.w    d5p2,d5p2,d5p2,d5p2
  567.     dc.w    d5p2,d5p2,d5p2,d5p2
  568.     dc.w    d5p1
  569.     dc.w    0
  570.  
  571.  
  572. d1p1    dc.b    SynBass1,ev14,v,1,2
  573.  
  574.     dc.b    l2,cs2,c2,b1,as1,a1,gs1,g1,fs1
  575.     dc.b    x
  576.  
  577. d1p2    dc.b    l2,f1,p,f2,p,g1,l1,p,l2,gs1,l1,p,l2,a1
  578.     dc.b    f1,p,f2,p,f1,l1,p,l2,g1,l1,p,l2,gs1
  579.     dc.b    l2,f1,l1,p,cs2,l2,f2,p,f1,l1,p,l2,g1,l1,p,l2,gs1
  580.     dc.b    l1,f1,p,l2,f1,p,e1,f1,l1,p,l2,f1,l1,e1,l2,f1
  581.     dc.b    x
  582.  
  583. d1p3    dc.b    l2,cs1,p,cs2,p,ds1,l1,p,l2,e1,l1,p,l2,f1
  584.     dc.b    cs1,p,cs2,p,cs1,l1,p,l2,ds1,l1,p,l2,e1
  585.     dc.b    cs1,l1,p,a1,l2,cs2,p,cs1,l1,p,l2,ds1,l1,p,l2,e1
  586.     dc.b    l1,cs1,p,l2,cs1,p,c2,cs1,l1,p,l2,cs1,l1,c2,l2,cs1
  587.     dc.b    x
  588.  
  589. d1p4    dc.b    p,gs1,fs1,ds1,p,ds1,fs1,gs1
  590.     dc.b    p,gs1,fs1,ds1,fs1,ds1,fs1,gs1
  591.     dc.b    p,gs1,fs1,ds1,p,ds1,fs1,gs1
  592.     dc.b    p,ds1,fs1,gs1,p,ds1,fs1,gs1
  593.     dc.b    x
  594.  
  595.  
  596. d3p1    dc.b    ctra,-24
  597.     dc.b    FM4
  598.     dc.b    ev11,v,1,2
  599.     dc.b    l2,cs4,c4,b3,as3,a3,gs3,g3,fs3
  600.     dc.b    x
  601.  
  602. d3p2    dc.b    v0
  603.     dc.b    l2,p,l1,a4,as4,l2,a4,a4,l1,a4,as4,b4,c5,cs5,c5,b4,as4
  604.     dc.b    l2,p,l1,a4,as4,l2,a4,a4,l1,a4,gs4,g4,fs4,f4,fs4,g4,gs4
  605.     dc.b    l2,p,l1,a4,as4,l2,a4,a4,l1,a4,as4,b4,c5,cs5,c5,b4,as4
  606.     dc.b    l2,a4,a4,p,gs4,l4,a4,p
  607.     dc.b    x
  608.  
  609. d3p3    dc.b    l2,p,l1,a4,as4,l4,a4,l1,a4,as4,a4,as4,l4,a4
  610.     dc.b    l2,p,l1,a4,as4,l2,a4,a4,l1,a4,as4,a4,as4,a4,as4,l2,a4
  611.     dc.b    l2,p,l1,a4,as4,l2,a4,a4,p,l1,a4,as4,l4,a4
  612.     dc.b    l2,p,l1,a4,as4,a4,as4,l2,a4,l1,a4,as4,a4,as4,a4,as4,l2,a4
  613.     dc.b    x
  614.  
  615.  
  616. d4p1    dc.b    chvol,32
  617.  
  618.     dc.b    ctra,-12
  619.     dc.b    FM4
  620.     dc.b    ev7,v,1,2
  621.     dc.b    l2,cs4,c4,b3,as3,a3,gs3,g3,fs3
  622.     dc.b    x
  623.  
  624. d4p2    dc.b    l1,p,v0,ctra,-24
  625.     dc.b    l2,p,l1,a4,as4,l2,a4,a4,l1,a4,as4,b4,c5,cs5,c5,b4,as4
  626.     dc.b    l2,p,l1,a4,as4,l2,a4,a4,l1,a4,gs4,g4,fs4,f4,fs4,g4,gs4
  627.     dc.b    l2,p,l1,a4,as4,l2,a4,a4,l1,a4,as4,b4,c5,cs5,c5,b4,as4
  628.     dc.b    l2,a4,a4,p,gs4,l4,a4,l4-1,p
  629.     dc.b    x
  630.  
  631. d4p3    dc.b    v,1,2,ev3
  632.  
  633.     dc.b    Flute3,v,1,2,ctra,-12
  634.     dc.b    l8,a4,gs4
  635.     dc.b    g4,gs4
  636.  
  637.     dc.b    a4
  638.     dc.b    Flute4
  639.     dc.b    c4,cs4,Flute3,g4
  640.     dc.b    x
  641.  
  642. d4p4    dc.b    OStab5,ctra,4-24,v,2,4
  643.     dc.b    l3,ev14,cs4,l11,ev13,cs4,l2,ev14,b3
  644.     dc.b    l3,cs4,l13,ev13,cs4
  645.     dc.b    x
  646.  
  647.  
  648. d5p1    dc.b    SDR1,ev14,l1,sd,sd,BDR1,l2,bd,bd,bd
  649.     dc.b    bd,bd,l1,bd,SDR1,sd,sd,sd
  650.     dc.b    x
  651.  
  652. d5p2    dc.b    l2,BDR1,bd,SDR1,sd
  653.     dc.b    BDR1,bd,SDR1,sd
  654.     dc.b    BDR1,bd,SDR1,l1,sd
  655.     dc.b    BDR1,l2,bd,l1,bd,SDR1,l2,sd
  656.     dc.b    x
  657.  
  658.     even
  659.  
  660.  
  661. tunec1    dc.w    c1pb
  662. c1loop    dc.w    c1p1,c1p1
  663.     dc.w    c1p2,c1p3,c1p2
  664.     dc.w    c1p1,c1p1
  665.     dc.w    c1p4
  666.     dc.w    c1p2
  667.     dc.w    c1p5
  668.     dc.w    0
  669.  
  670.  
  671. tunec3    dc.w    c3p1
  672.     dc.w    0
  673.  
  674.  
  675. tunec4    dc.w    c4p1
  676.     dc.w    0
  677.  
  678.  
  679. tunec5    dc.w    c5p1,c5p1,c5p1,c5p1
  680.     dc.w    c5p1,c5p1,c5p1,c5p1
  681.     dc.w    c5p1,c5p1,c5p1,c5p1
  682.     dc.w    c5p1,c5p1,c5p1,c5p1
  683.     dc.w    c5p1,c5p1,c5p1,c5p1
  684.     dc.w    c5p1,c5p1,c5p1,c5p1
  685.     dc.w    c5p1,c5p1,c5p1,c5p1
  686.     dc.w    c5p1,c5p1,c5p1,c5p1
  687.     dc.w    c5p1,c5p1,c5p1,c5p1
  688.     dc.w    c5p1,c5p1,c5p1,c5p1
  689.     dc.w    c5p1,c5p1,c5p1,c5p1
  690.     dc.w    c5p1,c5p1,cpend
  691.     dc.w    0
  692.  
  693.  
  694. c1pb    dc.b    TP1,ev1,ctra,24,v,1,2
  695.     dc.b    lp
  696.     dc.b    (c1loop)/256,(c1loop)&255
  697.     dc.b    x
  698.  
  699. c1p1    dc.b    l2,f1,l6,p,l2,c1,l6,p
  700.     dc.b    l2,f1,p,c1,p,d1,p,e1,p
  701.     dc.b    l2,f1,l6,p,l2,c1,l6,p
  702.     dc.b    l2,b0,l6,p,l2,c1,b0,cs1,ds1
  703.     dc.b    x
  704.  
  705. c1p2    dc.b    f0,p,g0,p,a0,p,b0,p
  706.     dc.b    cs1,p,ds1,p,f1,p,g1,p
  707.     dc.b    a1,p,g1,p,f1,p,ds1,p
  708.     dc.b    cs1,p,b0,p,a0,p,g0,p
  709.     dc.b    x
  710.  
  711. c1p3    dc.b    g1,p,cs1,p,g1,p,cs1,p
  712.     dc.b    ds1,p,f1,p,g1,p,a1,p
  713.     dc.b    b1,p,a1,p,g1,p,f1,p
  714.     dc.b    g1,p,b0,p,cs1,p,ds1,p
  715.     dc.b    x
  716.  
  717. c1p4    dc.b    f0,p,g0,p,a0,p,b0,p
  718.     dc.b    cs1,p,ds1,p,f1,p,g1,p
  719.     dc.b    f1,p,c1,p,d1,p,e1,p
  720.     dc.b    a1,p,g1,p,f1,p,ds1,p
  721. ;33
  722.     dc.b    cs1,p,b0,p,a0,p,g0,p
  723.     dc.b    g1,p,d1,p,e1,p,fs1,p
  724.     dc.b    g1,p,cs1,p,g1,p,cs1,p
  725.     dc.b    ds1,p,f1,p,g1,p,a1,p
  726. ;37
  727.     dc.b    b1,p,a1,p,g1,p,f1,p
  728.     dc.b    g1,p,b0,p,cs1,p,ds1,p
  729.     dc.b    x
  730.  
  731. c1p5    dc.b    g0,p,a0,p,b0,p,cs1,p
  732.     dc.b    ds1,p,f1,p,g1,p,a1,p
  733.     dc.b    b1,p,a1,p,g1,p,f1,p
  734.     dc.b    ds1,p,cs1,p,b0,p,a0,p
  735.     dc.b    l32,p
  736.     dc.b    x
  737.  
  738.  
  739. c3p1    dc.b    Clav4,v0
  740.     dc.b    ev15
  741.     dc.b    l4
  742.     dc.b    p,c3,p,b2
  743.     dc.b    p,c3,p,p
  744.     dc.b    p,c3,p,b2
  745.     dc.b    p,c3,p,e3
  746.     dc.b    p,c3,p,b2
  747.     dc.b    p,c3,p,p
  748.     dc.b    p,c3,p,b2
  749.     dc.b    p,c3,p,e3
  750.  
  751. ;9
  752.     dc.b    TP5,ctra,-24,v,1,2
  753.     dc.b    ev12
  754.     dc.b    l2,f4,c4,l1,f4,g4,a4,as4,l2,b4,g4,l4,ds4
  755.     dc.b    l2,c5,a4,l4,f4,l2,ds5,b4,l4,g4
  756. ;11
  757.     dc.b    l2,f4,c4,l1,f4,g4,a4,as4,l2,b4,g4,l4,ds4
  758.     dc.b    l2,a4,f4,l4,cs4,l2,g4,ds4,l4,b3
  759. ;13
  760.     dc.b    l2,g4,d4,l1,g4,a4,b4,c5,l2,cs5,a4,l4,e4
  761.     dc.b    l2,b4,g4,l4,d4,l2,d5,as4,l4,f4
  762. ;15
  763.     dc.b    l2,g4,d4,l1,g4,a4,b4,c5,l2,cs5,a4,l4,e4
  764.     dc.b    l1,g4,a4,b4,cs5,ds5,f5,g5,a5,b5,a5,g5,f5,ds5,cs5,b4,a4
  765.  
  766. ;17
  767.     dc.b    l2,f4,c4,l1,f4,g4,a4,as4,l2,b4,g4,l4,ds4
  768.     dc.b    l2,c5,a4,l4,f4,l2,ds5,b4,l4,g4
  769. ;19
  770.     dc.b    l2,f4,c4,l1,f4,g4,a4,as4,l2,b4,g4,l4,ds4
  771.     dc.b    l2,a4,f4,l4,cs4,l2,g4,ds4,l4,b3
  772.  
  773. ;21
  774.     dc.b    Clav4,ctra,0,v0
  775.     dc.b    ev15
  776.     dc.b    l4
  777.     dc.b    p,c3,p,gs3
  778.     dc.b    p,c3,p,p
  779.     dc.b    p,c3,p,b2
  780.     dc.b    p,c3,p,e3
  781.     dc.b    p,c3,p,gs3
  782.     dc.b    p,c3,p,p
  783.     dc.b    p,c3,p,b2
  784.     dc.b    p,c3,p,e3
  785.  
  786.  
  787. ;29
  788.     dc.b    TP5,ctra,-24,v,1,2
  789.     dc.b    ev12
  790.     dc.b    l2,f4,c4,l1,f4,g4,a4,as4,l2,b4,g4,l4,ds4
  791.     dc.b    l2,c5,a4,l4,f4,l2,ds5,b4,l4,g4
  792.  
  793. ;31
  794.     dc.b    Clav4,ctra,0,v0
  795.     dc.b    ev15
  796.     dc.b    l4
  797.     dc.b    p,c3,l8,p
  798.  
  799. ;32
  800.     dc.b    TP5,ctra,-24,v,1,2
  801.     dc.b    ev12
  802.     dc.b    l2,f4,c4,l1,f4,g4,a4,as4,l2,b4,g4,l4,ds4
  803.     dc.b    l2,a4,f4,l4,cs4,l2,g4,ds4,l4,b3
  804.  
  805. ;34
  806.     dc.b    Clav4,ctra,0,v,0
  807.     dc.b    ev15
  808.     dc.b    l4
  809.     dc.b    p,d3,l8,p
  810.  
  811. ;35
  812.     dc.b    TP5,ctra,-24,v,1,2
  813.     dc.b    ev12
  814.     dc.b    l2,g4,d4,l1,g4,a4,b4,c5,l2,cs5,a4,l4,e4
  815.     dc.b    l2,b4,g4,l4,d4,l2,d5,as4,l4,f4
  816. ;37
  817.     dc.b    l2,g4,d4,l1,g4,a4,b4,c5,l2,cs5,a4,l4,e4
  818.     dc.b    l1,g4,a4,b4,cs5,ds5,f5,g5,a5,b5,a5,g5,f5,ds5,cs5,b4,a4
  819. ;39
  820.  
  821.     dc.b    Harp3,ctra,0,v,1,2
  822.     dc.b    ev7
  823.     dc.b    l2
  824.     dc.b    p,a1,p,b1,p,cs2,p,d2
  825.     dc.b    p,f2,p,ds2,p,cs2,p,b1
  826.  
  827.     dc.b    p,a1,p,b1,p,cs2,p,ds2
  828.     dc.b    p,f2,p,ds2,p,cs2,p,b1
  829.  
  830.     dc.b    p,b1,p,cs2,p,ds2,p,f2
  831.     dc.b    p,g2,p,f2,p,ds2,p,cs2
  832.     dc.b    p,b1,p,cs2,p,ds2,p,f2
  833.     dc.b    p,g2,p,f2,p,ds2,p,cs2
  834.     dc.b    l32,p
  835.     dc.b    x
  836.  
  837.  
  838. c4p1    dc.b    chvol,32
  839.  
  840.     dc.b    Clav4,ctra,0,v0
  841.     dc.b    ev15
  842.     dc.b    l4
  843.     dc.b    p,a3,p,gs3
  844.     dc.b    p,a3,p
  845.  
  846.     dc.b    Flute5,ev7,v,1,1
  847.     dc.b    l1,cs3,c3,l2,cs3
  848.  
  849.     dc.b    Clav4,v0
  850.     dc.b    ev15
  851.     dc.b    l4
  852.     dc.b    p,a3,p,gs3
  853.     dc.b    p,a3,p,gs3
  854. ;5
  855.     dc.b    p,a3,p,gs3
  856.     dc.b    p,a3,p
  857.  
  858.     dc.b    Flute5,ev7,v,1,1
  859.     dc.b    l1,cs3,c3,l2,cs3
  860.  
  861.     dc.b    Clav4,v0
  862.     dc.b    ev15
  863.     dc.b    l4
  864.     dc.b    p,a3,p,gs3
  865.     dc.b    p,a3,p,gs3
  866. ;9
  867.     dc.b    ClXylo5,ev7,v,1,2,ctra,-24
  868.     dc.b    l2,a4,e4,l1,a4,b4,cs5,d5,l2,ds5,b4,l4,g4
  869.     dc.b    l2,e5,cs5,l4,a4,l2,g5,ds5,l4,b4
  870. ;11
  871.     dc.b    l2,a4,e4,l1,a4,b4,cs5,d5,l2,ds5,b4,l4,g4
  872.     dc.b    l2,cs5,a4,l4,f4,l2,b4,g4,l4,ds4
  873. ;13
  874.     dc.b    l2,b4,fs4,l1,b4,cs5,ds5,e5,l2,f5,cs5,l4,gs4
  875.     dc.b    l2,ds5,b4,l4,fs4,l2,fs5,d5,l4,a4
  876. ;15
  877.     dc.b    l2,b4,fs4,l1,b4,cs5,ds5,e5,l2,f5,cs5,l4,gs4
  878.     dc.b    ctra,-36
  879.     dc.b    l1,b4,cs5,ds5,f5,g5,a5,b5,cs6,ds6,cs6,b5,a5,g5,f5,ds5,cs5
  880.  
  881. ;17
  882.     dc.b    ctra,-24
  883.     dc.b    l2,a4,e4,l1,a4,b4,cs5,d5,l2,ds5,b4,l4,g4
  884.     dc.b    l2,e5,cs5,l4,a4,l2,g5,ds5,l4,b4
  885. ;19
  886.     dc.b    l2,a4,e4,l1,a4,b4,cs5,d5,l2,ds5,b4,l4,g4
  887.     dc.b    l2,cs5,a4,l4,f4,l2,b4,g4,l4,ds4
  888. ;21
  889.     dc.b    Clav4,ctra,0,v0
  890.     dc.b    ev15
  891.     dc.b    l4
  892.     dc.b    p,a3,p,b2
  893.     dc.b    p,a3,p
  894.  
  895.     dc.b    Flute5,ev7,v,1,1
  896.     dc.b    l1,cs3,c3,l2,cs3
  897.  
  898.     dc.b    Clav4,v0
  899.     dc.b    ev15
  900.     dc.b    l4
  901.     dc.b    p,a3,p,gs3
  902.     dc.b    p,a3,p,gs3
  903.  
  904.     dc.b    p,a3,p,b2
  905.     dc.b    p,a3,p
  906.  
  907.     dc.b    Flute5,ev7,v,1,1
  908.     dc.b    l1,cs3,c3,l2,cs3
  909.  
  910.     dc.b    Clav4,v0
  911.     dc.b    ev15
  912.     dc.b    l4
  913.     dc.b    p,a3,p,gs3
  914.     dc.b    p,a3,p,gs3
  915. ;29
  916.     dc.b    ClXylo5,ev7,v,1,2,ctra,-24
  917.     dc.b    l2,a4,e4,l1,a4,b4,cs5,d5,l2,ds5,b4,l4,g4
  918.     dc.b    l2,e5,cs5,l4,a4,l2,g5,ds5,l4,b4
  919. ;31
  920.     dc.b    Clav4,v0,ctra,0
  921.     dc.b    ev15
  922.     dc.b    l4
  923.     dc.b    p,a3,p
  924.  
  925.     dc.b    Flute5,ev7,v,1,1
  926.     dc.b    l1,cs3,c3,l2,cs3
  927. ;32
  928.     dc.b    ClXylo5,ev7,v,1,2,ctra,-24
  929.     dc.b    l2,a4,e4,l1,a4,b4,cs5,d5,l2,ds5,b4,l4,g4
  930.     dc.b    l2,cs5,a4,l4,f4,l2,b4,g4,l4,ds4
  931. ;34
  932.     dc.b    Clav4,v,1,2,ctra,0
  933.     dc.b    ev15
  934.     dc.b    l4
  935.     dc.b    p,b2,p
  936.  
  937.     dc.b    Flute5,ev7,v,1,1
  938.     dc.b    l1,ds3,d3,l2,ds3
  939. ;35
  940.     dc.b    ClXylo5,ev7,v,1,2,ctra,-24
  941.     dc.b    l2,b4,fs4,l1,b4,cs5,ds5,e5,l2,f5,cs5,l4,gs4
  942.     dc.b    l2,ds5,b4,l4,fs4,l2,fs5,d5,l4,a4
  943. ;37
  944.     dc.b    l2,b4,fs4,l1,b4,cs5,ds5,e5,l2,f5,cs5,l4,gs4
  945.     dc.b    ctra,-36
  946.     dc.b    l1,b4,cs5,ds5,f5,g5,a5,b5,cs6,ds6,cs6,b5,a5,g5,f5,ds5,cs5
  947. ;39
  948.     dc.b    Harp3,ctra,0,v,1,2
  949.     dc.b    ev7
  950.     dc.b    l2
  951.     dc.b    p,c2,p,ds2,p,f2,p,g2
  952.     dc.b    p,a2,p,g2,p,f2,p,ds2
  953.  
  954.     dc.b    p,cs2,p,ds2,p,f2,p,g2
  955.     dc.b    p,a2,p,g2,p,f2,p,ds2
  956.  
  957.     dc.b    p,d2,p,f2,p,g2,p,a2
  958.     dc.b    p,b2,p,a2,p,g2,p,f2
  959.     dc.b    p,ds2,p,f2,p,g2,p,a2
  960.     dc.b    p,b2,p,a2,p,g2,p,f2
  961.  
  962. cpend    dc.b    l32,p
  963.     dc.b    x
  964.  
  965.  
  966. c5p1    dc.b    l2
  967.     dc.b    ev14,BDR1,bd
  968.     dc.b    ev13,CHH1,hi
  969.     dc.b    ev6,SDR1,sn+2
  970.     dc.b    ev14,BDR1,bd,p,bd
  971.     dc.b    ev6,SDR1,sn+2
  972.     dc.b    ev13,CHH1,hi
  973.     dc.b    x
  974.  
  975.     even
  976.  
  977.  
  978. tuneb1    dc.w    b1p1
  979.     dc.w    0
  980.  
  981.  
  982. tuneb2    dc.w    b2p1
  983.     dc.w    0
  984.  
  985.  
  986. tuneb3    dc.w    b3p1
  987.     dc.w    0
  988.  
  989.  
  990. tuneb5    dc.w    b5p1,b5p1
  991. ;5
  992.     dc.w    b5p2,b5p2
  993. ;9
  994.     dc.w    b5p2,b5p3
  995. ;13
  996.     dc.w    b5p3,b5p4
  997.     dc.w    0
  998.  
  999.  
  1000. b1p1    dc.b    TP1,ev1,v,1,2,ctra,24
  1001. ;1
  1002.     dc.b    l3,as1,f1,l2,gs1
  1003.     dc.b    l3,as1,l2,f1,l1,f1,l2,gs1
  1004. ;2
  1005.     dc.b    l3,as1,f1,l2,gs1
  1006.     dc.b    l3,as1,f1,l2,gs1
  1007. ;3
  1008.     dc.b    as1,as1,f1,gs1
  1009.     dc.b    l3,as1,l2,f1,l1,f1,l2,gs1
  1010. ;4
  1011.     dc.b    l3,as1,f1,l2,gs1
  1012.     dc.b    as1,gs1,as1,gs1
  1013. ;5
  1014.     dc.b    l3,TP3,c0,TP1,a1,l2,gs1
  1015.     dc.b    f1,f1,gs1,a1
  1016. ;6
  1017.     dc.b    l3,TP3,c0,TP1,a1,l2,gs1
  1018.     dc.b    f1,f1,gs1,a1
  1019. ;7
  1020.     dc.b    l3,as1,l2,f1,l1,f1,l2,gs1
  1021.     dc.b    l3,as1,f1,l2,gs1
  1022. ;8
  1023.     dc.b    l3,as1,l2,f1,l1,f1,l2,gs1
  1024.     dc.b    l4,as1,l2,f1,gs1
  1025. ;9
  1026.     dc.b    l2,as1,l1,as1,l3,f1,l2,gs1
  1027.     dc.b    l4,as1,l2,f1,gs1
  1028. ;10
  1029.     dc.b    l1,ti,l2,as1,l3,gs1,l2,f1
  1030.     dc.b    gs1,as1,gs1,f1
  1031. ;11
  1032.     dc.b    l3,as1,l2,f1,l1,f1,l2,gs1
  1033.     dc.b    l4,as1,l2,f1,gs1
  1034. ;12
  1035.     dc.b    l3,as1,f1,l2,gs1
  1036.     dc.b    as1,gs1,f1,gs1
  1037. ;13
  1038.     dc.b    l3,TP3,c0,TP1,a1,l2,gs1
  1039.     dc.b    l3,f1,gs1,l2,a1
  1040. ;14
  1041.     dc.b    l3,TP3,c0,TP1,l2,a1,l3,gs1
  1042.     dc.b    l3,f1,gs1,l2,a1
  1043. ;15
  1044.     dc.b    l3,ds1,fs1,l2,g1
  1045.     dc.b    l3,as1,g1,l2,fs1
  1046. ;16
  1047.     dc.b    l3,ds1,fs1,l2,g1
  1048.     dc.b    l3,as1,g1,l2,fs1
  1049. ;17
  1050.     dc.b    l4,as1,f1,as1,f1
  1051. ;18
  1052.     dc.b    as1,f1,l2,as1,f1,g1,gs1
  1053. ;19
  1054.     dc.b    l4,as1,f1,as1,f1
  1055. ;20
  1056.     dc.b    as1,f1,l2,as1,gs1,g1,fs1
  1057. ;21
  1058.     dc.b    l4,f1,TP3,c0,TP1,f1,TP3,c0,TP1
  1059. ;22
  1060.     dc.b    f1,TP3,c0,TP1,f1,l2,TP3,c0,TP1,f1
  1061. ;23
  1062.     dc.b    l4,as1,f1,as1,f1
  1063. ;24
  1064.     dc.b    as1,f1,l2,as1,f1,g1,gs1
  1065. ;25
  1066.     dc.b    l4,as1,f1,as1,f1
  1067. ;26
  1068.     dc.b    as1,f1,l2,as1,f1,g1,gs1
  1069. ;27
  1070.     dc.b    l4,as1,f1,as1,f1
  1071. ;28
  1072.     dc.b    as1,f1,l2,as1,f1,g1,gs1
  1073. ;29
  1074.     dc.b    l4,f1,TP3,c0,TP1,f1,TP3,c0,TP1
  1075. ;30
  1076.     dc.b    f1,TP3,c0,TP1,l2,f1,TP3,c0,TP1,f1,TP3,c0,TP1
  1077. ;31
  1078.     dc.b    l4,ds1,as1,ds1,as1
  1079. ;32
  1080.     dc.b    ds1,fs1,g1,gs1
  1081.     dc.b    x
  1082.  
  1083.  
  1084. b2p1    dc.b    chvol,32
  1085.  
  1086.     dc.b    ctra,-24
  1087.     dc.b    Anlg3,ev8,v,10,20
  1088.     dc.b    l16+2,p
  1089.     dc.b    l6,c4,l4,as3,p
  1090.     dc.b    Harp3,ev7,v,1,2
  1091.     dc.b    l2,p,l1,f5,e5,f5,fs5,f5,e5,l4,f5,p
  1092.     dc.b    Anlg3,ev8,v,10,20
  1093.     dc.b    l8+2,p,l6,c4
  1094. ;5
  1095.     dc.b    Harp3,ev7,v,1,2
  1096.     dc.b    l2,p,l1,a5,gs5,a5,gs5,l2,a5,l8,p
  1097.     dc.b    Anlg3,ev8,v,10,20
  1098.     dc.b    l8+2,p,l6,g4
  1099.     dc.b    Harp3,ev7,v,1,2
  1100.     dc.b    l2,p,l1,f5,e5,f5,e5,l2,f5,l8,p
  1101.     dc.b    l2,p,l1,f5,e5,f5,fs5,f5,e5,l8-6,f5
  1102.     dc.b    Anlg3,ev8,v,10,20
  1103.     dc.b    l6,as4
  1104. ;9
  1105.     dc.b    Harp3,ev7,v,1,2
  1106.     dc.b    l2,p,l1,f5,e5,f5,e5,l2,f5,l8,p
  1107.     dc.b    Anlg3,ev8,v,10,20
  1108.     dc.b    l8+2,p,l6,c4
  1109.     dc.b    Harp3,ev7,v,1,2
  1110.     dc.b    l2,p,l1,f5,e5,f5,e5,l2,f5,l8,p
  1111.     dc.b    Anlg3,ev8,v,10,20
  1112.     dc.b    l8+2,p,l6,c4
  1113. ;13
  1114.     dc.b    Harp3,ev7,v,1,2
  1115.     dc.b    l2,p,l1,a5,gs5,a5,gs5,l2,a5,l8,p
  1116.     dc.b    l16,p
  1117.     dc.b    l2,p,l1,g5,fs5,g5,fs5,l2,g5,l8-6,p
  1118.     dc.b    Anlg3,ev8,v,10,20
  1119.     dc.b    l6+4,f4
  1120.     dc.b    Harp3,ev7,v,1,2
  1121.     dc.b    l8+2-4,p,l1,g5,fs5,g5,gs5,g5,fs5
  1122.  
  1123. ;17
  1124.     dc.b    ev6,v,1,2
  1125.  
  1126.     dc.b    Harp3,ctra,-12
  1127.     dc.b    l2,p,l1,as3,b3,ti,c4,cs4,d4,l2,p,l1,ds4,e4,f4,fs4,l2,g4
  1128. ;18
  1129.     dc.b    Harp4,ctra,-24
  1130.     dc.b    p,l1,gs4,a4,ti,l2,as4,l1,b4,ti,l2,c5,l1,cs5,l4,d5
  1131. ;19
  1132.     dc.b    Harp3,ctra,-12
  1133.     dc.b    l2,p,l1,as3,b3,ti,c4,cs4,d4,l2,p,l1,ds4,e4,f4,fs4,l2,g4
  1134. ;20
  1135.     dc.b    Harp4,ctra,-24
  1136.     dc.b    p,l1,gs4,a4,ti,l2,as4,l1,b4,ti,l2,c5,l1,cs5,l4,d5
  1137. ;21
  1138.     dc.b    l2,p,l1,d5,cs5,c5,b4,l2,as4,p,l1,a4,gs4,g4,fs4,l2,f4
  1139. ;22
  1140.     dc.b    Harp3,ctra,-12
  1141.     dc.b    p,l1,ds4,e4,ds4,d4,l2,cs4,c4,l1,b3,as3,l4,p
  1142. ;23
  1143.     dc.b    Harp3,ctra,-12
  1144.     dc.b    l2,p,l1,as3,b3,c4,cs4,l2,d4,p,l1,ds4,e4,f4,fs4,l2,g4
  1145. ;24
  1146.     dc.b    Harp4,ctra,-24
  1147.     dc.b    l2,p,l1,gs4,a4,ti,l2,as4,l1,b4,ti,l2,c5,l1,cs5,l4,d5
  1148. ;25
  1149.     dc.b    Harp3,ctra,-12
  1150.     dc.b    l2,p,l1,as3,b3,c4,cs4,l2,d4,p,l1,ds4,e4,ti,f4,l2,fs4
  1151. ;26
  1152.     dc.b    Harp4,ctra,-24
  1153.     dc.b    l2,p,l1,g4,gs4,ti,a4,l2,as4,b4,l1,c5,cs5,ti,l3,d5
  1154. ;27
  1155.     dc.b    Harp3,ctra,-12
  1156.     dc.b    l2,p,l1,as3,b3,c4,l2,cs4,l1,d4,l2,p,l1,ds4,e4,ti,f4,l2,fs4
  1157. ;28
  1158.     dc.b    Harp4,ctra,-24
  1159.     dc.b    l2,p,l1,g4,gs4,l2,a4,as4,b4,l1,c5,cs5,ti,d5,l2,cs5
  1160. ;29
  1161.     dc.b    l8+2,p,l1,d5,cs5,c5,b4,l2,as4
  1162. ;30
  1163.     dc.b    l2,p,l1,a4,gs4,g4,fs4,l2,f4,p,l1,ds4,e4,ti,ds4,l2,e4
  1164. ;31
  1165.     dc.b    Harp3,ctra,-12
  1166.     dc.b    l2,p,l1,as3,b3,c4,cs4,l2,d4,p,l1,ds4,e4,f4,fs4,l2,g4
  1167. ;32
  1168.     dc.b    Harp4,ctra,-24
  1169.     dc.b    l2,p,l1,gs4,a4,ti,l2,as4,l1,b4,ti,l2,c5,l1,cs5,l4,d5
  1170.     dc.b    x
  1171.  
  1172.  
  1173. b3p1    dc.b    TP4,ctra,-12
  1174.     dc.b    ev10
  1175.     dc.b    v,2,4
  1176. ;1
  1177.     dc.b    l4,as3,l3,d4,l1,f3,l2,as3,b3,f3,g3
  1178.     dc.b    l3,as3,as3,l2,g3,l4,as3,l2,p,l1,f3,g3
  1179. ;3
  1180.     dc.b    l4,as3,l3,d4,l1,c4,l2,as3,b3,f3,g3
  1181.     dc.b    l3,as3,as3,l2,g3,l4,as3,p
  1182. ;5
  1183.     dc.b    l3,c4,f3,l2,gs3,l3,a3,l1,a3,l2,gs3,f3
  1184.     dc.b    l3,gs3,a3,l2,c4,l2,a3,gs3,f3,gs3
  1185. ;7
  1186.     dc.b    l4,as3,l3,f3,l1,g3,l2,gs3,as3,gs3,g3
  1187.     dc.b    l3,f3,as3,l2,as3,l4,as3,p
  1188. ;9
  1189.     dc.b    l3,as3,l1,f3,l2,p,f3,g3,as3,d4,l1,cs4,c4
  1190.     dc.b    ti,l3,b3,l2,f3,g3,l4,as3,p
  1191. ;11
  1192.     dc.b    l3,as3,f3,l2,g3,as3,as3,l3,d4,l1,cs4
  1193.     dc.b    l2,c4,b3,f3,g3,l3,as3,as3,l1,g3,as3
  1194. ;13
  1195.     dc.b    l3,f3,gs3,l2,a3,c4,c4,a3,gs3
  1196.     dc.b    l3,f3,gs3,l2,a3,c4,c4,a3,gs3
  1197. ;15
  1198.     dc.b    l3,ds3,fs3,l2,g3,as3,as3,g3,fs3
  1199.     dc.b    l3,ds3,fs3,l2,g3,p,l1,c4,cs4,c4,cs4,l2,c4
  1200. ;17
  1201.  
  1202.     dc.b    l2
  1203.     dc.b    p,cs4,p,d4,p,cs4,p,d4
  1204.     dc.b    p,cs4,p,d4,p,cs4,p,d4
  1205.     dc.b    p,cs4,p,d4,p,cs4,p,d4
  1206.     dc.b    p,cs4,p,d4,p,cs4,p,d4
  1207. ;21
  1208.     dc.b    p,gs3,p,a3,p,gs3,p,a3
  1209.     dc.b    p,gs3,p,a3,p,gs3,p,a3
  1210.     dc.b    p,cs4,p,d4,p,cs4,p,d4
  1211.     dc.b    p,cs4,p,d4,p,cs4,p,d4
  1212. ;25
  1213.     dc.b    p,cs4,p,d4,p,cs4,p,d4
  1214.     dc.b    p,cs4,p,d4,p,cs4,p,d4
  1215.     dc.b    p,cs4,p,d4,p,cs4,p,d4
  1216.     dc.b    p,cs4,p,d4,p,cs4,p,d4
  1217. ;29
  1218.     dc.b    p,gs3,p,a3,p,gs3,p,a3
  1219.     dc.b    p,gs3,p,a3,p,gs3,p,a3
  1220.     dc.b    p,fs3,p,g3,p,fs3,p,g3
  1221.     dc.b    p,fs3,p,g3,p,fs3,p,g3
  1222.     dc.b    x
  1223.  
  1224.  
  1225. b5p1    dc.b    ev14,l2,BDR1,bd
  1226.     dc.b    ev6,SDR1,sd+4,l1
  1227.     dc.b    sd+4
  1228.     dc.b    sd+4
  1229.     dc.b    sd+4
  1230.     dc.b    sd+4
  1231.     dc.b    ev14,l2,BDR1,bd
  1232.     dc.b    ev6,l1,SDR1,sd+4,sd+4,ti,sd+4,sd+4,sd+4
  1233.  
  1234.     dc.b    ev14,l2,BDR1,bd
  1235.     dc.b    ev6,SDR1,sd+4,l1,sd+4,sd+4,sd+4,sd+4
  1236.     dc.b    ev14,l2,BDR1,bd,l1,bd
  1237.     dc.b    ev6,SDR1,sd+4,ti,sd+4,sd+4,sd+4
  1238.     dc.b    x
  1239.  
  1240. b5p2    dc.b    ev14,l2,BDR1,bd
  1241.     dc.b    ev6,l1,SDR1,sd+4,sd+4,ti,sd+4,sd+4,sd+4
  1242.     dc.b    ev14,l2,BDR1,bd
  1243.     dc.b    ev6,SDR1,sd+4,l1,sd+4,sd+4,sd+4,sd+4
  1244.  
  1245.     dc.b    ev14,l2,BDR1,bd
  1246.     dc.b    ev6,l1,SDR1,sd+4,sd+4,ti,sd+4,sd+4,sd+4
  1247.     dc.b    ev14,l2,BDR1,bd,bd
  1248.     dc.b    ev6,l1,SDR1,sd+4,sd+4,sd+4,sd+4
  1249.     dc.b    x
  1250.  
  1251. b5p3    dc.b    ev14,l2,BDR1,bd
  1252.     dc.b    ev6,l1,SDR1,sd+4,sd+4,ti,sd+4,sd+4,sd+4
  1253.     dc.b    ev14,l2,BDR1,bd
  1254.     dc.b    ev6,SDR1,sd+4,l1,sd+4,sd+4,sd+4,sd+4
  1255.  
  1256.     dc.b    ev14,l2,BDR1,bd
  1257.     dc.b    ev6,l1,SDR1,sd+4,sd+4,ti,sd+4,sd+4,sd+4
  1258.     dc.b    ev14,BDR1,bd
  1259.     dc.b    ev6,SDR1,sd+4
  1260.     dc.b    ev14,BDR1,bd
  1261.     dc.b    ev6,SDR1,sd+4,l2,sd+4,sd+4
  1262.     dc.b    x
  1263.  
  1264. b5p4    dc.b    ev14,l1,BDR1,bd
  1265.     dc.b    ev6,SDR1,sd+4,sd+4,sd+4,l2,sd+4,l1,sd+4,sd+4
  1266.     dc.b    ev14,l2,BDR1,bd
  1267.     dc.b    ev6,l1,SDR1,sd+4,sd+4,l2,sd+4,l1,sd+4,sd+4
  1268.  
  1269.     dc.b    ev14,l2,BDR1,bd
  1270.     dc.b    ev6,l1,SDR1,sd+4,sd+4,l2,sd+4,l1,sd+4,sd+4
  1271.     dc.b    ev14,l2,BDR1,bd,l1,bd
  1272.     dc.b    ev6,SDR1,sd+4,l2,sd+4,l1,sd+4,sd+4
  1273.     dc.b    x
  1274.  
  1275.     even
  1276.  
  1277.  
  1278. tunee1    dc.w    e1p1,e1p1,e1p2
  1279.     dc.w    0
  1280.  
  1281. tunee2    dc.w    e2p1,e2p1,e2p2
  1282.     dc.w    0
  1283.  
  1284. tunee3    dc.w    e3p1,e3p2
  1285.     dc.w    0
  1286.  
  1287. tunee5    dc.w    e5p1
  1288.     dc.w    0
  1289.  
  1290.  
  1291. e1p1    dc.b    SynBass1,ev8,v,1,2,ctra,12
  1292. ;1/9
  1293.     dc.b    l2,c1,p,p,cs1,l2,ds1,l6,p
  1294.     dc.b    l2,c1,p,p,cs1,ds1,l1,c1,fs1,l2,ti,e1
  1295.     dc.b    l2,c1,p,p,cs1,l2,ds1,l6,p
  1296.     dc.b    l1,c1,c1,l2,as0,a0,g0,fs0,e0,ds0,cs0
  1297. ;5/13
  1298.     dc.b    l2,c1,p,p,cs1,l2,ds1,l6,p
  1299.     dc.b    l2,c1,p,p,l1,cs1,ds1,fs1,e1,fs1,p,l4,a1
  1300.     dc.b    l2,c1,p,p,cs1,l2,ds1,l6,p
  1301.     dc.b    l2,p,l1,g0,a0,as0,c1,cs1,ds1,e1,p,fs1,p,e1,ds1,cs1,as0
  1302.     dc.b    x
  1303. ;17
  1304. e1p2    dc.b    l1,fs1,fs1,l4,p,l1,fs1,fs1,l8,p
  1305.     dc.b    l1,fs0,fs0,l4,p,l1,fs0,fs0,l2,p,a0,c1,cs1
  1306.     dc.b    l1,fs1,fs1,l4,p,l1,fs1,fs1,l8,p
  1307.     dc.b    l1,fs0,fs0,p,fs0,g0,g0,p,g0,a0,a0,p,a0,as0,as0,p,p
  1308. ;21
  1309.     dc.b    l2,c1,l1,p,l2,c1,l1,p,l2,fs0,l8,p
  1310.     dc.b    l2,fs0,l6,p,l2,c2,fs1,l4,e0
  1311.     dc.b    l1,fs0,fs0,l4,p,l1,fs0,fs0,l8,p
  1312.     dc.b    l1,fs0,fs1,p,fs0,g0,g1,p,g0,a0,a1,p,a0,as0,as1,p,p
  1313.     dc.b    x
  1314.  
  1315.  
  1316. e2p1    dc.b    Harp4,ctra,-12
  1317.     dc.b    ev5
  1318.     dc.b    v,1,2
  1319.     dc.b    l1,as3,p,a3,p,as3,p,a3,p,as3,p,a3,as3,p,as3,l2,a3
  1320.     dc.b    l1,as3,p,a3,p,as3,p,a3,p,as3,p,c4,l3,a3,l2,p
  1321.     dc.b    l1,as3,p,a3,p,as3,p,a3,p,as3,p,a3,as3,p,as3,l2,a3
  1322.     dc.b    l1,as3,p,a3,p,as3,p,c4,p,l1,cs4,l5,ti,l2,p
  1323. ;5/13
  1324.     dc.b    l1,as3,p,a3,p,as3,p,a3,p,as3,p,a3,as3,p,as3,l2,a3
  1325.     dc.b    l1,as3,p,a3,p,as3,p,c4,p,l4,a3,p
  1326.     dc.b    l1,as3,p,a3,p,as3,p,a3,p,as3,p,a3,as3,p,as3,l2,a3
  1327.     dc.b    l1,as3,p,c4,p,cs4,p,l2,ds4,l8,p
  1328.     dc.b    x
  1329. ;17
  1330. e2p2    dc.b    l10,p,l1,c3,fs3,c4,ds3,a3,ds4
  1331.     dc.b    l16,p
  1332.     dc.b    l10,p,l1,c3,fs3,c4,ds3,a3,ds4
  1333.     dc.b    l16,p
  1334. ;21
  1335.     dc.b    l10,p,l1,ds3,a3,ds4,fs3,c4,fs4
  1336.     dc.b    l16,p
  1337.     dc.b    l10,p,l1,c3,fs3,c4,ds3,a3,ds4
  1338.     dc.b    l16,p
  1339.     dc.b    x
  1340.  
  1341.  
  1342. e3p1    dc.b    chvol,32
  1343. ;1
  1344.     dc.b    l27,p
  1345.     dc.b    Anlg3,ev4
  1346.     dc.b    v,8,16,l17,c2,l4,p
  1347.  
  1348.     dc.b    SynBass3,ev9
  1349.     dc.b    v,2,4,l2,c2,fs2,c3,fs2,c2,fs2,c3,fs2
  1350. ;5
  1351.     dc.b    Clav4,ev7
  1352.     dc.b    v0,l1,e3,c3,as2,fs2,g3,ds3,cs3,a2,l8,p
  1353.     dc.b    l16,p
  1354.     dc.b    l1,e3,c3,as2,fs2,g3,ds3,cs3,a2,l8,p
  1355.     dc.b    p,v,1,2,Flute4,ev9,l1,e3,cs3,e3,l5,g3
  1356. ;9
  1357.     dc.b    l27,p
  1358.     dc.b    Anlg3,ev4
  1359.     dc.b    v,8,16,l17,c2,l4,p
  1360.  
  1361.     dc.b    SynBass3,ev9
  1362.     dc.b    v,2,4,l2,c2,fs2,c3,fs2,c2,fs2,c3,fs2
  1363. ;13
  1364.     dc.b    Harp4,ctra,-12
  1365.     dc.b    ev5
  1366.     dc.b    v,1,2
  1367.     dc.b    l1,cs4,p,c4,p,cs4,p,c4,p,cs4,p,c4,cs4,p,cs4,l2,c4
  1368.     dc.b    l1,cs4,p,c4,p,cs4,p,ds4,p,l4,c4,p
  1369.     dc.b    l1,cs4,p,c4,p,cs4,p,c4,p,cs4,p,c4,cs4,p,cs4,l2,c4
  1370.     dc.b    l1,cs4,p,ds4,p,e4,p,fs4,p
  1371.     dc.b    ctra,0
  1372.     dc.b    Flute4,ev9,l1,e3,cs3,e3,l5,g3
  1373.     dc.b    x
  1374.  
  1375. ;17
  1376. e3p2    dc.b    Anlg3,v,2,4,ev4
  1377.     dc.b    l10,fs2
  1378.     dc.b    Flute4,ev9,v,1,2
  1379.     dc.b    l1,ds2,a2,ds3,fs2,c3,fs3
  1380.     dc.b    l16,p
  1381.  
  1382.     dc.b    Anlg3,v,4,8,ev4
  1383.     dc.b    l10,fs1
  1384.     dc.b    Flute4,ev9,v,1,2
  1385.     dc.b    l1,fs2,c3,fs3,a2,ds3,a3
  1386.     dc.b    l16,p
  1387. ;21
  1388.     dc.b    Anlg3,v,3,6,ev4
  1389.     dc.b    l10,c2
  1390.     dc.b    Flute4,ev9,v,1,2
  1391.     dc.b    l1,fs2,c3,fs3,a2,ds3,a3
  1392.     dc.b    l16,p
  1393.  
  1394.     dc.b    Anlg3,v,4,8,ev4
  1395.     dc.b    fs1
  1396.     dc.b    p
  1397.     dc.b    x
  1398.  
  1399.  
  1400. e5p1    dc.b    ev14,BDR1,l2,bd
  1401.     dc.b    ev13,CHH1,l1,hi,hi
  1402.     dc.b    ev12,SDR1,l2,sn
  1403.     dc.b    ev14,BDR1,bd,p
  1404.     dc.b    ev13,CHH1,hi
  1405.     dc.b    ev12,SDR1,sn,p
  1406.  
  1407.  
  1408.     dc.b    ev14,BDR1,l1,bd
  1409.     dc.b    ev13,CHH1,hi,l2,hi
  1410.     dc.b    ev12,SDR1,sn
  1411.     dc.b    ev14,BDR1,bd
  1412.     dc.b    ev12,SDR1,l4,p,sn
  1413.  
  1414.  
  1415.     dc.b    ev14,BDR1,l2,bd
  1416.     dc.b    ev13,CHH1,l1,hi,hi
  1417.     dc.b    ev12,SDR1,l2,sn
  1418.     dc.b    ev14,BDR1,bd
  1419.     dc.b    ev12,SDR1,l4,p,sn
  1420.  
  1421.  
  1422.     dc.b    ev14,BDR1,l2,bd
  1423.     dc.b    ev13,CHH1,l1,hi,hi
  1424.     dc.b    ev12,SDR1,l2,sn
  1425.     dc.b    ev14,BDR1,bd,p
  1426.     dc.b    ev13,CHH1,l1,hi,hi
  1427.     dc.b    ev12,SDR1,sn,ti
  1428.     dc.b    ev14,BDR1,l1,bd,bd
  1429.     dc.b    x
  1430.  
  1431.     even
  1432.  
  1433.  
  1434.  
  1435. tunef1    dc.w    f1p1
  1436.     dc.w    0
  1437.  
  1438. tunef3    dc.w    f3p1
  1439.     dc.w    0
  1440.  
  1441. tunef4    dc.w    f4p1
  1442.     dc.w    0
  1443.  
  1444. tunef5    dc.w    f5p1,f5p1,f5p2,f5p2
  1445.     dc.w    0
  1446.  
  1447.  
  1448. f1p1    dc.b    SynBass1,ev8,v,1,2,ctra,12
  1449. ;1
  1450.     dc.b    l2,as0,c1,l4,p,l1,ds1,fs1,g1,fs1,l2,ti,ds1
  1451.     dc.b    l2,as0,c1,l3,p,l1,ds1,l2,fs1,g1,l4,fs1
  1452.     dc.b    l2,as0,c1,l4,p,l1,ds1,fs1,g1,fs1,l2,ti,ds1
  1453.     dc.b    l2,as0,c1,l3,p,l1,ds1,l2,fs1,g1,l4,fs1
  1454. ;5
  1455.     dc.b    l2,c1,d1,l4,p,l1,fs1,gs1,a1,gs1,l2,ti,fs1
  1456.     dc.b    c1,d1,p,l1,fs1,gs1,a1,fs1,gs1,a1,l4,gs1
  1457.     dc.b    l2,c1,d1,l4,p,l1,fs1,gs1,a1,gs1,l2,ti,fs1
  1458.     dc.b    c1,d1,l3,p,l1,fs1,gs1,a1,l2,gs1,fs1,gs1
  1459. ;9
  1460.     dc.b    l2,as0,c1,l4,p,l1,ds1,fs1,g1,fs1,l2,ti,ds1
  1461.     dc.b    l2,as0,c1,l3,p,l1,ds1,l2,fs1,g1,l4,fs1
  1462.     dc.b    l2,as0,c1,l4,p,l1,ds1,fs1,g1,fs1,l2,ti,ds1
  1463.     dc.b    l2,as0,c1,l3,p,l1,ds1,l2,fs1,g1,l4,fs1
  1464. ;13
  1465.     dc.b    l2,c1,d1,l4,p,l1,fs1,gs1,a1,gs1,l2,ti,fs1
  1466.     dc.b    c1,d1,p,l1,fs1,gs1,a1,fs1,gs1,a1,l4,gs1
  1467.     dc.b    l2,c1,d1,l4,p,l1,fs1,gs1,a1,gs1,l2,ti,fs1
  1468.     dc.b    c1,d1,p,l1,fs1,gs1,a1,fs1,gs1,a1,l4,gs1
  1469.     dc.b    x
  1470.  
  1471.  
  1472. f2p1    dc.b    Anlg3,ev4,v,2,4
  1473. ;1
  1474.     dc.b    l4,c3,d3,l3,fs3,l1,fs3,l4,p
  1475.     dc.b    c3,l3,d3,l1,fs3,l8,p
  1476.     dc.b    l4,c3,d3,l3,fs3,l1,fs3,l4,p
  1477.     dc.b    c3,l3,d3,l1,fs3,l8,p
  1478. ;5
  1479.     dc.b    l4,d3,e3,l3,gs3,l1,gs3,l4,p
  1480.     dc.b    d3,l3,e3,l1,gs3,l8,p
  1481.     dc.b    l4,d3,e3,l3,gs3,l1,gs3,l4,p
  1482.     dc.b    d3,l3,e3,l1,gs3,l8,p
  1483. ;9
  1484.     dc.b    l4,c3,ds3,l3,fs3,l1,fs3,l4,p
  1485.     dc.b    l3,g3,l1,g3,l4,p,l3,fs3,l1,fs3,l4,p
  1486.     dc.b    l4,c3,ds3,l3,fs3,l1,fs3,l4,p
  1487.     dc.b    l3,g3,l1,g3,l4,p,l3,fs3,l1,fs3,l4,p
  1488. ;13
  1489.     dc.b    l4,d3,fs3,l8,p
  1490.     dc.b    l16,p
  1491.     dc.b    l4,d3,fs3,l8,p
  1492.     dc.b    l3,a3,l1,a3,l12,p
  1493.     dc.b    x
  1494.  
  1495.  
  1496. f3p1    dc.b    chvol,32
  1497.  
  1498.     dc.b    TP4,ev11,v,1,2,ctra,-12
  1499. ;1
  1500.     dc.b    l1,c4,d4,l2,c4,l10,p,l1,g3,a3
  1501.     dc.b    l2,as3,a3,g3,l1,ds3,c4,p,TP5,l2,c4,l1,p,l2,c4,p,TP4
  1502.     dc.b    l1,c4,d4,l2,c4,l12,p
  1503.     dc.b    l1,as3,a3,l2,g3,ds3,l1,c3,ds3,p,c3,ti,d3,l4,p
  1504. ;5
  1505.     dc.b    l6,p,l1,d4,c4,d4,fs4,ti,d4,p,c4,l2,d4
  1506.     dc.b    l7,p,l1,d4,e4,l3,d4,l4,p
  1507.     dc.b    l2,p,l1,d4,c4,d4,ti,f4,d4,p,c4,ti,d4,l4,p
  1508.     dc.b    l2,p,TP5,l1,c4,d4,c4,d4,l2,c4,p,TP4,l1,g4,a4,g4,a4,l2,g4
  1509. ;9
  1510.     dc.b    l1,c4,d4,l2,c4,l12,p
  1511.     dc.b    l1,as3,a3,g3,a3,p,as3,ti,a3,TP5,l3,c4,l1,c4,l4,p,TP4
  1512.     dc.b    l1,c4,d4,l2,c4,l12,p
  1513.     dc.b    l2,p,TP5,c4,l1,p,l3,c4,TP4,l2,p,c4,l4,p
  1514. ;13
  1515.     dc.b    l2,p,l1,d4,c4,l4,d4,l1,g3,a3,g3,a3,p,g3,l2,a3
  1516.     dc.b    p,l1,d4,c4,p,d4,l2,c4,l8,p
  1517.     dc.b    l2,p,l1,c4,d4,p,l3,c4,l2,a3,g3,l1,a3,g3,ti,a3
  1518.     dc.b    p,c4,ti,d4,l2,c4,a3,l1,g3,a3,l2,g3,g3,a3
  1519.     dc.b    x
  1520.  
  1521.  
  1522. f4p1    dc.b    TP4,ev11,v,1,2,ctra,-12
  1523. ;1
  1524.     dc.b    l1,ds4,f4,l2,ds4,l10,p,l1,v0,g3,a3
  1525.     dc.b    l2,as3,a3,g3,l1,ds3,c4,p,v,1,2,TP5,l2,ds4,l1,p,l2,ds4,p,TP4
  1526.     dc.b    l1,ds4,f4,l2,ds4,l12,p
  1527.     dc.b    l1,v0,as3,a3,l2,g3,ds3,l1,c3,ds3,p,c3,ti,d3,l4,p
  1528. ;5
  1529.     dc.b    l6,p,l1,d4,c4,d4,fs4,ti,d4,p,c4,l2,d4
  1530.     dc.b    l7,p,l1,f4,g4,l3,f4,l4,p
  1531.     dc.b    l2,p,l1,d4,c4,d4,ti,f4,d4,p,c4,ti,d4,l4,p
  1532.     dc.b    l2,p,l1,TP5,c4,d4,c4,d4,l2,c4,p,TP4,l1,g4,a4,g4,a4,l2,g4
  1533. ;9
  1534.     dc.b    l1,v,1,2,ds4,f4,l2,ds4,l12,p
  1535.     dc.b    l1,v0,as3,a3,v,1,2,TP5,ds4,TP4,v0,a3
  1536.     dc.b    p,v,1,2,TP5,ds4,p,TP4,v0,a3,l3,v,1,2,TP5,ds4,l1,ds4,l4,p
  1537.     dc.b    TP4,l1,ds4,f4,l2,ds4,l12,p
  1538.     dc.b    l2,p,TP5,ds4,l1,p,l3,ds4,TP4,l2,p,ds4,l4,p
  1539. ;13
  1540.     dc.b    l2,p,l1,v0,d4,c4,l4,d4,l1,g3,a3,g3,a3,p,g3,l2,a3
  1541.     dc.b    p,l1,d4,c4,p,d4,l2,c4,l8,p
  1542.     dc.b    l2,p,l1,c4,d4,p,l3,c4,l2,a3,g3,l1,a3,g3,ti,a3
  1543.     dc.b    p,c4,ti,d4,l2,c4,a3,l1,g3,a3,l2,g3,g3,a3
  1544.     dc.b    x
  1545.  
  1546.  
  1547. f5p1    dc.b    ev14,BDR1,l2,bd,bd
  1548.     dc.b    ev12,SDR1,sd
  1549.     dc.b    ev14,BDR1,l1,bd
  1550.     dc.b    ev12,SDR1,sd,p,sd
  1551.     dc.b    ev14,BDR1,l2,bd
  1552.     dc.b    ev12,SDR1,l3,sd
  1553.     dc.b    ev14,BDR1,l1,bd
  1554.     dc.b    x
  1555.  
  1556. f5p2    dc.b    ev14,BDR1,l2,bd,bd
  1557.     dc.b    ev12,SDR1,sd
  1558.     dc.b    ev14,BDR1,l1,bd
  1559.     dc.b    ev12,SDR1,sd,p,sd
  1560.     dc.b    ev14,BDR1,l2,bd
  1561.     dc.b    ev12,SDR1,l4,sd
  1562.     dc.b    x
  1563.  
  1564.     even
  1565.  
  1566.  
  1567. tuneg1    dc.w    g1p1
  1568.     dc.w    0
  1569.  
  1570. tuneg3    dc.w    g3p1
  1571.     dc.w    0
  1572.  
  1573. tuneg4    dc.w    g4p1
  1574.     dc.w    0
  1575.  
  1576. tuneg5    dc.w    g5p1
  1577.     dc.w    0
  1578.  
  1579.  
  1580. g1p1    dc.b    ev1
  1581.     dc.b    TP1,ctra,24,v,1,2
  1582. ;1/9
  1583.     dc.b    l4,f1,c1,f1,c1
  1584.     dc.b    c1,g1,l2,g1,fs1,f1,e1
  1585.     dc.b    d1,ds1,as1,a1,fs1,g1,TP3,v,4,8,cs0,c0
  1586.     dc.b    TP1,v,1,2,l4,b1,a1,g1,TP3,v,4,8,cs0
  1587. ;5/13
  1588.     dc.b    TP1,v,1,2
  1589.     dc.b    l4,f1,c1,f1,c1
  1590.     dc.b    c1,g1,l2,g1,fs1,f1,e1
  1591.     dc.b    d1,ds1,as1,a1,g1,fs1,f1,e1
  1592.     dc.b    l4,f1,TP3,v,4,8,c0,TP1,v,1,2,f1,TP3,v,4,8,cs0
  1593.     dc.b    x
  1594.  
  1595.  
  1596. g3p1    dc.b    TP4,ev10,ctra,-12,v,1,1
  1597. ;1
  1598.     dc.b    l2,f4,a4,gs4,a4,l1,a4,gs4,a4,TP5,v,2,2,c4,ti,TP4,v,1,1,a4,l2,gs4
  1599.     dc.b    l1,e4,ds4,e4,g4,p,e4,l2,ds4,l4,c4,p
  1600.     dc.b    l2,d4,ds4,e4,f4,fs4,g4,gs4,a4
  1601.     dc.b    TP5,v,2,2,l1,b3,as3,b3,d4,p,b3,l2,as3,l4,g3,p
  1602. ;5
  1603.     dc.b    TP4,v,1,1
  1604.     dc.b    l2,f4,a4,gs4,a4,l1,a4,gs4,a4,TP5,v,2,2,c4,ti,TP4,v,1,1,a4,l2,gs4
  1605.     dc.b    l1,e4,ds4,e4,g4,p,e4,l2,ds4,l4,c4,p
  1606.     dc.b    l2,d4,ds4,e4,f4,l1,TP5,v,2,2,b3,as3,b3,d4,p,b3,l2,as3
  1607.     dc.b    TP4,v,1,1,l1,a4,gs4,a4,TP5,v,2,4,c4,p,TP4,v,1,2,a4,l2,gs4,l4,f4,p
  1608. ;9
  1609.     dc.b    x
  1610.  
  1611.  
  1612. g4p1    dc.b    Harp3
  1613.     dc.b    ev7,v,1,1
  1614.     dc.b    l1
  1615.     dc.b    c2,p,c2,a2,c2,a2,c2,p
  1616.     dc.b    c2,p,c2,a2,c2,a2,c2,p
  1617.     dc.b    c2,p,c2,g2,c2,g2,c2,p
  1618.     dc.b    c2,p,c2,g2,c2,g2,c2,p
  1619.     dc.b    d3,p,cs3,p,c3,p,b2,p,as2,p,a2,p,gs2,p,g2,p
  1620.     dc.b    l1,g2,p,g2,d3,p,d3,g2,p,d3,l7,p
  1621. ;5
  1622.     dc.b    l1
  1623.     dc.b    c2,p,c2,a2,p,a2,c2,p
  1624.     dc.b    c2,p,c2,a2,c2,a2,c2,p
  1625.     dc.b    c2,p,c2,g2,p,g2,c2,p
  1626.     dc.b    c2,l7,p
  1627.     dc.b    l1,d3,p,cs3,p,c3,p,b2,p,as2,p,a2,p,gs2,p,g2,p
  1628.     dc.b    f2,p,f2,c3,p,c3,f2,p,c3,l7,p
  1629. ;9
  1630.     dc.b    l1
  1631.     dc.b    c2,a2,c2,a2,c2,a2,c2,a2
  1632.     dc.b    c2,a2,c2,a2,c2,a2,c2,a2
  1633.     dc.b    c2,g2,c2,g2,c2,g2,c2,g2
  1634.     dc.b    c2,g2,c2,g2,c2,g2,c2,p
  1635.     dc.b    d3,p,cs3,p,c3,p,b2,p,as2,p,a2,p,gs2,p,g2,p
  1636.     dc.b    g2,d3,g2,d3,g2,d3,g2,d3,d3,l7,p
  1637. ;13
  1638.     dc.b    l1
  1639.     dc.b    c2,p,c2,p,c2,a2,c2,a2
  1640.     dc.b    c2,p,c2,p,c2,a2,c2,a2
  1641.     dc.b    c2,p,g2,p,g2,p,g2,p
  1642.     dc.b    c2,g2,c2,g2,p,g2,c2,p
  1643.     dc.b    d3,p,cs3,p,c3,p,b2,p,as2,p,a2,p,gs2,p,g2,p
  1644.     dc.b    l10,p,l1,c3,l5,p
  1645.     dc.b    x
  1646.  
  1647.  
  1648. g5p1    dc.b    Harp3
  1649.     dc.b    ev7,v,1,1
  1650.  
  1651.     dc.b    l3,p,l1,f2,p,f2,l2,p
  1652.     dc.b    l3,p,l1,f2,p,f2,l2,p
  1653.     dc.b    l3,p,l1,e2,p,e2,l2,p
  1654.     dc.b    l3,p,l1,e2,p,e2,l2,p
  1655.     dc.b    l1,d3,p,cs3,p,c3,p,b2,p,as2,p,a2,p,gs2,p,g2,p
  1656.     dc.b    l3,p,l1,b2,p,b2,p,p,b2,l7,p
  1657. ;5
  1658.     dc.b    l3,p,l1,f2,p,f2,l2,p
  1659.     dc.b    l3,p,l1,f2,p,f2,l2,p
  1660.     dc.b    l3,p,l1,e2,p,e2,l2,p
  1661.     dc.b    l8,p
  1662.     dc.b    l1,d3,p,cs3,p,c3,p,b2,p,as2,p,a2,p,gs2,p,g2,p
  1663.     dc.b    l3,p,l1,a2,p,a2,p,p,a2,l7,p
  1664. ;9
  1665.     dc.b    Flute3
  1666.     dc.b    ev3,v,3,6
  1667.  
  1668.     dc.b    l6,f3,l2,ds3,l4,c3,d3
  1669.     dc.b    l8,c3,p
  1670.     dc.b    l4,d3,cs3,c3,gs3
  1671.     dc.b    g3,ds3,v,1,2,g3,p,v,3,6
  1672. ;13
  1673.     dc.b    l4,f3,l2,p,ds3,l4,c3,d3
  1674.     dc.b    l6,c3,l10,p
  1675.     dc.b    l4,d3,cs3,c3,fs3
  1676.     dc.b    f3,c3,v,1,2,f3,p
  1677.     dc.b    x
  1678.  
  1679.     even
  1680.  
  1681.  
  1682. tunei1    dc.w    i1pb
  1683.     dc.w    0
  1684.  
  1685. tunei2    dc.w    i2p1,i1p1
  1686.     dc.w    0
  1687.  
  1688. tunei3    dc.w    i3p1,i1p1
  1689.     dc.w    0
  1690.  
  1691.  
  1692. i1pb    dc.b    l1
  1693. i1p1    dc.b    ev6
  1694.     dc.b    Clav1,ctra,24,b0,d1,f1,gs1
  1695.     dc.b    Clav3,ctra,0,b1,d2,f2,gs2
  1696.     dc.b    b2,d3,f3,gs3
  1697.     dc.b    Clav4,b2,as2,l4,b2
  1698.     dc.b    cut
  1699.  
  1700. i2p1    dc.b    l1,p
  1701.     dc.b    x
  1702.  
  1703. i3p1    dc.b    l2,p,l1
  1704.     dc.b    x
  1705.  
  1706.     even
  1707.  
  1708.  
  1709. tunej1    dc.w    j1pb
  1710.     dc.w    0
  1711.  
  1712. tunej2    dc.w    j2p1,j1p1
  1713.     dc.w    0
  1714.  
  1715. tunej3    dc.w    j3p1,j1p1
  1716.     dc.w    0
  1717.  
  1718.  
  1719. j1pb    dc.b    l1
  1720. j1p1    dc.b    ev6
  1721.     dc.b    Clav4,b2,fs2,f2,d2
  1722.     dc.b    Clav3,b2,fs2,f2,d2
  1723.     dc.b    b1,gs1,f1,d1
  1724.     dc.b    Clav1,ctra,24,b0,cs1,l4,b0
  1725.     dc.b    cut
  1726.  
  1727. j2p1    dc.b    l1,p
  1728.     dc.b    x
  1729.  
  1730. j3p1    dc.b    l2,p,l1
  1731.     dc.b    x
  1732.  
  1733.     even
  1734.  
  1735.  
  1736. tunek1    dc.w    k1p1
  1737.     dc.w    0
  1738.  
  1739. tunek2    dc.w    k2p1
  1740.     dc.w    0
  1741.  
  1742. tunek3    dc.w    k3p1
  1743.     dc.w    0
  1744.  
  1745.  
  1746. k1p1    dc.b    Flute3,v,1,3
  1747.     dc.b    ev3
  1748.     dc.b    l8
  1749.     dc.b    s,-5,1,ds3
  1750.     dc.b    cut
  1751.  
  1752. k2p1    dc.b    Flute3,v,1,3
  1753.     dc.b    ev3
  1754.     dc.b    l8
  1755.     dc.b    s,-5,1,c3
  1756.     dc.b    cut
  1757.  
  1758. k3p1    dc.b    Flute3,v,1,3
  1759.     dc.b    ev3
  1760.     dc.b    l8
  1761.     dc.b    s,-5,1,a2
  1762.     dc.b    cut
  1763.  
  1764.     even
  1765.  
  1766.  
  1767. restt    dc.w    rest
  1768.     dc.w    0
  1769.  
  1770.  
  1771. rest    dc.b     l31,p,x
  1772.  
  1773.  
  1774. ;    dc.b    lp,(a1loop)/256,(a1loop)&255
  1775. ;    dc.b    x
  1776.  
  1777.     even
  1778.  
  1779.     END
  1780.