home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1990-09-07 | 11.1 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 0d 00 14 38 f4 20 21 52 | 75 6e 49 6d 61 67 65 20 |...8. !R|unImage |
|00000020| 66 69 6c 65 20 66 6f 72 | 20 22 21 46 69 6c 65 53 |file for| "!FileS|
|00000030| 65 65 22 20 64 65 73 6b | 74 6f 70 20 61 70 70 6c |ee" desk|top appl|
|00000040| 69 63 61 74 69 6f 6e 2e | 0d 00 1e 45 f4 20 41 70 |ication.|...E. Ap|
|00000050| 70 6c 69 63 61 74 69 6f | 6e 20 74 6f 20 76 69 65 |plicatio|n to vie|
|00000060| 77 20 61 20 64 61 74 61 | 20 66 69 6c 65 20 69 6e |w a data| file in|
|00000070| 20 68 65 78 20 61 6e 64 | 20 41 53 43 49 49 20 6f | hex and| ASCII o|
|00000080| 6e 20 74 68 65 20 73 63 | 72 65 65 6e 2e 0d 00 28 |n the sc|reen...(|
|00000090| 05 f4 0d 00 32 1c f4 20 | 28 43 29 20 31 39 39 30 |....2.. |(C) 1990|
|000000a0| 20 49 20 44 20 47 72 69 | 66 66 69 74 68 73 0d 00 | I D Gri|ffiths..|
|000000b0| 3c 05 3a 0d 00 46 1e de | 20 74 61 73 6b 69 64 25 |<.:..F..| taskid%|
|000000c0| 34 3a 24 74 61 73 6b 69 | 64 25 3d 22 54 41 53 4b |4:$taski|d%="TASK|
|000000d0| 22 0d 00 50 20 74 61 73 | 6b 76 65 72 24 3d 22 30 |"..P tas|kver$="0|
|000000e0| 2e 30 32 20 28 37 2d 53 | 65 70 2d 31 39 39 30 29 |.02 (7-S|ep-1990)|
|000000f0| 22 0d 00 5a 3d c8 99 20 | 22 57 69 6d 70 5f 49 6e |"..Z=.. |"Wimp_In|
|00000100| 69 74 69 61 6c 69 73 65 | 22 2c 32 30 30 2c 21 74 |itialise|",200,!t|
|00000110| 61 73 6b 69 64 25 2c 22 | 46 69 6c 65 20 56 69 65 |askid%,"|File Vie|
|00000120| 77 65 72 22 20 b8 20 2c | 74 61 73 6b 68 25 0d 00 |wer" . ,|taskh%..|
|00000130| 64 37 ee 20 85 20 f2 65 | 72 72 6f 72 62 6f 78 3a |d7. . .e|rrorbox:|
|00000140| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 44 6f |.. "Wimp|_CloseDo|
|00000150| 77 6e 22 2c 74 61 73 6b | 68 25 2c 21 74 61 73 6b |wn",task|h%,!task|
|00000160| 69 64 25 3a e0 0d 00 6e | 0c de 20 71 25 20 32 35 |id%:...n|.. q% 25|
|00000170| 36 0d 00 78 67 de 20 6d | 65 6e 75 62 75 66 66 25 |6..xg. m|enubuff%|
|00000180| 20 31 30 32 34 2c 62 75 | 66 66 65 72 25 20 31 30 | 1024,bu|ffer% 10|
|00000190| 32 34 2c 20 74 65 6d 70 | 25 20 32 35 36 2c 20 6f |24, temp|% 256, o|
|000001a0| 6c 64 63 61 72 65 74 25 | 20 32 34 2c 20 73 70 72 |ldcaret%| 24, spr|
|000001b0| 73 61 76 65 25 20 31 30 | 32 34 2c 20 63 70 5f 63 |save% 10|24, cp_c|
|000001c0| 6f 6c 74 61 62 25 20 32 | 35 36 2c 20 63 70 5f 73 |oltab% 2|56, cp_s|
|000001d0| 63 61 6c 65 25 20 31 36 | 0d 00 82 35 6d 61 78 66 |cale% 16|...5maxf|
|000001e0| 69 6c 65 73 25 3d 31 36 | 3a 63 75 72 72 66 69 6c |iles%=16|:currfil|
|000001f0| 65 73 25 3d 30 3a 63 75 | 72 72 66 73 70 73 25 3d |es%=0:cu|rrfsps%=|
|00000200| 30 3a 63 75 72 72 66 73 | 70 70 25 3d 93 0d 00 8c |0:currfs|pp%=....|
|00000210| 2c c8 99 20 22 57 69 6d | 70 5f 53 6c 6f 74 53 69 |,.. "Wim|p_SlotSi|
|00000220| 7a 65 22 2c 2d 31 2c 2d | 31 20 b8 20 6f 72 69 67 |ze",-1,-|1 . orig|
|00000230| 69 6e 61 6c 73 6c 6f 74 | 25 0d 00 96 54 de 20 66 |inalslot|%...T. f|
|00000240| 69 6c 65 73 70 25 28 6d | 61 78 66 69 6c 65 73 25 |ilesp%(m|axfiles%|
|00000250| 29 2c 20 66 69 6c 65 73 | 6c 25 28 6d 61 78 66 69 |), files|l%(maxfi|
|00000260| 6c 65 73 25 29 2c 20 66 | 69 6c 65 77 68 25 28 6d |les%), f|ilewh%(m|
|00000270| 61 78 66 69 6c 65 73 25 | 29 2c 20 66 69 6c 65 6e |axfiles%|), filen|
|00000280| 70 25 28 6d 61 78 66 69 | 6c 65 73 25 29 0d 00 a0 |p%(maxfi|les%)...|
|00000290| 1b de 20 66 69 6c 65 6e | 73 25 20 6d 61 78 66 69 |.. filen|s% maxfi|
|000002a0| 6c 65 73 25 2a 32 35 36 | 0d 00 aa 0f 21 73 70 72 |les%*256|....!spr|
|000002b0| 73 61 76 65 25 3d 30 0d | 00 b4 0e 74 61 73 6b 65 |save%=0.|...taske|
|000002c0| 6e 64 25 3d a3 0d 00 be | 13 f2 69 6e 73 74 61 6c |nd%=....|..instal|
|000002d0| 6c 62 61 72 69 63 6f 6e | 0d 00 c8 12 f2 6c 6f 61 |lbaricon|.....loa|
|000002e0| 64 74 65 6d 70 6c 61 74 | 65 73 0d 00 d2 08 f2 61 |dtemplat|es.....a|
|000002f0| 73 6d 0d 00 dc 0f f2 69 | 6e 69 74 66 69 6c 65 6e |sm.....i|nitfilen|
|00000300| 73 0d 00 e6 16 6d 65 73 | 73 61 67 65 5f 64 61 74 |s....mes|sage_dat|
|00000310| 61 73 61 76 65 3d 31 0d | 00 f0 19 6d 65 73 73 61 |asave=1.|...messa|
|00000320| 67 65 5f 64 61 74 61 73 | 61 76 65 61 63 6b 3d 32 |ge_datas|aveack=2|
|00000330| 0d 00 fa 16 6d 65 73 73 | 61 67 65 5f 64 61 74 61 |....mess|age_data|
|00000340| 6c 6f 61 64 3d 33 0d 01 | 04 19 6d 65 73 73 61 67 |load=3..|..messag|
|00000350| 65 5f 64 61 74 61 6c 6f | 61 64 61 63 6b 3d 34 0d |e_datalo|adack=4.|
|00000360| 01 0e 1e 6d 65 73 73 61 | 67 65 5f 6d 65 6e 75 77 |...messa|ge_menuw|
|00000370| 61 72 6e 69 6e 67 3d 26 | 34 30 30 43 30 0d 01 18 |arning=&|400C0...|
|00000380| 10 63 75 72 72 5f 6d 65 | 6e 75 3d 2d 31 0d 01 22 |.curr_me|nu=-1.."|
|00000390| 14 63 75 72 72 5f 73 75 | 62 5f 64 62 6f 78 3d 2d |.curr_su|b_dbox=-|
|000003a0| 31 0d 01 2c 0b 62 61 72 | 5f 6d 3d 30 0d 01 36 12 |1..,.bar|_m=0..6.|
|000003b0| 6e 65 77 6d 61 70 5f 64 | 62 6f 78 3d 2d 31 0d 01 |newmap_d|box=-1..|
|000003c0| 40 1c 70 6f 6c 6c 6d 61 | 73 6b 25 3d 25 31 31 30 |@.pollma|sk%=%110|
|000003d0| 30 30 30 30 31 31 30 30 | 30 31 0d 01 4a 05 f5 0d |00001100|01..J...|
|000003e0| 01 54 2d c8 99 20 22 57 | 69 6d 70 5f 50 6f 6c 6c |.T-.. "W|imp_Poll|
|000003f0| 22 2c 70 6f 6c 6c 6d 61 | 73 6b 25 2c 71 25 20 b8 |",pollma|sk%,q% .|
|00000400| 20 70 6f 6c 6c 72 65 61 | 73 6f 6e 25 0d 01 5e 25 | pollrea|son%..^%|
|00000410| e7 20 63 75 72 72 5f 73 | 75 62 5f 64 62 6f 78 3c |. curr_s|ub_dbox<|
|00000420| 3e 2d 31 20 8c 20 f2 64 | 62 6f 78 5f 63 68 65 63 |>-1 . .d|box_chec|
|00000430| 6b 0d 01 68 14 c8 8e 20 | 70 6f 6c 6c 72 65 61 73 |k..h... |pollreas|
|00000440| 6f 6e 25 20 ca 0d 01 72 | 18 20 20 c9 20 31 3a f2 |on% ...r|. . 1:.|
|00000450| 72 65 64 72 61 77 5f 77 | 69 6e 64 6f 77 0d 01 7c |redraw_w|indow..||
|00000460| 1e 20 20 c9 20 32 3a f2 | 6f 70 65 6e 5f 77 69 6e |. . 2:.|open_win|
|00000470| 64 6f 77 5f 72 65 71 75 | 65 73 74 0d 01 86 1f 20 |dow_requ|est.... |
|00000480| 20 c9 20 33 3a f2 63 6c | 6f 73 65 5f 77 69 6e 64 | . 3:.cl|ose_wind|
|00000490| 6f 77 5f 72 65 71 75 65 | 73 74 0d 01 90 16 20 20 |ow_reque|st.... |
|000004a0| c9 20 36 3a f2 6d 6f 75 | 73 65 5f 63 6c 69 63 6b |. 6:.mou|se_click|
|000004b0| 0d 01 9a 16 20 20 c9 20 | 38 3a f2 6b 65 79 5f 70 |.... . |8:.key_p|
|000004c0| 72 65 73 73 65 64 0d 01 | a4 19 20 20 c9 20 39 3a |ressed..|.. . 9:|
|000004d0| f2 6d 65 6e 75 5f 73 65 | 6c 65 63 74 69 6f 6e 0d |.menu_se|lection.|
|000004e0| 01 ae 1b 20 20 c9 20 31 | 37 2c 31 38 3a f2 75 73 |... . 1|7,18:.us|
|000004f0| 65 72 5f 6d 65 73 73 61 | 67 65 0d 01 b8 05 cb 0d |er_messa|ge......|
|00000500| 01 c2 0e fd 20 74 61 73 | 6b 65 6e 64 25 0d 01 cc |.... tas|kend%...|
|00000510| 0e f2 63 6c 6f 73 65 64 | 6f 77 6e 0d 01 d6 05 e0 |..closed|own.....|
|00000520| 0d 01 e0 05 3a 0d 01 ea | 05 3a 0d 01 f4 0a dd 20 |....:...|.:..... |
|00000530| f2 61 73 6d 0d 01 fe 0f | de 20 63 6f 64 65 20 34 |.asm....|. code 4|
|00000540| 30 30 30 0d 02 08 0b 6c | 69 6e 6b 3d 31 34 0d 02 |000....l|ink=14..|
|00000550| 12 15 e3 20 70 61 73 73 | 25 3d 30 20 b8 20 32 20 |... pass|%=0 . 2 |
|00000560| 88 20 32 0d 02 1c 0b 50 | 25 3d 63 6f 64 65 0d 02 |. 2....P|%=code..|
|00000570| 26 0e 5b 4f 50 54 20 70 | 61 73 73 25 0d 02 30 49 |&.[OPT p|ass%..0I|
|00000580| 3b 4d 65 6d 6f 72 79 20 | 73 68 69 66 74 20 72 6f |;Memory |shift ro|
|00000590| 75 74 69 6e 65 2c 20 73 | 68 69 66 74 73 20 6d 65 |utine, s|hifts me|
|000005a0| 6d 6f 72 79 20 64 6f 77 | 6e 20 28 77 69 6c 6c 20 |mory dow|n (will |
|000005b0| 63 6f 72 72 75 70 74 20 | 69 66 20 6d 6f 76 69 6e |corrupt |if movin|
|000005c0| 67 20 75 70 29 0d 02 3a | 41 3b 54 61 6b 65 73 20 |g up)..:|A;Takes |
|000005d0| 73 6f 75 72 63 65 20 69 | 6e 20 52 30 2c 20 64 65 |source i|n R0, de|
|000005e0| 73 74 20 69 6e 20 52 31 | 2c 20 73 69 7a 65 20 6f |st in R1|, size o|
|000005f0| 66 20 62 6c 6f 63 6b 20 | 69 6e 20 62 79 74 65 73 |f block |in bytes|
|00000600| 20 69 6e 20 52 32 0d 02 | 44 45 3b 42 6c 6f 63 6b | in R2..|DE;Block|
|00000610| 73 20 6e 65 65 64 20 6e | 6f 74 20 62 65 20 77 6f |s need n|ot be wo|
|00000620| 72 64 20 61 6c 69 67 6e | 65 64 2c 20 73 69 6e 63 |rd align|ed, sinc|
|00000630| 65 20 49 27 6d 20 75 73 | 69 6e 67 20 64 72 65 61 |e I'm us|ing drea|
|00000640| 64 66 75 6c 6c 79 20 73 | 6c 6f 77 0d 02 4e 13 3b |dfully s|low..N.;|
|00000650| 62 79 74 65 20 74 72 61 | 6e 73 66 65 72 73 0d 02 |byte tra|nsfers..|
|00000660| 58 0e 2e 6d 6f 76 65 5f | 64 6f 77 6e 0d 02 62 13 |X..move_|down..b.|
|00000670| 4c 44 52 42 20 52 33 2c | 5b 52 30 5d 2c 23 31 0d |LDRB R3,|[R0],#1.|
|00000680| 02 6c 13 53 54 52 42 20 | 52 33 2c 5b 52 31 5d 2c |.l.STRB |R3,[R1],|
|00000690| 23 31 0d 02 76 11 53 55 | 42 53 20 52 32 2c 52 32 |#1..v.SU|BS R2,R2|
|000006a0| 2c 23 31 0d 02 80 11 42 | 4e 45 20 6d 6f 76 65 5f |,#1....B|NE move_|
|000006b0| 64 6f 77 6e 0d 02 8a 0f | 4d 4f 56 20 50 43 2c 6c |down....|MOV PC,l|
|000006c0| 69 6e 6b 0d 02 94 05 3b | 0d 02 9e 4b 3b 48 65 78 |ink....;|...K;Hex|
|000006d0| 20 70 72 69 6e 74 20 72 | 6f 75 74 69 6e 65 2e 20 | print r|outine. |
|000006e0| 20 20 46 69 72 73 74 20 | 73 74 61 67 65 20 6f 66 | First |stage of|
|000006f0| 20 73 70 65 65 64 69 6e | 67 20 75 70 20 6d 79 20 | speedin|g up my |
|00000700| 73 63 72 65 65 6e 20 6f | 75 74 70 75 74 2c 20 74 |screen o|utput, t|
|00000710| 68 69 73 0d 02 a8 49 3b | 74 61 6b 65 73 20 61 20 |his...I;|takes a |
|00000720| 76 61 6c 75 65 20 69 6e | 20 52 30 20 61 6e 64 20 |value in| R0 and |
|00000730| 61 20 6e 75 6d 62 65 72 | 20 6f 66 20 64 69 67 69 |a number| of digi|
|00000740| 74 73 20 69 6e 20 52 31 | 20 28 31 2d 38 29 2e 20 |ts in R1| (1-8). |
|00000750| 20 20 54 68 65 20 6e 75 | 6d 62 65 72 0d 02 b2 48 | The nu|mber...H|
|00000760| 3b 77 69 6c 6c 20 61 6c | 77 61 79 73 20 62 65 20 |;will al|ways be |
|00000770| 65 78 61 63 74 6c 79 20 | 52 31 20 64 69 67 69 74 |exactly |R1 digit|
|00000780| 73 20 6c 6f 6e 67 2c 20 | 77 69 74 68 20 30 20 70 |s long, |with 0 p|
|00000790| 61 64 64 69 6e 67 20 69 | 66 20 6e 65 63 65 73 73 |adding i|f necess|
|000007a0| 61 72 79 2e 0d 02 bc 0b | 2e 68 65 78 66 69 78 0d |ary.....|.hexfix.|
|000007b0| 02 c6 1b 53 54 4d 46 44 | 20 52 31 33 21 2c 7b 52 |...STMFD| R13!,{R|
|000007c0| 32 2d 52 34 2c 6c 69 6e | 6b 7d 0d 02 d0 0d 4d 4f |2-R4,lin|k}....MO|
|000007d0| 56 20 52 34 2c 52 30 0d | 02 da 0e 4d 4f 56 20 52 |V R4,R0.|...MOV R|
|000007e0| 32 2c 23 26 46 0d 02 e4 | 11 53 55 42 53 20 52 31 |2,#&F...|.SUBS R1|
|000007f0| 2c 52 31 2c 23 31 0d 02 | ee 3c 4c 44 4d 4d 49 46 |,R1,#1..|.<LDMMIF|
|00000800| 44 20 52 31 33 21 2c 7b | 52 32 2d 52 34 2c 50 43 |D R13!,{|R2-R4,PC|
|00000810| 7d 20 20 20 3b 49 66 20 | 62 61 64 20 6e 75 6d 62 |} ;If |bad numb|
|00000820| 65 72 20 6f 66 20 64 69 | 67 69 74 73 2c 20 65 78 |er of di|gits, ex|
|00000830| 69 74 0d 02 f8 13 4d 4f | 56 20 52 31 2c 52 31 2c |it....MO|V R1,R1,|
|00000840| 4c 53 4c 23 32 0d 03 02 | 0b 2e 68 66 6c 6f 6f 70 |LSL#2...|..hfloop|
|00000850| 0d 03 0c 15 80 20 52 33 | 2c 52 34 2c 52 32 2c 4c |..... R3|,R4,R2,L|
|00000860| 53 4c 20 52 31 0d 03 16 | 14 4d 4f 56 20 52 30 2c |SL R1...|.MOV R0,|
|00000870| 52 33 2c 4c 53 52 20 52 | 31 0d 03 20 0e 43 4d 50 |R3,LSR R|1.. .CMP|
|00000880| 20 52 30 2c 23 31 30 0d | 03 2a 17 41 44 44 4c 54 | R0,#10.|.*.ADDLT|
|00000890| 20 52 30 2c 52 30 2c 23 | 97 28 22 30 22 29 0d 03 | R0,R0,#|.("0")..|
|000008a0| 34 1a 41 44 44 47 45 20 | 52 30 2c 52 30 2c 23 97 |4.ADDGE |R0,R0,#.|
|000008b0| 28 22 41 22 29 2d 31 30 | 0d 03 3e 13 53 57 49 20 |("A")-10|..>.SWI |
|000008c0| 22 4f 53 5f 57 72 69 74 | 65 43 22 0d 03 48 11 53 |"OS_Writ|eC"..H.S|
|000008d0| 55 42 53 20 52 31 2c 52 | 31 2c 23 34 0d 03 52 0e |UBS R1,R|1,#4..R.|
|000008e0| 42 50 4c 20 68 66 6c 6f | 6f 70 0d 03 5c 19 4c 44 |BPL hflo|op..\.LD|
|000008f0| 4d 46 44 20 52 31 33 21 | 2c 7b 52 32 2d 52 34 2c |MFD R13!|,{R2-R4,|
|00000900| 50 43 7d 0d 03 66 05 3b | 0d 03 70 4c 3b 48 65 78 |PC}..f.;|..pL;Hex|
|00000910| 20 6c 69 6e 65 20 70 72 | 69 6e 74 2c 20 73 65 63 | line pr|int, sec|
|00000920| 6f 6e 64 20 70 61 72 74 | 20 6f 66 20 6d 79 20 72 |ond part| of my r|
|00000930| 65 64 72 61 77 20 73 70 | 65 65 64 75 70 2e 20 20 |edraw sp|eedup. |
|00000940| 54 68 69 73 20 74 61 6b | 65 73 20 61 20 70 6f 69 |This tak|es a poi|
|00000950| 6e 74 65 72 0d 03 7a 4b | 3b 74 6f 20 73 6f 6d 65 |nter..zK|;to some|
|00000960| 20 64 61 74 61 2c 20 61 | 6e 64 20 61 20 6e 75 6d | data, a|nd a num|
|00000970| 62 65 72 2c 20 61 6e 64 | 20 70 72 69 6e 74 73 20 |ber, and| prints |
|00000980| 6f 75 74 20 74 68 61 74 | 20 6d 61 6e 79 20 62 79 |out that| many by|
|00000990| 74 65 73 20 69 6e 20 68 | 65 78 20 77 69 74 68 0d |tes in h|ex with.|
|000009a0| 03 84 1e 3b 73 70 61 63 | 65 73 20 62 65 74 77 65 |...;spac|es betwe|
|000009b0| 65 6e 20 65 61 63 68 20 | 62 79 74 65 2e 0d 03 8e |en each |byte....|
|000009c0| 1b 3b 52 30 20 3d 20 64 | 61 74 61 2c 20 52 31 20 |.;R0 = d|ata, R1 |
|000009d0| 3d 20 6c 65 6e 67 74 68 | 0d 03 98 0c 2e 68 65 78 |= length|.....hex|
|000009e0| 6c 69 6e 65 0d 03 a2 1b | 53 54 4d 46 44 20 52 31 |line....|STMFD R1|
|000009f0| 33 21 2c 7b 52 32 2c 52 | 33 2c 6c 69 6e 6b 7d 0d |3!,{R2,R|3,link}.|
|00000a00| 03 ac 17 4d 4f 56 20 52 | 32 2c 52 30 3a 4d 4f 56 |...MOV R|2,R0:MOV|
|00000a10| 20 52 33 2c 52 31 0d 03 | b6 0b 2e 68 6c 6c 6f 6f | R3,R1..|...hlloo|
|00000a20| 70 0d 03 c0 0d 4d 4f 56 | 20 52 31 2c 23 32 0d 03 |p....MOV| R1,#2..|
|00000a30| ca 13 4c 44 52 42 20 52 | 30 2c 5b 52 32 5d 2c 23 |..LDRB R|0,[R2],#|
|00000a40| 31 0d 03 d4 0d 42 4c 20 | 68 65 78 66 69 78 0d 03 |1....BL |hexfix..|
|00000a50| de 0f 53 57 49 20 26 31 | 30 30 2b 33 32 0d 03 e8 |..SWI &1|00+32...|
|00000a60| 11 53 55 42 53 20 52 33 | 2c 52 33 2c 23 31 0d 03 |.SUBS R3|,R3,#1..|
|00000a70| f2 0e 42 4e 45 20 68 6c | 6c 6f 6f 70 0d 03 fc 19 |..BNE hl|loop....|
|00000a80| 4c 44 4d 46 44 20 52 31 | 33 21 2c 7b 52 32 2c 52 |LDMFD R1|3!,{R2,R|
|00000a90| 33 2c 50 43 7d 0d 04 06 | 05 3b 0d 04 10 4c 3b 41 |3,PC}...|.;...L;A|
|00000aa0| 6e 64 20 61 6e 6f 74 68 | 65 72 20 62 69 74 2c 20 |nd anoth|er bit, |
|00000ab0| 74 68 69 73 20 74 61 6b | 65 73 20 74 68 65 20 73 |this tak|es the s|
|00000ac0| 61 6d 65 20 70 61 72 61 | 6d 65 74 65 72 73 20 61 |ame para|meters a|
|00000ad0| 73 20 74 68 65 20 61 62 | 6f 76 65 20 61 6e 64 20 |s the ab|ove and |
|00000ae0| 70 72 69 6e 74 73 0d 04 | 1a 41 3b 6f 75 74 20 61 |prints..|.A;out a|
|00000af0| 20 6c 69 6e 65 20 6f 66 | 20 97 49 49 20 63 68 61 | line of| .II cha|
|00000b00| 72 73 20 72 65 70 6c 61 | 63 69 6e 67 20 63 6f 6e |rs repla|cing con|
|00000b10| 74 72 6f 6c 20 63 68 61 | 72 61 63 74 65 72 73 20 |trol cha|racters |
|00000b20| 77 69 74 68 20 2e 73 0d | 04 24 0c 2e 61 73 63 6c |with .s.|.$..ascl|
|00000b30| 69 6e 65 0d 04 2e 18 53 | 54 4d 46 44 20 52 31 33 |ine....S|TMFD R13|
|00000b40| 21 2c 7b 52 32 2c 6c 69 | 6e 6b 7d 0d 04 38 0d 4d |!,{R2,li|nk}..8.M|
|00000b50| 4f 56 20 52 32 2c 52 30 | 0d 04 42 0b 2e 61 6c 6c |OV R2,R0|..B..all|
|00000b60| 6f 6f 70 0d 04 4c 13 4c | 44 52 42 20 52 30 2c 5b |oop..L.L|DRB R0,[|
|00000b70| 52 32 5d 2c 23 31 0d 04 | 56 0e 43 4d 50 20 52 30 |R2],#1..|V.CMP R0|
|00000b80| 2c 23 33 32 0d 04 60 14 | 4d 4f 56 4c 54 20 52 30 |,#32..`.|MOVLT R0|
|00000b90| 2c 23 97 28 22 2e 22 29 | 0d 04 6a 13 53 57 49 20 |,#.(".")|..j.SWI |
|00000ba0| 22 4f 53 5f 57 72 69 74 | 65 43 22 0d 04 74 11 53 |"OS_Writ|eC"..t.S|
|00000bb0| 55 42 53 20 52 31 2c 52 | 31 2c 23 31 0d 04 7e 0e |UBS R1,R|1,#1..~.|
|00000bc0| 42 4e 45 20 61 6c 6c 6f | 6f 70 0d 04 88 16 4c 44 |BNE allo|op....LD|
|00000bd0| 4d 46 44 20 52 31 33 21 | 2c 7b 52 32 2c 50 43 7d |MFD R13!|,{R2,PC}|
|00000be0| 0d 04 92 05 3b 0d 04 9c | 48 3b 54 68 65 20 6d 61 |....;...|H;The ma|
|00000bf0| 6a 6f 72 20 70 61 72 74 | 20 6f 66 20 74 68 65 20 |jor part| of the |
|00000c00| 72 65 64 72 61 77 20 74 | 75 72 62 6f 63 68 61 72 |redraw t|urbochar|
|00000c10| 67 69 6e 67 2e 20 20 20 | 54 68 69 73 20 69 73 20 |ging. |This is |
|00000c20| 74 68 65 20 6c 69 6e 65 | 20 6c 6f 6f 70 0d 04 a6 |the line| loop...|
|00000c30| 4c 3b 63 6f 64 65 2c 20 | 6e 6f 74 20 74 68 65 20 |L;code, |not the |
|00000c40| 6d 61 69 6e 20 6c 6f 6f | 70 20 6f 66 20 72 65 64 |main loo|p of red|
|00000c50| 72 61 77 69 6e 67 2c 20 | 62 75 74 20 74 68 65 20 |rawing, |but the |
|00000c60| 63 72 69 74 69 63 6c 65 | 20 6f 6e 65 20 77 69 74 |criticle| one wit|
|00000c70| 68 69 6e 20 74 68 69 73 | 2e 0d 04 b0 48 3b 52 30 |hin this|....H;R0|
|00000c80| 20 3d 20 73 74 61 72 74 | 6c 69 6e 65 2c 20 52 31 | = start|line, R1|
|00000c90| 3d 20 65 6e 64 6c 69 6e | 65 2c 20 52 32 20 3d 20 |= endlin|e, R2 = |
|00000ca0| 6c 65 6e 67 74 68 20 6f | 66 20 66 69 6c 65 2c 20 |length o|f file, |
|00000cb0| 52 33 20 3d 20 72 65 64 | 72 61 77 20 62 6c 6f 63 |R3 = red|raw bloc|
|00000cc0| 6b 0d 04 ba 19 3b 52 34 | 20 3d 20 70 6f 69 6e 74 |k....;R4| = point|
|00000cd0| 65 72 20 74 6f 20 66 69 | 6c 65 0d 04 c4 10 2e 72 |er to fi|le.....r|
|00000ce0| 65 64 72 61 77 62 6c 6f | 63 6b 0d 04 ce 1b 53 54 |edrawblo|ck....ST|
|00000cf0| 4d 46 44 20 52 31 33 21 | 2c 7b 52 34 2d 52 37 2c |MFD R13!|,{R4-R7,|
|00000d00| 6c 69 6e 6b 7d 0d 04 d8 | 21 4d 4f 56 20 52 37 2c |link}...|!MOV R7,|
|00000d10| 52 30 3a 4d 4f 56 20 52 | 35 2c 52 31 3a 4d 4f 56 |R0:MOV R|5,R1:MOV|
|00000d20| 20 52 36 2c 52 32 0d 04 | e2 0c 2e 72 64 62 6c 6f | R6,R2..|...rdblo|
|00000d30| 6f 70 0d 04 ec 39 4d 4f | 56 20 52 30 2c 23 34 3a |op...9MO|V R0,#4:|
|00000d40| 4c 44 52 20 52 31 2c 5b | 52 33 2c 23 34 5d 3a 4c |LDR R1,[|R3,#4]:L|
|00000d50| 44 52 20 52 32 2c 5b 52 | 33 2c 23 32 30 5d 3a 53 |DR R2,[R|3,#20]:S|
|00000d60| 55 42 20 52 31 2c 52 31 | 2c 52 32 0d 04 f6 43 4c |UB R1,R1|,R2...CL|
|00000d70| 44 52 20 52 32 2c 5b 52 | 33 2c 23 31 36 5d 3a 4c |DR R2,[R|3,#16]:L|
|00000d80| 44 52 20 52 38 2c 5b 52 | 33 2c 23 32 34 5d 3a 53 |DR R8,[R|3,#24]:S|
|00000d90| 55 42 20 52 32 2c 52 32 | 2c 52 38 3a 53 55 42 20 |UB R2,R2|,R8:SUB |
|00000da0| 52 32 2c 52 32 2c 52 37 | 2c 4c 53 4c 23 35 0d 05 |R2,R2,R7|,LSL#5..|
|00000db0| 00 10 53 55 42 20 52 32 | 2c 52 32 2c 23 31 0d 05 |..SUB R2|,R2,#1..|
|00000dc0| 0a 41 3b 20 2a 2a 2a 20 | 4e 42 20 44 6f 6e 27 74 |.A; *** |NB Don't|
|00000dd0| 20 75 73 65 20 52 32 20 | 62 65 74 77 65 65 6e 20 | use R2 |between |
|00000de0| 68 65 72 65 20 61 6e 64 | 20 74 68 65 20 73 65 63 |here and| the sec|
|00000df0| 6f 6e 64 20 4f 53 5f 50 | 6c 6f 74 20 2a 2a 2a 0d |ond OS_P|lot ***.|
|00000e00| 05 14 11 53 57 49 20 22 | 4f 53 5f 50 6c 6f 74 22 |...SWI "|OS_Plot"|
|00000e10| 0d 05 1e 27 4d 4f 56 20 | 52 30 2c 52 37 2c 4c 53 |...'MOV |R0,R7,LS|
|00000e20| 4c 23 34 3a 4d 4f 56 20 | 52 31 2c 23 38 3a 42 4c |L#4:MOV |R1,#8:BL|
|00000e30| 20 68 65 78 66 69 78 0d | 05 28 25 53 57 49 20 26 | hexfix.|.(%SWI &|
|00000e40| 31 32 30 3a 53 57 49 20 | 26 31 30 30 2b 97 28 22 |120:SWI |&100+.("|
|00000e50| 3a 22 29 3a 53 57 49 20 | 26 31 32 30 0d 05 32 21 |:"):SWI |&120..2!|
|00000e60| 4d 4f 56 20 52 38 2c 52 | 37 2c 4c 53 4c 23 34 3a |MOV R8,R|7,LSL#4:|
|00000e70| 41 44 44 20 52 38 2c 52 | 38 2c 23 31 36 0d 05 3c |ADD R8,R|8,#16..<|
|00000e80| 19 43 4d 50 20 52 38 2c | 52 36 3a 4d 4f 56 47 54 |.CMP R8,|R6:MOVGT|
|00000e90| 20 52 38 2c 52 36 0d 05 | 46 16 41 44 44 20 52 30 | R8,R6..|F.ADD R0|
|00000ea0| 2c 52 34 2c 52 37 2c 4c | 53 4c 23 34 0d 05 50 16 |,R4,R7,L|SL#4..P.|
|00000eb0| 53 55 42 20 52 31 2c 52 | 38 2c 52 37 2c 4c 53 4c |SUB R1,R|8,R7,LSL|
|00000ec0| 23 34 0d 05 5a 0e 42 4c | 20 68 65 78 6c 69 6e 65 |#4..Z.BL| hexline|
|00000ed0| 0d 05 64 40 4c 44 52 20 | 52 31 2c 5b 52 33 2c 23 |..d@LDR |R1,[R3,#|
|00000ee0| 34 5d 3a 4c 44 52 20 52 | 30 2c 5b 52 33 2c 23 32 |4]:LDR R|0,[R3,#2|
|00000ef0| 30 5d 3a 53 55 42 20 52 | 31 2c 52 31 2c 52 30 3a |0]:SUB R|1,R1,R0:|
|00000f00| 41 44 44 20 52 31 2c 52 | 31 2c 23 35 39 2a 31 36 |ADD R1,R|1,#59*16|
|00000f10| 0d 05 6e 0d 4d 4f 56 20 | 52 30 2c 23 34 0d 05 78 |..n.MOV |R0,#4..x|
|00000f20| 11 53 57 49 20 22 4f 53 | 5f 50 6c 6f 74 22 0d 05 |.SWI "OS|_Plot"..|
|00000f30| 82 1c 53 57 49 20 26 31 | 30 30 2b 97 28 22 3a 22 |..SWI &1|00+.(":"|
|00000f40| 29 3a 53 57 49 20 26 31 | 32 30 0d 05 8c 16 41 44 |):SWI &1|20....AD|
|00000f50| 44 20 52 30 2c 52 34 2c | 52 37 2c 4c 53 4c 23 34 |D R0,R4,|R7,LSL#4|
|00000f60| 0d 05 96 16 53 55 42 20 | 52 31 2c 52 38 2c 52 37 |....SUB |R1,R8,R7|
|00000f70| 2c 4c 53 4c 23 34 0d 05 | a0 0e 42 4c 20 61 73 63 |,LSL#4..|..BL asc|
|00000f80| 6c 69 6e 65 0d 05 aa 10 | 41 44 44 20 52 37 2c 52 |line....|ADD R7,R|
|00000f90| 37 2c 23 31 0d 05 b4 0d | 43 4d 50 20 52 37 2c 52 |7,#1....|CMP R7,R|
|00000fa0| 35 0d 05 be 0f 42 4c 45 | 20 72 64 62 6c 6f 6f 70 |5....BLE| rdbloop|
|00000fb0| 0d 05 c8 19 4c 44 4d 46 | 44 20 52 31 33 21 2c 7b |....LDMF|D R13!,{|
|00000fc0| 52 34 2d 52 37 2c 50 43 | 7d 0d 05 d2 05 5d 0d 05 |R4-R7,PC|}....]..|
|00000fd0| dc 05 ed 0d 05 e6 05 e1 | 0d 05 f0 05 3a 0d 05 fa |........|....:...|
|00000fe0| 13 dd 20 f2 75 73 65 72 | 5f 6d 65 73 73 61 67 65 |.. .user|_message|
|00000ff0| 0d 06 04 0e c8 8e 20 71 | 25 21 31 36 20 ca 0d 06 |...... q|%!16 ...|
|00001000| 0e 14 20 20 c9 20 30 3a | 74 61 73 6b 65 6e 64 25 |.. . 0:|taskend%|
|00001010| 3d b9 0d 06 18 28 20 20 | c9 20 6d 65 73 73 61 67 |=....( |. messag|
|00001020| 65 5f 6d 65 6e 75 77 61 | 72 6e 69 6e 67 3a f2 6d |e_menuwa|rning:.m|
|00001030| 65 6e 75 77 61 72 6e 69 | 6e 67 0d 06 22 22 20 20 |enuwarni|ng.."" |
|00001040| c9 20 6d 65 73 73 61 67 | 65 5f 64 61 74 61 73 61 |. messag|e_datasa|
|00001050| 76 65 3a f2 64 61 74 61 | 73 61 76 65 0d 06 2c 22 |ve:.data|save..,"|
|00001060| 20 20 c9 20 6d 65 73 73 | 61 67 65 5f 64 61 74 61 | . mess|age_data|
|00001070| 6c 6f 61 64 3a f2 64 61 | 74 61 6c 6f 61 64 0d 06 |load:.da|taload..|
|00001080| 36 05 cb 0d 06 40 05 e1 | 0d 06 4a 05 3a 0d 06 54 |6....@..|..J.:..T|
|00001090| 0f dd 20 f2 65 72 72 6f | 72 62 6f 78 0d 06 5e 09 |.. .erro|rbox..^.|
|000010a0| ee 20 85 20 87 0d 06 68 | 2d 21 71 25 3d 9f 3a 24 |. . ...h|-!q%=.:$|
|000010b0| 28 71 25 2b 34 29 3d f6 | 24 2b 22 20 65 72 72 6f |(q%+4)=.|$+" erro|
|000010c0| 72 20 63 6f 64 65 20 22 | 2b c3 28 9e 29 2b bd 28 |r code "|+.(.)+.(|
|000010d0| 30 29 0d 06 72 28 c8 99 | 20 22 57 69 6d 70 5f 52 |0)..r(..| "Wimp_R|
|000010e0| 65 70 6f 72 74 45 72 72 | 6f 72 22 2c 71 25 2c 30 |eportErr|or",q%,0|
|000010f0| 2c 22 46 69 6c 65 53 65 | 65 22 0d 06 7c 05 e1 0d |,"FileSe|e"..|...|
|00001100| 06 86 05 3a 0d 06 90 18 | dd 20 f2 75 73 65 72 65 |...:....|. .usere|
|00001110| 72 72 6f 72 28 65 72 72 | 6f 72 24 29 0d 06 9a 1d |rror(err|or$)....|
|00001120| 21 71 25 3d 30 3a 24 28 | 71 25 2b 34 29 3d 65 72 |!q%=0:$(|q%+4)=er|
|00001130| 72 6f 72 24 2b bd 28 30 | 29 0d 06 a4 28 c8 99 20 |ror$+.(0|)...(.. |
|00001140| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|00001150| 72 22 2c 71 25 2c 30 2c | 22 46 69 6c 65 53 65 65 |r",q%,0,|"FileSee|
|00001160| 22 0d 06 ae 05 e1 0d 06 | b8 05 3a 0d 06 c2 19 dd |".......|..:.....|
|00001170| 20 f2 66 61 74 61 6c 65 | 72 72 6f 72 28 65 72 72 | .fatale|rror(err|
|00001180| 6f 72 24 29 0d 06 cc 1d | 21 71 25 3d 30 3a 24 28 |or$)....|!q%=0:$(|
|00001190| 71 25 2b 34 29 3d 65 72 | 72 6f 72 24 2b bd 28 30 |q%+4)=er|ror$+.(0|
|000011a0| 29 0d 06 d6 28 c8 99 20 | 22 57 69 6d 70 5f 52 65 |)...(.. |"Wimp_Re|
|000011b0| 70 6f 72 74 45 72 72 6f | 72 22 2c 71 25 2c 30 2c |portErro|r",q%,0,|
|000011c0| 22 46 69 6c 65 53 65 65 | 22 0d 06 e0 0e f2 63 6c |"FileSee|".....cl|
|000011d0| 6f 73 65 64 6f 77 6e 0d | 06 ea 05 e0 0d 06 f4 05 |osedown.|........|
|000011e0| e1 0d 06 fe 05 3a 0d 07 | 08 10 dd 20 f2 63 6c 6f |.....:..|... .clo|
|000011f0| 73 65 64 6f 77 6e 0d 07 | 12 27 c8 99 20 22 57 69 |sedown..|.'.. "Wi|
|00001200| 6d 70 5f 43 6c 6f 73 65 | 44 6f 77 6e 22 2c 74 61 |mp_Close|Down",ta|
|00001210| 73 6b 68 25 2c 21 74 61 | 73 6b 69 64 25 0d 07 1c |skh%,!ta|skid%...|
|00001220| 05 e1 0d 07 26 05 3a 0d | 07 30 15 dd 20 f2 69 6e |....&.:.|.0.. .in|
|00001230| 73 74 61 6c 6c 62 61 72 | 69 63 6f 6e 0d 07 3a 10 |stallbar|icon..:.|
|00001240| de 20 62 61 72 69 63 6f | 6e 20 33 36 0d 07 44 22 |. barico|n 36..D"|
|00001250| 21 62 61 72 69 63 6f 6e | 3d 2d 31 3a 62 69 5f 62 |!baricon|=-1:bi_b|
|00001260| 6c 6f 63 6b 3d 62 61 72 | 69 63 6f 6e 2b 34 0d 07 |lock=bar|icon+4..|
|00001270| 4e 1c 21 62 69 5f 62 6c | 6f 63 6b 3d 30 3a 62 69 |N.!bi_bl|ock=0:bi|
|00001280| 5f 62 6c 6f 63 6b 21 34 | 3d 30 0d 07 58 20 62 69 |_block!4|=0..X bi|
|00001290| 5f 62 6c 6f 63 6b 21 38 | 3d 36 38 3a 62 69 5f 62 |_block!8|=68:bi_b|
|000012a0| 6c 6f 63 6b 21 31 32 3d | 36 38 0d 07 62 11 62 69 |lock!12=|68..b.bi|
|000012b0| 5f 62 6c 6f 63 6b 21 31 | 36 3d 32 0d 07 6c 23 24 |_block!1|6=2..l#$|
|000012c0| 28 62 69 5f 62 6c 6f 63 | 6b 2b 32 30 29 3d 22 21 |(bi_bloc|k+20)="!|
|000012d0| 66 69 6c 65 73 65 65 22 | 2b bd 28 31 33 29 0d 07 |filesee"|+.(13)..|
|000012e0| 76 2b c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |v+.. "Wi|mp_Creat|
|000012f0| 65 49 63 6f 6e 22 2c 2c | 62 61 72 69 63 6f 6e 20 |eIcon",,|baricon |
|00001300| b8 20 62 61 72 5f 69 5f | 68 0d 07 80 05 e1 0d 07 |. bar_i_|h.......|
|00001310| 8a 05 3a 0d 07 94 14 dd | 20 f2 6c 6f 61 64 74 65 |..:.....| .loadte|
|00001320| 6d 70 6c 61 74 65 73 0d | 07 9e 11 69 6e 64 69 72 |mplates.|...indir|
|00001330| 6d 61 78 3d 32 30 30 30 | 0d 07 a8 1b de 20 69 6e |max=2000|..... in|
|00001340| 64 69 72 65 63 74 69 6f | 6e 73 20 69 6e 64 69 72 |directio|ns indir|
|00001350| 6d 61 78 0d 07 b2 1a 63 | 75 72 72 69 6e 64 69 72 |max....c|urrindir|
|00001360| 3d 69 6e 64 69 72 65 63 | 74 69 6f 6e 73 0d 07 bc |=indirec|tions...|
|00001370| 23 69 6e 64 69 72 5f 65 | 6e 64 3d 69 6e 64 69 72 |#indir_e|nd=indir|
|00001380| 65 63 74 69 6f 6e 73 2b | 69 6e 64 69 72 6d 61 78 |ections+|indirmax|
|00001390| 0d 07 c6 34 c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 |...4.. "|Wimp_Ope|
|000013a0| 6e 54 65 6d 70 6c 61 74 | 65 22 2c 2c 22 3c 46 6c |nTemplat|e",,"<Fl|
|000013b0| 42 72 6f 74 24 44 69 72 | 3e 2e 54 65 6d 70 6c 61 |Brot$Dir|>.Templa|
|000013c0| 74 65 73 22 0d 07 d0 19 | de 20 70 72 6f 67 69 6e |tes"....|. progin|
|000013d0| 66 6f 20 28 38 38 2b 33 | 32 2a 31 32 29 0d 07 da |fo (88+3|2*12)...|
|000013e0| 23 f2 6c 6f 61 64 61 74 | 65 6d 70 28 22 70 72 6f |#.loadat|emp("pro|
|000013f0| 67 49 6e 66 6f 22 2c 70 | 72 6f 67 69 6e 66 6f 29 |gInfo",p|roginfo)|
|00001400| 0d 07 e4 30 f4 24 28 21 | 28 70 72 6f 67 69 6e 66 |...0.$(!|(proginf|
|00001410| 6f 2b 38 38 2b 33 32 2a | 33 2b 32 30 29 29 3d 74 |o+88+32*|3+20))=t|
|00001420| 61 73 6b 76 65 72 24 2b | 43 48 52 24 28 31 33 29 |askver$+|CHR$(13)|
|00001430| 0d 07 ee 26 f2 77 72 69 | 74 65 69 63 6f 6e 74 78 |...&.wri|teicontx|
|00001440| 74 28 70 72 6f 67 69 6e | 66 6f 2c 33 2c 74 61 73 |t(progin|fo,3,tas|
|00001450| 6b 76 65 72 24 29 0d 07 | f8 13 de 20 66 69 6c 65 |kver$)..|... file|
|00001460| 77 69 6e 64 6f 77 20 38 | 38 0d 08 02 27 f2 6c 6f |window 8|8...'.lo|
|00001470| 61 64 61 74 65 6d 70 28 | 22 66 69 6c 65 77 69 6e |adatemp(|"filewin|
|00001480| 64 6f 77 22 2c 66 69 6c | 65 77 69 6e 64 6f 77 29 |dow",fil|ewindow)|
|00001490| 0d 08 0c 1b c8 99 20 22 | 57 69 6d 70 5f 43 6c 6f |...... "|Wimp_Clo|
|000014a0| 73 65 54 65 6d 70 6c 61 | 74 65 22 0d 08 16 05 e1 |seTempla|te".....|
|000014b0| 0d 08 20 05 3a 0d 08 2a | 23 dd 20 f2 6c 6f 61 64 |.. .:..*|#. .load|
|000014c0| 61 74 65 6d 70 28 74 65 | 6d 70 6c 69 64 24 2c 74 |atemp(te|mplid$,t|
|000014d0| 65 6d 70 62 75 66 25 29 | 0d 08 34 16 24 71 25 3d |empbuf%)|..4.$q%=|
|000014e0| 74 65 6d 70 6c 69 64 24 | 2b bd 28 31 33 29 0d 08 |templid$|+.(13)..|
|000014f0| 3e 54 c8 99 20 22 57 69 | 6d 70 5f 4c 6f 61 64 54 |>T.. "Wi|mp_LoadT|
|00001500| 65 6d 70 6c 61 74 65 22 | 2c 2c 74 65 6d 70 62 75 |emplate"|,,tempbu|
|00001510| 66 25 2c 63 75 72 72 69 | 6e 64 69 72 2c 69 6e 64 |f%,curri|ndir,ind|
|00001520| 69 72 5f 65 6e 64 2c 2d | 31 2c 71 25 2c 30 20 b8 |ir_end,-|1,q%,0 .|
|00001530| 2c 2c 63 75 72 72 69 6e | 64 69 72 2c 2c 2c 2c 6d |,,currin|dir,,,,m|
|00001540| 74 25 0d 08 48 36 e7 20 | 6d 74 25 3d 30 20 8c 20 |t%..H6. |mt%=0 . |
|00001550| 85 20 30 2c 22 54 65 6d | 70 6c 61 74 65 20 27 22 |. 0,"Tem|plate '"|
|00001560| 2b 74 65 6d 70 6c 69 64 | 24 2b 22 27 20 6e 6f 74 |+templid|$+"' not|
|00001570| 20 66 6f 75 6e 64 21 22 | 0d 08 52 05 e1 0d 08 5c | found!"|..R....\|
|00001580| 05 3a 0d 08 66 12 dd 20 | f2 6d 6f 75 73 65 5f 63 |.:..f.. |.mouse_c|
|00001590| 6c 69 63 6b 0d 08 70 0e | c8 8e 20 71 25 21 31 32 |lick..p.|.. q%!12|
|000015a0| 20 ca 0d 08 7a 15 20 20 | c9 20 2d 32 3a f2 62 61 | ...z. |. -2:.ba|
|000015b0| 72 5f 63 6c 69 63 6b 0d | 08 84 05 cb 0d 08 8e 05 |r_click.|........|
|000015c0| e1 0d 08 98 05 3a 0d 08 | a2 10 dd 20 f2 62 61 72 |.....:..|... .bar|
|000015d0| 5f 63 6c 69 63 6b 0d 08 | ac 18 e7 20 71 25 21 31 |_click..|... q%!1|
|000015e0| 36 3c 3e 62 61 72 5f 69 | 5f 68 20 8c 20 e1 0d 08 |6<>bar_i|_h . ...|
|000015f0| b6 1c e7 20 71 25 21 38 | 3d 32 20 8c 20 f2 73 74 |... q%!8|=2 . .st|
|00001600| 61 72 74 62 61 72 6d 65 | 6e 75 0d 08 c0 05 e1 0d |artbarme|nu......|
|00001610| 08 ca 05 3a 0d 08 d4 13 | dd 20 f2 73 74 61 72 74 |...:....|. .start|
|00001620| 62 61 72 6d 65 6e 75 0d | 08 de 1b 21 71 25 3d 21 |barmenu.|...!q%=!|
|00001630| 71 25 2d 36 34 3a 71 25 | 21 34 3d 39 36 2b 34 34 |q%-64:q%|!4=96+44|
|00001640| 2a 32 0d 08 e8 2d f2 63 | 72 65 61 74 65 6d 65 6e |*2...-.c|reatemen|
|00001650| 75 28 62 61 72 5f 6d 2c | 22 3e 49 6e 66 6f 2c 51 |u(bar_m,|">Info,Q|
|00001660| 75 69 74 22 2c 22 46 69 | 6c 65 53 65 65 22 29 0d |uit","Fi|leSee").|
|00001670| 08 f2 05 e1 0d 08 fc 05 | 3a 0d 09 06 2e dd 20 f2 |........|:..... .|
|00001680| 63 72 65 61 74 65 6d 65 | 6e 75 28 6d 65 6e 5f 68 |createme|nu(men_h|
|00001690| 61 6e 64 6c 65 2c 6d 65 | 6e 75 6c 69 73 74 24 2c |andle,me|nulist$,|
|000016a0| 6d 74 69 74 6c 24 29 0d | 09 10 15 6d 65 6e 75 62 |mtitl$).|...menub|
|000016b0| 6c 25 3d 6d 65 6e 75 62 | 75 66 66 25 0d 09 1a 13 |l%=menub|uff%....|
|000016c0| 24 6d 65 6e 75 62 6c 25 | 3d 6d 74 69 74 6c 24 0d |$menubl%|=mtitl$.|
|000016d0| 09 24 37 6d 65 6e 75 62 | 6c 25 3f 31 32 3d 37 3a |.$7menub|l%?12=7:|
|000016e0| 6d 65 6e 75 62 6c 25 3f | 31 33 3d 32 3a 6d 65 6e |menubl%?|13=2:men|
|000016f0| 75 62 6c 25 3f 31 34 3d | 37 3a 6d 65 6e 75 62 6c |ubl%?14=|7:menubl|
|00001700| 25 3f 31 35 3d 30 0d 09 | 2e 1e 6d 65 6e 75 62 6c |%?15=0..|..menubl|
|00001710| 25 21 32 30 3d 34 34 3a | 6d 65 6e 75 62 6c 25 21 |%!20=44:|menubl%!|
|00001720| 32 34 3d 30 0d 09 38 31 | 6d 65 6e 77 69 64 74 68 |24=0..81|menwidth|
|00001730| 25 3d 30 3a 63 75 72 72 | 6d 65 6e 6c 3d 31 3a 6d |%=0:curr|menl=1:m|
|00001740| 65 6e 6c 6c 65 6e 3d a9 | 28 6d 65 6e 75 6c 69 73 |enllen=.|(menulis|
|00001750| 74 24 29 2b 31 0d 09 42 | 17 63 75 72 72 6d 65 6e |t$)+1..B|.currmen|
|00001760| 70 3d 6d 65 6e 75 62 6c | 25 2b 32 38 0d 09 4c 05 |p=menubl|%+28..L.|
|00001770| f5 0d 09 56 29 20 20 63 | 75 72 72 6d 65 6e 65 3d |...V) c|urrmene=|
|00001780| a7 6d 65 6e 75 6c 69 73 | 74 24 2c 22 2c 22 2c 63 |.menulis|t$,",",c|
|00001790| 75 72 72 6d 65 6e 6c 2b | 31 29 0d 09 60 25 20 20 |urrmenl+|1)..`% |
|000017a0| e7 20 63 75 72 72 6d 65 | 6e 65 3d 30 20 8c 20 63 |. currme|ne=0 . c|
|000017b0| 75 72 72 6d 65 6e 65 3d | 6d 65 6e 6c 6c 65 6e 0d |urrmene=|menllen.|
|000017c0| 09 6a 41 20 20 e7 20 6d | 65 6e 77 69 64 74 68 25 |.jA . m|enwidth%|
|000017d0| 3c 63 75 72 72 6d 65 6e | 65 2d 63 75 72 72 6d 65 |<currmen|e-currme|
|000017e0| 6e 6c 20 8c 20 6d 65 6e | 77 69 64 74 68 25 3d 63 |nl . men|width%=c|
|000017f0| 75 72 72 6d 65 6e 65 2d | 63 75 72 72 6d 65 6e 6c |urrmene-|currmenl|
|00001800| 0d 09 74 44 20 20 e7 20 | c1 6d 65 6e 75 6c 69 73 |..tD . |.menulis|
|00001810| 74 24 2c 63 75 72 72 6d | 65 6e 6c 2c 31 29 3d 22 |t$,currm|enl,1)="|
|00001820| 3e 22 20 8c 20 73 75 62 | 6d 65 6e 3d b9 3a 63 75 |>" . sub|men=.:cu|
|00001830| 72 72 6d 65 6e 6c 2b 3d | 31 3a 8b 20 73 75 62 6d |rrmenl+=|1:. subm|
|00001840| 65 6e 3d a3 0d 09 7e 4b | 20 20 e7 20 73 75 62 6d |en=...~K| . subm|
|00001850| 65 6e 3d b9 20 8c 20 21 | 63 75 72 72 6d 65 6e 70 |en=. . !|currmenp|
|00001860| 3d 25 31 30 30 30 3a 63 | 75 72 72 6d 65 6e 70 21 |=%1000:c|urrmenp!|
|00001870| 34 3d 31 20 8b 20 21 63 | 75 72 72 6d 65 6e 70 3d |4=1 . !c|urrmenp=|
|00001880| 30 3a 63 75 72 72 6d 65 | 6e 70 21 34 3d 2d 31 0d |0:currme|np!4=-1.|
|00001890| 09 88 1a 20 20 63 75 72 | 72 6d 65 6e 70 21 38 3d |... cur|rmenp!8=|
|000018a0| 26 30 37 30 30 30 30 32 | 31 0d 09 92 41 20 20 24 |&0700002|1...A $|
|000018b0| 28 63 75 72 72 6d 65 6e | 70 2b 31 32 29 3d c1 6d |(currmen|p+12)=.m|
|000018c0| 65 6e 75 6c 69 73 74 24 | 2c 63 75 72 72 6d 65 6e |enulist$|,currmen|
|000018d0| 6c 2c 63 75 72 72 6d 65 | 6e 65 2d 63 75 72 72 6d |l,currme|ne-currm|
|000018e0| 65 6e 6c 29 2b bd 28 31 | 33 29 0d 09 9c 19 20 20 |enl)+.(1|3).... |
|000018f0| 63 75 72 72 6d 65 6e 6c | 3d 63 75 72 72 6d 65 6e |currmenl|=currmen|
|00001900| 65 2b 31 0d 09 a6 12 20 | 20 63 75 72 72 6d 65 6e |e+1.... | currmen|
|00001910| 70 2b 3d 32 34 0d 09 b0 | 16 fd 20 63 75 72 72 6d |p+=24...|.. currm|
|00001920| 65 6e 65 3d 6d 65 6e 6c | 6c 65 6e 0d 09 ba 1d 6d |ene=menl|len....m|
|00001930| 65 6e 75 62 6c 25 21 31 | 36 3d 6d 65 6e 77 69 64 |enubl%!1|6=menwid|
|00001940| 74 68 25 2a 31 36 2b 38 | 0d 09 c4 27 21 28 63 75 |th%*16+8|...'!(cu|
|00001950| 72 72 6d 65 6e 70 2d 32 | 34 29 3d 21 28 63 75 72 |rrmenp-2|4)=!(cur|
|00001960| 72 6d 65 6e 70 2d 32 34 | 29 20 84 20 26 38 30 0d |rmenp-24|) . &80.|
|00001970| 09 ce 2a c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |..*.. "W|imp_Crea|
|00001980| 74 65 4d 65 6e 75 22 2c | 2c 6d 65 6e 75 62 6c 25 |teMenu",|,menubl%|
|00001990| 2c 21 71 25 2c 71 25 21 | 34 0d 09 d8 18 63 75 72 |,!q%,q%!|4....cur|
|000019a0| 72 5f 6d 65 6e 75 3d 6d | 65 6e 5f 68 61 6e 64 6c |r_menu=m|en_handl|
|000019b0| 65 0d 09 e2 05 e1 0d 09 | ec 05 3a 0d 09 f6 15 dd |e.......|..:.....|
|000019c0| 20 f2 6d 65 6e 75 5f 73 | 65 6c 65 63 74 69 6f 6e | .menu_s|election|
|000019d0| 0d 0a 00 12 c8 8e 20 63 | 75 72 72 5f 6d 65 6e 75 |...... c|urr_menu|
|000019e0| 20 ca 0d 0a 0a 20 20 20 | c9 20 62 61 72 5f 6d 3a | .... |. bar_m:|
|000019f0| f2 62 61 72 6d 65 6e 75 | 5f 73 65 6c 65 63 74 69 |.barmenu|_selecti|
|00001a00| 6f 6e 0d 0a 14 05 cb 0d | 0a 1e 05 e1 0d 0a 28 05 |on......|......(.|
|00001a10| 3a 0d 0a 32 18 dd 20 f2 | 62 61 72 6d 65 6e 75 5f |:..2.. .|barmenu_|
|00001a20| 73 65 6c 65 63 74 69 6f | 6e 0d 0a 3c 18 e7 20 21 |selectio|n..<.. !|
|00001a30| 71 25 3d 31 20 8c 20 f2 | 63 6c 6f 73 65 64 6f 77 |q%=1 . .|closedow|
|00001a40| 6e 0d 0a 46 05 e1 0d 0a | 50 05 3a 0d 0a 5a 12 dd |n..F....|P.:..Z..|
|00001a50| 20 f2 6d 65 6e 75 77 61 | 72 6e 69 6e 67 0d 0a 64 | .menuwa|rning..d|
|00001a60| 12 c8 8e 20 63 75 72 72 | 5f 6d 65 6e 75 20 ca 0d |... curr|_menu ..|
|00001a70| 0a 6e 1e 20 20 c9 20 62 | 61 72 5f 6d 3a f2 62 61 |.n. . b|ar_m:.ba|
|00001a80| 72 6d 65 6e 75 5f 77 61 | 72 6e 69 6e 67 0d 0a 78 |rmenu_wa|rning..x|
|00001a90| 05 cb 0d 0a 82 05 e1 0d | 0a 8c 05 3a 0d 0a 96 16 |........|...:....|
|00001aa0| dd 20 f2 62 61 72 6d 65 | 6e 75 5f 77 61 72 6e 69 |. .barme|nu_warni|
|00001ab0| 6e 67 0d 0a a0 22 e7 20 | 71 25 21 33 32 3d 30 20 |ng...". |q%!32=0 |
|00001ac0| 80 20 63 75 72 72 5f 73 | 75 62 5f 64 62 6f 78 3d |. curr_s|ub_dbox=|
|00001ad0| 2d 31 20 8c 0d 0a aa 2b | c8 99 20 22 57 69 6d 70 |-1 ....+|.. "Wimp|
|00001ae0| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|00001af0| 70 72 6f 67 69 6e 66 6f | 20 b8 20 70 69 5f 68 0d |proginfo| . pi_h.|
|00001b00| 0a b4 2d c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |..-.. "W|imp_Crea|
|00001b10| 74 65 53 75 62 4d 65 6e | 75 22 2c 2c 70 69 5f 68 |teSubMen|u",,pi_h|
|00001b20| 2c 71 25 21 32 34 2c 71 | 25 21 32 38 0d 0a be 16 |,q%!24,q|%!28....|
|00001b30| 63 75 72 72 5f 73 75 62 | 5f 64 62 6f 78 3d 70 69 |curr_sub|_dbox=pi|
|00001b40| 5f 68 0d 0a c8 05 cd 0d | 0a d2 05 e1 0d 0a dc 05 |_h......|........|
|00001b50| 3a 0d 0a e6 1a dd 20 f2 | 6f 70 65 6e 5f 77 69 6e |:..... .|open_win|
|00001b60| 64 6f 77 5f 72 65 71 75 | 65 73 74 0d 0a f0 1c c8 |dow_requ|est.....|
|00001b70| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |. "Wimp_|OpenWind|
|00001b80| 6f 77 22 2c 2c 71 25 0d | 0a fa 05 e1 0d 0b 04 05 |ow",,q%.|........|
|00001b90| 3a 0d 0b 0e 11 dd 20 f2 | 64 62 6f 78 5f 63 68 65 |:..... .|dbox_che|
|00001ba0| 63 6b 0d 0b 18 18 21 74 | 65 6d 70 25 3d 63 75 72 |ck....!t|emp%=cur|
|00001bb0| 72 5f 73 75 62 5f 64 62 | 6f 78 0d 0b 22 23 c8 99 |r_sub_db|ox.."#..|
|00001bc0| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|00001bd0| 53 74 61 74 65 22 2c 2c | 74 65 6d 70 25 0d 0b 2c |State",,|temp%..,|
|00001be0| 3d e7 20 28 28 74 65 6d | 70 25 21 33 32 29 20 80 |=. ((tem|p%!32) .|
|00001bf0| 20 26 31 30 30 30 30 29 | 3d 30 20 8c 20 c8 99 20 | &10000)|=0 . .. |
|00001c00| 22 57 69 6d 70 5f 44 65 | 6c 65 74 65 57 69 6e 64 |"Wimp_De|leteWind|
|00001c10| 6f 77 22 2c 2c 74 65 6d | 70 25 0d 0b 36 14 63 75 |ow",,tem|p%..6.cu|
|00001c20| 72 72 5f 73 75 62 5f 64 | 62 6f 78 3d 2d 31 0d 0b |rr_sub_d|box=-1..|
|00001c30| 40 05 e1 0d 0b 4a 05 3a | 0d 0b 54 14 dd 20 f2 72 |@....J.:|..T.. .r|
|00001c40| 65 64 72 61 77 5f 77 69 | 6e 64 6f 77 0d 0b 5e 3c |edraw_wi|ndow..^<|
|00001c50| ea 20 6e 6f 6d 6f 72 65 | 25 2c 66 69 6c 65 6e 6f |. nomore|%,fileno|
|00001c60| 25 2c 73 74 61 72 74 6c | 69 6e 65 25 2c 65 6e 64 |%,startl|ine%,end|
|00001c70| 6c 69 6e 65 25 2c 6c 6f | 6f 70 25 2c 6c 6f 6f 70 |line%,lo|op%,loop|
|00001c80| 32 25 2c 65 6e 64 6c 25 | 0d 0b 68 1b 66 69 6c 65 |2%,endl%|..h.file|
|00001c90| 6e 6f 25 3d a4 67 65 74 | 66 69 6c 65 6e 6f 28 21 |no%=.get|fileno(!|
|00001ca0| 71 25 29 0d 0b 72 45 e7 | 20 66 69 6c 65 6e 6f 25 |q%)..rE.| fileno%|
|00001cb0| 3d 2d 31 20 8c 20 f2 66 | 61 74 61 6c 65 72 72 6f |=-1 . .f|atalerro|
|00001cc0| 72 28 22 55 6e 6b 6e 6f | 77 6e 20 77 69 6e 64 6f |r("Unkno|wn windo|
|00001cd0| 77 20 68 61 6e 64 6c 65 | 20 28 22 2b c3 28 21 71 |w handle| ("+.(!q|
|00001ce0| 25 29 2b 22 29 2e 22 29 | 0d 0b 7c 28 c8 99 20 22 |%)+").")|..|(.. "|
|00001cf0| 57 69 6d 70 5f 52 65 64 | 72 61 77 57 69 6e 64 6f |Wimp_Red|rawWindo|
|00001d00| 77 22 2c 2c 71 25 20 b8 | 20 6e 6f 6d 6f 72 65 25 |w",,q% .| nomore%|
|00001d10| 0d 0b 86 0e c8 95 20 6e | 6f 6d 6f 72 65 25 0d 0b |...... n|omore%..|
|00001d20| 90 27 20 20 73 74 61 72 | 74 6c 69 6e 65 25 3d 2d |.' star|tline%=-|
|00001d30| 28 71 25 21 34 30 2d 28 | 71 25 21 31 36 2d 71 25 |(q%!40-(|q%!16-q%|
|00001d40| 21 32 34 29 29 0d 0b 9a | 25 20 20 65 6e 64 6c 69 |!24))...|% endli|
|00001d50| 6e 65 25 3d 2d 28 71 25 | 21 33 32 2d 28 71 25 21 |ne%=-(q%|!32-(q%!|
|00001d60| 31 36 2d 71 25 21 32 34 | 29 29 0d 0b a4 20 20 20 |16-q%!24|))... |
|00001d70| 73 74 61 72 74 6c 69 6e | 65 25 3d 73 74 61 72 74 |startlin|e%=start|
|00001d80| 6c 69 6e 65 25 20 81 20 | 33 32 0d 0b ae 1c 20 20 |line% . |32.... |
|00001d90| 65 6e 64 6c 69 6e 65 25 | 3d 65 6e 64 6c 69 6e 65 |endline%|=endline|
|00001da0| 25 20 81 20 33 32 0d 0b | b8 33 20 20 e7 20 65 6e |% . 32..|.3 . en|
|00001db0| 64 6c 69 6e 65 25 2a 31 | 36 3e 3d 66 69 6c 65 73 |dline%*1|6>=files|
|00001dc0| 6c 25 28 66 69 6c 65 6e | 6f 25 29 20 8c 20 65 6e |l%(filen|o%) . en|
|00001dd0| 64 6c 69 6e 65 25 2d 3d | 31 0d 0b c2 33 20 20 c8 |dline%-=|1...3 .|
|00001de0| 99 20 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |. "Wimp_|SetColou|
|00001df0| 72 22 2c 37 3a c8 99 20 | 22 57 69 6d 70 5f 53 65 |r",7:.. |"Wimp_Se|
|00001e00| 74 43 6f 6c 6f 75 72 22 | 2c 31 32 38 0d 0b cc 4d |tColour"|,128...M|
|00001e10| 20 20 41 25 3d 73 74 61 | 72 74 6c 69 6e 65 25 3a | A%=sta|rtline%:|
|00001e20| 42 25 3d 65 6e 64 6c 69 | 6e 65 25 3a 43 25 3d 66 |B%=endli|ne%:C%=f|
|00001e30| 69 6c 65 73 6c 25 28 66 | 69 6c 65 6e 6f 25 29 3a |ilesl%(f|ileno%):|
|00001e40| 44 25 3d 71 25 3a 45 25 | 3d 66 69 6c 65 73 70 25 |D%=q%:E%|=filesp%|
|00001e50| 28 66 69 6c 65 6e 6f 25 | 29 0d 0b d6 13 20 20 d6 |(fileno%|).... .|
|00001e60| 20 72 65 64 72 61 77 62 | 6c 6f 63 6b 0d 0b e0 2a | redrawb|lock...*|
|00001e70| 20 20 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 52 65 | .. "Wi|mp_GetRe|
|00001e80| 63 74 61 6e 67 6c 65 22 | 2c 2c 71 25 20 b8 20 6e |ctangle"|,,q% . n|
|00001e90| 6f 6d 6f 72 65 25 0d 0b | ea 05 ce 0d 0b f4 05 e1 |omore%..|........|
|00001ea0| 0d 0b fe 05 3a 0d 0c 08 | 26 dd 20 f2 77 72 69 74 |....:...|&. .writ|
|00001eb0| 65 69 63 6f 6e 74 78 74 | 28 77 69 6e 64 6f 77 70 |eicontxt|(windowp|
|00001ec0| 2c 69 63 6f 6e 2c 74 78 | 74 24 29 0d 0c 12 0c ea |,icon,tx|t$).....|
|00001ed0| 20 49 2c 54 2c 70 25 0d | 0c 1c 19 70 25 3d 77 69 | I,T,p%.|...p%=wi|
|00001ee0| 6e 64 6f 77 70 2b 38 38 | 2b 33 32 2a 69 63 6f 6e |ndowp+88|+32*icon|
|00001ef0| 0d 0c 26 12 49 3d 26 31 | 30 30 20 80 20 70 25 21 |..&.I=&1|00 . p%!|
|00001f00| 31 36 0d 0c 30 0f 54 3d | 31 20 80 20 70 25 21 31 |16..0.T=|1 . p%!1|
|00001f10| 36 0d 0c 3a 0d e7 20 54 | 3d 30 20 8c 20 e1 0d 0c |6..:.. T|=0 . ...|
|00001f20| 44 0b e7 20 49 3d 30 20 | 8c 0d 0c 4e 23 20 20 e7 |D.. I=0 |...N# .|
|00001f30| 20 a9 28 74 78 74 24 29 | 3c 3d 31 31 20 8c 20 24 | .(txt$)|<=11 . $|
|00001f40| 28 70 25 2b 32 30 29 3d | 74 78 74 24 0d 0c 58 05 |(p%+20)=|txt$..X.|
|00001f50| cc 0d 0c 62 25 20 20 e7 | 20 a9 28 74 78 74 24 29 |...b% .| .(txt$)|
|00001f60| 3c 70 25 21 32 38 20 8c | 20 24 28 70 25 21 32 30 |<p%!28 .| $(p%!20|
|00001f70| 29 3d 74 78 74 24 0d 0c | 6c 05 cd 0d 0c 76 05 e1 |)=txt$..|l....v..|
|00001f80| 0d 0c 80 05 3a 0d 0c 8a | 14 dd 20 a4 72 65 61 64 |....:...|.. .read|
|00001f90| 7a 65 72 6f 28 70 74 72 | 29 0d 0c 94 0f ea 20 63 |zero(ptr|)..... c|
|00001fa0| 68 25 2c 74 65 6d 70 24 | 0d 0c 9e 13 74 65 6d 70 |h%,temp$|....temp|
|00001fb0| 24 3d c4 32 35 35 2c 22 | 20 22 29 0d 0c a8 0c 74 |$=.255,"| ")....t|
|00001fc0| 65 6d 70 24 3d 22 22 0d | 0c b2 0c 63 68 25 3d 3f |emp$="".|...ch%=?|
|00001fd0| 70 74 72 0d 0c bc 0d c8 | 95 20 63 68 25 3c 3e 30 |ptr.....|. ch%<>0|
|00001fe0| 0d 0c c6 18 20 20 74 65 | 6d 70 24 3d 74 65 6d 70 |.... te|mp$=temp|
|00001ff0| 24 2b bd 28 63 68 25 29 | 0d 0c d0 0c 20 20 70 74 |$+.(ch%)|.... pt|
|00002000| 72 2b 3d 31 0d 0c da 0e | 20 20 63 68 25 3d 3f 70 |r+=1....| ch%=?p|
|00002010| 74 72 0d 0c e4 05 ce 0d | 0c ee 0a 3d 74 65 6d 70 |tr......|...=temp|
|00002020| 24 0d 0c f8 05 3a 0d 0d | 02 0f dd 20 f2 64 61 74 |$....:..|... .dat|
|00002030| 61 73 61 76 65 0d 0d 0c | 0b ea 20 73 69 7a 65 25 |asave...|.. size%|
|00002040| 0d 0d 16 0e 71 25 21 31 | 32 3d 71 25 21 38 0d 0d |....q%!1|2=q%!8..|
|00002050| 20 0c 71 25 21 33 36 3d | 2d 31 0d 0d 2a 1d 71 25 | .q%!36=|-1..*.q%|
|00002060| 21 31 36 3d 6d 65 73 73 | 61 67 65 5f 64 61 74 61 |!16=mess|age_data|
|00002070| 73 61 76 65 61 63 6b 0d | 0d 34 20 24 28 71 25 2b |saveack.|.4 $(q%+|
|00002080| 34 34 29 3d 22 3c 57 69 | 6d 70 24 53 63 72 61 70 |44)="<Wi|mp$Scrap|
|00002090| 3e 22 2b bd 28 30 29 0d | 0d 3e 23 73 69 7a 65 25 |>"+.(0).|.>#size%|
|000020a0| 3d 34 34 2b a9 28 22 3c | 57 69 6d 70 24 53 63 72 |=44+.("<|Wimp$Scr|
|000020b0| 61 70 3e 22 2b bd 28 30 | 29 29 0d 0d 48 1e 71 25 |ap>"+.(0|))..H.q%|
|000020c0| 21 30 3d 73 69 7a 65 25 | 2b 28 34 2d 28 73 69 7a |!0=size%|+(4-(siz|
|000020d0| 65 25 20 83 20 34 29 29 | 0d 0d 52 24 c8 99 20 22 |e% . 4))|..R$.. "|
|000020e0| 57 69 6d 70 5f 53 65 6e | 64 4d 65 73 73 61 67 65 |Wimp_Sen|dMessage|
|000020f0| 22 2c 31 39 2c 71 25 2c | 71 25 21 34 0d 0d 5c 05 |",19,q%,|q%!4..\.|
|00002100| e1 0d 0d 66 05 3a 0d 0d | 70 0f dd 20 f2 64 61 74 |...f.:..|p.. .dat|
|00002110| 61 6c 6f 61 64 0d 0d 7a | 42 e7 20 63 75 72 72 66 |aload..z|B. currf|
|00002120| 69 6c 65 73 25 3e 3d 6d | 61 78 66 69 6c 65 73 25 |iles%>=m|axfiles%|
|00002130| 20 8c 20 f2 75 73 65 72 | 65 72 72 6f 72 28 22 54 | . .user|error("T|
|00002140| 6f 6f 20 6d 61 6e 79 20 | 66 69 6c 65 73 20 6f 70 |oo many |files op|
|00002150| 65 6e 2e 22 29 3a e1 0d | 0d 84 1e ea 20 66 69 6c |en."):..|.... fil|
|00002160| 65 6e 61 6d 65 24 2c 63 | 66 69 6c 65 73 69 7a 65 |ename$,c|filesize|
|00002170| 25 2c 66 68 25 0d 0d 8e | 1e 66 69 6c 65 6e 61 6d |%,fh%...|.filenam|
|00002180| 65 24 3d a4 72 65 61 64 | 7a 65 72 6f 28 71 25 2b |e$=.read|zero(q%+|
|00002190| 34 34 29 0d 0d 98 14 66 | 68 25 3d 8e 28 66 69 6c |44)....f|h%=.(fil|
|000021a0| 65 6e 61 6d 65 24 29 0d | 0d a2 3f e7 20 66 68 25 |ename$).|..?. fh%|
|000021b0| 3d 30 20 8c 20 f2 75 73 | 65 72 65 72 72 6f 72 28 |=0 . .us|ererror(|
|000021c0| 22 43 6f 75 6c 64 6e 27 | 74 20 6f 70 65 6e 20 66 |"Couldn'|t open f|
|000021d0| 69 6c 65 20 22 2b 66 69 | 6c 65 6e 61 6d 65 24 2b |ile "+fi|lename$+|
|000021e0| 22 2e 22 29 3a e1 0d 0d | ac 14 63 66 69 6c 65 73 |"."):...|..cfiles|
|000021f0| 69 7a 65 25 3d a2 23 66 | 68 25 0d 0d b6 09 d9 23 |ize%=.#f|h%.....#|
|00002200| 66 68 25 0d 0d c0 49 e7 | 20 ac 28 a4 61 64 64 73 |fh%...I.| .(.adds|
|00002210| 70 61 63 65 28 63 66 69 | 6c 65 73 69 7a 65 25 2c |pace(cfi|lesize%,|
|00002220| 66 69 6c 65 6e 61 6d 65 | 24 29 29 20 8c 20 f2 75 |filename|$)) . .u|
|00002230| 73 65 72 65 72 72 6f 72 | 28 22 4f 75 74 20 6f 66 |sererror|("Out of|
|00002240| 20 6d 65 6d 6f 72 79 2e | 22 29 3a e1 0d 0d ca 34 | memory.|"):....4|
|00002250| ff 28 22 4c 4f 41 44 20 | 22 2b 66 69 6c 65 6e 61 |.("LOAD |"+filena|
|00002260| 6d 65 24 2b 22 20 22 2b | c3 7e 28 66 69 6c 65 73 |me$+" "+|.~(files|
|00002270| 70 25 28 63 75 72 72 66 | 69 6c 65 73 25 29 29 29 |p%(currf|iles%)))|
|00002280| 0d 0d d4 25 66 69 6c 65 | 77 69 6e 64 6f 77 21 37 |...%file|window!7|
|00002290| 32 3d 66 69 6c 65 6e 70 | 25 28 63 75 72 72 66 69 |2=filenp|%(currfi|
|000022a0| 6c 65 73 25 29 0d 0d de | 27 66 69 6c 65 77 69 6e |les%)...|'filewin|
|000022b0| 64 6f 77 21 34 34 3d 2d | 28 63 66 69 6c 65 73 69 |dow!44=-|(cfilesi|
|000022c0| 7a 65 25 20 81 20 31 36 | 29 2a 33 32 0d 0d e8 2e |ze% . 16|)*32....|
|000022d0| e7 20 28 63 66 69 6c 65 | 73 69 7a 65 25 20 83 20 |. (cfile|size% . |
|000022e0| 31 36 29 3c 3e 30 20 8c | 20 66 69 6c 65 77 69 6e |16)<>0 .| filewin|
|000022f0| 64 6f 77 21 34 34 2d 3d | 33 32 0d 0d f2 17 66 69 |dow!44-=|32....fi|
|00002300| 6c 65 77 69 6e 64 6f 77 | 21 34 38 3d 31 36 2a 37 |lewindow|!48=16*7|
|00002310| 38 0d 0d fc 3c c8 99 20 | 22 57 69 6d 70 5f 43 72 |8...<.. |"Wimp_Cr|
|00002320| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 66 69 6c |eateWind|ow",,fil|
|00002330| 65 77 69 6e 64 6f 77 20 | b8 20 66 69 6c 65 77 68 |ewindow |. filewh|
|00002340| 25 28 63 75 72 72 66 69 | 6c 65 73 25 29 0d 0e 06 |%(currfi|les%)...|
|00002350| 1e 21 74 65 6d 70 25 3d | 66 69 6c 65 77 68 25 28 |.!temp%=|filewh%(|
|00002360| 63 75 72 72 66 69 6c 65 | 73 25 29 0d 0e 10 23 c8 |currfile|s%)...#.|
|00002370| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00002380| 77 53 74 61 74 65 22 2c | 2c 74 65 6d 70 25 0d 0e |wState",|,temp%..|
|00002390| 1a 0f 74 65 6d 70 25 21 | 32 38 3d 2d 31 0d 0e 24 |..temp%!|28=-1..$|
|000023a0| 1f c8 99 20 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 |... "Wim|p_OpenWi|
|000023b0| 6e 64 6f 77 22 2c 2c 74 | 65 6d 70 25 0d 0e 2e 16 |ndow",,t|emp%....|
|000023c0| 71 25 21 31 36 3d 34 3a | 71 25 21 31 32 3d 71 25 |q%!16=4:|q%!12=q%|
|000023d0| 21 38 0d 0e 38 24 c8 99 | 20 22 57 69 6d 70 5f 53 |!8..8$..| "Wimp_S|
|000023e0| 65 6e 64 4d 65 73 73 61 | 67 65 22 2c 31 39 2c 71 |endMessa|ge",19,q|
|000023f0| 25 2c 71 25 21 34 0d 0e | 42 11 63 75 72 72 66 69 |%,q%!4..|B.currfi|
|00002400| 6c 65 73 25 2b 3d 31 0d | 0e 4c 05 e1 0d 0e 56 05 |les%+=1.|.L....V.|
|00002410| 3a 0d 0e 60 14 dd 20 a4 | 67 65 74 66 69 6c 65 6e |:..`.. .|getfilen|
|00002420| 6f 28 77 68 29 0d 0e 6a | 0b ea 20 6c 6f 6f 70 25 |o(wh)..j|.. loop%|
|00002430| 0d 0e 74 0b 6c 6f 6f 70 | 25 3d 30 0d 0e 7e 2c c8 |..t.loop|%=0..~,.|
|00002440| 95 20 6c 6f 6f 70 25 3c | 63 75 72 72 66 69 6c 65 |. loop%<|currfile|
|00002450| 73 25 20 80 20 66 69 6c | 65 77 68 25 28 6c 6f 6f |s% . fil|ewh%(loo|
|00002460| 70 25 29 3c 3e 77 68 0d | 0e 88 0e 20 20 6c 6f 6f |p%)<>wh.|... loo|
|00002470| 70 25 2b 3d 31 0d 0e 92 | 05 ce 0d 0e 9c 20 e7 20 |p%+=1...|..... . |
|00002480| 66 69 6c 65 77 68 25 28 | 6c 6f 6f 70 25 29 3d 77 |filewh%(|loop%)=w|
|00002490| 68 20 8c 20 3d 6c 6f 6f | 70 25 0d 0e a6 07 3d 2d |h . =loo|p%....=-|
|000024a0| 31 0d 0e b0 05 3a 0d 0e | ba 20 dd 20 a4 61 64 64 |1....:..|. . .add|
|000024b0| 73 70 61 63 65 28 73 69 | 7a 65 25 2c 66 69 6c 65 |space(si|ze%,file|
|000024c0| 6e 61 6d 65 24 29 0d 0e | c4 23 ea 20 6d 79 6f 6c |name$)..|.#. myol|
|000024d0| 64 73 6c 6f 74 73 69 7a | 65 25 2c 6d 79 6e 65 77 |dslotsiz|e%,mynew|
|000024e0| 73 6c 6f 74 73 69 7a 65 | 25 0d 0e ce 21 66 69 6c |slotsize|%...!fil|
|000024f0| 65 73 70 25 28 63 75 72 | 72 66 69 6c 65 73 25 29 |esp%(cur|rfiles%)|
|00002500| 3d 63 75 72 72 66 73 70 | 70 25 0d 0e d8 1d 66 69 |=currfsp|p%....fi|
|00002510| 6c 65 73 6c 25 28 63 75 | 72 72 66 69 6c 65 73 25 |lesl%(cu|rrfiles%|
|00002520| 29 3d 73 69 7a 65 25 0d | 0e e2 24 66 69 6c 65 6e |)=size%.|..$filen|
|00002530| 70 25 28 63 75 72 72 66 | 69 6c 65 73 25 29 3d a4 |p%(currf|iles%)=.|
|00002540| 61 6c 6c 6f 63 66 69 6c | 65 6e 73 0d 0e ec 2d c8 |allocfil|ens...-.|
|00002550| 99 20 22 57 69 6d 70 5f | 53 6c 6f 74 53 69 7a 65 |. "Wimp_|SlotSize|
|00002560| 22 2c 2d 31 2c 2d 31 20 | b8 20 6d 79 6f 6c 64 73 |",-1,-1 |. myolds|
|00002570| 6c 6f 74 73 69 7a 65 25 | 0d 0e f6 48 c8 99 20 22 |lotsize%|...H.. "|
|00002580| 57 69 6d 70 5f 53 6c 6f | 74 53 69 7a 65 22 2c 63 |Wimp_Slo|tSize",c|
|00002590| 75 72 72 66 73 70 73 25 | 2b 6f 72 69 67 69 6e 61 |urrfsps%|+origina|
|000025a0| 6c 73 6c 6f 74 25 2b 73 | 69 7a 65 25 2c 2d 31 20 |lslot%+s|ize%,-1 |
|000025b0| b8 20 6d 79 6e 65 77 73 | 6c 6f 74 73 69 7a 65 25 |. mynews|lotsize%|
|000025c0| 0d 0f 00 34 e7 20 63 75 | 72 72 66 73 70 73 25 2b |...4. cu|rrfsps%+|
|000025d0| 6f 72 69 67 69 6e 61 6c | 73 6c 6f 74 25 2b 73 69 |original|slot%+si|
|000025e0| 7a 65 25 3e 6d 79 6e 65 | 77 73 6c 6f 74 73 69 7a |ze%>myne|wslotsiz|
|000025f0| 65 25 20 8c 0d 0f 0a 2a | 20 20 c8 99 20 22 57 69 |e% ....*| .. "Wi|
|00002600| 6d 70 5f 53 6c 6f 74 53 | 69 7a 65 22 2c 6d 79 6f |mp_SlotS|ize",myo|
|00002610| 6c 64 73 6c 6f 74 73 69 | 7a 65 25 2c 2d 31 0d 0f |ldslotsi|ze%,-1..|
|00002620| 14 08 20 20 3d a3 0d 0f | 1e 05 cd 0d 0f 28 29 24 |.. =...|.....()$|
|00002630| 28 66 69 6c 65 6e 70 25 | 28 63 75 72 72 66 69 6c |(filenp%|(currfil|
|00002640| 65 73 25 29 29 3d 66 69 | 6c 65 6e 61 6d 65 24 2b |es%))=fi|lename$+|
|00002650| bd 28 30 29 0d 0f 32 14 | 63 75 72 72 66 73 70 70 |.(0)..2.|currfspp|
|00002660| 25 2b 3d 73 69 7a 65 25 | 0d 0f 3c 14 63 75 72 72 |%+=size%|..<.curr|
|00002670| 66 73 70 73 25 2b 3d 73 | 69 7a 65 25 0d 0f 46 06 |fsps%+=s|ize%..F.|
|00002680| 3d b9 0d 0f 50 05 3a 0d | 0f 5a 1b dd 20 f2 63 6c |=...P.:.|.Z.. .cl|
|00002690| 6f 73 65 5f 77 69 6e 64 | 6f 77 5f 72 65 71 75 65 |ose_wind|ow_reque|
|000026a0| 73 74 0d 0f 64 21 ea 20 | 66 69 6c 65 6e 6f 25 2c |st..d!. |fileno%,|
|000026b0| 62 6c 6f 63 6b 73 69 7a | 65 25 2c 73 68 75 66 66 |blocksiz|e%,shuff|
|000026c0| 6c 65 25 0d 0f 6e 45 f4 | 20 49 66 20 77 65 20 61 |le%..nE.| If we a|
|000026d0| 64 64 20 61 6e 79 74 68 | 69 6e 67 20 61 70 61 72 |dd anyth|ing apar|
|000026e0| 74 20 66 72 6f 6d 20 66 | 69 6c 65 20 76 69 65 77 |t from f|ile view|
|000026f0| 20 77 69 6e 64 6f 77 73 | 2c 20 63 68 65 63 6b 20 | windows|, check |
|00002700| 66 6f 72 20 74 68 65 6d | 0d 0f 78 1a f4 20 62 65 |for them|..x.. be|
|00002710| 66 6f 72 65 20 74 68 69 | 73 20 6e 65 78 74 20 62 |fore thi|s next b|
|00002720| 69 74 0d 0f 82 1b 66 69 | 6c 65 6e 6f 25 3d a4 67 |it....fi|leno%=.g|
|00002730| 65 74 66 69 6c 65 6e 6f | 28 21 71 25 29 0d 0f 8c |etfileno|(!q%)...|
|00002740| 45 e7 20 66 69 6c 65 6e | 6f 25 3d 2d 31 20 8c 20 |E. filen|o%=-1 . |
|00002750| f2 66 61 74 61 6c 65 72 | 72 6f 72 28 22 55 6e 6b |.fataler|ror("Unk|
|00002760| 6e 6f 77 6e 20 77 69 6e | 64 6f 77 20 68 61 6e 64 |nown win|dow hand|
|00002770| 6c 65 20 28 22 2b c3 28 | 21 71 25 29 2b 22 29 2e |le ("+.(|!q%)+").|
|00002780| 22 29 0d 0f 96 1b 21 74 | 65 6d 70 25 3d 66 69 6c |")....!t|emp%=fil|
|00002790| 65 77 68 25 28 66 69 6c | 65 6e 6f 25 29 0d 0f a0 |ewh%(fil|eno%)...|
|000027a0| 20 c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 | .. "Wim|p_CloseW|
|000027b0| 69 6e 64 6f 77 22 2c 2c | 74 65 6d 70 25 0d 0f aa |indow",,|temp%...|
|000027c0| 24 f2 64 65 61 6c 6c 6f | 63 66 69 6c 65 6e 73 28 |$.deallo|cfilens(|
|000027d0| 66 69 6c 65 6e 70 25 28 | 66 69 6c 65 6e 6f 25 29 |filenp%(|fileno%)|
|000027e0| 29 0d 0f b4 1e e7 20 66 | 69 6c 65 6e 6f 25 3c 28 |)..... f|ileno%<(|
|000027f0| 63 75 72 72 66 69 6c 65 | 73 25 2d 31 29 20 8c 0d |currfile|s%-1) ..|
|00002800| 0f be 1b 20 20 41 25 3d | 66 69 6c 65 73 70 25 28 |... A%=|filesp%(|
|00002810| 66 69 6c 65 6e 6f 25 2b | 31 29 0d 0f c8 19 20 20 |fileno%+|1).... |
|00002820| 42 25 3d 66 69 6c 65 73 | 70 25 28 66 69 6c 65 6e |B%=files|p%(filen|
|00002830| 6f 25 29 0d 0f d2 15 20 | 20 43 25 3d 63 75 72 72 |o%).... | C%=curr|
|00002840| 66 73 70 70 25 2d 41 25 | 0d 0f dc 1b 20 20 66 69 |fspp%-A%|.... fi|
|00002850| 6c 65 73 70 25 28 66 69 | 6c 65 6e 6f 25 2b 31 29 |lesp%(fi|leno%+1)|
|00002860| 3d 42 25 0d 0f e6 11 20 | 20 d6 20 6d 6f 76 65 5f |=B%.... | . move_|
|00002870| 64 6f 77 6e 0d 0f f0 16 | 20 20 62 6c 6f 63 6b 73 |down....| blocks|
|00002880| 69 7a 65 25 3d 41 25 2d | 42 25 0d 0f fa 27 20 20 |ize%=A%-|B%...' |
|00002890| e3 20 73 68 75 66 66 6c | 65 25 3d 66 69 6c 65 6e |. shuffl|e%=filen|
|000028a0| 6f 25 20 b8 20 63 75 72 | 72 66 69 6c 65 73 25 2d |o% . cur|rfiles%-|
|000028b0| 32 0d 10 04 2d 20 20 20 | 20 66 69 6c 65 73 70 25 |2...- | filesp%|
|000028c0| 28 73 68 75 66 66 6c 65 | 25 29 3d 66 69 6c 65 73 |(shuffle|%)=files|
|000028d0| 70 25 28 73 68 75 66 66 | 6c 65 25 2b 31 29 0d 10 |p%(shuff|le%+1)..|
|000028e0| 0e 2d 20 20 20 20 66 69 | 6c 65 73 6c 25 28 73 68 |.- fi|lesl%(sh|
|000028f0| 75 66 66 6c 65 25 29 3d | 66 69 6c 65 73 6c 25 28 |uffle%)=|filesl%(|
|00002900| 73 68 75 66 66 6c 65 25 | 2b 31 29 0d 10 18 2d 20 |shuffle%|+1)...- |
|00002910| 20 20 20 66 69 6c 65 77 | 68 25 28 73 68 75 66 66 | filew|h%(shuff|
|00002920| 6c 65 25 29 3d 66 69 6c | 65 77 68 25 28 73 68 75 |le%)=fil|ewh%(shu|
|00002930| 66 66 6c 65 25 2b 31 29 | 0d 10 22 2d 20 20 20 20 |ffle%+1)|.."- |
|00002940| 66 69 6c 65 6e 70 25 28 | 73 68 75 66 66 6c 65 25 |filenp%(|shuffle%|
|00002950| 29 3d 66 69 6c 65 6e 70 | 25 28 73 68 75 66 66 6c |)=filenp|%(shuffl|
|00002960| 65 25 2b 31 29 0d 10 2c | 07 20 20 ed 0d 10 36 05 |e%+1)..,|. ...6.|
|00002970| cc 0d 10 40 2b 20 20 62 | 6c 6f 63 6b 73 69 7a 65 |...@+ b|locksize|
|00002980| 25 3d 63 75 72 72 66 73 | 70 70 25 2d 66 69 6c 65 |%=currfs|pp%-file|
|00002990| 73 70 25 28 66 69 6c 65 | 6e 6f 25 29 0d 10 4a 05 |sp%(file|no%)..J.|
|000029a0| cd 0d 10 54 19 63 75 72 | 72 66 73 70 70 25 2d 3d |...T.cur|rfspp%-=|
|000029b0| 62 6c 6f 63 6b 73 69 7a | 65 25 0d 10 5e 19 63 75 |blocksiz|e%..^.cu|
|000029c0| 72 72 66 73 70 73 25 2d | 3d 62 6c 6f 63 6b 73 69 |rrfsps%-|=blocksi|
|000029d0| 7a 65 25 0d 10 68 7e e7 | 20 63 75 72 72 66 73 70 |ze%..h~.| currfsp|
|000029e0| 73 25 3c 30 20 8c 20 f2 | 66 61 74 61 6c 65 72 72 |s%<0 . .|fatalerr|
|000029f0| 6f 72 28 22 4d 65 6d 6f | 72 79 20 64 65 2d 61 6c |or("Memo|ry de-al|
|00002a00| 6c 6f 63 20 65 72 72 6f | 72 2c 20 22 2b c3 28 63 |loc erro|r, "+.(c|
|00002a10| 75 72 72 66 73 70 73 25 | 29 2b 22 20 73 70 61 63 |urrfsps%|)+" spac|
|00002a20| 65 20 6c 65 66 74 20 61 | 66 74 65 72 20 72 65 64 |e left a|fter red|
|00002a30| 75 63 74 69 6f 6e 20 62 | 6c 6f 63 6b 20 73 69 7a |uction b|lock siz|
|00002a40| 65 20 22 2b c3 28 63 75 | 72 72 66 73 70 73 25 29 |e "+.(cu|rrfsps%)|
|00002a50| 29 0d 10 72 31 c8 99 20 | 22 57 69 6d 70 5f 53 6c |)..r1.. |"Wimp_Sl|
|00002a60| 6f 74 53 69 7a 65 22 2c | 63 75 72 72 66 73 70 73 |otSize",|currfsps|
|00002a70| 25 2b 6f 72 69 67 69 6e | 61 6c 73 6c 6f 74 25 2c |%+origin|alslot%,|
|00002a80| 2d 31 0d 10 7c 11 63 75 | 72 72 66 69 6c 65 73 25 |-1..|.cu|rrfiles%|
|00002a90| 2d 3d 31 0d 10 86 61 e7 | 20 63 75 72 72 66 69 6c |-=1...a.| currfil|
|00002aa0| 65 73 25 3c 30 20 8c 20 | f2 66 61 74 61 6c 65 72 |es%<0 . |.fataler|
|00002ab0| 72 6f 72 28 22 53 65 72 | 69 6f 75 73 20 65 72 72 |ror("Ser|ious err|
|00002ac0| 6f 72 20 69 6e 20 66 69 | 6c 65 20 64 65 2d 61 6c |or in fi|le de-al|
|00002ad0| 6c 6f 63 2c 20 22 2b c3 | 28 63 75 72 72 66 69 6c |loc, "+.|(currfil|
|00002ae0| 65 73 25 29 2b 22 20 66 | 69 6c 65 73 20 6f 70 65 |es%)+" f|iles ope|
|00002af0| 6e 2e 22 29 0d 10 90 05 | e1 0d 10 9a 05 3a 0d 10 |n.")....|.....:..|
|00002b00| a4 11 dd 20 f2 69 6e 69 | 74 66 69 6c 65 6e 73 0d |... .ini|tfilens.|
|00002b10| 10 ae 0b ea 20 6c 6f 6f | 70 25 0d 10 b8 1b e3 20 |.... loo|p%..... |
|00002b20| 6c 6f 6f 70 25 3d 30 20 | b8 20 6d 61 78 66 69 6c |loop%=0 |. maxfil|
|00002b30| 65 73 25 2d 31 0d 10 c2 | 19 66 69 6c 65 6e 73 25 |es%-1...|.filens%|
|00002b40| 3f 28 6c 6f 6f 70 25 2a | 32 35 36 29 3d 30 0d 10 |?(loop%*|256)=0..|
|00002b50| cc 05 ed 0d 10 d6 05 e1 | 0d 10 e0 05 3a 0d 10 ea |........|....:...|
|00002b60| 12 dd 20 a4 61 6c 6c 6f | 63 66 69 6c 65 6e 73 0d |.. .allo|cfilens.|
|00002b70| 10 f4 12 ea 20 6c 6f 6f | 70 25 2c 6c 6f 6f 70 63 |.... loo|p%,loopc|
|00002b80| 25 0d 10 fe 0c 6c 6f 6f | 70 63 25 3d 30 0d 11 08 |%....loo|pc%=0...|
|00002b90| 11 6c 6f 6f 70 25 3d 66 | 69 6c 65 6e 73 25 0d 11 |.loop%=f|ilens%..|
|00002ba0| 12 27 c8 95 20 28 6c 6f | 6f 70 63 25 3c 6d 61 78 |.'.. (lo|opc%<max|
|00002bb0| 66 69 6c 65 73 25 29 20 | 80 20 28 3f 6c 6f 6f 70 |files%) |. (?loop|
|00002bc0| 25 3c 3e 30 29 0d 11 1c | 1a 20 20 6c 6f 6f 70 25 |%<>0)...|. loop%|
|00002bd0| 2b 3d 32 35 36 3a 6c 6f | 6f 70 63 25 2b 3d 31 0d |+=256:lo|opc%+=1.|
|00002be0| 11 26 05 ce 0d 11 30 65 | e7 20 6c 6f 6f 70 63 25 |.&....0e|. loopc%|
|00002bf0| 3d 6d 61 78 66 69 6c 65 | 73 25 20 8c 20 f2 66 61 |=maxfile|s% . .fa|
|00002c00| 74 61 6c 65 72 72 6f 72 | 28 22 53 65 72 69 6f 75 |talerror|("Seriou|
|00002c10| 73 20 63 6f 63 6b 2d 75 | 70 20 69 6e 20 66 69 6c |s cock-u|p in fil|
|00002c20| 65 6e 61 6d 65 20 73 70 | 61 63 65 20 61 6c 6c 6f |ename sp|ace allo|
|00002c30| 63 61 74 69 6f 6e 20 28 | 6e 6f 20 66 72 65 65 20 |cation (|no free |
|00002c40| 73 6c 6f 74 73 29 2e 22 | 29 0d 11 3a 0a 3d 6c 6f |slots)."|)..:.=lo|
|00002c50| 6f 70 25 0d 11 44 05 3a | 0d 11 4e 1e dd 20 f2 64 |op%..D.:|..N.. .d|
|00002c60| 65 61 6c 6c 6f 63 66 69 | 6c 65 6e 73 28 66 69 6c |eallocfi|lens(fil|
|00002c70| 65 6e 73 70 25 29 0d 11 | 58 0f 3f 66 69 6c 65 6e |ensp%)..|X.?filen|
|00002c80| 73 70 25 3d 30 0d 11 62 | 05 e1 0d ff |sp%=0..b|.... |
+--------+-------------------------+-------------------------+--------+--------+
