home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Dave Lowe: Samples Disc 1
/
Lowe_SamplesDisc1.adf
/
AMIGA_DRIVER.LST
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
File List
|
1988-12-03
|
142.5 KB
|
2,226 lines
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 1
1 00.00000000 section issA,code_c
2 00.00000000 ; notetable
3 =000003F8 a00 equ 508*2
4 =000003C0 bb00 equ 480*2
5 =0000038A b00 equ 453*2
6 00.00000000
7 =00000358 c01 equ 428*2
8 =00000328 db01 equ 404*2
9 =000002FA d01 equ 381*2
10 =000002D0 eb01 equ 360*2
11 =000002A6 e01 equ 339*2
12 =00000280 f01 equ 320*2
13 =0000025C gb01 equ 302*2
14 =0000023A g01 equ 285*2
15 =0000021A ab01 equ 269*2
16 =000001FC a01 equ 508
17 =000001E0 bb01 equ 480
18 =000001C5 b01 equ 453
19 00.00000000
20 =000001AC c02 equ 428
21 =00000194 db02 equ 404
22 =0000017D d02 equ 381
23 =00000168 eb02 equ 360
24 =00000153 e02 equ 339
25 =00000140 f02 equ 320
26 =0000012E gb02 equ 302
27 =0000011D g02 equ 285
28 =0000010D ab02 equ 269
29 =000000FE a02 equ 254
30 =000000F0 bb02 equ 240
31 =000000E2 b02 equ 226
32 00.00000000
33 =000000D6 c03 equ 214
34 =000000CA db03 equ 202
35 =000000BE d03 equ 190
36 =000000B4 eb03 equ 180
37 =000000AA e03 equ 170
38 =000000A0 f03 equ 160
39 =00000097 gb03 equ 151
40 =0000008F g03 equ 143
41 =00000087 ab03 equ 135
42 =0000007F a03 equ 127
43 00.00000000
44 00.00000000 ;bb03 equ 480*2
45 00.00000000 ;b03 equ 453*2
46 00.00000000
47 00.00000000 ;c04 equ 428*2
48 00.00000000 ;db04 equ 404*2
49 00.00000000 ;d04 equ 381*2
50 00.00000000 ;eb04 equ 360*2
51 00.00000000 ;e04 equ 339*2
52 00.00000000 ;f04 equ 320*2
53 00.00000000 ;gb04 equ 302*2
54 00.00000000 ;g04 equ 285*2
55 00.00000000 ;ab04 equ 269*2
56 00.00000000 ;a04 equ 508
57 00.00000000 ;bb04 equ 480
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 2
58 00.00000000 ;b04 equ 453
59 00.00000000 ;
60 00.00000000 ;c05 equ 428
61 00.00000000 ;db05 equ 404
62 00.00000000 ;d05 equ 381
63 00.00000000 ;eb05 equ 360
64 00.00000000 ;e05 equ 339
65 00.00000000 ;f05 equ 320
66 00.00000000 ;gb05 equ 302
67 00.00000000 ;g05 equ 285
68 00.00000000 ;ab05 equ 269
69 00.00000000 ;a05 equ 254
70 00.00000000 ;bb05 equ 240
71 00.00000000 ;b05 equ 226
72 00.00000000 ;
73 00.00000000 ;c06 equ 214
74 00.00000000 ;db06 equ 202
75 00.00000000 ;d06 equ 190
76 00.00000000 ;eb06 equ 180
77 00.00000000 ;e06 equ 170
78 00.00000000 ;f06 equ 160
79 00.00000000 ;gb06 equ 151
80 00.00000000 ;g06 equ 143
81 00.00000000 ;ab06 equ 135
82 00.00000000 ;a06 equ 127
83 00.00000000 ;bb06 equ 480*2
84 00.00000000 ;b06 equ 453*2
85 00.00000000 ;
86 00.00000000 ;c07 equ 428*2
87 00.00000000 ;db07 equ 404*2
88 00.00000000 ;d07 equ 381*2
89 00.00000000 ;eb07 equ 360*2
90 00.00000000 ;e07 equ 339*2
91 00.00000000 ;f07 equ 320*2
92 00.00000000 ;gb07 equ 302*2
93 00.00000000 ;g07 equ 285*2
94 00.00000000 ;ab07 equ 269*2
95 00.00000000 ;a07 equ 508
96 00.00000000 ;bb07 equ 480
97 00.00000000 ;b07 equ 453
98 00.00000000 ;
99 00.00000000 ;c08 equ 428
100 00.00000000 ;db08 equ 404
101 00.00000000 ;d08 equ 381
102 00.00000000 ;eb08 equ 360
103 00.00000000 ;e08 equ 339
104 00.00000000 ;f08 equ 320
105 00.00000000 ;gb08 equ 302
106 00.00000000 ;g08 equ 285
107 00.00000000 ;ab08 equ 269
108 00.00000000 ;a08 equ 254
109 00.00000000 ;bb08 equ 240
110 00.00000000 ;b08 equ 226
111 00.00000000
112 00.00000000
113 =00000000 v equ 0
114 =000003F8 a00x equ 508*2+v
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 3
115 =000003C0 bb00x equ 480*2+v
116 =0000038A b00x equ 453*2+v
117 00.00000000
118 00.00000000
119 =00000358 c01x equ 428*2+v
120 =00000328 db01x equ 404*2+v
121 =000002FA d01x equ 381*2+v
122 =000002D0 eb01x equ 360*2+v
123 =000002A6 e01x equ 339*2+v
124 =00000280 f01x equ 320*2+v
125 =0000025C gb01x equ 302*2+v
126 =0000023A g01x equ 285*2+v
127 =0000021A ab01x equ 269*2+v
128 =000001FC a01x equ 508+v
129 00.00000000
130 =000001E0 bb01x equ 480+v
131 =000001C5 b01x equ 453+v
132 00.00000000
133 =000001AC c02x equ 428+v
134 =00000194 db02x equ 404+v
135 =0000017D d02x equ 381+v
136 =00000168 eb02x equ 360+v
137 =00000153 e02x equ 339+v
138 =00000140 f02x equ 320+v
139 =0000012E gb02x equ 302+v
140 =0000011D g02x equ 285+v
141 =0000010D ab02x equ 269+v
142 =000000FE a02x equ 254+v
143 =000000F0 bb02x equ 240+v
144 =000000E2 b02x equ 226+v
145 00.00000000
146 =000000D6 c03x equ 214+v
147 =000000CA db03x equ 202+v
148 =000000BE d03x equ 190+v
149 =000000B4 eb03x equ 180+v
150 =000000AA e03x equ 170+v
151 =000000A0 f03x equ 160+v
152 =00000097 gb03x equ 151+v
153 =0000008F g03x equ 143+v
154 =00000087 ab03x equ 135
155 =0000007F a03x equ 127+v
156 =000003C0 bb03x equ 480*2+v
157 =0000038A b03x equ 453*2+v
158 00.00000000
159 =00000358 c04x equ 428*2+v
160 =00000328 db04x equ 404*2+v
161 =000002FA d04x equ 381*2+v
162 =000002D0 eb04x equ 360*2+v
163 =000002A6 e04x equ 339*2+v
164 =00000280 f04x equ 320*2+v
165 =0000025C gb04x equ 302*2+v
166 =0000023A g04x equ 285*2+v
167 =0000021A ab04x equ 269*2+v
168 =000001FC a04x equ 508+v
169 =000001E0 bb04x equ 480+v
170 =000001C5 b04x equ 453+v
171 00.00000000
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 4
172 =000001AC c05x equ 428+v
173 =00000194 db05x equ 404+v
174 =0000017D d05x equ 381+v
175 =00000168 eb05x equ 360+v
176 =00000153 e05x equ 339+v
177 =00000140 f05x equ 320+v
178 =0000012E gb05x equ 302+v
179 =0000011D g05x equ 285+v
180 =0000010D ab05x equ 269+v
181 =000000FE a05x equ 254+v
182 =000000F0 bb05x equ 240+v
183 =000000E2 b05x equ 226+v
184 00.00000000
185 =000000D6 c06x equ 214+v
186 =000000CA db06x equ 202+v
187 =000000BE d06x equ 190+v
188 =000000B4 eb06x equ 180+v
189 =000000AA e06x equ 170+v
190 =000000A0 f06x equ 160+v
191 =00000097 gb06x equ 151+v
192 =0000008F g06x equ 143+v
193 =00000087 ab06x equ 135
194 =0000007F a06x equ 127+v
195 =000003C0 bb06x equ 480*2+v
196 =0000038A b06x equ 453*2+v
197 00.00000000
198 =00000358 c07x equ 428*2+v
199 =00000328 db07x equ 404*2+v
200 =000002FA d07x equ 381*2+v
201 =000002D0 eb07x equ 360*2+v
202 =000002A6 e07x equ 339*2+v
203 =00000280 f07x equ 320*2+v
204 =0000025C gb07x equ 302*2+v
205 =0000023A g07x equ 285*2+v
206 =0000021A ab07x equ 269*2+v
207 =000001FC a07x equ 508+v
208 =000001E0 bb07x equ 480+v
209 =000001C5 b07x equ 453+v
210 00.00000000
211 =000001AC c08x equ 428+v
212 =00000194 db08x equ 404+v
213 =0000017D d08x equ 381+v
214 =00000168 eb08x equ 360+v
215 =00000153 e08x equ 339+v
216 =00000140 f08x equ 320+v
217 =0000012E gb08x equ 302+v
218 =0000011D g08x equ 285+v
219 =0000010D ab08x equ 269+v
220 =000000FE a08x equ 254+v
221 =000000F0 bb08x equ 240+v
222 =000000E2 b08x equ 226+v
223 00.00000000
224 =00DFF0A0 chann1reg equ $dff0a0 ;start of ch1 registers
225 =00DFF0B0 chann2reg equ $dff0b0
226 =00DFF0C0 chann3reg equ $dff0c0
227 =00DFF0D0 chann4reg equ $dff0d0
228 =00DFF096 dmacon equ $dff096
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 5
229 =00DFF01E int_bf_int equ $dff01e
230 =00DFF09A int_bf_w equ $dff09a
231 =00DFF006 vhposr equ $dff006
232 =00000000 in_line equ 0
233 =00000004 new_snd equ 4
234 =00000001 end_song equ 1
235 =00000008 end_patt equ 8
236 =0000000C new_env equ 12
237 =00000010 pbend equ 16
238 =00000010 cr equ 16
239 =00000008 q equ cr/2
240 =00000004 sq equ q/2
241 =00000020 m equ cr*2
242 =00000040 sb equ cr*4
243 =00000018 dcr equ cr+q
244 =0000000C dq equ q+sq
245 =00000108 r14 equ 264
246 =00000030 dm equ m+cr
247 =00000060 dsb equ sb+m
248 =000000DF hi: equ 223
249 =000001BE lo: equ 446
250 =00BFE001 filter: equ $bfe001
251 =00000024 filter_on equ 36
252 =00000028 filter_off equ 40
253 00.00000000
254 =00000014 modon equ 20
255 =00000018 pboff equ 24
256 =0000001C modoff equ 28
257 =00000020 rest equ 32
258 =00000024 end_fx3 equ 36
259 =00000028 end_fx4 equ 40
260 =00000001 down equ 1
261 =00000002 up equ 2
262 00.00000000
263 00.00000000 ; a0 points to channel vars
264 00.00000000 ; a1 reads patt data/song data/envelope data
265 00.00000000 ; a2 points to ch reg locations
266 00.00000000 ; d0 used as general purpose register
267 00.00000000 ; d1 holds bits set for dma control reg
268 00.00000000 ; d2 holds current pitch for effects
269 00.00000000
270 00.00000000
271 00.00000000
272 00.00000000
273 00.00000000 4EB90000005E testloop: jsr driver
274 00.00000006 4EB90000002A jsr testfx
275 00.0000000C 4EB900000016 jsr delay
276 00.00000012 6000FFEC bra testloop
277 00.00000016 delay:
278 00.00000016 303900DFF006 move.w vhposr,d0
279 00.0000001C 0240FF00 andi.w #%1111111100000000,d0
280 00.00000020 0C40FF00 cmpi.w #%1111111100000000,d0
281 00.00000024 6600FFF0 bne delay
282 00.00000028 4E75 rts
283 00.0000002A
284 00.0000002A testfx:
285 00.0000002A 4A790000004E tst.w fxtc
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 6
286 00.00000030 66000014 bne tsj1
287 00.00000034 23FC0000000100000052 move.l #1,fx_buffer4
288 00.0000003E 33FC03E80000004E move.w #1000,fxtc
289 00.00000046 53790000004E tsj1: subq.w #1,fxtc
290 00.0000004C 4E75 rts
291 00.0000004E
292 00.0000004E 03E8 fxtc: dc.w 1000
293 00.00000050
294 00.00000050
295 00.00000050 0000 fx_buffer3 dc.w 0 ;fx number in multiples of 4
296 00.00000052 00000000 fx_buffer4 dc.l 0 ;speech sample number in 1s
297 00.00000056 0000 fx3_flag dc.w 0 ;fx
298 00.00000058 0000 fx4_flag dc.w 0 ;speech samples
299 00.0000005A 00000000 song_buffer dc.l 0
300 00.0000005E
301 00.0000005E
302 00.0000005E ;****************************************
303 00.0000005E ;fxp1: defl thereovt,0,255
304 00.0000005E ;fxp2: defl wow,0,255
305 00.0000005E ;fxp3: defl becaref,2,becaref,0,255
306 00.0000005E ;fxp4: defl lookout,2,three,0,255
307 00.0000005E ;fxp5: defl lookout,2,nine,0,clock,0,255
308 00.0000005E ;fxp6: defl break,1,left,3,break,1,left,0,255
309 00.0000005E ;fxp7: defl break,1,right,3,break,1,right,0,255
310 00.0000005E ;fxp8: defl becaref,2,three,0,255
311 00.0000005E ;fxp9: defl becaref,2,nine,0,clock,0,255
312 00.0000005E ;fxp10: defl tenemy,3,three,0,255
313 00.0000005E ;fxp11: defl tenemy,2,nine,0,clock,0,255
314 00.0000005E ;fxp12: defl tenemy,2,break,1,left,0,255
315 00.0000005E ;fxp13: defl tenemy,2,break,1,right,0,255
316 00.0000005E ;fxp14: defl lookout,2,lookout,3,tenemy,0,255
317 00.0000005E ;fxp15: defl lookout,2,tenemy,0,255
318 00.0000005E ;fxp16: defl getredy,0,255
319 00.0000005E ;****************************************
320 00.0000005E
321 00.0000005E
322 00.0000005E driver:
323 00.0000005E 41F900000584 lea ch1vars,a0
324 00.00000064 45F900DFF0A0 lea chann1reg,a2
325 00.0000006A 323C8201 move.w #%1000001000000001,d1 ; enable ch 1
326 00.0000006E 3A3C0001 move.w #%0000000000000001,d5
327 00.00000072 4EB9000001A4 jsr sect1
328 00.00000078 do2:
329 00.00000078 41F9000005C2 lea ch2vars,a0
330 00.0000007E 45F900DFF0B0 lea chann2reg,a2
331 00.00000084 323C8202 move.w #%1000001000000010,d1 ; enable ch 1
332 00.00000088 3A3C0002 move.w #%0000000000000010,d5
333 00.0000008C 4EB9000001A4 jsr sect1
334 00.00000092
335 00.00000092 ch3:
336 00.00000092 3A3C0004 move.w #%0000000000000100,d5
337 00.00000096 45F900DFF0C0 lea chann3reg,a2
338 00.0000009C 4A7900000050 tst.w fx_buffer3
339 00.000000A2 67000036 beq ch3ok
340 00.000000A6 45F9000006F8 lea dummy_reg,a2
341 00.000000AC 33C500DFF096 move.w d5,dmacon ;dma off ch 3
342 00.000000B2 33FC000100000056 move.w #1,fx3_flag
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 7
343 00.000000BA ******************************
344 00.000000BA ; sort which fx and store in vars
345 00.000000BA bbbbb
346 00.000000BA 4280 clr.l d0
347 00.000000BC 303900000050 move.w fx_buffer3,d0
348 00.000000C2 43F900000576 lea jump_table3-4,a1
349 00.000000C8
350 00.000000C8 D3C0 add.l d0,a1
351 00.000000CA 23D100000692 move.l (a1),currfx3
352 00.000000D0
353 00.000000D0
354 00.000000D0 427900000050 clr.w fx_buffer3
355 00.000000D6 60000032 bra ch3ok2
356 00.000000DA ch3ok: ; run music driver ch3
357 00.000000DA 4A7900000056 tst.w fx3_flag
358 00.000000E0 67000028 beq ch3ok2
359 00.000000E4 break_here:
360 00.000000E4 41F90000067C lea ch3fxvars,a0
361 00.000000EA 323C8204 move.w #%1000001000000100,d1 ; enable ch 3
362 00.000000EE 4EB9000001A4 jsr sect1
363 00.000000F4 41F900000600 lea ch3vars,a0
364 00.000000FA 45F9000006F8 lea dummy_reg,a2
365 00.00000100 4EB9000001A4 jsr sect1
366 00.00000106 60000012 bra ch4
367 00.0000010A
368 00.0000010A
369 00.0000010A ch3ok2:
370 00.0000010A 41F900000600 lea ch3vars,a0
371 00.00000110 ch3ok3:
372 00.00000110 323C8204 move.w #%1000001000000100,d1 ; enable ch 3
373 00.00000114 4EB9000001A4 jsr sect1
374 00.0000011A
375 00.0000011A ch4:
376 00.0000011A 3A3C0008 move.w #%0000000000001000,d5
377 00.0000011E 45F900DFF0D0 lea chann4reg,a2
378 00.00000124 4AB900000052 tst.l fx_buffer4
379 00.0000012A 67000038 beq ch4ok
380 00.0000012E 45F9000006F8 lea dummy_reg,a2
381 00.00000134 33C500DFF096 move.w d5,dmacon ;dma off ch 4
382 00.0000013A 33FC000100000058 move.w #1,fx4_flag
383 00.00000142 ******************************
384 00.00000142 ; sort which fx and store in vars
385 00.00000142
386 00.00000142 203900000052 move.l fx_buffer4,d0
387 00.00000148 D040 add d0,d0
388 00.0000014A D040 add d0,d0
389 00.0000014C 43F90000057A lea jump_table4-4,A1
390 00.00000152 D3C0 add.l d0,a1
391 00.00000154 23D1000006D0 move.l (a1),currfx4
392 00.0000015A
393 00.0000015A 42B900000052 clr.l fx_buffer4
394 00.00000160 60000030 bra ch4ok2
395 00.00000164 ch4ok: ; run music driver ch4
396 00.00000164 4A7900000058 tst.w fx4_flag
397 00.0000016A 67000026 beq ch4ok2
398 00.0000016E stop:
399 00.0000016E 41F9000006BA lea ch4fxvars,a0
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 8
400 00.00000174 323C8208 move.w #%1000001000001000,d1 ; enable ch 4
401 00.00000178 4EB9000001A4 jsr sect1
402 00.0000017E 41F90000063E lea ch4vars,a0
403 00.00000184 45F9000006F8 lea dummy_reg,a2
404 00.0000018A 4EB9000001A4 jsr sect1
405 00.00000190 4E75 rts
406 00.00000192
407 00.00000192 ch4ok2:
408 00.00000192 41F90000063E lea ch4vars,a0
409 00.00000198 ch4ok3:
410 00.00000198 323C8208 move.w #%1000001000001000,d1 ; enable ch 3
411 00.0000019C 4EB9000001A4 jsr sect1
412 00.000001A2 4E75 rts
413 00.000001A4
414 00.000001A4
415 00.000001A4
416 00.000001A4
417 00.000001A4
418 00.000001A4 4A680000 sect1: tst.w 0(a0)
419 00.000001A8 66000004 bne s1j1
420 00.000001AC 4E75 rts
421 00.000001AE
422 00.000001AE 4A680002 s1j1: tst.w 2(a0)
423 00.000001B2 67000172 beq sect3 ; get new note
424 00.000001B6 0C6800010002 cmpi.w #1,2(a0)
425 00.000001BC 670001E8 beq sect4
426 00.000001C0
427 00.000001C0 0C6800030004 cmpi.w #3,4(a0) ;is it looped data
428 00.000001C6 67000146 beq part2 ;branch if one shot
429 00.000001CA ; data is looped data
430 00.000001CA 53680002 mode_switch: subq.w #1,2(a0) ;decrease counter
431 00.000001CE
432 00.000001CE 427900000582 check_effects: clr.w altpf ; reset effects flag
433 00.000001D4 34280006 move.w 6(a0),d2 ; current pitch
434 00.000001D8 4A680008 tst.w 8(a0) ; pbend flag/mode
435 00.000001DC 67000044 beq check_mod
436 00.000001E0 4A68000E tst.w 14(a0) ;delay at zero
437 00.000001E4 6700000A beq cont_bend
438 00.000001E8 5368000E subq.w #1,14(a0)
439 00.000001EC 60000034 bra check_mod
440 00.000001F0 527900000582 cont_bend: addq.w #1,altpf ; inc flag
441 00.000001F6 3628000A move.w 10(a0),d3 ; rate to d3
442 00.000001FA 3828000C move.w 12(a0),d4 ; dest note to d4
443 00.000001FE 0C6800010008 cmpi.w #1,8(a0)
444 00.00000204 6700000E beq pbup
445 00.00000208 ; pbend down
446 00.00000208 9443 sub.w d3,d2
447 00.0000020A B842 cmp.w d2,d4
448 00.0000020C 65000014 bcs check_mod
449 00.00000210 6000000A bra fbend
450 00.00000214
451 00.00000214 D443 pbup: add.w d3,d2
452 00.00000216 B842 cmp.w d2,d4
453 00.00000218 64000008 bcc check_mod
454 00.0000021C 3404 fbend: move.w d4,d2
455 00.0000021E 42680008 clr.w 8(a0) ; clear pbend flag
456 00.00000222 4A680010 check_mod: tst.w 16(a0)
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 9
457 00.00000226 67000060 beq send_alt_pitch
458 00.0000022A ; mod flag set
459 00.0000022A ; test for start delay
460 00.0000022A 4A68003A tst.w 58(a0)
461 00.0000022E 6700000A beq st_ok
462 00.00000232 5368003A subq.w #1,58(a0)
463 00.00000236 60000050 bra send_alt_pitch
464 00.0000023A st_ok:
465 00.0000023A 4A680032 tst.w 50(a0)
466 00.0000023E 6700000A beq cont_mod
467 00.00000242 53680032 subq #1,50(a0)
468 00.00000246 60000040 bra send_alt_pitch
469 00.0000024A 316800340032 cont_mod: move.w 52(a0),50(a0) ;reset speed
470 00.00000250 527900000582 addq #1,altpf
471 00.00000256 0C6800030010 cmpi #3,16(a0)
472 00.0000025C 64000010 bcc addmod
473 00.00000260 ;subtract mod
474 00.00000260 36280038 move.w 56(a0),d3 ; get rate
475 00.00000264 9443 sub.w d3,d2
476 00.00000266 52680010 addq.w #1,16(a0) ; inc flag
477 00.0000026A 6000001C bra send_alt_pitch
478 00.0000026E addmod:
479 00.0000026E
480 00.0000026E 36280036 move.w 54(a0),d3 ; get rate
481 00.00000272 D443 add.w d3,d2
482 00.00000274 52680010 addq.w #1,16(a0)
483 00.00000278 0C6800050010 cmpi.w #5,16(a0)
484 00.0000027E 66000008 bne send_alt_pitch
485 00.00000282 317C00010010 move.w #1,16(a0) ;flag to 1
486 00.00000288
487 00.00000288 4A7900000582 send_alt_pitch: tst.w altpf
488 00.0000028E 6700000A beq send_env
489 00.00000292 31420006 move.w d2,6(a0) ;store curr pitch
490 00.00000296 35420006 move.w d2,6(a2) ;pitch to register
491 00.0000029A
492 00.0000029A send_env:
493 00.0000029A 0C500006 cmpi #6,(a0)
494 00.0000029E 6700003E beq norm_env
495 00.000002A2 0C500005 cmpi #5,(a0)
496 00.000002A6 67000036 beq norm_env
497 00.000002AA
498 00.000002AA
499 00.000002AA 303900000056 move.w fx3_flag,d0
500 00.000002B0 807900000058 or.w fx4_flag,d0
501 00.000002B6 0C400000 cmpi.w #0,d0
502 00.000002BA 67000022 beq norm_env
503 00.000002BE
504 00.000002BE
505 00.000002BE 22680012 move.l 18(a0),a1 ;envelope data needed ?
506 00.000002C2 0C5100FF cmpi.w #255,(a1)
507 00.000002C6 6700000E beq evj1
508 00.000002CA 3019 move.w (a1)+,d0
509 00.000002CC E258 evj2: ror.w #1,d0
510 00.000002CE 35400008 move.w d0,8(a2)
511 00.000002D2 6000001A bra fint
512 00.000002D6
513 00.000002D6 5589 evj1: subq.l #2,a1
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 10
514 00.000002D8 3019 move.w (a1)+,d0
515 00.000002DA 6000FFF0 bra evj2
516 00.000002DE
517 00.000002DE
518 00.000002DE norm_env:
519 00.000002DE 22680012 move.l 18(a0),a1 ;envelope data needed ?
520 00.000002E2 0C5100FF cmpi.w #255,(a1)
521 00.000002E6 6700000A beq env_finished
522 00.000002EA 35590008 move.w (a1)+,8(a2) ;send vol data
523 00.000002EE 21490012 fint: move.l a1,18(a0) ;store pointer
524 00.000002F2 4E75 env_finished: rts ; finish
525 00.000002F4
526 00.000002F4 ; *****************************
527 00.000002F4 ; this section sends the one shot
528 00.000002F4 ; data in the vars buffer and sets 4(a0) to 3
529 00.000002F4 ; when flag is 3 the program sends the loop data to the reg and sets
530 00.000002F4 ; the flag to 1
531 00.000002F4 ; part 1 send one shot data to chip
532 00.000002F4 317C00030004 one_shot_note: move.w #3,4(a0) ;set flag
533 00.000002FA 24A80026 move.l 38(a0),(a2)
534 00.000002FE 3568002A0004 move.w 42(a0),4(a2)
535 00.00000304 33C100DFF096 move.w d1,dmacon ;start dma
536 00.0000030A 6000FF8E bra send_env
537 00.0000030E ; part 2 send loop data to chip
538 00.0000030E ; move loop data into register from vars store
539 00.0000030E part2:
540 00.0000030E 24A8002C move.l 44(a0),(a2)
541 00.00000312 356800300004 move.w 48(a0),4(a2)
542 00.00000318 53680002 subq.w #1,2(a0) ;decrease count
543 00.0000031C 317C00010004 move.w #1,4(a0)
544 00.00000322 6000FEAA bra check_effects
545 00.00000326
546 00.00000326 ; *****************************
547 00.00000326
548 00.00000326 ; this section gets new note data
549 00.00000326
550 00.00000326 sect3:
551 00.00000326
552 00.00000326 22680016 move.l 22(a0),a1 ;get patt pointer
553 00.0000032A 3019 control_ret: move.w (a1)+,d0 ;next data to d0/pointer inc
554 00.0000032C 0C400064 cmpi.w #100,d0 ;control marker
555 00.00000330 6300008C bls sect5 ;effects flags
556 00.00000334 ;d1 holds next note pitch
557 00.00000334 31400006 move.w d0,6(a0) ;store in curr pitch
558 00.00000338 35400006 move.w d0,6(a2) ;pitch to reg
559 00.0000033C 31590002 move.w (a1)+,2(a0) ;store count
560 00.00000340 53680002 subq.w #1,2(a0) ;and decrease
561 00.00000344 21490016 move.l a1,22(a0) ;store patt pointer
562 00.00000348 216800220012 move.l 34(a0),18(a0) ; reset env pointer
563 00.0000034E 3168003C003A move.w 60(a0),58(a0) ; reset mod delay
564 00.00000354 4A680010 tst.w 16(a0)
565 00.00000358 67000008 beq no_mod_res
566 00.0000035C 317C00010010 move.w #1,16(a0)
567 00.00000362 no_mod_res:
568 00.00000362 0C6800000004 cmpi.w #0,4(a0)
569 00.00000368 67000006 beq do_loop
570 00.0000036C 6000FF86 bra one_shot_note ;jump there
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 11
571 00.00000370
572 00.00000370 ; loop data trigger
573 00.00000370 33C100DFF096 do_loop: move.w d1,dmacon ;start dma for current channel
574 00.00000376 6000FF22 bra send_env
575 00.0000037A
576 00.0000037A do_rest:
577 00.0000037A 31590002 move.w (a1)+,2(a0) ;store count
578 00.0000037E 53680002 subq.w #1,2(a0) ;and decrease
579 00.00000382 21490016 move.l a1,22(a0) ;store patt pointer
580 00.00000386 216800220012 move.l 34(a0),18(a0) ; reset env pointer
581 00.0000038C 3168003E003C move.w 62(a0),60(a0) ; reset mod delay
582 00.00000392 357C00000008 move.w #0,8(a2)
583 00.00000398 217C000003A20012 move.l #rest_env,18(a0)
584 00.000003A0 4E75 rts
585 00.000003A2
586 00.000003A2 00FF00FF rest_env: dc.w 255,255
587 00.000003A6
588 00.000003A6
589 00.000003A6 ; ***********************************
590 00.000003A6 sect4:
591 00.000003A6 0C6800000004 cmpi.w #0,4(a0)
592 00.000003AC 67000008 beq noof
593 00.000003B0 33C500DFF096 move.w d5,dmacon ;dma off
594 00.000003B6 53680002 noof: subq.w #1,2(a0)
595 00.000003BA 6000FE12 bra check_effects
596 00.000003BE
597 00.000003BE ; ***********************************
598 00.000003BE ; effects flags d0 holds jump offset
599 00.000003BE 267C000003CA sect5: move.l #jump_table,a3
600 00.000003C4 28730000 move.l (a3,d0),a4
601 00.000003C8 4ED4 jmp (a4)
602 00.000003CA
603 00.000003CA
604 00.000003CA 000003FE jump_table: dc.l in_line_data
605 00.000003CE 0000041A dc.l nsound
606 00.000003D2 0000044A dc.l patt_end
607 00.000003D6 00000464 dc.l get_env
608 00.000003DA 0000046C dc.l check_pbend
609 00.000003DE 00000478 dc.l do_mod
610 00.000003E2 0000048E dc.l bend_off
611 00.000003E6 00000496 dc.l mod_off
612 00.000003EA 0000037A dc.l do_rest
613 00.000003EE 0000049E dc.l end_fx3p
614 00.000003F2 000004B2 dc.l end_fx4p
615 00.000003F6
616 00.000003F6 00000402 dc.l s_f_on
617 00.000003FA 0000040E dc.l s_f_off
618 00.000003FE
619 00.000003FE
620 00.000003FE in_line_data:
621 00.000003FE ; data format = reg offset,data,etc....,end_data
622 00.000003FE 4E71 nop
623 00.00000400 4E75 rts
624 00.00000402
625 00.00000402 s_f_on:
626 00.00000402 08B9000100BFE001 bclr #1,filter
627 00.0000040A 6000FF1E bra control_ret
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 12
628 00.0000040E s_f_off:
629 00.0000040E 08F9000100BFE001 bset #1,filter
630 00.00000416 6000FF12 bra control_ret
631 00.0000041A
632 00.0000041A 2659 nsound: move.l (a1)+,a3 ;sound address to a3
633 00.0000041C 0C530000 cmpi.w #0,(a3)
634 00.00000420 66000012 bne one_shot_sound
635 00.00000424 315B0004 move.w (a3)+,4(a0) ;loop or one shot flag
636 00.00000428 249B move.l (a3)+,(a2) ;data address
637 00.0000042A 35530004 move.w (a3),4(a2) ;length
638 00.0000042E 4EF90000032A jmp control_ret
639 00.00000434
640 00.00000434 one_shot_sound:
641 00.00000434 315B0004 move.w (a3)+,4(a0)
642 00.00000438 215B0026 move.l (a3)+,38(a0) ;store
643 00.0000043C 215B002A move.l (a3)+,42(a0)
644 00.00000440 2153002E move.l (a3),46(a0)
645 00.00000444 4EF90000032A jmp control_ret
646 00.0000044A
647 00.0000044A patt_end:
648 00.0000044A ; get next patt address from song part
649 00.0000044A 2268001A move.l 26(a0),a1 ;song pos to a1
650 00.0000044E 0C9100000000 cmpi.l #0,(a1) ;song marker ??
651 00.00000454 67000070 beq song_control
652 00.00000458 58A8001A addq.l #4,26(a0) ;store song pointer
653 00.0000045C 2251 move.l (a1),a1 ;patt address to a1
654 00.0000045E 4EF90000032A jmp control_ret
655 00.00000464
656 00.00000464
657 00.00000464 21590022 get_env: move.l (a1)+,34(a0)
658 00.00000468 6000FEC0 bra control_ret
659 00.0000046C
660 00.0000046C check_pbend:
661 00.0000046C 21590008 move.l (a1)+,8(a0)
662 00.00000470 2159000C move.l (a1)+,12(a0)
663 00.00000474 6000FEB4 bra control_ret
664 00.00000478
665 00.00000478 317C00010010 do_mod: move.w #1,16(a0) ; flag on
666 00.0000047E 21590032 move.l (a1)+,50(a0)
667 00.00000482 21590036 move.l (a1)+,54(a0)
668 00.00000486 2159003A move.l (a1)+,58(a0)
669 00.0000048A 6000FE9E bra control_ret
670 00.0000048E
671 00.0000048E 42680008 bend_off: clr.w 8(a0)
672 00.00000492 6000FE96 bra control_ret
673 00.00000496
674 00.00000496 42680010 mod_off: clr.w 16(a0)
675 00.0000049A 6000FE8E bra control_ret
676 00.0000049E
677 00.0000049E
678 00.0000049E end_fx3p:
679 00.0000049E 33C500DFF096 move.w d5,dmacon ;dma off ch 3
680 00.000004A4 427900000056 clr.w fx3_flag
681 00.000004AA 357C00000008 move.w #0,8(a2) ; vol off
682 00.000004B0 4E75 rts
683 00.000004B2
684 00.000004B2 end_fx4p:
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 13
685 00.000004B2 33C500DFF096 move.w d5,dmacon ;dma off ch 3
686 00.000004B8 427900000058 clr.w fx4_flag
687 00.000004BE 357C00000008 move.w #0,8(a2) ;vol off
688 00.000004C4 4E75 rts
689 00.000004C6
690 00.000004C6
691 00.000004C6 song_control:
692 00.000004C6 ; reset song to start
693 00.000004C6 5889 addq.l #4,a1
694 00.000004C8 2168001E001A move.l 30(a0),26(a0)
695 00.000004CE 2268001A move.l 26(a0),a1
696 00.000004D2 58A8001A addq.l #4,26(a0)
697 00.000004D6 2251 move.l (a1),a1
698 00.000004D8 4EF90000032A jmp control_ret
699 00.000004DE
700 00.000004DE
701 00.000004DE ; *************************************
702 00.000004DE ; SONG SELECTION subroutine
703 00.000004DE select_new_song:
704 00.000004DE ; jsr CLEAR_CHIP ; STOP CURRENT SONG DEAD
705 00.000004DE ; clr.w music_disable
706 00.000004DE
707 00.000004DE ; clear out vars area
708 00.000004DE 203C000000BB move.l #187,d0
709 00.000004E4 41F900000582 lea gvars,a0
710 00.000004EA 4258 clloop: clr.w (a0)+
711 00.000004EC 51C8FFFC dbra d0,clloop
712 00.000004F0
713 00.000004F0 22390000005A move.l song_buffer,d1
714 00.000004F6 D041 add d1,d0
715 00.000004F8 D041 add d1,d0
716 00.000004FA D041 add d1,d0
717 00.000004FC D041 add d1,d0
718 00.000004FE D041 add d1,d0
719 00.00000500 D041 add d1,d0
720 00.00000502 D041 add d1,d0
721 00.00000504 D041 add d1,d0
722 00.00000506 D041 add d1,d0
723 00.00000508 D041 add d1,d0
724 00.0000050A D041 add d1,d0
725 00.0000050C D041 add d1,d0
726 00.0000050E
727 00.0000050E ;get song pattern address
728 00.0000050E 43F90000056E LEA SONG_TABLE-12,A1
729 00.00000514 D2C0 add d0,a1 ;pattern address to a1
730 00.00000516 23D9000005A2 MOVE.L (A1)+,WSONG1 ;A1 = DATA ADDRESS
731 00.0000051C 23D9000005E0 move.l (a1)+,wsong2 ;counter
732 00.00000522 23D10000061E move.l (a1),wsong3
733 00.00000528
734 00.00000528 23FC000007A00000059A MOVE.L #pstart,PATTR1
735 00.00000532 23FC000007A0000005D8 MOVE.L #pstart,PATTR2
736 00.0000053C 23FC000007A000000616 MOVE.L #pstart,PATTR3
737 00.00000546 23FC000007A000000654 move.l #pstart,pattr4
738 00.00000550 23FC000007980000059E move.l #sstart,songr1
739 00.0000055A 23FC00000798000005DC MOVE.L #sstart,SONGR2
740 00.00000564 23FC000007980000061A MOVE.L #sstart,SONGR3
741 00.0000056E 23FC0000079800000658 move.l #sstart,songr4
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 14
742 00.00000578 4E75 rts
743 00.0000057A
744 00.0000057A song_table:
745 00.0000057A ; dc.l song1,song2,song3
746 00.0000057A ; dc.l song4,song5,song6
747 00.0000057A ; dc.l song7,song8,song9
748 00.0000057A ; dc.l song10,song11,song12
749 00.0000057A ; dc.l song13,song14,song15
750 00.0000057A
751 00.0000057A
752 00.0000057A
753 00.0000057A jump_table3: ; fx patterns ch3
754 00.0000057A 00000F9E dc.l fxp1
755 00.0000057E
756 00.0000057E
757 00.0000057E
758 00.0000057E jump_table4: ; speech patterns ch4
759 00.0000057E 00000FE0 dc.l spp1 ; spp1
760 00.00000582
761 00.00000582
762 00.00000582 gvars:
763 00.00000582
764 00.00000582 0000 altpf dc.w 0
765 00.00000584
766 00.00000584 0001 ch1vars dc.w 1 ; test disable+0
767 00.00000586 0000 dc.w 0 ; interrupt counter+2
768 00.00000588 0000 dc.w 0 ; 1 = loop/one shot mode flag +4
769 00.0000058A 0000 dc.w 0 ; current pitch+6
770 00.0000058C ; pbend vars
771 00.0000058C 0000 dc.w 0 ; mode+8
772 00.0000058E 0000 dc.w 0 ; rate +10
773 00.00000590 0000 dc.w 0 ; dest note +12
774 00.00000592 0000 dc.w 0 ; start delay +14
775 00.00000594 0000 dc.w 0 ; modulation flag 0/1+16
776 00.00000596
777 00.00000596 00000000 dc.l 0 ; env pointer +18
778 00.0000059A 000007A0 pattr1: dc.l pstart ; patt pointer+22
779 00.0000059E 00000798 songr1: dc.l sstart ; curr song pointer+26
780 00.000005A2 000007A2 wsong1: dc.l s1 ; reset song pointer+30
781 00.000005A6 00000000 dc.l 0 ; reset env pointer+34
782 00.000005AA ; section used to store current sound data
783 00.000005AA
784 00.000005AA 00000000 dc.l 0 ; one shot data address +38
785 00.000005AE 0000 dc.w 0 ; one shot data length +42
786 00.000005B0 00000000 dc.l 0 ; loop data address +44
787 00.000005B4 0000 dc.w 0 ; loop data length +48
788 00.000005B6 ; modulation vars
789 00.000005B6 0000 dc.w 0 ; speed+ 50
790 00.000005B8 0000 dc.w 0 ; speed reset+52
791 00.000005BA 0000 dc.w 0 ; rate up +54
792 00.000005BC 0000 dc.w 0 ; rate down+56
793 00.000005BE 0000 dc.w 0 ; start delay+58
794 00.000005C0 0000 dc.w 0 ; delay reset
795 00.000005C2
796 00.000005C2 0002 ch2vars dc.w 2 ; test disable+0
797 00.000005C4 0000 dc.w 0 ; interrupt counter+2
798 00.000005C6 0000 dc.w 0 ; 1 = loop/one shot mode flag +4
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 15
799 00.000005C8 0000 dc.w 0 ; current pitch+6
800 00.000005CA ; pbend vars
801 00.000005CA 0000 dc.w 0 ; mode+8
802 00.000005CC 0000 dc.w 0 ; rate +10
803 00.000005CE 0000 dc.w 0 ; dest note +12
804 00.000005D0 0000 dc.w 0 ; start delay +14
805 00.000005D2 0000 dc.w 0 ; modulation flag 0/1+16
806 00.000005D4
807 00.000005D4 00000000 dc.l 0 ; env pointer +18
808 00.000005D8 000007A0 pattr2: dc.l pstart ; patt pointer+22
809 00.000005DC 00000798 songr2: dc.l sstart ; curr song pointer+26
810 00.000005E0 00000B2E wsong2: dc.l s2 ; reset song pointer+30
811 00.000005E4 00000000 dc.l 0 ; reset env pointer+34
812 00.000005E8 ; section used to store current sound data
813 00.000005E8
814 00.000005E8 00000000 dc.l 0 ; one shot data address +38
815 00.000005EC 0000 dc.w 0 ; one shot data length +42
816 00.000005EE 00000000 dc.l 0 ; loop data address +44
817 00.000005F2 0000 dc.w 0 ; loop data length +48
818 00.000005F4 ; modulation vars
819 00.000005F4 0000 dc.w 0 ; speed+ 50
820 00.000005F6 0000 dc.w 0 ; speed reset+52
821 00.000005F8 0000 dc.w 0 ; rate up +54
822 00.000005FA 0000 dc.w 0 ; rate down+56
823 00.000005FC 0000 dc.w 0 ; start delay+58
824 00.000005FE 0000 dc.w 0 ; delay reset
825 00.00000600
826 00.00000600
827 00.00000600
828 00.00000600 0003 ch3vars dc.w 3 ; test disable+0
829 00.00000602 0000 dc.w 0 ; interrupt counter+2
830 00.00000604 0000 dc.w 0 ; 1 = loop/one shot mode flag +4
831 00.00000606 0000 dc.w 0 ; current pitch+6
832 00.00000608 ; pbend vars
833 00.00000608 0000 dc.w 0 ; mode+8
834 00.0000060A 0000 dc.w 0 ; rate +10
835 00.0000060C 0000 dc.w 0 ; dest note +12
836 00.0000060E 0000 dc.w 0 ; start delay +14
837 00.00000610 0000 dc.w 0 ; modulation flag 0/1+16
838 00.00000612
839 00.00000612 00000000 dc.l 0 ; env pointer +18
840 00.00000616 000007A0 pattr3: dc.l pstart ; patt pointer+22
841 00.0000061A 00000798 songr3: dc.l sstart ; curr song pointer+26
842 00.0000061E 00000E66 wsong3: dc.l s3 ; reset song pointer+30
843 00.00000622 00000000 dc.l 0 ; reset env pointer+34
844 00.00000626 ; section used to store current sound data
845 00.00000626
846 00.00000626 00000000 dc.l 0 ; one shot data address +38
847 00.0000062A 0000 dc.w 0 ; one shot data length +42
848 00.0000062C 00000000 dc.l 0 ; loop data address +44
849 00.00000630 0000 dc.w 0 ; loop data length +48
850 00.00000632 ; modulation vars
851 00.00000632 0000 dc.w 0 ; speed+ 50
852 00.00000634 0000 dc.w 0 ; speed reset+52
853 00.00000636 0000 dc.w 0 ; rate up +54
854 00.00000638 0000 dc.w 0 ; rate down+56
855 00.0000063A 0000 dc.w 0 ; start delay+58
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 16
856 00.0000063C 0000 dc.w 0 ; delay reset
857 00.0000063E
858 00.0000063E
859 00.0000063E
860 00.0000063E 0000 ch4vars dc.w 0 ; test disable+0
861 00.00000640 0000 dc.w 0 ; interrupt counter+2
862 00.00000642 0000 dc.w 0 ; 1 = loop/one shot mode flag +4
863 00.00000644 0000 dc.w 0 ; current pitch+6
864 00.00000646 ; pbend vars
865 00.00000646 0000 dc.w 0 ; mode+8
866 00.00000648 0000 dc.w 0 ; rate +10
867 00.0000064A 0000 dc.w 0 ; dest note +12
868 00.0000064C 0000 dc.w 0 ; start delay +14
869 00.0000064E 0000 dc.w 0 ; modulation flag 0/1+16
870 00.00000650
871 00.00000650 00000000 dc.l 0 ; env pointer +18
872 00.00000654 000007A0 pattr4: dc.l pstart ; patt pointer+22
873 00.00000658 00000798 songr4: dc.l sstart ; curr song pointer+26
874 00.0000065C 00000F92 wsong4: dc.l s4 ; reset song pointer+30
875 00.00000660 00000000 dc.l 0 ; reset env pointer+34
876 00.00000664 ; section used to store current sound data
877 00.00000664
878 00.00000664 00000000 dc.l 0 ; one shot data address +38
879 00.00000668 0000 dc.w 0 ; one shot data length +42
880 00.0000066A 00000000 dc.l 0 ; loop data address +44
881 00.0000066E 0000 dc.w 0 ; loop data length +48
882 00.00000670 ; modulation vars
883 00.00000670 0000 dc.w 0 ; speed+ 50
884 00.00000672 0000 dc.w 0 ; speed reset+52
885 00.00000674 0000 dc.w 0 ; rate up +54
886 00.00000676 0000 dc.w 0 ; rate down+56
887 00.00000678 0000 dc.w 0 ; start delay+58
888 00.0000067A 0000 dc.w 0 ; delay reset
889 00.0000067C
890 00.0000067C 0005 ch3fxvars dc.w 5 ; test disable+0
891 00.0000067E 0000 fxintc3: dc.w 0 ; interrupt counter+2
892 00.00000680 0000 dc.w 0 ; 1 = loop/one shot mode flag +4
893 00.00000682 0000 dc.w 0 ; current pitch+6
894 00.00000684 ; pbend vars
895 00.00000684 0000 dc.w 0 ; mode+8
896 00.00000686 0000 dc.w 0 ; rate +10
897 00.00000688 0000 dc.w 0 ; dest note +12
898 00.0000068A 0000 dc.w 0 ; start delay +14
899 00.0000068C 0000 dc.w 0 ; modulation flag 0/1+16
900 00.0000068E
901 00.0000068E 00000000 dc.l 0 ; env pointer +18
902 00.00000692 00000000 currfx3: dc.l 0 ; patt pointer+22
903 00.00000696 00000000 dc.l 0 ; curr song pointer+26
904 00.0000069A 00000000 dc.l 0 ; reset song pointer+30
905 00.0000069E 00000000 dc.l 0 ; reset env pointer+34
906 00.000006A2 ; section used to store current sound data
907 00.000006A2
908 00.000006A2 00000000 dc.l 0 ; one shot data address +38
909 00.000006A6 0000 dc.w 0 ; one shot data length +42
910 00.000006A8 00000000 dc.l 0 ; loop data address +44
911 00.000006AC 0000 dc.w 0 ; loop data length +48
912 00.000006AE ; modulation vars
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 17
913 00.000006AE 0000 dc.w 0 ; speed+ 50
914 00.000006B0 0000 dc.w 0 ; speed reset+52
915 00.000006B2 0000 dc.w 0 ; rate up +54
916 00.000006B4 0000 dc.w 0 ; rate down+56
917 00.000006B6 0000 dc.w 0 ; start delay+58
918 00.000006B8 0000 dc.w 0 ; delay reset
919 00.000006BA
920 00.000006BA
921 00.000006BA 0006 ch4fxvars dc.w 6 ; test disable+0
922 00.000006BC 0000 fxintc4: dc.w 0 ; interrupt counter+2
923 00.000006BE 0000 dc.w 0 ; 1 = loop/one shot mode flag +4
924 00.000006C0 0000 dc.w 0 ; current pitch+6
925 00.000006C2 ; pbend vars
926 00.000006C2 0000 dc.w 0 ; mode+8
927 00.000006C4 0000 dc.w 0 ; rate +10
928 00.000006C6 0000 dc.w 0 ; dest note +12
929 00.000006C8 0000 dc.w 0 ; start delay +14
930 00.000006CA 0000 dc.w 0 ; modulation flag 0/1+16
931 00.000006CC
932 00.000006CC 00000000 dc.l 0 ; env pointer +18
933 00.000006D0 00000000 currfx4: dc.l 0 ; patt pointer+22
934 00.000006D4 00000000 dc.l 0 ; curr song pointer+26
935 00.000006D8 00000000 dc.l 0 ; reset song pointer+30
936 00.000006DC 00000000 dc.l 0 ; reset env pointer+34
937 00.000006E0 ; section used to store current sound data
938 00.000006E0
939 00.000006E0 00000000 dc.l 0 ; one shot data address +38
940 00.000006E4 0000 dc.w 0 ; one shot data length +42
941 00.000006E6 00000000 dc.l 0 ; loop data address +44
942 00.000006EA 0000 dc.w 0 ; loop data length +48
943 00.000006EC ; modulation vars
944 00.000006EC 0000 dc.w 0 ; speed+ 50
945 00.000006EE 0000 dc.w 0 ; speed reset+52
946 00.000006F0 0000 dc.w 0 ; rate up +54
947 00.000006F2 0000 dc.w 0 ; rate down+56
948 00.000006F4 0000 dc.w 0 ; start delay+58
949 00.000006F6 0000 dc.w 0 ; delay reset
950 00.000006F8
951 00.000006F8
952 00.000006F8 00000000000000000000 dummy_reg dc.l 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
953 00.00000748 00000000000000000000 dc.l 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
954 00.00000798
955 00.00000798
956 00.00000798
957 00.00000798
958 00.00000798
959 00.00000798
960 00.00000798 0000000000000001 sstart: dc.l 0,end_song
961 00.000007A0
962 00.000007A0 0008 pstart: dc.w end_patt
963 00.000007A2
964 00.000007A2
965 00.000007A2 s1:
966 00.000007A2 000020E8000020E80000 dc.l pa33,pa33,pa33,pa33,pa33,pa33,pa33,pa33
967 00.000007C2 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31
968 00.000007E2 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa35
969 00.00000806 00002230000022300000 dc.l pa38,pa38,pa38,pa38,pa38,pa38,pa38,pa38
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 18
970 00.00000826 00002230000022300000 dc.l pa38,pa38,pa38,pa38,pa38,pa38,pa38,pa31a
971 00.00000846 00002230000022300000 dc.l pa38,pa38,pa38,pa38,pa38,pa38,pa38,pa38
972 00.00000866 000020AE00001F760000 dc.l pa31b,pa31,pa31b
973 00.00000872 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31
974 00.00000892 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa38,pa38,pa31a,pa34,pacr,pacr
975 00.000008BA 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31
976 00.000008DA 00002230000022300000 dc.l pa38,pa38,pa38,pa38,pa38,pa38,pa38,pa31a
977 00.000008FA 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31
978 00.0000091A 000020AE00001F760000 dc.l pa31b,pa31,pa31b
979 00.00000926 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31
980 00.00000946 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31a,pa34,pacr,pacr
981 00.0000096E 000020E8000020E80000 dc.l pa33,pa33,pa33,pa33,pa33,pa33,pa33,pa33
982 00.0000098E 0000217C0000217C0000 dc.l pa36,pa36,pa36,pa36,pa36,pa36,pa36,pa36
983 00.000009AE 0000217C0000217C0000 dc.l pa36,pa36,pa36,pa36,pa36,pa36,pa31b,pa31,pa31b
984 00.000009D2 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31
985 00.000009F2 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa35
986 00.00000A16 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31
987 00.00000A36 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31
988 00.00000A56 000020AE00001F760000 dc.l pa31b,pa31,pa31b
989 00.00000A62 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31
990 00.00000A82 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31a,pa34,pa34
991 00.00000AA6 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31
992 00.00000AC6 00001F7600001F760000 dc.l pa31,pa31,pa31,pa31,pa31,pa31,pa31,pa31a
993 00.00000AE6 00001F7600001F760000 dc.l pa31,pa31,pa31,pa37,pa31,pa31,pa31,pa31a
994 00.00000B06 00001F7600001F760000 dc.l pa31,pa31,pa37,pa31a,pa31,pa31,pa31a,par
995 00.00000B26 0000000000000001 dc.l 0,end_song
996 00.00000B2E s2:
997 00.00000B2E 0000105C0000105C0000 dc.l pa2,pa2,pa2,pa2,pa2,pa2
998 00.00000B46 0000105C0000105C0000 dc.l pa2,pa2,pa2,pa2,pa2,pa2
999 00.00000B5E 000011E2000011E20000 dc.l pa8,pa8,pa8,pa8,pa2,pa2,pa2,pa2
1000 00.00000B7E 000011E2000011E20000 dc.l pa8,pa8,pa8,pa8,pa12,pa12,pa12,pa12
1001 00.00000B9E 0000105C000010780000 dc.l pa2,pa2a,pa14,pa18,pa8,pa8a,pa14b
1002 00.00000BBA 00001342000013980000 dc.l pafa,pa15d,pa14a
1003 00.00000BC6 0000105C000010780000 dc.l pa2,pa2a,pa14,pa18,pa8,pa8a,pa14b
1004 00.00000BE2 00001342000013980000 dc.l pafa,pa15d,pa14a
1005 00.00000BEE 0000133E000013980000 dc.l paf,pa15d,pa15,pa2,pa15a,pafa
1006 00.00000C06 00001398000012B60000 dc.l pa15d,pa12a,pa15b
1007 00.00000C12 0000105C0000105C0000 dc.l pa2,pa2,pa2,pa2a,pa15c
1008 00.00000C26 00001488000013A60000 dc.l pa17,pa17c,pa2,pa2a,pa17a
1009 00.00000C3A 00001488000013A60000 dc.l pa17,pa17c,pa2,pa2a,pa17b
1010 00.00000C4E 0000133E000014E20000 dc.l paf,pa18,pa8a,pa18a,pafa,pa18,pa8b
1011 00.00000C6A 000013A60000105C0000 dc.l pa17c,pa2,para
1012 00.00000C76 0000105C000010780000 dc.l pa2,pa2a,pa14
1013 00.00000C82 000014E2000011E20000 dc.l pa18,pa8,pa8a,pa14b
1014 00.00000C92 00001342000013980000 dc.l pafa,pa15d,pa14a
1015 00.00000C9E 0000105C000010780000 dc.l pa2,pa2a,pa14,pa18,pa8,pa8a,pa14b
1016 00.00000CBA 00001342000013980000 dc.l pafa,pa15d,pa14a
1017 00.00000CC6 0000133E000013980000 dc.l paf,pa15d,pa15,pa2,pa15a,pafa
1018 00.00000CDE 00001398000012B60000 dc.l pa15d,pa12a,pa15b
1019 00.00000CEA 0000105C0000105C0000 dc.l pa2,pa2,pa2,pa2a,pa15c
1020 00.00000CFE 00001488000013A60000 dc.l pa17,pa17c,pa2,pa2a,pa17a
1021 00.00000D12 00001488000013A60000 dc.l pa17,pa17c,pa2,pa2a,pa17b
1022 00.00000D26 0000133E000014E20000 dc.l paf,pa18,pa8a,pa18a,pafa,pa18,pa8b
1023 00.00000D42 000013A60000105C0000 dc.l pa17c,pa2,para
1024 00.00000D4E 0000105C0000105C0000 dc.l pa2,pa2,pa2,pa2
1025 00.00000D5E 0000105C0000105C0000 dc.l pa2,pa2,pa2,pa2
1026 00.00000D6E 000015FE000016240000 dc.l pa21,pa22,pa21,pa23
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 19
1027 00.00000D7E 000015FE000016240000 dc.l pa21,pa22,pa21,pa24
1028 00.00000D8E 0000105C0000105C0000 dc.l pa2,pa2,pa2,pa2
1029 00.00000D9E 000011E2000011E20000 dc.l pa8,pa8,pa8,pa8,pa2,pa2,pa2,pa2
1030 00.00000DBE 000011E2000011E20000 dc.l pa8,pa8,pa8,pa8
1031 00.00000DCE 000012A6000012A60000 dc.l pa12,pa12,pa12,pa12
1032 00.00000DDE 0000182E dc.l pa27
1033 00.00000DE2 00001488000013A60000 dc.l pa17,pa17c,pa2,pa2a,pa17a
1034 00.00000DF6 00001488000013A60000 dc.l pa17,pa17c,pa2,pa2a,pa17b
1035 00.00000E0A 0000133E000014E20000 dc.l paf,pa18,pa8a,pa18a,pafa,pa18,pa8b
1036 00.00000E26 000013A60000105C0000 dc.l pa17c,pa2,para
1037 00.00000E32 00001488000013A60000 dc.l pa17,pa17c,pa2,pa2a,pa17a
1038 00.00000E46 00001488000013A60000 dc.l pa17,pa17c,pa2,pa2a,pa17b
1039 00.00000E5A 00001A40 dc.l pa28
1040 00.00000E5E 0000000000000001 dc.l 0,end_song
1041 00.00000E66 s3:
1042 00.00000E66 00000FF600000FF60000 dc.l pa1,pa1,pa1,pa1,pa4,pa7,pa5
1043 00.00000E82 00001174000011AE0000 dc.l pa6a,pa6,pa6a,pa7,pa9,pa5a
1044 00.00000E9A 00001174000011AE0000 dc.l pa6a,pa6,pa6a,pa10,pa11,pacr
1045 00.00000EB2 000013B2000013F40000 dc.l pa16,pa16a,pa16,pa16b
1046 00.00000EC2 0000152A000015780000 dc.l pa19,pa19c,pa19b,pa19d,pa19e,paqr
1047 00.00000EDA 000013B2000013F40000 dc.l pa16,pa16a,pa16,pa16b
1048 00.00000EEA 0000152A000015780000 dc.l pa19,pa19c,pa19b,pa19d,pa19e,paqr
1049 00.00000F02 00000FF600000FF60000 dc.l pa1,pa1,pa1,pa1
1050 00.00000F12 000016B60000108A0000 dc.l pa25,pa4,pa7,pa5,pa6a,pa6
1051 00.00000F2A 00001174000011C80000 dc.l pa6a,pa7,pa9,pa5a,pa6a
1052 00.00000F3E 000011AE000011740000 dc.l pa6,pa6a,pa10
1053 00.00000F4A 0000126800001056 dc.l pa11,paqr
1054 00.00000F52 0000176C dc.l pa26
1055 00.00000F56 0000152A000015780000 dc.l pa19,pa19c,pa19b,pa19d,pa19e
1056 00.00000F6A 0000152A000015780000 dc.l pa19b,pa19c,pa19b,pa19d,pa19e,paqr
1057 00.00000F82 00001CDE00001DA6 dc.l pa29,pa30
1058 00.00000F8A 0000000000000001 dc.l 0,end_song
1059 00.00000F92 s4:
1060 00.00000F92 0000152A dc.l pa19b
1061 00.00000F96 0000000000000001 dc.l 0,end_song
1062 00.00000F9E
1063 00.00000F9E
1064 00.00000F9E ; fx patterns
1065 00.00000F9E
1066 00.00000F9E fxp1:
1067 00.00000F9E 000C dc.w new_env
1068 00.00000FA0 00002552 dc.l snaree
1069 00.00000FA4 0004 dc.w new_snd
1070 00.00000FA6 0000238A dc.l snr1
1071 00.00000FAA 00DF000900DF000D00DF dc.w hi,9,hi,13,hi,11,hi,1,hi,12,hi,2,hi,2,hi,6,hi,7,hi,5,hi,4,hi,9,h
i,3
1072 00.00000FDE 0024 dc.w end_fx3
1073 00.00000FE0
1074 00.00000FE0
1075 00.00000FE0 ; speech patterns
1076 00.00000FE0
1077 00.00000FE0 spp1:
1078 00.00000FE0 000C dc.w new_env
1079 00.00000FE2 000025C2 dc.l speeche
1080 00.00000FE6 0004 dc.w new_snd
1081 00.00000FE8 00002408 dc.l becarefl
1082 00.00000FEC 01BE002001BE0020 dc.w lo,cr*2,lo,cr*2
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 20
1083 00.00000FF4 0028 dc.w end_fx4
1084 00.00000FF6
1085 00.00000FF6
1086 00.00000FF6
1087 00.00000FF6
1088 00.00000FF6
1089 00.00000FF6
1090 00.00000FF6
1091 00.00000FF6
1092 00.00000FF6
1093 00.00000FF6
1094 00.00000FF6
1095 00.00000FF6
1096 00.00000FF6
1097 00.00000FF6 pa1:
1098 00.00000FF6 000C dc.w new_env
1099 00.00000FF8 0000256A dc.l git2e
1100 00.00000FFC 0004 dc.w new_snd
1101 00.00000FFE 00002342 dc.l git2
1102 00.00001002 00FE0008008F0008007F dc.w A02,q,G03,q,A03,q,A02,q
1103 00.00001012 00AA0008008F000800FE dc.w E03,q,G03,q,A02,q,D03,q
1104 00.00001022 00AA000800FE000800D6 dc.w E03,q,A02,q,C03,q,D03,q
1105 00.00001032 00FE000800D6000800E2 dc.w A02,q,C03,q,B02,q,G02,q
1106 00.00001042 0008 dc.w END_PATT
1107 00.00001044 par:
1108 00.00001044 00200040 dc.w rest,cr*4
1109 00.00001048 0008 dc.w end_patt
1110 00.0000104A para:
1111 00.0000104A 00200038 dc.w rest,q*7
1112 00.0000104E 0008 dc.w end_patt
1113 00.00001050 pacr:
1114 00.00001050 00200010 dc.w rest,cr
1115 00.00001054 0008 dc.w end_patt
1116 00.00001056 paqr:
1117 00.00001056 00200008 dc.w rest,q
1118 00.0000105A 0008 dc.w end_patt
1119 00.0000105C pa2:
1120 00.0000105C 000C dc.w new_env
1121 00.0000105E 00002542 dc.l bas4e
1122 00.00001062 0004 dc.w new_snd
1123 00.00001064 0000230A dc.l bas4
1124 00.00001068 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1125 00.00001078 01FC000801FC000801FC pa2a: dc.w A01,q,A01,q,A01,q,A01,q
1126 00.00001088 0008 dc.w end_patt
1127 00.0000108A pa4:
1128 00.0000108A 000C dc.w new_env
1129 00.0000108C 0000256E dc.l git1e
1130 00.00001090 0004 dc.w new_snd
1131 00.00001092 00002350 dc.l git1
1132 00.00001096 00FE0018 dc.w A02,dcr
1133 00.0000109A 000C dc.w new_env
1134 00.0000109C 0000256A dc.l git2e
1135 00.000010A0 0004 dc.w new_snd
1136 00.000010A2 00002342 dc.l git2
1137 00.000010A6 00FE0008 dc.w A02,q
1138 00.000010AA 00AA0008008F000800FE dc.w E03,q,G03,q,A02,q,D03,q
1139 00.000010BA 00AA000800FE000800D6 dc.w E03,q,A02,q,C03,q,D03,q
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 21
1140 00.000010CA 0008 dc.w end_patt
1141 00.000010CC pa5:
1142 00.000010CC 000C dc.w new_env
1143 00.000010CE 0000256A dc.l git2e
1144 00.000010D2 0004 dc.w new_snd
1145 00.000010D4 00002342 dc.l git2
1146 00.000010D8 008F0008007F000800FE dc.w G03,q,A03,q,A02,q
1147 00.000010E4 00AA0008008F000800FE dc.w E03,q,G03,q,A02,q,D03,q
1148 00.000010F4 00AA000800FE000800D6 dc.w E03,q,A02,q,C03,q,D03,q
1149 00.00001104 000C dc.w new_env
1150 00.00001106 0000256E dc.l git1e
1151 00.0000110A 0004 dc.w new_snd
1152 00.0000110C 00002350 dc.l git1
1153 00.00001110 00FE000C00FE000C011D dc.w A02,dq,A02,dq,G02,cr
1154 00.0000111C 0008 dc.w end_patt
1155 00.0000111E
1156 00.0000111E pa5a:
1157 00.0000111E 000C dc.w new_env
1158 00.00001120 0000256A dc.l git2e
1159 00.00001124 0004 dc.w new_snd
1160 00.00001126 00002342 dc.l git2
1161 00.0000112A 00FE0008008F0008007F dc.w A02,q,G03,q,A03,q,A02,q
1162 00.0000113A 00AA0008008F000800FE dc.w E03,q,G03,q,A02,q,D03,q
1163 00.0000114A 00AA000800FE000800D6 dc.w E03,q,A02,q,C03,q,D03,q
1164 00.0000115A 000C dc.w new_env
1165 00.0000115C 0000256E dc.l git1e
1166 00.00001160 0004 dc.w new_snd
1167 00.00001162 00002350 dc.l git1
1168 00.00001166 00FE000C00FE000C011D dc.w A02,dq,A02,dq,G02,cr
1169 00.00001172 0008 dc.w end_patt
1170 00.00001174
1171 00.00001174 pa6a:
1172 00.00001174 000C dc.w new_env
1173 00.00001176 0000256A dc.l git2e
1174 00.0000117A 0004 dc.w new_snd
1175 00.0000117C 00002342 dc.l git2
1176 00.00001180 00970008008F0008011D dc.w Gb03,q,G03,q,G02,q
1177 00.0000118C 00AA000800970008011D dc.w E03,q,Gb03,q,G02,q,D03,q
1178 00.0000119C 00AA0008011D000800CA dc.w E03,q,G02,q,Db03,q,D03,q
1179 00.000011AC 0008 dc.w end_patt
1180 00.000011AE pa6:
1181 00.000011AE 000C dc.w new_env
1182 00.000011B0 0000256E dc.l git1e
1183 00.000011B4 0004 dc.w new_snd
1184 00.000011B6 00002350 dc.l git1
1185 00.000011BA 0140000C0140000C011D dc.w F02,dq,F02,dq,G02,cr
1186 00.000011C6 0008 dc.w end_patt
1187 00.000011C8 pa7:
1188 00.000011C8 000C dc.w new_env
1189 00.000011CA 0000256E dc.l git1e
1190 00.000011CE 0004 dc.w new_snd
1191 00.000011D0 00002350 dc.l git1
1192 00.000011D4 011D000C011D000C00FE dc.w G02,dq,G02,dq,A02,cr
1193 00.000011E0 0008 dc.w end_patt
1194 00.000011E2 pa8:
1195 00.000011E2 023A0008023A0008 dc.w G01,q,G01,q
1196 00.000011EA pa8b:
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 22
1197 00.000011EA 023A0008023A0008 dc.w G01,q,G01,q
1198 00.000011F2 pa8a:
1199 00.000011F2 023A0008023A0008023A dc.w G01,q,G01,q,G01,q,G01,q
1200 00.00001202 0008 dc.w end_patt
1201 00.00001204 pa9:
1202 00.00001204 000C dc.w new_env
1203 00.00001206 0000256A dc.l git2e
1204 00.0000120A 0004 dc.w new_snd
1205 00.0000120C 00002342 dc.l git2
1206 00.00001210 008F0008007F000800FE dc.w g03,q,A03,q,A02,q
1207 00.0000121C 00AA0008008F000800FE dc.w E03,q,G03,q,A02,q,D03,q
1208 00.0000122C 00AA000800FE000800D6 dc.w E03,q,A02,q,C03,q,D03,q
1209 00.0000123C 00FE000800D6000800E2 dc.w A02,q,C03,q,B02,q,G03,q
1210 00.0000124C 0008 dc.w end_patt
1211 00.0000124E pa10:
1212 00.0000124E 000C dc.w new_env
1213 00.00001250 0000256E dc.l git1e
1214 00.00001254 0004 dc.w new_snd
1215 00.00001256 00002350 dc.l git1
1216 00.0000125A 011D000C011D000C0020 dc.w G02,dq,G02,dq,rest,q
1217 00.00001266 0008 dc.w end_patt
1218 00.00001268 pa11:
1219 00.00001268 000C dc.w new_env
1220 00.0000126A 0000256E dc.l git1e
1221 00.0000126E 0004 dc.w new_snd
1222 00.00001270 00002350 dc.l git1
1223 00.00001274 01530008002000280153 dc.w E02,q,rest,q*5,E02,q,E02,q
1224 00.00001284 00200048 dc.w rest,q*9
1225 00.00001288 01530008002000100153 dc.w E02,q,rest,cr,E02,q,rest,dcr
1226 00.00001298 01530010002000080153 dc.w E02,cr,rest,q,E02,dcr
1227 00.000012A4 0008 dc.w end_patt
1228 00.000012A6 pa12:
1229 00.000012A6 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1230 00.000012B6 pa12a:
1231 00.000012B6 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1232 00.000012C6 0008 dc.w end_patt
1233 00.000012C8 pa14:
1234 00.000012C8 01FC000801E0000801AC dc.w A01,q,Bb01,q,C02,q
1235 00.000012D4 01E00010 dc.w Bb01,cr
1236 00.000012D8 01E0000801E0000801E0 dc.w Bb01,q,Bb01,q,Bb01,q
1237 00.000012E4 01E0000801E0000801E0 dc.w Bb01,q,Bb01,q,Bb01,q,Bb01,q
1238 00.000012F4 01E0000801E0000801E0 dc.w Bb01,q,Bb01,q,Bb01,q,Bb01,q
1239 00.00001304 01E0000801FC00080280 dc.w Bb01,q,A01,q,F01,q
1240 00.00001310 0008 dc.w end_patt
1241 00.00001312 pa14b:
1242 00.00001312 01FC000801E00008 dc.w A01,q,Bb01,q
1243 00.0000131A 02800010 dc.w F01,cr
1244 00.0000131E 0008 dc.w end_patt
1245 00.00001320 pa14a:
1246 00.00001320 02A6000802800008023A dc.w E01,q,F01,q,G01,q,D02,q
1247 00.00001330 01AC000801C50008023A dc.w C02,q,B01,q,G01,q
1248 00.0000133C 0008 dc.w end_patt
1249 00.0000133E paf:
1250 00.0000133E 02800008 dc.w F01,q
1251 00.00001342 pafa:
1252 00.00001342 02800008 dc.w F01,q
1253 00.00001346 02800008028000080280 dc.w F01,q,F01,q,F01,q,F01,q,F01,q
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 23
1254 00.0000135A 0008 dc.w end_patt
1255 00.0000135C pa15:
1256 00.0000135C 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1257 00.0000136C 02800008023A0008 dc.w F01,q,G01,q
1258 00.00001374 01FC0010 dc.w A01,cr
1259 00.00001378 01FC0008 dc.w A01,q
1260 00.0000137C 0008 dc.w end_patt
1261 00.0000137E pa15a:
1262 00.0000137E 0153000801FC000801AC dc.w E02,q,A01,q,C02,q,B01,q
1263 00.0000138E 023A0008 dc.w G01,q
1264 00.00001392 02800010 dc.w F01,cr
1265 00.00001396 0008 dc.w end_patt
1266 00.00001398 pa15d:
1267 00.00001398 02A60010 dc.w E01,cr
1268 00.0000139C 0008 dc.w end_patt
1269 00.0000139E pa15b:
1270 00.0000139E 02800008023A0008 dc.w F01,q,G01,q
1271 00.000013A6 pa17c:
1272 00.000013A6 01FC0010 dc.w A01,cr
1273 00.000013AA 0008 dc.w end_patt
1274 00.000013AC pa15c:
1275 00.000013AC 01AC0018 dc.w C02,q*3
1276 00.000013B0 0008 dc.w end_patt
1277 00.000013B2 pa16:
1278 00.000013B2 000C dc.w new_env
1279 00.000013B4 00002556 dc.l orglp2e
1280 00.000013B8 0004 dc.w new_snd
1281 00.000013BA 000023D0 dc.l orglp2
1282 00.000013BE 00AA006800BE0008011D dc.w E03,q*13,D03,q,G02,q,E03,cr*2
1283 00.000013CE 00BE006800AA001800BE dc.w D03,q*13,E03,dcr,D03,dcr,F03,q*7
1284 00.000013DE 008F000800A0000800AA dc.w G03,q,F03,q,E03,cr*3,D03,q,C03,q
1285 00.000013F2 0008 dc.w end_patt
1286 00.000013F4 pa16a:
1287 00.000013F4 00E20048 dc.w B02,q*9
1288 00.000013F8 0008 dc.w end_patt
1289 00.000013FA pa16b:
1290 00.000013FA 00E20010 dc.w B02,cr
1291 00.000013FE 000C dc.w new_env
1292 00.00001400 0000255A dc.l orglp1e
1293 00.00001404 0004 dc.w new_snd
1294 00.00001406 000023DE dc.l orglp1
1295 00.0000140A 001400010001 dc.w modon,1,1
1296 00.00001410 0005000500100010 dc.w 5,5,16,16
1297 00.00001418 01C5000801AC0008017D dc.w B01,q,C02,q,D02,q,E02,q
1298 00.00001428 017D000801AC000801FC dc.w D02,q,C02,q,A01,cr*3,G01,q,E01,q
1299 00.0000143C 01C5003001AC0008017D dc.w B01,cr*3,C02,q,D02,q,C02,cr*3
1300 00.0000144C 01C5001002A60040 dc.w B01,cr,E01,q*8
1301 00.00001454 01FC0030023A000802A6 dc.w A01,cr*3,G01,q,E01,q
1302 00.00001460 01C5003001AC0008017D dc.w B01,cr*3,C02,q,D02,q,C02,cr
1303 00.00001470 01C5001001FC005001AC dc.w B01,cr,A01,cr*5,C02,q,E02,q
1304 00.00001480 00FE0080 dc.w A02,q*16
1305 00.00001484 001C dc.w modoff
1306 00.00001486 0008 dc.w end_patt
1307 00.00001488 pa17:
1308 00.00001488 017D0008017D0008017D dc.w D02,q,D02,q,D02,q,D02,q
1309 00.00001498 017D0008017D0008017D dc.w D02,q,D02,q,D02,q,D02,q
1310 00.000014A8 017D0008017D0008017D dc.w D02,q,D02,q,D02,q,D02,q
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 24
1311 00.000014B8 017D000801530008017D dc.w D02,q,E02,q,D02,q
1312 00.000014C4 0008 dc.w end_patt
1313 00.000014C6 pa17a:
1314 00.000014C6 0153000801C5000801AC dc.w E02,q,B01,q,C02,q
1315 00.000014D2 0008 dc.w end_patt
1316 00.000014D4 pa17b:
1317 00.000014D4 01AC000801C50008023A dc.w C02,q,B01,q,G01,q
1318 00.000014E0 0008 dc.w end_patt
1319 00.000014E2 pa18:
1320 00.000014E2 023A0010 dc.w G01,cr
1321 00.000014E6 0008 dc.w end_patt
1322 00.000014E8 pa18a:
1323 00.000014E8 023A0008023A0008 dc.w G01,q,G01,q
1324 00.000014F0 02A60010 dc.w E01,cr
1325 00.000014F4 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1326 00.00001504 023A000802800008 dc.w G01,q,F01,q
1327 00.0000150C 02A60010 dc.w E01,cr
1328 00.00001510 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1329 00.00001520 023A001002800010 dc.w G01,cr,F01,cr
1330 00.00001528 0008 dc.w end_patt
1331 00.0000152A pa19:
1332 00.0000152A pa19b:
1333 00.0000152A 000C dc.w new_env
1334 00.0000152C 000025BE dc.l strlp1e
1335 00.00001530 0004 dc.w new_snd
1336 00.00001532 000023EC dc.l synlp2
1337 00.00001536 01FC0008017D000801FC dc.w A01,q,D02,q,A01,q,E02,q
1338 00.00001546 01FC00080140000801FC dc.w A01,q,F02,q,A01,q,G02,q
1339 00.00001556 01FC000800FE000801FC dc.w A01,q,A02,q,A01,q,B02,q,A01,q
1340 00.0000156A 00D6000800BE001000D6 dc.w C03,q,D03,cr,C03,cr*3
1341 00.00001576 0008 dc.w end_patt
1342 00.00001578 pa19c:
1343 00.00001578 00E2000800FE000802A6 dc.w B02,q,A02,q,E01,cr*4
1344 00.00001584 0008 dc.w end_patt
1345 00.00001586 pa19d:
1346 00.00001586 00E20008011D000800FE dc.w B02,q,G02,q,A02,cr*3
1347 00.00001592 0008 dc.w end_patt
1348 00.00001594 pa19e:
1349 00.00001594 000C dc.w new_env
1350 00.00001596 000025BE dc.l strlp1e
1351 00.0000159A 0004 dc.w new_snd
1352 00.0000159C 000023FA dc.l strlp1
1353 00.000015A0 01C5000801AC000801C5 dc.w B01,q,C02,q,B01,q*5
1354 00.000015AC 01FC000801C5000801AC dc.w A01,q,B01,q,C02,q,D02,cr*3
1355 00.000015BC 01AC000801C500080153 dc.w C02,q,B01,q,E02,cr*7
1356 00.000015C8 000C dc.w new_env
1357 00.000015CA 000025BE dc.l strlp1e
1358 00.000015CE 0004 dc.w new_snd
1359 00.000015D0 000023FA dc.l strlp1
1360 00.000015D4 017D000801AC000801C5 dc.w D02,q,C02,q,B01,q*5
1361 00.000015E0 01FC000801C5000801AC dc.w A01,q,B01,q,C02,q,B01,cr*3
1362 00.000015F0 023A001001FC00580020 dc.w G01,cr,A01,q*11,rest,q*5
1363 00.000015FC 0008 dc.w end_patt
1364 00.000015FE pa21: ;bas4 2 bars
1365 00.000015FE 02800010002000080280 dc.w F01,cr,rest,q,F01,q
1366 00.0000160A 02800020 dc.w F01,m
1367 00.0000160E 02800008028000080020 dc.w F01,q,F01,q,rest,q,F01,q
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 25
1368 00.0000161E 02800020 dc.w F01,m
1369 00.00001622 0008 dc.w end_patt
1370 00.00001624 pa22: ;bas4 2 bars
1371 00.00001624 02A600100020000802A6 dc.w E01,cr,rest,q,E01,q
1372 00.00001630 02A60020 dc.w E01,m
1373 00.00001634 02A6000802A600080020 dc.w E01,q,E01,q,rest,q,E01,q
1374 00.00001644 02A60020 dc.w E01,m
1375 00.00001648 0008 dc.w end_patt
1376 00.0000164A pa23: ;bas4 2 bars
1377 00.0000164A 02A600100020000802A6 dc.w E01,cr,rest,q,E01,q
1378 00.00001656 02A60020 dc.w E01,m
1379 00.0000165A 02A6000802A600080020 dc.w E01,q,E01,q,rest,q,E01,q
1380 00.0000166A 023A001001FC0010 dc.w G01,cr,A01,cr
1381 00.00001672 0008 dc.w end_patt
1382 00.00001674
1383 00.00001674 pa24: ;bas4 2 bars
1384 00.00001674 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1385 00.00001684 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1386 00.00001694 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1387 00.000016A4 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1388 00.000016B4 0008 dc.w end_patt
1389 00.000016B6 pa25:
1390 00.000016B6 000C dc.w new_env
1391 00.000016B8 0000254E dc.l flulp2e
1392 00.000016BC 0004 dc.w new_snd
1393 00.000016BE 000023C2 dc.l flulp2
1394 00.000016C2 001400010001 dc.w modon,1,1
1395 00.000016C8 0005000500100010 dc.w 5,5,16,16
1396 00.000016D0 017D003001AC0010017D dc.w D02,cr*3,C02,cr,D02,q*3,E02,q*3
1397 00.000016E0 01AC0010017D00180153 dc.w C02,cr,D02,q*3,E02,cr*5,G01,q
1398 00.000016F0 01FC000801AC0008 dc.w A01,q,C02,q
1399 00.000016F8 017D003001AC0010017D dc.w D02,cr*3,C02,cr,D02,q*3,E02,q*3
1400 00.00001708 01AC0010017D001801AC dc.w C02,cr,D02,q*3,C02,q*3,G01,q*7
1401 00.00001718 023A000801FC000801AC dc.w G01,q,A01,q,C02,q
1402 00.00001724 017D003001AC0010017D dc.w D02,cr*3,C02,cr,D02,q*3,E02,q*3
1403 00.00001734 01AC0010017D00180153 dc.w C02,cr,D02,q*3,E02,cr*5,C02,q
1404 00.00001744 017D0008015300080140 dc.w D02,q,E02,q,F02,cr*4,G02,cr*2,A02,cr*2
1405 00.00001758 010D002801530008010D dc.w AB02,q*5,E02,q,AB02,q,B02,q*9
1406 00.00001768 001C dc.w modoff
1407 00.0000176A 0008 dc.w end_patt
1408 00.0000176C pa26:
1409 00.0000176C 000C dc.w new_env
1410 00.0000176E 0000254E dc.l flulp2e
1411 00.00001772 0004 dc.w new_snd
1412 00.00001774 000023C2 dc.l flulp2
1413 00.00001778 001400010001 dc.w modon,1,1
1414 00.0000177E 0005000500100010 dc.w 5,5,16,16
1415 00.00001786 00FE0030011D00080153 dc.w A02,cr*3,G02,q,E02,q
1416 00.00001792 00E2003000D6000800BE dc.w B02,cr*3,C03,q,D03,q,C03,cr*3
1417 00.000017A2 00E2001001530040 dc.w B02,cr,E02,q*8
1418 00.000017AA 00FE0030011D00080153 dc.w A02,cr*3,G02,q,E02,q
1419 00.000017B6 00E2003000D6000800BE dc.w B02,cr*3,C03,q,D03,q,E03,cr*3
1420 00.000017C6 008F00100097001000BE dc.w G03,cr,GB03,cr,D03,q,E03,q*5
1421 00.000017D6 00FE0030011D00080153 dc.w A02,cr*3,G02,q,E02,q
1422 00.000017E2 00E2003000D6000800BE dc.w B02,cr*3,C03,q,D03,q,C03,cr*3
1423 00.000017F2 00E2001001530040 dc.w B02,cr,E02,q*8
1424 00.000017FA 00FE0030011D00080153 dc.w A02,cr*3,G02,q,E02,q
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 26
1425 00.00001806 00E2003000D6000800BE dc.w B02,cr*3,C03,q,D03,q,C03,cr
1426 00.00001816 00E2001000FE005000D6 dc.w B02,cr,A02,cr*5,C03,q,E03,q
1427 00.00001826 007F0080 dc.w A03,q*16
1428 00.0000182A 001C dc.w modoff
1429 00.0000182C 0008 dc.w end_patt
1430 00.0000182E pa27:
1431 00.0000182E 0280000802800008 dc.w F01,q,F01,q
1432 00.00001836 02800008028000080280 dc.w F01,q,F01,q,F01,q,F01,q,F01,q
1433 00.0000184A 02A60010 dc.w E01,cr
1434 00.0000184E 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1435 00.0000185E 02800008023A0008 dc.w F01,q,G01,q
1436 00.00001866 01FC0010 dc.w A01,cr
1437 00.0000186A 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q,A01,q
1438 00.0000187E 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1439 00.0000188E 0153000801FC000801AC dc.w E02,q,A01,q,C02,q,B01,q
1440 00.0000189E 023A0008 dc.w G01,q
1441 00.000018A2 02800010 dc.w F01,cr
1442 00.000018A6 02800008028000080280 dc.w F01,q,F01,q,F01,q,F01,q,F01,q,F01,q
1443 00.000018BE 02A60010 dc.w E01,cr
1444 00.000018C2 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1445 00.000018D2 02800008023A0008 dc.w F01,q,G01,q
1446 00.000018DA 01FC0010 dc.w A01,cr
1447 00.000018DE 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q,A01,q
1448 00.000018F2 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1449 00.00001902 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1450 00.00001912 01FC000801FC0008 dc.w A01,q,A01,q
1451 00.0000191A 0280000802800008 dc.w F01,q,F01,q
1452 00.00001922 02800008028000080280 dc.w F01,q,F01,q,F01,q,F01,q,F01,q
1453 00.00001936 02A60010 dc.w E01,cr
1454 00.0000193A 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1455 00.0000194A 02800008023A0008 dc.w F01,q,G01,q
1456 00.00001952 01FC0010 dc.w A01,cr
1457 00.00001956 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q,A01,q
1458 00.0000196A 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1459 00.0000197A 0153000801FC000801AC dc.w E02,q,A01,q,C02,q,B01,q
1460 00.0000198A 023A0008 dc.w G01,q
1461 00.0000198E 02800010 dc.w F01,cr
1462 00.00001992 02800008028000080280 dc.w F01,q,F01,q,F01,q,F01,q,F01,q,F01,q
1463 00.000019AA 02A60010 dc.w E01,cr
1464 00.000019AE 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1465 00.000019BE 02800008023A0008 dc.w F01,q,G01,q
1466 00.000019C6 01FC0010 dc.w A01,cr
1467 00.000019CA 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q,A01,q
1468 00.000019DE 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1469 00.000019EE 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1470 00.000019FE 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1471 00.00001A0E 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1472 00.00001A1E 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1473 00.00001A2E 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q
1474 00.00001A3A 01AC0018 dc.w C02,q*3
1475 00.00001A3E 0008 dc.w end_patt
1476 00.00001A40 pa28:
1477 00.00001A40 02800008028000080280 dc.w F01,q,F01,q,F01,q,F01,q
1478 00.00001A50 02800008028000080280 dc.w F01,q,F01,q,F01,q
1479 00.00001A5C 023A0010 dc.w G01,cr
1480 00.00001A60 023A0008023A0008023A dc.w G01,q,G01,q,G01,q,G01,q
1481 00.00001A70 023A0008023A0008 dc.w G01,q,G01,q
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 27
1482 00.00001A78 02A60010 dc.w E01,cr
1483 00.00001A7C 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1484 00.00001A8C 023A000802800008 dc.w G01,q,F01,q
1485 00.00001A94 02A60010 dc.w E01,cr
1486 00.00001A98 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1487 00.00001AA8 023A001002800010 dc.w G01,cr,F01,cr
1488 00.00001AB0 02800008028000080280 dc.w F01,q,F01,q,F01,q
1489 00.00001ABC 02800008028000080280 dc.w F01,q,F01,q,F01,q
1490 00.00001AC8 023A0010 dc.w G01,cr
1491 00.00001ACC 023A0008023A0008023A dc.w G01,q,G01,q,G01,q,G01,q
1492 00.00001ADC 02A60008023A0008 dc.w E01,q,G01,q
1493 00.00001AE4 01FC0010 dc.w A01,cr
1494 00.00001AE8 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1495 00.00001AF8 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1496 00.00001B08 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1497 00.00001B18 01FC000801FC00080280 dc.w A01,q,A01,q,F01,cr
1498 00.00001B24 02800008028000080280 dc.w F01,q,F01,q,F01,q
1499 00.00001B30 02800008028000080280 dc.w F01,q,F01,q,F01,q
1500 00.00001B3C 02A60010 dc.w E01,cr
1501 00.00001B40 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1502 00.00001B50 02800008023A0008 dc.w F01,q,G01,q
1503 00.00001B58 01FC0010 dc.w A01,cr
1504 00.00001B5C 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1505 00.00001B6C 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1506 00.00001B7C 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1507 00.00001B8C 01C5000801AC00080280 dc.w B01,q,C02,q,F01,cr
1508 00.00001B98 02800008028000080280 dc.w F01,q,F01,q,F01,q
1509 00.00001BA4 02800008028000080280 dc.w F01,q,F01,q,F01,q
1510 00.00001BB0 02A60010 dc.w E01,cr
1511 00.00001BB4 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1512 00.00001BC4 02800008023A0008 dc.w F01,q,G01,q
1513 00.00001BCC 01FC0010 dc.w A01,cr
1514 00.00001BD0 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1515 00.00001BE0 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1516 00.00001BF0 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1517 00.00001C00 01C5000801AC00080280 dc.w B01,q,C02,q,F01,cr
1518 00.00001C0C 02800008028000080280 dc.w F01,q,F01,q,F01,q
1519 00.00001C18 02800008028000080280 dc.w F01,q,F01,q,F01,q
1520 00.00001C24 02A60010 dc.w E01,cr
1521 00.00001C28 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1522 00.00001C38 02800008023A0008 dc.w F01,q,G01,q
1523 00.00001C40 01FC0010 dc.w A01,cr
1524 00.00001C44 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1525 00.00001C54 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1526 00.00001C64 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1527 00.00001C74 01C50008035800080280 dc.w B01,q,C01,q,F01,cr
1528 00.00001C80 02800008028000080280 dc.w F01,q,F01,q,F01,q
1529 00.00001C8C 02800008028000080280 dc.w F01,q,F01,q,F01,q
1530 00.00001C98 02A60010 dc.w E01,cr
1531 00.00001C9C 02A6000802A6000802A6 dc.w E01,q,E01,q,E01,q,E01,q
1532 00.00001CAC 02800008023A0008 dc.w F01,q,G01,q
1533 00.00001CB4 01FC0010 dc.w A01,cr
1534 00.00001CB8 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1535 00.00001CC8 01FC000801FC000801FC dc.w A01,q,A01,q,A01,q,A01,q
1536 00.00001CD8 00200038 dc.w rest,q*7
1537 00.00001CDC 0008 dc.w end_patt
1538 00.00001CDE pa29:
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 28
1539 00.00001CDE 000C dc.w new_env
1540 00.00001CE0 000025BE dc.l strlp1e
1541 00.00001CE4 0004 dc.w new_snd
1542 00.00001CE6 000023FA dc.l strlp1
1543 00.00001CEA 001400010001 dc.w modon,1,1
1544 00.00001CF0 0005000500100010 dc.w 5,5,16,16
1545 00.00001CF8 00200028011D00080153 dc.w rest,q*5,G02,q,E02,q,D02,q*3
1546 00.00001D08 0153000801AC0018017D dc.w E02,q,C02,q*3,D02,q,C02,cr
1547 00.00001D18 01C5000801FC0030 dc.w B01,q,A01,cr*3
1548 00.00001D20 02A60004023A000401FC dc.w E01,sq,G01,sq,A01,sq,G01,sq
1549 00.00001D30 01FC000401C5000401FC dc.w A01,sq,B01,sq,A01,sq,B01,sq
1550 00.00001D40 01AC000401C5000401AC dc.w C02,sq,B01,sq,C02,sq,D02,sq
1551 00.00001D50 01AC0004017D00040153 dc.w C02,sq,D02,sq,E02,sq,D02,sq
1552 00.00001D60 01530018017D000401AC dc.w E02,q*3,D02,sq,C02,sq,A01,q*3
1553 00.00001D70 0153000801530018017D dc.w E02,q,E02,q*3,D02,sq,C02,sq
1554 00.00001D80 00FE0010011D000800FE dc.w A02,cr,G02,q,A02,cr*5,B02,q
1555 00.00001D90 00D6000800BE001000D6 dc.w C03,q,D03,cr,C03,q,B02,q,A02,q
1556 00.00001DA4 0008 dc.w end_patt
1557 00.00001DA6 pa30:
1558 00.00001DA6 000C dc.w new_env
1559 00.00001DA8 000025BE dc.l strlp1e
1560 00.00001DAC 0004 dc.w new_snd
1561 00.00001DAE 000023FA dc.l strlp1
1562 00.00001DB2 01530004017D000401AC dc.w E02,sq,D02,sq,C02,sq,A01,sq
1563 00.00001DC2 01530004017D000401AC dc.w E02,sq,D02,sq,C02,sq,A01,sq
1564 00.00001DD2 01530004017D000401AC dc.w E02,sq,D02,sq,C02,sq,A01,sq
1565 00.00001DE2 01530004017D000401AC dc.w E02,sq,D02,sq,C02,sq,A01,sq
1566 00.00001DF2
1567 00.00001DF2 017D000401AC000401C5 dc.w D02,sq,C02,sq,B01,sq,A01,sq
1568 00.00001E02 01530004017D000401AC dc.w E02,sq,D02,sq,C02,sq,A01,sq
1569 00.00001E12 017D000401AC000401C5 dc.w D02,sq,C02,sq,B01,sq,A01,sq
1570 00.00001E22 01AC000401C5000401FC dc.w C02,sq,B01,sq,A01,sq,G01,sq
1571 00.00001E32
1572 00.00001E32 01FC000401C5000401AC dc.w A01,sq,B01,sq,C02,sq,D02,q
1573 00.00001E42 01AC000401C5000401FC dc.w C02,sq,B01,sq,A01,sq
1574 00.00001E4E 01AC000401C5000401FC dc.w C02,sq,B01,sq,A01,sq,G01,sq
1575 00.00001E5E 01C50004023A000401FC dc.w B01,sq,G01,sq,A01,sq,F01,sq
1576 00.00001E6E
1577 00.00001E6E 02A6000401FC0004023A dc.w E01,sq,A01,sq,G01,sq,E01,sq
1578 00.00001E7E 023A000402A6000402FA dc.w G01,sq,E01,sq,D01,sq,E01,sq
1579 00.00001E8E 0358000402FA00040358 dc.w C01,sq,D01,sq,C01,sq,D01,sq
1580 00.00001E9E 03580004038A00040358 dc.w C01,sq,B00,sq,C01,sq,D01,sq
1581 00.00001EAE
1582 00.00001EAE 02A6000402FA00040358 dc.w E01,sq,D01,sq,C01,sq,B00,sq
1583 00.00001EBE 0358000402FA00040358 dc.w C01,sq,D01,sq,C01,sq,D01,sq
1584 00.00001ECE 02A6000402FA00040358 dc.w E01,sq,D01,sq,C01,sq,E01,sq
1585 00.00001EDE 02FA00040358000402FA dc.w D01,sq,C01,sq,D01,sq,E01,sq
1586 00.00001EEE
1587 00.00001EEE 023A000401FC000401AC dc.w G01,sq,A01,sq,C02,sq,A01,sq
1588 00.00001EFE 0153000400FE0004011D dc.w E02,sq,A02,sq,G02,sq,E02,sq
1589 00.00001F0E 011D000401530004017D dc.w G02,sq,E02,sq,D02,sq,E02,sq
1590 00.00001F1E 017D000401AC0004017D dc.w D02,sq,C02,sq,D02,sq,E02,sq
1591 00.00001F2E
1592 00.00001F2E 011D000401530004011D dc.w G02,sq,E02,sq,G02,sq,A02,sq
1593 00.00001F3E 011D000400FE000400D6 dc.w G02,sq,A02,sq,C03,sq,A02,sq
1594 00.00001F4E 00D6000400BE000400D6 dc.w C03,sq,D03,sq,C03,sq,D03,sq
1595 00.00001F5E 00AA000400BE000400AA dc.w E03,sq,D03,sq,E03,sq,G03,sq
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 29
1596 00.00001F6E 007F0040 dc.w A03,cr*4
1597 00.00001F72 001C dc.w modoff
1598 00.00001F74 0008 dc.w end_patt
1599 00.00001F76
1600 00.00001F76
1601 00.00001F76 pa31: ;drum p
1602 00.00001F76 000C dc.w new_env
1603 00.00001F78 0000252E dc.l kicke
1604 00.00001F7C 0004 dc.w new_snd
1605 00.00001F7E 0000237C dc.l kik1
1606 00.00001F82 00DF0010 dc.w hi,cr
1607 00.00001F86 000C dc.w new_env
1608 00.00001F88 00002552 dc.l snaree
1609 00.00001F8C 0004 dc.w new_snd
1610 00.00001F8E 0000238A dc.l snr1
1611 00.00001F92 00DF0010 dc.w hi,cr
1612 00.00001F96 000C dc.w new_env
1613 00.00001F98 0000252E dc.l kicke
1614 00.00001F9C 0004 dc.w new_snd
1615 00.00001F9E 0000237C dc.l kik1
1616 00.00001FA2 00DF000800DF0008 dc.w hi,q,hi,q
1617 00.00001FAA 000C dc.w new_env
1618 00.00001FAC 00002552 dc.l snaree
1619 00.00001FB0 0004 dc.w new_snd
1620 00.00001FB2 0000238A dc.l snr1
1621 00.00001FB6 00DF0008 dc.w hi,q
1622 00.00001FBA 000C dc.w new_env
1623 00.00001FBC 0000252E dc.l kicke
1624 00.00001FC0 0004 dc.w new_snd
1625 00.00001FC2 0000237C dc.l kik1
1626 00.00001FC6 00DF0008 dc.w hi,q
1627 00.00001FCA 0008 dc.w end_patt
1628 00.00001FCC pa35:
1629 00.00001FCC 000C dc.w new_env
1630 00.00001FCE 0000252E dc.l kicke
1631 00.00001FD2 0004 dc.w new_snd
1632 00.00001FD4 0000237C dc.l kik1
1633 00.00001FD8 00DF000800DF0010 dc.w hi,q,hi,q*2
1634 00.00001FE0 00DF0008 dc.w hi,q
1635 00.00001FE4 000C dc.w new_env
1636 00.00001FE6 00002552 dc.l snaree
1637 00.00001FEA 0004 dc.w new_snd
1638 00.00001FEC 0000238A dc.l snr1
1639 00.00001FF0 00DF0010 dc.w hi,cr
1640 00.00001FF4 000C dc.w new_env
1641 00.00001FF6 0000252E dc.l kicke
1642 00.00001FFA 0004 dc.w new_snd
1643 00.00001FFC 0000237C dc.l kik1
1644 00.00002000 00DF000800DF0010 dc.w hi,q,hi,q*2
1645 00.00002008 000C dc.w new_env
1646 00.0000200A 00002552 dc.l snaree
1647 00.0000200E 0004 dc.w new_snd
1648 00.00002010 0000238A dc.l snr1
1649 00.00002014 00DF001000DF0018 dc.w hi,cr,hi,cr+q
1650 00.0000201C 000C dc.w new_env
1651 00.0000201E 0000252E dc.l kicke
1652 00.00002022 0004 dc.w new_snd
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 30
1653 00.00002024 0000237C dc.l kik1
1654 00.00002028 00DF000800DF0010 dc.w hi,q,hi,cr
1655 00.00002030 000C dc.w new_env
1656 00.00002032 00002552 dc.l snaree
1657 00.00002036 0004 dc.w new_snd
1658 00.00002038 0000238A dc.l snr1
1659 00.0000203C 00DF0018 dc.w hi,cr+q
1660 00.00002040 000C dc.w new_env
1661 00.00002042 0000252E dc.l kicke
1662 00.00002046 0004 dc.w new_snd
1663 00.00002048 0000237C dc.l kik1
1664 00.0000204C 00DF000800DF0018 dc.w hi,q,hi,q*3
1665 00.00002054 00DF0010 dc.w hi,cr
1666 00.00002058 00DF000800DF0010 dc.w hi,q,hi,cr
1667 00.00002060 000C dc.w new_env
1668 00.00002062 00002552 dc.l snaree
1669 00.00002066 0004 dc.w new_snd
1670 00.00002068 0000238A dc.l snr1
1671 00.0000206C 00DF000800DF000800DF dc.w hi,q,hi,q,hi,q
1672 00.00002078 0008 dc.w end_patt
1673 00.0000207A
1674 00.0000207A pa31a: ;drum fill
1675 00.0000207A 000C dc.w new_env
1676 00.0000207C 0000252E dc.l kicke
1677 00.00002080 0004 dc.w new_snd
1678 00.00002082 0000237C dc.l kik1
1679 00.00002086 00DF0008 dc.w hi,q
1680 00.0000208A 000C dc.w new_env
1681 00.0000208C 00002552 dc.l snaree
1682 00.00002090 0004 dc.w new_snd
1683 00.00002092 0000238A dc.l snr1
1684 00.00002096 00DF000800DF0008 dc.w hi,q,hi,q
1685 00.0000209E 000C dc.w new_env
1686 00.000020A0 0000252E dc.l kicke
1687 00.000020A4 0004 dc.w new_snd
1688 00.000020A6 0000237C dc.l kik1
1689 00.000020AA 00DF0008 dc.w hi,q
1690 00.000020AE 000C pa31b: dc.w new_env
1691 00.000020B0 00002552 dc.l snaree
1692 00.000020B4 0004 dc.w new_snd
1693 00.000020B6 0000238A dc.l snr1
1694 00.000020BA 00DF0008 dc.w hi,q
1695 00.000020BE 000C dc.w new_env
1696 00.000020C0 0000252E dc.l kicke
1697 00.000020C4 0004 dc.w new_snd
1698 00.000020C6 0000237C dc.l kik1
1699 00.000020CA 00DF0008 dc.w hi,q
1700 00.000020CE 000C dc.w new_env
1701 00.000020D0 00002552 dc.l snaree
1702 00.000020D4 0004 dc.w new_snd
1703 00.000020D6 0000238A dc.l snr1
1704 00.000020DA 00DF000400DF000400DF dc.w hi,sq,hi,sq,hi,q
1705 00.000020E6 0008 dc.w end_patt
1706 00.000020E8 pa33: ;drum p
1707 00.000020E8 000C dc.w new_env
1708 00.000020EA 0000252E dc.l kicke
1709 00.000020EE 0004 dc.w new_snd
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 31
1710 00.000020F0 0000237C dc.l kik1
1711 00.000020F4 00DF0008 dc.w hi,q
1712 00.000020F8 000C dc.w new_env
1713 00.000020FA 00002536 dc.l hatoe
1714 00.000020FE 0004 dc.w new_snd
1715 00.00002100 00002398 dc.l hat2o
1716 00.00002104 00DF0008 dc.w hi,q
1717 00.00002108 000C dc.w new_env
1718 00.0000210A 0000252E dc.l kicke
1719 00.0000210E 0004 dc.w new_snd
1720 00.00002110 0000237C dc.l kik1
1721 00.00002114 00DF0008 dc.w hi,q
1722 00.00002118 000C dc.w new_env
1723 00.0000211A 00002536 dc.l hatoe
1724 00.0000211E 0004 dc.w new_snd
1725 00.00002120 00002398 dc.l hat2o
1726 00.00002124 00DF0008 dc.w hi,q
1727 00.00002128 000C dc.w new_env
1728 00.0000212A 0000252E dc.l kicke
1729 00.0000212E 0004 dc.w new_snd
1730 00.00002130 0000237C dc.l kik1
1731 00.00002134 00DF0008 dc.w hi,q
1732 00.00002138 000C dc.w new_env
1733 00.0000213A 00002536 dc.l hatoe
1734 00.0000213E 0004 dc.w new_snd
1735 00.00002140 00002398 dc.l hat2o
1736 00.00002144 00DF0008 dc.w hi,q
1737 00.00002148 000C dc.w new_env
1738 00.0000214A 0000252E dc.l kicke
1739 00.0000214E 0004 dc.w new_snd
1740 00.00002150 0000237C dc.l kik1
1741 00.00002154 00DF0008 dc.w hi,q
1742 00.00002158 000C dc.w new_env
1743 00.0000215A 00002536 dc.l hatoe
1744 00.0000215E 0004 dc.w new_snd
1745 00.00002160 00002398 dc.l hat2o
1746 00.00002164 00DF0008 dc.w hi,q
1747 00.00002168 0008 dc.w end_patt
1748 00.0000216A pa34:
1749 00.0000216A 000C dc.w new_env
1750 00.0000216C 00002552 dc.l snaree
1751 00.00002170 0004 dc.w new_snd
1752 00.00002172 0000237C dc.l kik1
1753 00.00002176 00DF0020 dc.w hi,cr*2
1754 00.0000217A 0008 dc.w end_patt
1755 00.0000217C pa36: ;drum p
1756 00.0000217C 000C dc.w new_env
1757 00.0000217E 0000252E dc.l kicke
1758 00.00002182 0004 dc.w new_snd
1759 00.00002184 0000237C dc.l kik1
1760 00.00002188 00DF000800DF00080020 dc.w hi,q,hi,q,rest,q,hi,q,hi,cr
1761 00.0000219C 000C dc.w new_env
1762 00.0000219E 00002552 dc.l snaree
1763 00.000021A2 0004 dc.w new_snd
1764 00.000021A4 0000238A dc.l snr1
1765 00.000021A8 00DF0010 dc.w hi,cr
1766 00.000021AC 0008 dc.w end_patt
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 32
1767 00.000021AE pa37: ;drum p
1768 00.000021AE 000C dc.w new_env
1769 00.000021B0 00002552 dc.l snaree
1770 00.000021B4 0004 dc.w new_snd
1771 00.000021B6 0000238A dc.l snr1
1772 00.000021BA 00DF0008 dc.w hi,q
1773 00.000021BE 000C dc.w new_env
1774 00.000021C0 0000252E dc.l kicke
1775 00.000021C4 0004 dc.w new_snd
1776 00.000021C6 0000237C dc.l kik1
1777 00.000021CA 00DF0008 dc.w hi,q
1778 00.000021CE 000C dc.w new_env
1779 00.000021D0 00002552 dc.l snaree
1780 00.000021D4 0004 dc.w new_snd
1781 00.000021D6 0000238A dc.l snr1
1782 00.000021DA 00DF0008 dc.w hi,q
1783 00.000021DE 000C dc.w new_env
1784 00.000021E0 0000252E dc.l kicke
1785 00.000021E4 0004 dc.w new_snd
1786 00.000021E6 0000237C dc.l kik1
1787 00.000021EA 00DF0008 dc.w hi,q
1788 00.000021EE 000C dc.w new_env
1789 00.000021F0 00002552 dc.l snaree
1790 00.000021F4 0004 dc.w new_snd
1791 00.000021F6 0000238A dc.l snr1
1792 00.000021FA 00DF0008 dc.w hi,q
1793 00.000021FE 000C dc.w new_env
1794 00.00002200 0000252E dc.l kicke
1795 00.00002204 0004 dc.w new_snd
1796 00.00002206 0000237C dc.l kik1
1797 00.0000220A 00DF0008 dc.w hi,q
1798 00.0000220E 000C dc.w new_env
1799 00.00002210 00002552 dc.l snaree
1800 00.00002214 0004 dc.w new_snd
1801 00.00002216 0000238A dc.l snr1
1802 00.0000221A 00DF0008 dc.w hi,q
1803 00.0000221E 000C dc.w new_env
1804 00.00002220 0000252E dc.l kicke
1805 00.00002224 0004 dc.w new_snd
1806 00.00002226 0000237C dc.l kik1
1807 00.0000222A 00DF0008 dc.w hi,q
1808 00.0000222E 0008 dc.w end_patt
1809 00.00002230 pa38: ;drum patt
1810 00.00002230 000C dc.w new_env
1811 00.00002232 0000252E dc.l kicke
1812 00.00002236 0004 dc.w new_snd
1813 00.00002238 0000237C dc.l kik1
1814 00.0000223C 00DF0004 dc.w hi,sq
1815 00.00002240 000C dc.w new_env
1816 00.00002242 0000253A dc.l hatce
1817 00.00002246 0004 dc.w new_snd
1818 00.00002248 000023A6 dc.l hat2c
1819 00.0000224C 00DF000400DF000400DF dc.w hi,sq,hi,sq,hi,sq
1820 00.00002258 000C dc.w new_env
1821 00.0000225A 00002552 dc.l snaree
1822 00.0000225E 0004 dc.w new_snd
1823 00.00002260 0000238A dc.l snr1
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 33
1824 00.00002264 00DF0008 dc.w hi,q
1825 00.00002268 000C dc.w new_env
1826 00.0000226A 0000253A dc.l hatce
1827 00.0000226E 0004 dc.w new_snd
1828 00.00002270 000023A6 dc.l hat2c
1829 00.00002274 00DF000400DF0004 dc.w hi,sq,hi,sq
1830 00.0000227C 000C dc.w new_env
1831 00.0000227E 0000252E dc.l kicke
1832 00.00002282 0004 dc.w new_snd
1833 00.00002284 0000237C dc.l kik1
1834 00.00002288 00DF0004 dc.w hi,sq
1835 00.0000228C 000C dc.w new_env
1836 00.0000228E 0000253A dc.l hatce
1837 00.00002292 0004 dc.w new_snd
1838 00.00002294 000023A6 dc.l hat2c
1839 00.00002298 00DF0004 dc.w hi,sq
1840 00.0000229C 000C dc.w new_env
1841 00.0000229E 0000252E dc.l kicke
1842 00.000022A2 0004 dc.w new_snd
1843 00.000022A4 0000237C dc.l kik1
1844 00.000022A8 00DF0004 dc.w hi,sq
1845 00.000022AC 000C dc.w new_env
1846 00.000022AE 0000253A dc.l hatce
1847 00.000022B2 0004 dc.w new_snd
1848 00.000022B4 000023A6 dc.l hat2c
1849 00.000022B8 00DF0004 dc.w hi,sq
1850 00.000022BC 000C dc.w new_env
1851 00.000022BE 00002552 dc.l snaree
1852 00.000022C2 0004 dc.w new_snd
1853 00.000022C4 0000238A dc.l snr1
1854 00.000022C8 00DF0008 dc.w hi,q
1855 00.000022CC 000C dc.w new_env
1856 00.000022CE 0000252E dc.l kicke
1857 00.000022D2 0004 dc.w new_snd
1858 00.000022D4 0000237C dc.l kik1
1859 00.000022D8 00DF0004 dc.w hi,sq
1860 00.000022DC 000C dc.w new_env
1861 00.000022DE 0000253A dc.l hatce
1862 00.000022E2 0004 dc.w new_snd
1863 00.000022E4 000023A6 dc.l hat2c
1864 00.000022E8 00DF0004 dc.w hi,sq
1865 00.000022EC 0008 dc.w end_patt
1866 00.000022EE
1867 00.000022EE
1868 00.000022EE 0001 syn3 dc.w 1 ;loop data
1869 00.000022F0 0000572C dc.l syn3d ;data address
1870 00.000022F4 05B0 dc.w 2912/2 ;length
1871 00.000022F6 000024FA dc.l rest_data ;data address
1872 00.000022FA 0010 dc.w 32/2 ;length
1873 00.000022FC
1874 00.000022FC
1875 00.000022FC 0001 syn4 dc.w 1 ;loop data
1876 00.000022FE 00003716 dc.l syn4d ;data address
1877 00.00002302 01D8 dc.w 1888/4 ;length
1878 00.00002304 000024FA dc.l rest_data ;data address
1879 00.00002308 0010 dc.w 16 ;length
1880 00.0000230A
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 34
1881 00.0000230A 0001 bas4 dc.w 1 ;one_shot_flag
1882 00.0000230C 000025C6 dc.l bas4d
1883 00.00002310 0380 dc.w 1792/2 ;length
1884 00.00002312 000024FA dc.l rest_data ;data address
1885 00.00002316 0010 dc.w 16 ;length
1886 00.00002318
1887 00.00002318 0001 git4 dc.w 1 ;one_shot_flag
1888 00.0000231A 00008B4E dc.l git4d
1889 00.0000231E 06F5 dc.w 3563/2 ;length
1890 00.00002320 000024FA dc.l rest_data ;data address
1891 00.00002324 0008 dc.w 8 ;length
1892 00.00002326
1893 00.00002326 0001 git3 dc.w 1 ;one_shot_flag
1894 00.00002328 0000993A dc.l git3d
1895 00.0000232C 0E50 dc.w 7328/2 ;length
1896 00.0000232E 000024FA dc.l rest_data ;data address
1897 00.00002332 0008 dc.w 8 ;length
1898 00.00002334
1899 00.00002334 0001 git5 dc.w 1 ;one_shot_flag
1900 00.00002336 0000B5DA dc.l git5d
1901 00.0000233A 0BBE dc.w 6012/2 ;length
1902 00.0000233C 000024FA dc.l rest_data ;data address
1903 00.00002340 0008 dc.w 8 ;length
1904 00.00002342
1905 00.00002342 0001 git2 dc.w 1 ;one_shot_flag
1906 00.00002344 0000CD56 dc.l git2d
1907 00.00002348 0321 dc.w 1602/2 ;length
1908 00.0000234A 000024FA dc.l rest_data ;data address
1909 00.0000234E 0008 dc.w 8 ;length
1910 00.00002350
1911 00.00002350 0001 git1 dc.w 1 ;one_shot_flag
1912 00.00002352 0000D398 dc.l git1d
1913 00.00002356 052B dc.w 2647/2 ;length
1914 00.00002358 000024FA dc.l rest_data ;data address
1915 00.0000235C 0008 dc.w 8 ;length
1916 00.0000235E
1917 00.0000235E 0001 abvc dc.w 1 ;one_shot_flag
1918 00.00002360
1919 00.00002360 0001 syn1 dc.w 1 ;one_shot_flag
1920 00.00002362 0000DDF0 dc.l syn1d
1921 00.00002366 0865 dc.w 4298/2 ;length
1922 00.00002368 0000628C dc.l flulp1d ;data address
1923 00.0000236C 02D0 dc.w 1440/2 ;length
1924 00.0000236E
1925 00.0000236E 0001 tom1 dc.w 1 ;one_shot_flag
1926 00.00002370 00002CD0 dc.l tom1d
1927 00.00002374 0523 dc.w 2630/2 ;length
1928 00.00002376 000024FA dc.l rest_data ;data address
1929 00.0000237A 0010 dc.w 16 ;length
1930 00.0000237C
1931 00.0000237C 0001 kik1: dc.w 1 ;one_shot_flag
1932 00.0000237E 0000682C dc.l kik1d
1933 00.00002382 076C dc.w 3801/2 ;length
1934 00.00002384 000024FA dc.l rest_data ;data address
1935 00.00002388 0010 dc.w 16 ;length
1936 00.0000238A
1937 00.0000238A 0001 snr1: dc.w 1 ;one_shot_flag
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 35
1938 00.0000238C 00003E76 dc.l snr1d
1939 00.00002390 0C5A dc.w 6325/2 ;length
1940 00.00002392 000024FA dc.l rest_data ;data address
1941 00.00002396 0010 dc.w 16 ;length
1942 00.00002398
1943 00.00002398 0001 hat2o: dc.w 1 ;one_shot_flag
1944 00.0000239A 00007706 dc.l hat2d
1945 00.0000239E 0A24 dc.w 5192/2 ;length
1946 00.000023A0 000024FA dc.l rest_data ;data address
1947 00.000023A4 0010 dc.w 16 ;length
1948 00.000023A6
1949 00.000023A6 0001 hat2c: dc.w 1 ;one_shot_flag
1950 00.000023A8 000085BA dc.l hat2d+3764
1951 00.000023AC 002B dc.w (3850-3764)/2 ;length
1952 00.000023AE 000024FA dc.l rest_data ;data address
1953 00.000023B2 0010 dc.w 16 ;length
1954 00.000023B4
1955 00.000023B4 0001 flulp1: dc.w 1 ;loop
1956 00.000023B6 0000628C dc.l flulp1d
1957 00.000023BA 02D0 dc.w 1440/2
1958 00.000023BC 0000628C dc.l flulp1d ;data address
1959 00.000023C0 02D0 dc.w 1440/2 ;length
1960 00.000023C2
1961 00.000023C2 0001 flulp2: dc.w 1 ;loop
1962 00.000023C4 000110F6 dc.l flulp2d
1963 00.000023C8 0010 dc.w 32/2
1964 00.000023CA 000110F6 dc.l flulp2d ;data address
1965 00.000023CE 0010 dc.w 32/2 ;length
1966 00.000023D0
1967 00.000023D0
1968 00.000023D0 0001 orglp2: dc.w 1 ;loop
1969 00.000023D2 0000EEBA dc.l orglp2d
1970 00.000023D6 0A90 dc.w 5408/2
1971 00.000023D8 0000EEBA dc.l orglp2d ;data address
1972 00.000023DC 0A90 dc.w 5408/2 ;length
1973 00.000023DE
1974 00.000023DE
1975 00.000023DE 0001 orglp1: dc.w 1 ;loop
1976 00.000023E0 000110D6 dc.l orglp1d
1977 00.000023E4 0010 dc.w 32/2
1978 00.000023E6 000110D6 dc.l orglp1d ;data address
1979 00.000023EA 0010 dc.w 32/2 ;length
1980 00.000023EC
1981 00.000023EC 0001 synlp2: dc.w 1 ;loop
1982 00.000023EE 000103DA dc.l synat2d
1983 00.000023F2 026E dc.w 1244/2
1984 00.000023F4 000108B6 dc.l synlp2d ;data address
1985 00.000023F8 0100 dc.w 512/2 ;length
1986 00.000023FA
1987 00.000023FA 0001 strlp1: dc.w 1 ;loop
1988 00.000023FC 00010AB6 dc.l strlp1d
1989 00.00002400 0310 dc.w 1568/2
1990 00.00002402 00010AB6 dc.l strlp1d ;data address
1991 00.00002406 0310 dc.w 1568/2 ;length
1992 00.00002408
1993 00.00002408 0001 becarefl: dc.w 1 ;loop
1994 00.0000240A 00011118 dc.l becarefld
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 36
1995 00.0000240E 064D dc.w 3226/2
1996 00.00002410 000024FA dc.l rest_data ;data address
1997 00.00002414 0010 dc.w 16 ;length
1998 00.00002416
1999 00.00002416
2000 00.00002416
2001 00.00002416 0000005A007FFFA6FF81 sdata: dc.w 0,90,127,-90,-127,-90
2002 00.00002422 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2003 00.0000242E 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2004 00.0000243A 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2005 00.00002446 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2006 00.00002452 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2007 00.0000245E 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2008 00.0000246A 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2009 00.00002476 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2010 00.00002482 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2011 00.0000248E 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2012 00.0000249A 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2013 00.000024A6 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2014 00.000024B2 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2015 00.000024BE 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2016 00.000024CA 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2017 00.000024D6 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2018 00.000024E2 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2019 00.000024EE 0000005A007FFFA6FF81 dc.w 0,90,127,-90,-127,-90
2020 00.000024FA
2021 00.000024FA rest_data:
2022 00.000024FA ; length=24 words
2023 00.000024FA 00000000000000000000 dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
2024 00.0000252A 002700FF tom1e: dc.w 39,255
2025 00.0000252E 004000FF kicke: dc.w 64,255
2026 00.00002532 001E00FF syn3e: dc.w 30,255
2027 00.00002536 000A00FF hatoe: dc.w 10,255
2028 00.0000253A 001E00FF hatce: dc.w 30,255
2029 00.0000253E 004000FF clape: dc.w 64,255
2030 00.00002542 004000FF bas4e: dc.w 64,255
2031 00.00002546 001400FF synth2e: dc.w 20,255
2032 00.0000254A 003C00FF flulp1e: dc.w 60,255
2033 00.0000254E 003C00FF flulp2e: dc.w 60,255
2034 00.00002552 004000FF snaree: dc.w 64,255
2035 00.00002556 001400FF orglp2e: dc.w 20,255
2036 00.0000255A 001E00FF orglp1e: dc.w 30,255
2037 00.0000255E 003200FF git4e: dc.w 50,255
2038 00.00002562 003200FF git3e: dc.w 50,255
2039 00.00002566 003200FF git5e: dc.w 50,255
2040 00.0000256A 004000FF git2e: dc.w 64,255
2041 00.0000256E 004000FF git1e: dc.w 64,255
2042 00.00002572 003200FF abvce: dc.w 50,255
2043 00.00002576 003200FF voclp1e: dc.w 50,255
2044 00.0000257A 003C003C003C00370037 syn1e: dc.w 60,60,60,55,55,55,50,50,50,25,25,25,25,25,25,25
2045 00.0000259A 00190019001900190019 dc.w 25,25,25,25,25,25,25,25,25,25,25,25,25,25,64,255
2046 00.000025BA 003700FF syn4e: dc.w 55,255
2047 00.000025BE 001E00FF strlp1e: dc.w 30,255
2048 00.000025C2 004000FF speeche: dc.w 64,255
2049 00.000025C6
2050 00.000025C6 ; ******************************
2051 00.00002CD0 bas4d: incbin df0:bas4.sam
HiSoft GenAm 680x0 Macro Assembler v2.08 Page 37
2052 00.00003716 tom1d: incbin df0:tom1.sam
2053 00.00003E76 syn4d: incbin df0:syn4.sam
2054 00.0000572C snr1d: incbin df0:snr1.sam
2055 00.0000628C syn3d: incbin df0:syn3.sam
2056 00.0000682C flulp1d incbin df0:flulp1.sam
2057 00.0000682C ;orglp2d: incbin df0:orglp2.sam
2058 00.00007706 kik1d: incbin df0:kik1.sam
2059 00.00008B4E hat2d: incbin df0:hat2.sam
2060 00.0000993A git4d: incbin df0:git4.sam
2061 00.0000B5DA git3d: incbin df0:git3.sam
2062 00.0000CD56 git5d: incbin df0:git5.sam
2063 00.0000D398 git2d: incbin df0:git2.sam
2064 00.0000DDF0 git1d: incbin df0:git1.sam
2065 00.0000EEBA syn1d: incbin df0:syn1.sam
2066 00.000103DA orglp2d: incbin df1:organs/organloops/orglp2.sam
2067 00.000108B6 synat2d: incbin df1:synths/synat2.sam
2068 00.00010AB6 synlp2d: incbin df1:synths/synlp2.sam
2069 00.000110D6 strlp1d: incbin df1:strings/strlp1.sam
2070 00.000110F6 orglp1d: incbin df1:organs/organloops/orglp1.sam
2071 00.00011118 flulp2d: incbin df1:flutes/flulp2.sam
2072 00.00011DE0 becarefld: incbin ram:becarefl.tsam
2073 00.00011DE0
2074 00.00011DE0
2075 00.00011DE0 end
