/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / s1 / soundslab / !SoundSlab / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1d f4 20 3e 24 | 2e 21 53 6f 75 6e 64 53 |..... >$|.!SoundS|
|00000010| 6c 61 62 2e 21 52 75 6e | 49 6d 61 67 65 0d 00 14 |lab.!Run|Image...|
|00000020| 31 f4 20 4d 61 69 6e 20 | 50 72 6f 67 72 61 6d 20 |1. Main |Program |
|00000030| 66 6f 72 20 22 21 53 6f | 75 6e 64 53 6c 61 62 22 |for "!So|undSlab"|
|00000040| 20 53 6f 75 6e 64 20 53 | 61 6d 70 6c 65 72 0d 00 | Sound S|ampler..|
|00000050| 1e 2a f4 20 56 65 72 73 | 69 6f 6e 20 31 2e 30 33 |.*. Vers|ion 1.03|
|00000060| 20 4c 61 73 74 20 55 70 | 64 61 74 65 64 20 30 32 | Last Up|dated 02|
|00000070| 20 41 75 67 20 27 39 34 | 0d 00 28 3f f4 20 54 65 | Aug '94|..(?. Te|
|00000080| 6d 70 6c 61 74 65 73 20 | 26 20 49 64 65 61 20 62 |mplates |& Idea b|
|00000090| 79 20 52 2e 20 54 61 6e | 6e 65 72 20 2d 20 50 72 |y R. Tan|ner - Pr|
|000000a0| 6f 67 72 61 6d 6d 69 6e | 67 20 62 79 20 4a 2e 20 |ogrammin|g by J. |
|000000b0| 52 6f 62 62 69 6e 73 0d | 00 32 1e f4 20 a9 20 4a |Robbins.|.2.. . J|
|000000c0| 2e 20 52 6f 62 62 69 6e | 73 20 26 20 52 2e 20 54 |. Robbin|s & R. T|
|000000d0| 61 6e 6e 65 72 0d 00 3c | 05 f4 0d 00 46 05 3a 0d |anner..<|....F.:.|
|000000e0| 00 50 0d 20 e9 20 76 25 | 3d 31 32 37 0d 00 5a 0d |.P. . v%|=127..Z.|
|000000f0| 20 e9 20 70 69 25 3d 35 | 33 0d 00 64 0f 20 e9 20 | . pi%=5|3..d. . |
|00000100| 4b 24 3d 22 32 43 4d 22 | 0d 00 6e 14 20 ff 28 22 |K$="2CM"|..n. .("|
|00000110| 56 4f 4c 55 4d 45 20 31 | 32 37 22 29 0d 00 78 0e |VOLUME 1|27")..x.|
|00000120| 20 e9 20 43 48 55 52 42 | 3d 31 0d 00 82 37 de 20 | . CHURB|=1...7. |
|00000130| 62 6c 6f 63 6b 20 26 31 | 30 30 30 2c 20 6d 65 6e |block &1|000, men|
|00000140| 75 25 20 31 30 32 34 2c | 63 75 72 62 75 66 25 20 |u% 1024,|curbuf% |
|00000150| 26 31 30 30 30 2c 69 63 | 6f 6e 64 20 26 31 30 30 |&1000,ic|ond &100|
|00000160| 30 0d 00 8c 05 3a 0d 00 | 96 0f 20 ee 85 f2 65 72 |0....:..|.. ...er|
|00000170| 72 28 f6 24 29 0d 00 a0 | 19 65 6e 64 62 75 66 25 |r(.$)...|.endbuf%|
|00000180| 3d 63 75 72 62 75 66 25 | 2b 26 36 30 30 30 0d 00 |=curbuf%|+&6000..|
|00000190| aa 49 c8 99 20 22 57 69 | 6d 70 5f 49 6e 69 74 69 |.I.. "Wi|mp_Initi|
|000001a0| 61 6c 69 73 65 22 2c 32 | 30 30 2c 26 34 42 35 33 |alise",2|00,&4B53|
|000001b0| 34 31 35 34 2c 22 53 6f | 75 6e 64 20 53 61 6d 70 |4154,"So|und Samp|
|000001c0| 6c 65 72 22 20 b8 20 76 | 65 72 73 69 6f 6e 25 2c |ler" . v|ersion%,|
|000001d0| 6d 79 74 61 73 6b 25 0d | 00 b4 24 c8 99 20 22 57 |mytask%.|..$.. "W|
|000001e0| 69 6d 70 5f 43 6c 61 69 | 6d 49 6e 74 65 72 66 61 |imp_Clai|mInterfa|
|000001f0| 63 65 22 2c 6d 79 74 61 | 73 6b 25 0d 00 be 0d f2 |ce",myta|sk%.....|
|00000200| 74 65 6d 70 6c 61 74 65 | 0d 00 c8 1a 20 20 24 a4 |template|....  $.|
|00000210| 74 61 64 28 70 69 74 63 | 68 25 2c 31 29 3d c3 70 |tad(pitc|h%,1)=.p|
|00000220| 69 25 0d 00 d2 17 20 24 | a4 74 61 64 28 70 69 74 |i%.... $|.tad(pit|
|00000230| 63 68 25 2c 32 29 3d 4b | 24 0d 00 dc 2d 20 e7 20 |ch%,2)=K|$...- . |
|00000240| 62 6c 6f 63 6b 21 31 32 | 3d 76 6f 6c 75 6d 65 25 |block!12|=volume%|
|00000250| 20 80 20 62 6c 6f 63 6b | 21 31 36 3d 31 20 8c 20 | . block|!16=1 . |
|00000260| f2 76 6f 6c 75 70 0d 00 | e6 45 69 6e 69 74 69 63 |.volup..|.Einitic|
|00000270| 3d a4 69 63 6f 6e 62 61 | 72 28 25 31 31 30 31 30 |=.iconba|r(%11010|
|00000280| 2c 2d 31 2c 37 2c 30 2c | 22 21 53 6f 75 6e 64 53 |,-1,7,0,|"!SoundS|
|00000290| 6c 61 62 22 2b bd 31 33 | 2c 30 2c 30 2c 30 2c 33 |lab"+.13|,0,0,0,3|
|000002a0| 2c 30 2c 30 2c 36 38 2c | 36 38 29 0d 00 f0 44 65 |,0,0,68,|68)...De|
|000002b0| 6e 64 25 3d a3 3a 64 72 | 61 67 25 3d 30 3a 73 61 |nd%=.:dr|ag%=0:sa|
|000002c0| 76 69 6e 67 25 3d 30 3a | 61 63 6b 25 3d a3 3a 6b |ving%=0:|ack%=.:k|
|000002d0| 65 79 70 6f 73 3d 2d 31 | 3a 6b 65 79 74 6f 75 73 |eypos=-1|:keytous|
|000002e0| 65 3d 2d 31 3a 6d 6f 64 | 69 66 69 65 64 3d 30 0d |e=-1:mod|ified=0.|
|000002f0| 00 fa 05 3a 0d 01 04 05 | f5 0d 01 0e 26 c8 99 20 |...:....|....&.. |
|00000300| 22 57 69 6d 70 5f 50 6f | 6c 6c 22 2c 31 2c 62 6c |"Wimp_Po|ll",1,bl|
|00000310| 6f 63 6b 20 b8 20 65 76 | 65 6e 74 63 6f 64 65 0d |ock . ev|entcode.|
|00000320| 01 18 2d c8 99 20 22 57 | 69 6d 70 5f 50 6f 6c 6c |..-.. "W|imp_Poll|
|00000330| 50 6f 69 6e 74 65 72 22 | 2c 65 76 65 6e 74 63 6f |Pointer"|,eventco|
|00000340| 64 65 2c 2c 76 65 72 73 | 69 6f 6e 25 0d 01 22 12 |de,,vers|ion%..".|
|00000350| c8 8e 20 65 76 65 6e 74 | 63 6f 64 65 20 ca 0d 01 |.. event|code ...|
|00000360| 2c 08 c9 20 30 3a 0d 01 | 36 18 c9 20 31 3a f2 72 |,.. 0:..|6.. 1:.r|
|00000370| 65 64 72 61 77 28 62 6c | 6f 63 6b 21 30 29 0d 01 |edraw(bl|ock!0)..|
|00000380| 40 23 c9 20 32 3a c8 99 | 20 22 57 69 6d 70 5f 4f |@#. 2:..| "Wimp_O|
|00000390| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |penWindo|w",,bloc|
|000003a0| 6b 0d 01 4a 24 c9 20 33 | 3a c8 99 20 22 57 69 6d |k..J$. 3|:.. "Wim|
|000003b0| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 2c |p_CloseW|indow",,|
|000003c0| 62 6c 6f 63 6b 0d 01 54 | 17 c9 20 36 3a f2 62 75 |block..T|.. 6:.bu|
|000003d0| 74 74 6f 6e 73 28 62 6c | 6f 63 6b 29 0d 01 5e 08 |ttons(bl|ock)..^.|
|000003e0| 20 c9 20 37 0d 01 68 13 | c9 20 38 3a f2 70 72 6f | . 7..h.|. 8:.pro|
|000003f0| 63 65 73 73 6b 65 79 0d | 01 72 0f c9 20 39 3a f2 |cesskey.|.r.. 9:.|
|00000400| 64 65 63 6f 64 65 0d 01 | 7c 0c 20 c9 20 31 37 2c |decode..||. . 17,|
|00000410| 31 38 0d 01 86 05 cb 0d | 01 90 0a fd 20 65 6e 64 |18......|.... end|
|00000420| 25 0d 01 9a 05 e0 0d 01 | a4 34 dd f2 6f 70 65 6e |%.......|.4..open|
|00000430| 28 68 61 6e 64 6c 65 2c | 76 6d 69 6e 78 2c 76 6d |(handle,|vminx,vm|
|00000440| 69 6e 79 2c 76 6d 61 78 | 78 2c 76 6d 61 78 79 2c |iny,vmax|x,vmaxy,|
|00000450| 78 6f 66 66 2c 79 6f 66 | 66 29 0d 01 ae 3c 21 62 |xoff,yof|f)...<!b|
|00000460| 6c 6f 63 6b 3d 68 61 6e | 64 6c 65 3a 62 6c 6f 63 |lock=han|dle:bloc|
|00000470| 6b 21 34 3d 76 6d 69 6e | 78 3a 62 6c 6f 63 6b 21 |k!4=vmin|x:block!|
|00000480| 38 3d 76 6d 69 6e 79 3a | 62 6c 6f 63 6b 21 31 32 |8=vminy:|block!12|
|00000490| 3d 76 6d 61 78 78 0d 01 | b8 3a 62 6c 6f 63 6b 21 |=vmaxx..|.:block!|
|000004a0| 31 36 3d 76 6d 61 78 79 | 3a 62 6c 6f 63 6b 21 32 |16=vmaxy|:block!2|
|000004b0| 30 3d 78 6f 66 66 3a 62 | 6c 6f 63 6b 21 32 34 3d |0=xoff:b|lock!24=|
|000004c0| 79 6f 66 66 3a 62 6c 6f | 63 6b 21 32 38 3d 2d 31 |yoff:blo|ck!28=-1|
|000004d0| 0d 01 c2 1f c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 |...... "|Wimp_Ope|
|000004e0| 6e 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 0d |nWindow"|,,block.|
|000004f0| 01 cc 05 e1 0d 01 d6 4b | dd a4 69 63 6f 6e 62 61 |.......K|..iconba|
|00000500| 72 28 66 6c 61 67 73 2c | 70 61 72 74 2c 66 6f 72 |r(flags,|part,for|
|00000510| 2c 62 61 63 2c 64 61 74 | 61 24 2c 61 64 64 2c 61 |,bac,dat|a$,add,a|
|00000520| 64 64 32 2c 6c 65 6e 67 | 74 68 2c 6d 6f 75 73 65 |dd2,leng|th,mouse|
|00000530| 2c 78 73 31 2c 79 73 31 | 2c 78 73 2c 79 73 29 0d |,xs1,ys1|,xs,ys).|
|00000540| 01 e0 0f 21 69 63 6f 6e | 64 3d 70 61 72 74 0d 01 |...!icon|d=part..|
|00000550| ea 0f 69 63 6f 6e 64 21 | 34 3d 78 73 31 0d 01 f4 |..icond!|4=xs1...|
|00000560| 27 69 63 6f 6e 64 21 38 | 3d 79 73 31 3a 69 63 6f |'icond!8|=ys1:ico|
|00000570| 6e 64 21 31 32 3d 78 73 | 3a 69 63 6f 6e 64 21 31 |nd!12=xs|:icond!1|
|00000580| 36 3d 79 73 0d 01 fe 35 | 69 63 6f 6e 64 21 32 30 |6=ys...5|icond!20|
|00000590| 3d 66 6c 61 67 73 2b 28 | 28 32 5e 31 32 29 2a 6d |=flags+(|(2^12)*m|
|000005a0| 6f 75 73 65 29 3a 69 63 | 6f 6e 64 3f 32 33 3d 66 |ouse):ic|ond?23=f|
|000005b0| 6f 72 2b 62 61 63 2a 31 | 36 0d 02 08 50 e7 20 64 |or+bac*1|6...P. d|
|000005c0| 61 74 61 24 3c 3e 22 22 | 20 8c 20 24 28 69 63 6f |ata$<>""| . $(ico|
|000005d0| 6e 64 2b 32 34 29 3d 64 | 61 74 61 24 20 8b 20 69 |nd+24)=d|ata$ . i|
|000005e0| 63 6f 6e 64 21 32 34 3d | 61 64 64 3a 69 63 6f 6e |cond!24=|add:icon|
|000005f0| 64 21 32 38 3d 61 64 64 | 32 3a 69 63 6f 6e 64 21 |d!28=add|2:icond!|
|00000600| 33 32 3d 6c 65 6e 67 74 | 68 0d 02 12 26 c8 99 20 |32=lengt|h...&.. |
|00000610| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 49 63 6f 6e |"Wimp_Cr|eateIcon|
|00000620| 22 2c 2c 69 63 6f 6e 64 | 20 b8 20 69 63 6f 6e 0d |",,icond| . icon.|
|00000630| 02 1c 09 3d 69 63 6f 6e | 0d 02 26 12 dd a4 74 65 |...=icon|..&...te|
|00000640| 6d 70 6c 61 74 65 28 61 | 24 29 0d 02 30 47 c8 99 |mplate(a|$)..0G..|
|00000650| 20 22 57 69 6d 70 5f 4c | 6f 61 64 54 65 6d 70 6c | "Wimp_L|oadTempl|
|00000660| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 2c 69 6e 64 69 |ate",,bl|ock,indi|
|00000670| 72 2c 65 6e 64 62 75 66 | 25 2c 2d 31 2c 61 24 2c |r,endbuf|%,-1,a$,|
|00000680| 30 20 b8 20 2c 2c 69 6e | 64 69 72 2c 2c 2c 2c 63 |0 . ,,in|dir,,,,c|
|00000690| 25 0d 02 3a 30 e7 20 63 | 25 3d 30 20 8c 20 ef 34 |%..:0. c|%=0 . .4|
|000006a0| 3a f1 20 22 54 65 6d 70 | 6c 61 74 65 20 22 3b 61 |:. "Temp|late ";a|
|000006b0| 24 3b 22 20 6e 6f 74 20 | 66 6f 75 6e 64 2e 22 3a |$;" not |found.":|
|000006c0| e0 0d 02 44 0e 62 6c 6f | 63 6b 21 36 34 3d 31 0d |...D.blo|ck!64=1.|
|000006d0| 02 4e 2a c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |.N*.. "W|imp_Crea|
|000006e0| 74 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |teWindow|",,block|
|000006f0| 20 b8 20 68 61 6e 64 6c | 65 0d 02 58 0b 3d 68 61 | . handl|e..X.=ha|
|00000700| 6e 64 6c 65 0d 02 62 0e | dd f2 6d 6f 61 6e 28 61 |ndle..b.|..moan(a|
|00000710| 24 29 0d 02 6c 1d 21 69 | 63 6f 6e 64 3d 30 3a 24 |$)..l.!i|cond=0:$|
|00000720| 28 69 63 6f 6e 64 2b 34 | 29 3d 61 24 2b bd 30 0d |(icond+4|)=a$+.0.|
|00000730| 02 76 31 c8 99 20 22 57 | 69 6d 70 5f 52 65 70 6f |.v1.. "W|imp_Repo|
|00000740| 72 74 45 72 72 6f 72 22 | 2c 69 63 6f 6e 64 2c 31 |rtError"|,icond,1|
|00000750| 2c 22 21 53 6f 75 6e 64 | 53 61 6d 70 6c 65 72 22 |,"!Sound|Sampler"|
|00000760| 0d 02 80 05 e1 0d 02 8a | 0d dd a4 73 74 72 28 61 |........|...str(a|
|00000770| 25 29 0d 02 94 08 ea 20 | 62 24 0d 02 9e 0e c8 95 |%)..... |b$......|
|00000780| 20 3f 61 25 3e 3d 33 32 | 0d 02 a8 0e 62 24 2b 3d | ?a%>=32|....b$+=|
|00000790| bd 28 3f 61 25 29 0d 02 | b2 09 61 25 2b 3d 31 0d |.(?a%)..|..a%+=1.|
|000007a0| 02 bc 05 ce 0d 02 c6 07 | 3d 62 24 0d 02 d0 16 dd |........|=b$.....|
|000007b0| a4 74 61 64 28 68 61 6e | 64 6c 65 2c 69 63 6f 6e |.tad(han|dle,icon|
|000007c0| 29 0d 02 da 15 f2 67 69 | 69 28 68 61 6e 64 6c 65 |).....gi|i(handle|
|000007d0| 2c 69 63 6f 6e 29 0d 02 | e4 0d 3d 69 63 6f 6e 64 |,icon)..|..=icond|
|000007e0| 21 32 38 0d 02 ee 1d dd | f2 69 6e 66 6f 28 68 61 |!28.....|.info(ha|
|000007f0| 6e 64 6c 65 2c 69 63 6f | 6e 2c 74 65 78 74 24 29 |ndle,ico|n,text$)|
|00000800| 0d 02 f8 3b 21 62 6c 6f | 63 6b 3d 68 61 6e 64 6c |...;!blo|ck=handl|
|00000810| 65 3a 62 6c 6f 63 6b 21 | 34 3d 69 63 6f 6e 3a c8 |e:block!|4=icon:.|
|00000820| 99 22 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 |."Wimp_G|etIconSt|
|00000830| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 0d 03 02 29 24 |ate",,bl|ock...)$|
|00000840| 28 62 6c 6f 63 6b 21 32 | 38 29 3d 74 65 78 74 24 |(block!2|8)=text$|
|00000850| 3a 62 6c 6f 63 6b 21 33 | 36 3d a9 28 74 65 78 74 |:block!3|6=.(text|
|00000860| 24 29 2b 31 0d 03 0c 18 | 62 6c 6f 63 6b 21 38 3d |$)+1....|block!8=|
|00000870| 30 3a 62 6c 6f 63 6b 21 | 31 32 3d 30 0d 03 16 20 |0:block!|12=0... |
|00000880| c8 99 22 57 69 6d 70 5f | 53 65 74 49 63 6f 6e 53 |.."Wimp_|SetIconS|
|00000890| 74 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 0d 03 20 05 |tate",,b|lock.. .|
|000008a0| e1 0d 03 2a 16 dd f2 67 | 69 69 28 68 61 6e 64 6c |...*...g|ii(handl|
|000008b0| 65 2c 69 63 6f 6e 29 0d | 03 34 1e 21 69 63 6f 6e |e,icon).|.4.!icon|
|000008c0| 64 3d 68 61 6e 64 6c 65 | 3a 69 63 6f 6e 64 21 34 |d=handle|:icond!4|
|000008d0| 3d 69 63 6f 6e 0d 03 3e | 21 c8 99 20 22 57 69 6d |=icon..>|!.. "Wim|
|000008e0| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|000008f0| 2c 69 63 6f 6e 64 0d 03 | 48 05 e1 0d 03 52 19 dd |,icond..|H....R..|
|00000900| f2 6f 70 65 6e 77 69 6e | 64 6f 77 28 68 61 6e 64 |.openwin|dow(hand|
|00000910| 6c 65 25 29 0d 03 5c 12 | 21 69 63 6f 6e 64 3d 68 |le%)..\.|!icond=h|
|00000920| 61 6e 64 6c 65 25 0d 03 | 66 22 c8 99 20 22 57 69 |andle%..|f".. "Wi|
|00000930| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 49 6e 66 6f |mp_GetWi|ndowInfo|
|00000940| 22 2c 2c 69 63 6f 6e 64 | 0d 03 70 1f c8 99 20 22 |",,icond|..p... "|
|00000950| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00000960| 2c 2c 69 63 6f 6e 64 0d | 03 7a 05 e1 0d 03 84 20 |,,icond.|.z..... |
|00000970| dd f2 61 6c 74 65 72 28 | 68 61 6e 64 2c 69 63 6f |..alter(|hand,ico|
|00000980| 6e 2c 65 6f 72 2c 63 6c | 65 61 72 29 0d 03 8e 1c |n,eor,cl|ear)....|
|00000990| 21 69 63 6f 6e 64 3d 68 | 61 6e 64 3a 69 63 6f 6e |!icond=h|and:icon|
|000009a0| 64 21 34 3d 69 63 6f 6e | 0d 03 98 1e 69 63 6f 6e |d!4=icon|....icon|
|000009b0| 64 21 38 3d 65 6f 72 3a | 69 63 6f 6e 64 21 31 32 |d!8=eor:|icond!12|
|000009c0| 3d 63 6c 65 61 72 0d 03 | a2 21 c8 99 20 22 57 69 |=clear..|.!.. "Wi|
|000009d0| 6d 70 5f 53 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_SetIc|onState"|
|000009e0| 2c 2c 69 63 6f 6e 64 0d | 03 ac 05 e1 0d 03 b6 12 |,,icond.|........|
|000009f0| dd f2 73 74 61 74 65 28 | 77 69 2c 69 63 29 0d 03 |..state(|wi,ic)..|
|00000a00| c0 18 21 62 6c 6f 63 6b | 3d 77 69 3a 62 6c 6f 63 |..!block|=wi:bloc|
|00000a10| 6b 21 34 3d 69 63 0d 03 | ca 21 c8 99 20 22 57 69 |k!4=ic..|.!.. "Wi|
|00000a20| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00000a30| 2c 2c 62 6c 6f 63 6b 0d | 03 d4 05 e1 0d 03 de 13 |,,block.|........|
|00000a40| dd a4 73 65 6c 65 63 74 | 28 77 69 2c 69 63 29 0d |..select|(wi,ic).|
|00000a50| 03 e8 11 f2 73 74 61 74 | 65 28 77 69 2c 69 63 29 |....stat|e(wi,ic)|
|00000a60| 0d 03 f2 22 e7 20 28 28 | 62 6c 6f 63 6b 21 32 34 |...". ((|block!24|
|00000a70| 29 20 80 20 31 3c 3c 32 | 31 29 3e 30 20 8c 20 3d |) . 1<<2|1)>0 . =|
|00000a80| 2d 31 0d 03 fc 06 3d 30 | 0d 04 06 0d dd a4 62 69 |-1....=0|......bi|
|00000a90| 74 28 61 24 29 0d 04 10 | 11 c8 95 20 a7 61 24 2c |t(a$)...|... .a$,|
|00000aa0| 22 3a 22 29 3e 30 0d 04 | 1a 16 61 24 3d c1 61 24 |":")>0..|..a$=.a$|
|00000ab0| 2c a7 61 24 2c 22 3a 22 | 29 2b 31 29 0d 04 24 05 |,.a$,":"|)+1)..$.|
|00000ac0| ce 0d 04 2e 11 c8 95 20 | a7 61 24 2c 22 2e 22 29 |....... |.a$,".")|
|00000ad0| 3e 30 0d 04 38 16 61 24 | 3d c1 61 24 2c a7 61 24 |>0..8.a$|=.a$,.a$|
|00000ae0| 2c 22 2e 22 29 2b 31 29 | 0d 04 42 05 ce 0d 04 4c |,".")+1)|..B....L|
|00000af0| 07 3d 61 24 0d 04 56 13 | dd f2 6f 70 65 6e 6d 65 |.=a$..V.|..openme|
|00000b00| 6e 75 28 78 2c 79 29 0d | 04 60 26 c8 99 20 22 57 |nu(x,y).|.`&.. "W|
|00000b10| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00000b20| 2c 74 6f 70 6d 65 6e 75 | 25 2c 78 2c 79 0d 04 6a |,topmenu|%,x,y..j|
|00000b30| 05 e1 0d 04 74 1e dd a4 | 6d 65 6e 75 28 74 69 74 |....t...|menu(tit|
|00000b40| 6c 65 24 2c 77 69 64 74 | 68 2c 6d 65 6e 75 24 29 |le$,widt|h,menu$)|
|00000b50| 0d 04 7e 0e 6d 65 6e 75 | 24 2b 3d 22 2c 22 0d 04 |..~.menu|$+=","..|
|00000b60| 88 13 6f 6c 64 6d 65 6e | 75 3d 6d 65 6e 75 70 74 |..oldmen|u=menupt|
|00000b70| 72 0d 04 92 13 24 6d 65 | 6e 75 70 74 72 3d 74 69 |r....$me|nuptr=ti|
|00000b80| 74 6c 65 24 0d 04 9c 10 | 6d 65 6e 75 70 74 72 3f |tle$....|menuptr?|
|00000b90| 31 32 3d 37 0d 04 a6 10 | 6d 65 6e 75 70 74 72 3f |12=7....|menuptr?|
|00000ba0| 31 33 3d 32 0d 04 b0 10 | 6d 65 6e 75 70 74 72 3f |13=2....|menuptr?|
|00000bb0| 31 34 3d 37 0d 04 ba 10 | 6d 65 6e 75 70 74 72 3f |14=7....|menuptr?|
|00000bc0| 31 35 3d 30 0d 04 c4 14 | 6d 65 6e 75 70 74 72 21 |15=0....|menuptr!|
|00000bd0| 31 36 3d 77 69 64 74 68 | 0d 04 ce 11 6d 65 6e 75 |16=width|....menu|
|00000be0| 70 74 72 21 32 30 3d 34 | 38 0d 04 d8 10 6d 65 6e |ptr!20=4|8....men|
|00000bf0| 75 70 74 72 21 32 34 3d | 30 0d 04 e2 0f 6d 65 6e |uptr!24=|0....men|
|00000c00| 75 70 74 72 2b 3d 32 38 | 0d 04 ec 05 f5 0d 04 f6 |uptr+=28|........|
|00000c10| 10 f2 69 74 65 6d 28 6d | 65 6e 75 24 29 0d 05 00 |..item(m|enu$)...|
|00000c20| 1f 6d 65 6e 75 24 3d c1 | 6d 65 6e 75 24 2c a7 6d |.menu$=.|menu$,.m|
|00000c30| 65 6e 75 24 2c 22 2c 22 | 29 2b 31 29 0d 05 0a 0f |enu$,","|)+1)....|
|00000c40| 6d 65 6e 75 70 74 72 2b | 3d 32 34 0d 05 14 0e fd |menuptr+|=24.....|
|00000c50| 20 6d 65 6e 75 24 3d 22 | 22 0d 05 1e 29 6d 65 6e | menu$="|"...)men|
|00000c60| 75 70 74 72 21 2d 32 34 | 3d 28 6d 65 6e 75 70 74 |uptr!-24|=(menupt|
|00000c70| 72 21 2d 32 34 29 20 84 | 20 25 31 30 30 30 30 30 |r!-24) .| %100000|
|00000c80| 30 30 0d 05 28 0c 3d 6f | 6c 64 6d 65 6e 75 0d 05 |00..(.=o|ldmenu..|
|00000c90| 32 0e dd f2 69 74 65 6d | 28 6d 24 29 0d 05 3c 16 |2...item|(m$)..<.|
|00000ca0| 6d 24 3d c0 6d 24 2c a7 | 6d 24 2c 22 2c 22 29 2d |m$=.m$,.|m$,",")-|
|00000cb0| 31 29 0d 05 46 0f 69 24 | 3d 22 22 3a 6a 24 3d 22 |1)..F.i$|="":j$="|
|00000cc0| 22 0d 05 50 12 e7 20 a7 | 6d 24 2c 22 5b 22 29 3e |"..P.. .|m$,"[")>|
|00000cd0| 30 20 8c 0d 05 5a 16 69 | 24 3d c0 6d 24 2c a7 6d |0 ...Z.i|$=.m$,.m|
|00000ce0| 24 2c 22 5d 22 29 2d 31 | 29 0d 05 64 16 6d 24 3d |$,"]")-1|)..d.m$=|
|00000cf0| c1 6d 24 2c a7 6d 24 2c | 22 5d 22 29 2b 31 29 0d |.m$,.m$,|"]")+1).|
|00000d00| 05 6e 16 6a 24 3d c0 69 | 24 2c a7 69 24 2c 22 2f |.n.j$=.i|$,.i$,"/|
|00000d10| 22 29 2d 31 29 0d 05 78 | 16 69 24 3d c1 69 24 2c |")-1)..x|.i$=.i$,|
|00000d20| a7 69 24 2c 22 2f 22 29 | 2b 31 29 0d 05 82 05 cd |.i$,"/")|+1).....|
|00000d30| 0d 05 8c 14 69 66 6c 61 | 67 73 3d 26 30 37 30 30 |....ifla|gs=&0700|
|00000d40| 30 30 32 31 0d 05 96 0c | 6d 66 6c 61 67 73 3d 30 |0021....|mflags=0|
|00000d50| 0d 05 a0 0e 73 75 62 6d | 65 6e 75 3d 2d 31 0d 05 |....subm|enu=-1..|
|00000d60| aa 20 e7 20 a7 6a 24 2c | 22 77 22 29 3e 30 20 8c |. . .j$,|"w")>0 .|
|00000d70| 20 73 75 62 6d 65 6e 75 | 3d a0 28 69 24 29 0d 05 | submenu|=.(i$)..|
|00000d80| b4 20 e7 20 a7 6a 24 2c | 22 73 22 29 3e 30 20 8c |. . .j$,|"s")>0 .|
|00000d90| 20 73 75 62 6d 65 6e 75 | 3d a0 28 69 24 29 0d 05 | submenu|=.(i$)..|
|00000da0| be 24 e7 20 a7 6a 24 2c | 22 74 22 29 3e 30 20 8c |.$. .j$,|"t")>0 .|
|00000db0| 20 6d 66 6c 61 67 73 3d | 6d 66 6c 61 67 73 20 84 | mflags=|mflags .|
|00000dc0| 20 31 0d 05 c8 24 e7 20 | a7 6a 24 2c 22 6c 22 29 | 1...$. |.j$,"l")|
|00000dd0| 3e 30 20 8c 20 6d 66 6c | 61 67 73 3d 6d 66 6c 61 |>0 . mfl|ags=mfla|
|00000de0| 67 73 20 84 20 32 0d 05 | d2 13 21 6d 65 6e 75 70 |gs . 2..|..!menup|
|00000df0| 74 72 3d 6d 66 6c 61 67 | 73 0d 05 dc 15 6d 65 6e |tr=mflag|s....men|
|00000e00| 75 70 74 72 21 34 3d 73 | 75 62 6d 65 6e 75 0d 05 |uptr!4=s|ubmenu..|
|00000e10| e6 14 6d 65 6e 75 70 74 | 72 21 38 3d 69 66 6c 61 |..menupt|r!8=ifla|
|00000e20| 67 73 0d 05 f0 14 24 28 | 6d 65 6e 75 70 74 72 2b |gs....$(|menuptr+|
|00000e30| 31 32 29 3d 6d 24 0d 05 | fa 05 e1 0d 06 04 14 dd |12)=m$..|........|
|00000e40| f2 62 75 74 74 6f 6e 73 | 28 62 6c 6f 63 6b 29 0d |.buttons|(block).|
|00000e50| 06 0e 13 6b 65 65 70 62 | 25 3d 62 6c 6f 63 6b 21 |...keepb|%=block!|
|00000e60| 31 32 0d 06 18 2a e7 20 | a4 63 68 65 63 6b 69 74 |12...*. |.checkit|
|00000e70| 28 62 6c 6f 63 6b 21 31 | 32 2c 62 6c 6f 63 6b 21 |(block!1|2,block!|
|00000e80| 31 36 29 3d 39 38 33 30 | 34 30 20 8c 0d 06 22 24 |16)=9830|40 ..."$|
|00000e90| f2 73 6c 61 62 69 6e 28 | 6b 65 65 70 62 25 29 3a |.slabin(|keepb%):|
|00000ea0| f2 73 6c 61 62 6f 75 74 | 28 6b 65 65 70 62 25 29 |.slabout|(keepb%)|
|00000eb0| 0d 06 2c 05 cd 0d 06 36 | 26 e7 20 62 6c 6f 63 6b |..,....6|&. block|
|00000ec0| 21 31 32 3d 2d 32 20 80 | 20 62 6c 6f 63 6b 21 38 |!12=-2 .| block!8|
|00000ed0| 3d 32 20 f2 6d 65 6e 75 | 73 3a e1 0d 06 40 30 20 |=2 .menu|s:...@0 |
|00000ee0| e7 20 62 6c 6f 63 6b 21 | 31 32 3d 73 6f 75 6e 64 |. block!|12=sound|
|00000ef0| 25 20 80 20 62 6c 6f 63 | 6b 21 31 36 3d 39 20 8c |% . bloc|k!16=9 .|
|00000f00| 20 e9 20 73 6f 3d 31 3a | f2 67 6f 0d 06 4a 31 20 | . so=1:|.go..J1 |
|00000f10| e7 20 62 6c 6f 63 6b 21 | 31 32 3d 73 6f 75 6e 64 |. block!|12=sound|
|00000f20| 25 20 80 20 62 6c 6f 63 | 6b 21 31 36 3d 31 30 20 |% . bloc|k!16=10 |
|00000f30| 8c 20 e9 20 73 6f 3d 32 | 3a f2 67 6f 0d 06 54 31 |. . so=2|:.go..T1|
|00000f40| 20 e7 20 62 6c 6f 63 6b | 21 31 32 3d 73 6f 75 6e | . block|!12=soun|
|00000f50| 64 25 20 80 20 62 6c 6f | 63 6b 21 31 36 3d 31 31 |d% . blo|ck!16=11|
|00000f60| 20 8c 20 e9 20 73 6f 3d | 33 3a f2 67 6f 0d 06 5e | . . so=|3:.go..^|
|00000f70| 31 20 e7 20 62 6c 6f 63 | 6b 21 31 32 3d 73 6f 75 |1 . bloc|k!12=sou|
|00000f80| 6e 64 25 20 80 20 62 6c | 6f 63 6b 21 31 36 3d 31 |nd% . bl|ock!16=1|
|00000f90| 32 20 8c 20 e9 20 73 6f | 3d 34 3a f2 67 6f 0d 06 |2 . . so|=4:.go..|
|00000fa0| 68 31 20 e7 20 62 6c 6f | 63 6b 21 31 32 3d 73 6f |h1 . blo|ck!12=so|
|00000fb0| 75 6e 64 25 20 80 20 62 | 6c 6f 63 6b 21 31 36 3d |und% . b|lock!16=|
|00000fc0| 31 33 20 8c 20 e9 20 73 | 6f 3d 35 3a f2 67 6f 0d |13 . . s|o=5:.go.|
|00000fd0| 06 72 31 20 e7 20 62 6c | 6f 63 6b 21 31 32 3d 73 |.r1 . bl|ock!12=s|
|00000fe0| 6f 75 6e 64 25 20 80 20 | 62 6c 6f 63 6b 21 31 36 |ound% . |block!16|
|00000ff0| 3d 31 34 20 8c 20 e9 20 | 73 6f 3d 36 3a f2 67 6f |=14 . . |so=6:.go|
|00001000| 0d 06 7c 31 20 e7 20 62 | 6c 6f 63 6b 21 31 32 3d |..|1 . b|lock!12=|
|00001010| 73 6f 75 6e 64 25 20 80 | 20 62 6c 6f 63 6b 21 31 |sound% .| block!1|
|00001020| 36 3d 31 35 20 8c 20 e9 | 20 73 6f 3d 37 3a f2 67 |6=15 . .| so=7:.g|
|00001030| 6f 0d 06 86 31 20 e7 20 | 62 6c 6f 63 6b 21 31 32 |o...1 . |block!12|
|00001040| 3d 73 6f 75 6e 64 25 20 | 80 20 62 6c 6f 63 6b 21 |=sound% |. block!|
|00001050| 31 36 3d 31 36 20 8c 20 | e9 20 73 6f 3d 38 3a f2 |16=16 . |. so=8:.|
|00001060| 67 6f 0d 06 90 31 20 e7 | 20 62 6c 6f 63 6b 21 31 |go...1 .| block!1|
|00001070| 32 3d 73 6f 75 6e 64 25 | 20 80 20 62 6c 6f 63 6b |2=sound%| . block|
|00001080| 21 31 36 3d 31 37 20 8c | 20 e9 20 73 6f 3d 39 3a |!16=17 .| . so=9:|
|00001090| f2 67 6f 0d 06 9a 50 20 | e7 20 62 6c 6f 63 6b 21 |.go...P |. block!|
|000010a0| 31 32 3d 73 6f 75 6e 64 | 25 20 80 20 62 6c 6f 63 |12=sound|% . bloc|
|000010b0| 6b 21 31 36 3d 32 30 20 | 8c 20 21 69 63 6f 6e 64 |k!16=20 |. !icond|
|000010c0| 3d 73 6f 75 6e 64 25 3a | c8 99 22 57 69 6d 70 5f |=sound%:|.."Wimp_|
|000010d0| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 69 63 |CloseWin|dow",,ic|
|000010e0| 6f 6e 64 0d 06 a4 3b 20 | e7 20 62 6c 6f 63 6b 21 |ond...; |. block!|
|000010f0| 31 32 3d 73 6f 75 6e 64 | 25 20 80 20 62 6c 6f 63 |12=sound|% . bloc|
|00001100| 6b 21 31 36 3d 31 39 20 | 8c 20 f2 6f 70 65 6e 77 |k!16=19 |. .openw|
|00001110| 69 6e 64 6f 77 28 76 6f | 6c 75 6d 65 25 29 0d 06 |indow(vo|lume%)..|
|00001120| ae 51 20 e7 20 62 6c 6f | 63 6b 21 31 32 3d 76 6f |.Q . blo|ck!12=vo|
|00001130| 6c 75 6d 65 25 20 80 20 | 62 6c 6f 63 6b 21 31 36 |lume% . |block!16|
|00001140| 3d 33 20 8c 20 21 69 63 | 6f 6e 64 3d 76 6f 6c 75 |=3 . !ic|ond=volu|
|00001150| 6d 65 25 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |me%:.."W|imp_Clos|
|00001160| 65 57 69 6e 64 6f 77 22 | 2c 2c 69 63 6f 6e 64 0d |eWindow"|,,icond.|
|00001170| 06 b8 2d 20 e7 20 62 6c | 6f 63 6b 21 31 32 3d 76 |..- . bl|ock!12=v|
|00001180| 6f 6c 75 6d 65 25 20 80 | 20 62 6c 6f 63 6b 21 31 |olume% .| block!1|
|00001190| 36 3d 30 20 8c 20 f2 76 | 6f 6c 75 70 0d 06 c2 2b |6=0 . .v|olup...+|
|000011a0| 20 e7 20 62 6c 6f 63 6b | 21 31 32 3d 76 6f 6c 75 | . block|!12=volu|
|000011b0| 6d 65 25 20 80 20 62 6c | 6f 63 6b 21 31 36 3d 31 |me% . bl|ock!16=1|
|000011c0| 20 8c 20 f2 76 6f 6c 0d | 06 cc 4f 20 e7 20 62 6c | . .vol.|..O . bl|
|000011d0| 6f 63 6b 21 31 32 3d 70 | 69 74 63 68 25 20 80 20 |ock!12=p|itch% . |
|000011e0| 62 6c 6f 63 6b 21 31 36 | 3d 30 20 8c 20 21 69 63 |block!16|=0 . !ic|
|000011f0| 6f 6e 64 3d 70 69 74 63 | 68 25 3a c8 99 22 57 69 |ond=pitc|h%:.."Wi|
|00001200| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00001210| 2c 69 63 6f 6e 64 0d 06 | d6 2b 20 e7 20 62 6c 6f |,icond..|.+ . blo|
|00001220| 63 6b 21 31 32 3d 70 69 | 74 63 68 25 20 80 20 62 |ck!12=pi|tch% . b|
|00001230| 6c 6f 63 6b 21 31 36 3d | 37 20 8c 20 f2 62 65 65 |lock!16=|7 . .bee|
|00001240| 70 0d 06 e0 2d 20 e7 20 | 62 6c 6f 63 6b 21 31 32 |p...- . |block!12|
|00001250| 3d 70 69 74 63 68 25 20 | 80 20 62 6c 6f 63 6b 21 |=pitch% |. block!|
|00001260| 31 36 3d 36 20 8c 20 f2 | 6e 6f 74 65 75 70 0d 06 |16=6 . .|noteup..|
|00001270| ea 2b 20 e7 20 62 6c 6f | 63 6b 21 31 32 3d 70 69 |.+ . blo|ck!12=pi|
|00001280| 74 63 68 25 20 80 20 62 | 6c 6f 63 6b 21 31 36 3d |tch% . b|lock!16=|
|00001290| 35 20 8c 20 f2 6e 6f 74 | 65 0d 06 f4 35 20 e7 20 |5 . .not|e...5 . |
|000012a0| 62 6c 6f 63 6b 21 31 32 | 3d 2d 32 20 80 20 62 6c |block!12|=-2 . bl|
|000012b0| 6f 63 6b 21 38 3c 3e 32 | 20 8c 20 f2 6f 70 65 6e |ock!8<>2| . .open|
|000012c0| 77 69 6e 64 6f 77 28 73 | 6f 75 6e 64 25 29 0d 06 |window(s|ound%)..|
|000012d0| fe 05 e1 0d 07 08 10 dd | f2 70 72 6f 63 65 73 73 |........|.process|
|000012e0| 6b 65 79 0d 07 12 21 c8 | 99 20 22 57 69 6d 70 5f |key...!.|. "Wimp_|
|000012f0| 50 72 6f 63 65 73 73 4b | 65 79 22 2c 62 6c 6f 63 |ProcessK|ey",bloc|
|00001300| 6b 21 32 34 0d 07 1c 05 | e1 0d 07 26 0b dd f2 6d |k!24....|...&...m|
|00001310| 65 6e 75 73 0d 07 30 10 | 6d 65 6e 75 6f 70 65 6e |enus..0.|menuopen|
|00001320| 3d 2d 34 34 0d 07 3a 11 | 6d 65 6e 75 70 74 72 3d |=-44..:.|menuptr=|
|00001330| 6d 65 6e 75 25 0d 07 44 | 0c c8 97 20 78 2c 79 2c |menu%..D|... x,y,|
|00001340| 62 0d 07 4e 46 74 6f 70 | 6d 65 6e 75 25 3d a4 6d |b..NFtop|menu%=.m|
|00001350| 65 6e 75 28 22 21 53 6f | 75 6e 64 53 6c 61 62 22 |enu("!So|undSlab"|
|00001360| 2c 31 32 35 2c 22 5b 77 | 2f 69 6e 66 6f 25 5d 49 |,125,"[w|/info%]I|
|00001370| 6e 66 6f 2c 53 6f 75 6e | 64 73 2c 50 69 74 63 68 |nfo,Soun|ds,Pitch|
|00001380| 2c 51 75 69 74 22 29 0d | 07 58 17 f2 6f 70 65 6e |,Quit").|.X..open|
|00001390| 6d 65 6e 75 28 78 2d 37 | 35 2c 32 34 30 29 0d 07 |menu(x-7|5,240)..|
|000013a0| 62 05 e1 0d 07 6c 0c dd | f2 64 65 63 6f 64 65 0d |b....l..|.decode.|
|000013b0| 07 76 2e c8 99 20 22 57 | 69 6d 70 5f 44 65 63 6f |.v... "W|imp_Deco|
|000013c0| 64 65 4d 65 6e 75 22 2c | 2c 74 6f 70 6d 65 6e 75 |deMenu",|,topmenu|
|000013d0| 25 2c 62 6c 6f 63 6b 2c | 69 63 6f 6e 64 0d 07 80 |%,block,|icond...|
|000013e0| 1f e7 20 24 69 63 6f 6e | 64 3d 22 51 75 69 74 22 |.. $icon|d="Quit"|
|000013f0| 20 8c 20 65 6e 64 25 3d | b9 3a ef 34 0d 07 8a 2b | . end%=|.:.4...+|
|00001400| e7 20 24 69 63 6f 6e 64 | 3d 22 53 6f 75 6e 64 73 |. $icond|="Sounds|
|00001410| 22 20 8c 20 f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |" . .ope|nwindow(|
|00001420| 73 6f 75 6e 64 25 29 0d | 07 94 2a e7 20 24 69 63 |sound%).|..*. $ic|
|00001430| 6f 6e 64 3d 22 50 69 74 | 63 68 22 20 8c 20 f2 6f |ond="Pit|ch" . .o|
|00001440| 70 65 6e 77 69 6e 64 6f | 77 28 70 69 74 63 68 25 |penwindo|w(pitch%|
|00001450| 29 0d 07 9e 23 c8 99 20 | 22 57 69 6d 70 5f 47 65 |)...#.. |"Wimp_Ge|
|00001460| 74 50 6f 69 6e 74 65 72 | 49 6e 66 6f 22 2c 2c 62 |tPointer|Info",,b|
|00001470| 6c 6f 63 6b 0d 07 a8 11 | e7 20 62 6c 6f 63 6b 21 |lock....|. block!|
|00001480| 38 3d 31 20 8c 0d 07 b2 | 1b e7 20 6d 65 6e 75 6f |8=1 ....|.. menuo|
|00001490| 70 65 6e 3d 2d 34 34 20 | 8c 20 f2 6d 65 6e 75 73 |pen=-44 |. .menus|
|000014a0| 0d 07 bc 22 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |...".. "|Wimp_Cre|
|000014b0| 61 74 65 4d 65 6e 75 22 | 2c 2c 74 6f 70 6d 65 6e |ateMenu"|,,topmen|
|000014c0| 75 25 0d 07 c6 05 cc 0d | 07 d0 1c c8 99 20 22 57 |u%......|..... "W|
|000014d0| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|000014e0| 2c 2d 31 0d 07 da 05 cd | 0d 07 e4 05 e1 0d 07 ee |,-1.....|........|
|000014f0| 0e dd f2 74 65 6d 70 6c | 61 74 65 0d 07 f8 33 c8 |...templ|ate...3.|
|00001500| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 54 65 6d 70 |. "Wimp_|OpenTemp|
|00001510| 6c 61 74 65 22 2c 2c 22 | 3c 53 6f 75 6e 64 24 44 |late",,"|<Sound$D|
|00001520| 69 72 3e 2e 54 65 6d 70 | 6c 61 74 65 73 22 0d 08 |ir>.Temp|lates"..|
|00001530| 02 11 69 6e 64 69 72 3d | 63 75 72 62 75 66 25 0d |..indir=|curbuf%.|
|00001540| 08 0c 1f 69 6e 66 6f 25 | 3d a4 74 65 6d 70 6c 61 |...info%|=.templa|
|00001550| 74 65 28 22 50 72 6f 67 | 49 6e 66 6f 22 29 0d 08 |te("Prog|Info")..|
|00001560| 16 1d 73 6f 75 6e 64 25 | 3d a4 74 65 6d 70 6c 61 |..sound%|=.templa|
|00001570| 74 65 28 22 53 6f 75 6e | 64 22 29 0d 08 20 1f 76 |te("Soun|d").. .v|
|00001580| 6f 6c 75 6d 65 25 3d a4 | 74 65 6d 70 6c 61 74 65 |olume%=.|template|
|00001590| 28 22 56 6f 6c 75 6d 65 | 22 29 0d 08 2a 1d 70 69 |("Volume|")..*.pi|
|000015a0| 74 63 68 25 3d a4 74 65 | 6d 70 6c 61 74 65 28 22 |tch%=.te|mplate("|
|000015b0| 70 69 74 63 68 22 29 0d | 08 34 1b c8 99 20 22 57 |pitch").|.4... "W|
|000015c0| 69 6d 70 5f 43 6c 6f 73 | 65 54 65 6d 70 6c 61 74 |imp_Clos|eTemplat|
|000015d0| 65 22 0d 08 3e 1a 24 a4 | 74 61 64 28 76 6f 6c 75 |e"..>.$.|tad(volu|
|000015e0| 6d 65 25 2c 32 29 3d 22 | 31 32 37 22 0d 08 48 05 |me%,2)="|127"..H.|
|000015f0| e1 0d 08 52 05 e1 0d 08 | 5c 0b dd f2 63 6d 65 6e |...R....|\...cmen|
|00001600| 75 0d 08 66 23 c8 99 20 | 22 57 69 6d 70 5f 47 65 |u..f#.. |"Wimp_Ge|
|00001610| 74 50 6f 69 6e 74 65 72 | 49 6e 66 6f 22 2c 2c 69 |tPointer|Info",,i|
|00001620| 63 6f 6e 64 0d 08 70 11 | e7 20 69 63 6f 6e 64 21 |cond..p.|. icond!|
|00001630| 38 3d 31 20 8c 0d 08 7a | 1a e7 20 6d 65 6e 75 6f |8=1 ...z|.. menuo|
|00001640| 70 65 6e 3d 2d 34 34 20 | 8c 20 f2 6d 65 6e 75 0d |pen=-44 |. .menu.|
|00001650| 08 84 22 c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |..".. "W|imp_Crea|
|00001660| 74 65 4d 65 6e 75 22 2c | 2c 74 6f 70 6d 65 6e 75 |teMenu",|,topmenu|
|00001670| 25 0d 08 8e 05 cc 0d 08 | 98 1c c8 99 20 22 57 69 |%.......|.... "Wi|
|00001680| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|00001690| 2d 31 0d 08 a2 05 cd 0d | 08 ac 05 e1 0d 08 b6 0e |-1......|........|
|000016a0| 20 dd f2 65 72 72 28 61 | 24 29 0d 08 c0 1d 20 e9 | ..err(a|$).... .|
|000016b0| 20 61 24 3d 61 24 2b 22 | 20 3a 20 61 74 20 6c 69 | a$=a$+"| : at li|
|000016c0| 6e 65 20 22 2b c3 9e 0d | 08 ca 0e 20 f2 6d 6f 61 |ne "+...|... .moa|
|000016d0| 6e 28 61 24 29 0d 08 d4 | 06 20 e1 0d 08 de 09 20 |n(a$)...|. ..... |
|000016e0| dd f2 67 6f 0d 08 e8 27 | 20 e7 20 73 6f 3d 31 20 |..go...'| . so=1 |
|000016f0| 8c 20 ff 28 22 43 48 41 | 4e 4e 45 4c 56 4f 49 43 |. .("CHA|NNELVOIC|
|00001700| 45 20 31 20 31 22 29 3a | ef 20 37 0d 08 f2 27 20 |E 1 1"):|. 7...' |
|00001710| e7 20 73 6f 3d 32 20 8c | 20 ff 28 22 43 48 41 4e |. so=2 .| .("CHAN|
|00001720| 4e 45 4c 56 4f 49 43 45 | 20 31 20 32 22 29 3a ef |NELVOICE| 1 2"):.|
|00001730| 20 37 0d 08 fc 27 20 e7 | 20 73 6f 3d 33 20 8c 20 | 7...' .| so=3 . |
|00001740| ff 28 22 43 48 41 4e 4e | 45 4c 56 4f 49 43 45 20 |.("CHANN|ELVOICE |
|00001750| 31 20 33 22 29 3a ef 20 | 37 0d 09 06 27 20 e7 20 |1 3"):. |7...' . |
|00001760| 73 6f 3d 34 20 8c 20 ff | 28 22 43 48 41 4e 4e 45 |so=4 . .|("CHANNE|
|00001770| 4c 56 4f 49 43 45 20 31 | 20 34 22 29 3a ef 20 37 |LVOICE 1| 4"):. 7|
|00001780| 0d 09 10 27 20 e7 20 73 | 6f 3d 35 20 8c 20 ff 28 |...' . s|o=5 . .(|
|00001790| 22 43 48 41 4e 4e 45 4c | 56 4f 49 43 45 20 31 20 |"CHANNEL|VOICE 1 |
|000017a0| 35 22 29 3a ef 20 37 0d | 09 1a 27 20 e7 20 73 6f |5"):. 7.|..' . so|
|000017b0| 3d 36 20 8c 20 ff 28 22 | 43 48 41 4e 4e 45 4c 56 |=6 . .("|CHANNELV|
|000017c0| 4f 49 43 45 20 31 20 36 | 22 29 3a ef 20 37 0d 09 |OICE 1 6|"):. 7..|
|000017d0| 24 27 20 e7 20 73 6f 3d | 37 20 8c 20 ff 28 22 43 |$' . so=|7 . .("C|
|000017e0| 48 41 4e 4e 45 4c 56 4f | 49 43 45 20 31 20 37 22 |HANNELVO|ICE 1 7"|
|000017f0| 29 3a ef 20 37 0d 09 2e | 27 20 e7 20 73 6f 3d 38 |):. 7...|' . so=8|
|00001800| 20 8c 20 ff 28 22 43 48 | 41 4e 4e 45 4c 56 4f 49 | . .("CH|ANNELVOI|
|00001810| 43 45 20 31 20 38 22 29 | 3a ef 20 37 0d 09 38 27 |CE 1 8")|:. 7..8'|
|00001820| 20 e7 20 73 6f 3d 39 20 | 8c 20 ff 28 22 43 48 41 | . so=9 |. .("CHA|
|00001830| 4e 4e 45 4c 56 4f 49 43 | 45 20 31 20 39 22 29 3a |NNELVOIC|E 1 9"):|
|00001840| ef 20 37 0d 09 42 06 20 | e1 0d 09 4c 0c 20 dd f2 |. 7..B. |...L. ..|
|00001850| 76 6f 6c 75 70 0d 09 56 | 0c 20 76 25 3d 76 25 2b |volup..V|. v%=v%+|
|00001860| 31 0d 09 60 19 20 e7 20 | 76 25 3e 3d 31 32 37 20 |1..`. . |v%>=127 |
|00001870| 8c 20 e9 20 76 25 3d 31 | 32 37 0d 09 6a 16 20 ff |. . v%=1|27..j. .|
|00001880| 28 22 2a 56 4f 4c 55 4d | 45 20 22 2b c3 76 25 29 |("*VOLUM|E "+.v%)|
|00001890| 0d 09 74 19 20 f2 69 6e | 66 6f 28 76 6f 6c 75 6d |..t. .in|fo(volum|
|000018a0| 65 25 2c 32 2c c3 76 25 | 29 0d 09 7e 06 20 e1 0d |e%,2,.v%|)..~. ..|
|000018b0| 09 88 0a 20 dd f2 76 6f | 6c 0d 09 92 0c 20 76 25 |... ..vo|l.... v%|
|000018c0| 3d 76 25 2d 31 0d 09 9c | 15 20 e7 20 76 25 3c 3d |=v%-1...|. . v%<=|
|000018d0| 31 20 8c 20 e9 20 76 25 | 3d 31 0d 09 a6 16 20 ff |1 . . v%|=1.... .|
|000018e0| 28 22 2a 56 4f 4c 55 4d | 45 20 22 2b c3 76 25 29 |("*VOLUM|E "+.v%)|
|000018f0| 0d 09 b0 19 20 f2 69 6e | 66 6f 28 76 6f 6c 75 6d |.... .in|fo(volum|
|00001900| 65 25 2c 32 2c c3 76 25 | 29 0d 09 ba 06 20 e1 0d |e%,2,.v%|).... ..|
|00001910| 09 c4 0b 20 dd f2 62 65 | 65 70 0d 09 ce 13 20 d4 |... ..be|ep.... .|
|00001920| 20 31 2c 2d 31 30 2c 70 | 69 25 2c 31 30 0d 09 d8 | 1,-10,p|i%,10...|
|00001930| 06 20 e1 0d 09 e2 0d 20 | dd f2 6e 6f 74 65 75 70 |. ..... |..noteup|
|00001940| 0d 09 ec 0b 20 70 69 25 | 2b 3d 34 0d 09 f6 20 20 |.... pi%|+=4...  |
|00001950| 20 20 20 20 20 e7 20 70 | 69 25 3e 3d 32 35 33 20 |     . p|i%>=253 |
|00001960| 8c 20 e9 20 70 69 25 3d | 32 35 33 0d 0a 00 06 20 |. . pi%=|253.... |
|00001970| f7 0d 0a 0a 06 20 f5 0d | 0a 14 0b 20 f3 20 4a 2c |..... ..|... . J,|
|00001980| 4b 24 0d 0a 1e 0c 20 fd | 20 4a 3d 70 69 25 0d 0a |K$.... .| J=pi%..|
|00001990| 28 19 20 f2 69 6e 66 6f | 28 70 69 74 63 68 25 2c |(. .info|(pitch%,|
|000019a0| 31 2c c3 70 69 25 29 0d | 0a 32 17 20 f2 69 6e 66 |1,.pi%).|.2. .inf|
|000019b0| 6f 28 70 69 74 63 68 25 | 2c 32 2c 4b 24 29 0d 0a |o(pitch%|,2,K$)..|
|000019c0| 3c 06 20 e1 0d 0a 46 0b | 20 dd f2 6e 6f 74 65 0d |<. ...F.| ..note.|
|000019d0| 0a 50 10 20 e9 20 70 69 | 25 3d 70 69 25 2d 34 0d |.P. . pi|%=pi%-4.|
|000019e0| 0a 5a 17 20 e7 20 70 69 | 25 3c 3d 31 20 8c 20 e9 |.Z. . pi|%<=1 . .|
|000019f0| 20 70 69 25 3d 31 0d 0a | 64 06 20 f7 0d 0a 6e 06 | pi%=1..|d. ...n.|
|00001a00| 20 f5 0d 0a 78 0b 20 f3 | 20 4a 2c 4b 24 0d 0a 82 | ...x. .| J,K$...|
|00001a10| 0c 20 fd 20 4a 3d 70 69 | 25 0d 0a 8c 19 20 f2 69 |. . J=pi|%.... .i|
|00001a20| 6e 66 6f 28 70 69 74 63 | 68 25 2c 31 2c c3 70 69 |nfo(pitc|h%,1,.pi|
|00001a30| 25 29 0d 0a 96 17 20 f2 | 69 6e 66 6f 28 70 69 74 |%).... .|info(pit|
|00001a40| 63 68 25 2c 32 2c 4b 24 | 29 0d 0a a0 06 20 e1 0d |ch%,2,K$|).... ..|
|00001a50| 0a aa 43 20 dc 20 31 2c | 31 42 2c 35 2c 31 43 2c |..C . 1,|1B,5,1C,|
|00001a60| 39 2c 31 43 23 2c 31 33 | 2c 31 44 2c 31 37 2c 31 |9,1C#,13|,1D,17,1|
|00001a70| 44 23 2c 32 31 2c 31 45 | 2c 32 35 2c 31 46 2c 32 |D#,21,1E|,25,1F,2|
|00001a80| 39 2c 31 46 23 2c 33 33 | 2c 31 47 2c 33 37 2c 31 |9,1F#,33|,1G,37,1|
|00001a90| 47 23 0d 0a b4 54 20 dc | 20 34 31 2c 32 41 2c 34 |G#...T .| 41,2A,4|
|00001aa0| 35 2c 32 41 23 2c 34 39 | 2c 32 42 2c 35 33 2c 32 |5,2A#,49|,2B,53,2|
|00001ab0| 43 4d 2c 35 37 2c 32 43 | 23 2c 36 31 2c 32 44 2c |CM,57,2C|#,61,2D,|
|00001ac0| 36 35 2c 32 44 23 2c 36 | 39 2c 32 45 2c 37 33 2c |65,2D#,6|9,2E,73,|
|00001ad0| 32 46 2c 37 37 2c 32 46 | 23 2c 38 31 2c 32 47 2c |2F,77,2F|#,81,2G,|
|00001ae0| 38 35 2c 32 47 23 0d 0a | be 5c 20 dc 20 38 39 2c |85,2G#..|.\ . 89,|
|00001af0| 33 41 2c 39 33 2c 33 41 | 23 2c 39 37 2c 33 42 2c |3A,93,3A|#,97,3B,|
|00001b00| 31 30 31 2c 33 43 2c 31 | 30 35 2c 33 43 23 2c 31 |101,3C,1|05,3C#,1|
|00001b10| 30 39 2c 33 44 2c 31 31 | 33 2c 33 44 23 2c 31 31 |09,3D,11|3,3D#,11|
|00001b20| 37 2c 33 45 2c 31 32 31 | 2c 33 46 2c 31 32 35 2c |7,3E,121|,3F,125,|
|00001b30| 33 46 23 2c 31 32 39 2c | 33 47 2c 31 33 33 2c 33 |3F#,129,|3G,133,3|
|00001b40| 47 23 0d 0a c8 5f 20 dc | 20 31 33 37 2c 34 41 2c |G#..._ .| 137,4A,|
|00001b50| 31 34 31 2c 34 41 23 2c | 31 34 35 2c 34 42 2c 31 |141,4A#,|145,4B,1|
|00001b60| 34 39 2c 34 43 2c 31 35 | 33 2c 34 43 23 2c 31 35 |49,4C,15|3,4C#,15|
|00001b70| 37 2c 34 44 2c 31 36 31 | 2c 34 44 23 2c 31 36 35 |7,4D,161|,4D#,165|
|00001b80| 2c 34 45 2c 31 36 39 2c | 34 46 2c 31 37 33 2c 34 |,4E,169,|4F,173,4|
|00001b90| 46 23 2c 31 37 37 2c 34 | 47 2c 31 38 31 2c 34 47 |F#,177,4|G,181,4G|
|00001ba0| 23 0d 0a d2 5f 20 dc 20 | 31 38 35 2c 35 41 2c 31 |#..._ . |185,5A,1|
|00001bb0| 38 39 2c 35 41 23 2c 31 | 39 33 2c 35 42 2c 31 39 |89,5A#,1|93,5B,19|
|00001bc0| 37 2c 35 43 2c 32 30 31 | 2c 35 43 23 2c 32 30 35 |7,5C,201|,5C#,205|
|00001bd0| 2c 35 44 2c 32 30 39 2c | 35 44 23 2c 32 31 33 2c |,5D,209,|5D#,213,|
|00001be0| 35 45 2c 32 31 37 2c 35 | 46 2c 32 32 31 2c 35 46 |5E,217,5|F,221,5F|
|00001bf0| 23 2c 32 32 35 2c 35 47 | 2c 32 32 39 2c 35 47 23 |#,225,5G|,229,5G#|
|00001c00| 0d 0a dc 32 20 dc 20 32 | 33 33 2c 36 41 2c 32 33 |...2 . 2|33,6A,23|
|00001c10| 37 2c 36 41 23 2c 32 34 | 31 2c 36 42 2c 32 34 35 |7,6A#,24|1,6B,245|
|00001c20| 2c 36 43 2c 32 34 39 2c | 36 43 23 2c 32 35 33 2c |,6C,249,|6C#,253,|
|00001c30| 36 44 0d 0a e6 15 dd 20 | f2 73 6c 61 62 69 6e 28 |6D..... |.slabin(|
|00001c40| 68 61 6e 64 6c 65 29 0d | 0a f0 11 21 69 63 6f 6e |handle).|...!icon|
|00001c50| 64 3d 68 61 6e 64 6c 65 | 0d 0a fa 23 c8 99 20 22 |d=handle|...#.. "|
|00001c60| 57 69 6d 70 5f 47 65 74 | 50 6f 69 6e 74 65 72 49 |Wimp_Get|PointerI|
|00001c70| 6e 66 6f 22 2c 2c 69 63 | 6f 6e 64 0d 0b 04 1f c8 |nfo",,ic|ond.....|
|00001c80| 99 20 22 57 69 6d 70 5f | 42 6f 72 64 65 72 49 63 |. "Wimp_|BorderIc|
|00001c90| 6f 6e 22 2c 2c 69 63 6f | 6e 64 0d 0b 0e 05 e1 0d |on",,ico|nd......|
|00001ca0| 0b 18 16 dd 20 f2 73 6c | 61 62 6f 75 74 28 68 61 |.... .sl|about(ha|
|00001cb0| 6e 64 6c 65 29 0d 0b 22 | 11 21 69 63 6f 6e 64 3d |ndle).."|.!icond=|
|00001cc0| 68 61 6e 64 6c 65 0d 0b | 2c 23 c8 99 20 22 57 69 |handle..|,#.. "Wi|
|00001cd0| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00001ce0| 6f 22 2c 2c 69 63 6f 6e | 64 0d 0b 36 0d 69 63 6f |o",,icon|d..6.ico|
|00001cf0| 6e 64 21 38 3d 30 0d 0b | 40 1f c8 99 20 22 57 69 |nd!8=0..|@... "Wi|
|00001d00| 6d 70 5f 42 6f 72 64 65 | 72 49 63 6f 6e 22 2c 2c |mp_Borde|rIcon",,|
|00001d10| 69 63 6f 6e 64 0d 0b 4a | 05 e1 0d 0b 54 17 dd a4 |icond..J|....T...|
|00001d20| 63 68 65 63 6b 69 74 28 | 68 6e 64 25 2c 69 63 25 |checkit(|hnd%,ic%|
|00001d30| 29 0d 0b 5e 1b 21 69 63 | 6f 6e 64 3d 68 6e 64 25 |)..^.!ic|ond=hnd%|
|00001d40| 3a 69 63 6f 6e 64 21 34 | 3d 69 63 25 0d 0b 68 20 |:icond!4|=ic%..h |
|00001d50| c8 99 22 57 69 6d 70 5f | 47 65 74 49 63 6f 6e 53 |.."Wimp_|GetIconS|
|00001d60| 74 61 74 65 22 2c 2c 69 | 63 6f 6e 64 0d 0b 72 13 |tate",,i|cond..r.|
|00001d70| 66 6c 61 67 73 25 3d 69 | 63 6f 6e 64 21 32 34 0d |flags%=i|cond!24.|
|00001d80| 0b 7c 12 3d 66 6c 61 67 | 73 25 80 26 46 30 30 30 |.|.=flag|s%.&F000|
|00001d90| 30 0d 0b 86 14 dd f2 72 | 65 64 72 61 77 28 68 61 |0......r|edraw(ha|
|00001da0| 6e 64 6c 65 29 0d 0b 90 | 11 21 62 6c 6f 63 6b 3d |ndle)...|.!block=|
|00001db0| 68 61 6e 64 6c 65 0d 0b | 9a 0a ea 6d 6f 72 65 25 |handle..|...more%|
|00001dc0| 0d 0b a4 29 c8 99 20 22 | 57 69 6d 70 5f 52 65 64 |...).. "|Wimp_Red|
|00001dd0| 72 61 77 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |rawWindo|w",,bloc|
|00001de0| 6b 20 b8 20 6d 6f 72 65 | 25 0d 0b ae 0c c8 95 20 |k . more|%...... |
|00001df0| 6d 6f 72 65 25 0d 0b b8 | 21 20 c8 99 22 57 69 6d |more%...|! .."Wim|
|00001e00| 70 5f 42 6f 72 64 65 72 | 57 69 6e 64 6f 77 22 2c |p_Border|Window",|
|00001e10| 2c 62 6c 6f 63 6b 0d 0b | c2 2a 20 c8 99 20 22 57 |,block..|.* .. "W|
|00001e20| 69 6d 70 5f 47 65 74 52 | 65 63 74 61 6e 67 6c 65 |imp_GetR|ectangle|
|00001e30| 22 2c 2c 62 6c 6f 63 6b | 20 b8 20 6d 6f 72 65 25 |",,block| . more%|
|00001e40| 0d 0b cc 06 20 ce 0d 0b | d6 05 e1 0d ff          |.... ...|.....   |
+--------+-------------------------+-------------------------+--------+--------+