home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1994-09-03 | 9.8 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 00 3b 20 20 4f 4b 2c | 20 74 68 65 20 41 55 44 |;.; OK,| the AUD|
|00000010| 49 4f 4c 49 42 21 00 3b | 00 00 3b 62 75 6d 37 20 |IOLIB!.;|..;bum7 |
|00000020| 61 64 64 65 64 20 63 6c | 75 64 67 65 73 6f 75 6e |added cl|udgesoun|
|00000030| 64 00 00 21 6c 69 62 68 | 65 61 64 65 72 7b 23 61 |d..!libh|eader{#a|
|00000040| 75 64 69 6f 6c 69 62 2c | 69 6e 69 74 2c 30 2c 66 |udiolib,|init,0,f|
|00000050| 69 6e 69 74 2c 65 72 72 | 6f 72 73 7d 00 00 21 61 |init,err|ors}..!a|
|00000060| 73 74 61 74 65 6d 65 6e | 74 00 21 61 72 67 73 7b |statemen|t.!args{|
|00000070| 37 2c 32 7d 00 21 6c 69 | 62 73 00 21 73 75 62 73 |7,2}.!li|bs.!subs|
|00000080| 7b 64 6f 64 70 6c 61 79 | 32 2c 64 70 63 68 6b 2c |{dodplay|2,dpchk,|
|00000090| 30 7d 00 21 72 65 70 61 | 72 67 73 7b 32 2c 31 2c |0}.!repa|rgs{2,1,|
|000000a0| 37 2c 32 2c 31 7d 00 21 | 6c 69 62 73 00 21 73 75 |7,2,1}.!|libs.!su|
|000000b0| 62 73 7b 64 6f 64 70 6c | 61 79 2c 64 70 63 68 6b |bs{dodpl|ay,dpchk|
|000000c0| 2c 30 7d 20 20 3b 2a 2a | 2a 2a 2a 00 21 6e 61 6d |,0} ;**|***.!nam|
|000000d0| 65 7b 22 44 69 73 6b 50 | 6c 61 79 22 2c 22 46 69 |e{"DiskP|lay","Fi|
|000000e0| 6c 65 6e 61 6d 65 24 2c | 43 68 61 6e 6e 65 6c 6d |lename$,|Channelm|
|000000f0| 61 73 6b 5b 2c 56 6f 6c | 31 5b 2c 56 6f 6c 32 2e |ask[,Vol|1[,Vol2.|
|00000100| 2e 2e 5d 5d 22 7d 00 00 | 21 61 73 74 61 74 65 6d |..]]"}..|!astatem|
|00000110| 65 6e 74 00 21 61 72 67 | 73 7b 33 7d 00 21 6c 69 |ent.!arg|s{3}.!li|
|00000120| 62 73 00 21 73 75 62 73 | 7b 64 6f 64 69 73 6b 62 |bs.!subs|{dodiskb|
|00000130| 75 66 66 2c 30 2c 30 7d | 20 20 20 3b 2a 2a 2a 2a |uff,0,0}| ;****|
|00000140| 2a 00 21 6e 61 6d 65 7b | 22 44 69 73 6b 42 75 66 |*.!name{|"DiskBuf|
|00000150| 66 65 72 22 2c 22 42 75 | 66 66 65 72 6c 65 6e 22 |fer","Bu|fferlen"|
|00000160| 7d 00 00 21 61 73 74 61 | 74 65 6d 65 6e 74 00 21 |}..!asta|tement.!|
|00000170| 61 72 67 73 7b 32 2c 37 | 7d 00 21 6c 69 62 73 7b |args{2,7|}.!libs{|
|00000180| 23 61 75 64 69 6f 6c 69 | 62 2c 24 31 33 38 30 7d |#audioli|b,$1380}|
|00000190| 00 21 73 75 62 73 7b 64 | 6f 6c 6f 61 64 73 6f 75 |.!subs{d|oloadsou|
|000001a0| 6e 64 2c 30 2c 30 7d 20 | 20 3b 2a 2a 2a 2a 2a 00 |nd,0,0} | ;*****.|
|000001b0| 21 6e 61 6d 65 7b 22 4c | 6f 61 64 53 6f 75 6e 64 |!name{"L|oadSound|
|000001c0| 22 2c 22 53 6f 75 6e 64 | 23 2c 46 69 6c 65 6e 61 |","Sound|#,Filena|
|000001d0| 6d 65 24 22 7d 00 00 21 | 61 73 74 61 74 65 6d 65 |me$"}..!|astateme|
|000001e0| 6e 74 00 21 61 72 67 73 | 7b 32 2c 32 7d 00 21 6c |nt.!args|{2,2}.!l|
|000001f0| 69 62 73 7b 23 61 75 64 | 69 6f 6c 69 62 2c 24 31 |ibs{#aud|iolib,$1|
|00000200| 33 38 30 7d 00 21 73 75 | 62 73 7b 64 6f 73 6f 75 |380}.!su|bs{dosou|
|00000210| 6e 64 32 2c 73 6e 64 63 | 68 6b 2c 30 7d 00 21 72 |nd2,sndc|hk,0}.!r|
|00000220| 65 70 61 72 67 73 7b 32 | 2c 31 2c 32 2c 32 2c 32 |epargs{2|,1,2,2,2|
|00000230| 7d 00 21 6c 69 62 73 7b | 23 61 75 64 69 6f 6c 69 |}.!libs{|#audioli|
|00000240| 62 2c 24 31 33 38 30 7d | 00 21 73 75 62 73 7b 64 |b,$1380}|.!subs{d|
|00000250| 6f 73 6f 75 6e 64 2c 73 | 6e 64 63 68 6b 2c 30 7d |osound,s|ndchk,0}|
|00000260| 20 3b 2a 2a 2a 2a 2a 00 | 21 6e 61 6d 65 7b 22 53 | ;*****.|!name{"S|
|00000270| 6f 75 6e 64 22 2c 22 53 | 6f 75 6e 64 23 2c 43 68 |ound","S|ound#,Ch|
|00000280| 61 6e 6e 65 6c 6d 61 73 | 6b 5b 2c 56 6f 6c 31 5b |annelmas|k[,Vol1[|
|00000290| 2c 56 6f 6c 32 2e 2e 2e | 5d 5d 22 2c 5f 74 6f 6b |,Vol2...|]]",_tok|
|000002a0| 65 7d 00 00 21 61 73 74 | 61 74 65 6d 65 6e 74 00 |e}..!ast|atement.|
|000002b0| 21 72 65 70 61 72 67 73 | 7b 31 2c 31 2c 32 2c 32 |!repargs|{1,1,2,2|
|000002c0| 7d 00 21 6c 69 62 73 00 | 21 73 75 62 73 7b 64 6f |}.!libs.|!subs{do|
|000002d0| 76 6f 6c 75 6d 65 2c 76 | 63 68 6b 2c 30 7d 20 20 |volume,v|chk,0} |
|000002e0| 3b 2a 2a 2a 2a 2a 00 21 | 6e 61 6d 65 7b 22 56 6f |;*****.!|name{"Vo|
|000002f0| 6c 75 6d 65 22 2c 22 43 | 68 61 6e 6e 65 6c 6d 61 |lume","C|hannelma|
|00000300| 73 6b 2c 56 6f 6c 31 5b | 2c 56 6f 6c 32 2e 2e 2e |sk,Vol1[|,Vol2...|
|00000310| 5d 22 7d 00 00 21 61 73 | 74 61 74 65 6d 65 6e 74 |]"}..!as|tatement|
|00000320| 00 21 61 72 67 73 7b 32 | 7d 00 21 6c 69 62 73 00 |.!args{2|}.!libs.|
|00000330| 21 73 75 62 73 7b 64 6f | 66 69 6c 74 65 72 2c 30 |!subs{do|filter,0|
|00000340| 2c 30 7d 00 21 6e 61 6d | 65 7b 22 46 69 6c 74 65 |,0}.!nam|e{"Filte|
|00000350| 72 22 2c 22 4f 6e 7c 4f | 66 66 22 7d 20 20 20 20 |r","On|O|ff"} |
|00000360| 3b 2a 2a 2a 2a 2a 00 00 | 21 61 73 74 61 74 65 6d |;*****..|!astatem|
|00000370| 65 6e 74 00 21 61 72 67 | 73 7b 32 2c 32 7d 00 21 |ent.!arg|s{2,2}.!|
|00000380| 6c 69 62 73 7b 23 61 75 | 64 69 6f 6c 69 62 2c 24 |libs{#au|diolib,$|
|00000390| 31 33 38 30 7d 00 21 73 | 75 62 73 7b 64 6f 73 6f |1380}.!s|ubs{doso|
|000003a0| 75 6e 64 6c 32 2c 73 6e | 64 63 68 6b 2c 30 7d 00 |undl2,sn|dchk,0}.|
|000003b0| 21 72 65 70 61 72 67 73 | 7b 32 2c 31 2c 32 2c 32 |!repargs|{2,1,2,2|
|000003c0| 2c 32 7d 00 21 6c 69 62 | 73 7b 23 61 75 64 69 6f |,2}.!lib|s{#audio|
|000003d0| 6c 69 62 2c 24 31 33 38 | 30 7d 00 21 73 75 62 73 |lib,$138|0}.!subs|
|000003e0| 7b 64 6f 73 6f 75 6e 64 | 6c 2c 73 6e 64 63 68 6b |{dosound|l,sndchk|
|000003f0| 2c 30 7d 20 20 20 20 3b | 2a 2a 2a 2a 2a 00 21 6e |,0} ;|*****.!n|
|00000400| 61 6d 65 7b 22 4c 6f 6f | 70 53 6f 75 6e 64 22 2c |ame{"Loo|pSound",|
|00000410| 22 53 6f 75 6e 64 23 2c | 43 68 61 6e 6e 65 6c 6d |"Sound#,|Channelm|
|00000420| 61 73 6b 5b 2c 56 6f 6c | 31 5b 2c 56 6f 6c 32 2e |ask[,Vol|1[,Vol2.|
|00000430| 2e 2e 5d 5d 22 7d 00 00 | 21 61 73 74 61 74 65 6d |..]]"}..|!astatem|
|00000440| 65 6e 74 00 3b 00 21 61 | 72 67 73 7b 32 2c 33 7d |ent.;.!a|rgs{2,3}|
|00000450| 00 21 6c 69 62 73 7b 23 | 61 75 64 69 6f 6c 69 62 |.!libs{#|audiolib|
|00000460| 2c 24 31 33 38 30 7d 00 | 21 73 75 62 73 7b 64 6f |,$1380}.|!subs{do|
|00000470| 69 73 6f 75 6e 64 32 2c | 69 73 63 68 6b 31 2c 30 |isound2,|ischk1,0|
|00000480| 7d 00 3b 00 21 61 72 67 | 73 7b 32 2c 33 2c 32 7d |}.;.!arg|s{2,3,2}|
|00000490| 00 21 6c 69 62 73 7b 23 | 61 75 64 69 6f 6c 69 62 |.!libs{#|audiolib|
|000004a0| 2c 24 31 33 38 30 7d 00 | 21 73 75 62 73 7b 64 6f |,$1380}.|!subs{do|
|000004b0| 69 73 6f 75 6e 64 33 2c | 69 73 63 68 6b 31 2c 30 |isound3,|ischk1,0|
|000004c0| 7d 00 3b 00 21 61 72 67 | 73 7b 32 2c 33 2c 32 2c |}.;.!arg|s{2,3,2,|
|000004d0| 33 7d 00 21 6c 69 62 73 | 7b 23 61 75 64 69 6f 6c |3}.!libs|{#audiol|
|000004e0| 69 62 2c 24 31 33 38 30 | 7d 00 21 73 75 62 73 7b |ib,$1380|}.!subs{|
|000004f0| 64 6f 69 73 6f 75 6e 64 | 2c 69 73 63 68 6b 32 2c |doisound|,ischk2,|
|00000500| 30 7d 20 20 20 20 3b 2a | 2a 2a 2a 2a 00 3b 00 21 |0} ;*|****.;.!|
|00000510| 6e 61 6d 65 7b 22 49 6e | 69 74 53 6f 75 6e 64 22 |name{"In|itSound"|
|00000520| 2c 22 53 6f 75 6e 64 23 | 2c 4c 65 6e 67 74 68 5b |,"Sound#|,Length[|
|00000530| 2c 50 65 72 69 6f 64 5b | 2c 52 65 70 65 61 74 5d |,Period[|,Repeat]|
|00000540| 5d 22 7d 00 00 21 61 73 | 74 61 74 65 6d 65 6e 74 |]"}..!as|tatement|
|00000550| 00 21 61 72 67 73 7b 32 | 2c 33 2c 31 7d 00 21 6c |.!args{2|,3,1}.!l|
|00000560| 69 62 73 7b 23 61 75 64 | 69 6f 6c 69 62 2c 24 31 |ibs{#aud|iolib,$1|
|00000570| 33 38 30 7d 00 21 73 75 | 62 73 7b 64 6f 73 64 61 |380}.!su|bs{dosda|
|00000580| 74 61 2c 73 64 61 74 61 | 63 68 6b 2c 30 7d 20 20 |ta,sdata|chk,0} |
|00000590| 20 3b 2a 2a 2a 2a 2a 00 | 21 6e 61 6d 65 7b 22 53 | ;*****.|!name{"S|
|000005a0| 6f 75 6e 64 44 61 74 61 | 22 2c 22 53 6f 75 6e 64 |oundData|","Sound|
|000005b0| 23 2c 4f 66 66 73 65 74 | 2c 44 61 74 61 22 7d 00 |#,Offset|,Data"}.|
|000005c0| 00 21 61 66 75 6e 63 74 | 69 6f 6e 7b 32 7d 00 21 |.!afunct|ion{2}.!|
|000005d0| 61 72 67 73 7b 32 2c 33 | 7d 00 21 6c 69 62 73 7b |args{2,3|}.!libs{|
|000005e0| 23 61 75 64 69 6f 6c 69 | 62 2c 24 31 33 38 30 7d |#audioli|b,$1380}|
|000005f0| 00 21 73 75 62 73 7b 64 | 6f 70 73 6f 75 6e 64 2c |.!subs{d|opsound,|
|00000600| 73 64 61 74 61 63 68 6b | 2c 30 7d 00 21 6e 61 6d |sdatachk|,0}.!nam|
|00000610| 65 7b 22 50 65 65 6b 53 | 6f 75 6e 64 22 2c 22 28 |e{"PeekS|ound","(|
|00000620| 53 6f 75 6e 64 23 2c 4f | 66 66 73 65 74 29 22 7d |Sound#,O|ffset)"}|
|00000630| 00 00 21 61 73 74 61 74 | 65 6d 65 6e 74 00 21 61 |..!astat|ement.!a|
|00000640| 72 67 73 7b 23 77 6f 72 | 64 2c 23 6c 6f 6e 67 7d |rgs{#wor|d,#long}|
|00000650| 00 21 6c 69 62 73 7b 23 | 61 75 64 69 6f 6c 69 62 |.!libs{#|audiolib|
|00000660| 2c 24 31 33 38 30 7d 00 | 21 73 75 62 73 7b 5f 63 |,$1380}.|!subs{_c|
|00000670| 6c 75 64 67 65 73 6f 75 | 6e 64 2c 30 2c 30 7d 00 |ludgesou|nd,0,0}.|
|00000680| 21 6e 61 6d 65 7b 22 44 | 65 63 6f 64 65 53 6f 75 |!name{"D|ecodeSou|
|00000690| 6e 64 22 2c 22 53 6f 75 | 6e 64 23 2c 4d 65 6d 6f |nd","Sou|nd#,Memo|
|000006a0| 72 79 4c 6f 63 61 74 69 | 6f 6e 22 7d 00 00 21 61 |ryLocati|on"}..!a|
|000006b0| 73 74 61 74 65 6d 65 6e | 74 00 21 61 72 67 73 7b |statemen|t.!args{|
|000006c0| 23 77 6f 72 64 2c 23 77 | 6f 72 64 7d 00 21 6c 69 |#word,#w|ord}.!li|
|000006d0| 62 73 7b 23 61 75 64 69 | 6f 6c 69 62 2c 24 31 33 |bs{#audi|olib,$13|
|000006e0| 38 30 7d 00 21 73 75 62 | 73 7b 5f 73 65 74 70 65 |80}.!sub|s{_setpe|
|000006f0| 72 69 6f 64 2c 73 6e 64 | 63 68 6b 2c 30 7d 00 21 |riod,snd|chk,0}.!|
|00000700| 6e 61 6d 65 7b 22 53 65 | 74 50 65 72 69 6f 64 22 |name{"Se|tPeriod"|
|00000710| 2c 22 53 6f 75 6e 64 23 | 2c 50 65 72 69 6f 64 22 |,"Sound#|,Period"|
|00000720| 7d 00 00 69 6e 69 74 3a | 21 6e 75 6c 6c 73 75 62 |}..init:|!nullsub|
|00000730| 7b 63 6f 64 65 69 6e 69 | 74 2c 30 2c 30 7d 00 00 |{codeini|t,0,0}..|
|00000740| 66 69 6e 69 74 3a 21 6e | 75 6c 6c 73 75 62 7b 63 |finit:!n|ullsub{c|
|00000750| 6f 64 65 66 69 6e 69 74 | 2c 30 2c 30 7d 00 00 5f |odefinit|,0,0}.._|
|00000760| 6c 6f 61 64 3a 21 6e 75 | 6c 6c 73 75 62 7b 30 2c |load:!nu|llsub{0,|
|00000770| 30 2c 30 7d 00 00 5f 73 | 61 76 65 3a 21 6e 75 6c |0,0}.._s|ave:!nul|
|00000780| 6c 73 75 62 7b 30 2c 30 | 2c 30 7d 00 00 5f 75 73 |lsub{0,0|,0}.._us|
|00000790| 65 3a 21 6e 75 6c 6c 73 | 75 62 7b 30 2c 30 2c 30 |e:!nulls|ub{0,0,0|
|000007a0| 7d 00 00 5f 66 72 65 65 | 3a 21 6e 75 6c 6c 73 75 |}.._free|:!nullsu|
|000007b0| 62 7b 64 6f 66 72 65 65 | 73 6f 75 6e 64 2c 30 2c |b{dofree|sound,0,|
|000007c0| 30 7d 00 00 21 6c 69 62 | 66 69 6e 7b 5f 74 6f 6b |0}..!lib|fin{_tok|
|000007d0| 65 2c 5f 6c 6f 61 64 2c | 5f 73 61 76 65 2c 5f 75 |e,_load,|_save,_u|
|000007e0| 73 65 2c 5f 66 72 65 65 | 2c 31 30 2c 34 7d 00 00 |se,_free|,10,4}..|
|000007f0| 3b 00 3b 41 20 53 6f 75 | 6e 64 20 62 6c 6f 63 6b |;.;A Sou|nd block|
|00000800| 20 6c 6f 6f 6b 73 20 6c | 69 6b 65 20 74 68 69 73 | looks l|ike this|
|00000810| 3a 00 3b 00 3b 30 30 2e | 6c 20 3a 20 70 6f 69 6e |:.;.;00.|l : poin|
|00000820| 74 65 72 20 54 6f 20 44 | 61 74 61 00 3b 30 34 2e |ter To D|ata.;04.|
|00000830| 77 20 3a 20 70 65 72 69 | 6f 64 00 3b 30 36 2e 77 |w : peri|od.;06.w|
|00000840| 20 3a 20 6c 65 6e 67 74 | 68 00 3b 30 38 2e 6c 20 | : lengt|h.;08.l |
|00000850| 3a 20 70 6f 69 6e 74 65 | 72 20 74 6f 20 72 65 70 |: pointe|r to rep|
|00000860| 65 61 74 20 70 6f 73 2e | 00 3b 31 32 2e 77 20 3a |eat pos.|.;12.w :|
|00000870| 20 72 65 70 65 61 74 20 | 6c 65 6e 67 74 68 00 3b | repeat |length.;|
|00000880| 31 34 2e 77 20 3a 20 70 | 72 69 6f 72 69 74 79 20 |14.w : p|riority |
|00000890| 2d 20 68 69 67 68 65 72 | 20 6e 75 6d 62 65 72 20 |- higher| number |
|000008a0| 69 73 20 6d 6f 72 65 20 | 69 6d 70 6f 72 74 61 6e |is more |importan|
|000008b0| 74 21 00 3b 00 3b 20 20 | 20 20 2d 31 36 2d 00 00 |t!.;.; | -16-..|
|000008c0| 3b 4f 4b 2c 20 69 74 20 | 6c 6f 6f 6b 73 20 6c 69 |;OK, it |looks li|
|000008d0| 6b 65 20 77 65 27 72 65 | 20 67 6f 6e 6e 61 20 68 |ke we're| gonna h|
|000008e0| 61 76 65 20 74 6f 20 64 | 6f 20 61 20 6d 65 73 73 |ave to d|o a mess|
|000008f0| 79 00 3b 76 62 6c 61 6e | 6b 2f 73 6e 64 69 6e 74 |y.;vblan|k/sndint|
|00000900| 20 73 65 74 75 70 2e 00 | 3b 00 3b 74 68 69 73 20 | setup..|;.;this |
|00000910| 69 73 20 68 6f 77 20 64 | 61 74 61 20 66 6f 72 20 |is how d|ata for |
|00000920| 65 61 63 68 20 63 68 61 | 6e 65 6c 20 77 6f 72 6b |each cha|nel work|
|00000930| 73 3a 00 00 3b 30 30 2e | 77 20 3a 20 61 63 74 69 |s:..;00.|w : acti|
|00000940| 6f 6e 20 28 62 69 74 73 | 20 67 65 74 20 63 6c 65 |on (bits| get cle|
|00000950| 61 72 65 64 20 77 68 65 | 6e 20 61 63 74 69 6f 6e |ared whe|n action|
|00000960| 20 74 61 6b 65 6e 29 00 | 3b 00 3b 20 20 20 20 20 | taken).|;.; |
|00000970| 20 20 42 30 20 3a 20 74 | 75 72 6e 20 6f 66 66 20 | B0 : t|urn off |
|00000980| 44 4d 41 20 70 6c 65 61 | 73 65 00 3b 20 20 20 20 |DMA plea|se.; |
|00000990| 20 20 20 42 31 20 3a 20 | 73 74 61 72 74 20 6e 65 | B1 : |start ne|
|000009a0| 77 20 73 6f 75 6e 64 20 | 70 6c 65 61 73 65 00 00 |w sound |please..|
|000009b0| 3b 30 32 2e 77 20 3a 20 | 73 74 61 74 75 73 00 3b |;02.w : |status.;|
|000009c0| 00 3b 20 20 20 20 20 20 | 20 30 32 20 3a 20 53 6f |.; | 02 : So|
|000009d0| 75 6e 64 20 73 74 61 72 | 74 65 64 2c 20 6e 6f 20 |und star|ted, no |
|000009e0| 49 6e 74 20 79 65 74 00 | 3b 20 20 20 20 20 20 20 |Int yet.|; |
|000009f0| 30 31 20 3a 20 53 6f 75 | 6e 64 20 73 74 61 72 74 |01 : Sou|nd start|
|00000a00| 65 64 20 61 6e 64 20 66 | 69 72 73 74 20 69 6e 74 |ed and f|irst int|
|00000a10| 20 6f 63 63 75 72 65 64 | 00 3b 20 20 20 20 20 20 | occured|.; |
|00000a20| 20 30 30 20 3a 20 53 6f | 75 6e 64 20 73 74 61 72 | 00 : So|und star|
|00000a30| 74 65 64 20 61 6e 64 20 | 73 65 63 6f 6e 64 20 69 |ted and |second i|
|00000a40| 6e 74 20 6f 63 63 75 72 | 65 64 00 3b 00 3b 30 34 |nt occur|ed.;.;04|
|00000a50| 2e 77 20 3a 20 66 6c 61 | 67 73 20 2d 20 30 30 20 |.w : fla|gs - 00 |
|00000a60| 3d 20 70 6c 61 79 20 6f | 6e 63 65 2c 20 3c 30 30 |= play o|nce, <00|
|00000a70| 20 3d 20 6c 6f 6f 70 20 | 73 6f 75 6e 64 00 3b 00 | = loop |sound.;.|
|00000a80| 3b 30 36 2e 6c 20 3a 20 | 64 61 74 61 20 2d 20 63 |;06.l : |data - c|
|00000a90| 75 72 72 65 6e 74 00 3b | 31 30 2e 77 20 3a 20 6c |urrent.;|10.w : l|
|00000aa0| 65 6e 67 74 68 20 20 20 | 20 22 00 3b 31 32 2e 77 |ength | ".;12.w|
|00000ab0| 20 3a 20 70 65 72 69 6f | 64 20 20 20 20 22 00 3b | : perio|d ".;|
|00000ac0| 31 34 2e 77 20 3a 20 76 | 6f 6c 75 6d 65 20 20 20 |14.w : v|olume |
|00000ad0| 20 22 00 3b 00 3b 31 36 | 2e 6c 20 3a 20 64 61 74 | ".;.;16|.l : dat|
|00000ae0| 61 20 2d 20 66 6f 72 20 | 6e 65 77 20 73 6f 75 6e |a - for |new soun|
|00000af0| 64 00 3b 32 30 2e 77 20 | 3a 20 6c 65 6e 67 74 68 |d.;20.w |: length|
|00000b00| 20 20 20 20 20 20 20 22 | 00 3b 32 32 2e 77 20 3a | "|.;22.w :|
|00000b10| 20 70 65 72 69 6f 64 20 | 20 20 20 20 20 20 22 00 | period | ".|
|00000b20| 3b 32 34 2e 77 20 3a 20 | 76 6f 6c 75 6d 65 20 20 |;24.w : |volume |
|00000b30| 20 20 20 20 20 22 00 3b | 00 3b 32 36 2e 77 20 3a | ".;|.;26.w :|
|00000b40| 20 70 72 69 6f 72 69 74 | 79 00 3b 00 3b 32 38 2e | priorit|y.;.;28.|
|00000b50| 6c 20 3a 20 6d 6f 72 65 | 2e 2e 2e 00 00 3b 20 20 |l : more|.....; |
|00000b60| 20 20 2d 33 32 2d 00 00 | 3b 2a 2a 2a 2a 2a 2a 2a | -32-..|;*******|
|00000b70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 20 43 |********|****** C|
|00000b80| 4f 44 45 20 42 45 4c 4f | 57 20 2a 2a 2a 2a 2a 2a |ODE BELO|W ******|
|00000b90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 00 |********|*******.|
|00000ba0| 00 64 62 75 66 66 6c 65 | 6e 3a 80 25 2e 6c 20 31 |.dbuffle|n:.%.l 1|
|00000bb0| 30 32 34 20 20 3b 6c 65 | 6e 67 74 68 20 6f 66 20 |024 ;le|ngth of |
|00000bc0| 64 69 73 6b 20 62 75 66 | 66 65 72 2e 00 64 6c 65 |disk buf|fer..dle|
|00000bd0| 6e 3a 80 25 2e 6c 20 30 | 20 20 20 20 20 20 20 20 |n:.%.l 0| |
|00000be0| 20 3b 6c 65 6e 67 74 68 | 20 6f 66 20 73 61 6d 70 | ;length| of samp|
|00000bf0| 6c 65 21 00 64 62 75 66 | 66 61 74 3a 80 25 2e 6c |le!.dbuf|fat:.%.l|
|00000c00| 20 30 20 20 20 20 20 20 | 3b 62 75 66 66 65 72 00 | 0 |;buffer.|
|00000c10| 64 62 75 66 66 65 6e 64 | 3a 80 25 2e 6c 20 30 20 |dbuffend|:.%.l 0 |
|00000c20| 20 20 20 20 3b 65 6e 64 | 20 6f 66 20 62 75 66 66 | ;end| of buff|
|00000c30| 65 72 00 63 68 7a 65 72 | 6f 3a 80 25 2e 6c 20 30 |er.chzer|o:.%.l 0|
|00000c40| 20 20 20 3b 61 20 7a 65 | 72 6f 20 77 6f 72 64 20 | ;a ze|ro word |
|00000c50| 69 6e 20 63 68 69 70 6d | 65 6d 00 00 00 80 1e 00 |in chipm|em......|
|00000c60| 63 68 61 6e 64 61 74 61 | 3a 80 26 2e 62 20 33 32 |chandata|:.&.b 32|
|00000c70| 2a 34 00 00 6c 33 5f 69 | 6e 74 20 20 20 3b 76 65 |*4..l3_i|nt ;ve|
|00000c80| 72 74 69 63 61 6c 20 62 | 6c 61 6e 6b 20 69 6e 74 |rtical b|lank int|
|00000c90| 65 72 75 70 74 2e 00 80 | 7a 20 63 68 61 6e 64 61 |erupt...|z chanda|
|00000ca0| 74 61 28 70 63 29 2c 61 | 30 3a 80 7e 2e 6c 20 23 |ta(pc),a|0:.~.l #|
|00000cb0| 24 64 66 66 30 61 30 2c | 61 31 00 80 81 20 23 33 |$dff0a0,|a1... #3|
|00000cc0| 2c 64 30 3a 80 81 20 23 | 31 2c 64 31 00 3b 00 27 |,d0:.. #|1,d1.;.'|
|00000cd0| 6c 6f 6f 70 3a 80 7e 20 | 28 61 30 29 2c 64 32 3a |loop:.~ |(a0),d2:|
|00000ce0| 80 48 20 27 73 6b 69 70 | 00 80 7d 20 23 31 2c 64 |.H 'skip|..} #1,d|
|00000cf0| 32 3a 80 46 20 27 73 6b | 69 70 32 00 3b 00 3b 74 |2:.F 'sk|ip2.;.;t|
|00000d00| 75 72 6e 20 6f 66 66 20 | 44 4d 41 20 66 6f 72 20 |urn off |DMA for |
|00000d10| 74 68 65 20 76 6f 69 63 | 65 2e 2e 2e 00 3b 00 80 |the voic|e....;..|
|00000d20| 7e 20 64 31 2c 24 64 66 | 66 30 39 36 3a 80 55 20 |~ d1,$df|f096:.U |
|00000d30| 23 30 2c 31 28 61 30 29 | 3a 80 58 20 27 73 6b 69 |#0,1(a0)|:.X 'ski|
|00000d40| 70 00 3b 00 27 73 6b 69 | 70 32 00 80 7d 20 23 31 |p.;.'ski|p2..} #1|
|00000d50| 2c 64 32 3a 80 46 20 27 | 73 6b 69 70 33 00 3b 00 |,d2:.F '|skip3.;.|
|00000d60| 3b 73 74 61 72 74 20 6e | 65 77 20 64 61 74 61 2e |;start n|ew data.|
|00000d70| 2e 2e 00 3b 00 80 7e 2e | 6c 20 31 36 28 61 30 29 |...;..~.|l 16(a0)|
|00000d80| 2c 36 28 61 30 29 3a 80 | 7e 2e 6c 20 32 30 28 61 |,6(a0):.|~.l 20(a|
|00000d90| 30 29 2c 31 30 28 61 30 | 29 3a 80 7e 20 32 34 28 |0),10(a0|):.~ 24(|
|00000da0| 61 30 29 2c 31 34 28 61 | 30 29 00 80 7e 2e 6c 20 |a0),14(a|0)..~.l |
|00000db0| 31 36 28 61 30 29 2c 28 | 61 31 29 3a 80 7e 2e 6c |16(a0),(|a1):.~.l|
|00000dc0| 20 32 30 28 61 30 29 2c | 34 28 61 31 29 3a 80 7e | 20(a0),|4(a1):.~|
|00000dd0| 20 32 34 28 61 30 29 2c | 38 28 61 31 29 00 3b 00 | 24(a0),|8(a1).;.|
|00000de0| 80 55 20 23 31 2c 31 28 | 61 30 29 3a 80 58 20 27 |.U #1,1(|a0):.X '|
|00000df0| 73 6b 69 70 00 3b 00 27 | 73 6b 69 70 33 00 3b 00 |skip.;.'|skip3.;.|
|00000e00| 27 73 6b 69 70 3a 80 7a | 20 33 30 28 61 30 29 2c |'skip:.z| 30(a0),|
|00000e10| 61 30 3a 80 7a 20 31 36 | 28 61 31 29 2c 61 31 3a |a0:.z 16|(a1),a1:|
|00000e20| 80 6e 20 64 30 2c 27 6c | 6f 6f 70 00 80 94 00 80 |.n d0,'l|oop.....|
|00000e30| 1e 00 00 2e 64 6f 66 69 | 6c 74 65 72 3a 80 b0 20 |....dofi|lter:.. |
|00000e40| 64 30 3a 80 48 20 27 66 | 6f 66 3a 80 56 20 23 31 |d0:.H 'f|of:.V #1|
|00000e50| 2c 24 62 66 65 30 30 31 | 3a 80 94 00 27 66 6f 66 |,$bfe001|:...'fof|
|00000e60| 3a 80 55 20 23 31 2c 24 | 62 66 65 30 30 31 3a 80 |:.U #1,$|bfe001:.|
|00000e70| 94 00 00 2e 64 6f 64 69 | 73 6b 62 75 66 66 3a 80 |....dodi|skbuff:.|
|00000e80| 7e 2e 6c 20 64 30 2c 64 | 62 75 66 66 6c 65 6e 3a |~.l d0,d|bufflen:|
|00000e90| 80 94 00 00 2e 64 6f 76 | 6f 6c 75 6d 65 00 80 7e |.....dov|olume..~|
|00000ea0| 2e 6c 20 23 24 64 66 66 | 30 61 30 2c 61 30 3a 80 |.l #$dff|0a0,a0:.|
|00000eb0| 81 20 23 33 2c 64 31 00 | 27 6c 6f 6f 70 3a 80 7d |. #3,d1.|'loop:.}|
|00000ec0| 20 23 31 2c 64 30 3a 80 | 46 20 27 73 6b 69 70 00 | #1,d0:.|F 'skip.|
|00000ed0| 80 7e 20 2d 28 61 32 29 | 2c 38 28 61 30 29 00 27 |.~ -(a2)|,8(a0).'|
|00000ee0| 73 6b 69 70 3a 80 7a 20 | 31 36 28 61 30 29 2c 61 |skip:.z |16(a0),a|
|00000ef0| 30 3a 80 6e 20 64 31 2c | 27 6c 6f 6f 70 3a 80 94 |0:.n d1,|'loop:..|
|00000f00| 00 00 2e 64 6f 6f 70 65 | 6e 73 6f 75 6e 64 00 3b |...doope|nsound.;|
|00000f10| 00 3b 72 65 74 75 72 6e | 20 70 65 72 69 6f 64 20 |.;return| period |
|00000f20| 69 6e 20 64 31 00 3b 61 | 6e 64 20 6c 65 6e 67 74 |in d1.;a|nd lengt|
|00000f30| 68 20 69 6e 20 62 79 74 | 65 73 20 69 6e 20 64 30 |h in byt|es in d0|
|00000f40| 00 3b 61 6c 73 6f 2c 20 | 72 65 70 65 61 74 20 6f |.;also, |repeat o|
|00000f50| 66 66 73 65 74 20 69 6e | 20 64 36 00 3b 72 65 70 |ffset in| d6.;rep|
|00000f60| 65 61 74 20 6c 65 6e 20 | 28 69 6e 20 62 79 74 65 |eat len |(in byte|
|00000f70| 73 29 20 69 6e 20 64 35 | 00 3b 00 80 38 20 23 69 |s) in d5|.;..8 #i|
|00000f80| 66 66 69 6f 6c 69 62 20 | 80 7c 20 37 2b 31 3a 80 |ffiolib |.| 7+1:.|
|00000f90| 50 20 65 72 72 31 3a 80 | 7e 2e 6c 20 23 22 56 48 |P err1:.|~.l #"VH|
|00000fa0| 44 52 22 2c 64 30 00 80 | 38 20 23 69 66 66 69 6f |DR",d0..|8 #iffio|
|00000fb0| 6c 69 62 20 80 7c 20 37 | 2b 36 3a 80 50 20 65 72 |lib .| 7|+6:.P er|
|00000fc0| 72 32 00 80 38 20 23 69 | 66 66 69 6f 6c 69 62 20 |r2..8 #i|ffiolib |
|00000fd0| 80 7c 20 37 2b 35 3a 80 | 50 20 65 72 72 33 3a 80 |.| 7+5:.|P err3:.|
|00000fe0| 7e 2e 6c 20 64 30 2c 64 | 36 20 3b 72 65 70 65 61 |~.l d0,d|6 ;repea|
|00000ff0| 74 20 73 74 61 72 74 2e | 00 80 38 20 23 69 66 66 |t start.|..8 #iff|
|00001000| 69 6f 6c 69 62 20 80 7c | 20 37 2b 35 3a 80 50 20 |iolib .|| 7+5:.P |
|00001010| 65 72 72 33 3a 80 7e 2e | 6c 20 64 30 2c 64 35 20 |err3:.~.|l d0,d5 |
|00001020| 3b 72 65 70 65 61 74 20 | 6c 65 6e 67 74 68 2e 00 |;repeat |length..|
|00001030| 80 81 20 23 34 2c 64 30 | 3a 80 38 20 23 69 66 66 |.. #4,d0|:.8 #iff|
|00001040| 69 6f 6c 69 62 20 80 7c | 20 37 2b 37 3a 80 50 20 |iolib .|| 7+7:.P |
|00001050| 65 72 72 33 00 80 38 20 | 23 69 66 66 69 6f 6c 69 |err3..8 |#iffioli|
|00001060| 62 20 80 7c 20 37 2b 34 | 3a 80 50 20 65 72 72 33 |b .| 7+4|:.P err3|
|00001070| 00 80 7e 2e 6c 20 23 33 | 35 37 39 34 34 30 2c 64 |..~.l #3|579440,d|
|00001080| 31 3a 80 72 20 64 30 2c | 64 31 3a 3b 70 65 72 69 |1:.r d0,|d1:;peri|
|00001090| 6f 64 2e 2e 2e 00 80 7e | 2e 6c 20 23 22 42 4f 44 |od.....~|.l #"BOD|
|000010a0| 59 22 2c 64 30 3a 80 38 | 20 23 69 66 66 69 6f 6c |Y",d0:.8| #iffiol|
|000010b0| 69 62 20 80 7c 20 37 2b | 36 3a 80 50 20 65 72 72 |ib .| 7+|6:.P err|
|000010c0| 33 3a 80 94 00 00 2e 64 | 6f 6c 6f 61 64 73 6f 75 |3:.....d|oloadsou|
|000010d0| 6e 64 00 3b 00 3b 69 6e | 20 77 68 69 63 68 20 70 |nd.;.;in| which p|
|000010e0| 6f 6f 68 20 6c 6f 61 64 | 73 20 61 6e 20 61 75 64 |ooh load|s an aud|
|000010f0| 69 6f 20 73 61 6d 70 6c | 65 20 66 6f 72 20 6c 61 |io sampl|e for la|
|00001100| 74 65 72 20 70 6c 61 79 | 62 61 63 6b 00 3b 00 3b |ter play|back.;.;|
|00001110| 6c 6f 61 64 73 6f 75 6e | 64 20 73 6f 75 6e 64 23 |loadsoun|d sound#|
|00001120| 2c 66 69 6c 65 6e 61 6d | 65 00 3b 00 80 7e 2e 6c |,filenam|e.;..~.l|
|00001130| 20 64 31 2c 2d 28 61 37 | 29 3a 80 59 20 64 6f 66 | d1,-(a7|):.Y dof|
|00001140| 72 65 65 73 6f 75 6e 64 | 3a 80 7e 2e 6c 20 28 61 |reesound|:.~.l (a|
|00001150| 37 29 2b 2c 61 30 00 80 | 59 20 64 6f 6f 70 65 6e |7)+,a0..|Y doopen|
|00001160| 73 6f 75 6e 64 00 80 7e | 20 64 31 2c 34 28 61 33 |sound..~| d1,4(a3|
|00001170| 29 3a 80 5c 2e 6c 20 23 | 36 35 35 33 36 2a 32 2c |):.\.l #|65536*2,|
|00001180| 64 30 3a 80 46 20 65 72 | 72 34 00 80 7e 2e 6c 20 |d0:.F er|r4..~.l |
|00001190| 64 30 2c 2d 28 61 37 29 | 3a 80 81 20 23 32 2c 64 |d0,-(a7)|:.. #2,d|
|000011a0| 31 3a 80 38 20 24 63 30 | 30 32 00 80 7e 2e 6c 20 |1:.8 $c0|02..~.l |
|000011b0| 64 30 2c 28 61 33 29 3a | 80 7e 2e 6c 20 64 30 2c |d0,(a3):|.~.l d0,|
|000011c0| 61 30 3a 80 7e 2e 6c 20 | 28 61 37 29 2c 64 30 00 |a0:.~.l |(a7),d0.|
|000011d0| 80 38 20 23 69 66 66 69 | 6f 6c 69 62 20 80 7c 20 |.8 #iffi|olib .| |
|000011e0| 37 2b 38 00 80 7e 2e 6c | 20 28 61 37 29 2b 2c 64 |7+8..~.l| (a7)+,d|
|000011f0| 30 3a 80 7d 2e 6c 20 23 | 31 2c 64 30 3a 80 7e 20 |0:.}.l #|1,d0:.~ |
|00001200| 64 30 2c 36 28 61 33 29 | 00 80 7e 2e 6c 20 28 61 |d0,6(a3)|..~.l (a|
|00001210| 33 29 2c 38 28 61 33 29 | 3a 80 3d 2e 6c 20 64 36 |3),8(a3)|:.=.l d6|
|00001220| 2c 38 28 61 33 29 00 80 | 7d 2e 6c 20 23 31 2c 64 |,8(a3)..|}.l #1,d|
|00001230| 35 3a 80 7e 20 64 35 2c | 31 32 28 61 33 29 3a 80 |5:.~ d5,|12(a3):.|
|00001240| 38 20 23 69 66 66 69 6f | 6c 69 62 20 80 7c 20 37 |8 #iffio|lib .| 7|
|00001250| 2b 32 00 80 94 00 00 2e | 5f 63 6c 75 64 67 65 73 |+2......|_cludges|
|00001260| 6f 75 6e 64 3a 00 20 20 | 80 7e 2e 6c 20 64 31 2c |ound:. |.~.l d1,|
|00001270| 2d 28 61 37 29 3a 80 59 | 20 64 6f 66 72 65 65 73 |-(a7):.Y| dofrees|
|00001280| 6f 75 6e 64 3a 80 7e 2e | 6c 20 28 61 37 29 2b 2c |ound:.~.|l (a7)+,|
|00001290| 61 30 00 20 20 80 5c 2e | 6c 20 23 22 46 4f 52 4d |a0. .\.|l #"FORM|
|000012a0| 22 2c 28 61 30 29 2b 3a | 80 50 20 65 72 72 31 3a |",(a0)+:|.P err1:|
|000012b0| 80 7e 2e 6c 20 28 61 30 | 29 2b 2c 64 30 3a 80 7a |.~.l (a0|)+,d0:.z|
|000012c0| 20 30 28 61 30 2c 64 30 | 2e 6c 29 2c 61 31 20 3b | 0(a0,d0|.l),a1 ;|
|000012d0| 61 31 3d 65 6e 64 00 20 | 20 80 5c 2e 6c 20 23 22 |a1=end. | .\.l #"|
|000012e0| 38 53 56 58 22 2c 28 61 | 30 29 2b 3a 80 50 20 65 |8SVX",(a|0)+:.P e|
|000012f0| 72 72 31 00 77 76 3a 80 | 82 2e 6c 28 61 30 29 2b |rr1.wv:.|..l(a0)+|
|00001300| 2c 64 30 2d 64 31 3a 80 | 5c 2e 6c 20 23 22 56 48 |,d0-d1:.|\.l #"VH|
|00001310| 44 52 22 2c 64 30 3a 80 | 48 20 66 76 3a 80 3d 2e |DR",d0:.|H fv:.=.|
|00001320| 6c 20 64 31 2c 61 30 3a | 80 5c 2e 6c 20 61 30 2c |l d1,a0:|.\.l a0,|
|00001330| 61 31 3a 80 4c 20 65 72 | 72 31 3a 80 58 20 77 76 |a1:.L er|r1:.X wv|
|00001340| 00 66 76 3a 80 82 2e 6c | 28 61 30 29 2c 64 35 2d |.fv:...l|(a0),d5-|
|00001350| 64 36 3a 80 7e 2e 6c 23 | 33 35 37 39 34 34 30 2c |d6:.~.l#|3579440,|
|00001360| 64 37 3a 80 72 31 32 28 | 61 30 29 2c 64 37 3a 80 |d7:.r12(|a0),d7:.|
|00001370| 3d 2e 6c 64 31 2c 61 30 | 00 77 62 3a 80 82 2e 6c |=.ld1,a0|.wb:...l|
|00001380| 28 61 30 29 2b 2c 64 30 | 2d 64 31 3a 80 5c 2e 6c |(a0)+,d0|-d1:.\.l|
|00001390| 20 23 22 42 4f 44 59 22 | 2c 64 30 3a 80 48 20 66 | #"BODY"|,d0:.H f|
|000013a0| 62 3a 80 3d 2e 6c 20 64 | 31 2c 61 30 3a 80 5c 2e |b:.=.l d|1,a0:.\.|
|000013b0| 6c 20 61 30 2c 61 31 3a | 80 4c 20 65 72 72 31 3a |l a0,a1:|.L err1:|
|000013c0| 80 58 20 77 62 00 66 62 | 3a 80 5c 2e 6c 20 23 36 |.X wb.fb|:.\.l #6|
|000013d0| 35 35 33 36 2a 32 2c 64 | 31 3a 80 46 20 65 72 72 |5536*2,d|1:.F err|
|000013e0| 34 3a 80 7e 2e 6c 20 64 | 31 2c 64 30 3a 80 7d 2e |4:.~.l d|1,d0:.}.|
|000013f0| 6c 23 31 2c 64 31 3a 80 | 7e 20 64 31 2c 36 28 61 |l#1,d1:.|~ d1,6(a|
|00001400| 33 29 00 20 20 20 80 7d | 2e 6c 20 23 31 2c 64 36 |3). .}|.l #1,d6|
|00001410| 3a 80 7e 20 64 36 2c 31 | 32 28 61 33 29 3a 80 7e |:.~ d6,1|2(a3):.~|
|00001420| 20 64 37 2c 34 28 61 33 | 29 00 20 20 20 80 7e 2e | d7,4(a3|). .~.|
|00001430| 6c 20 61 30 2c 64 31 3a | 80 42 2e 6c 23 24 31 66 |l a0,d1:|.B.l#$1f|
|00001440| 66 66 66 66 2c 64 31 3a | 80 5c 2e 6c 20 64 31 2c |ffff,d1:|.\.l d1,|
|00001450| 61 30 3a 80 48 20 69 6e | 63 68 69 70 00 69 6e 66 |a0:.H in|chip.inf|
|00001460| 61 73 74 3a 00 20 20 20 | 80 81 23 32 2c 64 31 3a |ast:. |..#2,d1:|
|00001470| 80 38 20 24 63 30 30 32 | 3a 80 7e 2e 6c 20 64 30 |.8 $c002|:.~.l d0|
|00001480| 2c 28 61 33 29 3a 80 7e | 2e 6c 20 64 30 2c 61 31 |,(a3):.~|.l d0,a1|
|00001490| 00 20 20 20 80 3d 2e 6c | 20 64 35 2c 64 30 3a 80 |. .=.l| d5,d0:.|
|000014a0| 7e 2e 6c 20 64 30 2c 38 | 28 61 33 29 3a 80 7e 20 |~.l d0,8|(a3):.~ |
|000014b0| 36 28 61 33 29 2c 64 31 | 3a 80 aa 23 31 2c 64 31 |6(a3),d1|:..#1,d1|
|000014c0| 00 20 20 20 63 6f 70 73 | 6e 64 3a 80 7e 20 28 61 |. cops|nd:.~ (a|
|000014d0| 30 29 2b 2c 28 61 31 29 | 2b 3a 80 6f 20 64 31 2c |0)+,(a1)|+:.o d1,|
|000014e0| 63 6f 70 73 6e 64 3a 80 | 94 00 69 6e 63 68 69 70 |copsnd:.|..inchip|
|000014f0| 3a 00 20 20 20 80 7e 2e | 6c 20 61 30 2c 28 61 33 |:. .~.|l a0,(a3|
|00001500| 29 3a 80 3d 2e 6c 20 64 | 35 2c 61 30 3a 80 7e 2e |):.=.l d|5,a0:.~.|
|00001510| 6c 20 61 30 2c 38 28 61 | 33 29 3a 80 7e 20 23 22 |l a0,8(a|3):.~ #"|
|00001520| 63 4c 22 2c 31 34 28 61 | 33 29 3a 80 94 00 00 2e |cL",14(a|3):.....|
|00001530| 5f 73 65 74 70 65 72 69 | 6f 64 3a 80 b0 2e 6c 20 |_setperi|od:...l |
|00001540| 28 61 33 29 3a 80 48 20 | 65 72 72 35 3a 80 7e 20 |(a3):.H |err5:.~ |
|00001550| 64 31 2c 34 28 61 33 29 | 3a 80 94 00 00 2e 64 6f |d1,4(a3)|:.....do|
|00001560| 63 68 61 6e 73 6f 66 66 | 00 3b 00 3b 64 31 3d 63 |chansoff|.;.;d1=c|
|00001570| 68 61 6e 65 6c 6c 20 6d | 61 73 6b 20 2d 20 72 65 |hanell m|ask - re|
|00001580| 74 75 72 6e 20 64 32 2c | 20 69 6e 74 20 62 69 74 |turn d2,| int bit|
|00001590| 73 2e 00 3b 00 64 6f 63 | 68 61 6e 73 6f 66 66 32 |s..;.doc|hansoff2|
|000015a0| 00 3b 00 80 7e 20 64 31 | 2c 24 64 66 66 30 39 36 |.;..~ d1|,$dff096|
|000015b0| 3a 80 7e 2e 62 20 24 64 | 66 66 30 30 36 2c 64 32 |:.~.b $d|ff006,d2|
|000015c0| 3a 80 81 20 23 31 31 2c | 64 30 20 3b 73 6b 69 70 |:.. #11,|d0 ;skip|
|000015d0| 20 31 32 20 73 63 61 6e | 20 6c 69 6e 65 73 20 73 | 12 scan| lines s|
|000015e0| 69 6d 6f 6e 20 77 61 73 | 20 68 65 72 65 00 3b 00 |imon was| here.;.|
|000015f0| 27 6c 6f 6f 70 00 80 7e | 2e 62 20 24 64 66 66 30 |'loop..~|.b $dff0|
|00001600| 30 36 2c 64 33 3a 80 5c | 2e 62 20 64 33 2c 64 32 |06,d3:.\|.b d3,d2|
|00001610| 3a 80 48 20 27 6c 6f 6f | 70 3a 80 7e 2e 62 20 64 |:.H 'loo|p:.~.b d|
|00001620| 33 2c 64 32 3a 80 6e 20 | 64 30 2c 27 6c 6f 6f 70 |3,d2:.n |d0,'loop|
|00001630| 00 3b 00 80 7e 20 64 31 | 2c 64 32 3a 80 7c 20 23 |.;..~ d1|,d2:.| #|
|00001640| 37 2c 64 32 3a 80 94 00 | 00 2e 64 6f 73 6f 75 6e |7,d2:...|..dosoun|
|00001650| 64 6c 32 3a 80 81 20 23 | 30 2c 64 37 00 3b 00 2e |dl2:.. #|0,d7.;..|
|00001660| 64 6f 73 6f 75 6e 64 6c | 3a 80 81 20 23 2d 31 2c |dosoundl|:.. #-1,|
|00001670| 64 36 3a 80 58 20 64 6f | 73 6e 64 00 00 2e 64 6f |d6:.X do|snd...do|
|00001680| 73 6f 75 6e 64 32 3a 80 | 81 20 23 30 2c 64 37 00 |sound2:.|. #0,d7.|
|00001690| 3b 00 2e 64 6f 73 6f 75 | 6e 64 3a 3b 61 33 3d 73 |;..dosou|nd:;a3=s|
|000016a0| 6f 75 6e 64 2c 20 64 31 | 3d 63 68 61 6e 65 6c 20 |ound, d1|=chanel |
|000016b0| 6d 61 73 6b 2c 20 2d 28 | 61 32 29 3d 76 6f 6c 73 |mask, -(|a2)=vols|
|000016c0| 2c 20 64 37 3d 23 76 6f | 6c 73 2e 00 3b 00 80 81 |, d7=#vo|ls..;...|
|000016d0| 20 23 30 2c 64 36 20 3b | 6c 6f 6f 70 69 74 20 66 | #0,d6 ;|loopit f|
|000016e0| 6c 61 67 73 00 3b 00 64 | 6f 73 6e 64 3a 80 59 20 |lags.;.d|osnd:.Y |
|000016f0| 64 6f 63 68 61 6e 73 6f | 66 66 00 80 7e 20 64 31 |dochanso|ff..~ d1|
|00001700| 2c 64 33 3a 80 81 20 23 | 33 2c 64 30 3a 80 7e 2e |,d3:.. #|3,d0:.~.|
|00001710| 6c 20 23 24 64 66 66 30 | 61 30 2c 61 30 00 27 6c |l #$dff0|a0,a0.'l|
|00001720| 6f 6f 70 3a 80 7d 20 23 | 31 2c 64 33 3a 80 46 20 |oop:.} #|1,d3:.F |
|00001730| 27 73 6b 69 70 00 80 7e | 20 23 30 2c 38 28 61 30 |'skip..~| #0,8(a0|
|00001740| 29 00 80 7e 2e 6c 20 28 | 61 33 29 2c 28 61 30 29 |)..~.l (|a3),(a0)|
|00001750| 3a 80 7e 20 34 28 61 33 | 29 2c 36 28 61 30 29 3a |:.~ 4(a3|),6(a0):|
|00001760| 80 7e 20 36 28 61 33 29 | 2c 34 28 61 30 29 00 80 |.~ 6(a3)|,4(a0)..|
|00001770| 7e 20 23 36 34 2c 38 28 | 61 30 29 3a 80 aa 20 23 |~ #64,8(|a0):.. #|
|00001780| 31 2c 64 37 3a 80 4f 20 | 27 73 6b 69 70 3a 80 7e |1,d7:.O |'skip:.~|
|00001790| 20 2d 28 61 32 29 2c 38 | 28 61 30 29 00 27 73 6b | -(a2),8|(a0).'sk|
|000017a0| 69 70 3a 80 7a 20 31 36 | 28 61 30 29 2c 61 30 3a |ip:.z 16|(a0),a0:|
|000017b0| 80 6e 20 64 30 2c 27 6c | 6f 6f 70 00 3b 00 3b 77 |.n d0,'l|oop.;.;w|
|000017c0| 68 61 74 20 74 68 65 20 | 66 2a 2a 6b 73 20 68 61 |hat the |f**ks ha|
|000017d0| 70 70 65 6e 69 6e 67 20 | 68 65 72 65 21 00 3b 00 |ppening |here!.;.|
|000017e0| 80 56 20 23 31 35 2c 64 | 31 20 3b 3a 4d 4f 56 45 |.V #15,d|1 ;:MOVE|
|000017f0| 20 64 32 2c 24 64 66 66 | 30 39 63 00 80 7e 20 64 | d2,$dff|09c..~ d|
|00001800| 31 2c 24 64 66 66 30 39 | 36 00 3b 00 3b 74 68 69 |1,$dff09|6.;.;thi|
|00001810| 73 20 73 68 6f 75 6c 64 | 20 62 6c 6f 6f 64 79 20 |s should| bloody |
|00001820| 77 6f 72 6b 21 00 3b 00 | 3b 27 69 6e 74 77 61 69 |work!.;.|;'intwai|
|00001830| 74 3a 4d 4f 56 45 20 24 | 64 66 66 30 31 65 2c 64 |t:MOVE $|dff01e,d|
|00001840| 30 3a 41 4e 44 20 64 32 | 2c 64 30 3a 43 4d 50 20 |0:AND d2|,d0:CMP |
|00001850| 64 32 2c 64 30 3a 42 4e | 45 20 27 69 6e 74 77 61 |d2,d0:BN|E 'intwa|
|00001860| 69 74 00 3b 00 3b 4f 4b | 2c 20 73 6f 75 6e 64 20 |it.;.;OK|, sound |
|00001870| 68 61 73 20 73 74 61 72 | 74 65 64 2e 20 44 6f 20 |has star|ted. Do |
|00001880| 77 65 20 77 61 6e 74 20 | 74 6f 20 6c 6f 6f 70 20 |we want |to loop |
|00001890| 69 74 3f 00 3b 00 80 7e | 2e 62 20 24 64 66 66 30 |it?.;..~|.b $dff0|
|000018a0| 30 36 2c 64 32 3a 80 81 | 20 23 31 31 2c 64 34 20 |06,d2:..| #11,d4 |
|000018b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 73 | | ;s|
|000018c0| 69 6d 6f 6e 20 77 61 73 | 20 68 65 72 65 21 21 21 |imon was| here!!!|
|000018d0| 00 27 77 73 73 3a 80 7e | 2e 62 20 24 64 66 66 30 |.'wss:.~|.b $dff0|
|000018e0| 30 36 2c 64 33 3a 80 5c | 2e 62 20 64 33 2c 64 32 |06,d3:.\|.b d3,d2|
|000018f0| 3a 80 48 20 27 77 73 73 | 00 80 7e 2e 62 20 64 33 |:.H 'wss|..~.b d3|
|00001900| 2c 64 32 3a 80 6e 20 64 | 34 2c 27 77 73 73 00 3b |,d2:.n d|4,'wss.;|
|00001910| 00 80 81 20 23 33 2c 64 | 30 3a 80 7e 2e 6c 20 23 |... #3,d|0:.~.l #|
|00001920| 24 64 66 66 30 61 30 2c | 61 30 00 3b 00 80 7e 2e |$dff0a0,|a0.;..~.|
|00001930| 6c 20 63 68 7a 65 72 6f | 28 70 63 29 2c 64 32 3a |l chzero|(pc),d2:|
|00001940| 80 81 20 23 31 2c 64 33 | 00 80 b0 20 64 36 3a 80 |.. #1,d3|... d6:.|
|00001950| 48 20 27 6c 6c 6f 6f 70 | 00 3b 00 80 7e 2e 6c 20 |H 'lloop|.;..~.l |
|00001960| 38 28 61 33 29 2c 64 32 | 3a 80 7e 20 31 32 28 61 |8(a3),d2|:.~ 12(a|
|00001970| 33 29 2c 64 33 00 3b 00 | 27 6c 6c 6f 6f 70 3a 80 |3),d3.;.|'lloop:.|
|00001980| 7d 20 23 31 2c 64 31 3a | 80 46 20 27 73 6b 69 70 |} #1,d1:|.F 'skip|
|00001990| 6c 00 80 7e 20 64 33 2c | 34 28 61 30 29 3a 80 7e |l..~ d3,|4(a0):.~|
|000019a0| 2e 6c 20 64 32 2c 28 61 | 30 29 00 27 73 6b 69 70 |.l d2,(a|0).'skip|
|000019b0| 6c 3a 80 7a 20 31 36 28 | 61 30 29 2c 61 30 3a 80 |l:.z 16(|a0),a0:.|
|000019c0| 6e 20 64 30 2c 27 6c 6c | 6f 6f 70 00 3b 00 80 94 |n d0,'ll|oop.;...|
|000019d0| 00 00 2e 64 6f 73 64 61 | 74 61 20 20 3b 73 65 74 |...dosda|ta ;set|
|000019e0| 20 73 6f 75 6e 64 20 64 | 61 74 61 2e 00 3b 00 3b | sound d|ata..;.;|
|000019f0| 61 33 3d 73 6f 75 6e 64 | 2c 20 64 31 2e 6c 3d 6f |a3=sound|, d1.l=o|
|00001a00| 66 66 73 65 74 2c 20 64 | 32 2e 62 3d 64 61 74 61 |ffset, d|2.b=data|
|00001a10| 00 3b 00 80 25 20 24 61 | 30 30 30 2c 27 66 2d 27 |.;..% $a|000,'f-'|
|00001a20| 73 00 27 73 3a 80 7e 2e | 6c 20 28 61 33 29 2c 61 |s.'s:.~.|l (a3),a|
|00001a30| 30 3a 80 7e 2e 62 20 64 | 32 2c 30 28 61 30 2c 64 |0:.~.b d|2,0(a0,d|
|00001a40| 31 2e 6c 29 00 27 66 3a | 80 94 00 00 2e 64 6f 70 |1.l).'f:|.....dop|
|00001a50| 73 6f 75 6e 64 20 3b 70 | 65 65 6b 20 73 6f 75 6e |sound ;p|eek soun|
|00001a60| 64 20 64 61 74 61 2e 00 | 3b 00 80 25 20 24 61 30 |d data..|;..% $a0|
|00001a70| 30 30 2c 27 66 2d 27 73 | 00 27 73 3a 80 7e 2e 6c |00,'f-'s|.'s:.~.l|
|00001a80| 20 28 61 33 29 2c 61 30 | 3a 80 7e 2e 62 20 30 28 | (a3),a0|:.~.b 0(|
|00001a90| 61 30 2c 64 31 2e 6c 29 | 2c 64 30 3a 80 76 20 64 |a0,d1.l)|,d0:.v d|
|00001aa0| 30 00 27 66 3a 80 94 00 | 00 2e 64 6f 69 73 6f 75 |0.'f:...|..doisou|
|00001ab0| 6e 64 32 3a 80 7e 20 23 | 34 32 38 2c 64 32 00 3b |nd2:.~ #|428,d2.;|
|00001ac0| 00 2e 64 6f 69 73 6f 75 | 6e 64 33 3a 80 81 20 23 |..doisou|nd3:.. #|
|00001ad0| 30 2c 64 33 00 3b 00 2e | 64 6f 69 73 6f 75 6e 64 |0,d3.;..|doisound|
|00001ae0| 3a 20 20 3b 69 6e 69 74 | 20 61 20 73 6f 75 6e 64 |: ;init| a sound|
|00001af0| 20 66 6f 72 20 75 73 65 | 72 20 64 61 74 61 2e 00 | for use|r data..|
|00001b00| 3b 00 3b 61 33 3d 73 6f | 75 6e 64 2c 20 64 31 2e |;.;a3=so|und, d1.|
|00001b10| 6c 3d 6c 65 6e 2c 20 64 | 32 2e 77 3d 70 65 72 69 |l=len, d|2.w=peri|
|00001b20| 6f 64 2c 20 64 33 2e 6c | 3d 72 65 70 65 61 74 2e |od, d3.l|=repeat.|
|00001b30| 00 3b 00 80 7e 2e 6c 20 | 64 31 2c 2d 28 61 37 29 |.;..~.l |d1,-(a7)|
|00001b40| 3a 80 59 20 64 6f 66 72 | 65 65 73 6f 75 6e 64 3a |:.Y dofr|eesound:|
|00001b50| 80 7e 2e 6c 20 28 61 37 | 29 2b 2c 64 31 00 3b 00 |.~.l (a7|)+,d1.;.|
|00001b60| 80 7e 2e 6c 20 64 31 2c | 64 34 3a 80 7d 2e 6c 20 |.~.l d1,|d4:.}.l |
|00001b70| 23 31 2c 64 34 3a 80 7e | 20 64 32 2c 34 28 61 33 |#1,d4:.~| d2,4(a3|
|00001b80| 29 3a 80 7e 20 64 34 2c | 36 28 61 33 29 00 80 7e |):.~ d4,|6(a3)..~|
|00001b90| 2e 6c 20 64 33 2c 38 28 | 61 33 29 3a 80 7e 2e 6c |.l d3,8(|a3):.~.l|
|00001ba0| 20 64 31 2c 64 34 3a 80 | a7 2e 6c 20 64 33 2c 64 | d1,d4:.|..l d3,d|
|00001bb0| 34 00 80 7d 2e 6c 20 23 | 31 2c 64 34 3a 80 7e 20 |4..}.l #|1,d4:.~ |
|00001bc0| 64 34 2c 31 32 28 61 33 | 29 00 3b 00 80 7e 2e 6c |d4,12(a3|).;..~.l|
|00001bd0| 20 64 31 2c 64 30 3a 80 | 7e 2e 6c 20 23 24 31 30 | d1,d0:.|~.l #$10|
|00001be0| 30 30 32 2c 64 31 3a 80 | 38 20 24 63 30 30 32 00 |002,d1:.|8 $c002.|
|00001bf0| 80 7e 2e 6c 20 64 30 2c | 28 61 33 29 3a 80 3d 2e |.~.l d0,|(a3):.=.|
|00001c00| 6c 20 64 30 2c 38 28 61 | 33 29 00 80 94 00 00 3b |l d0,8(a|3).....;|
|00001c10| 30 30 2e 6c 20 3a 20 70 | 6f 69 6e 74 65 72 20 54 |00.l : p|ointer T|
|00001c20| 6f 20 44 61 74 61 00 3b | 30 34 2e 77 20 3a 20 70 |o Data.;|04.w : p|
|00001c30| 65 72 69 6f 64 00 3b 30 | 36 2e 77 20 3a 20 6c 65 |eriod.;0|6.w : le|
|00001c40| 6e 67 74 68 00 3b 30 38 | 2e 6c 20 3a 20 70 6f 69 |ngth.;08|.l : poi|
|00001c50| 6e 74 65 72 20 74 6f 20 | 72 65 70 65 61 74 20 70 |nter to |repeat p|
|00001c60| 6f 73 2e 00 3b 31 32 2e | 77 20 3a 20 72 65 70 65 |os..;12.|w : repe|
|00001c70| 61 74 20 6c 65 6e 67 74 | 68 00 00 2e 64 6f 66 72 |at lengt|h...dofr|
|00001c80| 65 65 73 6f 75 6e 64 00 | 3b 00 80 7e 2e 6c 20 28 |eesound.|;..~.l (|
|00001c90| 61 33 29 2c 64 30 3a 80 | 48 20 27 64 6f 6e 65 3a |a3),d0:.|H 'done:|
|00001ca0| 80 5b 2e 6c 20 28 61 33 | 29 3a 80 5c 20 23 22 63 |.[.l (a3|):.\ #"c|
|00001cb0| 4c 22 2c 31 34 28 61 33 | 29 3a 80 48 20 27 64 6f |L",14(a3|):.H 'do|
|00001cc0| 6e 65 00 80 7e 2e 6c 20 | 64 30 2c 61 31 3a 80 81 |ne..~.l |d0,a1:..|
|00001cd0| 20 23 30 2c 64 30 3a 80 | 7e 20 36 28 61 33 29 2c | #0,d0:.|~ 6(a3),|
|00001ce0| 64 30 3a 80 7c 2e 6c 20 | 23 31 2c 64 30 3a 80 38 |d0:.|.l |#1,d0:.8|
|00001cf0| 20 24 63 30 30 33 00 27 | 64 6f 6e 65 3a 80 94 00 | $c003.'|done:...|
|00001d00| 00 2e 63 6f 64 65 69 6e | 69 74 3a 80 7e 20 23 24 |..codein|it:.~ #$|
|00001d10| 66 2c 24 64 66 66 30 39 | 36 20 20 20 20 20 20 20 |f,$dff09|6 |
|00001d20| 20 20 20 20 20 20 20 3b | 61 75 64 69 6f 20 44 4d | ;|audio DM|
|00001d30| 41 20 4f 46 46 00 80 7e | 20 23 24 37 38 30 2c 24 |A OFF..~| #$780,$|
|00001d40| 64 66 66 30 39 61 20 20 | 20 20 20 20 20 20 20 20 |dff09a | |
|00001d50| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 61 6e 64 | | ;and|
|00001d60| 20 69 6e 74 65 72 75 70 | 74 73 00 80 7e 2e 6c 20 | interup|ts..~.l |
|00001d70| 23 31 30 32 34 2c 64 62 | 75 66 66 6c 65 6e 00 80 |#1024,db|ufflen..|
|00001d80| 81 20 23 32 2c 64 30 3a | 80 81 20 23 32 2c 64 31 |. #2,d0:|.. #2,d1|
|00001d90| 3a 80 38 20 24 63 30 30 | 32 3a 80 7e 2e 6c 20 64 |:.8 $c00|2:.~.l d|
|00001da0| 30 2c 63 68 7a 65 72 6f | 00 80 7e 2e 6c 20 64 30 |0,chzero|..~.l d0|
|00001db0| 2c 61 30 3a 80 5b 20 28 | 61 30 29 3a 80 94 00 00 |,a0:.[ (|a0):....|
|00001dc0| 2e 63 6f 64 65 66 69 6e | 69 74 3a 80 7e 20 23 24 |.codefin|it:.~ #$|
|00001dd0| 66 2c 24 64 66 66 30 39 | 36 00 80 7e 2e 6c 20 23 |f,$dff09|6..~.l #|
|00001de0| 24 64 66 66 30 61 38 2c | 61 30 3a 80 81 20 23 33 |$dff0a8,|a0:.. #3|
|00001df0| 2c 64 30 00 27 6c 6f 6f | 70 3a 80 5b 20 28 61 30 |,d0.'loo|p:.[ (a0|
|00001e00| 29 3a 80 7a 20 31 36 28 | 61 30 29 2c 61 30 3a 80 |):.z 16(|a0),a0:.|
|00001e10| 6e 20 64 30 2c 27 6c 6f | 6f 70 00 80 94 00 00 2e |n d0,'lo|op......|
|00001e20| 64 6f 64 70 6c 61 79 32 | 3a 80 81 20 23 30 2c 64 |dodplay2|:.. #0,d|
|00001e30| 37 00 00 2e 64 6f 64 70 | 6c 61 79 3a 3b 64 30 3d |7...dodp|lay:;d0=|
|00001e40| 6e 61 6d 65 2c 20 64 31 | 3d 63 68 61 6e 65 6c 6d |name, d1|=chanelm|
|00001e50| 61 73 6b 2c 20 64 37 3d | 23 76 6f 6c 73 2e 00 3b |ask, d7=|#vols..;|
|00001e60| 00 80 7e 20 64 31 2c 2d | 28 61 37 29 3a 80 7e 2e |..~ d1,-|(a7):.~.|
|00001e70| 6c 20 64 30 2c 64 32 00 | 80 7e 2e 6c 20 64 62 75 |l d0,d2.|.~.l dbu|
|00001e80| 66 66 6c 65 6e 28 70 63 | 29 2c 64 30 3a 80 7c 2e |fflen(pc|),d0:.|.|
|00001e90| 6c 20 23 31 2c 64 30 3a | 80 81 20 23 32 2c 64 31 |l #1,d0:|.. #2,d1|
|00001ea0| 00 80 38 20 24 63 30 30 | 32 3a 80 7e 2e 6c 20 64 |..8 $c00|2:.~.l d|
|00001eb0| 30 2c 64 62 75 66 66 61 | 74 3a 80 7e 2e 6c 20 64 |0,dbuffa|t:.~.l d|
|00001ec0| 30 2c 61 33 00 80 3d 2e | 6c 20 64 62 75 66 66 6c |0,a3..=.|l dbuffl|
|00001ed0| 65 6e 28 70 63 29 2c 64 | 30 3a 80 3d 2e 6c 20 64 |en(pc),d|0:.=.l d|
|00001ee0| 62 75 66 66 6c 65 6e 28 | 70 63 29 2c 64 30 3a 80 |bufflen(|pc),d0:.|
|00001ef0| 7e 2e 6c 20 64 30 2c 64 | 62 75 66 66 65 6e 64 00 |~.l d0,d|buffend.|
|00001f00| 3b 00 80 7e 2e 6c 20 64 | 32 2c 61 30 3a 80 59 20 |;..~.l d|2,a0:.Y |
|00001f10| 64 6f 6f 70 65 6e 73 6f | 75 6e 64 00 80 7e 2e 6c |doopenso|und..~.l|
|00001f20| 20 64 30 2c 64 6c 65 6e | 3a 80 7e 20 64 31 2c 64 | d0,dlen|:.~ d1,d|
|00001f30| 34 20 20 20 3b 70 65 72 | 69 6f 64 00 80 7e 20 28 |4 ;per|iod..~ (|
|00001f40| 61 37 29 2b 2c 64 31 3a | 80 59 20 64 6f 63 68 61 |a7)+,d1:|.Y docha|
|00001f50| 6e 73 6f 66 66 3a 80 7e | 20 64 31 2c 64 36 3a 80 |nsoff:.~| d1,d6:.|
|00001f60| 7e 20 64 32 2c 64 35 00 | 3b 00 3b 4f 4b 2c 20 64 |~ d2,d5.|;.;OK, d|
|00001f70| 36 3d 64 6d 61 20 62 69 | 74 73 2c 20 64 35 3d 69 |6=dma bi|ts, d5=i|
|00001f80| 6e 74 20 62 69 74 73 2c | 20 64 34 3d 70 65 72 69 |nt bits,| d4=peri|
|00001f90| 6f 64 00 3b 00 80 81 20 | 23 33 2c 64 30 3a 80 7e |od.;... |#3,d0:.~|
|00001fa0| 2e 6c 20 23 24 64 66 66 | 30 61 30 2c 61 30 3a 80 |.l #$dff|0a0,a0:.|
|00001fb0| aa 20 23 34 2c 61 32 3a | 3b 64 72 6f 70 20 73 74 |. #4,a2:|;drop st|
|00001fc0| 72 69 6e 67 20 6c 65 6e | 67 74 68 2e 00 27 6c 6f |ring len|gth..'lo|
|00001fd0| 6f 70 30 3a 80 7d 20 23 | 31 2c 64 31 3a 80 46 20 |op0:.} #|1,d1:.F |
|00001fe0| 27 73 6b 69 70 00 80 7e | 20 23 30 2c 38 28 61 30 |'skip..~| #0,8(a0|
|00001ff0| 29 3a 80 7e 20 23 30 2c | 31 30 28 61 30 29 3a 80 |):.~ #0,|10(a0):.|
|00002000| 7e 20 64 34 2c 36 28 61 | 30 29 00 80 7e 20 23 36 |~ d4,6(a|0)..~ #6|
|00002010| 34 2c 38 28 61 30 29 3a | 80 b0 20 64 37 3a 80 48 |4,8(a0):|.. d7:.H|
|00002020| 20 27 73 6b 69 70 3a 80 | aa 20 23 31 2c 64 37 3a | 'skip:.|. #1,d7:|
|00002030| 80 7e 20 2d 28 61 32 29 | 2c 38 28 61 30 29 00 27 |.~ -(a2)|,8(a0).'|
|00002040| 73 6b 69 70 3a 80 7a 20 | 31 36 28 61 30 29 2c 61 |skip:.z |16(a0),a|
|00002050| 30 3a 80 6e 20 64 30 2c | 27 6c 6f 6f 70 30 00 80 |0:.n d0,|'loop0..|
|00002060| 59 20 6c 6f 61 64 62 75 | 66 66 3a 80 56 20 23 31 |Y loadbu|ff:.V #1|
|00002070| 35 2c 64 36 3a 80 7e 20 | 64 35 2c 24 64 66 66 30 |5,d6:.~ |d5,$dff0|
|00002080| 39 63 3a 80 7e 20 64 36 | 2c 24 64 66 66 30 39 36 |9c:.~ d6|,$dff096|
|00002090| 00 80 59 20 69 6e 74 77 | 61 69 74 00 3b 00 27 6c |..Y intw|ait.;.'l|
|000020a0| 6f 6f 70 3a 80 59 20 6c | 6f 61 64 62 75 66 66 3a |oop:.Y l|oadbuff:|
|000020b0| 80 59 20 69 6e 74 77 61 | 69 74 3a 80 b0 20 64 30 |.Y intwa|it:.. d0|
|000020c0| 3a 80 48 20 27 6c 6f 6f | 70 00 3b 00 80 55 20 23 |:.H 'loo|p.;..U #|
|000020d0| 31 35 2c 64 36 3a 80 7e | 20 64 36 2c 24 64 66 66 |15,d6:.~| d6,$dff|
|000020e0| 30 39 36 00 80 7e 2e 6c | 20 64 62 75 66 66 61 74 |096..~.l| dbuffat|
|000020f0| 28 70 63 29 2c 61 31 3a | 80 7e 2e 6c 20 64 62 75 |(pc),a1:|.~.l dbu|
|00002100| 66 66 6c 65 6e 28 70 63 | 29 2c 64 30 3a 80 7c 2e |fflen(pc|),d0:.|.|
|00002110| 6c 20 23 31 2c 64 30 00 | 80 38 20 24 63 30 30 33 |l #1,d0.|.8 $c003|
|00002120| 3a 80 38 20 23 69 66 66 | 69 6f 6c 69 62 20 80 7c |:.8 #iff|iolib .||
|00002130| 20 37 2b 32 3a 80 94 00 | 00 69 6e 74 77 61 69 74 | 7+2:...|.intwait|
|00002140| 3a 3b 77 61 69 74 20 66 | 6f 72 20 61 20 73 6f 75 |:;wait f|or a sou|
|00002150| 6e 64 20 69 6e 74 65 72 | 75 70 74 00 80 7e 20 24 |nd inter|upt..~ $|
|00002160| 64 66 66 30 31 65 2c 64 | 31 3a 80 42 20 64 35 2c |dff01e,d|1:.B d5,|
|00002170| 64 31 3a 80 5c 20 64 35 | 2c 64 31 3a 80 50 20 69 |d1:.\ d5|,d1:.P i|
|00002180| 6e 74 77 61 69 74 3a 80 | 7e 20 64 35 2c 24 64 66 |ntwait:.|~ d5,$df|
|00002190| 66 30 39 63 00 80 94 00 | 00 6c 6f 61 64 62 75 66 |f09c....|.loadbuf|
|000021a0| 66 3a 3b 72 65 61 64 20 | 6e 65 78 74 20 62 75 66 |f:;read |next buf|
|000021b0| 66 65 72 20 2d 20 72 65 | 74 75 72 6e 20 6e 65 20 |fer - re|turn ne |
|000021c0| 69 66 20 6e 6f 6e 65 20 | 6c 65 66 74 00 3b 00 3b |if none |left.;.;|
|000021d0| 65 6c 73 65 2c 20 73 65 | 74 20 75 70 20 61 75 64 |else, se|t up aud|
|000021e0| 6c 6f 63 20 61 6e 64 20 | 61 75 64 6c 65 6e 2c 20 |loc and |audlen, |
|000021f0| 61 6e 64 20 77 61 69 74 | 20 66 6f 72 20 69 6e 74 |and wait| for int|
|00002200| 2e 00 3b 00 80 7e 2e 6c | 20 64 6c 65 6e 28 70 63 |..;..~.l| dlen(pc|
|00002210| 29 2c 64 30 3a 80 48 20 | 27 66 61 69 6c 32 3a 80 |),d0:.H |'fail2:.|
|00002220| 4f 20 27 66 61 69 6c 00 | 80 5c 2e 6c 20 64 62 75 |O 'fail.|.\.l dbu|
|00002230| 66 66 6c 65 6e 28 70 63 | 29 2c 64 30 3a 80 4d 20 |fflen(pc|),d0:.M |
|00002240| 27 73 6b 69 70 3a 80 7e | 2e 6c 20 64 62 75 66 66 |'skip:.~|.l dbuff|
|00002250| 6c 65 6e 28 70 63 29 2c | 64 30 00 27 73 6b 69 70 |len(pc),|d0.'skip|
|00002260| 3a 80 7e 20 64 30 2c 64 | 31 3a 80 7d 20 23 31 2c |:.~ d0,d|1:.} #1,|
|00002270| 64 31 00 3b 00 80 7e 2e | 6c 20 23 24 64 66 66 30 |d1.;..~.|l #$dff0|
|00002280| 61 30 2c 61 30 3a 80 81 | 20 23 33 2c 64 32 3a 80 |a0,a0:..| #3,d2:.|
|00002290| 7e 20 64 36 2c 64 33 00 | 27 6c 6f 6f 70 3a 80 7d |~ d6,d3.|'loop:.}|
|000022a0| 20 23 31 2c 64 33 3a 80 | 46 20 27 73 6b 69 70 30 | #1,d3:.|F 'skip0|
|000022b0| 00 80 7e 2e 6c 20 61 33 | 2c 28 61 30 29 3a 80 7e |..~.l a3|,(a0):.~|
|000022c0| 20 64 31 2c 34 28 61 30 | 29 00 27 73 6b 69 70 30 | d1,4(a0|).'skip0|
|000022d0| 3a 80 7a 20 31 36 28 61 | 30 29 2c 61 30 3a 80 6e |:.z 16(a|0),a0:.n|
|000022e0| 20 64 32 2c 27 6c 6f 6f | 70 00 3b 00 80 7e 2e 6c | d2,'loo|p.;..~.l|
|000022f0| 20 61 33 2c 61 30 3a 80 | 38 20 23 69 66 66 69 6f | a3,a0:.|8 #iffio|
|00002300| 6c 69 62 20 80 7c 20 37 | 2b 38 00 3b 00 80 7e 2e |lib .| 7|+8.;..~.|
|00002310| 6c 20 64 62 75 66 66 6c | 65 6e 28 70 63 29 2c 64 |l dbuffl|en(pc),d|
|00002320| 30 3a 80 a7 2e 6c 20 64 | 30 2c 64 6c 65 6e 00 80 |0:...l d|0,dlen..|
|00002330| 3d 2e 6c 20 64 30 2c 61 | 33 3a 80 5c 2e 6c 20 64 |=.l d0,a|3:.\.l d|
|00002340| 62 75 66 66 65 6e 64 28 | 70 63 29 2c 61 33 3a 80 |buffend(|pc),a3:.|
|00002350| 47 20 27 73 6b 69 70 32 | 00 80 7e 2e 6c 20 64 62 |G 'skip2|..~.l db|
|00002360| 75 66 66 61 74 28 70 63 | 29 2c 61 33 00 27 73 6b |uffat(pc|),a3.'sk|
|00002370| 69 70 32 3a 80 81 20 23 | 30 2c 64 30 3a 80 94 00 |ip2:.. #|0,d0:...|
|00002380| 27 66 61 69 6c 3a 80 81 | 20 23 2d 31 2c 64 30 00 |'fail:..| #-1,d0.|
|00002390| 27 66 61 69 6c 32 3a 80 | 94 00 00 65 72 72 31 3a |'fail2:.|...err1:|
|000023a0| 80 7e 2e 6c 20 23 6d 65 | 73 73 31 2c 64 30 3a 80 |.~.l #me|ss1,d0:.|
|000023b0| ae 20 23 30 00 65 72 72 | 32 3a 80 7e 2e 6c 20 23 |. #0.err|2:.~.l #|
|000023c0| 6d 65 73 73 32 2c 64 30 | 3a 80 ae 20 23 30 00 65 |mess2,d0|:.. #0.e|
|000023d0| 72 72 33 3a 80 7e 2e 6c | 20 23 6d 65 73 73 33 2c |rr3:.~.l| #mess3,|
|000023e0| 64 30 3a 80 ae 20 23 30 | 00 65 72 72 34 3a 80 7e |d0:.. #0|.err4:.~|
|000023f0| 2e 6c 20 23 6d 65 73 73 | 34 2c 64 30 3a 80 ae 20 |.l #mess|4,d0:.. |
|00002400| 23 30 00 00 3b 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |#0..;***|********|
|00002410| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 20 45 52 52 4f 52 53 |********|* ERRORS|
|00002420| 20 42 45 4c 4f 57 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a | BELOW *|********|
|00002430| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 00 00 65 72 |********|****..er|
|00002440| 72 6f 72 73 00 65 72 72 | 35 3a 80 7e 2e 6c 20 23 |rors.err|5:.~.l #|
|00002450| 6d 65 73 73 35 2c 64 30 | 3a 80 ae 20 23 30 00 65 |mess5,d0|:.. #0.e|
|00002460| 72 72 36 3a 80 7e 2e 6c | 20 23 6d 65 73 73 36 2c |rr6:.~.l| #mess6,|
|00002470| 64 30 3a 80 ae 20 23 30 | 00 65 72 72 37 3a 80 7e |d0:.. #0|.err7:.~|
|00002480| 2e 6c 20 23 6d 65 73 73 | 37 2c 64 30 3a 80 ae 20 |.l #mess|7,d0:.. |
|00002490| 23 30 00 65 72 72 38 3a | 80 7e 2e 6c 20 23 6d 65 |#0.err8:|.~.l #me|
|000024a0| 73 73 38 2c 64 30 3a 80 | ae 20 23 30 00 65 72 72 |ss8,d0:.|. #0.err|
|000024b0| 39 3a 80 7e 2e 6c 20 23 | 6d 65 73 73 39 2c 64 30 |9:.~.l #|mess9,d0|
|000024c0| 3a 80 ae 20 23 30 00 65 | 72 72 61 3a 80 7e 2e 6c |:.. #0.e|rra:.~.l|
|000024d0| 20 23 6d 65 73 73 61 2c | 64 30 3a 80 ae 20 23 30 | #messa,|d0:.. #0|
|000024e0| 00 00 6d 65 73 73 31 3a | 80 25 2e 62 20 22 49 6c |..mess1:|.%.b "Il|
|000024f0| 6c 65 67 61 6c 20 53 6f | 75 6e 64 20 66 69 6c 65 |legal So|und file|
|00002500| 22 2c 30 00 6d 65 73 73 | 32 3a 80 25 2e 62 20 22 |",0.mess|2:.%.b "|
|00002510| 43 61 6e 27 74 20 46 69 | 6e 64 20 56 48 44 52 22 |Can't Fi|nd VHDR"|
|00002520| 2c 30 00 6d 65 73 73 33 | 3a 80 25 2e 62 20 22 45 |,0.mess3|:.%.b "E|
|00002530| 72 72 6f 72 20 52 65 61 | 64 69 6e 67 20 46 69 6c |rror Rea|ding Fil|
|00002540| 65 22 2c 30 00 6d 65 73 | 73 34 3a 80 25 2e 62 20 |e",0.mes|s4:.%.b |
|00002550| 22 53 6f 75 6e 64 20 74 | 6f 6f 20 6c 6f 6e 67 22 |"Sound t|oo long"|
|00002560| 2c 30 00 6d 65 73 73 35 | 3a 80 25 2e 62 20 22 55 |,0.mess5|:.%.b "U|
|00002570| 6e 69 6e 69 74 69 61 6c | 69 7a 65 64 20 53 6f 75 |ninitial|ized Sou|
|00002580| 6e 64 22 2c 30 00 6d 65 | 73 73 36 3a 80 25 2e 62 |nd",0.me|ss6:.%.b|
|00002590| 20 22 49 6c 6c 65 67 61 | 6c 20 43 68 61 6e 65 6c | "Illega|l Chanel|
|000025a0| 20 4d 61 73 6b 22 2c 30 | 00 6d 65 73 73 37 3a 80 | Mask",0|.mess7:.|
|000025b0| 25 2e 62 20 22 53 6f 75 | 6e 64 20 4c 65 6e 67 74 |%.b "Sou|nd Lengt|
|000025c0| 68 20 4d 55 53 54 20 62 | 65 20 65 76 65 6e 22 2c |h MUST b|e even",|
|000025d0| 30 00 6d 65 73 73 38 3a | 80 25 2e 62 20 22 52 65 |0.mess8:|.%.b "Re|
|000025e0| 70 65 61 74 20 4d 55 53 | 54 20 62 65 20 6c 65 73 |peat MUS|T be les|
|000025f0| 73 20 74 68 61 6e 20 4c | 65 6e 67 74 68 22 2c 30 |s than L|ength",0|
|00002600| 00 6d 65 73 73 39 3a 80 | 25 2e 62 20 22 44 61 74 |.mess9:.|%.b "Dat|
|00002610| 61 20 6f 66 66 73 65 74 | 20 74 6f 6f 20 6c 61 72 |a offset| too lar|
|00002620| 67 65 22 2c 30 00 6d 65 | 73 73 61 3a 80 25 2e 62 |ge",0.me|ssa:.%.b|
|00002630| 20 22 52 65 70 65 61 74 | 20 6f 66 66 73 65 74 20 | "Repeat| offset |
|00002640| 4d 55 53 54 20 62 65 20 | 65 76 65 6e 22 2c 30 00 |MUST be |even",0.|
|00002650| 80 27 00 00 73 6e 64 63 | 68 6b 3a 80 b0 2e 6c 20 |.'..sndc|hk:...l |
|00002660| 28 61 33 29 3a 80 48 20 | 65 72 72 35 00 3b 00 64 |(a3):.H |err5.;.d|
|00002670| 70 63 68 6b 3a 80 5c 20 | 23 31 35 2c 64 31 3a 80 |pchk:.\ |#15,d1:.|
|00002680| 4b 20 65 72 72 36 3a 80 | 94 00 00 76 63 68 6b 3a |K err6:.|...vchk:|
|00002690| 80 5c 20 23 31 35 2c 64 | 30 3a 80 4b 20 65 72 72 |.\ #15,d|0:.K err|
|000026a0| 36 3a 80 94 00 00 69 73 | 63 68 6b 31 3a 80 5c 2e |6:....is|chk1:.\.|
|000026b0| 6c 20 23 36 35 35 33 36 | 2a 32 2c 64 31 3a 80 46 |l #65536|*2,d1:.F|
|000026c0| 20 65 72 72 34 00 80 57 | 20 23 30 2c 64 31 3a 80 | err4..W| #0,d1:.|
|000026d0| 50 20 65 72 72 37 3a 80 | 94 00 00 69 73 63 68 6b |P err7:.|...ischk|
|000026e0| 32 3a 80 59 20 69 73 63 | 68 6b 31 3a 80 57 20 23 |2:.Y isc|hk1:.W #|
|000026f0| 30 2c 64 33 3a 80 50 20 | 65 72 72 61 00 80 5c 2e |0,d3:.P |erra..\.|
|00002700| 6c 20 64 31 2c 64 33 3a | 80 46 20 65 72 72 38 3a |l d1,d3:|.F err8:|
|00002710| 80 94 00 00 73 64 61 74 | 61 63 68 6b 3a 80 b0 2e |....sdat|achk:...|
|00002720| 6c 20 28 61 33 29 3a 80 | 48 20 65 72 72 35 00 80 |l (a3):.|H err5..|
|00002730| 81 20 23 30 2c 64 30 3a | 80 7e 20 36 28 61 33 29 |. #0,d0:|.~ 6(a3)|
|00002740| 2c 64 30 3a 80 3d 2e 6c | 20 64 30 2c 64 30 00 80 |,d0:.=.l| d0,d0..|
|00002750| 5c 2e 6c 20 64 30 2c 64 | 31 3a 80 46 20 65 72 72 |\.l d0,d|1:.F err|
|00002760| 39 3a 80 94 00 00 | |9:.... | |
+--------+-------------------------+-------------------------+--------+--------+
