/ APDL Public Domain 2 / APDL_PD2A.iso / demos / demo_1 / dripdemo / !DripDemo / RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1e f4 20 3e 3a | 30 2e 24 2e 21 41 72 6d |..... >:|0.$.!Arm|
|00000010| 5f 64 65 6d 6f 2e 52 75 | 6e 49 6d 61 67 65 0d 00 |_demo.Ru|nImage..|
|00000020| 14 30 f4 20 41 75 74 68 | 6f 72 20 3a 20 44 69 6c |.0. Auth|or : Dil|
|00000030| 65 65 70 61 20 4d 2e 20 | 4b 61 72 75 6e 61 64 61 |eepa M. |Karunada|
|00000040| 73 61 20 28 41 6e 69 6d | 61 74 69 6f 6e 29 0d 00 |sa (Anim|ation)..|
|00000050| 1e 2c f4 20 20 20 20 20 | 20 20 20 20 20 48 75 67 |.,.     |     Hug|
|00000060| 6f 20 46 69 65 6e 6e 65 | 73 20 20 20 20 20 20 20 |o Fienne|s       |
|00000070| 20 20 20 28 53 6f 75 6e | 64 29 0d 00 28 0e f4 20 |   (Soun|d)..(.. |
|00000080| 49 6e 66 6f 20 20 20 3a | 0d 00 32 39 f4 20 20 20 |Info   :|..29.   |
|00000090| 20 20 20 20 20 20 41 74 | 20 6c 65 61 73 74 20 31 |      At| least 1|
|000000a0| 6d 65 67 20 69 73 20 72 | 65 71 75 69 72 65 64 20 |meg is r|equired |
|000000b0| 66 6f 72 20 74 68 69 73 | 20 70 72 6f 67 72 61 6d |for this| program|
|000000c0| 2e 0d 00 3c 4b f4 20 20 | 20 20 20 20 20 20 20 54 |...<K.  |       T|
|000000d0| 68 65 20 61 6e 69 6d 61 | 74 69 6f 6e 20 77 61 73 |he anima|tion was|
|000000e0| 20 70 72 6f 64 75 63 65 | 64 20 6f 6e 20 61 6e 20 | produce|d on an |
|000000f0| 41 33 31 30 20 75 73 69 | 6e 67 20 74 68 65 20 52 |A310 usi|ng the R|
|00000100| 65 6e 64 65 72 20 42 65 | 6e 64 65 72 0d 00 46 4c |ender Be|nder..FL|
|00000110| f4 20 20 20 20 20 20 20 | 20 20 70 61 63 6b 61 67 |.       |  packag|
|00000120| 65 20 66 72 6f 6d 20 43 | 6c 61 72 65 73 2c 20 74 |e from C|lares, t|
|00000130| 68 65 72 65 20 61 72 65 | 20 61 20 63 6f 75 70 6c |here are| a coupl|
|00000140| 65 20 6f 66 20 6d 69 73 | 74 61 6b 65 73 2c 20 62 |e of mis|takes, b|
|00000150| 75 74 20 74 68 65 6e 2c | 0d 00 50 48 f4 20 20 20 |ut then,|..PH.   |
|00000160| 20 20 20 20 20 20 6e 6f | 74 68 69 6e 67 73 20 70 |      no|things p|
|00000170| 65 72 66 65 63 74 21 20 | 28 54 68 65 72 65 20 61 |erfect! |(There a|
|00000180| 72 65 20 61 20 66 65 77 | 20 64 69 73 6b 27 73 20 |re a few| disk's |
|00000190| 6d 69 73 73 69 6e 67 20 | 73 6f 20 63 6f 6e 65 73 |missing |so cones|
|000001a0| 0d 00 5a 4a f4 20 20 20 | 20 20 20 20 20 20 68 6f |..ZJ.   |      ho|
|000001b0| 6c 6c 6f 77 20 62 75 74 | 20 69 74 20 74 6f 6f 6b |llow but| it took|
|000001c0| 20 61 20 68 65 6c 6c 20 | 6f 66 20 61 20 6c 6f 6e | a hell |of a lon|
|000001d0| 67 20 74 69 6d 65 20 74 | 6f 20 74 72 61 63 65 20 |g time t|o trace |
|000001e0| 73 6f 20 49 27 6d 20 6e | 6f 74 0d 00 64 1d f4 20 |so I'm n|ot..d.. |
|000001f0| 20 20 20 20 20 20 20 20 | 64 6f 69 6e 67 20 69 74 |        |doing it|
|00000200| 20 61 67 61 69 6e 29 0d | 00 6e 46 f4 20 20 20 20 | again).|.nF.    |
|00000210| 20 20 20 20 20 54 68 65 | 20 73 6f 75 6e 64 20 69 |     The| sound i|
|00000220| 73 20 76 69 61 20 48 75 | 67 6f 27 73 20 73 6f 75 |s via Hu|go's sou|
|00000230| 6e 64 74 72 61 63 6b 65 | 72 20 70 6c 61 79 20 72 |ndtracke|r play r|
|00000240| 6f 75 74 69 6e 65 73 20 | 28 77 65 6c 6c 0d 00 78 |outines |(well..x|
|00000250| 3e f4 20 20 20 20 20 20 | 20 20 20 74 68 65 72 65 |>.      |   there|
|00000260| 27 73 20 79 6f 75 72 20 | 63 72 65 64 69 74 20 48 |'s your |credit H|
|00000270| 75 67 6f 21 29 2c 20 77 | 68 69 63 68 20 61 72 65 |ugo!), w|hich are|
|00000280| 20 76 65 72 79 20 67 6f | 6f 64 2e 0d 00 82 10 62 | very go|od.....b|
|00000290| 6c 6b 5f 62 61 73 65 25 | 3d 31 32 0d 00 8c 0d eb |lk_base%|=12.....|
|000002a0| 31 35 3a eb 31 33 3a 87 | 0d 00 96 10 2a 53 50 45 |15:.13:.|....*SPE|
|000002b0| 41 4b 45 52 20 4f 46 46 | 0d 00 a0 10 f2 5f 49 6e |AKER OFF|....._In|
|000002c0| 69 74 52 65 63 6f 72 64 | 0d 00 aa 09 75 73 3d 33 |itRecord|....us=3|
|000002d0| 34 0d 00 b4 1a 73 6f 6e | 67 24 3d 22 3c 42 72 24 |4....son|g$="<Br$|
|000002e0| 44 69 72 3e 2e 4d 6f 64 | 5f 4a 22 0d 00 be 10 74 |Dir>.Mod|_J"....t|
|000002f0| 6c 65 6e 25 3d 26 31 44 | 43 33 30 0d 00 c8 0e f2 |len%=&1D|C30.....|
|00000300| 5f 41 73 73 65 6d 62 6c | 65 0d 00 d2 0f f2 5f 49 |_Assembl|e....._I|
|00000310| 6e 69 74 53 6f 75 6e 64 | 0d 00 dc 13 ff 22 53 54 |nitSound|....."ST|
|00000320| 45 52 45 4f 20 31 20 2d | 36 30 22 0d 00 e6 13 ff |EREO 1 -|60".....|
|00000330| 22 53 54 45 52 45 4f 20 | 32 20 2d 31 30 22 0d 00 |"STEREO |2 -10"..|
|00000340| f0 12 ff 22 53 54 45 52 | 45 4f 20 33 20 31 30 22 |..."STER|EO 3 10"|
|00000350| 0d 00 fa 12 ff 22 53 54 | 45 52 45 4f 20 34 20 36 |....."ST|EREO 4 6|
|00000360| 30 22 0d 01 04 0d ee 85 | f2 5f 45 72 72 6f 72 0d |0"......|._Error.|
|00000370| 01 0e 30 ff 28 22 4c 6f | 61 64 20 3c 42 72 24 44 |..0.("Lo|ad <Br$D|
|00000380| 69 72 3e 2e 42 69 67 46 | 69 6c 65 20 22 2b c3 7e |ir>.BigF|ile "+.~|
|00000390| 72 65 63 25 21 62 6c 6b | 5f 62 61 73 65 25 29 0d |rec%!blk|_base%).|
|000003a0| 01 18 0e eb 20 31 35 3a | fb 34 37 3a 87 0d 01 22 |.... 15:|.47:..."|
|000003b0| 0e de 20 4d 25 20 38 30 | 30 30 30 0d 01 2c 21 ff |.. M% 80|000..,!.|
|000003c0| 28 22 53 43 52 45 45 4e | 4c 4f 41 44 20 3c 42 72 |("SCREEN|LOAD <Br|
|000003d0| 24 44 69 72 3e 2e 54 41 | 50 31 22 29 0d 01 36 06 |$Dir>.TA|P1")..6.|
|000003e0| ef 35 0d 01 40 0f e6 20 | 36 33 20 c8 9c 20 31 39 |.5..@.. |63 .. 19|
|000003f0| 32 0d 01 4a 20 f1 8a 35 | 30 2c 33 30 29 3b 22 42 |2..J ..5|0,30);"B|
|00000400| 79 20 44 2e 4d 2e 4b 61 | 72 75 6e 61 64 61 73 61 |y D.M.Ka|runadasa|
|00000410| 22 0d 01 54 2a f1 8a 35 | 30 2c 33 31 29 3b 22 53 |"..T*..5|0,31);"S|
|00000420| 6f 75 6e 64 20 63 6f 75 | 72 74 65 73 79 20 6f 66 |ound cou|rtesy of|
|00000430| 20 48 2e 46 69 65 6e 6e | 65 73 22 0d 01 5e 08 ef | H.Fienn|es"..^..|
|00000440| 34 3a 87 0d 01 68 22 ff | 28 22 4c 6f 61 64 20 3c |4:...h".|("Load <|
|00000450| 42 72 24 44 69 72 3e 2e | 54 41 50 20 22 2b c3 7e |Br$Dir>.|TAP "+.~|
|00000460| 28 4d 25 29 29 0d 01 72 | 0e d6 20 28 4d 25 2b 31 |(M%))..r|.. (M%+1|
|00000470| 33 36 29 0d 01 7c 05 f5 | 0d 01 86 0a d6 20 69 6e |36)..|..|..... in|
|00000480| 74 72 0d 01 90 08 d6 20 | 4d 25 0d 01 9a 0c fd 20 |tr..... |M%..... |
|00000490| a6 28 2d 39 39 29 0d 01 | a4 0e d6 6b 69 6c 6c 73 |.(-99)..|...kills|
|000004a0| 6f 75 6e 64 0d 01 ae 08 | c8 a0 20 34 0d 01 b8 07 |ound....|.. 4....|
|000004b0| eb 20 30 0d 01 c2 05 e0 | 0d 01 cc 04 0d 01 d6 53 |. 0.....|.......S|
|000004c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000500| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00000510| 01 e0 11 dd f2 5f 49 6e | 69 74 52 65 63 6f 72 64 |....._In|itRecord|
|00000520| 0d 01 ea 0e de 72 65 63 | 25 20 36 30 2d 31 0d 01 |.....rec|% 60-1..|
|00000530| f4 1d de 72 65 63 25 21 | 62 6c 6b 5f 62 61 73 65 |...rec%!|blk_base|
|00000540| 25 20 31 30 32 34 2a 39 | 33 2d 31 0d 01 fe 05 e1 |% 1024*9|3-1.....|
|00000550| 0d 02 08 04 0d 02 12 0f | dd f2 5f 41 73 73 65 6d |........|.._Assem|
|00000560| 62 6c 65 0d 02 1c 1d de | 63 6f 64 65 25 20 26 34 |ble.....|code% &4|
|00000570| 30 30 2a 31 30 2d 31 2b | 31 33 30 2a 31 30 32 34 |00*10-1+|130*1024|
|00000580| 0d 02 26 04 0d 02 30 23 | ff 28 22 4c 4f 41 44 20 |..&...0#|.("LOAD |
|00000590| 3c 42 72 24 44 69 72 3e | 2e 4d 59 43 20 22 2b c3 |<Br$Dir>|.MYC "+.|
|000005a0| 7e 63 6f 64 65 25 29 0d | 02 3a 0f e3 70 61 73 73 |~code%).|.:..pass|
|000005b0| 3d 30 b8 32 88 32 0d 02 | 44 11 50 25 3d 63 6f 64 |=0.2.2..|D.P%=cod|
|000005c0| 65 25 2b 26 38 37 43 0d | 02 4e 0e 5b 20 4f 50 54 |e%+&87C.|.N.[ OPT|
|000005d0| 20 70 61 73 73 0d 02 58 | 09 2e 46 69 6c 6c 0d 02 | pass..X|..Fill..|
|000005e0| 62 11 41 44 52 20 52 38 | 2c 6f 75 72 69 6e 66 0d |b.ADR R8|,ourinf.|
|000005f0| 02 6c 16 41 44 44 20 52 | 38 2c 52 38 2c 52 37 2c |.l.ADD R|8,R8,R7,|
|00000600| 4c 53 4c 23 35 0d 02 76 | 14 4c 44 4d 49 41 20 52 |LSL#5..v|.LDMIA R|
|00000610| 38 2c 7b 52 31 2d 52 36 | 7d 0d 02 80 0d 2e 46 69 |8,{R1-R6|}.....Fi|
|00000620| 6c 6c 4c 6f 6f 70 0d 02 | 8a 05 5d 0d 02 94 0e e3 |llLoop..|..].....|
|00000630| 73 6c 65 25 3d 31 b8 31 | 30 0d 02 9e 0d 5b 4f 50 |sle%=1.1|0....[OP|
|00000640| 54 20 70 61 73 73 0d 02 | a8 2a 4c 44 52 42 20 52 |T pass..|.*LDRB R|
|00000650| 30 2c 5b 52 35 2c 52 31 | 2c 4c 53 52 23 31 36 5d |0,[R5,R1|,LSR#16]|
|00000660| 3b 47 65 74 20 73 61 6d | 70 6c 65 20 62 79 74 65 |;Get sam|ple byte|
|00000670| 0d 02 b2 1e 53 55 42 53 | 20 52 30 2c 52 30 2c 52 |....SUBS| R0,R0,R|
|00000680| 36 3b 53 63 61 6c 65 20 | 76 6f 6c 75 6d 65 0d 02 |6;Scale |volume..|
|00000690| bc 0f 4d 4f 56 4d 49 20 | 52 30 2c 23 30 0d 02 c6 |..MOVMI |R0,#0...|
|000006a0| 26 53 54 52 42 20 52 30 | 2c 5b 52 31 32 5d 2c 52 |&STRB R0|,[R12],R|
|000006b0| 31 31 3b 50 75 74 20 69 | 6e 20 69 6e 20 62 75 66 |11;Put i|n in buf|
|000006c0| 66 65 72 0d 02 d0 1b 41 | 44 44 20 52 31 2c 52 31 |fer....A|DD R1,R1|
|000006d0| 2c 52 32 3b 41 64 64 20 | 6f 66 66 73 65 74 0d 02 |,R2;Add |offset..|
|000006e0| da 05 5d 0d 02 e4 05 ed | 0d 02 ee 0d 5b 4f 50 54 |..].....|....[OPT|
|000006f0| 20 70 61 73 73 0d 02 f8 | 21 43 4d 50 20 52 34 2c | pass...|!CMP R4,|
|00000700| 52 31 2c 4c 53 52 23 31 | 36 3b 45 6e 64 20 6f 66 |R1,LSR#1|6;End of|
|00000710| 20 6e 6f 74 65 3f 0d 03 | 02 0b 42 47 54 20 63 62 | note?..|..BGT cb|
|00000720| 66 0d 03 0c 1c 4d 4f 56 | 53 20 52 31 2c 52 33 3b |f....MOV|S R1,R3;|
|00000730| 59 65 73 2c 6c 6f 6f 70 | 20 62 61 63 6b 0d 03 16 |Yes,loop| back...|
|00000740| 26 ec 51 20 52 32 2c 23 | 30 3b 49 66 20 6e 6f 20 |&.Q R2,#|0;If no |
|00000750| 6c 6f 6f 70 69 6e 67 2c | 6b 65 65 70 20 71 75 69 |looping,|keep qui|
|00000760| 65 74 21 0d 03 20 08 2e | 63 62 66 0d 03 2a 23 43 |et!.. ..|cbf..*#C|
|00000770| 4d 50 20 52 31 32 2c 52 | 31 30 3b 45 6e 64 20 6f |MP R12,R|10;End o|
|00000780| 66 20 62 75 66 66 65 72 | 20 66 69 6c 6c 3f 0d 03 |f buffer| fill?..|
|00000790| 34 24 42 4c 54 20 46 69 | 6c 6c 4c 6f 6f 70 3b 4e |4$BLT Fi|llLoop;N|
|000007a0| 6f 70 65 2c 66 69 6c 6c | 20 73 6f 6d 65 20 6d 6f |ope,fill| some mo|
|000007b0| 72 65 0d 03 3e 24 53 54 | 4d 49 41 20 52 38 2c 7b |re..>$ST|MIA R8,{|
|000007c0| 52 31 2d 52 32 7d 3b 53 | 61 76 65 20 72 65 67 73 |R1-R2};S|ave regs|
|000007d0| 20 61 67 61 69 6e 0d 03 | 48 04 0d 03 52 22 4d 4f | again..|H...R"MO|
|000007e0| 56 20 52 30 2c 23 25 30 | 30 30 30 31 30 30 30 3b |V R0,#%0|0001000;|
|000007f0| 76 6f 69 63 65 20 61 63 | 74 69 76 65 0d 03 5c 2a |voice ac|tive..\*|
|00000800| 4c 44 4d 46 44 20 52 31 | 33 21 2c 7b 50 43 7d 3b |LDMFD R1|3!,{PC};|
|00000810| 2e 2e 61 6e 64 20 72 65 | 74 75 72 6e 20 74 6f 20 |..and re|turn to |
|00000820| 4c 65 76 65 6c 31 0d 03 | 66 04 0d 03 70 0b 2e 6f |Level1..|f...p..o|
|00000830| 75 72 69 6e 66 0d 03 7a | 3b 45 51 55 44 20 30 3a |urinf..z|;EQUD 0:|
|00000840| 45 51 55 44 20 30 3a 45 | 51 55 44 20 30 3a 45 51 |EQUD 0:E|QUD 0:EQ|
|00000850| 55 44 20 30 3a 45 51 55 | 44 20 30 3a 45 51 55 44 |UD 0:EQU|D 0:EQUD|
|00000860| 20 30 3a 45 51 55 44 20 | 30 3a 45 51 55 44 20 30 | 0:EQUD |0:EQUD 0|
|00000870| 0d 03 84 3b 45 51 55 44 | 20 30 3a 45 51 55 44 20 |...;EQUD| 0:EQUD |
|00000880| 30 3a 45 51 55 44 20 30 | 3a 45 51 55 44 20 30 3a |0:EQUD 0|:EQUD 0:|
|00000890| 45 51 55 44 20 30 3a 45 | 51 55 44 20 30 3a 45 51 |EQUD 0:E|QUD 0:EQ|
|000008a0| 55 44 20 30 3a 45 51 55 | 44 20 30 0d 03 8e 3b 45 |UD 0:EQU|D 0...;E|
|000008b0| 51 55 44 20 30 3a 45 51 | 55 44 20 30 3a 45 51 55 |QUD 0:EQ|UD 0:EQU|
|000008c0| 44 20 30 3a 45 51 55 44 | 20 30 3a 45 51 55 44 20 |D 0:EQUD| 0:EQUD |
|000008d0| 30 3a 45 51 55 44 20 30 | 3a 45 51 55 44 20 30 3a |0:EQUD 0|:EQUD 0:|
|000008e0| 45 51 55 44 20 30 0d 03 | 98 3b 45 51 55 44 20 30 |EQUD 0..|.;EQUD 0|
|000008f0| 3a 45 51 55 44 20 30 3a | 45 51 55 44 20 30 3a 45 |:EQUD 0:|EQUD 0:E|
|00000900| 51 55 44 20 30 3a 45 51 | 55 44 20 30 3a 45 51 55 |QUD 0:EQ|UD 0:EQU|
|00000910| 44 20 30 3a 45 51 55 44 | 20 30 3a 45 51 55 44 20 |D 0:EQUD| 0:EQUD |
|00000920| 30 0d 03 a2 04 0d 03 ac | 10 2e 63 68 61 6e 6e 65 |0.......|..channe|
|00000930| 6c 6e 6f 74 65 0d 03 b6 | 1f 45 51 55 44 20 30 3a |lnote...|.EQUD 0:|
|00000940| 45 51 55 44 20 30 3a 45 | 51 55 44 20 30 3a 45 51 |EQUD 0:E|QUD 0:EQ|
|00000950| 55 44 20 30 0d 03 c0 04 | 0d 03 ca 0f 2e 65 66 66 |UD 0....|.....eff|
|00000960| 65 63 74 74 79 70 65 0d | 03 d4 1f 45 51 55 44 20 |ecttype.|...EQUD |
|00000970| 30 3a 45 51 55 44 20 30 | 3a 45 51 55 44 20 30 3a |0:EQUD 0|:EQUD 0:|
|00000980| 45 51 55 44 20 30 0d 03 | de 04 0d 03 e8 09 2e 69 |EQUD 0..|.......i|
|00000990| 6e 66 6f 0d 03 f2 13 45 | 51 55 44 20 30 3b 50 6f |nfo....E|QUD 0;Po|
|000009a0| 73 69 74 69 6f 6e 0d 03 | fc 19 45 51 55 44 20 30 |sition..|..EQUD 0|
|000009b0| 3b 50 61 74 74 65 72 6e | 20 6c 65 6e 67 74 68 0d |;Pattern| length.|
|000009c0| 04 06 18 45 51 55 44 20 | 30 3b 53 65 71 75 65 6e |...EQUD |0;Sequen|
|000009d0| 63 65 20 70 6f 73 6e 0d | 04 10 04 0d 04 1a 0c 2e |ce posn.|........|
|000009e0| 73 65 71 62 61 73 65 0d | 04 24 1b 45 51 55 44 20 |seqbase.|.$.EQUD |
|000009f0| 26 31 44 38 3b 53 65 71 | 75 65 6e 63 65 20 62 61 |&1D8;Seq|uence ba|
|00000a00| 73 65 0d 04 2e 04 0d 04 | 38 0c 2e 74 72 6b 62 61 |se......|8..trkba|
|00000a10| 73 65 0d 04 42 22 45 51 | 55 44 20 26 32 35 38 3b |se..B"EQ|UD &258;|
|00000a20| 50 61 74 74 65 72 6e 20 | 62 61 73 65 20 61 64 64 |Pattern |base add|
|00000a30| 72 65 73 73 0d 04 4c 04 | 0d 04 56 0c 2e 63 75 72 |ress..L.|..V..cur|
|00000a40| 72 65 6e 74 0d 04 60 1e | 45 51 55 44 20 30 3b 43 |rent..`.|EQUD 0;C|
|00000a50| 75 72 72 65 6e 74 20 69 | 6e 73 74 72 75 6d 65 6e |urrent i|nstrumen|
|00000a60| 74 73 0d 04 6a 04 0d 04 | 74 0b 2e 63 6f 75 6e 74 |ts..j...|t..count|
|00000a70| 69 0d 04 7e 18 45 51 55 | 44 20 30 3b 56 73 79 6e |i..~.EQU|D 0;Vsyn|
|00000a80| 63 20 63 6f 75 6e 74 65 | 72 0d 04 88 04 0d 04 92 |c counte|r.......|
|00000a90| 0a 2e 73 70 65 65 64 0d | 04 9c 24 45 51 55 44 20 |..speed.|..$EQUD |
|00000aa0| 36 3b 53 70 65 65 64 20 | 63 6f 75 6e 74 65 72 20 |6;Speed |counter |
|00000ab0| 28 64 65 66 61 75 6c 74 | 3d 36 29 0d 04 a6 04 0d |(default|=6).....|
|00000ac0| 04 b0 1c 2e 69 6e 74 72 | 3b 43 61 6c 6c 65 64 20 |....intr|;Called |
|00000ad0| 65 76 65 72 79 20 56 53 | 59 4e 43 0d 04 ba 1b 53 |every VS|YNC....S|
|00000ae0| 54 4d 46 44 20 52 31 33 | 21 2c 7b 52 30 2d 52 31 |TMFD R13|!,{R0-R1|
|00000af0| 32 2c 52 31 34 7d 0d 04 | c4 1c 4c 44 52 20 52 31 |2,R14}..|..LDR R1|
|00000b00| 2c 63 6f 75 6e 74 69 3b | 4c 6f 61 64 20 63 6f 75 |,counti;|Load cou|
|00000b10| 6e 74 0d 04 ce 1e 42 4c | 20 64 6f 65 66 66 65 63 |nt....BL| doeffec|
|00000b20| 74 3b 44 6f 20 61 6e 79 | 20 65 66 66 65 63 74 73 |t;Do any| effects|
|00000b30| 0d 04 d8 22 4c 44 52 20 | 52 32 2c 73 70 65 65 64 |..."LDR |R2,speed|
|00000b40| 3b 43 75 72 72 65 6e 74 | 20 70 6c 61 79 73 70 65 |;Current| playspe|
|00000b50| 65 64 0d 04 e2 20 41 44 | 44 20 52 31 2c 52 31 2c |ed... AD|D R1,R1,|
|00000b60| 23 31 3b 49 6e 63 72 65 | 6d 65 6e 74 20 63 6f 75 |#1;Incre|ment cou|
|00000b70| 6e 74 0d 04 ec 1c 43 4d | 50 20 52 31 2c 52 32 3b |nt....CM|P R1,R2;|
|00000b80| 52 65 61 64 79 20 74 6f | 20 70 6c 61 79 3f 0d 04 |Ready to| play?..|
|00000b90| f6 10 ec 51 20 52 31 2c | 23 30 3b 59 65 73 0d 05 |...Q R1,|#0;Yes..|
|00000ba0| 00 1f 53 54 52 20 52 31 | 2c 63 6f 75 6e 74 69 3b |..STR R1|,counti;|
|00000bb0| 52 65 73 74 6f 72 65 20 | 63 6f 75 6e 74 0d 05 0a |Restore |count...|
|00000bc0| 34 42 4c 45 51 20 70 6c | 61 79 6e 6f 74 65 3b 49 |4BLEQ pl|aynote;I|
|00000bd0| 66 20 73 6f 2c 7a 65 72 | 6f 20 63 6f 75 6e 74 65 |f so,zer|o counte|
|00000be0| 72 20 61 6e 64 20 70 6c | 61 79 20 61 20 6e 6f 74 |r and pl|ay a not|
|00000bf0| 65 0d 05 14 1a 4c 44 4d | 46 44 20 52 31 33 21 2c |e....LDM|FD R13!,|
|00000c00| 7b 52 30 2d 52 31 32 2c | 50 43 7d 0d 05 1e 04 0d |{R0-R12,|PC}.....|
|00000c10| 05 28 0d 2e 70 6c 61 79 | 6e 6f 74 65 0d 05 32 14 |.(..play|note..2.|
|00000c20| 53 54 4d 46 44 20 52 31 | 33 21 2c 7b 52 31 34 7d |STMFD R1|3!,{R14}|
|00000c30| 0d 05 3c 22 41 44 52 20 | 52 30 2c 69 6e 66 6f 3b |..<"ADR |R0,info;|
|00000c40| 4c 6f 61 64 20 73 65 71 | 75 65 6e 63 65 20 69 6e |Load seq|uence in|
|00000c50| 66 6f 0d 05 46 14 4c 44 | 4d 49 41 20 52 30 2c 7b |fo..F.LD|MIA R0,{|
|00000c60| 52 37 2d 52 39 7d 0d 05 | 50 0d 2e 61 6e 64 61 67 |R7-R9}..|P..andag|
|00000c70| 61 69 6e 0d 05 5a 13 53 | 54 4d 46 44 20 52 31 33 |ain..Z.S|TMFD R13|
|00000c80| 21 2c 7b 52 39 7d 0d 05 | 64 0f 42 4c 20 74 72 61 |!,{R9}..|d.BL tra|
|00000c90| 63 6b 61 64 72 0d 05 6e | 12 4c 44 52 20 52 30 2c |ckadr..n|.LDR R0,|
|00000ca0| 73 65 71 62 61 73 65 0d | 05 78 2a 41 44 44 20 52 |seqbase.|.x*ADD R|
|00000cb0| 31 31 2c 52 30 2c 52 31 | 30 3b 52 31 31 3d 61 64 |11,R0,R1|0;R11=ad|
|00000cc0| 64 72 65 73 73 20 6f 66 | 20 73 65 71 75 65 6e 63 |dress of| sequenc|
|00000cd0| 65 0d 05 82 12 4c 44 52 | 20 52 30 2c 74 72 6b 62 |e....LDR| R0,trkb|
|00000ce0| 61 73 65 0d 05 8c 27 41 | 44 44 20 52 31 32 2c 52 |ase...'A|DD R12,R|
|00000cf0| 30 2c 52 31 30 3b 52 31 | 32 3d 61 64 64 72 65 73 |0,R10;R1|2=addres|
|00000d00| 73 20 6f 66 20 74 72 61 | 63 6b 0d 05 96 04 0d 05 |s of tra|ck......|
|00000d10| a0 29 4c 44 52 42 20 52 | 36 2c 5b 52 31 31 2c 52 |.)LDRB R|6,[R11,R|
|00000d20| 37 5d 3b 47 65 74 20 61 | 64 64 72 65 73 73 20 6f |7];Get a|ddress o|
|00000d30| 66 20 6e 6f 74 65 73 0d | 05 aa 19 41 44 44 20 52 |f notes.|...ADD R|
|00000d40| 31 32 2c 52 31 32 2c 52 | 36 2c 4c 53 4c 23 31 30 |12,R12,R|6,LSL#10|
|00000d50| 0d 05 b4 18 41 44 44 20 | 52 31 32 2c 52 31 32 2c |....ADD |R12,R12,|
|00000d60| 52 39 2c 4c 53 4c 23 34 | 0d 05 be 12 41 44 52 20 |R9,LSL#4|....ADR |
|00000d70| 52 39 2c 63 75 72 72 65 | 6e 74 0d 05 c8 04 0d 05 |R9,curre|nt......|
|00000d80| d2 1b 4d 4f 56 20 52 35 | 2c 23 33 3b 44 6f 20 34 |..MOV R5|,#3;Do 4|
|00000d90| 20 63 68 61 6e 6e 65 6c | 73 0d 05 dc 0e 2e 64 6f | channel|s.....do|
|00000da0| 63 68 61 6e 6e 65 6c 0d | 05 e6 18 41 44 44 20 52 |channel.|...ADD R|
|00000db0| 31 31 2c 52 31 32 2c 52 | 35 2c 4c 53 4c 23 32 0d |11,R12,R|5,LSL#2.|
|00000dc0| 05 f0 2a 4c 44 52 42 20 | 52 36 2c 5b 52 31 31 2c |..*LDRB |R6,[R11,|
|00000dd0| 23 32 5d 3b 47 65 74 20 | 69 6e 73 74 72 75 6d 65 |#2];Get |instrume|
|00000de0| 6e 74 20 6e 75 6d 62 65 | 72 0d 05 fa 1c 4d 4f 56 |nt numbe|r....MOV|
|00000df0| 53 20 52 36 2c 52 36 2c | 4c 53 52 23 34 3b 53 68 |S R6,R6,|LSR#4;Sh|
|00000e00| 75 66 66 6c 65 0d 06 04 | 42 53 54 52 4e 45 42 20 |uffle...|BSTRNEB |
|00000e10| 52 36 2c 5b 52 39 2c 52 | 35 5d 3b 49 66 20 69 74 |R6,[R9,R|5];If it|
|00000e20| 27 73 20 7a 65 72 6f 2c | 6c 6f 61 64 20 6c 61 73 |'s zero,|load las|
|00000e30| 74 20 69 6e 73 74 72 75 | 6d 65 6e 74 2c 65 6c 73 |t instru|ment,els|
|00000e40| 65 20 73 74 6f 72 65 0d | 06 0e 1f 4c 44 52 45 51 |e store.|...LDREQ|
|00000e50| 42 20 52 36 2c 5b 52 39 | 2c 52 35 5d 3b 74 68 69 |B R6,[R9|,R5];thi|
|00000e60| 73 20 6f 6e 65 2e 0d 06 | 18 26 43 4d 50 20 52 36 |s one...|.&CMP R6|
|00000e70| 2c 23 30 3b 41 6e 79 20 | 69 6e 73 74 72 75 6d 65 |,#0;Any |instrume|
|00000e80| 6e 74 20 73 65 6c 65 63 | 74 65 64 3f 0d 06 22 23 |nt selec|ted?.."#|
|00000e90| 42 45 51 20 6e 65 78 74 | 63 68 61 6e 6e 65 6c 3b |BEQ next|channel;|
|00000ea0| 44 6f 20 6e 65 78 74 20 | 63 68 61 6e 6e 65 6c 0d |Do next |channel.|
|00000eb0| 06 2c 32 53 55 42 20 52 | 36 2c 52 36 2c 23 31 3b |.,2SUB R|6,R6,#1;|
|00000ec0| 43 6f 72 72 65 63 74 20 | 52 36 20 66 6f 72 20 63 |Correct |R6 for c|
|00000ed0| 61 6c 63 75 6c 61 74 69 | 6f 6e 73 20 62 65 6c 6f |alculati|ons belo|
|00000ee0| 77 0d 06 36 18 4d 4f 56 | 20 52 30 2c 52 31 31 3b |w..6.MOV| R0,R11;|
|00000ef0| 47 65 74 20 70 69 74 63 | 68 0d 06 40 1d 42 4c 20 |Get pitc|h..@.BL |
|00000f00| 67 65 74 68 69 6c 6f 3b | 28 62 6c 6f 6f 64 79 20 |gethilo;|(bloody |
|00000f10| 36 38 30 30 8f 29 0d 06 | 4a 20 4d 4f 56 53 20 52 |6800.)..|J MOVS R|
|00000f20| 34 2c 52 30 3b 52 34 3d | 73 74 61 6e 64 61 72 64 |4,R0;R4=|standard|
|00000f30| 20 70 69 74 63 68 0d 06 | 54 3d 42 45 51 20 6e 65 | pitch..|T=BEQ ne|
|00000f40| 78 74 63 68 61 6e 6e 65 | 6c 3b 42 75 74 20 69 73 |xtchanne|l;But is|
|00000f50| 20 69 74 20 7a 65 72 6f | 3f 20 49 66 20 73 6f 2c | it zero|? If so,|
|00000f60| 64 6f 6e 27 74 20 70 6c | 61 79 20 61 6e 79 74 68 |don't pl|ay anyth|
|00000f70| 69 6e 67 0d 06 5e 3d 41 | 44 52 20 52 33 2c 63 68 |ing..^=A|DR R3,ch|
|00000f80| 61 6e 6e 65 6c 6e 6f 74 | 65 3b 53 61 76 65 20 70 |annelnot|e;Save p|
|00000f90| 69 74 63 68 20 66 6f 72 | 20 61 72 70 65 67 67 69 |itch for| arpeggi|
|00000fa0| 6f 2c 70 6f 72 74 61 6d | 65 6e 74 6f 2c 65 74 63 |o,portam|ento,etc|
|00000fb0| 0d 06 68 18 53 54 52 20 | 52 34 2c 5b 52 33 2c 52 |..h.STR |R4,[R3,R|
|00000fc0| 35 2c 4c 53 4c 23 32 5d | 0d 06 72 37 41 44 52 20 |5,LSL#2]|..r7ADR |
|00000fd0| 52 33 2c 69 6e 76 65 72 | 73 65 74 61 62 6c 65 3b |R3,inver|setable;|
|00000fe0| 53 63 61 6c 65 20 70 69 | 74 63 68 20 75 73 69 6e |Scale pi|tch usin|
|00000ff0| 67 20 69 6e 76 65 72 73 | 65 20 74 61 62 6c 65 0d |g invers|e table.|
|00001000| 06 7c 18 4c 44 52 20 52 | 34 2c 5b 52 33 2c 52 34 |.|.LDR R|4,[R3,R4|
|00001010| 2c 4c 53 4c 23 32 5d 0d | 06 86 11 41 44 52 20 52 |,LSL#2].|...ADR R|
|00001020| 32 2c 6f 75 72 69 6e 66 | 0d 06 90 38 41 44 44 20 |2,ourinf|...8ADD |
|00001030| 52 32 2c 52 32 2c 52 35 | 2c 4c 53 4c 23 35 3b 47 |R2,R2,R5|,LSL#5;G|
|00001040| 65 74 20 61 64 64 72 65 | 73 73 20 6f 66 20 66 69 |et addre|ss of fi|
|00001050| 6c 6c 20 63 6f 6e 74 72 | 6f 6c 20 62 6c 6f 63 6b |ll contr|ol block|
|00001060| 0d 06 9a 36 4d 4f 56 20 | 52 31 2c 23 30 3b 53 65 |...6MOV |R1,#0;Se|
|00001070| 74 20 66 69 6c 6c 20 74 | 6f 20 73 74 61 72 74 20 |t fill t|o start |
|00001080| 66 69 6c 6c 69 6e 67 20 | 61 74 20 7a 65 72 6f 20 |filling |at zero |
|00001090| 6f 66 66 73 65 74 0d 06 | a4 12 53 54 52 20 52 31 |offset..|..STR R1|
|000010a0| 2c 5b 52 32 2c 23 30 5d | 0d 06 ae 1c 53 54 52 20 |,[R2,#0]|....STR |
|000010b0| 52 34 2c 5b 52 32 2c 23 | 34 5d 3b 53 65 74 20 70 |R4,[R2,#|4];Set p|
|000010c0| 69 74 63 68 0d 06 b8 33 | 41 44 52 20 52 33 2c 73 |itch...3|ADR R3,s|
|000010d0| 61 6d 70 6c 65 6c 6f 63 | 3b 41 64 64 72 65 73 73 |ampleloc|;Address|
|000010e0| 20 6f 66 20 73 61 6d 70 | 6c 65 20 6c 6f 6f 6b 75 | of samp|le looku|
|000010f0| 70 20 74 61 62 6c 65 0d | 06 c2 30 4c 44 52 20 52 |p table.|..0LDR R|
|00001100| 33 2c 5b 52 33 2c 52 36 | 2c 4c 53 4c 23 32 5d 3b |3,[R3,R6|,LSL#2];|
|00001110| 52 33 3d 41 63 74 75 61 | 6c 20 73 61 6d 70 6c 65 |R3=Actua|l sample|
|00001120| 20 6f 66 66 73 65 74 0d | 06 cc 2a 41 44 44 20 52 | offset.|..*ADD R|
|00001130| 33 2c 52 33 2c 52 31 30 | 3b 52 33 3d 41 63 74 75 |3,R3,R10|;R3=Actu|
|00001140| 61 6c 20 73 61 6d 70 6c | 65 20 61 64 64 72 65 73 |al sampl|e addres|
|00001150| 73 0d 06 d6 2a 53 54 52 | 20 52 33 2c 5b 52 32 2c |s...*STR| R3,[R2,|
|00001160| 23 31 36 5d 3b 53 65 74 | 20 69 6e 73 74 72 75 6d |#16];Set| instrum|
|00001170| 65 6e 74 20 61 64 64 72 | 65 73 73 0d 06 e0 38 41 |ent addr|ess...8A|
|00001180| 44 44 20 52 33 2c 52 31 | 30 2c 23 26 31 34 3b 4f |DD R3,R1|0,#&14;O|
|00001190| 66 66 73 65 74 20 6f 66 | 20 73 61 6d 70 6c 65 20 |ffset of| sample |
|000011a0| 70 6c 61 79 20 64 61 74 | 61 20 66 72 6f 6d 20 62 |play dat|a from b|
|000011b0| 61 73 65 0d 06 ea 28 4d | 4f 56 20 52 31 2c 23 26 |ase...(M|OV R1,#&|
|000011c0| 31 45 3b 28 73 61 6d 70 | 6c 65 20 64 61 74 61 20 |1E;(samp|le data |
|000011d0| 6d 75 6c 74 69 70 6c 69 | 65 72 29 0d 06 f4 30 4d |multipli|er)...0M|
|000011e0| 4c 41 20 52 33 2c 52 36 | 2c 52 31 2c 52 33 3b 52 |LA R3,R6|,R1,R3;R|
|000011f0| 33 3d 69 6e 73 74 72 75 | 6d 65 6e 74 20 70 6c 61 |3=instru|ment pla|
|00001200| 79 20 64 61 74 61 20 62 | 61 73 65 0d 06 fe 24 41 |y data b|ase...$A|
|00001210| 44 44 20 52 30 2c 52 33 | 2c 23 26 31 43 3b 47 65 |DD R0,R3|,#&1C;Ge|
|00001220| 74 20 72 65 70 65 61 74 | 20 6c 65 6e 67 74 68 0d |t repeat| length.|
|00001230| 07 08 0e 42 4c 20 67 65 | 74 68 69 6c 6f 0d 07 12 |...BL ge|thilo...|
|00001240| 19 43 4d 50 20 52 30 2c | 23 31 3b 4e 6f 20 72 65 |.CMP R0,|#1;No re|
|00001250| 70 65 61 74 73 3f 0d 07 | 1c 24 42 45 51 20 6e 6f |peats?..|.$BEQ no|
|00001260| 72 65 70 3b 42 72 61 6e | 63 68 20 74 6f 20 74 68 |rep;Bran|ch to th|
|00001270| 65 20 6e 65 78 74 20 62 | 69 74 0d 07 26 28 4d 4f |e next b|it..&(MO|
|00001280| 56 20 52 31 2c 52 30 2c | 4c 53 4c 23 31 3b 78 32 |V R1,R0,|LSL#1;x2|
|00001290| 20 66 6f 72 20 72 65 70 | 65 61 74 20 6c 65 6e 67 | for rep|eat leng|
|000012a0| 74 68 0d 07 30 2a 41 44 | 44 20 52 30 2c 52 33 2c |th..0*AD|D R0,R3,|
|000012b0| 23 26 31 41 3b 47 65 74 | 20 72 65 70 65 61 74 20 |#&1A;Get| repeat |
|000012c0| 73 74 61 72 74 20 6f 66 | 66 73 65 74 0d 07 3a 0e |start of|fset..:.|
|000012d0| 42 4c 20 67 65 74 68 69 | 6c 6f 0d 07 44 32 41 44 |BL gethi|lo..D2AD|
|000012e0| 44 20 52 30 2c 52 30 2c | 52 31 3b 4d 61 6b 65 20 |D R0,R0,|R1;Make |
|000012f0| 6e 65 77 20 6c 65 6e 67 | 74 68 20 62 79 20 61 64 |new leng|th by ad|
|00001300| 64 69 6e 67 20 74 68 65 | 20 74 77 6f 0d 07 4e 1e |ding the| two..N.|
|00001310| 53 54 52 20 52 30 2c 5b | 52 32 2c 23 31 32 5d 3b |STR R0,[|R2,#12];|
|00001320| 61 6e 64 20 73 65 74 20 | 69 74 0d 07 58 12 41 44 |and set |it..X.AD|
|00001330| 44 20 52 30 2c 52 33 2c | 23 26 31 41 0d 07 62 24 |D R0,R3,|#&1A..b$|
|00001340| 42 4c 20 67 65 74 68 69 | 6c 6f 3b 47 65 74 20 73 |BL gethi|lo;Get s|
|00001350| 74 61 72 74 20 72 65 70 | 65 61 74 20 70 6f 73 6e |tart rep|eat posn|
|00001360| 0d 07 6c 1e 41 44 44 20 | 52 30 2c 52 30 2c 23 31 |..l.ADD |R0,R0,#1|
|00001370| 3b 6d 61 6b 65 20 6e 6f | 6e 2d 7a 65 72 6f 0d 07 |;make no|n-zero..|
|00001380| 76 1b 53 54 52 20 52 30 | 2c 5b 52 32 2c 23 38 5d |v.STR R0|,[R2,#8]|
|00001390| 3b 53 74 6f 72 65 20 69 | 74 0d 07 80 1f 42 20 6e |;Store i|t....B n|
|000013a0| 65 78 74 3b 62 72 61 6e | 63 68 20 6f 76 65 72 20 |ext;bran|ch over |
|000013b0| 6e 65 78 74 20 62 69 74 | 0d 07 8a 0a 2e 6e 6f 72 |next bit|.....nor|
|000013c0| 65 70 0d 07 94 12 41 44 | 44 20 52 30 2c 52 33 2c |ep....AD|D R0,R3,|
|000013d0| 23 26 31 36 0d 07 9e 2b | 42 4c 20 67 65 74 68 69 |#&16...+|BL gethi|
|000013e0| 6c 6f 3b 47 65 74 20 74 | 68 65 20 6c 65 6e 67 74 |lo;Get t|he lengt|
|000013f0| 68 20 6f 66 20 74 68 65 | 20 73 61 6d 70 6c 65 0d |h of the| sample.|
|00001400| 07 a8 20 4d 4f 56 20 52 | 30 2c 52 30 2c 4c 53 4c |.. MOV R|0,R0,LSL|
|00001410| 23 31 3b 78 32 20 6f 66 | 20 63 6f 75 72 73 65 0d |#1;x2 of| course.|
|00001420| 07 b2 1e 53 54 52 20 52 | 30 2c 5b 52 32 2c 23 31 |...STR R|0,[R2,#1|
|00001430| 32 5d 3b 61 6e 64 20 73 | 65 74 20 69 74 0d 07 bc |2];and s|et it...|
|00001440| 12 41 44 44 20 52 30 2c | 52 33 2c 23 26 31 41 0d |.ADD R0,|R3,#&1A.|
|00001450| 07 c6 24 42 4c 20 67 65 | 74 68 69 6c 6f 3b 47 65 |..$BL ge|thilo;Ge|
|00001460| 74 20 73 74 61 72 74 20 | 72 65 70 65 61 74 20 70 |t start |repeat p|
|00001470| 6f 73 6e 0d 07 d0 1b 53 | 54 52 20 52 30 2c 5b 52 |osn....S|TR R0,[R|
|00001480| 32 2c 23 38 5d 3b 53 74 | 6f 72 65 20 69 74 0d 07 |2,#8];St|ore it..|
|00001490| da 24 2e 6e 65 78 74 3b | 42 65 66 6f 72 65 20 77 |.$.next;|Before w|
|000014a0| 65 20 67 6f 2c 64 6f 20 | 74 68 65 20 76 6f 6c 75 |e go,do |the volu|
|000014b0| 6d 65 0d 07 e4 12 41 44 | 44 20 52 30 2c 52 33 2c |me....AD|D R0,R3,|
|000014c0| 23 26 31 38 0d 07 ee 19 | 42 4c 20 67 65 74 68 69 |#&18....|BL gethi|
|000014d0| 6c 6f 3b 47 65 74 20 76 | 6f 6c 75 6d 65 0d 07 f8 |lo;Get v|olume...|
|000014e0| 14 43 4d 50 20 52 30 2c | 23 36 34 3b 4f 76 65 72 |.CMP R0,|#64;Over|
|000014f0| 3f 0d 08 02 18 4d 4f 56 | 47 45 20 52 30 2c 23 36 |?....MOV|GE R0,#6|
|00001500| 33 3b 43 6f 72 72 65 63 | 74 0d 08 0c 1e 41 44 52 |3;Correc|t....ADR|
|00001510| 20 52 31 2c 76 6f 6c 74 | 61 62 3b 56 6f 6c 75 6d | R1,volt|ab;Volum|
|00001520| 65 20 74 61 62 6c 65 0d | 08 16 22 4c 44 52 42 20 |e table.|.."LDRB |
|00001530| 52 30 2c 5b 52 31 2c 52 | 30 5d 3b 47 65 74 20 6e |R0,[R1,R|0];Get n|
|00001540| 65 77 20 76 6f 6c 75 6d | 65 0d 08 20 1c 53 54 52 |ew volum|e.. .STR|
|00001550| 20 52 30 2c 5b 52 32 2c | 23 32 30 5d 3b 53 74 6f | R0,[R2,|#20];Sto|
|00001560| 72 65 20 69 74 0d 08 2a | 10 2e 6e 65 78 74 63 68 |re it..*|..nextch|
|00001570| 61 6e 6e 65 6c 0d 08 34 | 30 41 44 52 20 52 33 2c |annel..4|0ADR R3,|
|00001580| 65 66 66 65 63 74 74 79 | 70 65 3b 43 61 6e 63 65 |effectty|pe;Cance|
|00001590| 6c 20 61 6e 79 20 63 75 | 72 72 65 6e 74 20 65 66 |l any cu|rrent ef|
|000015a0| 66 65 63 74 73 0d 08 3e | 0e 4d 4f 56 20 52 34 2c |fects..>|.MOV R4,|
|000015b0| 23 30 3b 0d 08 48 19 53 | 54 52 20 52 34 2c 5b 52 |#0;..H.S|TR R4,[R|
|000015c0| 33 2c 52 35 2c 4c 53 4c | 23 32 5d 3b 0d 08 52 24 |3,R5,LSL|#2];..R$|
|000015d0| 42 4c 20 65 66 66 65 63 | 74 63 68 65 63 6b 3b 43 |BL effec|tcheck;C|
|000015e0| 68 65 63 6b 20 66 6f 72 | 20 65 66 66 65 63 74 73 |heck for| effects|
|000015f0| 0d 08 5c 2a 53 55 42 53 | 20 52 35 2c 52 35 2c 23 |..\*SUBS| R5,R5,#|
|00001600| 31 3b 44 65 63 72 65 6d | 65 6e 74 20 63 68 61 6e |1;Decrem|ent chan|
|00001610| 6e 65 6c 20 6e 75 6d 62 | 65 72 0d 08 66 29 42 50 |nel numb|er..f)BP|
|00001620| 4c 20 64 6f 63 68 61 6e | 6e 65 6c 3b 4e 6f 70 65 |L dochan|nel;Nope|
|00001630| 2c 64 6f 20 61 6e 6f 74 | 68 65 72 20 63 68 61 6e |,do anot|her chan|
|00001640| 6e 65 6c 0d 08 70 24 4c | 44 4d 46 44 20 52 31 33 |nel..p$L|DMFD R13|
|00001650| 21 2c 7b 52 39 7d 3b 47 | 65 74 20 6f 75 72 20 52 |!,{R9};G|et our R|
|00001660| 39 20 62 61 63 6b 21 0d | 08 7a 29 4c 44 52 20 52 |9 back!.|.z)LDR R|
|00001670| 30 2c 6a 75 6d 70 66 6c | 61 67 3b 53 6b 69 70 20 |0,jumpfl|ag;Skip |
|00001680| 72 65 73 74 20 6f 66 20 | 70 61 74 74 65 72 6e 3f |rest of |pattern?|
|00001690| 0d 08 84 0e 43 4d 50 20 | 52 30 2c 23 30 3b 0d 08 |....CMP |R0,#0;..|
|000016a0| 8e 14 4d 4f 56 4e 45 20 | 52 39 2c 23 36 33 3b 59 |..MOVNE |R9,#63;Y|
|000016b0| 65 70 0d 08 98 1e 4d 4f | 56 4e 45 20 52 30 2c 23 |ep....MO|VNE R0,#|
|000016c0| 30 3b 52 65 73 65 74 20 | 74 68 65 20 66 6c 61 67 |0;Reset |the flag|
|000016d0| 0d 08 a2 16 53 54 52 4e | 45 20 52 30 2c 6a 75 6d |....STRN|E R0,jum|
|000016e0| 70 66 6c 61 67 3b 0d 08 | ac 2a 41 44 44 20 52 39 |pflag;..|.*ADD R9|
|000016f0| 2c 52 39 2c 23 31 3b 49 | 6e 63 72 65 6d 65 6e 74 |,R9,#1;I|ncrement|
|00001700| 20 73 65 71 75 65 6e 63 | 65 20 6e 75 6d 62 65 72 | sequenc|e number|
|00001710| 0d 08 b6 21 43 4d 50 20 | 52 39 2c 23 36 34 3b 46 |...!CMP |R9,#64;F|
|00001720| 69 6e 69 73 68 65 64 20 | 73 65 71 75 65 6e 63 65 |inished |sequence|
|00001730| 3f 0d 08 c0 34 42 4e 45 | 20 76 65 6e 64 3b 49 66 |?...4BNE| vend;If|
|00001740| 20 6e 6f 74 2c 64 6f 6e | 27 74 20 67 6f 20 6f 6e | not,don|'t go on|
|00001750| 74 6f 20 6e 65 78 74 20 | 70 61 74 74 65 72 6e 20 |to next |pattern |
|00001760| 65 6e 74 72 79 0d 08 ca | 0d 4d 4f 56 20 52 39 2c |entry...|.MOV R9,|
|00001770| 23 30 0d 08 d4 27 41 44 | 44 20 52 37 2c 52 37 2c |#0...'AD|D R7,R7,|
|00001780| 23 31 3b 49 6e 63 72 65 | 6d 65 6e 74 20 70 61 74 |#1;Incre|ment pat|
|00001790| 74 65 72 6e 20 70 6f 73 | 6e 0d 08 de 1a 43 4d 50 |tern pos|n....CMP|
|000017a0| 20 52 37 2c 52 38 3b 45 | 6e 64 20 6f 66 20 73 6f | R7,R8;E|nd of so|
|000017b0| 6e 67 3f 0d 08 e8 23 4d | 4f 56 47 54 20 52 37 2c |ng?...#M|OVGT R7,|
|000017c0| 23 30 3b 2e 2e 2e 61 6e | 64 20 61 67 61 69 6e 2c |#0;...an|d again,|
|000017d0| 66 6f 6c 6b 73 21 0d 08 | f2 09 2e 76 65 6e 64 0d |folks!..|...vend.|
|000017e0| 08 fc 0f 41 44 52 20 52 | 30 2c 69 6e 66 6f 0d 09 |...ADR R|0,info..|
|000017f0| 06 25 53 54 4d 49 41 20 | 52 30 2c 7b 52 37 2d 52 |.%STMIA |R0,{R7-R|
|00001800| 39 7d 3b 53 74 6f 72 65 | 20 6e 65 77 20 76 61 6c |9};Store| new val|
|00001810| 75 65 73 0d 09 10 1e 4c | 44 4d 46 44 20 52 31 33 |ues....L|DMFD R13|
|00001820| 21 2c 7b 50 43 7d 3b 41 | 6e 64 20 72 65 74 75 72 |!,{PC};A|nd retur|
|00001830| 6e 0d 09 1a 04 0d 09 24 | 19 3b 2a 2a 2a 2a 2a 2a |n......$|.;******|
|00001840| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0d 09 |********|******..|
|00001850| 2e 0c 2e 67 65 74 68 69 | 6c 6f 0d 09 38 0f 4c 44 |...gethi|lo..8.LD|
|00001860| 52 20 52 30 2c 5b 52 30 | 5d 0d 09 42 13 4d 4f 56 |R R0,[R0|]..B.MOV|
|00001870| 20 52 30 2c 52 30 2c 4c | 53 4c 23 38 0d 09 4c 16 | R0,R0,L|SL#8..L.|
|00001880| 42 49 43 20 52 30 2c 52 | 30 2c 23 26 46 46 3c 3c |BIC R0,R|0,#&FF<<|
|00001890| 32 34 0d 09 56 16 84 52 | 20 52 30 2c 52 30 2c 52 |24..V..R| R0,R0,R|
|000018a0| 30 2c 4c 53 52 23 31 36 | 0d 09 60 16 42 49 43 20 |0,LSR#16|..`.BIC |
|000018b0| 52 30 2c 52 30 2c 23 26 | 46 46 3c 3c 31 36 0d 09 |R0,R0,#&|FF<<16..|
|000018c0| 6a 0e 4d 4f 56 20 50 43 | 2c 52 31 34 0d 09 74 1a |j.MOV PC|,R14..t.|
|000018d0| 3b 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |;*******|********|
|000018e0| 2a 2a 2a 2a 2a 2a 0d 09 | 7e 04 0d 09 88 04 0d 09 |******..|~.......|
|000018f0| 92 26 2e 65 66 66 65 63 | 74 63 68 65 63 6b 3b 43 |.&.effec|tcheck;C|
|00001900| 68 65 63 6b 20 66 6f 72 | 20 61 6e 79 20 65 66 66 |heck for| any eff|
|00001910| 65 63 74 73 0d 09 9c 1d | 4c 44 52 42 20 52 36 2c |ects....|LDRB R6,|
|00001920| 5b 52 31 31 2c 23 33 5d | 3b 47 65 74 20 69 6e 66 |[R11,#3]|;Get inf|
|00001930| 6f 0d 09 a6 26 4c 44 52 | 42 20 52 34 2c 5b 52 31 |o...&LDR|B R4,[R1|
|00001940| 31 2c 23 32 5d 3b 47 65 | 74 20 65 66 66 65 63 74 |1,#2];Ge|t effect|
|00001950| 20 6e 75 6e 62 65 72 0d | 09 b0 0f 80 52 34 2c 52 | nunber.|....R4,R|
|00001960| 34 2c 23 26 46 3b 0d 09 | ba 1d 43 4d 50 20 52 34 |4,#&F;..|..CMP R4|
|00001970| 2c 23 26 43 3b 56 6f 6c | 75 6d 65 20 63 68 61 6e |,#&C;Vol|ume chan|
|00001980| 67 65 3f 0d 09 c4 0e 42 | 4e 45 20 65 66 66 3b 4e |ge?....B|NE eff;N|
|00001990| 6f 0d 09 ce 14 43 4d 50 | 20 52 36 2c 23 36 34 3b |o....CMP| R6,#64;|
|000019a0| 4f 76 65 72 3f 0d 09 d8 | 18 4d 4f 56 47 45 20 52 |Over?...|.MOVGE R|
|000019b0| 36 2c 23 36 33 3b 43 6f | 72 72 65 63 74 0d 09 e2 |6,#63;Co|rrect...|
|000019c0| 12 41 44 52 20 52 31 2c | 76 6f 6c 74 61 62 3b 0d |.ADR R1,|voltab;.|
|000019d0| 09 ec 23 4c 44 52 42 20 | 52 30 2c 5b 52 31 2c 52 |..#LDRB |R0,[R1,R|
|000019e0| 36 5d 3b 47 65 74 20 72 | 69 67 68 74 20 75 6e 69 |6];Get r|ight uni|
|000019f0| 74 73 0d 09 f6 24 41 44 | 52 20 52 31 2c 6f 75 72 |ts...$AD|R R1,our|
|00001a00| 69 6e 66 3b 46 69 6e 64 | 20 74 61 62 6c 65 20 61 |inf;Find| table a|
|00001a10| 64 64 72 65 73 73 0d 0a | 00 17 41 44 44 20 52 31 |ddress..|..ADD R1|
|00001a20| 2c 52 31 2c 52 35 2c 4c | 53 4c 23 35 3b 0d 0a 0a |,R1,R5,L|SL#5;...|
|00001a30| 24 53 54 52 20 52 30 2c | 5b 52 31 2c 23 32 30 5d |$STR R0,|[R1,#20]|
|00001a40| 3b 53 74 6f 72 65 20 6e | 65 77 20 76 6f 6c 75 6d |;Store n|ew volum|
|00001a50| 65 0d 0a 14 0e 4d 4f 56 | 20 50 43 2c 52 31 34 0d |e....MOV| PC,R14.|
|00001a60| 0a 1e 08 2e 65 66 66 0d | 0a 28 1d 43 4d 50 20 52 |....eff.|.(.CMP R|
|00001a70| 34 2c 23 26 44 3b 50 61 | 74 74 65 72 6e 20 62 72 |4,#&D;Pa|ttern br|
|00001a80| 65 61 6b 3f 0d 0a 32 2c | 53 54 52 45 51 20 52 34 |eak?..2,|STREQ R4|
|00001a90| 2c 6a 75 6d 70 66 6c 61 | 67 3b 4a 75 6d 70 20 74 |,jumpfla|g;Jump t|
|00001aa0| 6f 20 65 6e 64 20 6f 66 | 20 70 61 74 74 65 72 6e |o end of| pattern|
|00001ab0| 0d 0a 3c 0e ec 51 20 50 | 43 2c 52 31 34 3b 0d 0a |..<..Q P|C,R14;..|
|00001ac0| 46 1c 43 4d 50 20 52 34 | 2c 23 26 46 3b 43 68 61 |F.CMP R4|,#&F;Cha|
|00001ad0| 6e 67 65 20 73 70 65 65 | 64 3f 0d 0a 50 0f 42 4e |nge spee|d?..P.BN|
|00001ae0| 45 20 65 66 66 31 3b 4e | 6f 0d 0a 5a 1d 80 52 36 |E eff1;N|o..Z..R6|
|00001af0| 2c 52 36 2c 23 26 46 3b | 4d 61 73 6b 20 6e 65 77 |,R6,#&F;|Mask new|
|00001b00| 20 73 70 65 65 64 0d 0a | 64 19 53 54 52 20 52 36 | speed..|d.STR R6|
|00001b10| 2c 73 70 65 65 64 3b 53 | 74 6f 72 65 20 69 74 0d |,speed;S|tore it.|
|00001b20| 0a 6e 15 4d 4f 56 20 50 | 43 2c 52 31 34 3b 52 65 |.n.MOV P|C,R14;Re|
|00001b30| 74 75 72 6e 0d 0a 78 09 | 2e 65 66 66 31 0d 0a 82 |turn..x.|.eff1...|
|00001b40| 1c 43 4d 50 20 52 34 2c | 23 31 3b 50 6f 72 74 61 |.CMP R4,|#1;Porta|
|00001b50| 6d 65 6e 74 6f 20 75 70 | 3f 0d 0a 8c 11 42 4c 54 |mento up|?....BLT|
|00001b60| 20 65 66 66 32 3b 4e 6f | 70 65 0d 0a 96 16 43 4d | eff2;No|pe....CM|
|00001b70| 50 20 52 34 2c 23 32 3b | 4f 72 20 64 6f 77 6e 3f |P R4,#2;|Or down?|
|00001b80| 0d 0a a0 11 42 47 54 20 | 65 66 66 32 3b 4e 6f 70 |....BGT |eff2;Nop|
|00001b90| 65 0d 0a aa 23 84 52 20 | 52 36 2c 52 36 2c 52 34 |e...#.R |R6,R6,R4|
|00001ba0| 2c 4c 53 4c 23 38 3b 4d | 61 6b 65 20 6e 65 77 20 |,LSL#8;M|ake new |
|00001bb0| 77 6f 72 64 0d 0a b4 1d | 41 44 52 20 52 33 2c 65 |word....|ADR R3,e|
|00001bc0| 66 66 65 63 74 74 79 70 | 65 3b 53 61 76 65 20 69 |ffecttyp|e;Save i|
|00001bd0| 74 0d 0a be 19 53 54 52 | 20 52 36 2c 5b 52 33 2c |t....STR| R6,[R3,|
|00001be0| 52 35 2c 4c 53 4c 23 32 | 5d 3b 0d 0a c8 15 4d 4f |R5,LSL#2|];....MO|
|00001bf0| 56 20 50 43 2c 52 31 34 | 3b 52 65 74 75 72 6e 0d |V PC,R14|;Return.|
|00001c00| 0a d2 09 2e 65 66 66 32 | 0d 0a dc 15 4d 4f 56 20 |....eff2|....MOV |
|00001c10| 50 43 2c 52 31 34 3b 52 | 65 74 75 72 6e 0d 0a e6 |PC,R14;R|eturn...|
|00001c20| 04 0d 0a f0 3f 2e 64 6f | 65 66 66 65 63 74 3b 44 |....?.do|effect;D|
|00001c30| 6f 20 65 66 66 65 63 74 | 20 64 65 74 61 69 6c 65 |o effect| detaile|
|00001c40| 64 20 69 6e 20 27 65 66 | 66 65 63 74 74 79 70 65 |d in 'ef|fecttype|
|00001c50| 27 20 28 52 31 3d 73 75 | 62 6e 6f 74 65 20 23 29 |' (R1=su|bnote #)|
|00001c60| 0d 0a fa 18 4d 4f 56 20 | 52 35 2c 23 33 3b 34 20 |....MOV |R5,#3;4 |
|00001c70| 63 68 61 6e 6e 65 6c 73 | 0d 0b 04 21 41 44 52 20 |channels|...!ADR |
|00001c80| 52 32 2c 63 68 61 6e 6e | 65 6c 6e 6f 74 65 3b 41 |R2,chann|elnote;A|
|00001c90| 6d 69 67 61 2d 6e 6f 74 | 65 0d 0b 0e 29 41 44 52 |miga-not|e...)ADR|
|00001ca0| 20 52 33 2c 65 66 66 65 | 63 74 74 79 70 65 3b 52 | R3,effe|cttype;R|
|00001cb0| 33 3d 65 66 66 65 63 74 | 74 79 70 65 20 74 61 62 |3=effect|type tab|
|00001cc0| 6c 65 0d 0b 18 35 41 44 | 52 20 52 34 2c 69 6e 76 |le...5AD|R R4,inv|
|00001cd0| 65 72 73 65 74 61 62 6c | 65 3b 52 34 3d 69 6e 76 |ersetabl|e;R4=inv|
|00001ce0| 65 72 73 65 20 70 69 74 | 63 68 20 6c 6f 6f 6b 75 |erse pit|ch looku|
|00001cf0| 70 20 74 61 62 6c 65 0d | 0b 22 0b 2e 64 6f 65 66 |p table.|."..doef|
|00001d00| 66 31 0d 0b 2c 3e 41 44 | 52 20 52 38 2c 6f 75 72 |f1..,>AD|R R8,our|
|00001d10| 69 6e 66 3b 43 61 6c 63 | 75 6c 61 74 65 20 61 64 |inf;Calc|ulate ad|
|00001d20| 64 72 65 73 73 20 6f 66 | 66 73 65 74 20 6f 66 20 |dress of|fset of |
|00001d30| 76 6f 69 63 65 2d 69 6e | 66 6f 20 74 61 62 6c 65 |voice-in|fo table|
|00001d40| 0d 0b 36 17 41 44 44 20 | 52 38 2c 52 38 2c 52 35 |..6.ADD |R8,R8,R5|
|00001d50| 2c 4c 53 4c 23 35 3b 0d | 0b 40 2a 4c 44 52 20 52 |,LSL#5;.|.@*LDR R|
|00001d60| 30 2c 5b 52 33 2c 52 35 | 2c 4c 53 4c 23 32 5d 3b |0,[R3,R5|,LSL#2];|
|00001d70| 41 6e 79 20 65 66 66 65 | 63 74 20 74 6f 20 64 6f |Any effe|ct to do|
|00001d80| 3f 0d 0b 4a 0e 43 4d 50 | 20 52 30 2c 23 30 3b 0d |?..J.CMP| R0,#0;.|
|00001d90| 0b 54 16 42 45 51 20 64 | 6f 65 66 66 6e 65 78 74 |.T.BEQ d|oeffnext|
|00001da0| 3b 4e 6f 70 65 0d 0b 5e | 1f 80 52 36 2c 52 30 2c |;Nope..^|..R6,R0,|
|00001db0| 23 26 46 30 30 3b 52 36 | 3d 65 66 66 65 63 74 20 |#&F00;R6|=effect |
|00001dc0| 74 79 70 65 0d 0b 68 1e | 80 52 30 2c 52 30 2c 23 |type..h.|.R0,R0,#|
|00001dd0| 26 46 46 3b 52 30 3d 65 | 66 66 65 63 74 20 64 61 |&FF;R0=e|ffect da|
|00001de0| 74 61 0d 0b 72 04 0d 0b | 7c 1f 43 4d 50 20 52 36 |ta..r...||.CMP R6|
|00001df0| 2c 23 26 31 30 30 3b 50 | 6f 72 74 61 6d 65 6e 74 |,#&100;P|ortament|
|00001e00| 6f 20 75 70 3f 0d 0b 86 | 0f 42 4e 45 20 64 6f 65 |o up?...|.BNE doe|
|00001e10| 31 3b 4e 6f 0d 0b 90 29 | 4c 44 52 20 52 36 2c 5b |1;No...)|LDR R6,[|
|00001e20| 52 32 2c 52 35 2c 4c 53 | 4c 23 32 5d 3b 47 65 74 |R2,R5,LS|L#2];Get|
|00001e30| 20 63 75 72 72 65 6e 74 | 20 74 6f 6e 65 0d 0b 9a | current| tone...|
|00001e40| 19 53 55 42 20 52 30 2c | 52 30 2c 23 31 3b 53 6c |.SUB R0,|R0,#1;Sl|
|00001e50| 69 64 65 20 75 70 0d 0b | a4 10 53 55 42 20 52 36 |ide up..|..SUB R6|
|00001e60| 2c 52 36 2c 52 30 0d 0b | ae 20 53 54 52 20 52 36 |,R6,R0..|. STR R6|
|00001e70| 2c 5b 52 32 2c 52 35 2c | 4c 53 4c 23 32 5d 3b 52 |,[R2,R5,|LSL#2];R|
|00001e80| 65 2d 73 61 76 65 0d 0b | b8 31 4c 44 52 20 52 36 |e-save..|.1LDR R6|
|00001e90| 2c 5b 52 34 2c 52 36 2c | 4c 53 4c 23 32 5d 3b 47 |,[R4,R6,|LSL#2];G|
|00001ea0| 65 74 20 61 72 63 68 69 | 6d 65 64 65 73 2d 66 72 |et archi|medes-fr|
|00001eb0| 65 71 75 65 6e 63 79 0d | 0b c2 29 53 54 52 20 52 |equency.|..)STR R|
|00001ec0| 36 2c 5b 52 38 2c 23 34 | 5d 3b 50 75 74 20 69 6e |6,[R8,#4|];Put in|
|00001ed0| 20 70 61 72 61 6d 65 74 | 65 72 20 62 6c 6f 63 6b | paramet|er block|
|00001ee0| 0d 0b cc 0f 42 20 64 6f | 65 66 66 6e 65 78 74 0d |....B do|effnext.|
|00001ef0| 0b d6 04 0d 0b e0 09 2e | 64 6f 65 31 0d 0b ea 21 |........|doe1...!|
|00001f00| 43 4d 50 20 52 36 2c 23 | 26 32 30 30 3b 50 6f 72 |CMP R6,#|&200;Por|
|00001f10| 74 61 6d 65 6e 74 6f 20 | 64 6f 77 6e 3f 0d 0b f4 |tamento |down?...|
|00001f20| 0f 42 4e 45 20 64 6f 65 | 32 3b 4e 6f 0d 0b fe 29 |.BNE doe|2;No...)|
|00001f30| 4c 44 52 20 52 36 2c 5b | 52 32 2c 52 35 2c 4c 53 |LDR R6,[|R2,R5,LS|
|00001f40| 4c 23 32 5d 3b 47 65 74 | 20 63 75 72 72 65 6e 74 |L#2];Get| current|
|00001f50| 20 74 6f 6e 65 0d 0c 08 | 1b 53 55 42 20 52 30 2c | tone...|.SUB R0,|
|00001f60| 52 30 2c 23 31 3b 53 6c | 69 64 65 20 64 6f 77 6e |R0,#1;Sl|ide down|
|00001f70| 0d 0c 12 10 41 44 44 20 | 52 36 2c 52 36 2c 52 30 |....ADD |R6,R6,R0|
|00001f80| 0d 0c 1c 20 53 54 52 20 | 52 36 2c 5b 52 32 2c 52 |... STR |R6,[R2,R|
|00001f90| 35 2c 4c 53 4c 23 32 5d | 3b 52 65 2d 73 61 76 65 |5,LSL#2]|;Re-save|
|00001fa0| 0d 0c 26 31 4c 44 52 20 | 52 36 2c 5b 52 34 2c 52 |..&1LDR |R6,[R4,R|
|00001fb0| 36 2c 4c 53 4c 23 32 5d | 3b 47 65 74 20 61 72 63 |6,LSL#2]|;Get arc|
|00001fc0| 68 69 6d 65 64 65 73 2d | 66 72 65 71 75 65 6e 63 |himedes-|frequenc|
|00001fd0| 79 0d 0c 30 29 53 54 52 | 20 52 36 2c 5b 52 38 2c |y..0)STR| R6,[R8,|
|00001fe0| 23 34 5d 3b 50 75 74 20 | 69 6e 20 70 61 72 61 6d |#4];Put |in param|
|00001ff0| 65 74 65 72 20 62 6c 6f | 63 6b 0d 0c 3a 0f 42 20 |eter blo|ck..:.B |
|00002000| 64 6f 65 66 66 6e 65 78 | 74 0d 0c 44 09 2e 64 6f |doeffnex|t..D..do|
|00002010| 65 32 0d 0c 4e 0e 2e 64 | 6f 65 66 66 6e 65 78 74 |e2..N..d|oeffnext|
|00002020| 0d 0c 58 1e 53 55 42 53 | 20 52 35 2c 52 35 2c 23 |..X.SUBS| R5,R5,#|
|00002030| 31 3b 4e 65 78 74 20 63 | 68 61 6e 6e 65 6c 0d 0c |1;Next c|hannel..|
|00002040| 62 0f 42 50 4c 20 64 6f | 65 66 66 31 3b 0d 0c 6c |b.BPL do|eff1;..l|
|00002050| 1d 4d 4f 56 20 50 43 2c | 52 31 34 3b 4e 6f 20 6d |.MOV PC,|R14;No m|
|00002060| 6f 72 65 2c 72 65 74 75 | 72 6e 0d 0c 76 04 0d 0c |ore,retu|rn..v...|
|00002070| 80 0d 2e 6a 75 6d 70 66 | 6c 61 67 0d 0c 8a 2d 45 |...jumpf|lag...-E|
|00002080| 51 55 44 20 30 3b 3c 3e | 30 20 69 66 20 70 61 74 |QUD 0;<>|0 if pat|
|00002090| 74 65 72 6e 20 69 73 20 | 74 6f 20 62 65 20 74 65 |tern is |to be te|
|000020a0| 72 6d 69 6e 61 74 65 64 | 0d 0c 94 04 0d 0c 9e 0b |rminated|........|
|000020b0| 2e 6f 6c 64 76 6f 78 0d | 0c a8 23 45 51 55 44 20 |.oldvox.|..#EQUD |
|000020c0| 30 3b 53 6f 20 77 65 20 | 63 61 6e 20 6b 69 6c 6c |0;So we |can kill|
|000020d0| 20 74 68 65 20 76 6f 69 | 63 65 0d 0c b2 04 0d 0c | the voi|ce......|
|000020e0| bc 26 2e 73 61 6d 70 6c | 65 6c 6f 63 3b 54 61 62 |.&.sampl|eloc;Tab|
|000020f0| 6c 65 20 6f 66 20 73 61 | 6d 70 6c 65 20 6f 66 66 |le of sa|mple off|
|00002100| 73 65 74 73 0d 0c c6 1f | 45 51 55 44 20 30 3a 45 |sets....|EQUD 0:E|
|00002110| 51 55 44 20 30 3a 45 51 | 55 44 20 30 3a 45 51 55 |QUD 0:EQ|UD 0:EQU|
|00002120| 44 20 30 0d 0c d0 1f 45 | 51 55 44 20 30 3a 45 51 |D 0....E|QUD 0:EQ|
|00002130| 55 44 20 30 3a 45 51 55 | 44 20 30 3a 45 51 55 44 |UD 0:EQU|D 0:EQUD|
|00002140| 20 30 0d 0c da 1f 45 51 | 55 44 20 30 3a 45 51 55 | 0....EQ|UD 0:EQU|
|00002150| 44 20 30 3a 45 51 55 44 | 20 30 3a 45 51 55 44 20 |D 0:EQUD| 0:EQUD |
|00002160| 30 0d 0c e4 1f 45 51 55 | 44 20 30 3a 45 51 55 44 |0....EQU|D 0:EQUD|
|00002170| 20 30 3a 45 51 55 44 20 | 30 3a 45 51 55 44 20 30 | 0:EQUD |0:EQUD 0|
|00002180| 0d 0c ee 04 0d 0c f8 20 | 2e 76 6f 6c 74 61 62 3b |....... |.voltab;|
|00002190| 36 34 2d 62 79 74 65 20 | 76 6f 6c 75 6d 65 20 74 |64-byte |volume t|
|000021a0| 61 62 6c 65 0d 0d 02 16 | 5d 3a 50 25 2b 3d 36 34 |able....|]:P%+=64|
|000021b0| 3a 5b 4f 50 54 20 70 61 | 73 73 0d 0d 0c 04 0d 0d |:[OPT pa|ss......|
|000021c0| 16 20 2e 69 6e 73 74 61 | 6c 6c 73 6f 75 6e 64 3b |. .insta|llsound;|
|000021d0| 49 6e 73 74 61 6c 6c 20 | 76 6f 69 63 65 73 0d 0d |Install |voices..|
|000021e0| 20 1b 53 54 4d 46 44 20 | 52 31 33 21 2c 7b 52 30 | .STMFD |R13!,{R0|
|000021f0| 2d 52 31 30 2c 52 31 34 | 7d 0d 0d 2a 2c 41 44 52 |-R10,R14|}..*,ADR|
|00002200| 20 52 30 2c 56 6f 69 63 | 65 42 61 73 65 3b 4d 61 | R0,Voic|eBase;Ma|
|00002210| 6b 65 20 54 72 61 63 6b | 65 72 56 6f 78 20 61 20 |ke Track|erVox a |
|00002220| 76 6f 69 63 65 0d 0d 34 | 0d 4d 4f 56 20 52 31 2c |voice..4|.MOV R1,|
|00002230| 23 30 0d 0d 3e 1c 53 57 | 49 20 22 53 6f 75 6e 64 |#0..>.SW|I "Sound|
|00002240| 5f 49 6e 73 74 61 6c 6c | 56 6f 69 63 65 22 0d 0d |_Install|Voice"..|
|00002250| 48 23 53 54 52 20 52 31 | 2c 6f 6c 64 76 6f 78 3b |H#STR R1|,oldvox;|
|00002260| 53 6f 20 77 65 20 63 61 | 6e 20 6b 69 6c 6c 20 69 |So we ca|n kill i|
|00002270| 74 0d 0d 52 1e 4d 4f 56 | 20 52 31 30 2c 23 31 3b |t..R.MOV| R10,#1;|
|00002280| 4d 75 74 65 20 76 6f 69 | 63 65 73 20 31 2d 38 0d |Mute voi|ces 1-8.|
|00002290| 0d 5c 0b 2e 6d 75 74 65 | 6c 70 0d 0d 66 0e 4d 4f |.\..mute|lp..f.MO|
|000022a0| 56 20 52 30 2c 52 31 30 | 0d 0d 70 0d 4d 4f 56 20 |V R0,R10|..p.MOV |
|000022b0| 52 31 2c 23 30 0d 0d 7a | 1b 53 57 49 20 22 53 6f |R1,#0..z|.SWI "So|
|000022c0| 75 6e 64 5f 41 74 74 61 | 63 68 56 6f 69 63 65 22 |und_Atta|chVoice"|
|000022d0| 0d 0d 84 12 41 44 44 20 | 52 31 30 2c 52 31 30 2c |....ADD |R10,R10,|
|000022e0| 23 31 0d 0d 8e 0e 43 4d | 50 20 52 31 30 2c 23 39 |#1....CM|P R10,#9|
|000022f0| 0d 0d 98 0e 42 4e 45 20 | 6d 75 74 65 6c 70 0d 0d |....BNE |mutelp..|
|00002300| a2 0e 4d 4f 56 20 52 31 | 30 2c 23 31 0d 0d ac 2a |..MOV R1|0,#1...*|
|00002310| 2e 61 74 74 6c 70 3b 41 | 74 74 61 63 68 20 76 6f |.attlp;A|ttach vo|
|00002320| 69 63 65 73 20 31 2d 34 | 20 74 6f 20 54 72 61 63 |ices 1-4| to Trac|
|00002330| 6b 65 72 56 6f 78 0d 0d | b6 0e 4d 4f 56 20 52 30 |kerVox..|..MOV R0|
|00002340| 2c 52 31 30 0d 0d c0 14 | 41 44 52 20 52 31 2c 56 |,R10....|ADR R1,V|
|00002350| 6f 69 63 65 4e 61 6d 65 | 0d 0d ca 20 53 57 49 20 |oiceName|... SWI |
|00002360| 22 53 6f 75 6e 64 5f 41 | 74 74 61 63 68 4e 61 6d |"Sound_A|ttachNam|
|00002370| 65 64 56 6f 69 63 65 22 | 0d 0d d4 12 41 44 44 20 |edVoice"|....ADD |
|00002380| 52 31 30 2c 52 31 30 2c | 23 31 0d 0d de 0e 43 4d |R10,R10,|#1....CM|
|00002390| 50 20 52 31 30 2c 23 35 | 0d 0d e8 0d 42 4e 45 20 |P R10,#5|....BNE |
|000023a0| 61 74 74 6c 70 0d 0d f2 | 04 0d 0d fc 2d 4d 4f 56 |attlp...|....-MOV|
|000023b0| 20 52 30 2c 23 31 3b 53 | 6c 69 67 68 74 20 72 69 | R0,#1;S|light ri|
|000023c0| 67 68 74 20 62 69 61 73 | 20 66 6f 72 20 63 68 61 |ght bias| for cha|
|000023d0| 6e 6e 65 6c 20 31 0d 0e | 06 0e 4d 4f 56 20 52 31 |nnel 1..|..MOV R1|
|000023e0| 2c 23 31 36 0d 0e 10 16 | 53 57 49 20 22 53 6f 75 |,#16....|SWI "Sou|
|000023f0| 6e 64 5f 53 74 65 72 65 | 6f 22 0d 0e 1a 2c 4d 4f |nd_Stere|o"...,MO|
|00002400| 56 20 52 30 2c 23 32 3b | 53 6c 69 67 68 74 20 6c |V R0,#2;|Slight l|
|00002410| 65 66 74 20 62 69 61 73 | 20 66 6f 72 20 63 68 61 |eft bias| for cha|
|00002420| 6e 6e 65 6c 20 32 0d 0e | 24 0e 4d 56 4e 20 52 31 |nnel 2..|$.MVN R1|
|00002430| 2c 23 31 35 0d 0e 2e 16 | 53 57 49 20 22 53 6f 75 |,#15....|SWI "Sou|
|00002440| 6e 64 5f 53 74 65 72 65 | 6f 22 0d 0e 38 31 4d 4f |nd_Stere|o"..81MO|
|00002450| 56 20 52 30 2c 23 33 3b | 61 6e 64 20 66 6f 72 20 |V R0,#3;|and for |
|00002460| 63 68 61 6e 6e 65 6c 20 | 33 20 28 41 6d 69 67 61 |channel |3 (Amiga|
|00002470| 20 67 6f 65 73 20 52 4c | 4c 52 29 0d 0e 42 0e 4d | goes RL|LR)..B.M|
|00002480| 56 4e 20 52 31 2c 23 31 | 35 0d 0e 4c 16 53 57 49 |VN R1,#1|5..L.SWI|
|00002490| 20 22 53 6f 75 6e 64 5f | 53 74 65 72 65 6f 22 0d | "Sound_|Stereo".|
|000024a0| 0e 56 2b 4d 4f 56 20 52 | 30 2c 23 34 3b 41 6e 64 |.V+MOV R|0,#4;And|
|000024b0| 20 72 69 67 68 74 20 63 | 67 61 69 6e 20 66 6f 72 | right c|gain for|
|000024c0| 20 63 68 61 6e 6e 65 6c | 20 34 0d 0e 60 0e 4d 4f | channel| 4..`.MO|
|000024d0| 56 20 52 31 2c 23 31 36 | 0d 0e 6a 16 53 57 49 20 |V R1,#16|..j.SWI |
|000024e0| 22 53 6f 75 6e 64 5f 53 | 74 65 72 65 6f 22 0d 0e |"Sound_S|tereo"..|
|000024f0| 74 04 0d 0e 7e 1b 4d 4f | 56 20 52 30 2c 23 34 3b |t...~.MO|V R0,#4;|
|00002500| 50 6c 61 79 20 34 20 76 | 6f 69 63 65 73 0d 0e 88 |Play 4 v|oices...|
|00002510| 21 4d 4f 56 20 52 31 2c | 23 32 30 38 3b 42 75 66 |!MOV R1,|#208;Buf|
|00002520| 66 65 72 20 6c 65 6e 67 | 74 68 3d 32 30 30 0d 0e |fer leng|th=200..|
|00002530| 92 29 4d 4f 56 20 52 32 | 2c 23 75 73 3b 46 6f 72 |.)MOV R2|,#us;For|
|00002540| 20 74 68 69 73 20 6d 61 | 6e 79 20 6d 69 63 72 6f | this ma|ny micro|
|00002550| 73 65 63 6f 6e 64 73 0d | 0e 9c 25 4d 4f 56 20 52 |seconds.|..%MOV R|
|00002560| 33 2c 23 30 3b 4c 65 61 | 76 65 20 74 68 65 73 65 |3,#0;Lea|ve these|
|00002570| 20 32 20 75 6e 63 68 61 | 6e 67 65 64 0d 0e a6 0d | 2 uncha|nged....|
|00002580| 4d 4f 56 20 52 34 2c 23 | 30 0d 0e b0 19 53 57 49 |MOV R4,#|0....SWI|
|00002590| 20 22 53 6f 75 6e 64 5f | 43 6f 6e 66 69 67 75 72 | "Sound_|Configur|
|000025a0| 65 22 0d 0e ba 04 0d 0e | c4 36 4d 4f 56 20 52 30 |e"......|.6MOV R0|
|000025b0| 2c 23 31 3b 53 6f 75 6e | 64 20 61 6c 6c 20 34 20 |,#1;Soun|d all 4 |
|000025c0| 76 6f 69 63 65 73 2c 70 | 61 72 61 6d 65 74 65 72 |voices,p|arameter|
|000025d0| 73 20 61 72 65 20 72 65 | 61 6c 6c 79 0d 0e ce 19 |s are re|ally....|
|000025e0| 4d 56 4e 20 52 31 2c 23 | 31 34 3b 69 6d 6d 61 74 |MVN R1,#|14;immat|
|000025f0| 65 72 69 61 6c 0d 0e d8 | 0f 4d 4f 56 20 52 32 2c |erial...|.MOV R2,|
|00002600| 23 31 30 30 0d 0e e2 0f | 4d 4f 56 20 52 33 2c 23 |#100....|MOV R3,#|
|00002610| 32 35 35 0d 0e ec 17 53 | 57 49 20 22 53 6f 75 6e |255....S|WI "Soun|
|00002620| 64 5f 43 6f 6e 74 72 6f | 6c 22 0d 0e f6 0d 4d 4f |d_Contro|l"....MO|
|00002630| 56 20 52 30 2c 23 32 0d | 0f 00 17 53 57 49 20 22 |V R0,#2.|...SWI "|
|00002640| 53 6f 75 6e 64 5f 43 6f | 6e 74 72 6f 6c 22 0d 0f |Sound_Co|ntrol"..|
|00002650| 0a 0d 4d 4f 56 20 52 30 | 2c 23 33 0d 0f 14 17 53 |..MOV R0|,#3....S|
|00002660| 57 49 20 22 53 6f 75 6e | 64 5f 43 6f 6e 74 72 6f |WI "Soun|d_Contro|
|00002670| 6c 22 0d 0f 1e 0d 4d 4f | 56 20 52 30 2c 23 34 0d |l"....MO|V R0,#4.|
|00002680| 0f 28 17 53 57 49 20 22 | 53 6f 75 6e 64 5f 43 6f |.(.SWI "|Sound_Co|
|00002690| 6e 74 72 6f 6c 22 0d 0f | 32 23 4c 44 4d 46 44 20 |ntrol"..|2#LDMFD |
|000026a0| 52 31 33 21 2c 7b 52 30 | 2d 52 31 30 2c 50 43 7d |R13!,{R0|-R10,PC}|
|000026b0| 3b 26 20 52 65 74 75 72 | 6e 0d 0f 3c 04 0d 0f 46 |;& Retur|n..<...F|
|000026c0| 1a 3b 56 6f 69 63 65 20 | 70 61 72 61 6d 65 74 65 |.;Voice |paramete|
|000026d0| 72 20 62 6c 6f 63 6b 0d | 0f 50 7c 2e 56 6f 69 63 |r block.|.P|.Voic|
|000026e0| 65 42 61 73 65 20 42 20 | 46 69 6c 6c 3a 42 20 46 |eBase B |Fill:B F|
|000026f0| 69 6c 6c 3a 42 20 46 69 | 6c 6c 3a 4c 44 4d 46 44 |ill:B Fi|ll:LDMFD|
|00002700| 20 52 31 33 21 2c 7b 50 | 43 7d 3a 4c 44 4d 46 44 | R13!,{P|C}:LDMFD|
|00002710| 20 52 31 33 21 2c 7b 50 | 43 7d 3a 4c 44 4d 46 44 | R13!,{P|C}:LDMFD|
|00002720| 20 52 31 33 21 2c 7b 50 | 43 7d 3a 4c 44 4d 46 44 | R13!,{P|C}:LDMFD|
|00002730| 20 52 31 33 21 2c 7b 50 | 43 7d 3a 45 51 55 44 20 | R13!,{P|C}:EQUD |
|00002740| 56 6f 69 63 65 4e 61 6d | 65 2d 56 6f 69 63 65 42 |VoiceNam|e-VoiceB|
|00002750| 61 73 65 0d 0f 5a 2c 2e | 56 6f 69 63 65 4e 61 6d |ase..Z,.|VoiceNam|
|00002760| 65 20 45 51 55 53 22 54 | 72 61 63 6b 65 72 56 6f |e EQUS"T|rackerVo|
|00002770| 78 22 3a 45 51 55 42 20 | 30 3a 41 4c 49 47 4e 0d |x":EQUB |0:ALIGN.|
|00002780| 0f 64 04 0d 0f 6e 1a 2e | 6b 69 6c 6c 73 6f 75 6e |.d...n..|killsoun|
|00002790| 64 3b 4b 69 6c 6c 20 76 | 6f 69 63 65 73 0d 0f 78 |d;Kill v|oices..x|
|000027a0| 1b 53 54 4d 46 44 20 52 | 31 33 21 2c 7b 52 30 2d |.STMFD R|13!,{R0-|
|000027b0| 52 31 30 2c 52 31 34 7d | 0d 0f 82 23 4d 4f 56 20 |R10,R14}|...#MOV |
|000027c0| 52 30 2c 23 30 3b 44 65 | 2d 69 6e 73 74 61 6c 6c |R0,#0;De|-install|
|000027d0| 20 54 72 61 63 6b 65 72 | 56 6f 78 0d 0f 8c 11 4c | Tracker|Vox....L|
|000027e0| 44 52 20 52 31 2c 6f 6c | 64 76 6f 78 0d 0f 96 1b |DR R1,ol|dvox....|
|000027f0| 53 57 49 20 22 53 6f 75 | 6e 64 5f 52 65 6d 6f 76 |SWI "Sou|nd_Remov|
|00002800| 65 56 6f 69 63 65 22 0d | 0f a0 04 0d 0f aa 20 4d |eVoice".|...... M|
|00002810| 4f 56 20 52 31 30 2c 23 | 31 3b 4b 69 6c 6c 20 74 |OV R10,#|1;Kill t|
|00002820| 68 65 20 34 20 76 6f 69 | 63 65 73 0d 0f b4 08 2e |he 4 voi|ces.....|
|00002830| 6b 73 6c 0d 0f be 0e 4d | 4f 56 20 52 30 2c 52 31 |ksl....M|OV R0,R1|
|00002840| 30 0d 0f c8 0d 4d 4f 56 | 20 52 31 2c 23 30 0d 0f |0....MOV| R1,#0..|
|00002850| d2 1b 53 57 49 20 22 53 | 6f 75 6e 64 5f 41 74 74 |..SWI "S|ound_Att|
|00002860| 61 63 68 56 6f 69 63 65 | 22 0d 0f dc 12 41 44 44 |achVoice|"....ADD|
|00002870| 20 52 31 30 2c 52 31 30 | 2c 23 31 0d 0f e6 0e 43 | R10,R10|,#1....C|
|00002880| 4d 50 20 52 31 30 2c 23 | 35 0d 0f f0 0b 42 4e 45 |MP R10,#|5....BNE|
|00002890| 20 6b 73 6c 0d 0f fa 21 | 4c 44 4d 46 44 20 52 31 | ksl...!|LDMFD R1|
|000028a0| 33 21 2c 7b 52 30 2d 52 | 31 30 2c 50 43 7d 3b 52 |3!,{R0-R|10,PC};R|
|000028b0| 65 74 75 72 6e 0d 10 04 | 04 0d 10 0e 11 2e 69 6e |eturn...|......in|
|000028c0| 76 65 72 73 65 74 61 62 | 6c 65 0d 10 18 19 3b 45 |versetab|le....;E|
|000028d0| 51 55 44 20 31 3a 3b 44 | 75 6d 6d 79 20 76 61 6c |QUD 1:;D|ummy val|
|000028e0| 75 65 21 0d 10 22 18 5d | 3a 50 25 2b 3d 34 30 39 |ue!..".]|:P%+=409|
|000028f0| 36 3a 5b 4f 50 54 20 70 | 61 73 73 0d 10 2c 27 2e |6:[OPT p|ass..,'.|
|00002900| 74 72 61 63 6b 61 64 72 | 3b 47 65 74 20 61 64 64 |trackadr|;Get add|
|00002910| 72 65 73 73 20 6f 66 20 | 74 72 61 63 6b 20 62 61 |ress of |track ba|
|00002920| 73 65 0d 10 36 11 41 44 | 52 20 52 31 30 2c 74 72 |se..6.AD|R R10,tr|
|00002930| 61 63 6b 0d 10 40 0e 4d | 4f 56 20 50 43 2c 52 31 |ack..@.M|OV PC,R1|
|00002940| 34 0d 10 4a 15 2e 74 72 | 61 63 6b 3b 54 72 61 63 |4..J..tr|ack;Trac|
|00002950| 6b 20 62 61 73 65 0d 10 | 54 27 5d 3a 50 25 2b 3d |k base..|T']:P%+=|
|00002960| 74 6c 65 6e 25 3a 5b 4f | 50 54 20 70 61 73 73 3b |tlen%:[O|PT pass;|
|00002970| 49 73 20 74 6c 65 6e 25 | 20 6c 6f 6e 67 0d 10 5e |Is tlen%| long..^|
|00002980| 04 0d 10 68 09 41 4c 49 | 47 4e 0d 10 72 0c 2e 63 |...h.ALI|GN..r..c|
|00002990| 6f 6e 76 65 72 74 0d 10 | 7c 16 53 54 4d 46 44 20 |onvert..||.STMFD |
|000029a0| 52 31 33 21 2c 7b 52 30 | 2d 52 34 7d 0d 10 86 1b |R13!,{R0|-R4}....|
|000029b0| 41 44 52 20 52 32 2c 6c | 74 61 62 6c 65 3a 4d 4f |ADR R2,l|table:MO|
|000029c0| 56 20 52 33 2c 23 30 0d | 10 90 09 2e 6c 6f 6f 70 |V R3,#0.|....loop|
|000029d0| 0d 10 9a 3f 4c 44 52 42 | 20 52 34 2c 5b 52 30 2c |...?LDRB| R4,[R0,|
|000029e0| 52 33 5d 3a 82 52 34 2c | 52 34 2c 23 31 32 38 3a |R3]:.R4,|R4,#128:|
|000029f0| 4c 44 52 42 20 52 34 2c | 5b 52 32 2c 52 34 5d 3a |LDRB R4,|[R2,R4]:|
|00002a00| 53 54 52 42 20 52 34 2c | 5b 52 30 2c 52 33 5d 0d |STRB R4,|[R0,R3].|
|00002a10| 10 a4 23 41 44 44 20 52 | 33 2c 52 33 2c 23 31 3a |..#ADD R|3,R3,#1:|
|00002a20| 43 4d 50 20 52 33 2c 52 | 31 3a 42 4c 45 20 6c 6f |CMP R3,R|1:BLE lo|
|00002a30| 6f 70 0d 10 ae 16 4c 44 | 4d 46 44 20 52 31 33 21 |op....LD|MFD R13!|
|00002a40| 2c 7b 52 30 2d 52 34 7d | 0d 10 b8 0e 4d 4f 56 20 |,{R0-R4}|....MOV |
|00002a50| 50 43 2c 52 31 34 0d 10 | c2 0b 2e 6c 74 61 62 6c |PC,R14..|...ltabl|
|00002a60| 65 0d 10 cc 2d 5d 3a 50 | 25 2b 3d 32 35 36 3a 5b |e...-]:P|%+=256:[|
|00002a70| 4f 50 54 20 70 61 73 73 | 3b 32 35 36 20 62 79 74 |OPT pass|;256 byt|
|00002a80| 65 20 6c 6f 6f 6b 75 70 | 20 74 61 62 6c 65 0d 10 |e lookup| table..|
|00002a90| d6 04 0d 10 e0 20 2e 65 | 6e 64 63 6f 64 65 3b 54 |..... .e|ndcode;T|
|00002aa0| 68 65 20 65 6e 64 63 6f | 64 65 20 70 6f 69 6e 74 |he endco|de point|
|00002ab0| 65 72 0d 10 ea 04 0d 10 | f4 05 5d 0d 10 fe 05 ed |er......|..].....|
|00002ac0| 0d 11 08 05 e1 0d 11 12 | 04 0d 11 1c 10 dd f2 5f |........|......._|
|00002ad0| 49 6e 69 74 53 6f 75 6e | 64 0d 11 26 0d e3 41 25 |InitSoun|d..&..A%|
|00002ae0| 3d 30 b8 32 35 35 0d 11 | 30 37 42 25 3d 41 25 2d |=0.255..|07B%=A%-|
|00002af0| 31 32 38 3a 42 25 3d 42 | 25 3c 3c 32 34 3a c8 99 |128:B%=B|%<<24:..|
|00002b00| 22 53 6f 75 6e 64 5f 53 | 6f 75 6e 64 4c 6f 67 22 |"Sound_S|oundLog"|
|00002b10| 2c 42 25 b8 6c 74 61 62 | 6c 65 3f 41 25 0d 11 3a |,B%.ltab|le?A%..:|
|00002b20| 05 ed 0d 11 44 0c e3 41 | 25 3d 30 b8 36 33 0d 11 |....D..A|%=0.63..|
|00002b30| 4e 1f 76 6f 6c 74 61 62 | 3f 41 25 3d 32 35 35 2d |N.voltab|?A%=255-|
|00002b40| 28 28 41 25 2f 33 2b 34 | 32 29 2a 34 29 0d 11 58 |((A%/3+4|2)*4)..X|
|00002b50| 05 ed 0d 11 62 0e e3 41 | 25 3d 31 b8 31 30 32 33 |....b..A|%=1.1023|
|00002b60| 0d 11 6c 3b 61 3d 33 35 | 37 35 38 37 32 2f 41 25 |..l;a=35|75872/A%|
|00002b70| 3a 69 6e 76 65 72 73 65 | 74 61 62 6c 65 21 28 41 |:inverse|table!(A|
|00002b80| 25 2a 34 29 3d 28 61 2f | 28 31 30 30 30 30 30 30 |%*4)=(a/|(1000000|
|00002b90| 2f 75 73 29 29 2a 36 30 | 30 30 30 0d 11 76 05 ed |/us))*60|000..v..|
|00002ba0| 0d 11 80 25 ff 28 22 4c | 4f 41 44 20 3c 42 72 24 |...%.("L|OAD <Br$|
|00002bb0| 44 69 72 3e 2e 6d 6f 64 | 5f 6a 20 22 2b c3 7e 74 |Dir>.mod|_j "+.~t|
|00002bc0| 72 61 63 6b 29 0d 11 8a | 12 74 72 61 63 6b 24 3d |rack)...|.track$=|
|00002bd0| 22 22 3a 42 25 3d 30 0d | 11 94 05 f5 0d 11 9e 2c |"":B%=0.|.......,|
|00002be0| e7 28 74 72 61 63 6b 3f | 42 25 29 3c 3e 30 8c 74 |.(track?|B%)<>0.t|
|00002bf0| 72 61 63 6b 24 2b 3d bd | 28 74 72 61 63 6b 3f 42 |rack$+=.|(track?B|
|00002c00| 25 29 3a 42 25 2b 3d 31 | 0d 11 a8 11 fd 28 74 72 |%):B%+=1|.....(tr|
|00002c10| 61 63 6b 3f 42 25 29 3d | 30 0d 11 b2 0b 68 69 67 |ack?B%)=|0....hig|
|00002c20| 68 25 3d 30 0d 11 bc 0d | e3 41 25 3d 30 b8 31 32 |h%=0....|.A%=0.12|
|00002c30| 37 0d 11 c6 30 e7 74 72 | 61 63 6b 3f 28 26 31 44 |7...0.tr|ack?(&1D|
|00002c40| 38 2b 41 25 29 3e 68 69 | 67 68 25 8c 68 69 67 68 |8+A%)>hi|gh%.high|
|00002c50| 25 3d 74 72 61 63 6b 3f | 28 26 31 44 38 2b 41 25 |%=track?|(&1D8+A%|
|00002c60| 29 0d 11 d0 05 ed 0d 11 | da 0c 68 69 67 68 25 2b |).......|..high%+|
|00002c70| 3d 31 0d 11 e4 1e 41 25 | 3d 74 72 61 63 6b 2b 26 |=1....A%|=track+&|
|00002c80| 32 35 38 2b 28 68 69 67 | 68 25 2a 31 30 32 34 29 |258+(hig|h%*1024)|
|00002c90| 0d 11 ee 15 42 25 3d 74 | 72 61 63 6b 2b 74 6c 65 |....B%=t|rack+tle|
|00002ca0| 6e 25 2d 41 25 0d 11 f8 | 0c d6 63 6f 6e 76 65 72 |n%-A%...|..conver|
|00002cb0| 74 0d 12 02 15 73 61 6d | 70 6c 65 69 3d 74 72 61 |t....sam|plei=tra|
|00002cc0| 63 6b 2b 26 31 34 0d 12 | 0c 1b 73 70 6f 69 6e 74 |ck+&14..|..spoint|
|00002cd0| 3d 41 25 3a 73 61 6d 70 | 6c 65 73 3d 74 72 61 63 |=A%:samp|les=trac|
|00002ce0| 6b 0d 12 16 0c e3 41 25 | 3d 30 b8 31 34 0d 12 20 |k.....A%|=0.14.. |
|00002cf0| 1c 73 61 6d 70 6c 65 6f | 3d 73 61 6d 70 6c 65 69 |.sampleo|=samplei|
|00002d00| 2b 28 41 25 2a 26 31 45 | 29 0d 12 2a 11 6e 61 6d |+(A%*&1E|)..*.nam|
|00002d10| 65 24 3d 22 22 3a 42 25 | 3d 30 0d 12 34 05 f5 0d |e$="":B%|=0..4...|
|00002d20| 12 3e 2f e7 28 73 61 6d | 70 6c 65 6f 3f 42 25 29 |.>/.(sam|pleo?B%)|
|00002d30| 3c 3e 30 20 6e 61 6d 65 | 24 2b 3d bd 28 73 61 6d |<>0 name|$+=.(sam|
|00002d40| 70 6c 65 6f 3f 42 25 29 | 3a 42 25 2b 3d 31 0d 12 |pleo?B%)|:B%+=1..|
|00002d50| 48 19 fd 28 73 61 6d 70 | 6c 65 6f 3f 42 25 29 3d |H..(samp|leo?B%)=|
|00002d60| 30 84 42 25 3d 32 30 0d | 12 52 0f e7 6e 61 6d 65 |0.B%=20.|.R..name|
|00002d70| 24 3c 3e 22 22 8c 0d 12 | 5c 2a 6c 65 6e 25 3d 32 |$<>""...|\*len%=2|
|00002d80| 2a 28 28 73 61 6d 70 6c | 65 6f 3f 32 32 29 2a 32 |*((sampl|eo?22)*2|
|00002d90| 35 36 2b 28 73 61 6d 70 | 6c 65 6f 3f 32 33 29 29 |56+(samp|leo?23))|
|00002da0| 0d 12 66 26 76 6f 6c 25 | 3d 28 73 61 6d 70 6c 65 |..f&vol%|=(sample|
|00002db0| 6f 3f 32 34 29 2a 32 35 | 36 2b 28 73 61 6d 70 6c |o?24)*25|6+(sampl|
|00002dc0| 65 6f 3f 32 35 29 0d 12 | 70 23 73 61 6d 70 6c 65 |eo?25)..|p#sample|
|00002dd0| 6c 6f 63 21 28 41 25 2a | 34 29 3d 73 70 6f 69 6e |loc!(A%*|4)=spoin|
|00002de0| 74 2d 73 61 6d 70 6c 65 | 73 0d 12 7a 10 73 70 6f |t-sample|s..z.spo|
|00002df0| 69 6e 74 2b 3d 6c 65 6e | 25 0d 12 84 05 cd 0d 12 |int+=len|%.......|
|00002e00| 8e 05 ed 0d 12 98 17 69 | 6e 66 6f 21 34 3d 74 72 |.......i|nfo!4=tr|
|00002e10| 61 63 6b 3f 26 31 44 36 | 2d 31 0d 12 a2 11 d6 69 |ack?&1D6|-1.....i|
|00002e20| 6e 73 74 61 6c 6c 73 6f | 75 6e 64 0d 12 ac 05 e1 |nstallso|und.....|
|00002e30| 0d 12 b6 04 0d 12 c0 0c | dd f2 5f 45 72 72 6f 72 |........|.._Error|
|00002e40| 0d 12 ca 07 ee 85 87 0d | 12 d4 0e d6 6b 69 6c 6c |........|....kill|
|00002e50| 73 6f 75 6e 64 0d 12 de | 06 eb 30 0d 12 e8 1a e7 |sound...|..0.....|
|00002e60| 20 9f 3c 3e 31 37 20 8c | 20 f1 f6 24 3b 22 20 61 | .<>17 .| ..$;" a|
|00002e70| 74 20 22 3b 9e 0d 12 f2 | 05 e0 0d 12 fc 05 e1 0d |t ";....|........|
|00002e80| ff                      |                         |.       |        |
+--------+-------------------------+-------------------------+--------+--------+