home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / e / effex / !Effex / !RunImage < prev    next >
Unknown  |  1993-04-15  |  50.4 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.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 20 | 21 52 75 6e 49 6d 61 67 |..... > |!RunImag|
|00000010| 65 0d 00 14 19 f4 20 45 | 66 66 65 78 20 73 61 6d |e..... E|ffex sam|
|00000020| 70 6c 65 20 65 64 69 74 | 6f 72 0d 00 1e 18 f4 20 |ple edit|or..... |
|00000030| a9 20 50 61 75 6c 20 4d | 61 73 6f 6e 2c 20 31 39 |. Paul M|ason, 19|
|00000040| 39 32 0d 00 28 04 0d 00 | 32 11 c8 99 20 26 31 30 |92..(...|2... &10|
|00000050| 20 b8 20 65 6e 76 25 0d | 00 3c 11 65 6e 76 24 3d | . env%.|.<.env$=|
|00000060| a4 7a 28 65 6e 76 25 29 | 0d 00 46 1f 61 25 3d a7 |.z(env%)|..F.a%=.|
|00000070| 65 6e 76 24 2c 22 45 66 | 66 65 78 2e 21 52 75 6e |env$,"Ef|fex.!Run|
|00000080| 49 6d 61 67 65 22 29 0d | 00 50 1b 61 25 2b 3d a9 |Image").|.P.a%+=.|
|00000090| 22 45 66 66 65 78 2e 21 | 52 75 6e 49 6d 61 67 65 |"Effex.!|RunImage|
|000000a0| 20 22 0d 00 5a 14 65 6e | 76 24 3d c1 65 6e 76 24 | "..Z.en|v$=.env$|
|000000b0| 2c 61 25 2b 31 29 0d 00 | 64 1c 65 6e 76 24 3d c1 |,a%+1)..|d.env$=.|
|000000c0| 65 6e 76 24 2c a7 65 6e | 76 24 2c 22 2d 22 29 2b |env$,.en|v$,"-")+|
|000000d0| 31 29 0d 00 6e 0f ee 20 | 85 20 f2 65 72 72 28 31 |1)..n.. |. .err(1|
|000000e0| 29 0d 00 78 09 f2 69 6e | 69 74 0d 00 82 28 f2 63 |)..x..in|it...(.c|
|000000f0| 72 65 5f 6d 65 6e 75 73 | 28 6d 65 6e 75 73 25 2c |re_menus|(menus%,|
|00000100| 6d 65 6e 75 73 25 2b 6d | 65 6e 75 5f 73 69 7a 65 |menus%+m|enu_size|
|00000110| 25 29 0d 00 8c 0f ee 20 | 85 20 f2 65 72 72 28 30 |%)..... |. .err(0|
|00000120| 29 0d 00 96 0e c8 95 20 | ac 20 71 75 69 74 25 0d |)...... |. quit%.|
|00000130| 00 a0 1c c8 99 20 26 34 | 30 30 43 37 2c 30 2c 71 |..... &4|00C7,0,q|
|00000140| 25 20 b8 20 72 65 61 73 | 6f 6e 25 0d 00 aa 1e f2 |% . reas|on%.....|
|00000150| 68 61 6e 64 6c 65 5f 72 | 65 61 73 6f 6e 28 72 65 |handle_r|eason(re|
|00000160| 61 73 6f 6e 25 2c 71 25 | 29 0d 00 b4 22 e7 20 65 |ason%,q%|)...". e|
|00000170| 6e 76 24 3c 3e 22 22 20 | f2 6c 6f 61 64 28 65 6e |nv$<>"" |.load(en|
|00000180| 76 24 29 3a 65 6e 76 24 | 3d 22 22 0d 00 be 05 ce |v$):env$|="".....|
|00000190| 0d 00 c8 0f ee 20 85 20 | f2 65 72 72 28 31 29 0d |..... . |.err(1).|
|000001a0| 00 d2 0f f2 71 75 69 74 | 5f 76 6f 69 63 65 0d 00 |....quit|_voice..|
|000001b0| dc 0e f2 58 6d 65 6d 5f | 71 75 69 74 0d 00 e6 05 |...Xmem_|quit....|
|000001c0| e0 0d 00 f0 04 0d 00 fa | 1f dd f2 68 61 6e 64 6c |........|...handl|
|000001d0| 65 5f 72 65 61 73 6f 6e | 28 72 65 61 73 6f 6e 25 |e_reason|(reason%|
|000001e0| 2c 71 25 29 0d 01 04 10 | c8 8e 20 72 65 61 73 6f |,q%)....|.. reaso|
|000001f0| 6e 25 20 ca 0d 01 0e 3c | c9 20 30 20 3a 20 e7 20 |n% ....<|. 0 : . |
|00000200| 73 61 6d 70 6c 65 5f 74 | 79 70 65 25 3e 3d 30 20 |sample_t|ype%>=0 |
|00000210| 80 20 21 56 63 6f 75 6e | 74 65 72 3e 30 20 80 20 |. !Vcoun|ter>0 . |
|00000220| 74 72 61 63 6b 69 6e 67 | 25 20 f2 74 72 61 63 6b |tracking|% .track|
|00000230| 0d 01 18 11 c9 20 31 20 | 3a 20 f2 72 65 64 72 61 |..... 1 |: .redra|
|00000240| 77 0d 01 22 13 c9 20 32 | 20 3a 20 f2 6f 70 65 6e |w..".. 2| : .open|
|00000250| 28 71 25 29 0d 01 2c 14 | c9 20 33 20 3a 20 f2 63 |(q%)..,.|. 3 : .c|
|00000260| 6c 6f 73 65 28 71 25 29 | 0d 01 36 07 c9 20 34 0d |lose(q%)|..6.. 4.|
|00000270| 01 40 07 c9 20 35 0d 01 | 4a 11 c9 20 36 20 3a 20 |.@.. 5..|J.. 6 : |
|00000280| f2 6d 63 6c 69 63 6b 0d | 01 54 12 c9 20 37 20 3a |.mclick.|.T.. 7 :|
|00000290| 20 f2 64 72 61 67 62 6f | 78 0d 01 5e 22 c9 20 38 | .dragbo|x..^". 8|
|000002a0| 20 3a 20 f2 6b 70 72 65 | 73 73 28 71 25 21 30 2c | : .kpre|ss(q%!0,|
|000002b0| 71 25 21 34 2c 71 25 21 | 32 34 29 0d 01 68 12 c9 |q%!4,q%!|24)..h..|
|000002c0| 20 39 20 3a 20 f2 6d 65 | 6e 75 73 65 6c 0d 01 72 | 9 : .me|nusel..r|
|000002d0| 13 c9 20 31 37 2c 31 38 | 20 3a 20 f2 6d 65 73 73 |.. 17,18| : .mess|
|000002e0| 0d 01 7c 05 cb 0d 01 86 | 05 e1 0d 01 90 04 0d 01 |..|.....|........|
|000002f0| 9a 0d dd f2 64 72 61 67 | 62 6f 78 0d 01 a4 08 ea |....drag|box.....|
|00000300| 20 61 25 0d 01 ae 11 c8 | 99 20 26 34 30 30 43 46 | a%.....|. &400CF|
|00000310| 2c 2c 71 25 0d 01 b8 0f | 71 25 21 32 34 3d 71 25 |,,q%....|q%!24=q%|
|00000320| 21 31 36 0d 01 c2 2d 71 | 25 21 31 36 3d 31 3a 71 |!16...-q|%!16=1:q|
|00000330| 25 21 32 30 3d 71 25 21 | 31 32 3a 71 25 21 32 38 |%!20=q%!|12:q%!28|
|00000340| 3d 71 25 21 30 3a 71 25 | 21 33 32 3d 71 25 21 34 |=q%!0:q%|!32=q%!4|
|00000350| 0d 01 cc 25 71 25 21 33 | 36 3d 73 61 76 65 5f 73 |...%q%!3|6=save_s|
|00000360| 69 7a 65 25 3a 71 25 21 | 34 30 3d 66 69 6c 65 5f |ize%:q%!|40=file_|
|00000370| 74 79 70 65 25 0d 01 d6 | 25 f2 65 78 74 72 61 63 |type%...|%.extrac|
|00000380| 74 5f 6c 65 61 66 3a 24 | 28 71 25 2b 34 34 29 3d |t_leaf:$|(q%+44)=|
|00000390| 73 61 76 65 5f 6e 61 6d | 65 24 0d 01 e0 20 71 25 |save_nam|e$... q%|
|000003a0| 21 30 3d 28 34 34 2b a9 | 73 61 76 65 5f 6e 61 6d |!0=(44+.|save_nam|
|000003b0| 65 24 2b 35 29 80 28 ac | 33 29 0d 01 ea 21 71 25 |e$+5).(.|3)...!q%|
|000003c0| 21 31 32 3d 30 3a c8 99 | 20 26 34 30 30 45 37 2c |!12=0:..| &400E7,|
|000003d0| 31 37 2c 71 25 2c 71 25 | 21 32 30 0d 01 f4 11 73 |17,q%,q%|!20....s|
|000003e0| 61 76 65 72 65 66 25 3d | 71 25 21 38 0d 01 fe 11 |averef%=|q%!8....|
|000003f0| c8 99 20 26 34 30 30 44 | 34 2c 2c 2d 31 0d 02 08 |.. &400D|4,,-1...|
|00000400| 05 e1 0d 02 12 04 0d 02 | 1c 12 dd f2 64 61 74 61 |........|....data|
|00000410| 73 61 76 65 5f 61 63 6b | 0d 02 26 17 e7 20 71 25 |save_ack|..&.. q%|
|00000420| 21 31 32 3c 3e 73 61 76 | 65 72 65 66 25 20 e1 0d |!12<>sav|eref% ..|
|00000430| 02 30 18 73 61 76 65 5f | 6e 61 6d 65 24 3d a4 7a |.0.save_|name$=.z|
|00000440| 28 71 25 2b 34 34 29 0d | 02 3a 28 e7 20 71 25 21 |(q%+44).|.:(. q%!|
|00000450| 33 36 3c 3e 2d 31 20 f2 | 69 6e 73 65 72 74 5f 6e |36<>-1 .|insert_n|
|00000460| 61 6d 65 3a 6d 6f 64 69 | 66 69 65 64 25 3d 30 0d |ame:modi|fied%=0.|
|00000470| 02 44 13 c8 8e 20 66 69 | 6c 65 5f 74 79 70 65 25 |.D... fi|le_type%|
|00000480| 20 ca 0d 02 4e 14 c9 20 | 26 36 33 31 2c 26 36 33 | ...N.. |&631,&63|
|00000490| 32 2c 26 36 33 33 0d 02 | 58 4d 20 c8 99 20 38 2c |2,&633..|XM .. 8,|
|000004a0| 31 30 2c 73 61 76 65 5f | 6e 61 6d 65 24 2c 66 69 |10,save_|name$,fi|
|000004b0| 6c 65 5f 74 79 70 65 25 | 2c 2c 73 61 76 65 5f 73 |le_type%|,,save_s|
|000004c0| 61 6d 70 6c 65 25 2c 73 | 61 76 65 5f 73 61 6d 70 |ample%,s|ave_samp|
|000004d0| 6c 65 25 2b 73 61 76 65 | 5f 73 61 6d 70 5f 73 69 |le%+save|_samp_si|
|000004e0| 7a 65 25 0d 02 62 22 c9 | 20 26 36 33 34 20 3a 20 |ze%..b".| &634 : |
|000004f0| f2 73 61 76 65 5f 65 66 | 66 28 73 61 76 65 5f 6e |.save_ef|f(save_n|
|00000500| 61 6d 65 24 29 0d 02 6c | 22 c9 20 26 44 33 43 20 |ame$)..l|". &D3C |
|00000510| 3a 20 f2 73 61 76 65 5f | 61 72 6d 28 73 61 76 65 |: .save_|arm(save|
|00000520| 5f 6e 61 6d 65 24 29 0d | 02 76 05 cb 0d 02 80 16 |_name$).|.v......|
|00000530| 71 25 21 31 32 3d 71 25 | 21 38 3a 71 25 21 31 36 |q%!12=q%|!8:q%!16|
|00000540| 3d 33 0d 02 8a 19 c8 99 | 20 26 34 30 30 45 37 2c |=3......| &400E7,|
|00000550| 31 37 2c 71 25 2c 71 25 | 21 32 30 0d 02 94 05 e1 |17,q%,q%|!20.....|
|00000560| 0d 02 9e 04 0d 02 a8 15 | dd f2 73 61 76 65 5f 65 |........|..save_e|
|00000570| 66 66 28 6e 61 6d 65 24 | 29 0d 02 b2 17 ea 20 66 |ff(name$|)..... f|
|00000580| 69 6c 65 25 2c 73 69 7a | 65 25 2c 72 61 74 65 25 |ile%,siz|e%,rate%|
|00000590| 0d 02 bc 12 66 69 6c 65 | 25 3d ae 28 6e 61 6d 65 |....file|%=.(name|
|000005a0| 24 29 0d 02 c6 18 d5 23 | 66 69 6c 65 25 2c 73 61 |$).....#|file%,sa|
|000005b0| 6d 70 6c 65 5f 74 79 70 | 65 25 0d 02 d0 21 d5 23 |mple_typ|e%...!.#|
|000005c0| 66 69 6c 65 25 2c 30 3a | d5 23 66 69 6c 65 25 2c |file%,0:|.#file%,|
|000005d0| 30 3a d5 23 66 69 6c 65 | 25 2c 30 0d 02 da 1a f2 |0:.#file|%,0.....|
|000005e0| 77 70 75 74 28 73 61 76 | 65 5f 73 61 6d 70 5f 73 |wput(sav|e_samp_s|
|000005f0| 69 7a 65 25 29 0d 02 e4 | 0d f2 77 70 75 74 28 32 |ize%)...|..wput(2|
|00000600| 38 29 0d 02 ee 16 f2 77 | 70 75 74 28 73 61 76 65 |8).....w|put(save|
|00000610| 5f 63 61 72 65 74 25 29 | 0d 02 f8 1a f2 77 70 75 |_caret%)|.....wpu|
|00000620| 74 28 73 61 76 65 5f 73 | 65 6c 5f 73 74 61 72 74 |t(save_s|el_start|
|00000630| 25 29 0d 03 02 18 f2 77 | 70 75 74 28 73 61 76 65 |%).....w|put(save|
|00000640| 5f 73 65 6c 5f 65 6e 64 | 25 29 0d 03 0c 2d 72 61 |_sel_end|%)...-ra|
|00000650| 74 65 25 3d bb a4 58 69 | 63 6f 6e 5f 67 65 74 73 |te%=..Xi|con_gets|
|00000660| 74 72 28 77 69 6e 5f 6d | 61 69 6e 25 2c 35 29 2a |tr(win_m|ain%,5)*|
|00000670| 28 31 3c 3c 32 34 29 0d | 03 16 10 f2 77 70 75 74 |(1<<24).|....wput|
|00000680| 28 72 61 74 65 25 29 0d | 03 20 2e c8 99 20 26 43 |(rate%).|. ... &C|
|00000690| 2c 32 2c 66 69 6c 65 25 | 2c 73 61 76 65 5f 73 61 |,2,file%|,save_sa|
|000006a0| 6d 70 6c 65 25 2c 73 61 | 76 65 5f 73 61 6d 70 5f |mple%,sa|ve_samp_|
|000006b0| 73 69 7a 65 25 0d 03 2a | 0b d9 23 66 69 6c 65 25 |size%..*|..#file%|
|000006c0| 0d 03 34 1c ff 22 53 65 | 74 54 79 70 65 20 22 2b |..4.."Se|tType "+|
|000006d0| 6e 61 6d 65 24 2b 22 20 | 36 33 34 22 0d 03 3e 05 |name$+" |634"..>.|
|000006e0| e1 0d 03 48 04 0d 03 52 | 15 dd f2 73 61 76 65 5f |...H...R|...save_|
|000006f0| 61 72 6d 28 6e 61 6d 65 | 24 29 0d 03 5c 17 ea 20 |arm(name|$)..\.. |
|00000700| 66 69 6c 65 25 2c 73 69 | 7a 65 25 2c 72 61 74 65 |file%,si|ze%,rate|
|00000710| 25 0d 03 66 12 66 69 6c | 65 25 3d ae 28 6e 61 6d |%..f.fil|e%=.(nam|
|00000720| 65 24 29 0d 03 70 27 d5 | 23 66 69 6c 65 25 2c bb |e$)..p'.|#file%,.|
|00000730| a4 58 69 63 6f 6e 5f 67 | 65 74 73 74 72 28 77 69 |.Xicon_g|etstr(wi|
|00000740| 6e 5f 6d 61 69 6e 25 2c | 34 29 0d 03 7a 2e c8 99 |n_main%,|4)..z...|
|00000750| 20 26 43 2c 32 2c 66 69 | 6c 65 25 2c 73 61 76 65 | &C,2,fi|le%,save|
|00000760| 5f 73 61 6d 70 6c 65 25 | 2c 73 61 76 65 5f 73 61 |_sample%|,save_sa|
|00000770| 6d 70 5f 73 69 7a 65 25 | 0d 03 84 0b d9 23 66 69 |mp_size%|.....#fi|
|00000780| 6c 65 25 0d 03 8e 1c ff | 22 53 65 74 54 79 70 65 |le%.....|"SetType|
|00000790| 20 22 2b 6e 61 6d 65 24 | 2b 22 20 44 33 43 22 0d | "+name$|+" D3C".|
|000007a0| 03 98 05 e1 0d 03 a2 04 | 0d 03 ac 0e dd a4 6c 65 |........|......le|
|000007b0| 61 66 28 73 24 29 0d 03 | b6 10 ea 20 73 32 24 3a |af(s$)..|... s2$:|
|000007c0| 73 32 24 3d 22 22 0d 03 | c0 16 e7 20 a7 73 24 2c |s2$=""..|... .s$,|
|000007d0| 22 2e 22 29 3d 30 20 8c | 20 3d 73 24 0d 03 ca 1c |".")=0 .| =s$....|
|000007e0| c8 95 20 c2 73 24 29 3c | 3e 22 2e 22 20 80 20 c2 |.. .s$)<|>"." . .|
|000007f0| 73 24 29 3c 3e 22 3a 22 | 0d 03 d4 10 73 32 24 3d |s$)<>":"|....s2$=|
|00000800| c2 73 24 29 2b 73 32 24 | 0d 03 de 0b 73 24 3d c0 |.s$)+s2$|....s$=.|
|00000810| 73 24 29 0d 03 e8 05 ce | 0d 03 f2 08 3d 73 32 24 |s$).....|....=s2$|
|00000820| 0d 03 fc 04 0d 04 06 0e | dd a4 70 61 74 68 28 73 |........|..path(s|
|00000830| 24 29 0d 04 10 1c c8 95 | 20 c2 73 24 29 3c 3e 22 |$)......| .s$)<>"|
|00000840| 2e 22 20 80 20 c2 73 24 | 29 3c 3e 22 3a 22 0d 04 |." . .s$|)<>":"..|
|00000850| 1a 0b 73 24 3d c0 73 24 | 29 0d 04 24 05 ce 0d 04 |..s$=.s$|)..$....|
|00000860| 2e 07 3d 73 24 0d 04 38 | 04 0d 04 42 12 dd f2 65 |..=s$..8|...B...e|
|00000870| 78 74 72 61 63 74 5f 6c | 65 61 66 0d 04 4c 30 73 |xtract_l|eaf..L0s|
|00000880| 61 76 65 5f 6e 61 6d 65 | 24 3d a4 6c 65 61 66 28 |ave_name|$=.leaf(|
|00000890| a4 58 69 63 6f 6e 5f 67 | 65 74 73 74 72 28 77 69 |.Xicon_g|etstr(wi|
|000008a0| 6e 5f 73 61 76 65 25 2c | 31 29 29 0d 04 56 05 e1 |n_save%,|1))..V..|
|000008b0| 0d 04 60 04 0d 04 6a 11 | dd f2 69 6e 73 65 72 74 |..`...j.|..insert|
|000008c0| 5f 6e 61 6d 65 0d 04 74 | 13 c8 8e 20 66 69 6c 65 |_name..t|... file|
|000008d0| 5f 74 79 70 65 25 20 ca | 0d 04 7e 22 c9 20 26 36 |_type% .|..~". &6|
|000008e0| 33 31 20 3a 20 73 6e 61 | 6d 65 5f 6c 6f 67 24 3d |31 : sna|me_log$=|
|000008f0| 73 61 76 65 5f 6e 61 6d | 65 24 0d 04 88 22 c9 20 |save_nam|e$...". |
|00000900| 26 36 33 32 20 3a 20 73 | 6e 61 6d 65 5f 73 67 6e |&632 : s|name_sgn|
|00000910| 24 3d 73 61 76 65 5f 6e | 61 6d 65 24 0d 04 92 22 |$=save_n|ame$..."|
|00000920| c9 20 26 36 33 33 20 3a | 20 73 6e 61 6d 65 5f 75 |. &633 :| sname_u|
|00000930| 6e 73 24 3d 73 61 76 65 | 5f 6e 61 6d 65 24 0d 04 |ns$=save|_name$..|
|00000940| 9c 22 c9 20 26 36 33 34 | 20 3a 20 73 6e 61 6d 65 |.". &634| : sname|
|00000950| 5f 65 66 66 24 3d 73 61 | 76 65 5f 6e 61 6d 65 24 |_eff$=sa|ve_name$|
|00000960| 0d 04 a6 22 c9 20 26 44 | 33 43 20 3a 20 73 6e 61 |...". &D|3C : sna|
|00000970| 6d 65 5f 61 72 6d 24 3d | 73 61 76 65 5f 6e 61 6d |me_arm$=|save_nam|
|00000980| 65 24 0d 04 b0 22 c9 20 | 26 36 33 35 20 3a 20 73 |e$...". |&635 : s|
|00000990| 6e 61 6d 65 5f 73 65 6c | 24 3d 73 61 76 65 5f 6e |name_sel|$=save_n|
|000009a0| 61 6d 65 24 0d 04 ba 22 | c9 20 26 36 33 36 20 3a |ame$..."|. &636 :|
|000009b0| 20 73 6e 61 6d 65 5f 6c | 69 62 24 3d 73 61 76 65 | sname_l|ib$=save|
|000009c0| 5f 6e 61 6d 65 24 0d 04 | c4 05 cb 0d 04 ce 05 e1 |_name$..|........|
|000009d0| 0d 04 d8 04 0d 04 e2 1d | dd f2 6b 70 72 65 73 73 |........|..kpress|
|000009e0| 28 77 69 6e 25 2c 69 63 | 6f 6e 25 2c 6b 65 79 25 |(win%,ic|on%,key%|
|000009f0| 29 0d 04 ec 0d c8 8e 20 | 6b 65 79 25 20 ca 0d 04 |)...... |key% ...|
|00000a00| f6 2e c9 20 31 33 20 3a | 20 e7 20 77 69 6e 25 3d |... 13 :| . win%=|
|00000a10| 77 69 6e 5f 6d 61 69 6e | 25 3a f2 6e 65 78 74 5f |win_main|%:.next_|
|00000a20| 63 61 72 65 74 28 69 63 | 6f 6e 25 29 0d 05 00 24 |caret(ic|on%)...$|
|00000a30| 20 20 20 20 20 20 20 20 | 20 20 e7 20 77 69 6e 25 | | . win%|
|00000a40| 3d 77 69 6e 5f 73 61 76 | 65 25 20 f2 73 61 76 65 |=win_sav|e% .save|
|00000a50| 0d 05 0a 21 c9 20 26 31 | 38 46 20 3a 20 f2 6d 6f |...!. &1|8F : .mo|
|00000a60| 76 65 5f 63 61 72 65 74 | 28 69 63 6f 6e 25 2c 31 |ve_caret|(icon%,1|
|00000a70| 29 0d 05 14 21 c9 20 26 | 31 38 45 20 3a 20 f2 6d |)...!. &|18E : .m|
|00000a80| 6f 76 65 5f 63 61 72 65 | 74 28 69 63 6f 6e 25 2c |ove_care|t(icon%,|
|00000a90| 30 29 0d 05 1e 28 7f 20 | 3a 20 e7 20 ac 20 a4 6b |0)...(. |: . . .k|
|00000aa0| 65 79 5f 6f 6b 28 6b 65 | 79 25 29 20 c8 99 20 26 |ey_ok(ke|y%) .. &|
|00000ab0| 34 30 30 44 43 2c 6b 65 | 79 25 0d 05 28 05 cb 0d |400DC,ke|y%..(...|
|00000ac0| 05 32 05 e1 0d 05 3c 04 | 0d 05 46 0a dd f2 73 61 |.2....<.|..F...sa|
|00000ad0| 76 65 0d 05 50 29 73 61 | 76 65 5f 6e 61 6d 65 24 |ve..P)sa|ve_name$|
|00000ae0| 3d a4 58 69 63 6f 6e 5f | 67 65 74 73 74 72 28 77 |=.Xicon_|getstr(w|
|00000af0| 69 6e 5f 73 61 76 65 25 | 2c 31 29 0d 05 5a 10 f2 |in_save%|,1)..Z..|
|00000b00| 69 6e 73 65 72 74 5f 6e | 61 6d 65 0d 05 64 13 c8 |insert_n|ame..d..|
|00000b10| 8e 20 66 69 6c 65 5f 74 | 79 70 65 25 20 ca 0d 05 |. file_t|ype% ...|
|00000b20| 6e 14 c9 20 26 36 33 31 | 2c 26 36 33 32 2c 26 36 |n.. &631|,&632,&6|
|00000b30| 33 33 0d 05 78 4d 20 c8 | 99 20 38 2c 31 30 2c 73 |33..xM .|. 8,10,s|
|00000b40| 61 76 65 5f 6e 61 6d 65 | 24 2c 66 69 6c 65 5f 74 |ave_name|$,file_t|
|00000b50| 79 70 65 25 2c 2c 73 61 | 76 65 5f 73 61 6d 70 6c |ype%,,sa|ve_sampl|
|00000b60| 65 25 2c 73 61 76 65 5f | 73 61 6d 70 6c 65 25 2b |e%,save_|sample%+|
|00000b70| 73 61 76 65 5f 73 61 6d | 70 5f 73 69 7a 65 25 0d |save_sam|p_size%.|
|00000b80| 05 82 22 c9 20 26 36 33 | 34 20 3a 20 f2 73 61 76 |..". &63|4 : .sav|
|00000b90| 65 5f 65 66 66 28 73 61 | 76 65 5f 6e 61 6d 65 24 |e_eff(sa|ve_name$|
|00000ba0| 29 0d 05 8c 22 c9 20 26 | 44 33 43 20 3a 20 f2 73 |)...". &|D3C : .s|
|00000bb0| 61 76 65 5f 61 72 6d 28 | 73 61 76 65 5f 6e 61 6d |ave_arm(|save_nam|
|00000bc0| 65 24 29 0d 05 96 05 cb | 0d 05 a0 11 c8 99 20 26 |e$).....|...... &|
|00000bd0| 34 30 30 44 34 2c 2c 2d | 31 0d 05 aa 05 e1 0d 05 |400D4,,-|1.......|
|00000be0| b4 04 0d 05 be 15 dd f2 | 6e 65 78 74 5f 63 61 72 |........|next_car|
|00000bf0| 65 74 28 69 63 25 29 0d | 05 c8 1c ea 20 61 25 2c |et(ic%).|.... a%,|
|00000c00| 77 69 6e 25 3a 77 69 6e | 25 3d 77 69 6e 5f 6d 61 |win%:win|%=win_ma|
|00000c10| 69 6e 25 0d 05 d2 0c c8 | 8e 20 69 63 25 20 ca 0d |in%.....|. ic% ..|
|00000c20| 05 dc 2d c9 20 35 20 3a | 20 f2 73 65 74 5f 72 61 |..-. 5 :| .set_ra|
|00000c30| 74 65 28 bb 28 a4 58 69 | 63 6f 6e 5f 67 65 74 73 |te(.(.Xi|con_gets|
|00000c40| 74 72 28 77 69 6e 25 2c | 35 29 29 29 0d 05 e6 1f |tr(win%,|5)))....|
|00000c50| 20 20 20 20 20 20 20 20 | 20 f2 73 65 74 5f 63 61 | | .set_ca|
|00000c60| 72 65 74 28 77 69 6e 25 | 2c 34 29 0d 05 f0 32 c9 |ret(win%|,4)...2.|
|00000c70| 20 34 20 3a 20 61 25 3d | bb 28 a4 58 69 63 6f 6e | 4 : a%=|.(.Xicon|
|00000c80| 5f 67 65 74 73 74 72 28 | 77 69 6e 25 2c 34 29 29 |_getstr(|win%,4))|
|00000c90| 3a e7 20 61 25 3d 30 20 | 61 25 3d 35 30 0d 05 fa |:. a%=0 |a%=50...|
|00000ca0| 1f 20 20 20 20 20 20 20 | 20 20 f2 73 65 74 5f 72 |. | .set_r|
|00000cb0| 61 74 65 28 31 30 30 30 | 2f 61 25 29 0d 06 04 1f |ate(1000|/a%)....|
|00000cc0| 20 20 20 20 20 20 20 20 | 20 f2 73 65 74 5f 63 61 | | .set_ca|
|00000cd0| 72 65 74 28 77 69 6e 25 | 2c 35 29 0d 06 0e 22 c9 |ret(win%|,5)...".|
|00000ce0| 20 31 38 20 3a 20 f2 73 | 65 74 5f 63 61 72 65 74 | 18 : .s|et_caret|
|00000cf0| 28 77 69 6e 25 2c 31 38 | 29 3a f2 73 63 0d 06 18 |(win%,18|):.sc...|
|00000d00| 1e c9 20 32 32 20 3a 20 | f2 73 65 74 5f 63 61 72 |.. 22 : |.set_car|
|00000d10| 65 74 28 77 69 6e 25 2c | 32 33 29 0d 06 22 22 c9 |et(win%,|23).."".|
|00000d20| 20 32 33 20 3a 20 f2 73 | 65 74 5f 63 61 72 65 74 | 23 : .s|et_caret|
|00000d30| 28 77 69 6e 25 2c 32 32 | 29 3a f2 73 73 0d 06 2c |(win%,22|):.ss..,|
|00000d40| 1e c9 20 31 30 20 3a 20 | f2 73 65 74 5f 63 61 72 |.. 10 : |.set_car|
|00000d50| 65 74 28 77 69 6e 25 2c | 31 31 29 0d 06 36 15 c9 |et(win%,|11)..6..|
|00000d60| 20 31 31 20 3a 20 f2 7a | 6f 6f 6d 28 30 2c 30 29 | 11 : .z|oom(0,0)|
|00000d70| 0d 06 40 21 20 20 20 20 | 20 20 20 20 20 20 f2 73 |..@! | .s|
|00000d80| 65 74 5f 63 61 72 65 74 | 28 77 69 6e 25 2c 31 30 |et_caret|(win%,10|
|00000d90| 29 0d 06 4a 25 c9 20 32 | 35 20 3a 20 61 25 3d bb |)..J%. 2|5 : a%=.|
|00000da0| a4 58 69 63 6f 6e 5f 67 | 65 74 73 74 72 28 77 69 |.Xicon_g|etstr(wi|
|00000db0| 6e 25 2c 32 35 29 0d 06 | 54 19 20 20 20 20 20 20 |n%,25)..|T. |
|00000dc0| 20 20 20 20 e7 20 61 25 | 3c 30 20 61 25 3d 30 0d | . a%|<0 a%=0.|
|00000dd0| 06 5e 1d 20 20 20 20 20 | 20 20 20 20 20 e7 20 61 |.^. | . a|
|00000de0| 25 3e 31 32 37 20 61 25 | 3d 31 32 37 0d 06 68 28 |%>127 a%|=127..h(|
|00000df0| 20 20 20 20 20 20 20 20 | 20 20 f2 58 69 63 6f 6e | | .Xicon|
|00000e00| 5f 73 65 74 73 74 72 28 | 77 69 6e 25 2c 32 35 2c |_setstr(|win%,25,|
|00000e10| c3 61 25 29 0d 06 72 16 | 20 20 20 20 20 20 20 20 |.a%)..r.| |
|00000e20| 20 20 3f 56 76 6f 6c 3d | 61 25 0d 06 7c 05 cb 0d | ?Vvol=|a%..|...|
|00000e30| 06 86 05 e1 0d 06 90 04 | 0d 06 9a 19 dd f2 6d 6f |........|......mo|
|00000e40| 76 65 5f 63 61 72 65 74 | 28 69 63 25 2c 75 70 25 |ve_caret|(ic%,up%|
|00000e50| 29 0d 06 a4 0b ea 20 75 | 25 2c 64 25 0d 06 ae 0c |)..... u|%,d%....|
|00000e60| c8 8e 20 69 63 25 20 ca | 0d 06 b8 14 c9 20 35 20 |.. ic% .|..... 5 |
|00000e70| 3a 20 75 25 3d 31 31 3a | 64 25 3d 34 0d 06 c2 14 |: u%=11:|d%=4....|
|00000e80| c9 20 34 20 3a 20 75 25 | 3d 35 3a 64 25 3d 31 38 |. 4 : u%|=5:d%=18|
|00000e90| 0d 06 cc 15 c9 20 31 38 | 20 3a 20 75 25 3d 34 3a |..... 18| : u%=4:|
|00000ea0| 64 25 3d 32 32 0d 06 d6 | 16 c9 20 32 32 20 3a 20 |d%=22...|.. 22 : |
|00000eb0| 75 25 3d 31 38 3a 64 25 | 3d 32 33 0d 06 e0 16 c9 |u%=18:d%|=23.....|
|00000ec0| 20 32 33 20 3a 20 75 25 | 3d 32 32 3a 64 25 3d 32 | 23 : u%|=22:d%=2|
|00000ed0| 35 0d 06 ea 16 c9 20 32 | 35 20 3a 20 75 25 3d 32 |5..... 2|5 : u%=2|
|00000ee0| 33 3a 64 25 3d 31 30 0d | 06 f4 16 c9 20 31 30 20 |3:d%=10.|.... 10 |
|00000ef0| 3a 20 75 25 3d 32 35 3a | 64 25 3d 31 31 0d 06 fe |: u%=25:|d%=11...|
|00000f00| 15 c9 20 31 31 20 3a 20 | 75 25 3d 31 30 3a 64 25 |.. 11 : |u%=10:d%|
|00000f10| 3d 35 0d 07 08 05 cb 0d | 07 12 3d e7 20 75 70 25 |=5......|..=. up%|
|00000f20| 20 f2 73 65 74 5f 63 61 | 72 65 74 28 77 69 6e 5f | .set_ca|ret(win_|
|00000f30| 6d 61 69 6e 25 2c 75 25 | 29 20 8b 20 f2 73 65 74 |main%,u%|) . .set|
|00000f40| 5f 63 61 72 65 74 28 77 | 69 6e 5f 6d 61 69 6e 25 |_caret(w|in_main%|
|00000f50| 2c 64 25 29 0d 07 1c 05 | e1 0d 07 26 04 0d 07 30 |,d%)....|...&...0|
|00000f60| 13 dd f2 73 65 74 5f 72 | 61 74 65 28 6b 68 7a 29 |...set_r|ate(khz)|
|00000f70| 0d 07 3a 12 e7 20 6b 68 | 7a 3d 30 20 6b 68 7a 3d |..:.. kh|z=0 khz=|
|00000f80| 32 30 0d 07 44 23 f2 58 | 69 63 6f 6e 5f 73 65 74 |20..D#.X|icon_set|
|00000f90| 73 74 72 28 77 69 6e 5f | 6d 61 69 6e 25 2c 35 2c |str(win_|main%,5,|
|00000fa0| c3 6b 68 7a 29 0d 07 4e | 2a f2 58 69 63 6f 6e 5f |.khz)..N|*.Xicon_|
|00000fb0| 73 65 74 73 74 72 28 77 | 69 6e 5f 6d 61 69 6e 25 |setstr(w|in_main%|
|00000fc0| 2c 34 2c c3 28 31 30 30 | 30 2f 6b 68 7a 29 29 0d |,4,.(100|0/khz)).|
|00000fd0| 07 58 05 e1 0d 07 62 04 | 0d 07 6c 16 dd f2 73 65 |.X....b.|..l...se|
|00000fe0| 74 5f 63 61 72 65 74 28 | 77 25 2c 69 25 29 0d 07 |t_caret(|w%,i%)..|
|00000ff0| 76 27 ea 20 6c 65 6e 25 | 3a 6c 65 6e 25 3d a9 28 |v'. len%|:len%=.(|
|00001000| a4 58 69 63 6f 6e 5f 67 | 65 74 73 74 72 28 77 25 |.Xicon_g|etstr(w%|
|00001010| 2c 69 25 29 29 0d 07 80 | 1f c8 99 20 26 34 30 30 |,i%))...|... &400|
|00001020| 44 32 2c 77 25 2c 69 25 | 2c 30 2c 30 2c 2d 31 2c |D2,w%,i%|,0,0,-1,|
|00001030| 6c 65 6e 25 0d 07 8a 05 | e1 0d 07 94 04 0d 07 9e |len%....|........|
|00001040| 0c dd f2 72 65 64 72 61 | 77 0d 07 a8 37 ea 20 6d |...redra|w...7. m|
|00001050| 6f 72 65 25 2c 73 63 6c | 25 2c 78 70 25 2c 70 6f |ore%,scl|%,xp%,po|
|00001060| 73 2c 69 6e 63 2c 78 6f | 25 2c 79 6f 25 2c 73 73 |s,inc,xo|%,yo%,ss|
|00001070| 2c 73 65 2c 63 61 72 25 | 2c 73 73 73 2c 73 73 65 |,se,car%|,sss,sse|
|00001080| 0d 07 b2 26 73 73 3d 73 | 65 6c 5f 73 74 61 72 74 |...&ss=s|el_start|
|00001090| 25 2a 31 31 35 30 2a 7a | 6f 6f 6d 2f 73 61 6d 70 |%*1150*z|oom/samp|
|000010a0| 5f 73 69 7a 65 25 0d 07 | bc 24 73 65 3d 73 65 6c |_size%..|.$se=sel|
|000010b0| 5f 65 6e 64 25 2a 31 31 | 35 30 2a 7a 6f 6f 6d 2f |_end%*11|50*zoom/|
|000010c0| 73 61 6d 70 5f 73 69 7a | 65 25 0d 07 c6 24 63 61 |samp_siz|e%...$ca|
|000010d0| 72 25 3d 63 61 72 65 74 | 25 2a 31 31 35 30 2a 7a |r%=caret|%*1150*z|
|000010e0| 6f 6f 6d 2f 73 61 6d 70 | 5f 73 69 7a 65 25 0d 07 |oom/samp|_size%..|
|000010f0| d0 25 c8 99 20 26 33 35 | 2c 2d 31 2c 34 20 b8 20 |.%.. &35|,-1,4 . |
|00001100| 2c 2c 73 63 6c 25 3a 73 | 63 6c 25 3d 31 3c 3c 73 |,,scl%:s|cl%=1<<s|
|00001110| 63 6c 25 0d 07 da 19 c8 | 99 20 26 34 30 30 43 38 |cl%.....|. &400C8|
|00001120| 2c 2c 71 25 20 b8 20 6d | 6f 72 65 25 0d 07 e4 0c |,,q% . m|ore%....|
|00001130| c8 95 20 6d 6f 72 65 25 | 0d 07 ee 1c 78 73 74 61 |.. more%|....xsta|
|00001140| 72 74 25 3d 71 25 21 32 | 38 2d 71 25 21 34 2b 71 |rt%=q%!2|8-q%!4+q|
|00001150| 25 21 32 30 0d 07 f8 1a | 78 65 6e 64 25 3d 71 25 |%!20....|xend%=q%|
|00001160| 21 33 36 2d 71 25 21 34 | 2b 71 25 21 32 30 0d 08 |!36-q%!4|+q%!20..|
|00001170| 02 0e 70 6f 73 25 3d 71 | 25 21 32 38 0d 08 0c 2b |..pos%=q|%!28...+|
|00001180| 70 6f 73 3d 28 78 73 74 | 61 72 74 25 2d 73 63 6c |pos=(xst|art%-scl|
|00001190| 25 29 2a 73 61 6d 70 5f | 73 69 7a 65 25 2f 7a 6f |%)*samp_|size%/zo|
|000011a0| 6f 6d 2f 31 31 35 30 0d | 08 16 21 69 6e 63 3d 73 |om/1150.|..!inc=s|
|000011b0| 63 6c 25 2a 73 61 6d 70 | 5f 73 69 7a 65 25 2f 7a |cl%*samp|_size%/z|
|000011c0| 6f 6f 6d 2f 31 31 35 30 | 0d 08 20 15 62 79 74 65 |oom/1150|.. .byte|
|000011d0| 25 3d 73 61 6d 70 6c 65 | 25 3f 70 6f 73 0d 08 2a |%=sample|%?pos..*|
|000011e0| 1b 78 6f 25 3d 71 25 21 | 34 2d 71 25 21 32 30 3a |.xo%=q%!|4-q%!20:|
|000011f0| 79 6f 25 3d 71 25 21 38 | 0d 08 34 1b ec 20 78 73 |yo%=q%!8|..4.. xs|
|00001200| 74 61 72 74 25 2b 78 6f | 25 2c 62 79 74 65 25 2b |tart%+xo|%,byte%+|
|00001210| 79 6f 25 0d 08 3e 0f c8 | 99 20 26 34 30 30 45 36 |yo%..>..|. &400E6|
|00001220| 2c 34 0d 08 48 2a e3 20 | 78 70 25 3d 78 73 74 61 |,4..H*. |xp%=xsta|
|00001230| 72 74 25 2d 73 63 6c 25 | 20 b8 20 78 65 6e 64 25 |rt%-scl%| . xend%|
|00001240| 2b 73 63 6c 25 20 88 20 | 73 63 6c 25 0d 08 52 21 |+scl% . |scl%..R!|
|00001250| f0 76 64 75 25 2c 78 70 | 25 2b 78 6f 25 2c 73 61 |.vdu%,xp|%+xo%,sa|
|00001260| 6d 70 6c 65 25 3f 70 6f | 73 2b 79 6f 25 0d 08 5c |mple%?po|s+yo%..\|
|00001270| 0c 70 6f 73 2b 3d 69 6e | 63 0d 08 66 05 ed 0d 08 |.pos+=in|c..f....|
|00001280| 70 40 e7 20 73 65 6c 5f | 73 74 61 72 74 25 3e 3d |p@. sel_|start%>=|
|00001290| 30 20 c8 99 20 26 34 30 | 30 45 36 2c 37 2b 28 33 |0 .. &40|0E6,7+(3|
|000012a0| 3c 3c 34 29 3a c8 93 c8 | 90 20 73 73 2b 78 6f 25 |<<4):...|. ss+xo%|
|000012b0| 2c 79 6f 25 2c 73 65 2d | 73 73 2c 32 35 36 0d 08 |,yo%,se-|ss,256..|
|000012c0| 7a 43 e7 20 63 61 72 65 | 74 25 3e 3d 30 20 c8 99 |zC. care|t%>=0 ..|
|000012d0| 20 26 34 30 30 45 36 2c | 31 31 2b 28 33 3c 3c 34 | &400E6,|11+(3<<4|
|000012e0| 29 3a 86 20 63 61 72 25 | 2b 78 6f 25 2c 79 6f 25 |):. car%|+xo%,yo%|
|000012f0| 2c 63 61 72 25 2b 78 6f | 25 2c 79 6f 25 2b 32 35 |,car%+xo|%,yo%+25|
|00001300| 36 0d 08 84 25 c8 99 20 | 26 34 30 30 45 36 2c 38 |6...%.. |&400E6,8|
|00001310| 3a 86 20 78 6f 25 2c 79 | 6f 25 2c 78 6f 25 2c 79 |:. xo%,y|o%,xo%,y|
|00001320| 6f 25 2b 32 35 36 0d 08 | 8e 3e c8 99 20 26 34 30 |o%+256..|.>.. &40|
|00001330| 30 45 36 2c 31 35 3a 86 | 20 78 6f 25 2b 31 31 35 |0E6,15:.| xo%+115|
|00001340| 30 2a 7a 6f 6f 6d 2d 31 | 2c 79 6f 25 2c 78 6f 25 |0*zoom-1|,yo%,xo%|
|00001350| 2b 31 31 35 30 2a 7a 6f | 6f 6d 2d 31 2c 79 6f 25 |+1150*zo|om-1,yo%|
|00001360| 2b 32 35 36 0d 08 98 19 | c8 99 20 26 34 30 30 43 |+256....|.. &400C|
|00001370| 41 2c 2c 71 25 20 b8 20 | 6d 6f 72 65 25 0d 08 a2 |A,,q% . |more%...|
|00001380| 05 ce 0d 08 ac 05 e1 0d | 08 b6 04 0d 08 c0 14 dd |........|........|
|00001390| f2 66 72 65 73 68 28 77 | 69 6e 25 2c 71 25 29 0d |.fresh(w|in%,q%).|
|000013a0| 08 ca 1a 21 71 25 3d 77 | 69 6e 25 3a c8 99 20 26 |...!q%=w|in%:.. &|
|000013b0| 34 30 30 43 42 2c 2c 71 | 25 0d 08 d4 0d f2 6f 70 |400CB,,q|%.....op|
|000013c0| 65 6e 28 71 25 29 0d 08 | de 05 e1 0d 08 e8 04 0d |en(q%)..|........|
|000013d0| 08 f2 13 dd f2 7a 6f 6f | 6d 28 64 61 25 2c 64 62 |.....zoo|m(da%,db|
|000013e0| 25 29 0d 08 fc 10 ea 20 | 61 25 2c 62 25 2c 73 63 |%)..... |a%,b%,sc|
|000013f0| 6c 25 0d 09 06 23 61 25 | 3d bb a4 58 69 63 6f 6e |l%...#a%|=..Xicon|
|00001400| 5f 67 65 74 73 74 72 28 | 77 69 6e 5f 6d 61 69 6e |_getstr(|win_main|
|00001410| 25 2c 31 30 29 0d 09 10 | 0b 61 25 2b 3d 64 61 25 |%,10)...|.a%+=da%|
|00001420| 0d 09 1a 13 e7 20 61 25 | 3e 39 39 39 20 61 25 3d |..... a%|>999 a%=|
|00001430| 39 39 39 0d 09 24 23 62 | 25 3d bb a4 58 69 63 6f |999..$#b|%=..Xico|
|00001440| 6e 5f 67 65 74 73 74 72 | 28 77 69 6e 5f 6d 61 69 |n_getstr|(win_mai|
|00001450| 6e 25 2c 31 31 29 0d 09 | 2e 0b 62 25 2b 3d 64 62 |n%,11)..|..b%+=db|
|00001460| 25 0d 09 38 13 e7 20 62 | 25 3e 39 39 39 20 62 25 |%..8.. b|%>999 b%|
|00001470| 3d 39 39 39 0d 09 42 0f | e7 20 61 25 3c 31 20 61 |=999..B.|. a%<1 a|
|00001480| 25 3d 31 0d 09 4c 0f e7 | 20 62 25 3c 31 20 62 25 |%=1..L..| b%<1 b%|
|00001490| 3d 31 0d 09 56 11 e7 20 | 62 25 3e 61 25 20 62 25 |=1..V.. |b%>a% b%|
|000014a0| 3d 61 25 0d 09 60 0e 7a | 6f 6f 6d 3d 61 25 2f 62 |=a%..`.z|oom=a%/b|
|000014b0| 25 0d 09 6a 23 f2 58 69 | 63 6f 6e 5f 73 65 74 73 |%..j#.Xi|con_sets|
|000014c0| 74 72 28 77 69 6e 5f 6d | 61 69 6e 25 2c 31 30 2c |tr(win_m|ain%,10,|
|000014d0| c3 61 25 29 0d 09 74 23 | f2 58 69 63 6f 6e 5f 73 |.a%)..t#|.Xicon_s|
|000014e0| 65 74 73 74 72 28 77 69 | 6e 5f 6d 61 69 6e 25 2c |etstr(wi|n_main%,|
|000014f0| 31 31 2c c3 62 25 29 0d | 09 7e 1f 21 71 25 3d 77 |11,.b%).|.~.!q%=w|
|00001500| 69 6e 5f 70 61 6e 65 25 | 3a c8 99 20 26 34 30 30 |in_pane%|:.. &400|
|00001510| 43 42 2c 2c 71 25 0d 09 | 88 3f e7 20 71 25 21 32 |CB,,q%..|.?. q%!2|
|00001520| 30 3e 31 31 35 30 2a 28 | 7a 6f 6f 6d 2d 31 29 2d |0>1150*(|zoom-1)-|
|00001530| 31 20 71 25 21 32 30 3d | 31 31 35 30 2a 28 7a 6f |1 q%!20=|1150*(zo|
|00001540| 6f 6d 2d 31 29 2d 31 3a | c8 99 20 26 34 30 30 43 |om-1)-1:|.. &400C|
|00001550| 35 2c 2c 71 25 0d 09 92 | 14 71 25 21 34 3d 30 3a |5,,q%...|.q%!4=0:|
|00001560| 71 25 21 38 3d 2d 32 35 | 36 0d 09 9c 18 71 25 21 |q%!8=-25|6....q%!|
|00001570| 31 32 3d 71 25 21 34 2b | 31 31 35 30 2a 7a 6f 6f |12=q%!4+|1150*zoo|
|00001580| 6d 0d 09 a6 0b 71 25 21 | 31 36 3d 30 0d 09 b0 25 |m....q%!|16=0...%|
|00001590| c8 99 20 26 33 35 2c 2d | 31 2c 34 20 b8 20 2c 2c |.. &35,-|1,4 . ,,|
|000015a0| 73 63 6c 25 3a 73 63 6c | 25 3d 31 3c 3c 73 63 6c |scl%:scl|%=1<<scl|
|000015b0| 25 0d 09 ba 10 61 25 3d | 71 25 21 38 83 73 63 6c |%....a%=|q%!8.scl|
|000015c0| 25 0d 09 c4 19 71 25 21 | 31 32 3d 71 25 21 31 32 |%....q%!|12=q%!12|
|000015d0| 2b 28 73 63 6c 25 2d 61 | 25 29 0d 09 ce 1c c8 99 |+(scl%-a|%)......|
|000015e0| 20 26 34 30 30 44 37 2c | 77 69 6e 5f 70 61 6e 65 | &400D7,|win_pane|
|000015f0| 25 2c 71 25 2b 34 0d 09 | d8 1f 21 71 25 3d 77 69 |%,q%+4..|..!q%=wi|
|00001600| 6e 5f 70 61 6e 65 25 3a | c8 99 20 26 34 30 30 43 |n_pane%:|.. &400C|
|00001610| 42 2c 2c 71 25 0d 09 e2 | 2f c8 99 20 26 34 30 30 |B,,q%...|/.. &400|
|00001620| 44 31 2c 77 69 6e 5f 70 | 61 6e 65 25 2c 71 25 21 |D1,win_p|ane%,q%!|
|00001630| 32 30 2c 2d 32 35 36 2c | 71 25 21 32 30 2b 31 31 |20,-256,|q%!20+11|
|00001640| 35 30 2c 30 0d 09 ec 05 | e1 0d 09 f6 04 0d 0a 00 |50,0....|........|
|00001650| 0e dd f2 6f 70 65 6e 28 | 71 25 29 0d 0a 0a 13 ea |...open(|q%).....|
|00001660| 20 61 25 3a 61 25 3d 71 | 25 2b 31 30 32 34 0d 0a | a%:a%=q|%+1024..|
|00001670| 14 15 e7 20 21 71 25 3d | 77 69 6e 5f 6d 61 69 6e |... !q%=|win_main|
|00001680| 25 20 8c 0d 0a 1e 20 61 | 25 21 30 3d 77 69 6e 5f |% .... a|%!0=win_|
|00001690| 70 61 6e 65 25 3a c8 99 | 20 26 34 30 30 43 42 2c |pane%:..| &400CB,|
|000016a0| 2c 61 25 0d 0a 28 1f 61 | 25 21 32 38 3d 71 25 21 |,a%..(.a|%!28=q%!|
|000016b0| 32 38 3a 71 25 21 32 38 | 3d 77 69 6e 5f 70 61 6e |28:q%!28|=win_pan|
|000016c0| 65 25 0d 0a 32 25 61 25 | 21 31 32 3d 61 25 21 31 |e%..2%a%|!12=a%!1|
|000016d0| 32 2d 61 25 21 34 3a 61 | 25 21 31 36 3d 61 25 21 |2-a%!4:a|%!16=a%!|
|000016e0| 31 36 2d 61 25 21 38 0d | 0a 3c 14 61 25 21 34 3d |16-a%!8.|.<.a%!4=|
|000016f0| 71 25 21 34 2b 70 61 6e | 65 78 25 0d 0a 46 14 61 |q%!4+pan|ex%..F.a|
|00001700| 25 21 38 3d 71 25 21 38 | 2b 70 61 6e 65 79 25 0d |%!8=q%!8|+paney%.|
|00001710| 0a 50 25 61 25 21 31 32 | 3d 61 25 21 31 32 2b 61 |.P%a%!12|=a%!12+a|
|00001720| 25 21 34 3a 61 25 21 31 | 36 3d 61 25 21 31 36 2b |%!4:a%!1|6=a%!16+|
|00001730| 61 25 21 38 0d 0a 5a 11 | c8 99 20 26 34 30 30 43 |a%!8..Z.|.. &400C|
|00001740| 35 2c 2c 61 25 0d 0a 64 | 05 cd 0d 0a 6e 11 c8 99 |5,,a%..d|....n...|
|00001750| 20 26 34 30 30 43 35 2c | 2c 71 25 0d 0a 78 05 e1 | &400C5,|,q%..x..|
|00001760| 0d 0a 82 04 0d 0a 8c 0f | dd f2 63 6c 6f 73 65 28 |........|..close(|
|00001770| 71 25 29 0d 0a 96 11 c8 | 99 20 26 34 30 30 43 36 |q%).....|. &400C6|
|00001780| 2c 2c 71 25 0d 0a a0 16 | e7 20 21 71 25 3c 3e 77 |,,q%....|. !q%<>w|
|00001790| 69 6e 5f 6d 61 69 6e 25 | 20 e1 0d 0a aa 11 21 71 |in_main%| .....!q|
|000017a0| 25 3d 77 69 6e 5f 70 61 | 6e 65 25 0d 0a b4 11 c8 |%=win_pa|ne%.....|
|000017b0| 99 20 26 34 30 30 43 36 | 2c 2c 71 25 0d 0a be 05 |. &400C6|,,q%....|
|000017c0| e1 0d 0a c8 04 0d 0a d2 | 0c dd f2 6d 63 6c 69 63 |........|...mclic|
|000017d0| 6b 0d 0a dc 19 ea 20 78 | 70 6f 73 25 2c 77 69 6e |k..... x|pos%,win|
|000017e0| 25 2c 62 75 74 25 2c 69 | 63 25 0d 0a e6 2c 78 70 |%,but%,i|c%...,xp|
|000017f0| 6f 73 25 3d 21 71 25 3a | 62 75 74 25 3d 71 25 21 |os%=!q%:|but%=q%!|
|00001800| 38 3a 77 69 6e 25 3d 71 | 25 21 31 32 3a 69 63 25 |8:win%=q|%!12:ic%|
|00001810| 3d 71 25 21 31 36 0d 0a | f0 05 f4 0d 0a fa 0e e7 |=q%!16..|........|
|00001820| 20 71 25 21 38 3d 32 20 | 8c 0d 0b 04 3b 20 e7 20 | q%!8=2 |....; . |
|00001830| 71 25 21 31 32 3d 2d 32 | 20 80 20 71 25 21 31 36 |q%!12=-2| . q%!16|
|00001840| 3d 69 63 6f 6e 62 61 72 | 25 20 f2 58 6d 65 6e 75 |=iconbar|% .Xmenu|
|00001850| 5f 69 63 6f 6e 62 61 72 | 28 6d 65 6e 75 5f 69 63 |_iconbar|(menu_ic|
|00001860| 6f 6e 25 29 0d 0b 0e 40 | 20 e7 20 71 25 21 31 32 |on%)...@| . q%!12|
|00001870| 3d 77 69 6e 5f 6d 61 69 | 6e 25 20 84 20 71 25 21 |=win_mai|n% . q%!|
|00001880| 31 32 3d 77 69 6e 5f 70 | 61 6e 65 25 20 f2 58 6d |12=win_p|ane% .Xm|
|00001890| 65 6e 75 5f 6d 61 69 6e | 28 6d 65 6e 75 5f 6d 61 |enu_main|(menu_ma|
|000018a0| 69 6e 25 29 0d 0b 18 05 | cd 0d 0b 22 05 f4 0d 0b |in%)....|..."....|
|000018b0| 2c 2b e7 20 28 71 25 21 | 38 3d 34 20 84 20 71 25 |,+. (q%!|8=4 . q%|
|000018c0| 21 38 3d 31 29 20 80 20 | 71 25 21 31 32 3d 77 69 |!8=1) . |q%!12=wi|
|000018d0| 6e 5f 70 61 6e 65 25 20 | 8c 0d 0b 36 05 cd 0d 0b |n_pane% |...6....|
|000018e0| 40 0e e7 20 71 25 21 38 | 3d 34 20 8c 0d 0b 4a 47 |@.. q%!8|=4 ...JG|
|000018f0| 20 e7 20 71 25 21 31 32 | 3d 2d 32 20 80 20 71 25 | . q%!12|=-2 . q%|
|00001900| 21 31 36 3d 69 63 6f 6e | 62 61 72 25 20 80 20 73 |!16=icon|bar% . s|
|00001910| 61 6d 70 6c 65 5f 74 79 | 70 65 25 3e 2d 31 20 f2 |ample_ty|pe%>-1 .|
|00001920| 66 72 65 73 68 28 77 69 | 6e 5f 6d 61 69 6e 25 2c |fresh(wi|n_main%,|
|00001930| 71 25 29 0d 0b 54 1f 20 | e7 20 71 25 21 31 32 3d |q%)..T. |. q%!12=|
|00001940| 77 69 6e 5f 70 61 6e 65 | 25 20 f2 73 65 74 5f 73 |win_pane|% .set_s|
|00001950| 65 6c 0d 0b 5e 23 20 e7 | 20 77 69 6e 25 3d 77 69 |el..^# .| win%=wi|
|00001960| 6e 5f 6d 61 69 6e 25 20 | 80 20 69 63 25 3d 32 38 |n_main% |. ic%=28|
|00001970| 20 f2 70 6c 79 0d 0b 68 | 05 cd 0d 0b 72 05 f4 0d | .ply..h|....r...|
|00001980| 0b 7c 0e e7 20 71 25 21 | 38 3d 31 20 8c 0d 0b 86 |.|.. q%!|8=1 ....|
|00001990| 1f 20 e7 20 71 25 21 31 | 32 3d 77 69 6e 5f 70 61 |. . q%!1|2=win_pa|
|000019a0| 6e 65 25 20 f2 73 65 74 | 5f 63 61 72 0d 0b 90 05 |ne% .set|_car....|
|000019b0| cd 0d 0b 9a 05 f4 0d 0b | a4 43 e7 20 28 62 75 74 |........|.C. (but|
|000019c0| 25 3d 34 20 84 20 62 75 | 74 25 3d 31 29 20 80 20 |%=4 . bu|t%=1) . |
|000019d0| 77 69 6e 25 3d 77 69 6e | 5f 70 61 6e 65 25 20 f2 |win%=win|_pane% .|
|000019e0| 73 63 72 6f 6c 6c 5f 70 | 61 6e 65 28 78 70 6f 73 |scroll_p|ane(xpos|
|000019f0| 25 2c 71 25 2b 35 31 32 | 29 0d 0b ae 38 e7 20 62 |%,q%+512|)...8. b|
|00001a00| 75 74 25 3c 3e 32 20 80 | 20 77 69 6e 25 3d 77 69 |ut%<>2 .| win%=wi|
|00001a10| 6e 5f 6d 61 69 6e 25 20 | f2 68 61 6e 64 6c 65 5f |n_main% |.handle_|
|00001a20| 77 69 6e 6d 61 69 6e 28 | 69 63 25 2c 62 75 74 25 |winmain(|ic%,but%|
|00001a30| 29 0d 0b b8 2c e7 20 77 | 69 6e 25 3d 77 69 6e 5f |)...,. w|in%=win_|
|00001a40| 73 61 76 65 25 20 f2 68 | 61 6e 64 6c 65 5f 73 61 |save% .h|andle_sa|
|00001a50| 76 65 73 28 69 63 25 2c | 62 75 74 25 29 0d 0b c2 |ves(ic%,|but%)...|
|00001a60| 05 e1 0d 0b cc 04 0d 0b | d6 09 dd f2 70 6c 79 0d |........|....ply.|
|00001a70| 0b e0 31 ea 20 76 6f 6c | 25 2c 72 61 74 65 3a 76 |..1. vol|%,rate:v|
|00001a80| 6f 6c 25 3d bb a4 58 69 | 63 6f 6e 5f 67 65 74 73 |ol%=..Xi|con_gets|
|00001a90| 74 72 28 77 69 6e 5f 6d | 61 69 6e 25 2c 32 35 29 |tr(win_m|ain%,25)|
|00001aa0| 0d 0b ea 24 72 61 74 65 | 3d bb a4 58 69 63 6f 6e |...$rate|=..Xicon|
|00001ab0| 5f 67 65 74 73 74 72 28 | 77 69 6e 5f 6d 61 69 6e |_getstr(|win_main|
|00001ac0| 25 2c 35 29 0d 0b f4 31 | f2 70 6c 61 79 28 73 61 |%,5)...1|.play(sa|
|00001ad0| 6d 70 6c 65 25 2c 73 61 | 6d 70 6c 65 25 2b 73 61 |mple%,sa|mple%+sa|
|00001ae0| 6d 70 5f 73 69 7a 65 25 | 2d 31 2c 76 6f 6c 25 2c |mp_size%|-1,vol%,|
|00001af0| 72 61 74 65 29 0d 0b fe | 05 e1 0d 0c 08 04 0d 0c |rate)...|........|
|00001b00| 12 0d dd f2 70 6c 79 5f | 73 65 6c 0d 0c 1c 11 f2 |....ply_|sel.....|
|00001b10| 63 68 65 63 6b 5f 61 6c | 6c 28 30 29 0d 0c 26 31 |check_al|l(0)..&1|
|00001b20| ea 20 76 6f 6c 25 2c 72 | 61 74 65 3a 76 6f 6c 25 |. vol%,r|ate:vol%|
|00001b30| 3d bb a4 58 69 63 6f 6e | 5f 67 65 74 73 74 72 28 |=..Xicon|_getstr(|
|00001b40| 77 69 6e 5f 6d 61 69 6e | 25 2c 32 35 29 0d 0c 30 |win_main|%,25)..0|
|00001b50| 24 72 61 74 65 3d bb a4 | 58 69 63 6f 6e 5f 67 65 |$rate=..|Xicon_ge|
|00001b60| 74 73 74 72 28 77 69 6e | 5f 6d 61 69 6e 25 2c 35 |tstr(win|_main%,5|
|00001b70| 29 0d 0c 3a 38 f2 70 6c | 61 79 28 73 61 6d 70 6c |)..:8.pl|ay(sampl|
|00001b80| 65 25 2b 73 65 6c 5f 73 | 74 61 72 74 25 2c 73 61 |e%+sel_s|tart%,sa|
|00001b90| 6d 70 6c 65 25 2b 73 65 | 6c 5f 65 6e 64 25 2c 76 |mple%+se|l_end%,v|
|00001ba0| 6f 6c 25 2c 72 61 74 65 | 29 0d 0c 44 05 e1 0d 0c |ol%,rate|)..D....|
|00001bb0| 4e 04 0d 0c 58 1c dd f2 | 68 61 6e 64 6c 65 5f 73 |N...X...|handle_s|
|00001bc0| 61 76 65 73 28 69 63 25 | 2c 62 75 74 25 29 0d 0c |aves(ic%|,but%)..|
|00001bd0| 62 0a c8 8e 20 b9 20 ca | 0d 0c 6c 2e c9 20 69 63 |b... . .|..l.. ic|
|00001be0| 25 3d 30 20 80 20 28 62 | 75 74 25 3d 31 36 20 84 |%=0 . (b|ut%=16 .|
|00001bf0| 20 62 75 74 25 3d 36 34 | 29 20 3a 20 f2 64 72 61 | but%=64|) : .dra|
|00001c00| 67 5f 73 61 76 65 0d 0c | 76 1f c9 20 69 63 25 3d |g_save..|v.. ic%=|
|00001c10| 32 20 80 20 28 62 75 74 | 25 3c 3e 32 29 20 3a 20 |2 . (but|%<>2) : |
|00001c20| f2 73 61 76 65 0d 0c 80 | 05 cb 0d 0c 8a 05 e1 0d |.save...|........|
|00001c30| 0c 94 04 0d 0c 9e 0f dd | f2 64 72 61 67 5f 73 61 |........|.drag_sa|
|00001c40| 76 65 0d 0c a8 13 ea 20 | 78 30 25 2c 79 30 25 2c |ve..... |x0%,y0%,|
|00001c50| 73 68 66 74 25 0d 0c b2 | 1f 21 71 25 3d 77 69 6e |shft%...|.!q%=win|
|00001c60| 5f 73 61 76 65 25 3a c8 | 99 20 26 34 30 30 43 42 |_save%:.|. &400CB|
|00001c70| 2c 2c 71 25 0d 0c bc 16 | 78 30 25 3d 71 25 21 34 |,,q%....|x0%=q%!4|
|00001c80| 3a 79 30 25 3d 71 25 21 | 31 36 0d 0c c6 18 71 25 |:y0%=q%!|16....q%|
|00001c90| 21 34 3d 30 3a c8 99 20 | 26 34 30 30 43 45 2c 2c |!4=0:.. |&400CE,,|
|00001ca0| 71 25 0d 0c d0 24 71 25 | 21 34 3d 35 3a 71 25 21 |q%...$q%|!4=5:q%!|
|00001cb0| 38 2b 3d 78 30 25 3a 71 | 25 21 31 32 3d 79 30 25 |8+=x0%:q|%!12=y0%|
|00001cc0| 2b 71 25 21 31 32 0d 0c | da 1e 71 25 21 31 36 2b |+q%!12..|..q%!16+|
|00001cd0| 3d 78 30 25 3a 71 25 21 | 32 30 3d 79 30 25 2b 71 |=x0%:q%!|20=y0%+q|
|00001ce0| 25 21 32 30 0d 0c e4 18 | c8 99 20 26 33 35 2c 2d |%!20....|.. &35,-|
|00001cf0| 31 2c 31 31 20 b8 20 2c | 2c 78 30 25 0d 0c ee 28 |1,11 . ,|,x0%...(|
|00001d00| c8 99 20 26 33 35 2c 2d | 31 2c 34 20 b8 20 2c 2c |.. &35,-|1,4 . ,,|
|00001d10| 73 68 66 74 25 3a 78 30 | 25 3d 78 30 25 3c 3c 73 |shft%:x0|%=x0%<<s|
|00001d20| 68 66 74 25 0d 0c f8 18 | c8 99 20 26 33 35 2c 2d |hft%....|.. &35,-|
|00001d30| 31 2c 31 32 20 b8 20 2c | 2c 79 30 25 0d 0d 02 28 |1,12 . ,|,y0%...(|
|00001d40| c8 99 20 26 33 35 2c 2d | 31 2c 35 20 b8 20 2c 2c |.. &35,-|1,5 . ,,|
|00001d50| 73 68 66 74 25 3a 79 30 | 25 3d 79 30 25 3c 3c 73 |shft%:y0|%=y0%<<s|
|00001d60| 68 66 74 25 0d 0d 0c 27 | 71 25 21 32 34 3d 30 3a |hft%...'|q%!24=0:|
|00001d70| 71 25 21 32 38 3d 30 3a | 71 25 21 33 32 3d 78 30 |q%!28=0:|q%!32=x0|
|00001d80| 25 3a 71 25 21 33 36 3d | 79 30 25 0d 0d 16 11 c8 |%:q%!36=|y0%.....|
|00001d90| 99 20 26 34 30 30 44 30 | 2c 2c 71 25 0d 0d 20 05 |. &400D0|,,q%.. .|
|00001da0| e1 0d 0d 2a 04 0d 0d 34 | 1e dd f2 68 61 6e 64 6c |...*...4|...handl|
|00001db0| 65 5f 77 69 6e 6d 61 69 | 6e 28 69 63 25 2c 62 75 |e_winmai|n(ic%,bu|
|00001dc0| 74 25 29 0d 0d 3e 23 ea | 20 6d 75 6c 25 3a e7 20 |t%)..>#.| mul%:. |
|00001dd0| a6 28 2d 31 29 20 6d 75 | 6c 25 3d 31 36 20 8b 20 |.(-1) mu|l%=16 . |
|00001de0| 6d 75 6c 25 3d 31 0d 0d | 48 1d e7 20 62 75 74 25 |mul%=1..|H.. but%|
|00001df0| 3d 31 20 62 75 74 25 3d | 2d 31 20 8b 20 62 75 74 |=1 but%=|-1 . but|
|00001e00| 25 3d 31 0d 0d 52 0c c8 | 8e 20 69 63 25 20 ca 0d |%=1..R..|. ic% ..|
|00001e10| 0d 5c 1d c9 20 31 34 20 | 3a 20 f2 7a 6f 6f 6d 28 |.\.. 14 |: .zoom(|
|00001e20| 62 75 74 25 2a 6d 75 6c | 25 2c 30 29 0d 0d 66 1e |but%*mul|%,0)..f.|
|00001e30| c9 20 31 35 20 3a 20 f2 | 7a 6f 6f 6d 28 2d 62 75 |. 15 : .|zoom(-bu|
|00001e40| 74 25 2a 6d 75 6c 25 2c | 30 29 0d 0d 70 1d c9 20 |t%*mul%,|0)..p.. |
|00001e50| 31 33 20 3a 20 f2 7a 6f | 6f 6d 28 30 2c 62 75 74 |13 : .zo|om(0,but|
|00001e60| 25 2a 6d 75 6c 25 29 0d | 0d 7a 1e c9 20 31 36 20 |%*mul%).|.z.. 16 |
|00001e70| 3a 20 f2 7a 6f 6f 6d 28 | 30 2c 2d 62 75 74 25 2a |: .zoom(|0,-but%*|
|00001e80| 6d 75 6c 25 29 0d 0d 84 | 1a c9 20 32 37 20 3a 20 |mul%)...|.. 27 : |
|00001e90| f2 76 6f 6c 28 62 75 74 | 25 2a 6d 75 6c 25 29 0d |.vol(but|%*mul%).|
|00001ea0| 0d 8e 1b c9 20 32 36 20 | 3a 20 f2 76 6f 6c 28 2d |.... 26 |: .vol(-|
|00001eb0| 62 75 74 25 2a 6d 75 6c | 25 29 0d 0d 98 21 c9 20 |but%*mul|%)...!. |
|00001ec0| 39 20 20 3a 20 f2 70 69 | 74 63 68 5f 62 65 6e 64 |9 : .pi|tch_bend|
|00001ed0| 28 62 75 74 25 2a 6d 75 | 6c 25 29 0d 0d a2 22 c9 |(but%*mu|l%)...".|
|00001ee0| 20 32 39 20 3a 20 f2 70 | 69 74 63 68 5f 62 65 6e | 29 : .p|itch_ben|
|00001ef0| 64 28 2d 62 75 74 25 2a | 6d 75 6c 25 29 0d 0d ac |d(-but%*|mul%)...|
|00001f00| 1a c9 20 31 39 20 3a 20 | f2 63 72 72 28 62 75 74 |.. 19 : |.crr(but|
|00001f10| 25 2a 6d 75 6c 25 29 0d | 0d b6 1b c9 20 32 30 20 |%*mul%).|.... 20 |
|00001f20| 3a 20 f2 63 72 72 28 2d | 62 75 74 25 2a 6d 75 6c |: .crr(-|but%*mul|
|00001f30| 25 29 0d 0d c0 05 cb 0d | 0d ca 05 e1 0d 0d d4 04 |%)......|........|
|00001f40| 0d 0d de 0f dd f2 76 6f | 6c 28 69 6e 63 25 29 0d |......vo|l(inc%).|
|00001f50| 0d e8 2c ea 20 76 6f 6c | 25 3a 76 6f 6c 25 3d bb |..,. vol|%:vol%=.|
|00001f60| a4 58 69 63 6f 6e 5f 67 | 65 74 73 74 72 28 77 69 |.Xicon_g|etstr(wi|
|00001f70| 6e 5f 6d 61 69 6e 25 2c | 32 35 29 0d 0d f2 22 76 |n_main%,|25)..."v|
|00001f80| 6f 6c 25 2b 3d 69 6e 63 | 25 3a e7 20 76 6f 6c 25 |ol%+=inc|%:. vol%|
|00001f90| 3e 31 32 37 20 76 6f 6c | 25 3d 31 32 37 0d 0d fc |>127 vol|%=127...|
|00001fa0| 13 e7 20 76 6f 6c 25 3c | 30 20 76 6f 6c 25 3d 30 |.. vol%<|0 vol%=0|
|00001fb0| 0d 0e 06 25 f2 58 69 63 | 6f 6e 5f 73 65 74 73 74 |...%.Xic|on_setst|
|00001fc0| 72 28 77 69 6e 5f 6d 61 | 69 6e 25 2c 32 35 2c c3 |r(win_ma|in%,25,.|
|00001fd0| 76 6f 6c 25 29 0d 0e 10 | 0e 3f 56 76 6f 6c 3d 76 |vol%)...|.?Vvol=v|
|00001fe0| 6f 6c 25 0d 0e 1a 05 e1 | 0d 0e 24 04 0d 0e 2e 0d |ol%.....|..$.....|
|00001ff0| dd f2 73 65 74 5f 73 65 | 6c 0d 0e 38 22 ea 20 78 |..set_se|l..8". x|
|00002000| 25 2c 6f 78 25 2c 6f 6c | 64 73 73 25 2c 6f 6c 64 |%,ox%,ol|dss%,old|
|00002010| 73 65 25 3a 78 25 3d 71 | 25 21 30 0d 0e 42 1f 21 |se%:x%=q|%!0..B.!|
|00002020| 71 25 3d 77 69 6e 5f 70 | 61 6e 65 25 3a c8 99 20 |q%=win_p|ane%:.. |
|00002030| 26 34 30 30 43 42 2c 2c | 71 25 0d 0e 4c 2f 78 25 |&400CB,,|q%..L/x%|
|00002040| 3d 78 25 2d 71 25 21 34 | 2b 71 25 21 32 30 3a 78 |=x%-q%!4|+q%!20:x|
|00002050| 25 3d 78 25 2a 73 61 6d | 70 5f 73 69 7a 65 25 2f |%=x%*sam|p_size%/|
|00002060| 31 31 35 30 2f 7a 6f 6f | 6d 0d 0e 56 15 e7 20 73 |1150/zoo|m..V.. s|
|00002070| 65 6c 5f 73 74 61 72 74 | 25 3d 2d 31 20 8c 0d 0e |el_start|%=-1 ...|
|00002080| 60 1f 73 65 6c 5f 73 74 | 61 72 74 25 3d 78 25 3a |`.sel_st|art%=x%:|
|00002090| 73 65 6c 5f 65 6e 64 25 | 3d 78 25 2b 31 0d 0e 6a |sel_end%|=x%+1..j|
|000020a0| 49 e7 20 73 65 6c 5f 65 | 6e 64 25 3e 3d 73 61 6d |I. sel_e|nd%>=sam|
|000020b0| 70 5f 73 69 7a 65 25 20 | 73 65 6c 5f 73 74 61 72 |p_size% |sel_star|
|000020c0| 74 25 2d 3d 73 61 6d 70 | 5f 73 69 7a 65 25 2d 32 |t%-=samp|_size%-2|
|000020d0| 3a 73 65 6c 5f 65 6e 64 | 25 3d 73 61 6d 70 5f 73 |:sel_end|%=samp_s|
|000020e0| 69 7a 65 25 2d 31 0d 0e | 74 12 f2 6e 65 77 5f 73 |ize%-1..|t..new_s|
|000020f0| 65 6c 65 63 74 69 6f 6e | 0d 0e 7e 05 cc 0d 0e 88 |election|..~.....|
|00002100| 25 e7 20 78 25 3c 3e 73 | 65 6c 5f 73 74 61 72 74 |%. x%<>s|el_start|
|00002110| 25 20 80 20 78 25 3c 3e | 73 65 6c 5f 65 6e 64 25 |% . x%<>|sel_end%|
|00002120| 20 8c 0d 0e 92 5d e7 20 | 94 28 73 65 6c 5f 73 74 | ....]. |.(sel_st|
|00002130| 61 72 74 25 2d 78 25 29 | 3c 94 28 73 65 6c 5f 65 |art%-x%)|<.(sel_e|
|00002140| 6e 64 25 2d 78 25 29 20 | 6f 78 25 3d 73 65 6c 5f |nd%-x%) |ox%=sel_|
|00002150| 73 74 61 72 74 25 3a 73 | 65 6c 5f 73 74 61 72 74 |start%:s|el_start|
|00002160| 25 3d 78 25 20 8b 20 6f | 78 25 3d 73 65 6c 5f 65 |%=x% . o|x%=sel_e|
|00002170| 6e 64 25 3a 73 65 6c 5f | 65 6e 64 25 3d 78 25 0d |nd%:sel_|end%=x%.|
|00002180| 0e 9c 30 e7 20 73 65 6c | 5f 65 6e 64 25 3c 3d 73 |..0. sel|_end%<=s|
|00002190| 65 6c 5f 73 74 61 72 74 | 25 20 73 65 6c 5f 73 74 |el_start|% sel_st|
|000021a0| 61 72 74 25 3d 73 65 6c | 5f 65 6e 64 25 2d 31 0d |art%=sel|_end%-1.|
|000021b0| 0e a6 1f e7 20 73 65 6c | 5f 73 74 61 72 74 25 3c |.... sel|_start%<|
|000021c0| 30 20 73 65 6c 5f 73 74 | 61 72 74 25 3d 30 0d 0e |0 sel_st|art%=0..|
|000021d0| b0 30 e7 20 73 65 6c 5f | 65 6e 64 25 3c 3d 73 65 |.0. sel_|end%<=se|
|000021e0| 6c 5f 73 74 61 72 74 25 | 20 73 65 6c 5f 65 6e 64 |l_start%| sel_end|
|000021f0| 25 3d 73 65 6c 5f 73 74 | 61 72 74 25 2b 31 0d 0e |%=sel_st|art%+1..|
|00002200| ba 16 e7 20 78 25 3e 6f | 78 25 20 c8 94 20 78 25 |... x%>o|x% .. x%|
|00002210| 2c 6f 78 25 0d 0e c4 1e | 78 25 3d 78 25 2a 31 31 |,ox%....|x%=x%*11|
|00002220| 35 30 2a 7a 6f 6f 6d 2f | 73 61 6d 70 5f 73 69 7a |50*zoom/|samp_siz|
|00002230| 65 25 0d 0e ce 20 6f 78 | 25 3d 6f 78 25 2a 31 31 |e%... ox|%=ox%*11|
|00002240| 35 30 2a 7a 6f 6f 6d 2f | 73 61 6d 70 5f 73 69 7a |50*zoom/|samp_siz|
|00002250| 65 25 0d 0e d8 29 c8 99 | 20 26 34 30 30 44 31 2c |e%...)..| &400D1,|
|00002260| 77 69 6e 5f 70 61 6e 65 | 25 2c 78 25 2d 38 2c 2d |win_pane|%,x%-8,-|
|00002270| 32 35 36 2c 6f 78 25 2b | 38 2c 30 0d 0e e2 12 f2 |256,ox%+|8,0.....|
|00002280| 6e 65 77 5f 73 65 6c 65 | 63 74 69 6f 6e 0d 0e ec |new_sele|ction...|
|00002290| 05 cd 0d 0e f6 05 cd 0d | 0f 00 05 e1 0d 0f 0a 04 |........|........|
|000022a0| 0d 0f 14 18 dd f2 73 63 | 72 6f 6c 6c 5f 70 61 6e |......sc|roll_pan|
|000022b0| 65 28 78 25 2c 71 25 29 | 0d 0f 1e 1f 21 71 25 3d |e(x%,q%)|....!q%=|
|000022c0| 77 69 6e 5f 70 61 6e 65 | 25 3a c8 99 20 26 34 30 |win_pane|%:.. &40|
|000022d0| 30 43 42 2c 2c 71 25 0d | 0f 28 3c e7 20 78 25 3e |0CB,,q%.|.(<. x%>|
|000022e0| 71 25 21 31 32 2d 31 36 | 20 f2 73 63 72 6f 6c 6c |q%!12-16| .scroll|
|000022f0| 78 28 77 69 6e 5f 70 61 | 6e 65 25 2c 28 31 36 2d |x(win_pa|ne%,(16-|
|00002300| 71 25 21 31 32 2b 78 25 | 29 2a 34 2c 71 25 2b 35 |q%!12+x%|)*4,q%+5|
|00002310| 31 32 29 0d 0f 32 3a e7 | 20 78 25 3c 71 25 21 34 |12)..2:.| x%<q%!4|
|00002320| 2b 31 36 20 f2 73 63 72 | 6f 6c 6c 78 28 77 69 6e |+16 .scr|ollx(win|
|00002330| 5f 70 61 6e 65 25 2c 28 | 78 25 2d 71 25 21 34 2d |_pane%,(|x%-q%!4-|
|00002340| 31 36 29 2a 34 2c 71 25 | 2b 35 31 32 29 0d 0f 3c |16)*4,q%|+512)..<|
|00002350| 05 e1 0d 0f 46 04 0d 0f | 50 1b dd f2 73 63 72 6f |....F...|P...scro|
|00002360| 6c 6c 78 28 77 69 6e 25 | 2c 6f 66 66 25 2c 71 25 |llx(win%|,off%,q%|
|00002370| 29 0d 0f 5a 1a 21 71 25 | 3d 77 69 6e 25 3a c8 99 |)..Z.!q%|=win%:..|
|00002380| 20 26 34 30 30 43 42 2c | 2c 71 25 0d 0f 64 14 71 | &400CB,|,q%..d.q|
|00002390| 25 21 32 30 3d 71 25 21 | 32 30 2b 6f 66 66 25 0d |%!20=q%!|20+off%.|
|000023a0| 0f 6e 11 c8 99 20 26 34 | 30 30 43 35 2c 2c 71 25 |.n... &4|00C5,,q%|
|000023b0| 0d 0f 78 05 e1 0d 0f 82 | 04 0d 0f 8c 08 dd f2 73 |..x.....|.......s|
|000023c0| 73 0d 0f 96 13 ea 20 61 | 25 2c 62 25 2c 78 30 25 |s..... a|%,b%,x0%|
|000023d0| 2c 79 30 25 0d 0f a0 25 | 61 25 3d bb 28 a4 58 69 |,y0%...%|a%=.(.Xi|
|000023e0| 63 6f 6e 5f 67 65 74 73 | 74 72 28 77 69 6e 5f 6d |con_gets|tr(win_m|
|000023f0| 61 69 6e 25 2c 32 32 29 | 29 0d 0f aa 25 62 25 3d |ain%,22)|)...%b%=|
|00002400| bb 28 a4 58 69 63 6f 6e | 5f 67 65 74 73 74 72 28 |.(.Xicon|_getstr(|
|00002410| 77 69 6e 5f 6d 61 69 6e | 25 2c 32 33 29 29 0d 0f |win_main|%,23))..|
|00002420| b4 0d e7 20 61 25 3e 62 | 25 20 8c 0d 0f be 0c c8 |... a%>b|% ......|
|00002430| 94 20 61 25 2c 62 25 0d | 0f c8 23 f2 58 69 63 6f |. a%,b%.|..#.Xico|
|00002440| 6e 5f 70 75 74 73 74 72 | 28 77 69 6e 5f 6d 61 69 |n_putstr|(win_mai|
|00002450| 6e 25 2c 32 32 2c c3 61 | 25 29 0d 0f d2 23 f2 58 |n%,22,.a|%)...#.X|
|00002460| 69 63 6f 6e 5f 70 75 74 | 73 74 72 28 77 69 6e 5f |icon_put|str(win_|
|00002470| 6d 61 69 6e 25 2c 32 33 | 2c c3 62 25 29 0d 0f dc |main%,23|,.b%)...|
|00002480| 05 cd 0d 0f e6 27 78 30 | 25 3d 73 65 6c 5f 73 74 |.....'x0|%=sel_st|
|00002490| 61 72 74 25 2a 31 31 35 | 30 2a 7a 6f 6f 6d 2f 73 |art%*115|0*zoom/s|
|000024a0| 61 6d 70 5f 73 69 7a 65 | 25 0d 0f f0 25 78 31 25 |amp_size|%...%x1%|
|000024b0| 3d 73 65 6c 5f 65 6e 64 | 25 2a 31 31 35 30 2a 7a |=sel_end|%*1150*z|
|000024c0| 6f 6f 6d 2f 73 61 6d 70 | 5f 73 69 7a 65 25 0d 0f |oom/samp|_size%..|
|000024d0| fa 2a c8 99 20 26 34 30 | 30 44 31 2c 77 69 6e 5f |.*.. &40|0D1,win_|
|000024e0| 70 61 6e 65 25 2c 78 30 | 25 2d 38 2c 2d 32 35 36 |pane%,x0|%-8,-256|
|000024f0| 2c 78 31 25 2b 38 2c 30 | 0d 10 04 11 73 65 6c 5f |,x1%+8,0|....sel_|
|00002500| 73 74 61 72 74 25 3d 61 | 25 0d 10 0e 0f 73 65 6c |start%=a|%....sel|
|00002510| 5f 65 6e 64 25 3d 62 25 | 0d 10 18 15 e7 20 73 65 |_end%=b%|..... se|
|00002520| 6c 5f 73 74 61 72 74 25 | 3e 3d 30 20 8c 0d 10 22 |l_start%|>=0 ..."|
|00002530| 27 78 30 25 3d 73 65 6c | 5f 73 74 61 72 74 25 2a |'x0%=sel|_start%*|
|00002540| 31 31 35 30 2a 7a 6f 6f | 6d 2f 73 61 6d 70 5f 73 |1150*zoo|m/samp_s|
|00002550| 69 7a 65 25 0d 10 2c 25 | 78 31 25 3d 73 65 6c 5f |ize%..,%|x1%=sel_|
|00002560| 65 6e 64 25 2a 31 31 35 | 30 2a 7a 6f 6f 6d 2f 73 |end%*115|0*zoom/s|
|00002570| 61 6d 70 5f 73 69 7a 65 | 25 0d 10 36 2a c8 99 20 |amp_size|%..6*.. |
|00002580| 26 34 30 30 44 31 2c 77 | 69 6e 5f 70 61 6e 65 25 |&400D1,w|in_pane%|
|00002590| 2c 78 30 25 2d 38 2c 2d | 32 35 36 2c 78 31 25 2b |,x0%-8,-|256,x1%+|
|000025a0| 38 2c 30 0d 10 40 05 cc | 0d 10 4a 11 73 65 6c 5f |8,0..@..|..J.sel_|
|000025b0| 73 74 61 72 74 25 3d 2d | 31 0d 10 54 0f 73 65 6c |start%=-|1..T.sel|
|000025c0| 5f 65 6e 64 25 3d 2d 31 | 0d 10 5e 05 cd 0d 10 68 |_end%=-1|..^....h|
|000025d0| 05 e1 0d 10 72 04 0d 10 | 7c 0d dd f2 73 65 74 5f |....r...||...set_|
|000025e0| 63 61 72 0d 10 86 17 ea | 20 78 25 2c 70 6f 73 25 |car.....| x%,pos%|
|000025f0| 3a 70 6f 73 25 3d 71 25 | 21 30 0d 10 90 22 78 25 |:pos%=q%|!0..."x%|
|00002600| 3d 63 61 72 65 74 25 2a | 31 31 35 30 2a 7a 6f 6f |=caret%*|1150*zoo|
|00002610| 6d 2f 73 61 6d 70 5f 73 | 69 7a 65 25 0d 10 9a 28 |m/samp_s|ize%...(|
|00002620| c8 99 20 26 34 30 30 44 | 31 2c 77 69 6e 5f 70 61 |.. &400D|1,win_pa|
|00002630| 6e 65 25 2c 78 25 2d 38 | 2c 2d 32 35 36 2c 78 25 |ne%,x%-8|,-256,x%|
|00002640| 2b 38 2c 30 0d 10 a4 0d | 78 25 3d 63 61 72 65 74 |+8,0....|x%=caret|
|00002650| 25 0d 10 ae 1f 21 71 25 | 3d 77 69 6e 5f 70 61 6e |%....!q%|=win_pan|
|00002660| 65 25 3a c8 99 20 26 34 | 30 30 43 42 2c 2c 71 25 |e%:.. &4|00CB,,q%|
|00002670| 0d 10 b8 31 63 61 72 65 | 74 25 3d 28 70 6f 73 25 |...1care|t%=(pos%|
|00002680| 2d 71 25 21 34 2b 71 25 | 21 32 30 29 2a 73 61 6d |-q%!4+q%|!20)*sam|
|00002690| 70 5f 73 69 7a 65 25 2f | 31 31 35 30 2f 7a 6f 6f |p_size%/|1150/zoo|
|000026a0| 6d 0d 10 c2 17 e7 20 63 | 61 72 65 74 25 3c 30 20 |m..... c|aret%<0 |
|000026b0| 63 61 72 65 74 25 3d 30 | 0d 10 cc 22 78 25 3d 63 |caret%=0|..."x%=c|
|000026c0| 61 72 65 74 25 2a 31 31 | 35 30 2a 7a 6f 6f 6d 2f |aret%*11|50*zoom/|
|000026d0| 73 61 6d 70 5f 73 69 7a | 65 25 0d 10 d6 28 c8 99 |samp_siz|e%...(..|
|000026e0| 20 26 34 30 30 44 31 2c | 77 69 6e 5f 70 61 6e 65 | &400D1,|win_pane|
|000026f0| 25 2c 78 25 2d 38 2c 2d | 32 35 36 2c 78 25 2b 38 |%,x%-8,-|256,x%+8|
|00002700| 2c 30 0d 10 e0 27 f2 58 | 69 63 6f 6e 5f 73 65 74 |,0...'.X|icon_set|
|00002710| 73 74 72 28 77 69 6e 5f | 6d 61 69 6e 25 2c 31 38 |str(win_|main%,18|
|00002720| 2c c3 63 61 72 65 74 25 | 29 0d 10 ea 37 e7 20 74 |,.caret%|)...7. t|
|00002730| 72 61 63 6b 69 6e 67 25 | 20 80 20 21 56 63 6f 75 |racking%| . !Vcou|
|00002740| 6e 74 65 72 3e 30 20 80 | 20 63 61 72 65 74 25 3c |nter>0 .| caret%<|
|00002750| 21 56 73 65 6e 64 2d 73 | 61 6d 70 6c 65 25 20 8c |!Vsend-s|ample% .|
|00002760| 0d 10 f4 1c 21 56 63 6f | 75 6e 74 65 72 3d 63 61 |....!Vco|unter=ca|
|00002770| 72 65 74 25 2b 73 61 6d | 70 6c 65 25 0d 10 fe 05 |ret%+sam|ple%....|
|00002780| cd 0d 11 08 05 e1 0d 11 | 12 04 0d 11 1c 0b dd f2 |........|........|
|00002790| 74 72 61 63 6b 0d 11 26 | 08 ea 20 78 25 0d 11 30 |track..&|.. x%..0|
|000027a0| 22 78 25 3d 63 61 72 65 | 74 25 2a 31 31 35 30 2a |"x%=care|t%*1150*|
|000027b0| 7a 6f 6f 6d 2f 73 61 6d | 70 5f 73 69 7a 65 25 0d |zoom/sam|p_size%.|
|000027c0| 11 3a 28 c8 99 20 26 34 | 30 30 44 31 2c 77 69 6e |.:(.. &4|00D1,win|
|000027d0| 5f 70 61 6e 65 25 2c 78 | 25 2d 32 2c 2d 32 35 36 |_pane%,x|%-2,-256|
|000027e0| 2c 78 25 2b 32 2c 30 0d | 11 44 1c 63 61 72 65 74 |,x%+2,0.|.D.caret|
|000027f0| 25 3d 21 56 63 6f 75 6e | 74 65 72 2d 73 61 6d 70 |%=!Vcoun|ter-samp|
|00002800| 6c 65 25 0d 11 4e 22 78 | 25 3d 63 61 72 65 74 25 |le%..N"x|%=caret%|
|00002810| 2a 31 31 35 30 2a 7a 6f | 6f 6d 2f 73 61 6d 70 5f |*1150*zo|om/samp_|
|00002820| 73 69 7a 65 25 0d 11 58 | 28 c8 99 20 26 34 30 30 |size%..X|(.. &400|
|00002830| 44 31 2c 77 69 6e 5f 70 | 61 6e 65 25 2c 78 25 2d |D1,win_p|ane%,x%-|
|00002840| 32 2c 2d 32 35 36 2c 78 | 25 2b 32 2c 30 0d 11 62 |2,-256,x|%+2,0..b|
|00002850| 27 f2 58 69 63 6f 6e 5f | 73 65 74 73 74 72 28 77 |'.Xicon_|setstr(w|
|00002860| 69 6e 5f 6d 61 69 6e 25 | 2c 31 38 2c c3 63 61 72 |in_main%|,18,.car|
|00002870| 65 74 25 29 0d 11 6c 28 | e7 20 63 61 72 65 74 25 |et%)..l(|. caret%|
|00002880| 3e 3d 21 56 73 65 6e 64 | 2d 73 61 6d 70 6c 65 25 |>=!Vsend|-sample%|
|00002890| 20 21 56 63 6f 75 6e 74 | 65 72 3d 30 0d 11 76 05 | !Vcount|er=0..v.|
|000028a0| e1 0d 11 80 04 0d 11 8a | 0f dd f2 63 72 72 28 64 |........|...crr(d|
|000028b0| 69 72 25 29 0d 11 94 10 | e7 20 63 61 72 65 74 25 |ir%)....|. caret%|
|000028c0| 3c 30 20 e1 0d 11 9e 08 | ea 20 78 25 0d 11 a8 22 |<0 .....|. x%..."|
|000028d0| 78 25 3d 63 61 72 65 74 | 25 2a 31 31 35 30 2a 7a |x%=caret|%*1150*z|
|000028e0| 6f 6f 6d 2f 73 61 6d 70 | 5f 73 69 7a 65 25 0d 11 |oom/samp|_size%..|
|000028f0| b2 28 c8 99 20 26 34 30 | 30 44 31 2c 77 69 6e 5f |.(.. &40|0D1,win_|
|00002900| 70 61 6e 65 25 2c 78 25 | 2d 38 2c 2d 32 35 36 2c |pane%,x%|-8,-256,|
|00002910| 78 25 2b 38 2c 30 0d 11 | bc 10 63 61 72 65 74 25 |x%+8,0..|..caret%|
|00002920| 2b 3d 64 69 72 25 0d 11 | c6 17 e7 20 63 61 72 65 |+=dir%..|... care|
|00002930| 74 25 3c 30 20 63 61 72 | 65 74 25 3d 30 0d 11 d0 |t%<0 car|et%=0...|
|00002940| 2c e7 20 63 61 72 65 74 | 25 3e 3d 73 61 6d 70 5f |,. caret|%>=samp_|
|00002950| 73 69 7a 65 25 20 63 61 | 72 65 74 25 3d 73 61 6d |size% ca|ret%=sam|
|00002960| 70 5f 73 69 7a 65 25 2d | 31 0d 11 da 22 78 25 3d |p_size%-|1..."x%=|
|00002970| 63 61 72 65 74 25 2a 31 | 31 35 30 2a 7a 6f 6f 6d |caret%*1|150*zoom|
|00002980| 2f 73 61 6d 70 5f 73 69 | 7a 65 25 0d 11 e4 28 c8 |/samp_si|ze%...(.|
|00002990| 99 20 26 34 30 30 44 31 | 2c 77 69 6e 5f 70 61 6e |. &400D1|,win_pan|
|000029a0| 65 25 2c 78 25 2d 38 2c | 2d 32 35 36 2c 78 25 2b |e%,x%-8,|-256,x%+|
|000029b0| 38 2c 30 0d 11 ee 27 f2 | 58 69 63 6f 6e 5f 73 65 |8,0...'.|Xicon_se|
|000029c0| 74 73 74 72 28 77 69 6e | 5f 6d 61 69 6e 25 2c 31 |tstr(win|_main%,1|
|000029d0| 38 2c c3 63 61 72 65 74 | 25 29 0d 11 f8 37 e7 20 |8,.caret|%)...7. |
|000029e0| 74 72 61 63 6b 69 6e 67 | 25 20 80 20 21 56 63 6f |tracking|% . !Vco|
|000029f0| 75 6e 74 65 72 3e 30 20 | 80 20 63 61 72 65 74 25 |unter>0 |. caret%|
|00002a00| 3c 21 56 73 65 6e 64 2d | 73 61 6d 70 6c 65 25 20 |<!Vsend-|sample% |
|00002a10| 8c 0d 12 02 1c 21 56 63 | 6f 75 6e 74 65 72 3d 63 |.....!Vc|ounter=c|
|00002a20| 61 72 65 74 25 2b 73 61 | 6d 70 6c 65 25 0d 12 0c |aret%+sa|mple%...|
|00002a30| 05 cd 0d 12 16 05 e1 0d | 12 20 04 0d 12 2a 08 dd |........|. ...*..|
|00002a40| f2 73 63 0d 12 34 0b ea | 20 61 25 2c 78 25 0d 12 |.sc..4..| a%,x%..|
|00002a50| 3e 25 61 25 3d bb 28 a4 | 58 69 63 6f 6e 5f 67 65 |>%a%=.(.|Xicon_ge|
|00002a60| 74 73 74 72 28 77 69 6e | 5f 6d 61 69 6e 25 2c 31 |tstr(win|_main%,1|
|00002a70| 38 29 29 0d 12 48 22 78 | 25 3d 63 61 72 65 74 25 |8))..H"x|%=caret%|
|00002a80| 2a 31 31 35 30 2a 7a 6f | 6f 6d 2f 73 61 6d 70 5f |*1150*zo|om/samp_|
|00002a90| 73 69 7a 65 25 0d 12 52 | 28 c8 99 20 26 34 30 30 |size%..R|(.. &400|
|00002aa0| 44 31 2c 77 69 6e 5f 70 | 61 6e 65 25 2c 78 25 2d |D1,win_p|ane%,x%-|
|00002ab0| 38 2c 2d 32 35 36 2c 78 | 25 2b 38 2c 30 0d 12 5c |8,-256,x|%+8,0..\|
|00002ac0| 0d 63 61 72 65 74 25 3d | 61 25 0d 12 66 18 e7 20 |.caret%=|a%..f.. |
|00002ad0| 63 61 72 65 74 25 3c 30 | 20 63 61 72 65 74 25 3d |caret%<0| caret%=|
|00002ae0| 2d 31 0d 12 70 11 e7 20 | 63 61 72 65 74 25 3e 3d |-1..p.. |caret%>=|
|00002af0| 30 20 8c 0d 12 7a 22 78 | 25 3d 63 61 72 65 74 25 |0 ...z"x|%=caret%|
|00002b00| 2a 31 31 35 30 2a 7a 6f | 6f 6d 2f 73 61 6d 70 5f |*1150*zo|om/samp_|
|00002b10| 73 69 7a 65 25 0d 12 84 | 28 c8 99 20 26 34 30 30 |size%...|(.. &400|
|00002b20| 44 31 2c 77 69 6e 5f 70 | 61 6e 65 25 2c 78 25 2d |D1,win_p|ane%,x%-|
|00002b30| 38 2c 2d 32 35 36 2c 78 | 25 2b 38 2c 30 0d 12 8e |8,-256,x|%+8,0...|
|00002b40| 05 cd 0d 12 98 05 e1 0d | 12 a2 04 0d 12 ac 0a dd |........|........|
|00002b50| f2 6d 65 73 73 0d 12 b6 | 18 e7 20 71 25 21 31 36 |.mess...|.. q%!16|
|00002b60| 3d 30 20 71 75 69 74 25 | 3d 2d 31 3a e1 0d 12 c0 |=0 quit%|=-1:....|
|00002b70| 18 e7 20 71 25 21 31 36 | 3d 31 20 f2 64 61 74 61 |.. q%!16|=1 .data|
|00002b80| 5f 73 61 76 65 0d 12 ca | 30 e7 20 71 25 21 31 36 |_save...|0. q%!16|
|00002b90| 3d 26 34 30 30 43 30 20 | f2 6d 65 6e 75 5f 77 61 |=&400C0 |.menu_wa|
|00002ba0| 72 6e 28 71 25 21 33 32 | 2c 71 25 21 33 36 2c 71 |rn(q%!32|,q%!36,q|
|00002bb0| 25 21 34 30 29 0d 12 d4 | 3e e7 20 71 25 21 31 36 |%!40)...|>. q%!16|
|00002bc0| 3d 33 20 8c 20 e7 20 a4 | 67 6f 6f 64 5f 6c 6f 61 |=3 . . .|good_loa|
|00002bd0| 64 28 71 25 21 34 30 2c | a4 7a 28 71 25 2b 34 34 |d(q%!40,|.z(q%+44|
|00002be0| 29 2c 71 25 21 33 36 2c | 31 29 20 f2 6c 6f 61 64 |),q%!36,|1) .load|
|00002bf0| 61 63 6b 0d 12 de 1b e7 | 20 71 25 21 31 36 3d 32 |ack.....| q%!16=2|
|00002c00| 20 f2 64 61 74 61 73 61 | 76 65 5f 61 63 6b 0d 12 | .datasa|ve_ack..|
|00002c10| e8 0f e7 20 71 25 21 31 | 36 3d 35 20 8c 0d 12 f2 |... q%!1|6=5 ....|
|00002c20| 2b 20 6f 6b 25 3d 30 3a | e7 20 71 25 21 34 30 3e |+ ok%=0:|. q%!40>|
|00002c30| 26 36 33 30 20 80 20 71 | 25 21 34 30 3c 26 36 33 |&630 . q|%!40<&63|
|00002c40| 35 20 6f 6b 25 3d 2d 31 | 0d 12 fc 18 20 e7 20 71 |5 ok%=-1|.... . q|
|00002c50| 25 21 34 30 3d 26 44 33 | 43 20 6f 6b 25 3d 2d 31 |%!40=&D3|C ok%=-1|
|00002c60| 0d 13 06 0c 20 e7 20 6f | 6b 25 20 8c 0d 13 10 0e |.... . o|k% .....|
|00002c70| 20 20 f2 6c 6f 61 64 61 | 63 6b 0d 13 1a 2c 20 20 | .loada|ck..., |
|00002c80| 61 25 3d a4 67 6f 6f 64 | 5f 6c 6f 61 64 28 71 25 |a%=.good|_load(q%|
|00002c90| 21 34 30 2c a4 7a 28 71 | 25 2b 34 34 29 2c 71 25 |!40,.z(q|%+44),q%|
|00002ca0| 21 33 36 2c 30 29 0d 13 | 24 06 20 cd 0d 13 2e 05 |!36,0)..|$. .....|
|00002cb0| cd 0d 13 38 05 e1 0d 13 | 42 04 0d 13 4c 0f dd f2 |...8....|B...L...|
|00002cc0| 64 61 74 61 5f 73 61 76 | 65 0d 13 56 27 71 25 21 |data_sav|e..V'q%!|
|00002cd0| 33 36 3d 2d 31 3a 24 28 | 71 25 2b 34 34 29 3d 22 |36=-1:$(|q%+44)="|
|00002ce0| 3c 57 69 6d 70 24 53 63 | 72 61 70 3e 22 2b bd 30 |<Wimp$Sc|rap>"+.0|
|00002cf0| 0d 13 60 16 71 25 21 31 | 32 3d 71 25 21 38 3a 71 |..`.q%!1|2=q%!8:q|
|00002d00| 25 21 31 36 3d 32 0d 13 | 6a 18 c8 99 20 26 34 30 |%!16=2..|j... &40|
|00002d10| 30 45 37 2c 31 37 2c 71 | 25 2c 71 25 21 34 0d 13 |0E7,17,q|%,q%!4..|
|00002d20| 74 0f 73 61 76 65 72 65 | 66 25 3d 2d 31 0d 13 7e |t.savere|f%=-1..~|
|00002d30| 06 ef 37 0d 13 88 05 e1 | 0d 13 92 04 0d 13 9c 0d |..7.....|........|
|00002d40| dd f2 6c 6f 61 64 61 63 | 6b 0d 13 a6 1f 71 25 21 |..loadac|k....q%!|
|00002d50| 31 32 3d 71 25 21 38 3a | 71 25 21 31 36 3d 34 3a |12=q%!8:|q%!16=4:|
|00002d60| 71 25 21 33 36 3d 2d 31 | 0d 13 b0 18 c8 99 20 26 |q%!36=-1|...... &|
|00002d70| 34 30 30 45 37 2c 31 37 | 2c 71 25 2c 71 25 21 34 |400E7,17|,q%,q%!4|
|00002d80| 0d 13 ba 05 e1 0d 13 c4 | 04 0d 13 ce 0e dd f2 6c |........|.......l|
|00002d90| 6f 61 64 28 6e 24 29 0d | 13 d8 17 c8 99 20 38 2c |oad(n$).|..... 8,|
|00002da0| 31 37 2c 6e 24 20 b8 20 | 2c 2c 74 79 70 25 0d 13 |17,n$ . |,,typ%..|
|00002db0| e2 19 74 79 70 25 3d 28 | 74 79 70 25 80 26 46 46 |..typ%=(|typ%.&FF|
|00002dc0| 46 30 30 29 3e 3e 38 0d | 13 ec 1c ff 22 53 65 74 |F00)>>8.|...."Set|
|00002dd0| 20 45 66 66 65 78 24 54 | 79 70 65 20 22 2b c3 74 | Effex$T|ype "+.t|
|00002de0| 79 70 25 0d 13 f6 21 74 | 79 70 25 3d a4 67 6f 6f |yp%...!t|yp%=.goo|
|00002df0| 64 5f 6c 6f 61 64 28 74 | 79 70 25 2c 6e 24 2c 2d |d_load(t|yp%,n$,-|
|00002e00| 31 2c 31 29 0d 14 00 05 | e1 0d 14 0a 04 0d 14 14 |1,1)....|........|
|00002e10| 28 dd a4 67 6f 6f 64 5f | 6c 6f 61 64 28 74 79 70 |(..good_|load(typ|
|00002e20| 65 25 2c 6e 61 6d 65 24 | 2c 73 69 7a 65 25 2c 64 |e%,name$|,size%,d|
|00002e30| 72 61 67 25 29 0d 14 1e | 10 ea 20 6f 6b 25 3a 6f |rag%)...|.. ok%:o|
|00002e40| 6b 25 3d 2d 31 0d 14 28 | 25 e7 20 73 61 6d 70 6c |k%=-1..(|%. sampl|
|00002e50| 65 5f 74 79 70 65 25 3e | 3d 30 20 6f 6b 25 3d a4 |e_type%>|=0 ok%=.|
|00002e60| 63 68 65 63 6b 5f 6c 6f | 61 64 0d 14 32 0e e7 20 |check_lo|ad..2.. |
|00002e70| 6f 6b 25 3d 2d 31 20 8c | 0d 14 3c 0e c8 8e 20 74 |ok%=-1 .|..<... t|
|00002e80| 79 70 65 25 20 ca 0d 14 | 46 23 c9 20 26 36 33 31 |ype% ...|F#. &631|
|00002e90| 20 3a 20 6f 6b 25 3d a4 | 6c 6f 61 64 5f 72 61 77 | : ok%=.|load_raw|
|00002ea0| 28 6e 61 6d 65 24 2c 30 | 29 0d 14 50 23 c9 20 26 |(name$,0|)..P#. &|
|00002eb0| 36 33 32 20 3a 20 6f 6b | 25 3d a4 6c 6f 61 64 5f |632 : ok|%=.load_|
|00002ec0| 72 61 77 28 6e 61 6d 65 | 24 2c 31 29 0d 14 5a 23 |raw(name|$,1)..Z#|
|00002ed0| c9 20 26 36 33 33 20 3a | 20 6f 6b 25 3d a4 6c 6f |. &633 :| ok%=.lo|
|00002ee0| 61 64 5f 72 61 77 28 6e | 61 6d 65 24 2c 32 29 0d |ad_raw(n|ame$,2).|
|00002ef0| 14 64 21 c9 20 26 36 33 | 34 20 3a 20 6f 6b 25 3d |.d!. &63|4 : ok%=|
|00002f00| a4 6c 6f 61 64 5f 65 66 | 66 28 6e 61 6d 65 24 29 |.load_ef|f(name$)|
|00002f10| 0d 14 6e 21 c9 20 26 44 | 33 43 20 3a 20 6f 6b 25 |..n!. &D|3C : ok%|
|00002f20| 3d a4 6c 6f 61 64 5f 61 | 72 6d 28 6e 61 6d 65 24 |=.load_a|rm(name$|
|00002f30| 29 0d 14 78 26 7f 20 3a | 20 e7 20 64 72 61 67 25 |)..x&. :| . drag%|
|00002f40| 20 6f 6b 25 3d a4 6c 6f | 61 64 5f 72 61 77 28 6e | ok%=.lo|ad_raw(n|
|00002f50| 61 6d 65 24 2c 32 29 0d | 14 82 05 cb 0d 14 8c 05 |ame$,2).|........|
|00002f60| cd 0d 14 96 0b e7 20 6f | 6b 25 20 8c 0d 14 a0 15 |...... o|k% .....|
|00002f70| 20 71 25 21 35 31 32 3d | 77 69 6e 5f 70 61 6e 65 | q%!512=|win_pane|
|00002f80| 25 0d 14 aa 16 20 c8 99 | 20 26 34 30 30 43 36 2c |%.... ..| &400C6,|
|00002f90| 2c 71 25 2b 35 31 32 0d | 14 b4 1d 20 f2 66 72 65 |,q%+512.|... .fre|
|00002fa0| 73 68 28 77 69 6e 5f 6d | 61 69 6e 25 2c 71 25 2b |sh(win_m|ain%,q%+|
|00002fb0| 35 31 32 29 0d 14 be 1e | 20 e7 20 6e 61 6d 65 24 |512)....| . name$|
|00002fc0| 3c 3e 22 3c 57 69 6d 70 | 24 53 63 72 61 70 3e 22 |<>"<Wimp|$Scrap>"|
|00002fd0| 20 8c 0d 14 c8 16 20 20 | 73 6e 61 6d 65 5f 6c 6f | ..... |sname_lo|
|00002fe0| 67 24 3d 6e 61 6d 65 24 | 0d 14 d2 16 20 20 73 6e |g$=name$|.... sn|
|00002ff0| 61 6d 65 5f 75 6e 73 24 | 3d 6e 61 6d 65 24 0d 14 |ame_uns$|=name$..|
|00003000| dc 16 20 20 73 6e 61 6d | 65 5f 73 67 6e 24 3d 6e |.. snam|e_sgn$=n|
|00003010| 61 6d 65 24 0d 14 e6 16 | 20 20 73 6e 61 6d 65 5f |ame$....| sname_|
|00003020| 65 66 66 24 3d 6e 61 6d | 65 24 0d 14 f0 16 20 20 |eff$=nam|e$.... |
|00003030| 73 6e 61 6d 65 5f 61 72 | 6d 24 3d 6e 61 6d 65 24 |sname_ar|m$=name$|
|00003040| 0d 14 fa 06 20 cc 0d 15 | 04 1c 20 20 ff 22 52 65 |.... ...|.. ."Re|
|00003050| 6d 6f 76 65 20 3c 57 69 | 6d 70 24 53 63 72 61 70 |move <Wi|mp$Scrap|
|00003060| 3e 22 0d 15 0e 06 20 cd | 0d 15 18 05 cd 0d 15 22 |>".... .|......."|
|00003070| 08 3d 6f 6b 25 0d 15 2c | 04 0d 15 36 10 dd a4 63 |.=ok%..,|...6...c|
|00003080| 68 65 63 6b 5f 6c 6f 61 | 64 0d 15 40 19 ea 20 67 |heck_loa|d..@.. g|
|00003090| 6f 25 2c 61 63 74 25 2c | 77 69 6e 25 2c 69 63 6f |o%,act%,|win%,ico|
|000030a0| 6e 25 0d 15 4a 1c f2 66 | 72 65 73 68 28 77 69 6e |n%..J..f|resh(win|
|000030b0| 5f 6c 6f 61 64 25 2c 71 | 25 2b 35 31 32 29 0d 15 |_load%,q|%+512)..|
|000030c0| 54 38 f4 20 71 25 21 35 | 31 32 3d 77 69 6e 5f 6c |T8. q%!5|12=win_l|
|000030d0| 6f 61 64 25 3a 53 59 53 | 20 22 57 69 6d 70 5f 47 |oad%:SYS| "Wimp_G|
|000030e0| 65 74 57 69 6e 64 6f 77 | 53 74 61 74 65 22 2c 2c |etWindow|State",,|
|000030f0| 71 25 2b 35 31 32 0d 15 | 5e 3f f4 20 4d 4f 55 53 |q%+512..|^?. MOUS|
|00003100| 45 20 52 45 43 54 41 4e | 47 4c 45 20 71 25 21 35 |E RECTAN|GLE q%!5|
|00003110| 31 36 2c 71 25 21 35 32 | 30 2c 71 25 21 35 32 34 |16,q%!52|0,q%!524|
|00003120| 2d 71 25 21 35 31 36 2c | 71 25 21 35 32 38 2d 71 |-q%!516,|q%!528-q|
|00003130| 25 21 35 32 30 0d 15 68 | 05 f5 0d 15 72 0c f2 64 |%!520..h|....r..d|
|00003140| 69 61 70 6f 6c 6c 0d 15 | 7c 1f fd 20 77 69 6e 25 |iapoll..||.. win%|
|00003150| 3d 77 69 6e 5f 6c 6f 61 | 64 25 20 80 20 69 63 6f |=win_loa|d% . ico|
|00003160| 6e 25 3d 31 30 0d 15 86 | 0a 61 63 74 25 3d 31 0d |n%=10...|.act%=1.|
|00003170| 15 90 0f e3 20 67 6f 25 | 3d 32 20 b8 20 39 0d 15 |.... go%|=2 . 9..|
|00003180| 9a 31 71 25 21 35 31 32 | 3d 77 69 6e 5f 6c 6f 61 |.1q%!512|=win_loa|
|00003190| 64 25 3a 71 25 21 35 31 | 36 3d 67 6f 25 3a c8 99 |d%:q%!51|6=go%:..|
|000031a0| 20 26 34 30 30 43 45 2c | 2c 71 25 2b 35 31 32 0d | &400CE,|,q%+512.|
|000031b0| 15 a4 2f e7 20 28 71 25 | 21 28 35 31 32 2b 32 34 |../. (q%|!(512+24|
|000031c0| 29 80 28 31 3c 3c 32 31 | 29 29 3c 3e 30 20 61 63 |).(1<<21|))<>0 ac|
|000031d0| 74 25 3d 67 6f 25 2d 32 | 3a 67 6f 25 3d 39 0d 15 |t%=go%-2|:go%=9..|
|000031e0| ae 05 ed 0d 15 b8 22 67 | 6f 25 3d 8e 28 6e 61 6d |......"g|o%=.(nam|
|000031f0| 65 24 29 3a 73 69 7a 65 | 25 3d a2 23 67 6f 25 3a |e$):size|%=.#go%:|
|00003200| d9 23 67 6f 25 0d 15 c2 | 0d c8 8e 20 61 63 74 25 |.#go%...|... act%|
|00003210| 20 ca 0d 15 cc 37 c9 20 | 30 20 3a 20 f2 58 6d 65 | ....7. |0 : .Xme|
|00003220| 6d 5f 72 65 6c 65 61 73 | 65 28 73 61 6d 70 6c 65 |m_releas|e(sample|
|00003230| 25 29 3a 73 61 6d 70 6c | 65 5f 74 79 70 65 25 3d |%):sampl|e_type%=|
|00003240| 2d 31 3a 67 6f 25 3d 2d | 31 0d 15 d6 0f c9 20 31 |-1:go%=-|1..... 1|
|00003250| 20 3a 20 67 6f 25 3d 30 | 0d 15 e0 10 c9 20 32 20 | : go%=0|..... 2 |
|00003260| 3a 20 f2 61 76 28 30 29 | 0d 15 ea 29 c9 20 33 20 |: .av(0)|...). 3 |
|00003270| 3a 20 e7 20 63 61 72 65 | 74 25 3e 3d 30 20 f2 61 |: . care|t%>=0 .a|
|00003280| 76 28 63 61 72 65 74 25 | 29 20 8b 20 67 6f 25 3d |v(caret%|) . go%=|
|00003290| 30 0d 15 f4 10 c9 20 34 | 20 3a 20 f2 69 6e 28 30 |0..... 4| : .in(0|
|000032a0| 29 0d 15 fe 29 c9 20 35 | 20 3a 20 e7 20 63 61 72 |)...). 5| : . car|
|000032b0| 65 74 25 3e 3d 30 20 f2 | 69 6e 28 63 61 72 65 74 |et%>=0 .|in(caret|
|000032c0| 25 29 20 8b 20 67 6f 25 | 3d 30 0d 16 08 10 c9 20 |%) . go%|=0..... |
|000032d0| 36 20 3a 20 f2 6f 76 28 | 30 29 0d 16 12 29 c9 20 |6 : .ov(|0)...). |
|000032e0| 37 20 3a 20 e7 20 63 61 | 72 65 74 25 3e 3d 30 20 |7 : . ca|ret%>=0 |
|000032f0| f2 6f 76 28 63 61 72 65 | 74 25 29 20 8b 20 67 6f |.ov(care|t%) . go|
|00003300| 25 3d 30 0d 16 1c 0d 7f | 20 3a 20 67 6f 25 3d 31 |%=0.....| : go%=1|
|00003310| 0d 16 26 05 cb 0d 16 30 | 06 ef 37 0d 16 3a 14 71 |..&....0|..7..:.q|
|00003320| 25 21 35 31 32 3d 77 69 | 6e 5f 6c 6f 61 64 25 0d |%!512=wi|n_load%.|
|00003330| 16 44 15 c8 99 20 26 34 | 30 30 43 36 2c 2c 71 25 |.D... &4|00C6,,q%|
|00003340| 2b 35 31 32 0d 16 4e 2b | f4 20 4d 4f 55 53 45 20 |+512..N+|. MOUSE |
|00003350| 52 45 43 54 41 4e 47 4c | 45 20 2d 34 30 30 30 2c |RECTANGL|E -4000,|
|00003360| 2d 34 30 30 30 2c 34 30 | 30 30 2c 34 30 30 30 0d |-4000,40|00,4000.|
|00003370| 16 58 08 3d 67 6f 25 0d | 16 62 04 0d 16 6c 0e dd |.X.=go%.|.b...l..|
|00003380| f2 61 76 28 70 6f 73 25 | 29 0d 16 76 1b 77 69 6e |.av(pos%|)..v.win|
|00003390| 25 3d a4 58 6d 65 6d 5f | 63 6c 61 69 6d 28 73 69 |%=.Xmem_|claim(si|
|000033a0| 7a 65 25 29 0d 16 80 18 | c8 99 20 38 2c 31 36 2c |ze%)....|.. 8,16,|
|000033b0| 6e 61 6d 65 24 2c 77 69 | 6e 25 2c 30 0d 16 8a 1b |name$,wi|n%,0....|
|000033c0| 41 25 3d 77 69 6e 25 3a | 42 25 3d 77 69 6e 25 2b |A%=win%:|B%=win%+|
|000033d0| 73 69 7a 65 25 2d 31 0d | 16 94 2b 43 25 3d 73 61 |size%-1.|..+C%=sa|
|000033e0| 6d 70 6c 65 25 2b 70 6f | 73 25 3a 44 25 3d 73 61 |mple%+po|s%:D%=sa|
|000033f0| 6d 70 6c 65 25 2b 73 61 | 6d 70 5f 73 69 7a 65 25 |mple%+sa|mp_size%|
|00003400| 2d 31 0d 16 9e 19 45 25 | 3d 73 61 6d 70 5f 63 65 |-1....E%|=samp_ce|
|00003410| 6e 74 72 65 25 3a d6 20 | 6d 69 78 0d 16 a8 17 f2 |ntre%:. |mix.....|
|00003420| 58 6d 65 6d 5f 72 65 6c | 65 61 73 65 28 77 69 6e |Xmem_rel|ease(win|
|00003430| 25 29 0d 16 b2 09 67 6f | 25 3d 31 0d 16 bc 05 e1 |%)....go|%=1.....|
|00003440| 0d 16 c6 04 0d 16 d0 0e | dd f2 69 6e 28 70 6f 73 |........|..in(pos|
|00003450| 25 29 0d 16 da 1e f2 58 | 6d 65 6d 5f 64 65 6c 74 |%).....X|mem_delt|
|00003460| 61 28 73 61 6d 70 6c 65 | 25 2c 73 69 7a 65 25 29 |a(sample|%,size%)|
|00003470| 0d 16 e4 27 f2 63 6f 70 | 79 28 70 6f 73 25 2c 73 |...'.cop|y(pos%,s|
|00003480| 61 6d 70 5f 73 69 7a 65 | 25 2d 31 2c 70 6f 73 25 |amp_size|%-1,pos%|
|00003490| 2b 73 69 7a 65 25 29 0d | 16 ee 20 c8 99 20 38 2c |+size%).|.. .. 8,|
|000034a0| 31 36 2c 6e 61 6d 65 24 | 2c 73 61 6d 70 6c 65 25 |16,name$|,sample%|
|000034b0| 2b 70 6f 73 25 2c 30 0d | 16 f8 05 e1 0d 17 02 04 |+pos%,0.|........|
|000034c0| 0d 17 0c 0e dd f2 6f 76 | 28 70 6f 73 25 29 0d 17 |......ov|(pos%)..|
|000034d0| 16 31 e7 20 73 61 6d 70 | 5f 73 69 7a 65 25 2d 70 |.1. samp|_size%-p|
|000034e0| 6f 73 25 3c 73 69 7a 65 | 25 20 73 69 7a 65 25 3d |os%<size|% size%=|
|000034f0| 73 61 6d 70 5f 73 69 7a | 65 25 2d 70 6f 73 25 0d |samp_siz|e%-pos%.|
|00003500| 17 20 11 77 69 6e 25 3d | 8e 28 6e 61 6d 65 24 29 |. .win%=|.(name$)|
|00003510| 0d 17 2a 23 c8 99 20 26 | 43 2c 34 2c 77 69 6e 25 |..*#.. &|C,4,win%|
|00003520| 2c 73 61 6d 70 6c 65 25 | 2b 70 6f 73 25 2c 73 69 |,sample%|+pos%,si|
|00003530| 7a 65 25 0d 17 34 0a d9 | 23 77 69 6e 25 0d 17 3e |ze%..4..|#win%..>|
|00003540| 05 e1 0d 17 48 04 0d 17 | 52 0d dd f2 64 69 61 70 |....H...|R...diap|
|00003550| 6f 6c 6c 0d 17 5c 08 ea | 20 72 25 0d 17 66 05 f5 |oll..\..| r%..f..|
|00003560| 0d 17 70 1b c8 99 20 26 | 34 30 30 43 37 2c 30 2c |..p... &|400C7,0,|
|00003570| 71 25 2b 35 31 32 20 b8 | 20 72 25 0d 17 7a 0b c8 |q%+512 .| r%..z..|
|00003580| 8e 20 72 25 20 ca 0d 17 | 84 17 c9 20 32 20 3a 20 |. r% ...|... 2 : |
|00003590| f2 6f 70 65 6e 28 71 25 | 2b 35 31 32 29 0d 17 8e |.open(q%|+512)...|
|000035a0| 17 c9 20 33 20 3a 20 f2 | 6f 70 65 6e 28 71 25 2b |.. 3 : .|open(q%+|
|000035b0| 35 31 32 29 0d 17 98 21 | 7f 20 3a 20 f2 68 61 6e |512)...!|. : .han|
|000035c0| 64 6c 65 5f 72 65 61 73 | 6f 6e 28 72 25 2c 71 25 |dle_reas|on(r%,q%|
|000035d0| 2b 35 31 32 29 0d 17 a2 | 05 cb 0d 17 ac 1a fd 20 |+512)...|....... |
|000035e0| 72 25 3d 36 20 80 20 71 | 25 21 28 35 31 32 2b 38 |r%=6 . q|%!(512+8|
|000035f0| 29 3c 3e 32 0d 17 b6 26 | 77 69 6e 25 3d 71 25 21 |)<>2...&|win%=q%!|
|00003600| 28 35 31 32 2b 31 32 29 | 3a 69 63 6f 6e 25 3d 71 |(512+12)|:icon%=q|
|00003610| 25 21 28 35 31 32 2b 31 | 36 29 0d 17 c0 05 e1 0d |%!(512+1|6)......|
|00003620| 17 ca 04 0d 17 d4 1c dd | a4 6c 6f 61 64 5f 72 61 |........|.load_ra|
|00003630| 77 28 6e 61 6d 65 24 2c | 73 74 79 70 65 25 29 0d |w(name$,|stype%).|
|00003640| 17 de 1b ea 20 66 69 6c | 65 25 2c 70 6f 73 25 2c |.... fil|e%,pos%,|
|00003650| 6e 6f 74 25 2c 73 69 7a | 65 25 0d 17 e8 28 66 69 |not%,siz|e%...(fi|
|00003660| 6c 65 25 3d 8e 28 6e 61 | 6d 65 24 29 3a 73 69 7a |le%=.(na|me$):siz|
|00003670| 65 25 3d a2 23 66 69 6c | 65 25 3a d9 23 66 69 6c |e%=.#fil|e%:.#fil|
|00003680| 65 25 0d 17 f2 1b 70 6f | 73 25 3d a4 58 6d 65 6d |e%....po|s%=.Xmem|
|00003690| 5f 63 6c 61 69 6d 28 73 | 69 7a 65 25 29 0d 17 fc |_claim(s|ize%)...|
|000036a0| 3e e7 20 70 6f 73 25 3d | 30 20 85 20 31 2c 22 4e |>. pos%=|0 . 1,"N|
|000036b0| 6f 74 20 65 6e 6f 75 67 | 68 20 6d 65 6d 6f 72 79 |ot enoug|h memory|
|000036c0| 20 28 49 20 6e 65 65 64 | 20 22 2b c3 73 69 7a 65 | (I need| "+.size|
|000036d0| 25 2b 22 20 62 79 74 65 | 73 29 22 0d 18 06 18 c8 |%+" byte|s)".....|
|000036e0| 99 20 38 2c 31 36 2c 6e | 61 6d 65 24 2c 70 6f 73 |. 8,16,n|ame$,pos|
|000036f0| 25 2c 30 0d 18 10 21 73 | 61 6d 70 6c 65 25 3d 70 |%,0...!s|ample%=p|
|00003700| 6f 73 25 3a 73 61 6d 70 | 5f 73 69 7a 65 25 3d 73 |os%:samp|_size%=s|
|00003710| 69 7a 65 25 0d 18 1a 17 | 73 61 6d 70 6c 65 5f 74 |ize%....|sample_t|
|00003720| 79 70 65 25 3d 73 74 79 | 70 65 25 0d 18 24 11 73 |ype%=sty|pe%..$.s|
|00003730| 65 6c 5f 73 74 61 72 74 | 25 3d 2d 31 0d 18 2e 0f |el_start|%=-1....|
|00003740| 73 65 6c 5f 65 6e 64 25 | 3d 2d 31 0d 18 38 12 f2 |sel_end%|=-1..8..|
|00003750| 6e 65 77 5f 73 65 6c 65 | 63 74 69 6f 6e 0d 18 42 |new_sele|ction..B|
|00003760| 14 f2 6e 65 77 5f 73 61 | 6d 70 6c 65 5f 74 79 70 |..new_sa|mple_typ|
|00003770| 65 0d 18 4c 0c f2 63 6c | 72 5f 61 6c 6c 0d 18 56 |e..L..cl|r_all..V|
|00003780| 0f c8 8e 20 73 74 79 70 | 65 25 20 ca 0d 18 60 1a |... styp|e% ...`.|
|00003790| c9 20 30 20 3a 20 73 61 | 6d 70 5f 63 65 6e 74 72 |. 0 : sa|mp_centr|
|000037a0| 65 25 3d 31 32 38 0d 18 | 6a 1a c9 20 31 20 3a 20 |e%=128..|j.. 1 : |
|000037b0| 73 61 6d 70 5f 63 65 6e | 74 72 65 25 3d 31 32 38 |samp_cen|tre%=128|
|000037c0| 0d 18 74 18 c9 20 32 20 | 3a 20 73 61 6d 70 5f 63 |..t.. 2 |: samp_c|
|000037d0| 65 6e 74 72 65 25 3d 30 | 0d 18 7e 05 cb 0d 18 88 |entre%=0|..~.....|
|000037e0| 07 3d 2d 31 0d 18 92 04 | 0d 18 9c 10 dd a4 77 67 |.=-1....|......wg|
|000037f0| 65 74 28 70 6f 73 25 29 | 0d 18 a6 08 ea 20 61 25 |et(pos%)|..... a%|
|00003800| 0d 18 b0 10 cf 23 66 69 | 6c 65 25 3d 70 6f 73 25 |.....#fi|le%=pos%|
|00003810| 0d 18 ba 13 61 25 3d 28 | 9a 23 66 69 6c 65 25 29 |....a%=(|.#file%)|
|00003820| 3c 3c 30 0d 18 c4 14 61 | 25 2b 3d 28 9a 23 66 69 |<<0....a|%+=(.#fi|
|00003830| 6c 65 25 29 3c 3c 38 0d | 18 ce 15 61 25 2b 3d 28 |le%)<<8.|...a%+=(|
|00003840| 9a 23 66 69 6c 65 25 29 | 3c 3c 31 36 0d 18 d8 15 |.#file%)|<<16....|
|00003850| 61 25 2b 3d 28 9a 23 66 | 69 6c 65 25 29 3c 3c 32 |a%+=(.#f|ile%)<<2|
|00003860| 34 0d 18 e2 07 3d 61 25 | 0d 18 ec 04 0d 18 f6 10 |4....=a%|........|
|00003870| dd a4 62 67 65 74 28 70 | 6f 73 25 29 0d 19 00 10 |..bget(p|os%)....|
|00003880| cf 23 66 69 6c 65 25 3d | 70 6f 73 25 0d 19 0a 0c |.#file%=|pos%....|
|00003890| 3d 9a 23 66 69 6c 65 25 | 0d 19 14 04 0d 19 1e 0e |=.#file%|........|
|000038a0| dd f2 77 70 75 74 28 77 | 25 29 0d 19 28 17 d5 23 |..wput(w|%)..(..#|
|000038b0| 66 69 6c 65 25 2c 28 77 | 25 80 26 46 46 29 3e 3e |file%,(w|%.&FF)>>|
|000038c0| 30 0d 19 32 19 d5 23 66 | 69 6c 65 25 2c 28 77 25 |0..2..#f|ile%,(w%|
|000038d0| 80 26 46 46 30 30 29 3e | 3e 38 0d 19 3c 1c d5 23 |.&FF00)>|>8..<..#|
|000038e0| 66 69 6c 65 25 2c 28 77 | 25 80 26 46 46 30 30 30 |file%,(w|%.&FF000|
|000038f0| 30 29 3e 3e 31 36 0d 19 | 46 1e d5 23 66 69 6c 65 |0)>>16..|F..#file|
|00003900| 25 2c 28 77 25 80 26 46 | 46 30 30 30 30 30 30 29 |%,(w%.&F|F000000)|
|00003910| 3e 3e 32 34 0d 19 50 05 | e1 0d 19 5a 04 0d 19 64 |>>24..P.|...Z...d|
|00003920| 12 dd a4 6c 6f 61 64 5f | 65 66 66 28 6e 24 29 0d |...load_|eff(n$).|
|00003930| 19 6e 20 ea 20 66 69 6c | 65 25 2c 70 6f 73 25 2c |.n . fil|e%,pos%,|
|00003940| 6e 6f 74 25 2c 73 69 7a | 65 25 2c 72 61 74 65 0d |not%,siz|e%,rate.|
|00003950| 19 78 21 66 69 6c 65 25 | 3d 8e 28 6e 61 6d 65 24 |.x!file%|=.(name$|
|00003960| 29 3a 73 69 7a 65 25 3d | a4 77 67 65 74 28 34 29 |):size%=|.wget(4)|
|00003970| 0d 19 82 1b 70 6f 73 25 | 3d a4 58 6d 65 6d 5f 63 |....pos%|=.Xmem_c|
|00003980| 6c 61 69 6d 28 73 69 7a | 65 25 29 0d 19 8c 3e e7 |laim(siz|e%)...>.|
|00003990| 20 70 6f 73 25 3d 30 20 | 85 20 31 2c 22 4e 6f 74 | pos%=0 |. 1,"Not|
|000039a0| 20 65 6e 6f 75 67 68 20 | 6d 65 6d 6f 72 79 20 28 | enough |memory (|
|000039b0| 49 20 6e 65 65 64 20 22 | 2b c3 73 69 7a 65 25 2b |I need "|+.size%+|
|000039c0| 22 20 62 79 74 65 73 29 | 22 0d 19 96 25 c8 99 20 |" bytes)|"...%.. |
|000039d0| 26 43 2c 33 2c 66 69 6c | 65 25 2c 70 6f 73 25 2c |&C,3,fil|e%,pos%,|
|000039e0| 73 69 7a 65 25 2c a4 77 | 67 65 74 28 38 29 0d 19 |size%,.w|get(8)..|
|000039f0| a0 21 73 61 6d 70 6c 65 | 25 3d 70 6f 73 25 3a 73 |.!sample|%=pos%:s|
|00003a00| 61 6d 70 5f 73 69 7a 65 | 25 3d 73 69 7a 65 25 0d |amp_size|%=size%.|
|00003a10| 19 aa 19 73 61 6d 70 6c | 65 5f 74 79 70 65 25 3d |...sampl|e_type%=|
|00003a20| a4 62 67 65 74 28 30 29 | 0d 19 b4 14 63 61 72 65 |.bget(0)|....care|
|00003a30| 74 25 3d a4 77 67 65 74 | 28 31 32 29 0d 19 be 18 |t%=.wget|(12)....|
|00003a40| 73 65 6c 5f 73 74 61 72 | 74 25 3d a4 77 67 65 74 |sel_star|t%=.wget|
|00003a50| 28 31 36 29 0d 19 c8 16 | 73 65 6c 5f 65 6e 64 25 |(16)....|sel_end%|
|00003a60| 3d a4 77 67 65 74 28 32 | 30 29 0d 19 d2 1a 72 61 |=.wget(2|0)....ra|
|00003a70| 74 65 3d a4 77 67 65 74 | 28 32 34 29 2f 28 31 3c |te=.wget|(24)/(1<|
|00003a80| 3c 32 34 29 0d 19 dc 24 | f2 58 69 63 6f 6e 5f 73 |<24)...$|.Xicon_s|
|00003a90| 65 74 73 74 72 28 77 69 | 6e 5f 6d 61 69 6e 25 2c |etstr(wi|n_main%,|
|00003aa0| 35 2c c3 72 61 74 65 29 | 0d 19 e6 2b f2 58 69 63 |5,.rate)|...+.Xic|
|00003ab0| 6f 6e 5f 73 65 74 73 74 | 72 28 77 69 6e 5f 6d 61 |on_setst|r(win_ma|
|00003ac0| 69 6e 25 2c 34 2c c3 28 | 31 30 30 30 2f 72 61 74 |in%,4,.(|1000/rat|
|00003ad0| 65 29 29 0d 19 f0 0b d9 | 23 66 69 6c 65 25 0d 19 |e)).....|#file%..|
|00003ae0| fa 12 f2 6e 65 77 5f 73 | 65 6c 65 63 74 69 6f 6e |...new_s|election|
|00003af0| 0d 1a 04 14 f2 6e 65 77 | 5f 73 61 6d 70 6c 65 5f |.....new|_sample_|
|00003b00| 74 79 70 65 0d 1a 0e 15 | c8 8e 20 73 61 6d 70 6c |type....|.. sampl|
|00003b10| 65 5f 74 79 70 65 25 20 | ca 0d 1a 18 1a c9 20 30 |e_type% |...... 0|
|00003b20| 20 3a 20 73 61 6d 70 5f | 63 65 6e 74 72 65 25 3d | : samp_|centre%=|
|00003b30| 31 32 38 0d 1a 22 1a c9 | 20 31 20 3a 20 73 61 6d |128.."..| 1 : sam|
|00003b40| 70 5f 63 65 6e 74 72 65 | 25 3d 31 32 38 0d 1a 2c |p_centre|%=128..,|
|00003b50| 18 c9 20 32 20 3a 20 73 | 61 6d 70 5f 63 65 6e 74 |.. 2 : s|amp_cent|
|00003b60| 72 65 25 3d 30 0d 1a 36 | 05 cb 0d 1a 40 07 3d 2d |re%=0..6|....@.=-|
|00003b70| 31 0d 1a 4a 04 0d 1a 54 | 12 dd a4 6c 6f 61 64 5f |1..J...T|...load_|
|00003b80| 61 72 6d 28 6e 24 29 0d | 1a 5e 20 ea 20 66 69 6c |arm(n$).|.^ . fil|
|00003b90| 65 25 2c 70 6f 73 25 2c | 6e 6f 74 25 2c 73 69 7a |e%,pos%,|not%,siz|
|00003ba0| 65 25 2c 72 61 74 65 0d | 1a 68 22 66 69 6c 65 25 |e%,rate.|.h"file%|
|00003bb0| 3d 8e 28 6e 61 6d 65 24 | 29 3a 73 69 7a 65 25 3d |=.(name$|):size%=|
|00003bc0| a2 23 66 69 6c 65 25 2d | 31 0d 1a 72 1b 70 6f 73 |.#file%-|1..r.pos|
|00003bd0| 25 3d a4 58 6d 65 6d 5f | 63 6c 61 69 6d 28 73 69 |%=.Xmem_|claim(si|
|00003be0| 7a 65 25 29 0d 1a 7c 3e | e7 20 70 6f 73 25 3d 30 |ze%)..|>|. pos%=0|
|00003bf0| 20 85 20 31 2c 22 4e 6f | 74 20 65 6e 6f 75 67 68 | . 1,"No|t enough|
|00003c00| 20 6d 65 6d 6f 72 79 20 | 28 49 20 6e 65 65 64 20 | memory |(I need |
|00003c10| 22 2b c3 73 69 7a 65 25 | 2b 22 20 62 79 74 65 73 |"+.size%|+" bytes|
|00003c20| 29 22 0d 1a 86 1e c8 99 | 20 26 43 2c 33 2c 66 69 |)"......| &C,3,fi|
|00003c30| 6c 65 25 2c 70 6f 73 25 | 2c 73 69 7a 65 25 2c 31 |le%,pos%|,size%,1|
|00003c40| 0d 1a 90 21 73 61 6d 70 | 6c 65 25 3d 70 6f 73 25 |...!samp|le%=pos%|
|00003c50| 3a 73 61 6d 70 5f 73 69 | 7a 65 25 3d 73 69 7a 65 |:samp_si|ze%=size|
|00003c60| 25 0d 1a 9a 12 73 61 6d | 70 6c 65 5f 74 79 70 65 |%....sam|ple_type|
|00003c70| 25 3d 32 0d 1a a4 11 73 | 65 6c 5f 73 74 61 72 74 |%=2....s|el_start|
|00003c80| 25 3d 2d 31 0d 1a ae 0f | 73 65 6c 5f 65 6e 64 25 |%=-1....|sel_end%|
|00003c90| 3d 2d 31 0d 1a b8 16 72 | 61 74 65 3d 31 30 30 30 |=-1....r|ate=1000|
|00003ca0| 2f a4 62 67 65 74 28 30 | 29 0d 1a c2 24 f2 58 69 |/.bget(0|)...$.Xi|
|00003cb0| 63 6f 6e 5f 73 65 74 73 | 74 72 28 77 69 6e 5f 6d |con_sets|tr(win_m|
|00003cc0| 61 69 6e 25 2c 35 2c c3 | 72 61 74 65 29 0d 1a cc |ain%,5,.|rate)...|
|00003cd0| 2b f2 58 69 63 6f 6e 5f | 73 65 74 73 74 72 28 77 |+.Xicon_|setstr(w|
|00003ce0| 69 6e 5f 6d 61 69 6e 25 | 2c 34 2c c3 28 31 30 30 |in_main%|,4,.(100|
|00003cf0| 30 2f 72 61 74 65 29 29 | 0d 1a d6 0b d9 23 66 69 |0/rate))|.....#fi|
|00003d00| 6c 65 25 0d 1a e0 12 f2 | 6e 65 77 5f 73 65 6c 65 |le%.....|new_sele|
|00003d10| 63 74 69 6f 6e 0d 1a ea | 14 f2 6e 65 77 5f 73 61 |ction...|..new_sa|
|00003d20| 6d 70 6c 65 5f 74 79 70 | 65 0d 1a f4 12 73 61 6d |mple_typ|e....sam|
|00003d30| 70 5f 63 65 6e 74 72 65 | 25 3d 30 0d 1a fe 07 3d |p_centre|%=0....=|
|00003d40| 2d 31 0d 1b 08 04 0d 1b | 12 19 dd f2 6d 65 6e 75 |-1......|....menu|
|00003d50| 5f 77 61 72 6e 28 61 25 | 2c 62 25 2c 63 25 29 0d |_warn(a%|,b%,c%).|
|00003d60| 1b 1c 0c e7 20 61 25 3d | 31 20 8c 0d 1b 26 12 20 |.... a%=|1 ...&. |
|00003d70| f2 73 61 76 65 77 69 6e | 70 28 62 25 29 0d 1b 30 |.savewin|p(b%)..0|
|00003d80| 19 20 73 61 76 65 5f 73 | 61 6d 70 6c 65 25 3d 73 |. save_s|ample%=s|
|00003d90| 61 6d 70 6c 65 25 0d 1b | 3a 1f 20 73 61 76 65 5f |ample%..|:. save_|
|00003da0| 73 61 6d 70 5f 73 69 7a | 65 25 3d 73 61 6d 70 5f |samp_siz|e%=samp_|
|00003db0| 73 69 7a 65 25 0d 1b 44 | 17 20 73 61 76 65 5f 63 |size%..D|. save_c|
|00003dc0| 61 72 65 74 25 3d 63 61 | 72 65 74 25 0d 1b 4e 1f |aret%=ca|ret%..N.|
|00003dd0| 20 73 61 76 65 5f 73 65 | 6c 5f 73 74 61 72 74 25 | save_se|l_start%|
|00003de0| 3d 73 65 6c 5f 73 74 61 | 72 74 25 0d 1b 58 1b 20 |=sel_sta|rt%..X. |
|00003df0| 73 61 76 65 5f 73 65 6c | 5f 65 6e 64 25 3d 73 65 |save_sel|_end%=se|
|00003e00| 6c 5f 65 6e 64 25 0d 1b | 62 05 cc 0d 1b 6c 3d 20 |l_end%..|b....l= |
|00003e10| e7 20 61 25 3d 30 20 80 | 20 62 25 3d 31 20 3a 20 |. a%=0 .| b%=1 : |
|00003e20| f2 6f 70 65 6e 5f 73 69 | 6e 66 6f 3a c8 99 20 26 |.open_si|nfo:.. &|
|00003e30| 34 30 30 45 38 2c 2c 71 | 25 21 32 30 2c 71 25 21 |400E8,,q|%!20,q%!|
|00003e40| 32 34 2c 71 25 21 32 38 | 0d 1b 76 15 20 e7 20 61 |24,q%!28|..v. . a|
|00003e50| 25 3d 32 20 80 20 62 25 | 3d 31 31 20 8c 0d 1b 80 |%=2 . b%|=11 ....|
|00003e60| 14 20 20 20 f2 73 61 76 | 65 77 69 6e 70 28 63 25 |. .sav|ewinp(c%|
|00003e70| 29 0d 1b 8a 26 20 20 20 | 73 61 76 65 5f 73 61 6d |)...& |save_sam|
|00003e80| 70 6c 65 25 3d 73 61 6d | 70 6c 65 25 2b 73 65 6c |ple%=sam|ple%+sel|
|00003e90| 5f 73 74 61 72 74 25 0d | 1b 94 2a 20 20 20 73 61 |_start%.|..* sa|
|00003ea0| 76 65 5f 73 61 6d 70 5f | 73 69 7a 65 25 3d 73 65 |ve_samp_|size%=se|
|00003eb0| 6c 5f 65 6e 64 25 2d 73 | 65 6c 5f 73 74 61 72 74 |l_end%-s|el_start|
|00003ec0| 25 0d 1b 9e 24 20 20 20 | 73 61 76 65 5f 63 61 72 |%...$ |save_car|
|00003ed0| 65 74 25 3d 63 61 72 65 | 74 25 2d 73 65 6c 5f 73 |et%=care|t%-sel_s|
|00003ee0| 74 61 72 74 25 0d 1b a8 | 18 20 20 20 73 61 76 65 |tart%...|. save|
|00003ef0| 5f 73 65 6c 5f 73 74 61 | 72 74 25 3d 30 0d 1b b2 |_sel_sta|rt%=0...|
|00003f00| 24 20 20 20 73 61 76 65 | 5f 73 65 6c 5f 65 6e 64 |$ save|_sel_end|
|00003f10| 25 3d 73 61 76 65 5f 73 | 61 6d 70 5f 73 69 7a 65 |%=save_s|amp_size|
|00003f20| 25 0d 1b bc 24 20 20 20 | e7 20 73 61 76 65 5f 63 |%...$ |. save_c|
|00003f30| 61 72 65 74 25 3c 30 20 | 73 61 76 65 5f 63 61 72 |aret%<0 |save_car|
|00003f40| 65 74 25 3d 30 0d 1b c6 | 33 20 20 20 e7 20 73 61 |et%=0...|3 . sa|
|00003f50| 76 65 5f 63 61 72 65 74 | 25 3e 3d 73 61 76 65 5f |ve_caret|%>=save_|
|00003f60| 73 61 6d 70 5f 73 69 7a | 65 25 20 73 61 76 65 5f |samp_siz|e% save_|
|00003f70| 63 61 72 65 74 25 3d 30 | 0d 1b d0 06 20 cd 0d 1b |caret%=0|.... ...|
|00003f80| da 05 cd 0d 1b e4 05 e1 | 0d 1b ee 04 0d 1b f8 12 |........|........|
|00003f90| dd f2 73 61 76 65 77 69 | 6e 70 28 62 25 29 0d 1c |..savewi|np(b%)..|
|00003fa0| 02 0c 20 c8 8e 20 62 25 | 20 ca 0d 1c 0c 20 20 c9 |.. .. b%| .... .|
|00003fb0| 20 30 20 3a 20 24 73 61 | 76 65 5f 74 78 74 25 3d | 0 : $sa|ve_txt%=|
|00003fc0| 73 6e 61 6d 65 5f 6c 6f | 67 24 0d 1c 16 1d 20 20 |sname_lo|g$.... |
|00003fd0| 20 20 20 20 20 20 20 20 | f2 73 61 76 65 77 69 6e | |.savewin|
|00003fe0| 28 22 36 33 31 22 29 0d | 1c 20 23 20 20 20 20 20 |("631").|. # |
|00003ff0| 20 20 20 20 20 73 61 76 | 65 5f 73 69 7a 65 25 3d | sav|e_size%=|
|00004000| 73 61 6d 70 5f 73 69 7a | 65 25 0d 1c 2a 20 20 c9 |samp_siz|e%..* .|
|00004010| 20 31 20 3a 20 24 73 61 | 76 65 5f 74 78 74 25 3d | 1 : $sa|ve_txt%=|
|00004020| 73 6e 61 6d 65 5f 73 67 | 6e 24 0d 1c 34 1d 20 20 |sname_sg|n$..4. |
|00004030| 20 20 20 20 20 20 20 20 | f2 73 61 76 65 77 69 6e | |.savewin|
|00004040| 28 22 36 33 32 22 29 0d | 1c 3e 23 20 20 20 20 20 |("632").|.># |
|00004050| 20 20 20 20 20 73 61 76 | 65 5f 73 69 7a 65 25 3d | sav|e_size%=|
|00004060| 73 61 6d 70 5f 73 69 7a | 65 25 0d 1c 48 20 20 c9 |samp_siz|e%..H .|
|00004070| 20 32 20 3a 20 24 73 61 | 76 65 5f 74 78 74 25 3d | 2 : $sa|ve_txt%=|
|00004080| 73 6e 61 6d 65 5f 75 6e | 73 24 0d 1c 52 1d 20 20 |sname_un|s$..R. |
|00004090| 20 20 20 20 20 20 20 20 | f2 73 61 76 65 77 69 6e | |.savewin|
|000040a0| 28 22 36 33 33 22 29 0d | 1c 5c 23 20 20 20 20 20 |("633").|.\# |
|000040b0| 20 20 20 20 20 73 61 76 | 65 5f 73 69 7a 65 25 3d | sav|e_size%=|
|000040c0| 73 61 6d 70 5f 73 69 7a | 65 25 0d 1c 66 20 20 c9 |samp_siz|e%..f .|
|000040d0| 20 33 20 3a 20 24 73 61 | 76 65 5f 74 78 74 25 3d | 3 : $sa|ve_txt%=|
|000040e0| 73 6e 61 6d 65 5f 65 66 | 66 24 0d 1c 70 1d 20 20 |sname_ef|f$..p. |
|000040f0| 20 20 20 20 20 20 20 20 | f2 73 61 76 65 77 69 6e | |.savewin|
|00004100| 28 22 36 33 34 22 29 0d | 1c 7a 23 20 20 20 20 20 |("634").|.z# |
|00004110| 20 20 20 20 20 73 61 76 | 65 5f 73 69 7a 65 25 3d | sav|e_size%=|
|00004120| 73 61 6d 70 5f 73 69 7a | 65 25 0d 1c 84 20 20 c9 |samp_siz|e%... .|
|00004130| 20 34 20 3a 20 24 73 61 | 76 65 5f 74 78 74 25 3d | 4 : $sa|ve_txt%=|
|00004140| 73 6e 61 6d 65 5f 61 72 | 6d 24 0d 1c 8e 1d 20 20 |sname_ar|m$.... |
|00004150| 20 20 20 20 20 20 20 20 | f2 73 61 76 65 77 69 6e | |.savewin|
|00004160| 28 22 44 33 43 22 29 0d | 1c 98 23 20 20 20 20 20 |("D3C").|..# |
|00004170| 20 20 20 20 20 73 61 76 | 65 5f 73 69 7a 65 25 3d | sav|e_size%=|
|00004180| 73 61 6d 70 5f 73 69 7a | 65 25 0d 1c a2 06 20 cb |samp_siz|e%.... .|
|00004190| 0d 1c ac 05 e1 0d 1c b6 | 04 0d 1c c0 19 dd f2 73 |........|.......s|
|000041a0| 61 76 65 77 69 6e 28 66 | 69 6c 65 5f 74 79 70 65 |avewin(f|ile_type|
|000041b0| 24 29 0d 1c ca 24 24 73 | 61 76 65 5f 76 61 6c 69 |$)...$$s|ave_vali|
|000041c0| 64 25 3d 22 53 66 69 6c | 65 5f 22 2b 66 69 6c 65 |d%="Sfil|e_"+file|
|000041d0| 5f 74 79 70 65 24 0d 1c | d4 20 66 69 6c 65 5f 74 |_type$..|. file_t|
|000041e0| 79 70 65 25 3d a0 28 22 | 26 22 2b 66 69 6c 65 5f |ype%=.("|&"+file_|
|000041f0| 74 79 70 65 24 29 0d 1c | de 20 c8 99 20 26 34 30 |type$)..|. .. &40|
|00004200| 30 45 38 2c 2c 71 25 21 | 32 30 2c 71 25 21 32 34 |0E8,,q%!|20,q%!24|
|00004210| 2c 71 25 21 32 38 0d 1c | e8 05 e1 0d 1c f2 04 0d |,q%!28..|........|
|00004220| 1c fc 0a dd f2 69 6e 69 | 74 0d 1d 06 1d 69 63 6f |.....ini|t....ico|
|00004230| 6e 5f 73 69 7a 65 25 3d | 34 3a 6d 65 6e 75 5f 73 |n_size%=|4:menu_s|
|00004240| 69 7a 65 25 3d 38 0d 1d | 10 32 69 63 6f 6e 5f 73 |ize%=8..|.2icon_s|
|00004250| 69 7a 65 25 3d 69 63 6f | 6e 5f 73 69 7a 65 25 2a |ize%=ico|n_size%*|
|00004260| 31 30 32 34 3a de 20 69 | 63 6f 6e 73 25 20 69 63 |1024:. i|cons% ic|
|00004270| 6f 6e 5f 73 69 7a 65 25 | 0d 1d 1a 3e 6d 65 6e 75 |on_size%|...>menu|
|00004280| 5f 73 69 7a 65 25 3d 6d | 65 6e 75 5f 73 69 7a 65 |_size%=m|enu_size|
|00004290| 25 2a 31 30 32 34 3a de | 20 6d 65 6e 75 73 25 20 |%*1024:.| menus% |
|000042a0| 6d 65 6e 75 5f 73 69 7a | 65 25 2c 71 25 20 32 30 |menu_siz|e%,q% 20|
|000042b0| 34 38 2b 35 31 32 0d 1d | 24 32 de 20 73 61 76 65 |48+512..|$2. save|
|000042c0| 5f 76 61 6c 69 64 25 20 | 31 36 2c 73 61 76 65 5f |_valid% |16,save_|
|000042d0| 74 78 74 25 20 32 35 35 | 2c 63 6f 64 65 25 20 31 |txt% 255|,code% 1|
|000042e0| 30 32 34 2c 4c 25 2d 31 | 0d 1d 2e 2d 58 74 65 6d |024,L%-1|...-Xtem|
|000042f0| 70 25 3d 71 25 2b 35 31 | 32 3a f2 58 77 69 6d 70 |p%=q%+51|2:.Xwimp|
|00004300| 5f 69 6e 69 74 28 22 45 | 66 66 65 78 20 65 64 69 |_init("E|ffex edi|
|00004310| 74 6f 72 22 29 0d 1d 38 | 35 f7 20 8d 70 76 4e 3a |tor")..8|5. .pvN:|
|00004320| f2 58 77 69 6d 70 5f 74 | 65 6d 70 6c 61 74 65 73 |.Xwimp_t|emplates|
|00004330| 28 69 63 6f 6e 73 25 2c | 69 63 6f 6e 73 25 2b 69 |(icons%,|icons%+i|
|00004340| 63 6f 6e 5f 73 69 7a 65 | 25 29 0d 1d 42 12 f2 58 |con_size|%)..B..X|
|00004350| 6d 65 6d 5f 69 6e 69 74 | 28 33 32 29 0d 1d 4c 0b |mem_init|(32)..L.|
|00004360| 71 75 69 74 25 3d 30 0d | 1d 56 0f 6e 75 6d 5f 6c |quit%=0.|.V.num_l|
|00004370| 69 62 73 25 3d 30 0d 1d | 60 2e de 20 6c 69 62 5f |ibs%=0..|`.. lib_|
|00004380| 6e 61 6d 65 24 28 31 35 | 29 2c 6c 69 62 5f 70 6f |name$(15|),lib_po|
|00004390| 73 25 28 31 35 29 2c 6c | 69 62 5f 73 69 7a 65 25 |s%(15),l|ib_size%|
|000043a0| 28 31 35 29 0d 1d 6a 09 | f2 76 61 72 73 0d 1d 74 |(15)..j.|.vars..t|
|000043b0| 0c f2 63 72 65 69 63 6f | 6e 0d 1d 7e 0f f2 67 65 |..creico|n..~..ge|
|000043c0| 74 77 69 6e 69 6e 66 6f | 0d 1d 88 0d f2 69 6e 66 |twininfo|.....inf|
|000043d0| 6f 5f 77 69 6e 0d 1d 92 | 11 f2 61 73 73 65 6d 28 |o_win...|..assem(|
|000043e0| 63 6f 64 65 25 29 0d 1d | 9c 0f f2 69 6e 69 74 5f |code%)..|...init_|
|000043f0| 76 6f 69 63 65 0d 1d a6 | 21 73 61 6d 70 5f 73 69 |voice...|!samp_si|
|00004400| 7a 65 25 3d 30 3a 73 61 | 6d 70 6c 65 25 3d 30 3a |ze%=0:sa|mple%=0:|
|00004410| 76 64 75 25 3d 35 0d 1d | b0 34 7a 6f 6f 6d 3d 31 |vdu%=5..|.4zoom=1|
|00004420| 3a 73 61 6d 70 6c 65 5f | 74 79 70 65 25 3d 2d 31 |:sample_|type%=-1|
|00004430| 3a 73 65 6c 5f 73 74 61 | 72 74 25 3d 2d 31 3a 73 |:sel_sta|rt%=-1:s|
|00004440| 65 6c 5f 65 6e 64 25 3d | 2d 31 0d 1d ba 1d 63 61 |el_end%=|-1....ca|
|00004450| 72 65 74 25 3d 30 3a 70 | 6c 61 79 5f 72 61 74 65 |ret%=0:p|lay_rate|
|00004460| 25 3d 26 31 38 30 30 0d | 1d c4 20 75 73 65 5f 73 |%=&1800.|.. use_s|
|00004470| 65 6c 65 63 74 69 6f 6e | 25 3d 30 3a 74 72 61 63 |election|%=0:trac|
|00004480| 6b 69 6e 67 25 3d 30 0d | 1d ce 05 e1 0d 1d d8 04 |king%=0.|........|
|00004490| 0d 1d e2 0a dd f2 76 61 | 72 73 0d 1d ec 1a 73 6e |......va|rs....sn|
|000044a0| 61 6d 65 5f 6c 6f 67 24 | 3d 22 4c 6f 67 53 61 6d |ame_log$|="LogSam|
|000044b0| 70 6c 65 22 0d 1d f6 1a | 73 6e 61 6d 65 5f 75 6e |ple"....|sname_un|
|000044c0| 73 24 3d 22 52 61 77 53 | 61 6d 70 6c 65 22 0d 1e |s$="RawS|ample"..|
|000044d0| 00 1b 73 6e 61 6d 65 5f | 73 67 6e 24 3d 22 53 69 |..sname_|sgn$="Si|
|000044e0| 67 6e 53 61 6d 70 6c 65 | 22 0d 1e 0a 17 73 6e 61 |gnSample|"....sna|
|000044f0| 6d 65 5f 65 66 66 24 3d | 22 53 61 6d 70 6c 65 22 |me_eff$=|"Sample"|
|00004500| 0d 1e 14 1b 73 6e 61 6d | 65 5f 61 72 6d 24 3d 22 |....snam|e_arm$="|
|00004510| 41 72 6d 61 53 61 6d 70 | 6c 65 22 0d 1e 1e 1a 73 |ArmaSamp|le"....s|
|00004520| 6e 61 6d 65 5f 73 65 6c | 24 3d 22 53 65 6c 65 63 |name_sel|$="Selec|
|00004530| 74 69 6f 6e 22 0d 1e 28 | 18 73 6e 61 6d 65 5f 6c |tion"..(|.sname_l|
|00004540| 69 62 24 3d 22 53 61 6d | 70 4c 69 62 22 0d 1e 32 |ib$="Sam|pLib"..2|
|00004550| 30 6d 6f 64 30 24 3d 22 | 59 20 45 4f 52 20 28 58 |0mod0$="|Y EOR (X|
|00004560| 20 41 4e 44 20 32 35 35 | 29 20 45 4f 52 20 28 31 | AND 255|) EOR (1|
|00004570| 32 38 2a 28 58 20 4d 4f | 44 32 29 29 22 0d 1e 3c |28*(X MO|D2))"..<|
|00004580| 0c 6d 6f 64 31 24 3d 22 | 22 0d 1e 46 0c 6d 6f 64 |.mod1$="|"..F.mod|
|00004590| 32 24 3d 22 22 0d 1e 50 | 0c 6d 6f 64 33 24 3d 22 |2$=""..P|.mod3$="|
|000045a0| 22 0d 1e 5a 0c 6d 6f 64 | 34 24 3d 22 22 0d 1e 64 |"..Z.mod|4$=""..d|
|000045b0| 05 e1 0d 1e 6e 04 0d 1e | 78 10 dd f2 67 65 74 77 |....n...|x...getw|
|000045c0| 69 6e 69 6e 66 6f 0d 1e | 82 13 ea 20 61 25 3a 61 |ininfo..|... a%:a|
|000045d0| 25 3d 71 25 2b 31 30 32 | 34 0d 1e 8c 11 21 71 25 |%=q%+102|4....!q%|
|000045e0| 3d 77 69 6e 5f 6d 61 69 | 6e 25 0d 1e 96 11 21 61 |=win_mai|n%....!a|
|000045f0| 25 3d 77 69 6e 5f 70 61 | 6e 65 25 0d 1e a0 11 c8 |%=win_pa|ne%.....|
|00004600| 99 20 26 34 30 30 43 42 | 2c 2c 71 25 0d 1e aa 11 |. &400CB|,,q%....|
|00004610| c8 99 20 26 34 30 30 43 | 42 2c 2c 61 25 0d 1e b4 |.. &400C|B,,a%...|
|00004620| 14 70 61 6e 65 78 25 3d | 61 25 21 34 2d 71 25 21 |.panex%=|a%!4-q%!|
|00004630| 34 0d 1e be 14 70 61 6e | 65 79 25 3d 61 25 21 38 |4....pan|ey%=a%!8|
|00004640| 2d 71 25 21 38 0d 1e c8 | 05 e1 0d 1e d2 04 0d 1e |-q%!8...|........|
|00004650| dc 0f dd f2 65 72 72 28 | 66 61 74 25 29 0d 1e e6 |....err(|fat%)...|
|00004660| 2a 65 72 72 24 3d f6 24 | 3a e7 20 a6 28 2d 33 29 |*err$=.$|:. .(-3)|
|00004670| 3d 30 20 65 72 72 24 2b | 3d 22 20 61 74 20 6c 69 |=0 err$+|=" at li|
|00004680| 6e 65 20 22 2b c3 9e 0d | 1e f0 22 e7 20 a6 28 2d |ne "+...|..". .(-|
|00004690| 31 29 20 ff 22 53 65 74 | 20 45 72 72 24 45 72 72 |1) ."Set| Err$Err|
|000046a0| 20 22 2b 65 72 72 24 3a | e0 0d 1e fa 16 21 71 25 | "+err$:|.....!q%|
|000046b0| 3d 9f 3a 24 28 71 25 2b | 34 29 3d 65 72 72 24 0d |=.:$(q%+|4)=err$.|
|000046c0| 1f 04 23 c8 99 20 26 34 | 30 30 44 46 2c 71 25 2c |..#.. &4|00DF,q%,|
|000046d0| 33 2c 22 45 66 66 65 78 | 22 20 b8 20 2c 72 65 73 |3,"Effex|" . ,res|
|000046e0| 70 25 0d 1f 0e 17 e7 20 | 72 65 73 70 25 3c 3e 31 |p%..... |resp%<>1|
|000046f0| 20 71 75 69 74 25 3d 2d | 31 0d 1f 18 15 e7 20 71 | quit%=-|1..... q|
|00004700| 75 69 74 25 20 80 20 a6 | 28 2d 31 29 20 e0 0d 1f |uit% . .|(-1) ...|
|00004710| 22 0f e7 20 66 61 74 25 | 3c 3e 30 20 e0 0d 1f 2c |".. fat%|<>0 ...,|
|00004720| 05 e1 0d 1f 36 04 0d 1f | 40 0e dd f2 69 6e 66 6f |....6...|@...info|
|00004730| 5f 77 69 6e 0d 1f 4a 33 | f2 58 69 63 6f 6e 5f 73 |_win..J3|.Xicon_s|
|00004740| 65 74 73 74 72 28 77 69 | 6e 5f 69 6e 66 6f 25 2c |etstr(wi|n_info%,|
|00004750| 32 2c 22 a9 20 50 61 75 | 6c 20 4d 61 73 6f 6e 2c |2,". Pau|l Mason,|
|00004760| 20 31 39 39 33 22 29 0d | 1f 54 33 f2 58 69 63 6f | 1993").|.T3.Xico|
|00004770| 6e 5f 73 65 74 73 74 72 | 28 77 69 6e 5f 69 6e 66 |n_setstr|(win_inf|
|00004780| 6f 25 2c 33 2c 22 31 2e | 30 32 20 28 30 38 2d 41 |o%,3,"1.|02 (08-A|
|00004790| 70 72 2d 31 39 39 33 29 | 22 29 0d 1f 5e 05 e1 0d |pr-1993)|")..^...|
|000047a0| 1f 68 04 0d 1f 72 0d dd | f2 63 72 65 69 63 6f 6e |.h...r..|.creicon|
|000047b0| 0d 1f 7c 2a 21 71 25 3d | 2d 31 3a 71 25 21 34 3d |..|*!q%=|-1:q%!4=|
|000047c0| 30 3a 71 25 21 38 3d 30 | 3a 71 25 21 31 32 3d 36 |0:q%!8=0|:q%!12=6|
|000047d0| 34 3a 71 25 21 31 36 3d | 36 34 0d 1f 86 25 71 25 |4:q%!16=|64...%q%|
|000047e0| 21 32 30 3d 26 31 37 30 | 30 33 30 33 41 3a 24 28 |!20=&170|0303A:$(|
|000047f0| 71 25 2b 32 34 29 3d 22 | 21 65 66 66 65 78 22 0d |q%+24)="|!effex".|
|00004800| 1f 90 1c c8 99 20 26 34 | 30 30 43 32 2c 2c 71 25 |..... &4|00C2,,q%|
|00004810| 20 b8 20 69 63 6f 6e 62 | 61 72 25 0d 1f 9a 05 e1 | . iconb|ar%.....|
|00004820| 0d 1f a4 04 0d 1f ae 1c | dd f2 63 72 65 5f 6d 65 |........|..cre_me|
|00004830| 6e 75 73 28 73 74 61 72 | 74 25 2c 65 6e 64 25 29 |nus(star|t%,end%)|
|00004840| 0d 1f b8 0e f2 63 72 65 | 6d 5f 69 63 6f 6e 0d 1f |.....cre|m_icon..|
|00004850| c2 0e f2 63 72 65 6d 5f | 6d 61 69 6e 0d 1f cc 05 |...crem_|main....|
|00004860| e1 0d 1f d6 04 0d 1f e0 | 0f dd f2 63 72 65 6d 5f |........|...crem_|
|00004870| 69 63 6f 6e 0d 1f ea 34 | f2 58 6d 65 6e 75 5f 73 |icon...4|.Xmenu_s|
|00004880| 74 61 72 74 28 22 45 66 | 66 65 78 22 2c 73 74 61 |tart("Ef|fex",sta|
|00004890| 72 74 25 2c 65 6e 64 25 | 29 3a 6d 65 6e 75 5f 69 |rt%,end%|):menu_i|
|000048a0| 63 6f 6e 25 3d 72 30 25 | 0d 1f f4 24 f2 58 6d 65 |con%=r0%|...$.Xme|
|000048b0| 6e 75 5f 61 64 64 69 74 | 65 6d 28 22 49 6e 66 6f |nu_addit|em("Info|
|000048c0| 22 2c 77 69 6e 5f 69 6e | 66 6f 25 29 0d 1f fe 22 |",win_in|fo%)..."|
|000048d0| f2 58 6d 65 6e 75 5f 61 | 64 64 69 74 65 6d 28 22 |.Xmenu_a|dditem("|
|000048e0| 43 6c 65 61 72 20 61 6c | 6c 22 2c 2d 31 29 0d 20 |Clear al|l",-1). |
|000048f0| 08 1d f2 58 6d 65 6e 75 | 5f 61 64 64 69 74 65 6d |...Xmenu|_additem|
|00004900| 28 22 51 75 69 74 22 2c | 2d 31 29 0d 20 12 1b f2 |("Quit",|-1). ...|
|00004910| 58 6d 65 6e 75 5f 65 6e | 64 28 73 74 61 72 74 25 |Xmenu_en|d(start%|
|00004920| 2c 65 6e 64 25 29 0d 20 | 1c 05 e1 0d 20 26 04 0d |,end%). |.... &..|
|00004930| 20 30 0d dd f2 6d 65 6e | 75 73 65 6c 0d 20 3a 16 | 0...men|usel. :.|
|00004940| c8 99 20 26 34 30 30 43 | 46 2c 2c 71 25 2b 31 30 |.. &400C|F,,q%+10|
|00004950| 32 34 0d 20 44 1b 61 64 | 6a 75 73 74 25 3d 28 71 |24. D.ad|just%=(q|
|00004960| 25 21 28 31 30 32 34 2b | 38 29 3d 31 29 0d 20 4e |%!(1024+|8)=1). N|
|00004970| 13 c8 8e 20 58 6d 65 6e | 75 5f 70 74 72 25 20 ca |... Xmen|u_ptr% .|
|00004980| 0d 20 58 1d c9 20 6d 65 | 6e 75 5f 69 63 6f 6e 25 |. X.. me|nu_icon%|
|00004990| 20 3a 20 f2 64 65 63 6d | 5f 69 63 6f 6e 0d 20 62 | : .decm|_icon. b|
|000049a0| 1d c9 20 6d 65 6e 75 5f | 6d 61 69 6e 25 20 3a 20 |.. menu_|main% : |
|000049b0| f2 64 65 63 6d 5f 6d 61 | 69 6e 0d 20 6c 05 cb 0d |.decm_ma|in. l...|
|000049c0| 20 76 35 e7 20 61 64 6a | 75 73 74 25 20 c8 99 20 | v5. adj|ust% .. |
|000049d0| 26 34 30 30 44 34 2c 2c | 58 6d 65 6e 75 5f 70 74 |&400D4,,|Xmenu_pt|
|000049e0| 72 25 2c 58 6d 65 6e 75 | 5f 78 25 2c 58 6d 65 6e |r%,Xmenu|_x%,Xmen|
|000049f0| 75 5f 79 25 0d 20 80 05 | e1 0d 20 8a 04 0d 20 94 |u_y%. ..|.. ... .|
|00004a00| 0f dd f2 64 65 63 6d 5f | 69 63 6f 6e 0d 20 9e 0d |...decm_|icon. ..|
|00004a10| c8 8e 20 71 25 21 30 20 | ca 0d 20 a8 42 c9 20 31 |.. q%!0 |.. .B. 1|
|00004a20| 20 3a 20 e7 20 73 61 6d | 70 6c 65 5f 74 79 70 65 | : . sam|ple_type|
|00004a30| 25 3e 3d 30 20 f2 58 6d | 65 6d 5f 72 65 6c 65 61 |%>=0 .Xm|em_relea|
|00004a40| 73 65 28 73 61 6d 70 6c | 65 25 29 3a 73 61 6d 70 |se(sampl|e%):samp|
|00004a50| 6c 65 5f 74 79 70 65 25 | 3d 2d 31 0d 20 b2 1d 20 |le_type%|=-1. .. |
|00004a60| 21 71 25 3d 77 69 6e 5f | 6d 61 69 6e 25 3a f2 63 |!q%=win_|main%:.c|
|00004a70| 6c 6f 73 65 28 71 25 29 | 0d 20 bc 12 c9 20 32 20 |lose(q%)|. ... 2 |
|00004a80| 3a 20 71 75 69 74 25 3d | 2d 31 0d 20 c6 05 cb 0d |: quit%=|-1. ....|
|00004a90| 20 d0 05 e1 0d 20 da 04 | 0d 20 e4 15 dd f2 6f 70 | .... ..|. ....op|
|00004aa0| 65 6e 5f 73 61 76 65 28 | 77 69 6e 25 29 0d 20 ee |en_save(|win%). .|
|00004ab0| 0d c8 8e 20 77 69 6e 25 | 20 ca 0d 20 f8 25 c9 20 |... win%| .. .%. |
|00004ac0| 30 20 3a 20 f2 6f 73 61 | 76 65 77 69 6e 28 22 36 |0 : .osa|vewin("6|
|00004ad0| 33 31 22 2c 73 6e 61 6d | 65 5f 6c 6f 67 24 29 0d |31",snam|e_log$).|
|00004ae0| 21 02 25 c9 20 31 20 3a | 20 f2 6f 73 61 76 65 77 |!.%. 1 :| .osavew|
|00004af0| 69 6e 28 22 36 33 32 22 | 2c 73 6e 61 6d 65 5f 73 |in("632"|,sname_s|
|00004b00| 67 6e 24 29 0d 21 0c 25 | c9 20 32 20 3a 20 f2 6f |gn$).!.%|. 2 : .o|
|00004b10| 73 61 76 65 77 69 6e 28 | 22 36 33 33 22 2c 73 6e |savewin(|"633",sn|
|00004b20| 61 6d 65 5f 75 6e 73 24 | 29 0d 21 16 25 c9 20 33 |ame_uns$|).!.%. 3|
|00004b30| 20 3a 20 f2 6f 73 61 76 | 65 77 69 6e 28 22 36 33 | : .osav|ewin("63|
|00004b40| 34 22 2c 73 6e 61 6d 65 | 5f 65 66 66 24 29 0d 21 |4",sname|_eff$).!|
|00004b50| 20 25 c9 20 34 20 3a 20 | f2 6f 73 61 76 65 77 69 | %. 4 : |.osavewi|
|00004b60| 6e 28 22 44 33 43 22 2c | 73 6e 61 6d 65 5f 61 72 |n("D3C",|sname_ar|
|00004b70| 6d 24 29 0d 21 2a 05 cb | 0d 21 34 05 e1 0d 21 3e |m$).!*..|.!4...!>|
|00004b80| 04 0d 21 48 18 dd f2 6f | 73 61 76 65 77 69 6e 28 |..!H...o|savewin(|
|00004b90| 74 79 70 65 24 2c 61 24 | 29 0d 21 52 11 24 73 61 |type$,a$|).!R.$sa|
|00004ba0| 76 65 5f 74 78 74 25 3d | 61 24 0d 21 5c 16 c8 99 |ve_txt%=|a$.!\...|
|00004bb0| 20 26 34 30 30 43 46 2c | 2c 71 25 2b 31 30 32 34 | &400CF,|,q%+1024|
|00004bc0| 0d 21 66 1f 24 73 61 76 | 65 5f 76 61 6c 69 64 25 |.!f.$sav|e_valid%|
|00004bd0| 3d 22 53 66 69 6c 65 5f | 22 2b 74 79 70 65 24 0d |="Sfile_|"+type$.|
|00004be0| 21 70 1b 66 69 6c 65 5f | 74 79 70 65 25 3d a0 28 |!p.file_|type%=.(|
|00004bf0| 22 26 22 2b 74 79 70 65 | 24 29 0d 21 7a 19 73 61 |"&"+type|$).!z.sa|
|00004c00| 76 65 5f 73 69 7a 65 25 | 3d 73 61 6d 70 5f 73 69 |ve_size%|=samp_si|
|00004c10| 7a 65 25 0d 21 84 28 c8 | 99 20 26 34 30 30 44 34 |ze%.!.(.|. &400D4|
|00004c20| 2c 2c 77 69 6e 5f 73 61 | 76 65 25 2c 71 25 21 31 |,,win_sa|ve%,q%!1|
|00004c30| 30 32 34 2c 71 25 21 31 | 30 32 38 0d 21 8e 05 e1 |024,q%!1|028.!...|
|00004c40| 0d 21 98 04 0d 21 a2 10 | dd a4 6b 65 79 5f 6f 6b |.!...!..|..key_ok|
|00004c50| 28 6b 25 29 0d 21 ac 10 | ea 20 6f 6b 25 3a 6f 6b |(k%).!..|. ok%:ok|
|00004c60| 25 3d 2d 31 0d 21 b6 0e | f2 76 61 6c 69 64 5f 73 |%=-1.!..|.valid_s|
|00004c70| 65 6c 0d 21 c0 0e c8 8e | 20 6b 25 2b 36 34 20 ca |el.!....| k%+64 .|
|00004c80| 0d 21 ca 25 c9 20 97 22 | 41 22 20 3a 20 f2 61 64 |.!.%. ."|A" : .ad|
|00004c90| 6a 5f 73 65 6c 28 30 2c | 73 61 6d 70 5f 73 69 7a |j_sel(0,|samp_siz|
|00004ca0| 65 25 2d 31 29 0d 21 d4 | 16 c9 20 97 22 43 22 20 |e%-1).!.|.. ."C" |
|00004cb0| 3a 20 f2 63 6f 70 79 5f | 73 65 6c 0d 21 de 23 c9 |: .copy_|sel.!.#.|
|00004cc0| 20 97 22 49 22 20 3a 20 | f2 66 61 64 65 69 6e 28 | ."I" : |.fadein(|
|00004cd0| 53 73 74 61 72 74 25 2c | 53 65 6e 64 25 29 0d 21 |Sstart%,|Send%).!|
|00004ce0| e8 38 c9 20 97 22 4c 22 | 20 3a 20 f2 58 69 63 6f |.8. ."L"| : .Xico|
|00004cf0| 6e 5f 73 65 74 73 74 72 | 28 77 69 6e 5f 6d 61 69 |n_setstr|(win_mai|
|00004d00| 6e 25 2c 32 35 2c 22 31 | 32 37 22 29 3a 3f 56 76 |n%,25,"1|27"):?Vv|
|00004d10| 6f 6c 3d 31 32 37 0d 21 | f2 24 c9 20 97 22 4f 22 |ol=127.!|.$. ."O"|
|00004d20| 20 3a 20 f2 66 61 64 65 | 6f 75 74 28 53 73 74 61 | : .fade|out(Ssta|
|00004d30| 72 74 25 2c 53 65 6e 64 | 25 29 0d 21 fc 11 c9 20 |rt%,Send|%).!... |
|00004d40| 97 22 50 22 20 3a 20 f2 | 70 6c 79 0d 22 06 33 c9 |."P" : .|ply.".3.|
|00004d50| 20 97 22 53 22 20 3a 20 | 3f 56 63 6f 6d 6d 61 6e | ."S" : |?Vcomman|
|00004d60| 64 3d 31 3a c8 96 3a 3f | 56 63 6f 6d 6d 61 6e 64 |d=1:..:?|Vcommand|
|00004d70| 3d 30 3a 21 56 63 6f 75 | 6e 74 65 72 3d 30 0d 22 |=0:!Vcou|nter=0."|
|00004d80| 10 44 c9 20 97 22 54 22 | 20 3a 20 74 72 61 63 6b |.D. ."T"| : track|
|00004d90| 69 6e 67 25 3d ac 74 72 | 61 63 6b 69 6e 67 25 3a |ing%=.tr|acking%:|
|00004da0| f2 58 6d 65 6e 75 5f 74 | 69 63 6b 28 6d 65 6e 75 |.Xmenu_t|ick(menu|
|00004db0| 5f 74 72 61 63 6b 25 2c | 74 72 61 63 6b 69 6e 67 |_track%,|tracking|
|00004dc0| 25 29 0d 22 1a 15 c9 20 | 97 22 45 22 20 3a 20 f2 |%)."... |."E" : .|
|00004dd0| 70 6c 79 5f 73 65 6c 0d | 22 24 16 c9 20 97 22 56 |ply_sel.|"$.. ."V|
|00004de0| 22 20 3a 20 f2 6d 6f 76 | 65 5f 73 65 6c 0d 22 2e |" : .mov|e_sel.".|
|00004df0| 15 c9 20 97 22 58 22 20 | 3a 20 f2 64 65 6c 5f 73 |.. ."X" |: .del_s|
|00004e00| 65 6c 0d 22 38 17 c9 20 | 97 22 59 22 20 3a 20 f2 |el."8.. |."Y" : .|
|00004e10| 63 6f 70 79 32 5f 73 65 | 6c 0d 22 42 1c c9 20 97 |copy2_se|l."B.. .|
|00004e20| 22 5a 22 20 3a 20 f2 61 | 64 6a 5f 73 65 6c 28 2d |"Z" : .a|dj_sel(-|
|00004e30| 31 2c 2d 31 29 0d 22 4c | 16 c9 20 97 22 5a 22 2b |1,-1)."L|.. ."Z"+|
|00004e40| 36 34 20 3a 20 f2 73 65 | 6c 7a 6d 0d 22 56 13 c9 |64 : .se|lzm."V..|
|00004e50| 20 33 32 2b 36 34 20 3a | 20 f2 63 6f 6e 74 0d 22 | 32+64 :| .cont."|
|00004e60| 60 1c c9 20 26 31 38 33 | 2b 36 34 3a 20 f2 6f 70 |`.. &183|+64: .op|
|00004e70| 65 6e 5f 73 61 76 65 28 | 33 29 0d 22 6a 0d 7f 20 |en_save(|3)."j.. |
|00004e80| 3a 20 6f 6b 25 3d 30 0d | 22 74 05 cb 0d 22 7e 08 |: ok%=0.|"t..."~.|
|00004e90| 3d 6f 6b 25 0d 22 88 04 | 0d 22 92 0a dd f2 63 6f |=ok%."..|."....co|
|00004ea0| 6e 74 0d 22 9c 07 ea 20 | 73 0d 22 a6 32 e7 20 73 |nt."... |s.".2. s|
|00004eb0| 61 6d 70 6c 65 5f 74 79 | 70 65 25 3e 3d 30 20 80 |ample_ty|pe%>=0 .|
|00004ec0| 20 63 61 72 65 74 25 3e | 30 20 80 20 63 61 72 65 | caret%>|0 . care|
|00004ed0| 74 25 3c 21 56 73 65 6e | 64 20 8c 0d 22 b0 21 73 |t%<!Vsen|d ..".!s|
|00004ee0| 3d bb a4 58 69 63 6f 6e | 5f 67 65 74 73 74 72 28 |=..Xicon|_getstr(|
|00004ef0| 77 69 6e 5f 6d 61 69 6e | 25 2c 35 29 0d 22 ba 24 |win_main|%,5).".$|
|00004f00| f2 70 6c 61 79 28 63 61 | 72 65 74 25 2b 73 61 6d |.play(ca|ret%+sam|
|00004f10| 70 6c 65 25 2c 21 56 73 | 65 6e 64 2c 30 2c 73 29 |ple%,!Vs|end,0,s)|
|00004f20| 0d 22 c4 05 cd 0d 22 ce | 05 e1 0d 22 d8 04 0d 22 |."....".|..."..."|
|00004f30| e2 14 dd f2 63 68 65 63 | 6b 5f 61 6c 6c 28 63 63 |....chec|k_all(cc|
|00004f40| 25 29 0d 22 ec 2e e7 20 | 63 61 72 65 74 25 3c 30 |%)."... |caret%<0|
|00004f50| 20 80 20 63 63 25 3c 3e | 30 20 85 20 31 2c 22 4e | . cc%<>|0 . 1,"N|
|00004f60| 6f 20 63 61 72 65 74 20 | 70 72 65 73 65 6e 74 22 |o caret |present"|
|00004f70| 0d 22 f6 25 e7 20 73 65 | 6c 5f 73 74 61 72 74 25 |.".%. se|l_start%|
|00004f80| 3c 30 20 85 20 31 2c 22 | 4e 6f 20 73 65 6c 65 63 |<0 . 1,"|No selec|
|00004f90| 74 69 6f 6e 22 0d 23 00 | 05 e1 0d 23 0a 04 0d 23 |tion".#.|...#...#|
|00004fa0| 14 0f dd f2 63 6f 70 79 | 32 5f 73 65 6c 0d 23 1e |....copy|2_sel.#.|
|00004fb0| 12 f2 63 68 65 63 6b 5f | 61 6c 6c 28 2d 31 29 0d |..check_|all(-1).|
|00004fc0| 23 28 19 41 25 3d 73 65 | 6c 5f 73 74 61 72 74 25 |#(.A%=se|l_start%|
|00004fd0| 2b 73 61 6d 70 6c 65 25 | 0d 23 32 17 42 25 3d 73 |+sample%|.#2.B%=s|
|00004fe0| 65 6c 5f 65 6e 64 25 2b | 73 61 6d 70 6c 65 25 0d |el_end%+|sample%.|
|00004ff0| 23 3c 15 43 25 3d 63 61 | 72 65 74 25 2b 73 61 6d |#<.C%=ca|ret%+sam|
|00005000| 70 6c 65 25 0d 23 46 19 | 44 25 3d 73 61 6d 70 6c |ple%.#F.|D%=sampl|
|00005010| 65 25 2b 73 61 6d 70 5f | 73 69 7a 65 25 0d 23 50 |e%+samp_|size%.#P|
|00005020| 0a d6 20 63 6f 70 79 0d | 23 5a 08 f2 72 65 64 0d |.. copy.|#Z..red.|
|00005030| 23 64 05 e1 0d 23 6e 04 | 0d 23 78 18 dd f2 69 6e |#d...#n.|.#x...in|
|00005040| 73 65 72 74 28 70 6f 73 | 25 2c 73 69 7a 65 25 29 |sert(pos|%,size%)|
|00005050| 0d 23 82 1e f2 58 6d 65 | 6d 5f 64 65 6c 74 61 28 |.#...Xme|m_delta(|
|00005060| 73 61 6d 70 6c 65 25 2c | 73 69 7a 65 25 29 0d 23 |sample%,|size%).#|
|00005070| 8c 27 f2 63 6f 70 79 28 | 70 6f 73 25 2c 73 61 6d |.'.copy(|pos%,sam|
|00005080| 70 5f 73 69 7a 65 25 2d | 31 2c 70 6f 73 25 2b 73 |p_size%-|1,pos%+s|
|00005090| 69 7a 65 25 29 0d 23 96 | 1f e7 20 63 61 72 65 74 |ize%).#.|.. caret|
|000050a0| 25 3e 70 6f 73 25 20 63 | 61 72 65 74 25 2b 3d 73 |%>pos% c|aret%+=s|
|000050b0| 69 7a 65 25 0d 23 a0 15 | 73 61 6d 70 5f 73 69 7a |ize%.#..|samp_siz|
|000050c0| 65 25 2b 3d 73 69 7a 65 | 25 0d 23 aa 27 e7 20 73 |e%+=size|%.#.'. s|
|000050d0| 65 6c 5f 73 74 61 72 74 | 25 3e 70 6f 73 25 20 73 |el_start|%>pos% s|
|000050e0| 65 6c 5f 73 74 61 72 74 | 25 2b 3d 73 69 7a 65 25 |el_start|%+=size%|
|000050f0| 0d 23 b4 23 e7 20 73 65 | 6c 5f 65 6e 64 25 3e 70 |.#.#. se|l_end%>p|
|00005100| 6f 73 25 20 73 65 6c 5f | 65 6e 64 25 2b 3d 73 69 |os% sel_|end%+=si|
|00005110| 7a 65 25 0d 23 be 05 e1 | 0d 23 c8 04 0d 23 d2 19 |ze%.#...|.#...#..|
|00005120| dd f2 64 65 6c 65 74 65 | 28 73 74 61 72 74 25 2c |..delete|(start%,|
|00005130| 65 6e 64 25 29 0d 23 dc | 37 e7 20 65 6e 64 25 3c |end%).#.|7. end%<|
|00005140| 73 61 6d 70 5f 73 69 7a | 65 25 2d 31 20 f2 63 6f |samp_siz|e%-1 .co|
|00005150| 70 79 28 65 6e 64 25 2c | 73 61 6d 70 5f 73 69 7a |py(end%,|samp_siz|
|00005160| 65 25 2d 31 2c 73 74 61 | 72 74 25 29 0d 23 e6 24 |e%-1,sta|rt%).#.$|
|00005170| f2 58 6d 65 6d 5f 64 65 | 6c 74 61 28 73 61 6d 70 |.Xmem_de|lta(samp|
|00005180| 6c 65 25 2c 73 74 61 72 | 74 25 2d 65 6e 64 25 29 |le%,star|t%-end%)|
|00005190| 0d 23 f0 31 e7 20 63 61 | 72 65 74 25 3e 3d 73 74 |.#.1. ca|ret%>=st|
|000051a0| 61 72 74 25 20 80 20 63 | 61 72 65 74 25 3c 3d 65 |art% . c|aret%<=e|
|000051b0| 6e 64 25 20 63 61 72 65 | 74 25 3d 73 74 61 72 74 |nd% care|t%=start|
|000051c0| 25 0d 23 fa 3d e7 20 73 | 65 6c 5f 73 74 61 72 74 |%.#.=. s|el_start|
|000051d0| 25 3e 3d 73 74 61 72 74 | 25 20 80 20 73 65 6c 5f |%>=start|% . sel_|
|000051e0| 73 74 61 72 74 25 3c 3d | 65 6e 64 25 20 73 65 6c |start%<=|end% sel|
|000051f0| 5f 73 74 61 72 74 25 3d | 73 74 61 72 74 25 0d 24 |_start%=|start%.$|
|00005200| 04 37 e7 20 73 65 6c 5f | 65 6e 64 25 3e 3d 73 74 |.7. sel_|end%>=st|
|00005210| 61 72 74 25 20 80 20 73 | 65 6c 5f 65 6e 64 25 3c |art% . s|el_end%<|
|00005220| 3d 65 6e 64 25 20 73 65 | 6c 5f 65 6e 64 25 3d 73 |=end% se|l_end%=s|
|00005230| 74 61 72 74 25 0d 24 0e | 27 e7 20 63 61 72 65 74 |tart%.$.|'. caret|
|00005240| 25 3e 73 74 61 72 74 25 | 20 63 61 72 65 74 25 2d |%>start%| caret%-|
|00005250| 3d 65 6e 64 25 2d 73 74 | 61 72 74 25 0d 24 18 1b |=end%-st|art%.$..|
|00005260| 73 61 6d 70 5f 73 69 7a | 65 25 2d 3d 65 6e 64 25 |samp_siz|e%-=end%|
|00005270| 2d 73 74 61 72 74 25 0d | 24 22 05 e1 0d 24 2c 04 |-start%.|$"...$,.|
|00005280| 0d 24 36 0d dd f2 64 65 | 6c 5f 73 65 6c 0d 24 40 |.$6...de|l_sel.$@|
|00005290| 11 f2 63 68 65 63 6b 5f | 61 6c 6c 28 30 29 0d 24 |..check_|all(0).$|
|000052a0| 4a 20 f2 64 65 6c 65 74 | 65 28 73 65 6c 5f 73 74 |J .delet|e(sel_st|
|000052b0| 61 72 74 25 2c 73 65 6c | 5f 65 6e 64 25 29 0d 24 |art%,sel|_end%).$|
|000052c0| 54 11 73 65 6c 5f 73 74 | 61 72 74 25 3d 2d 31 0d |T.sel_st|art%=-1.|
|000052d0| 24 5e 0f 73 65 6c 5f 65 | 6e 64 25 3d 2d 31 0d 24 |$^.sel_e|nd%=-1.$|
|000052e0| 68 08 f2 72 65 64 0d 24 | 72 05 e1 0d 24 7c 04 0d |h..red.$|r...$|..|
|000052f0| 24 86 0e dd f2 63 6f 70 | 79 5f 73 65 6c 0d 24 90 |$....cop|y_sel.$.|
|00005300| 12 f2 63 68 65 63 6b 5f | 61 6c 6c 28 2d 31 29 0d |..check_|all(-1).|
|00005310| 24 9a 4e e7 20 63 61 72 | 65 74 25 3e 3d 73 65 6c |$.N. car|et%>=sel|
|00005320| 5f 73 74 61 72 74 25 20 | 80 20 63 61 72 65 74 25 |_start% |. caret%|
|00005330| 3c 3d 73 65 6c 5f 65 6e | 64 25 20 85 20 31 2c 22 |<=sel_en|d% . 1,"|
|00005340| 43 61 6e 6e 6f 74 20 63 | 6f 70 79 20 69 6e 73 69 |Cannot c|opy insi|
|00005350| 64 65 20 73 65 6c 65 63 | 74 69 6f 6e 22 0d 24 a4 |de selec|tion".$.|
|00005360| 27 f2 69 6e 73 65 72 74 | 28 63 61 72 65 74 25 2c |'.insert|(caret%,|
|00005370| 73 65 6c 5f 65 6e 64 25 | 2d 73 65 6c 5f 73 74 61 |sel_end%|-sel_sta|
|00005380| 72 74 25 29 0d 24 ae 25 | f2 63 6f 70 79 28 73 65 |rt%).$.%|.copy(se|
|00005390| 6c 5f 73 74 61 72 74 25 | 2c 73 65 6c 5f 65 6e 64 |l_start%|,sel_end|
|000053a0| 25 2c 63 61 72 65 74 25 | 29 0d 24 b8 08 f2 72 65 |%,caret%|).$...re|
|000053b0| 64 0d 24 c2 05 e1 0d 24 | cc 04 0d 24 d6 0e dd f2 |d.$....$|...$....|
|000053c0| 6d 6f 76 65 5f 73 65 6c | 0d 24 e0 10 ea 20 73 69 |move_sel|.$... si|
|000053d0| 7a 65 25 2c 70 6f 73 25 | 0d 24 ea 12 f2 63 68 65 |ze%,pos%|.$...che|
|000053e0| 63 6b 5f 61 6c 6c 28 2d | 31 29 0d 24 f4 1d 73 69 |ck_all(-|1).$..si|
|000053f0| 7a 65 25 3d 73 65 6c 5f | 65 6e 64 25 2d 73 65 6c |ze%=sel_|end%-sel|
|00005400| 5f 73 74 61 72 74 25 0d | 24 fe 1b 70 6f 73 25 3d |_start%.|$..pos%=|
|00005410| a4 58 6d 65 6d 5f 63 6c | 61 69 6d 28 73 69 7a 65 |.Xmem_cl|aim(size|
|00005420| 25 29 0d 25 08 2b f2 63 | 6f 70 79 28 73 65 6c 5f |%).%.+.c|opy(sel_|
|00005430| 73 74 61 72 74 25 2c 73 | 65 6c 5f 65 6e 64 25 2c |start%,s|el_end%,|
|00005440| 70 6f 73 25 2d 73 61 6d | 70 6c 65 25 29 0d 25 12 |pos%-sam|ple%).%.|
|00005450| 20 f2 64 65 6c 65 74 65 | 28 73 65 6c 5f 73 74 61 | .delete|(sel_sta|
|00005460| 72 74 25 2c 73 65 6c 5f | 65 6e 64 25 29 0d 25 1c |rt%,sel_|end%).%.|
|00005470| 19 f2 69 6e 73 65 72 74 | 28 63 61 72 65 74 25 2c |..insert|(caret%,|
|00005480| 73 69 7a 65 25 29 0d 25 | 26 33 f2 63 6f 70 79 28 |size%).%|&3.copy(|
|00005490| 70 6f 73 25 2d 73 61 6d | 70 6c 65 25 2c 70 6f 73 |pos%-sam|ple%,pos|
|000054a0| 25 2d 73 61 6d 70 6c 65 | 25 2b 73 69 7a 65 25 2d |%-sample|%+size%-|
|000054b0| 31 2c 63 61 72 65 74 25 | 29 0d 25 30 17 f2 58 6d |1,caret%|).%0..Xm|
|000054c0| 65 6d 5f 72 65 6c 65 61 | 73 65 28 70 6f 73 25 29 |em_relea|se(pos%)|
|000054d0| 0d 25 3a 15 73 65 6c 5f | 73 74 61 72 74 25 3d 63 |.%:.sel_|start%=c|
|000054e0| 61 72 65 74 25 0d 25 44 | 19 73 65 6c 5f 65 6e 64 |aret%.%D|.sel_end|
|000054f0| 25 3d 63 61 72 65 74 25 | 2b 73 69 7a 65 25 0d 25 |%=caret%|+size%.%|
|00005500| 4e 08 f2 72 65 64 0d 25 | 58 05 e1 0d 25 62 04 0d |N..red.%|X...%b..|
|00005510| 25 6c 18 dd f2 6d 6f 64 | 75 6c 61 74 65 28 73 24 |%l...mod|ulate(s$|
|00005520| 2c 73 25 2c 65 25 29 0d | 25 76 17 ea 20 6c 65 6e |,s%,e%).|%v.. len|
|00005530| 25 2c 5a 3a 6c 65 6e 25 | 3d 65 25 2d 73 25 0d 25 |%,Z:len%|=e%-s%.%|
|00005540| 80 12 5a 3d 73 61 6d 70 | 5f 63 65 6e 74 72 65 25 |..Z=samp|_centre%|
|00005550| 0d 25 8a 15 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 |.%.... "|Hourglas|
|00005560| 73 5f 4f 6e 22 0d 25 94 | 41 e3 20 58 3d 73 25 2d |s_On".%.|A. X=s%-|
|00005570| 73 61 6d 70 6c 65 25 20 | b8 20 65 25 2d 73 61 6d |sample% |. e%-sam|
|00005580| 70 6c 65 25 3a 59 3d 73 | 61 6d 70 6c 65 25 3f 58 |ple%:Y=s|ample%?X|
|00005590| 3a 59 3d a0 28 73 24 29 | 3a e7 20 59 3e 32 35 35 |:Y=.(s$)|:. Y>255|
|000055a0| 20 59 3d 32 35 35 0d 25 | 9e 2f c8 99 20 26 34 30 | Y=255.%|./.. &40|
|000055b0| 36 43 34 2c 28 58 2d 73 | 25 2b 73 61 6d 70 6c 65 |6C4,(X-s|%+sample|
|000055c0| 25 29 2a 31 30 30 2f 6c | 65 6e 25 3a e7 20 59 3c |%)*100/l|en%:. Y<|
|000055d0| 30 20 59 3d 30 0d 25 a8 | 15 73 61 6d 70 6c 65 25 |0 Y=0.%.|.sample%|
|000055e0| 3f 58 3d 59 3a 5a 3d 59 | 3a ed 0d 25 b2 08 f2 72 |?X=Y:Z=Y|:..%...r|
|000055f0| 65 64 0d 25 bc 16 c8 99 | 20 22 48 6f 75 72 67 6c |ed.%....| "Hourgl|
|00005600| 61 73 73 5f 4f 66 66 22 | 0d 25 c6 05 e1 0d 25 d0 |ass_Off"|.%....%.|
|00005610| 04 0d 25 da 0b dd f2 73 | 65 6c 7a 6d 0d 25 e4 33 |..%....s|elzm.%.3|
|00005620| f2 7a 6f 6f 6d 28 39 39 | 39 2c 28 73 65 6c 5f 65 |.zoom(99|9,(sel_e|
|00005630| 6e 64 25 2d 73 65 6c 5f | 73 74 61 72 74 25 29 2a |nd%-sel_|start%)*|
|00005640| 39 39 39 2f 73 61 6d 70 | 5f 73 69 7a 65 25 29 0d |999/samp|_size%).|
|00005650| 25 ee 1f 21 71 25 3d 77 | 69 6e 5f 70 61 6e 65 25 |%..!q%=w|in_pane%|
|00005660| 3a c8 99 20 26 34 30 30 | 43 43 2c 2c 71 25 0d 25 |:.. &400|CC,,q%.%|
|00005670| f8 25 71 25 21 32 30 3d | 71 25 21 35 32 2a 73 65 |.%q%!20=|q%!52*se|
|00005680| 6c 5f 73 74 61 72 74 25 | 2f 73 61 6d 70 5f 73 69 |l_start%|/samp_si|
|00005690| 7a 65 25 0d 26 02 11 c8 | 99 20 26 34 30 30 43 35 |ze%.&...|. &400C5|
|000056a0| 2c 2c 71 25 0d 26 0c 05 | e1 0d 26 16 04 0d 26 20 |,,q%.&..|..&...& |
|000056b0| 0f dd f2 64 65 63 6d 5f | 6d 61 69 6e 0d 26 2a 0c |...decm_|main.&*.|
|000056c0| c8 8e 20 21 71 25 20 ca | 0d 26 34 13 c9 20 30 20 |.. !q% .|.&4.. 0 |
|000056d0| 3a 20 c8 8e 20 71 25 21 | 34 20 ca 0d 26 3e 2a 20 |: .. q%!|4 ..&>* |
|000056e0| c9 20 32 20 3a 20 73 61 | 6d 70 6c 65 5f 74 79 70 |. 2 : sa|mple_typ|
|000056f0| 65 25 3d 30 3a f2 6e 65 | 77 5f 73 61 6d 70 6c 65 |e%=0:.ne|w_sample|
|00005700| 5f 74 79 70 65 0d 26 48 | 2a 20 c9 20 33 20 3a 20 |_type.&H|* . 3 : |
|00005710| 73 61 6d 70 6c 65 5f 74 | 79 70 65 25 3d 31 3a f2 |sample_t|ype%=1:.|
|00005720| 6e 65 77 5f 73 61 6d 70 | 6c 65 5f 74 79 70 65 0d |new_samp|le_type.|
|00005730| 26 52 2a 20 c9 20 34 20 | 3a 20 73 61 6d 70 6c 65 |&R* . 4 |: sample|
|00005740| 5f 74 79 70 65 25 3d 32 | 3a f2 6e 65 77 5f 73 61 |_type%=2|:.new_sa|
|00005750| 6d 70 6c 65 5f 74 79 70 | 65 0d 26 5c 13 20 c9 20 |mple_typ|e.&\. . |
|00005760| 35 20 3a 20 f2 6c 69 6e | 32 6c 6f 67 0d 26 66 25 |5 : .lin|2log.&f%|
|00005770| 20 20 73 61 6d 70 6c 65 | 5f 74 79 70 65 25 3d 30 | sample|_type%=0|
|00005780| 3a f2 6e 65 77 5f 73 61 | 6d 70 6c 65 5f 74 79 70 |:.new_sa|mple_typ|
|00005790| 65 0d 26 70 13 20 c9 20 | 36 20 3a 20 f2 6c 6f 67 |e.&p. . |6 : .log|
|000057a0| 32 6c 69 6e 0d 26 7a 25 | 20 20 73 61 6d 70 6c 65 |2lin.&z%| sample|
|000057b0| 5f 74 79 70 65 25 3d 31 | 3a f2 6e 65 77 5f 73 61 |_type%=1|:.new_sa|
|000057c0| 6d 70 6c 65 5f 74 79 70 | 65 0d 26 84 31 20 c9 20 |mple_typ|e.&.1 . |
|000057d0| 37 20 3a 20 f2 65 6f 72 | 28 31 32 38 2c 73 61 6d |7 : .eor|(128,sam|
|000057e0| 70 6c 65 25 2c 73 61 6d | 70 5f 73 69 7a 65 25 2b |ple%,sam|p_size%+|
|000057f0| 73 61 6d 70 6c 65 25 2d | 31 29 0d 26 8e 32 20 20 |sample%-|1).&.2 |
|00005800| 73 61 6d 70 6c 65 5f 74 | 79 70 65 25 3d 73 61 6d |sample_t|ype%=sam|
|00005810| 70 6c 65 5f 74 79 70 65 | 25 82 33 3a f2 6e 65 77 |ple_type|%.3:.new|
|00005820| 5f 73 61 6d 70 6c 65 5f | 74 79 70 65 0d 26 98 17 |_sample_|type.&..|
|00005830| 20 c9 20 38 20 3a 20 f2 | 63 61 6c 63 5f 63 65 6e | . 8 : .|calc_cen|
|00005840| 74 72 65 0d 26 a2 06 20 | cb 0d 26 ac 13 c9 20 31 |tre.&.. |..&... 1|
|00005850| 20 3a 20 c8 8e 20 71 25 | 21 34 20 ca 0d 26 b6 23 | : .. q%|!4 ..&.#|
|00005860| 20 c9 20 30 2c 31 2c 32 | 2c 33 2c 34 20 3a 20 f2 | . 0,1,2|,3,4 : .|
|00005870| 6f 70 65 6e 5f 73 61 76 | 65 28 71 25 21 34 29 0d |open_sav|e(q%!4).|
|00005880| 26 c0 06 20 cb 0d 26 ca | 13 c9 20 32 20 3a 20 c8 |&.. ..&.|.. 2 : .|
|00005890| 8e 20 71 25 21 34 20 ca | 0d 26 d4 23 20 c9 20 30 |. q%!4 .|.&.# . 0|
|000058a0| 20 3a 20 f2 61 64 6a 5f | 73 65 6c 28 30 2c 73 61 | : .adj_|sel(0,sa|
|000058b0| 6d 70 5f 73 69 7a 65 25 | 2d 31 29 0d 26 de 1a 20 |mp_size%|-1).&.. |
|000058c0| c9 20 31 20 3a 20 f2 61 | 64 6a 5f 73 65 6c 28 2d |. 1 : .a|dj_sel(-|
|000058d0| 31 2c 2d 31 29 0d 26 e8 | 13 20 c9 20 32 20 3a 20 |1,-1).&.|. . 2 : |
|000058e0| f2 64 65 6c 5f 73 65 6c | 0d 26 f2 14 20 c9 20 33 |.del_sel|.&.. . 3|
|000058f0| 20 3a 20 f2 63 6f 70 79 | 5f 73 65 6c 0d 26 fc 15 | : .copy|_sel.&..|
|00005900| 20 c9 20 34 20 3a 20 f2 | 63 6f 70 79 32 5f 73 65 | . 4 : .|copy2_se|
|00005910| 6c 0d 27 06 14 20 c9 20 | 35 20 3a 20 f2 6d 6f 76 |l.'.. . |5 : .mov|
|00005920| 65 5f 73 65 6c 0d 27 10 | 0f 20 c9 20 36 20 3a 20 |e_sel.'.|. . 6 : |
|00005930| f2 6d 69 78 0d 27 1a 12 | 20 c9 20 37 20 3a 20 f2 |.mix.'..| . 7 : .|
|00005940| 70 72 65 6d 69 78 0d 27 | 24 13 20 c9 20 38 20 3a |premix.'|$. . 8 :|
|00005950| 20 f2 70 6f 73 74 6d 69 | 78 0d 27 2e 11 20 c9 20 | .postmi|x.'.. . |
|00005960| 39 20 3a 20 f2 73 65 6c | 7a 6d 0d 27 38 13 20 c9 |9 : .sel|zm.'8. .|
|00005970| 20 31 30 3a 20 f2 70 6c | 79 5f 73 65 6c 0d 27 42 | 10: .pl|y_sel.'B|
|00005980| 06 20 cb 0d 27 4c 14 c9 | 20 33 20 3a 20 f2 76 61 |. ..'L..| 3 : .va|
|00005990| 6c 69 64 5f 73 65 6c 0d | 27 56 0e 20 c8 8e 20 71 |lid_sel.|'V. .. q|
|000059a0| 25 21 34 20 ca 0d 27 60 | 16 20 c9 20 30 20 3a 20 |%!4 ..'`|. . 0 : |
|000059b0| f2 74 6f 67 67 6c 65 5f | 73 65 6c 0d 27 6a 22 20 |.toggle_|sel.'j" |
|000059c0| c9 20 31 20 3a 20 f2 72 | 65 76 65 72 73 65 28 53 |. 1 : .r|everse(S|
|000059d0| 73 74 61 72 74 25 2c 53 | 65 6e 64 25 29 0d 27 74 |start%,S|end%).'t|
|000059e0| 20 20 c9 20 32 20 3a 20 | f2 61 6d 70 28 30 2c 53 | . 2 : |.amp(0,S|
|000059f0| 73 74 61 72 74 25 2c 53 | 65 6e 64 25 29 0d 27 7e |start%,S|end%).'~|
|00005a00| 21 20 c9 20 33 20 3a 20 | f2 66 61 64 65 69 6e 28 |! . 3 : |.fadein(|
|00005a10| 53 73 74 61 72 74 25 2c | 53 65 6e 64 25 29 0d 27 |Sstart%,|Send%).'|
|00005a20| 88 22 20 c9 20 34 20 3a | 20 f2 66 61 64 65 6f 75 |." . 4 :| .fadeou|
|00005a30| 74 28 53 73 74 61 72 74 | 25 2c 53 65 6e 64 25 29 |t(Sstart|%,Send%)|
|00005a40| 0d 27 92 32 20 c9 20 35 | 20 3a 20 f2 61 6d 70 28 |.'.2 . 5| : .amp(|
|00005a50| 28 a0 a4 7a 28 61 6d 70 | 6c 69 66 79 25 29 29 2f |(..z(amp|lify%))/|
|00005a60| 31 30 30 2c 53 73 74 61 | 72 74 25 2c 53 65 6e 64 |100,Ssta|rt%,Send|
|00005a70| 25 29 0d 27 9c 30 20 c9 | 20 36 20 3a 20 f2 61 6d |%).'.0 .| 6 : .am|
|00005a80| 70 28 31 30 30 2f a0 a4 | 7a 28 61 6d 70 6c 69 66 |p(100/..|z(amplif|
|00005a90| 79 25 29 2c 53 73 74 61 | 72 74 25 2c 53 65 6e 64 |y%),Ssta|rt%,Send|
|00005aa0| 25 29 0d 27 a6 2e 20 c9 | 20 37 20 3a 20 f2 65 6f |%).'.. .| 7 : .eo|
|00005ab0| 72 28 a0 a4 7a 28 65 6f | 72 5f 63 6f 6e 73 74 25 |r(..z(eo|r_const%|
|00005ac0| 29 2c 53 73 74 61 72 74 | 25 2c 53 65 6e 64 25 29 |),Sstart|%,Send%)|
|00005ad0| 0d 27 b0 2e 20 c9 20 38 | 20 3a 20 f2 61 64 64 28 |.'.. . 8| : .add(|
|00005ae0| a0 a4 7a 28 61 64 64 5f | 63 6f 6e 73 74 25 29 2c |..z(add_|const%),|
|00005af0| 53 73 74 61 72 74 25 2c | 53 65 6e 64 25 29 0d 27 |Sstart%,|Send%).'|
|00005b00| ba 2d 20 c9 20 39 20 3a | 20 f2 68 70 66 28 a4 7a |.- . 9 :| .hpf(.z|
|00005b10| 28 68 70 5f 66 69 6c 74 | 65 72 25 29 2c 53 73 74 |(hp_filt|er%),Sst|
|00005b20| 61 72 74 25 2c 53 65 6e | 64 25 29 0d 27 c4 2d 20 |art%,Sen|d%).'.- |
|00005b30| c9 20 31 30 3a 20 f2 6c | 70 66 28 a4 7a 28 6c 70 |. 10: .l|pf(.z(lp|
|00005b40| 5f 66 69 6c 74 65 72 25 | 29 2c 53 73 74 61 72 74 |_filter%|),Sstart|
|00005b50| 25 2c 53 65 6e 64 25 29 | 0d 27 ce 2f 20 c9 20 31 |%,Send%)|.'./ . 1|
|00005b60| 31 3a 20 f2 63 6f 72 65 | 28 a0 a4 7a 28 63 6f 72 |1: .core|(..z(cor|
|00005b70| 65 5f 66 69 6c 74 25 29 | 2c 53 73 74 61 72 74 25 |e_filt%)|,Sstart%|
|00005b80| 2c 53 65 6e 64 25 29 0d | 27 d8 31 20 c9 20 31 32 |,Send%).|'.1 . 12|
|00005b90| 3a 20 f2 6c 6f 62 6f 6f | 73 74 28 31 2f a0 a4 7a |: .loboo|st(1/..z|
|00005ba0| 28 66 62 6f 6f 73 74 25 | 29 2c 53 73 74 61 72 74 |(fboost%|),Sstart|
|00005bb0| 25 2c 53 65 6e 64 25 29 | 0d 27 e2 2f 20 c9 20 31 |%,Send%)|.'./ . 1|
|00005bc0| 33 3a 20 f2 6c 6f 62 6f | 6f 73 74 28 a0 a4 7a 28 |3: .lobo|ost(..z(|
|00005bd0| 66 62 6f 6f 73 74 25 29 | 2c 53 73 74 61 72 74 25 |fboost%)|,Sstart%|
|00005be0| 2c 53 65 6e 64 25 29 0d | 27 ec 14 20 c9 20 31 34 |,Send%).|'.. . 14|
|00005bf0| 3a 20 c8 8e 20 71 25 21 | 38 20 ca 0d 27 f6 33 20 |: .. q%!|8 ..'.3 |
|00005c00| 20 c9 20 30 20 3a 20 f2 | 6d 6f 64 75 6c 61 74 65 | . 0 : .|modulate|
|00005c10| 28 a4 7a 28 6d 65 6e 75 | 5f 6d 6f 64 30 25 29 2c |(.z(menu|_mod0%),|
|00005c20| 53 73 74 61 72 74 25 2c | 53 65 6e 64 25 29 0d 28 |Sstart%,|Send%).(|
|00005c30| 00 33 20 20 c9 20 31 20 | 3a 20 f2 6d 6f 64 75 6c |.3 . 1 |: .modul|
|00005c40| 61 74 65 28 a4 7a 28 6d | 65 6e 75 5f 6d 6f 64 31 |ate(.z(m|enu_mod1|
|00005c50| 25 29 2c 53 73 74 61 72 | 74 25 2c 53 65 6e 64 25 |%),Sstar|t%,Send%|
|00005c60| 29 0d 28 0a 33 20 20 c9 | 20 32 20 3a 20 f2 6d 6f |).(.3 .| 2 : .mo|
|00005c70| 64 75 6c 61 74 65 28 a4 | 7a 28 6d 65 6e 75 5f 6d |dulate(.|z(menu_m|
|00005c80| 6f 64 32 25 29 2c 53 73 | 74 61 72 74 25 2c 53 65 |od2%),Ss|tart%,Se|
|00005c90| 6e 64 25 29 0d 28 14 33 | 20 20 c9 20 33 20 3a 20 |nd%).(.3| . 3 : |
|00005ca0| f2 6d 6f 64 75 6c 61 74 | 65 28 a4 7a 28 6d 65 6e |.modulat|e(.z(men|
|00005cb0| 75 5f 6d 6f 64 33 25 29 | 2c 53 73 74 61 72 74 25 |u_mod3%)|,Sstart%|
|00005cc0| 2c 53 65 6e 64 25 29 0d | 28 1e 33 20 20 c9 20 34 |,Send%).|(.3 . 4|
|00005cd0| 20 3a 20 f2 6d 6f 64 75 | 6c 61 74 65 28 a4 7a 28 | : .modu|late(.z(|
|00005ce0| 6d 65 6e 75 5f 6d 6f 64 | 34 25 29 2c 53 73 74 61 |menu_mod|4%),Ssta|
|00005cf0| 72 74 25 2c 53 65 6e 64 | 25 29 0d 28 28 07 20 20 |rt%,Send|%).((. |
|00005d00| cb 0d 28 32 14 20 c9 20 | 31 35 3a 20 c8 8e 20 71 |..(2. . |15: .. q|
|00005d10| 25 21 38 20 ca 0d 28 3c | 0c 20 20 c9 20 30 2c 31 |%!8 ..(<|. . 0,1|
|00005d20| 3a 0d 28 46 38 20 20 c9 | 20 32 20 3a 20 f2 65 63 |:.(F8 .| 2 : .ec|
|00005d30| 68 6f 28 a0 a4 7a 28 65 | 63 68 6f 5f 6c 65 6e 67 |ho(..z(e|cho_leng|
|00005d40| 74 68 25 29 2c bb a4 7a | 28 65 63 68 6f 5f 73 74 |th%),..z|(echo_st|
|00005d50| 72 65 6e 67 74 68 25 29 | 29 0d 28 50 3a 20 20 c9 |rength%)|).(P: .|
|00005d60| 20 33 20 3a 20 f2 66 6c | 61 6e 67 65 28 a0 a4 7a | 3 : .fl|ange(..z|
|00005d70| 28 65 63 68 6f 5f 6c 65 | 6e 67 74 68 25 29 2c bb |(echo_le|ngth%),.|
|00005d80| a4 7a 28 65 63 68 6f 5f | 73 74 72 65 6e 67 74 68 |.z(echo_|strength|
|00005d90| 25 29 29 0d 28 5a 3c 20 | 20 c9 20 34 20 3a 20 f2 |%)).(Z< | . 4 : .|
|00005da0| 68 61 6c 6c 65 63 68 6f | 28 a0 a4 7a 28 65 63 68 |hallecho|(..z(ech|
|00005db0| 6f 5f 6c 65 6e 67 74 68 | 25 29 2c bb a4 7a 28 65 |o_length|%),..z(e|
|00005dc0| 63 68 6f 5f 73 74 72 65 | 6e 67 74 68 25 29 29 0d |cho_stre|ngth%)).|
|00005dd0| 28 64 07 20 20 cb 0d 28 | 6e 06 20 cb 0d 28 78 1b |(d. ..(|n. ..(x.|
|00005de0| f4 20 57 48 45 4e 20 34 | 20 3a 20 43 41 53 45 20 |. WHEN 4| : CASE |
|00005df0| 71 25 21 34 20 4f 46 0d | 28 82 3b 20 f4 20 57 48 |q%!4 OF.|(.; . WH|
|00005e00| 45 4e 20 30 20 3a 20 49 | 46 20 71 25 21 38 3e 2d |EN 0 : I|F q%!8>-|
|00005e10| 31 20 50 52 4f 43 61 64 | 64 5f 6c 69 62 65 6e 74 |1 PROCad|d_libent|
|00005e20| 72 79 28 46 4e 7a 28 6c | 69 62 5f 6e 61 6d 65 25 |ry(FNz(l|ib_name%|
|00005e30| 29 29 0d 28 8c 0f 20 f4 | 20 57 48 45 4e 20 31 20 |)).(.. .| WHEN 1 |
|00005e40| 3a 0d 28 96 0f 20 f4 20 | 57 48 45 4e 20 32 20 3a |:.(.. . |WHEN 2 :|
|00005e50| 0d 28 a0 31 20 f4 20 57 | 48 45 4e 20 33 20 3a 20 |.(.1 . W|HEN 3 : |
|00005e60| 49 46 20 71 25 21 38 3e | 2d 31 20 50 52 4f 43 64 |IF q%!8>|-1 PROCd|
|00005e70| 65 6c 5f 6c 69 62 65 6e | 74 72 79 28 71 25 21 38 |el_liben|try(q%!8|
|00005e80| 29 0d 28 aa 0e 20 f4 20 | 45 4e 44 43 41 53 45 0d |).(.. . |ENDCASE.|
|00005e90| 28 b4 13 c9 20 34 20 3a | 20 c8 8e 20 71 25 21 34 |(... 4 :| .. q%!4|
|00005ea0| 20 ca 0d 28 be 0f 20 c9 | 20 30 20 3a 20 f2 70 6c | ..(.. .| 0 : .pl|
|00005eb0| 79 0d 28 c8 31 20 c9 20 | 31 20 3a 20 3f 56 63 6f |y.(.1 . |1 : ?Vco|
|00005ec0| 6d 6d 61 6e 64 3d 31 3a | c8 96 3a 3f 56 63 6f 6d |mmand=1:|..:?Vcom|
|00005ed0| 6d 61 6e 64 3d 30 3a 21 | 56 63 6f 75 6e 74 65 72 |mand=0:!|Vcounter|
|00005ee0| 3d 30 0d 28 d2 42 20 c9 | 20 32 20 3a 20 74 72 61 |=0.(.B .| 2 : tra|
|00005ef0| 63 6b 69 6e 67 25 3d ac | 74 72 61 63 6b 69 6e 67 |cking%=.|tracking|
|00005f00| 25 3a f2 58 6d 65 6e 75 | 5f 74 69 63 6b 28 6d 65 |%:.Xmenu|_tick(me|
|00005f10| 6e 75 5f 74 72 61 63 6b | 25 2c 74 72 61 63 6b 69 |nu_track|%,tracki|
|00005f20| 6e 67 25 29 0d 28 dc 10 | 20 c9 20 33 20 3a 20 f2 |ng%).(..| . 3 : .|
|00005f30| 63 6f 6e 74 0d 28 e6 19 | 20 c9 20 34 20 3a 20 f2 |cont.(..| . 4 : .|
|00005f40| 70 69 74 63 68 5f 62 65 | 6e 64 28 31 29 0d 28 f0 |pitch_be|nd(1).(.|
|00005f50| 1a 20 c9 20 35 20 3a 20 | f2 70 69 74 63 68 5f 62 |. . 5 : |.pitch_b|
|00005f60| 65 6e 64 28 2d 31 29 0d | 28 fa 36 20 c9 20 36 20 |end(-1).|(.6 . 6 |
|00005f70| 3a 20 f2 58 69 63 6f 6e | 5f 73 65 74 73 74 72 28 |: .Xicon|_setstr(|
|00005f80| 77 69 6e 5f 6d 61 69 6e | 25 2c 32 35 2c 22 31 32 |win_main|%,25,"12|
|00005f90| 37 22 29 3a 3f 56 76 6f | 6c 3d 31 32 37 0d 29 04 |7"):?Vvo|l=127.).|
|00005fa0| 06 20 cb 0d 29 0e 05 cb | 0d 29 18 05 e1 0d 29 22 |. ..)...|.)....)"|
|00005fb0| 04 0d 29 2c 12 dd f2 65 | 63 68 6f 28 44 25 2c 73 |..),...e|cho(D%,s|
|00005fc0| 74 72 29 0d 29 36 0e 41 | 25 3d 53 73 74 61 72 74 |tr).)6.A|%=Sstart|
|00005fd0| 25 0d 29 40 0c 42 25 3d | 53 65 6e 64 25 0d 29 4a |%.)@.B%=|Send%.)J|
|00005fe0| 13 43 25 3d 73 61 6d 70 | 5f 63 65 6e 74 72 65 25 |.C%=samp|_centre%|
|00005ff0| 0d 29 54 18 45 25 3d 28 | 73 74 72 2f 31 30 30 29 |.)T.E%=(|str/100)|
|00006000| 2a 28 31 3c 3c 31 32 29 | 0d 29 5e 0a d6 20 65 63 |*(1<<12)|.)^.. ec|
|00006010| 68 6f 0d 29 68 05 e1 0d | 29 72 04 0d 29 7c 14 dd |ho.)h...|)r..)|..|
|00006020| f2 68 61 6c 6c 65 63 68 | 6f 28 61 25 2c 62 29 0d |.hallech|o(a%,b).|
|00006030| 29 86 0b c8 95 20 62 3e | 3d 31 0d 29 90 11 f2 66 |).... b>|=1.)...f|
|00006040| 6c 61 6e 67 65 28 61 25 | 2c 62 29 0d 29 9a 11 61 |lange(a%|,b).)..a|
|00006050| 25 3d 61 25 2a 32 3a 62 | 3d 62 2f 32 0d 29 a4 05 |%=a%*2:b|=b/2.)..|
|00006060| ce 0d 29 ae 05 e1 0d 29 | b8 04 0d 29 c2 14 dd f2 |..)....)|...)....|
|00006070| 66 6c 61 6e 67 65 28 44 | 25 2c 73 74 72 29 0d 29 |flange(D|%,str).)|
|00006080| cc 0e 41 25 3d 53 73 74 | 61 72 74 25 0d 29 d6 0c |..A%=Sst|art%.)..|
|00006090| 42 25 3d 53 65 6e 64 25 | 0d 29 e0 13 43 25 3d 73 |B%=Send%|.)..C%=s|
|000060a0| 61 6d 70 5f 63 65 6e 74 | 72 65 25 0d 29 ea 18 45 |amp_cent|re%.)..E|
|000060b0| 25 3d 28 73 74 72 2f 31 | 30 30 29 2a 28 31 3c 3c |%=(str/1|00)*(1<<|
|000060c0| 31 32 29 0d 29 f4 0c d6 | 20 66 6c 61 6e 67 65 0d |12).)...| flange.|
|000060d0| 29 fe 05 e1 0d 2a 08 04 | 0d 2a 12 0f dd f2 76 61 |)....*..|.*....va|
|000060e0| 6c 69 64 5f 73 65 6c 0d | 2a 1c 26 e7 20 75 73 65 |lid_sel.|*.&. use|
|000060f0| 5f 73 65 6c 65 63 74 69 | 6f 6e 25 20 80 20 73 65 |_selecti|on% . se|
|00006100| 6c 5f 73 74 61 72 74 25 | 3e 3d 30 20 8c 0d 2a 26 |l_start%|>=0 ..*&|
|00006110| 16 53 73 74 61 72 74 25 | 3d 73 65 6c 5f 73 74 61 |.Sstart%|=sel_sta|
|00006120| 72 74 25 0d 2a 30 3a 53 | 65 6e 64 25 3d 73 65 6c |rt%.*0:S|end%=sel|
|00006130| 5f 65 6e 64 25 3a e7 20 | 53 65 6e 64 25 3e 73 61 |_end%:. |Send%>sa|
|00006140| 6d 70 5f 73 69 7a 65 25 | 2d 31 20 53 65 6e 64 25 |mp_size%|-1 Send%|
|00006150| 3d 73 61 6d 70 5f 73 69 | 7a 65 25 2d 31 0d 2a 3a |=samp_si|ze%-1.*:|
|00006160| 05 cc 0d 2a 44 0d 53 73 | 74 61 72 74 25 3d 30 0d |...*D.Ss|tart%=0.|
|00006170| 2a 4e 16 53 65 6e 64 25 | 3d 73 61 6d 70 5f 73 69 |*N.Send%|=samp_si|
|00006180| 7a 65 25 2d 31 0d 2a 58 | 05 cd 0d 2a 62 14 53 73 |ze%-1.*X|...*b.Ss|
|00006190| 74 61 72 74 25 2b 3d 73 | 61 6d 70 6c 65 25 0d 2a |tart%+=s|ample%.*|
|000061a0| 6c 12 53 65 6e 64 25 2b | 3d 73 61 6d 70 6c 65 25 |l.Send%+|=sample%|
|000061b0| 0d 2a 76 05 e1 0d 2a 80 | 04 0d 2a 8a 11 dd f2 63 |.*v...*.|..*....c|
|000061c0| 61 6c 63 5f 63 65 6e 74 | 72 65 0d 2a 94 21 41 25 |alc_cent|re.*.!A%|
|000061d0| 3d 73 61 6d 70 6c 65 25 | 3a 42 25 3d 41 25 2b 73 |=sample%|:B%=A%+s|
|000061e0| 61 6d 70 5f 73 69 7a 65 | 25 2d 31 0d 2a 9e 16 43 |amp_size|%-1.*..C|
|000061f0| 25 3d 30 3a d6 20 63 61 | 6c 63 5f 63 65 6e 74 72 |%=0:. ca|lc_centr|
|00006200| 65 0d 2a a8 2d 73 61 6d | 70 5f 63 65 6e 74 72 65 |e.*.-sam|p_centre|
|00006210| 25 3d 28 21 63 65 6e 74 | 72 65 5f 76 61 6c 29 2f |%=(!cent|re_val)/|
|00006220| 73 61 6d 70 5f 73 69 7a | 65 25 2b 30 2e 35 0d 2a |samp_siz|e%+0.5.*|
|00006230| b2 05 e1 0d 2a bc 04 0d | 2a c6 0d dd f2 6c 69 6e |....*...|*....lin|
|00006240| 32 6c 6f 67 0d 2a d0 25 | ea 20 76 6f 6c 25 2c 61 |2log.*.%|. vol%,a|
|00006250| 25 2c 62 25 3a c8 99 20 | 26 34 30 31 38 30 2c 31 |%,b%:.. |&40180,1|
|00006260| 32 37 20 b8 20 76 6f 6c | 25 0d 2a da 10 e3 20 61 |27 . vol|%.*... a|
|00006270| 25 3d 30 20 b8 20 32 35 | 35 0d 2a e4 1f c8 99 20 |%=0 . 25|5.*.... |
|00006280| 26 34 30 31 38 31 2c 28 | 61 25 2d 31 32 38 29 3c |&40181,(|a%-128)<|
|00006290| 3c 32 34 20 b8 20 62 25 | 0d 2a ee 0c 71 25 3f 61 |<24 . b%|.*..q%?a|
|000062a0| 25 3d 62 25 0d 2a f8 05 | ed 0d 2b 02 22 41 25 3d |%=b%.*..|..+."A%=|
|000062b0| 73 61 6d 70 6c 65 25 3a | 42 25 3d 73 61 6d 70 5f |sample%:|B%=samp_|
|000062c0| 73 69 7a 65 25 3a 43 25 | 3d 71 25 0d 2b 0c 0d d6 |size%:C%|=q%.+...|
|000062d0| 20 63 6f 6e 76 65 72 74 | 0d 2b 16 12 c8 99 20 26 | convert|.+.... &|
|000062e0| 34 30 31 38 30 2c 76 6f | 6c 25 0d 2b 20 08 f2 72 |40180,vo|l%.+ ..r|
|000062f0| 65 64 0d 2b 2a 05 e1 0d | 2b 34 04 0d 2b 3e 0d dd |ed.+*...|+4..+>..|
|00006300| f2 6c 6f 67 32 6c 69 6e | 0d 2b 48 25 ea 20 76 6f |.log2lin|.+H%. vo|
|00006310| 6c 25 2c 61 25 2c 62 25 | 3a c8 99 20 26 34 30 31 |l%,a%,b%|:.. &401|
|00006320| 38 30 2c 31 32 37 20 b8 | 20 76 6f 6c 25 0d 2b 52 |80,127 .| vol%.+R|
|00006330| 10 e3 20 61 25 3d 30 20 | b8 20 32 35 35 0d 2b 5c |.. a%=0 |. 255.+\|
|00006340| 1f c8 99 20 26 34 30 31 | 38 31 2c 28 61 25 2d 31 |... &401|81,(a%-1|
|00006350| 32 38 29 3c 3c 32 34 20 | b8 20 62 25 0d 2b 66 0c |28)<<24 |. b%.+f.|
|00006360| 71 25 3f 62 25 3d 61 25 | 0d 2b 70 05 ed 0d 2b 7a |q%?b%=a%|.+p...+z|
|00006370| 22 41 25 3d 73 61 6d 70 | 6c 65 25 3a 42 25 3d 73 |"A%=samp|le%:B%=s|
|00006380| 61 6d 70 5f 73 69 7a 65 | 25 3a 43 25 3d 71 25 0d |amp_size|%:C%=q%.|
|00006390| 2b 84 0d d6 20 63 6f 6e | 76 65 72 74 0d 2b 8e 12 |+... con|vert.+..|
|000063a0| c8 99 20 26 34 30 31 38 | 30 2c 76 6f 6c 25 0d 2b |.. &4018|0,vol%.+|
|000063b0| 98 08 f2 72 65 64 0d 2b | a2 05 e1 0d 2b ac 04 0d |...red.+|....+...|
|000063c0| 2b b6 18 dd f2 6c 6f 62 | 6f 6f 73 74 28 76 61 6c |+....lob|oost(val|
|000063d0| 2c 41 25 2c 42 25 29 0d | 2b c0 08 ea 20 61 25 0d |,A%,B%).|+... a%.|
|000063e0| 2b ca 10 e3 20 61 25 3d | 30 20 b8 20 32 35 35 0d |+... a%=|0 . 255.|
|000063f0| 2b d4 2c 71 25 21 28 61 | 25 3c 3c 32 29 3d 28 28 |+.,q%!(a|%<<2)=((|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.