home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1998-03-25 | 15.6 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 1f f4 20 3e 20 | 3c 46 69 6c 65 5f 49 44 |..... > |<File_ID|
|00000010| 24 44 69 72 3e 2e 21 52 | 75 6e 49 6d 61 67 65 0d |$Dir>.!R|unImage.|
|00000020| 00 14 05 3a 0d 00 1e 1d | 20 76 65 72 73 24 3d 22 |...:....| vers$="|
|00000030| 30 2e 32 33 20 28 31 38 | 2d 46 65 62 2d 39 38 29 |0.23 (18|-Feb-98)|
|00000040| 22 0d 00 28 05 3a 0d 00 | 32 0b 20 f2 73 65 74 75 |"..(.:..|2. .setu|
|00000050| 70 0d 00 3c 13 20 ee 20 | 85 20 f2 65 72 72 6f 72 |p..<. . |. .error|
|00000060| 28 f6 24 29 0d 00 46 06 | 20 f5 0d 00 50 21 20 c8 |(.$)..F.| ...P! .|
|00000070| 8e 20 a4 70 6f 6c 6c 28 | 26 39 46 43 42 30 2d 28 |. .poll(|&9FCB0-(|
|00000080| ac 20 73 63 61 6e 25 29 | 29 20 ca 0d 00 5a 1a 20 |. scan%)|) ...Z. |
|00000090| 20 c9 20 31 20 3a 20 f2 | 72 65 64 72 61 77 28 21 | . 1 : .|redraw(!|
|000000a0| 62 6c 6b 25 29 0d 00 64 | 10 20 20 c9 20 32 20 3a |blk%)..d|. . 2 :|
|000000b0| 20 f2 77 69 6e 0d 00 6e | 19 20 20 c9 20 33 20 3a | .win..n|. . 3 :|
|000000c0| 20 f2 63 6c 6f 73 65 28 | 21 62 6c 6b 25 29 0d 00 | .close(|!blk%)..|
|000000d0| 78 19 20 20 c9 20 36 20 | 3a 20 f2 62 75 74 74 6f |x. . 6 |: .butto|
|000000e0| 6e 5f 63 6c 69 63 6b 0d | 00 82 16 20 20 c9 20 38 |n_click.|... . 8|
|000000f0| 20 3a 20 f2 6b 65 79 5f | 70 72 65 73 73 0d 00 8c | : .key_|press...|
|00000100| 18 20 20 c9 20 39 20 3a | 20 f2 64 65 63 6f 64 65 |. . 9 :| .decode|
|00000110| 5f 6d 65 6e 75 0d 00 96 | 20 20 20 c9 20 31 37 2c |_menu...| . 17,|
|00000120| 31 38 3a 20 f2 72 65 63 | 65 69 76 65 28 62 6c 6b |18: .rec|eive(blk|
|00000130| 25 21 31 36 29 0d 00 a0 | 06 20 cb 0d 00 aa 17 20 |%!16)...|. ..... |
|00000140| e7 20 73 63 61 6e 25 20 | 8c 20 f2 6e 65 78 74 28 |. scan% |. .next(|
|00000150| 30 29 0d 00 b4 08 20 fd | 20 a3 0d 00 be 06 20 e0 |0).... .| ..... .|
|00000160| 0d 00 c8 05 3a 0d 00 d2 | 0c dd 20 f2 73 65 74 75 |....:...|.. .setu|
|00000170| 70 0d 00 dc 0f f4 20 3d | 3d 3d 3d 3d 3d 3d 3d 3d |p..... =|========|
|00000180| 0d 00 e6 15 20 6e 61 6c | 74 25 3d 30 3a 74 61 6c |.... nal|t%=0:tal|
|00000190| 74 25 3d 31 30 0d 00 f0 | 25 20 de 20 64 61 74 61 |t%=10...|% . data|
|000001a0| 25 20 26 36 30 30 30 2c | 7a 25 20 26 31 30 30 2c |% &6000,|z% &100,|
|000001b0| 74 6d 70 25 20 26 31 30 | 30 30 0d 00 fa 26 20 de |tmp% &10|00...& .|
|000001c0| 20 64 61 74 24 28 37 29 | 2c 61 6c 74 25 28 74 61 | dat$(7)|,alt%(ta|
|000001d0| 6c 74 25 29 2c 64 69 73 | 25 28 74 61 6c 74 25 29 |lt%),dis|%(talt%)|
|000001e0| 0d 01 04 21 20 de 20 73 | 74 30 25 20 26 34 30 2c |...! . s|t0% &40,|
|000001f0| 73 74 31 25 20 26 31 30 | 2c 73 74 32 25 20 26 31 |st1% &10|,st2% &1|
|00000200| 30 0d 01 0e 14 20 6e 61 | 6d 65 24 3d 22 46 69 6c |0.... na|me$="Fil|
|00000210| 65 5f 49 44 22 0d 01 18 | 1b 20 61 6c 69 61 73 24 |e_ID"...|. alias$|
|00000220| 3d 22 3c 46 69 6c 65 5f | 49 44 24 44 69 72 3e 22 |="<File_|ID$Dir>"|
|00000230| 0d 01 22 1c 20 68 78 31 | 24 3d 22 30 31 32 33 34 |..". hx1|$="01234|
|00000240| 35 36 37 38 39 61 62 63 | 64 65 66 22 0d 01 2c 17 |56789abc|def"..,.|
|00000250| 20 68 78 32 24 3d 68 78 | 31 24 2b 22 41 42 43 44 | hx2$=hx|1$+"ABCD|
|00000260| 45 46 22 0d 01 36 1d 20 | 68 78 33 24 3d 68 78 31 |EF"..6. |hx3$=hx1|
|00000270| 24 2b 68 78 31 24 3a 68 | 78 31 24 2b 3d 22 30 22 |$+hx1$:h|x1$+="0"|
|00000280| 0d 01 40 27 20 24 73 74 | 30 25 3d 22 22 3a 24 73 |..@' $st|0%="":$s|
|00000290| 74 31 25 3d 22 20 20 20 | 20 22 3a 24 73 74 32 25 |t1%=" | ":$st2%|
|000002a0| 3d 22 20 20 20 20 22 0d | 01 4a 22 20 63 73 76 24 |=" ".|.J" csv$|
|000002b0| 3d 22 22 3a 73 70 24 3d | 22 22 3a 73 72 24 3d 22 |="":sp$=|"":sr$="|
|000002c0| 22 3a 63 73 25 3d 26 32 | 30 0d 01 54 1d 20 66 69 |":cs%=&2|0..T. fi|
|000002d0| 6c 65 24 3d 22 22 3a 66 | 65 72 24 3d 22 22 3a 6b |le$="":f|er$="":k|
|000002e0| 65 79 66 25 3d a3 0d 01 | 5e 17 20 63 73 76 5f 65 |eyf%=...|^. csv_e|
|000002f0| 72 72 25 3d a3 3a 73 63 | 61 6e 25 3d a3 0d 01 68 |rr%=.:sc|an%=...h|
|00000300| 16 20 f2 69 6e 69 74 5f | 77 69 6d 70 28 6e 61 6d |. .init_|wimp(nam|
|00000310| 65 24 29 0d 01 72 12 20 | f2 69 6e 69 74 5f 73 70 |e$)..r. |.init_sp|
|00000320| 72 69 74 65 73 0d 01 7c | 11 20 f2 67 65 74 5f 77 |rites..||. .get_w|
|00000330| 69 6e 64 6f 77 73 0d 01 | 86 0f 20 f2 69 6e 69 74 |indows..|.. .init|
|00000340| 5f 6d 65 6e 75 0d 01 90 | 11 20 f2 69 63 6f 6e 5f |_menu...|. .icon_|
|00000350| 6f 6e 5f 62 61 72 0d 01 | 9a 0a 20 f2 61 73 73 6d |on_bar..|.. .assm|
|00000360| 0d 01 a4 14 20 f2 73 65 | 74 28 73 72 63 68 25 2c |.... .se|t(srch%,|
|00000370| 34 2c 30 29 0d 01 ae 11 | 20 f2 6f 70 65 6e 28 6d |4,0)....| .open(m|
|00000380| 61 69 6e 25 29 0d 01 b8 | 14 20 f2 67 65 74 5f 63 |ain%)...|. .get_c|
|00000390| 73 76 28 22 30 30 30 22 | 29 0d 01 c2 05 e1 0d 01 |sv("000"|).......|
|000003a0| cc 05 3a 0d 01 d6 13 dd | 20 f2 62 75 74 74 6f 6e |..:.....| .button|
|000003b0| 5f 63 6c 69 63 6b 0d 01 | e0 16 f4 20 3d 3d 3d 3d |_click..|... ====|
|000003c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 0d 01 ea 0d |========|====....|
|000003d0| 20 ea 20 48 25 2c 69 63 | 25 0d 01 f4 1e 20 78 3d | . H%,ic|%.... x=|
|000003e0| 21 62 6c 6b 25 3a 79 3d | 62 6c 6b 25 21 34 3a 62 |!blk%:y=|blk%!4:b|
|000003f0| 3d 62 6c 6b 25 21 38 0d | 01 fe 1b 20 48 25 3d 62 |=blk%!8.|... H%=b|
|00000400| 6c 6b 25 21 31 32 3a 69 | 63 25 3d 62 6c 6b 25 21 |lk%!12:i|c%=blk%!|
|00000410| 31 36 0d 02 08 19 20 62 | 75 66 25 21 30 3d 48 25 |16.... b|uf%!0=H%|
|00000420| 3a 62 75 66 25 21 34 3d | 69 63 25 0d 02 12 21 20 |:buf%!4=|ic%...! |
|00000430| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 49 63 6f 6e |.. "Wimp|_GetIcon|
|00000440| 53 74 61 74 65 22 2c 2c | 62 75 66 25 0d 02 1c 0c |State",,|buf%....|
|00000450| 20 c8 8e 20 48 25 20 ca | 0d 02 26 09 20 c9 20 2d | .. H% .|..&. . -|
|00000460| 32 0d 02 30 0c 20 20 c8 | 8e 20 b9 20 ca 0d 02 3a |2..0. .|. . ...:|
|00000470| 2b 20 20 c9 20 62 3d 32 | 20 3a 20 c8 99 20 22 4d |+ . b=2| : .. "M|
|00000480| 65 6e 75 55 74 69 6c 5f | 53 68 6f 77 22 2c 6d 65 |enuUtil_|Show",me|
|00000490| 6e 75 25 2c 62 6c 6b 25 | 0d 02 44 31 20 20 c9 20 |nu%,blk%|..D1 . |
|000004a0| 62 3c 3e 32 3a 20 f2 6f | 70 65 6e 28 6d 61 69 6e |b<>2: .o|pen(main|
|000004b0| 25 29 3a e7 20 6b 65 79 | 66 25 20 8c 20 f2 6f 70 |%):. key|f% . .op|
|000004c0| 65 6e 28 6b 65 79 70 25 | 29 0d 02 4e 07 20 20 cb |en(keyp%|)..N. .|
|000004d0| 0d 02 58 0c 20 c9 20 6d | 61 69 6e 25 0d 02 62 0c |..X. . m|ain%..b.|
|000004e0| 20 20 c8 8e 20 b9 20 ca | 0d 02 6c 2a 20 20 c9 20 | .. . .|..l* . |
|000004f0| 62 3d 32 3a 20 c8 99 20 | 22 4d 65 6e 75 55 74 69 |b=2: .. |"MenuUti|
|00000500| 6c 5f 53 68 6f 77 22 2c | 6d 65 6e 75 25 2c 62 6c |l_Show",|menu%,bl|
|00000510| 6b 25 0d 02 76 27 20 20 | c9 20 69 63 25 3e 31 35 |k%..v' |. ic%>15|
|00000520| 20 80 20 69 63 25 3c 32 | 35 20 3a 20 f2 73 77 61 | . ic%<2|5 : .swa|
|00000530| 70 28 69 63 25 2d 31 35 | 29 0d 02 80 23 20 20 c9 |p(ic%-15|)...# .|
|00000540| 20 69 63 25 3e 32 35 20 | 80 20 69 63 25 3c 33 30 | ic%>25 |. ic%<30|
|00000550| 3a 20 f2 6e 65 78 74 28 | 69 63 25 29 0d 02 8a 34 |: .next(|ic%)...4|
|00000560| 20 20 c9 20 69 63 25 3d | 33 30 20 3a 20 73 63 61 | . ic%=|30 : sca|
|00000570| 6e 25 3d ac 20 73 63 61 | 6e 25 3a f2 73 68 6f 77 |n%=. sca|n%:.show|
|00000580| 28 6d 61 69 6e 25 2c 33 | 30 2c 73 63 61 6e 25 29 |(main%,3|0,scan%)|
|00000590| 0d 02 94 15 20 20 c9 20 | 69 63 25 3d 33 31 20 3a |.... . |ic%=31 :|
|000005a0| 20 f2 70 61 64 0d 02 9e | 07 20 20 cb 0d 02 a8 0c | .pad...|. .....|
|000005b0| 20 c9 20 73 72 63 68 25 | 0d 02 b2 0c 20 20 c8 8e | . srch%|.... ..|
|000005c0| 20 b9 20 ca 0d 02 bc 17 | 20 20 c9 20 69 63 25 3d | . .....| . ic%=|
|000005d0| 31 20 3a 20 f2 73 65 61 | 72 63 68 0d 02 c6 1c 20 |1 : .sea|rch.... |
|000005e0| 20 c9 20 69 63 25 3d 33 | 20 3a 20 f2 6f 70 65 6e | . ic%=3| : .open|
|000005f0| 28 6d 61 69 6e 25 29 0d | 02 d0 15 20 20 c9 20 69 |(main%).|... . i|
|00000600| 63 25 3d 34 20 3a 20 f2 | 63 61 73 65 0d 02 da 07 |c%=4 : .|case....|
|00000610| 20 20 cb 0d 02 e4 0c 20 | c9 20 6b 65 79 70 25 0d | ..... |. keyp%.|
|00000620| 02 ee 0c 20 20 c8 8e 20 | b9 20 ca 0d 02 f8 2a 20 |... .. |. ....* |
|00000630| 20 c9 20 62 3d 32 3a 20 | c8 99 20 22 4d 65 6e 75 | . b=2: |.. "Menu|
|00000640| 55 74 69 6c 5f 53 68 6f | 77 22 2c 6d 65 6e 75 25 |Util_Sho|w",menu%|
|00000650| 2c 62 6c 6b 25 0d 03 02 | 19 20 20 c9 20 69 63 25 |,blk%...|. . ic%|
|00000660| 3d 31 38 20 3a 20 f2 6b | 65 79 70 28 30 29 0d 03 |=18 : .k|eyp(0)..|
|00000670| 0c 17 20 20 c9 20 69 63 | 25 3d 31 39 20 3a 20 f2 |.. . ic|%=19 : .|
|00000680| 69 6e 70 75 74 0d 03 16 | 23 20 20 c9 20 69 63 25 |input...|# . ic%|
|00000690| 3e 30 20 80 20 69 63 25 | 3c 31 37 20 3a 20 f2 6b |>0 . ic%|<17 : .k|
|000006a0| 65 79 70 28 69 63 25 29 | 0d 03 20 07 20 20 cb 0d |eyp(ic%)|.. . ..|
|000006b0| 03 2a 06 20 cb 0d 03 34 | 05 e1 0d 03 3e 05 3a 0d |.*. ...4|....>.:.|
|000006c0| 03 48 10 dd 20 f2 6b 65 | 79 5f 70 72 65 73 73 0d |.H.. .ke|y_press.|
|000006d0| 03 52 13 f4 20 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.R.. ===|========|
|000006e0| 3d 3d 0d 03 5c 12 20 ea | 20 63 68 72 25 2c 69 63 |==..\. .| chr%,ic|
|000006f0| 25 2c 48 25 0d 03 66 26 | 20 48 25 3d 62 6c 6b 25 |%,H%..f&| H%=blk%|
|00000700| 21 30 3a 69 63 25 3d 62 | 6c 6b 25 21 34 3a 63 68 |!0:ic%=b|lk%!4:ch|
|00000710| 72 25 3d 62 6c 6b 25 21 | 32 34 0d 03 70 10 20 e7 |r%=blk%!|24..p. .|
|00000720| 20 63 68 72 25 3d 31 33 | 20 8c 0d 03 7a 0c 20 c8 | chr%=13| ...z. .|
|00000730| 8e 20 48 25 20 ca 0d 03 | 84 0d 20 c9 20 6d 61 69 |. H% ...|.. . mai|
|00000740| 6e 25 3a 0d 03 8e 15 20 | e7 20 69 63 25 3d 38 20 |n%:.... |. ic%=8 |
|00000750| 8c 20 f2 69 6e 70 75 74 | 0d 03 98 06 20 cb 0d 03 |. .input|.... ...|
|00000760| a2 06 20 cc 0d 03 ac 1e | 20 c8 99 20 22 57 69 6d |.. .....| .. "Wim|
|00000770| 70 5f 50 72 6f 63 65 73 | 73 4b 65 79 22 2c 63 68 |p_Proces|sKey",ch|
|00000780| 72 25 0d 03 b6 06 20 cd | 0d 03 c0 05 e1 0d 03 ca |r%.... .|........|
|00000790| 05 3a 0d 03 d4 46 22 ab | ab ab ab ab ab ab ab ab |.:...F".|........|
|000007a0| ab ab ab ab ab ab ab ab | ab ab ab 20 41 70 70 6c |........|... Appl|
|000007b0| 69 63 61 74 69 6f 6e 20 | 50 72 6f 63 65 64 75 72 |ication |Procedur|
|000007c0| 65 73 20 bb bb bb bb bb | bb bb bb bb bb bb bb bb |es .....|........|
|000007d0| bb bb bb bb bb bb bb bb | 0d 03 de 05 3a 0d 03 e8 |........|....:...|
|000007e0| 0c dd 20 f2 69 6e 70 75 | 74 0d 03 f2 0f f4 20 3d |.. .inpu|t..... =|
|000007f0| 3d 3d 3d 3d 3d 3d 3d 3d | 0d 03 fc 12 20 ea 20 69 |========|.... . i|
|00000800| 25 2c 66 24 3a f2 62 65 | 65 70 0d 04 06 30 20 c8 |%,f$:.be|ep...0 .|
|00000810| 99 20 22 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 |. "Wimp_|SetCaret|
|00000820| 50 6f 73 69 74 69 6f 6e | 22 2c 2d 31 2c 2d 31 2c |Position|",-1,-1,|
|00000830| 30 2c 30 2c 2d 31 2c 32 | 35 36 0d 04 10 19 20 66 |0,0,-1,2|56.... f|
|00000840| 24 3d 24 28 a4 72 65 61 | 64 28 6d 61 69 6e 25 2c |$=$(.rea|d(main%,|
|00000850| 38 29 29 0d 04 1a 11 20 | e3 20 69 25 3d 31 20 b8 |8)).... |. i%=1 .|
|00000860| 20 a9 66 24 0d 04 24 24 | 20 e7 20 c1 66 24 2c 69 | .f$..$$| . .f$,i|
|00000870| 25 2c 31 29 3d 22 26 22 | 20 8c 20 c1 66 24 2c 69 |%,1)="&"| . .f$,i|
|00000880| 25 2c 31 29 3d 22 30 22 | 0d 04 2e 06 20 ed 0d 04 |%,1)="0"|.... ...|
|00000890| 38 13 20 66 69 6c 65 24 | 3d a4 68 65 78 28 66 24 |8. file$|=.hex(f$|
|000008a0| 29 0d 04 42 17 20 66 65 | 72 24 3d a4 76 61 6c 69 |)..B. fe|r$=.vali|
|000008b0| 64 28 66 69 6c 65 24 29 | 0d 04 4c 24 20 e7 20 66 |d(file$)|..L$ . f|
|000008c0| 65 72 24 3c 3e 22 78 78 | 78 22 20 8c 20 f2 67 65 |er$<>"xx|x" . .ge|
|000008d0| 74 5f 63 73 76 28 66 69 | 6c 65 24 29 0d 04 56 1b |t_csv(fi|le$)..V.|
|000008e0| 20 f2 73 68 6f 77 5f 69 | 6e 66 6f 28 66 69 6c 65 | .show_i|nfo(file|
|000008f0| 24 2c 66 65 72 24 29 0d | 04 60 05 e1 0d 04 6a 05 |$,fer$).|.`....j.|
|00000900| 3a 0d 04 74 0f dd 20 f2 | 6b 65 79 70 28 69 25 29 |:..t.. .|keyp(i%)|
|00000910| 0d 04 7e 12 f4 20 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..~.. ==|========|
|00000920| 3d 3d 0d 04 88 1e 20 ea | 20 6b 24 3a 6b 24 3d 24 |==.... .| k$:k$=$|
|00000930| 28 a4 72 65 61 64 28 6d | 61 69 6e 25 2c 38 29 29 |(.read(m|ain%,8))|
|00000940| 0d 04 92 30 20 c8 99 20 | 22 57 69 6d 70 5f 53 65 |...0 .. |"Wimp_Se|
|00000950| 74 43 61 72 65 74 50 6f | 73 69 74 69 6f 6e 22 2c |tCaretPo|sition",|
|00000960| 2d 31 2c 2d 31 2c 30 2c | 30 2c 2d 31 2c 32 35 36 |-1,-1,0,|0,-1,256|
|00000970| 0d 04 9c 22 20 6b 24 2b | 3d c1 22 30 31 32 33 34 |..." k$+|=."01234|
|00000980| 35 36 37 38 39 61 62 63 | 64 65 66 22 2c 69 25 2c |56789abc|def",i%,|
|00000990| 31 29 0d 04 a6 21 20 e7 | 20 c0 6b 24 2c 31 29 3d |1)...! .| .k$,1)=|
|000009a0| 22 26 22 20 8c 20 6b 24 | 3d c2 6b 24 2c a9 6b 24 |"&" . k$|=.k$,.k$|
|000009b0| 2d 31 29 0d 04 b0 24 20 | e7 20 69 25 3d 30 20 8c |-1)...$ |. i%=0 .|
|000009c0| 20 6b 24 3d 22 26 22 20 | 8b 20 6b 24 3d 22 26 22 | k$="&" |. k$="&"|
|000009d0| 2b c2 6b 24 2c 33 29 0d | 04 ba 17 20 f2 77 72 69 |+.k$,3).|... .wri|
|000009e0| 74 65 28 6b 24 2c 6d 61 | 69 6e 25 2c 38 29 0d 04 |te(k$,ma|in%,8)..|
|000009f0| c4 05 e1 0d 04 ce 05 3a | 0d 04 d8 0a dd 20 f2 70 |.......:|..... .p|
|00000a00| 61 64 0d 04 e2 0d f4 20 | 3d 3d 3d 3d 3d 3d 3d 0d |ad..... |=======.|
|00000a10| 04 ec 12 20 6b 65 79 66 | 25 3d ac 20 6b 65 79 66 |... keyf|%=. keyf|
|00000a20| 25 0d 04 f6 11 20 f2 6f | 70 65 6e 28 6d 61 69 6e |%.... .o|pen(main|
|00000a30| 25 29 0d 05 00 10 20 e7 | 20 6b 65 79 66 25 3d b9 |%).... .| keyf%=.|
|00000a40| 20 8c 0d 05 0a 11 20 f2 | 6f 70 65 6e 28 6b 65 79 | ..... .|open(key|
|00000a50| 70 25 29 0d 05 14 06 20 | cc 0d 05 1e 12 20 f2 63 |p%).... |..... .c|
|00000a60| 6c 6f 73 65 28 6b 65 79 | 70 25 29 0d 05 28 06 20 |lose(key|p%)..(. |
|00000a70| cd 0d 05 32 05 e1 0d 05 | 3c 05 3a 0d 05 46 17 dd |...2....|<.:..F..|
|00000a80| 20 f2 73 68 6f 77 5f 69 | 6e 66 6f 28 66 24 2c 65 | .show_i|nfo(f$,e|
|00000a90| 24 29 0d 05 50 1a f4 20 | 3d 3d 3d 3d 3d 3d 3d 3d |$)..P.. |========|
|00000aa0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 0d 05 5a 11 |========|====..Z.|
|00000ab0| 20 ea 20 69 25 3a 6e 61 | 6c 74 25 3d 30 0d 05 64 | . i%:na|lt%=0..d|
|00000ac0| 0e 20 e7 20 65 24 3d 22 | 22 20 8c 0d 05 6e 19 20 |. . e$="|" ...n. |
|00000ad0| f2 67 65 74 5f 74 65 78 | 74 28 a4 66 69 6e 64 28 |.get_tex|t(.find(|
|00000ae0| 66 24 29 29 0d 05 78 2a | 20 e7 20 64 61 74 24 28 |f$))..x*| . dat$(|
|00000af0| 30 29 3c 3e 22 58 22 20 | 8c 20 f2 67 65 74 5f 73 |0)<>"X" |. .get_s|
|00000b00| 70 72 28 22 66 69 6c 65 | 5f 22 2b 66 24 29 0d 05 |pr("file|_"+f$)..|
|00000b10| 82 06 20 cc 0d 05 8c 0d | 20 f2 6f 64 64 28 65 24 |.. .....| .odd(e$|
|00000b20| 29 0d 05 96 06 20 cd 0d | 05 a0 0f 20 e3 20 69 25 |).... ..|... . i%|
|00000b30| 3d 31 20 b8 20 37 0d 05 | aa 20 20 f2 77 72 69 74 |=1 . 7..|. .writ|
|00000b40| 65 28 64 61 74 24 28 69 | 25 29 2c 6d 61 69 6e 25 |e(dat$(i|%),main%|
|00000b50| 2c 69 25 2b 37 29 0d 05 | b4 06 20 ed 0d 05 be 13 |,i%+7)..|.. .....|
|00000b60| 20 e3 20 69 25 3d 31 20 | b8 20 74 61 6c 74 25 0d | . i%=1 |. talt%.|
|00000b70| 05 c8 19 20 f2 73 68 6f | 77 28 6d 61 69 6e 25 2c |... .sho|w(main%,|
|00000b80| 69 25 2b 31 34 2c 30 29 | 0d 05 d2 06 20 ed 0d 05 |i%+14,0)|.... ...|
|00000b90| dc 05 e1 0d 05 e6 05 3a | 0d 05 f0 10 dd 20 f2 6e |.......:|..... .n|
|00000ba0| 65 78 74 28 69 63 25 29 | 0d 05 fa 13 f4 20 3d 3d |ext(ic%)|..... ==|
|00000bb0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0d 06 04 1c 20 |========|===.... |
|00000bc0| ea 20 6f 6b 25 2c 69 25 | 2c 66 25 2c 70 25 2c 64 |. ok%,i%|,f%,p%,d|
|00000bd0| 24 3a 64 24 3d 22 22 0d | 06 0e 26 20 6f 6b 25 3d |$:d$="".|..& ok%=|
|00000be0| 28 66 69 6c 65 24 3c 3d | 22 66 66 66 22 20 80 20 |(file$<=|"fff" . |
|00000bf0| 66 69 6c 65 24 3e 3d 22 | 30 30 30 22 29 0d 06 18 |file$>="|000")...|
|00000c00| 22 20 e7 20 ac 20 6f 6b | 25 20 80 20 69 63 25 3d |" . . ok|% . ic%=|
|00000c10| 30 20 8c 20 66 69 6c 65 | 24 3d 22 66 66 66 22 0d |0 . file|$="fff".|
|00000c20| 06 22 1b 20 e7 20 69 63 | 25 3d 32 37 20 80 20 a6 |.". . ic|%=27 . .|
|00000c30| 2d 34 20 8c 20 69 63 25 | 3d 30 0d 06 2c 0c 20 e7 |-4 . ic%|=0..,. .|
|00000c40| 20 6f 6b 25 20 8c 0d 06 | 36 14 20 66 25 3d a0 28 | ok% ...|6. f%=.(|
|00000c50| 22 26 22 2b 66 69 6c 65 | 24 29 0d 06 40 0b 20 c8 |"&"+file|$)..@. .|
|00000c60| 8e 20 b9 20 ca 0d 06 4a | 20 20 c9 20 69 63 25 3d |. . ...J| . ic%=|
|00000c70| 32 36 20 3a 20 66 25 3d | 28 66 25 2d 31 29 20 80 |26 : f%=|(f%-1) .|
|00000c80| 20 26 46 46 46 0d 06 54 | 20 20 c9 20 69 63 25 3d | &FFF..T| . ic%=|
|00000c90| 32 37 20 3a 20 66 25 3d | 28 66 25 2b 31 29 20 80 |27 : f%=|(f%+1) .|
|00000ca0| 20 26 46 46 46 0d 06 5e | 23 20 c9 20 69 63 25 3d | &FFF..^|# . ic%=|
|00000cb0| 32 38 20 3a 20 66 25 3d | 28 66 25 2d 26 31 30 30 |28 : f%=|(f%-&100|
|00000cc0| 29 20 80 20 26 46 30 30 | 0d 06 68 23 20 c9 20 69 |) . &F00|..h# . i|
|00000cd0| 63 25 3d 32 39 20 3a 20 | 66 25 3d 28 66 25 2b 26 |c%=29 : |f%=(f%+&|
|00000ce0| 31 30 30 29 20 80 20 26 | 46 30 30 0d 06 72 0e 20 |100) . &|F00..r. |
|00000cf0| c9 20 69 63 25 3d 30 20 | 3a 0d 06 7c 15 20 66 25 |. ic%=0 |:..|. f%|
|00000d00| 3d 28 66 25 2b 31 29 20 | 80 20 26 46 46 46 0d 06 |=(f%+1) |. &FFF..|
|00000d10| 86 06 20 f5 0d 06 90 17 | 20 f2 67 65 74 5f 63 73 |.. .....| .get_cs|
|00000d20| 76 28 a4 63 6f 6e 28 66 | 25 29 29 0d 06 9a 18 20 |v(.con(f|%)).... |
|00000d30| 70 25 3d a4 66 69 6e 64 | 78 28 a4 63 6f 6e 28 66 |p%=.find|x(.con(f|
|00000d40| 25 29 29 0d 06 a4 0d 20 | e7 20 70 25 3d 31 20 8c |%)).... |. p%=1 .|
|00000d50| 0d 06 ae 18 20 66 25 3d | 28 66 25 2b 26 31 30 30 |.... f%=|(f%+&100|
|00000d60| 29 20 80 20 26 46 30 30 | 0d 06 b8 17 20 f2 67 65 |) . &F00|.... .ge|
|00000d70| 74 5f 63 73 76 28 a4 63 | 6f 6e 28 66 25 29 29 0d |t_csv(.c|on(f%)).|
|00000d80| 06 c2 06 20 cd 0d 06 cc | 0b 20 fd 20 70 25 3e 31 |... ....|. . p%>1|
|00000d90| 0d 06 d6 0f 20 e3 20 69 | 25 3d 30 20 b8 20 33 0d |.... . i|%=0 . 3.|
|00000da0| 06 e0 1a 20 64 24 2b 3d | bd 28 64 61 74 61 25 3f |... d$+=|.(data%?|
|00000db0| 70 25 29 3a 70 25 2b 3d | 31 0d 06 ea 06 20 ed 0d |p%):p%+=|1.... ..|
|00000dc0| 06 f4 0d 20 66 25 3d a0 | 28 64 24 29 0d 06 fe 06 |... f%=.|(d$)....|
|00000dd0| 20 cb 0d 07 08 15 20 66 | 69 6c 65 24 3d a4 68 65 | ..... f|ile$=.he|
|00000de0| 78 28 c3 7e 66 25 29 0d | 07 12 14 20 f2 67 65 74 |x(.~f%).|... .get|
|00000df0| 5f 63 73 76 28 66 69 6c | 65 24 29 0d 07 1c 19 20 |_csv(fil|e$).... |
|00000e00| f2 73 68 6f 77 5f 69 6e | 66 6f 28 66 69 6c 65 24 |.show_in|fo(file$|
|00000e10| 2c 22 22 29 0d 07 26 06 | 20 cd 0d 07 30 05 e1 0d |,"")..&.| ...0...|
|00000e20| 07 3a 05 3a 0d 07 44 0f | dd 20 a4 66 69 6e 64 28 |.:.:..D.|. .find(|
|00000e30| 66 24 29 0d 07 4e 10 f4 | 20 3d 3d 3d 3d 3d 3d 3d |f$)..N..| =======|
|00000e40| 3d 3d 3d 0d 07 58 09 20 | ea 20 69 25 0d 07 62 16 |===..X. |. i%..b.|
|00000e50| 20 61 6c 74 25 28 29 3d | 30 3a 24 74 6d 70 25 3d | alt%()=|0:$tmp%=|
|00000e60| 66 24 0d 07 6c 15 20 41 | 25 3d 74 6d 70 25 3a 42 |f$..l. A|%=tmp%:B|
|00000e70| 25 3d 63 73 76 6c 25 0d | 07 76 15 20 43 25 3d 64 |%=csvl%.|.v. C%=d|
|00000e80| 61 74 61 25 3a 44 25 3d | 62 75 66 25 0d 07 80 11 |ata%:D%=|buf%....|
|00000e90| 20 6e 61 6c 74 25 3d ba | 20 66 69 6e 64 0d 07 8a | nalt%=.| find...|
|00000ea0| 15 20 e3 20 69 25 3d 30 | 20 b8 20 6e 61 6c 74 25 |. . i%=0| . nalt%|
|00000eb0| 2d 31 0d 07 94 1a 20 61 | 6c 74 25 28 69 25 29 3d |-1.... a|lt%(i%)=|
|00000ec0| 21 28 62 75 66 25 2b 69 | 25 2a 34 29 0d 07 9e 10 |!(buf%+i|%*4)....|
|00000ed0| 20 64 69 73 25 28 69 25 | 29 3d 69 25 0d 07 a8 06 | dis%(i%|)=i%....|
|00000ee0| 20 ed 0d 07 b2 0c 3d 61 | 6c 74 25 28 30 29 0d 07 | .....=a|lt%(0)..|
|00000ef0| bc 05 3a 0d 07 c6 10 dd | 20 a4 66 69 6e 64 78 28 |..:.....| .findx(|
|00000f00| 66 24 29 0d 07 d0 11 f4 | 20 3d 3d 3d 3d 3d 3d 3d |f$).....| =======|
|00000f10| 3d 3d 3d 3d 0d 07 da 0d | 20 24 74 6d 70 25 3d 66 |====....| $tmp%=f|
|00000f20| 24 0d 07 e4 15 20 41 25 | 3d 74 6d 70 25 3a 42 25 |$.... A%|=tmp%:B%|
|00000f30| 3d 63 73 76 6c 25 0d 07 | ee 12 20 43 25 3d 64 61 |=csvl%..|.. C%=da|
|00000f40| 74 61 25 3a 44 25 3d 30 | 0d 07 f8 0b 3d ba 20 66 |ta%:D%=0|....=. f|
|00000f50| 69 6e 64 0d 08 02 05 3a | 0d 08 0c 2d dd 20 a4 63 |ind....:|...-. .c|
|00000f60| 6f 6e 28 66 25 29 3a 41 | 25 3d 66 25 3a 42 25 3d |on(f%):A|%=f%:B%=|
|00000f70| 74 6d 70 25 3a 43 25 3d | 31 30 3a 3d 24 28 ba 20 |tmp%:C%=|10:=$(. |
|00000f80| 63 6f 6e 76 29 0d 08 16 | 05 3a 0d 08 20 13 dd 20 |conv)...|.:.. .. |
|00000f90| f2 67 65 74 5f 74 65 78 | 74 28 70 25 29 0d 08 2a |.get_tex|t(p%)..*|
|00000fa0| 16 f4 20 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.. =====|========|
|00000fb0| 3d 3d 3d 0d 08 34 0c 20 | ea 20 63 25 2c 69 25 0d |===..4. |. c%,i%.|
|00000fc0| 08 3e 1e 20 69 25 3d 30 | 3a 64 61 74 24 28 29 3d |.>. i%=0|:dat$()=|
|00000fd0| 22 22 3a 63 73 76 5f 65 | 72 72 25 3d a3 0d 08 48 |"":csv_e|rr%=...H|
|00000fe0| 06 20 f5 0d 08 52 16 20 | 63 25 3d 64 61 74 61 25 |. ...R. |c%=data%|
|00000ff0| 3f 70 25 3a 70 25 2b 3d | 31 0d 08 5c 24 20 e7 20 |?p%:p%+=|1..\$ . |
|00001000| 63 25 3d 34 34 20 8c 20 | 69 25 2b 3d 31 20 8b 20 |c%=44 . |i%+=1 . |
|00001010| 64 61 74 24 28 69 25 29 | 2b 3d bd 63 25 0d 08 66 |dat$(i%)|+=.c%..f|
|00001020| 1f 20 e7 20 69 25 3e 37 | 20 8c 20 63 25 3d 26 30 |. . i%>7| . c%=&0|
|00001030| 41 3a 63 73 76 5f 65 72 | 72 25 3d b9 0d 08 70 0d |A:csv_er|r%=...p.|
|00001040| 20 fd 20 63 25 3d 26 30 | 41 0d 08 7a 19 20 f2 77 | . c%=&0|A..z. .w|
|00001050| 72 69 74 65 28 22 20 22 | 2c 6d 61 69 6e 25 2c 34 |rite(" "|,main%,4|
|00001060| 35 29 0d 08 84 16 20 e7 | 20 c2 64 61 74 24 28 34 |5).... .| .dat$(4|
|00001070| 29 29 3d 22 23 22 20 8c | 0d 08 8e 16 20 64 61 74 |))="#" .|.... dat|
|00001080| 24 28 34 29 3d c0 64 61 | 74 24 28 34 29 29 0d 08 |$(4)=.da|t$(4))..|
|00001090| 98 19 20 f2 77 72 69 74 | 65 28 22 52 22 2c 6d 61 |.. .writ|e("R",ma|
|000010a0| 69 6e 25 2c 34 35 29 0d | 08 a2 06 20 cd 0d 08 ac |in%,45).|... ....|
|000010b0| 11 20 c8 8e 20 64 61 74 | 24 28 34 29 20 ca 0d 08 |. .. dat|$(4) ...|
|000010c0| b6 25 20 c9 20 22 50 44 | 22 20 3a 20 64 61 74 24 |.% . "PD|" : dat$|
|000010d0| 28 34 29 3d 22 50 75 62 | 6c 69 63 20 44 6f 6d 61 |(4)="Pub|lic Doma|
|000010e0| 69 6e 22 0d 08 c0 22 20 | c9 20 22 43 4f 22 20 3a |in"..." |. "CO" :|
|000010f0| 20 64 61 74 24 28 34 29 | 3d 22 43 6f 6d 6d 65 72 | dat$(4)|="Commer|
|00001100| 63 69 61 6c 22 0d 08 ca | 21 20 c9 20 22 53 48 22 |cial"...|! . "SH"|
|00001110| 20 3a 20 64 61 74 24 28 | 34 29 3d 22 53 68 61 72 | : dat$(|4)="Shar|
|00001120| 65 77 61 72 65 22 0d 08 | d4 20 20 c9 20 22 43 41 |eware"..|. . "CA|
|00001130| 22 20 3a 20 64 61 74 24 | 28 34 29 3d 22 43 61 72 |" : dat$|(4)="Car|
|00001140| 65 77 61 72 65 22 0d 08 | de 20 20 c9 20 22 46 52 |eware"..|. . "FR|
|00001150| 22 20 3a 20 64 61 74 24 | 28 34 29 3d 22 46 72 65 |" : dat$|(4)="Fre|
|00001160| 65 77 61 72 65 22 0d 08 | e8 1e 20 c9 20 22 53 59 |eware"..|.. . "SY|
|00001170| 22 20 3a 20 64 61 74 24 | 28 34 29 3d 22 53 79 73 |" : dat$|(4)="Sys|
|00001180| 74 65 6d 22 0d 08 f2 22 | 20 c9 20 22 41 55 22 20 |tem"..."| . "AU" |
|00001190| 3a 20 64 61 74 24 28 34 | 29 3d 22 41 63 6f 72 6e |: dat$(4|)="Acorn|
|000011a0| 20 55 73 65 72 22 0d 08 | fc 28 20 c9 20 22 41 57 | User"..|.( . "AW|
|000011b0| 22 20 3a 20 64 61 74 24 | 28 34 29 3d 22 41 72 63 |" : dat$|(4)="Arc|
|000011c0| 68 69 6d 65 64 65 73 20 | 57 6f 72 6c 64 22 0d 09 |himedes |World"..|
|000011d0| 06 21 20 c9 20 22 52 55 | 22 20 3a 20 64 61 74 24 |.! . "RU|" : dat$|
|000011e0| 28 34 29 3d 22 52 69 73 | 63 20 55 73 65 72 22 0d |(4)="Ris|c User".|
|000011f0| 09 10 06 20 cb 0d 09 1a | 17 20 c8 94 20 64 61 74 |... ....|. .. dat|
|00001200| 24 28 30 29 2c 64 61 74 | 24 28 31 29 0d 09 24 3e |$(0),dat|$(1)..$>|
|00001210| 20 e7 20 64 61 74 24 28 | 30 29 3d 22 58 22 20 8c | . dat$(|0)="X" .|
|00001220| 20 64 61 74 24 28 36 29 | 3d 22 4e 6f 20 69 6e 66 | dat$(6)|="No inf|
|00001230| 6f 72 6d 61 74 69 6f 6e | 20 6f 6e 20 74 68 69 73 |ormation| on this|
|00001240| 20 66 69 6c 65 74 79 70 | 65 22 0d 09 2e 05 e1 0d | filetyp|e"......|
|00001250| 09 38 05 3a 0d 09 42 12 | dd 20 f2 67 65 74 5f 73 |.8.:..B.|. .get_s|
|00001260| 70 72 28 66 24 29 0d 09 | 4c 15 f4 20 3d 3d 3d 3d |pr(f$)..|L.. ====|
|00001270| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0d 09 56 19 20 |========|===..V. |
|00001280| ea 20 6c 25 2c 6e 25 2c | 70 25 2c 71 25 2c 73 25 |. l%,n%,|p%,q%,s%|
|00001290| 2c 66 66 24 0d 09 60 0a | 20 65 72 25 3d a3 0d 09 |,ff$..`.| er%=...|
|000012a0| 6a 12 20 66 66 24 3d c0 | 66 69 6c 65 24 2c 31 29 |j. ff$=.|file$,1)|
|000012b0| 0d 09 74 21 20 73 70 72 | 24 3d 61 6c 69 61 73 24 |..t! spr|$=alias$|
|000012c0| 2b 22 2e 44 61 74 61 2e | 73 70 72 5f 22 2b 66 66 |+".Data.|spr_"+ff|
|000012d0| 24 0d 09 7e 36 20 e7 20 | 66 66 24 3c 3e 73 70 24 |$..~6 . |ff$<>sp$|
|000012e0| 20 c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 | .. "OS_|SpriteOp|
|000012f0| 22 2c 32 36 36 2c 69 73 | 70 72 2c 73 70 72 24 3a |",266,is|pr,spr$:|
|00001300| 73 70 24 3d 66 66 24 0d | 09 88 1f 20 71 25 3d 31 |sp$=ff$.|... q%=1|
|00001310| 36 3a 70 25 3d 69 73 70 | 72 21 38 3a 6c 25 3d 69 |6:p%=isp|r!8:l%=i|
|00001320| 73 70 72 21 31 32 0d 09 | 92 22 20 63 73 70 72 21 |spr!12..|." cspr!|
|00001330| 34 3d 30 3a 63 73 70 72 | 21 38 3d 31 36 3a 63 73 |4=0:cspr|!8=16:cs|
|00001340| 70 72 21 31 32 3d 31 36 | 0d 09 9c 06 20 f5 0d 09 |pr!12=16|.... ...|
|00001350| a6 0f 20 73 25 3d 69 73 | 70 72 21 70 25 0d 09 b0 |.. s%=is|pr!p%...|
|00001360| 17 20 74 6d 70 25 21 30 | 3d 69 73 70 72 21 28 70 |. tmp%!0|=ispr!(p|
|00001370| 25 2b 34 29 0d 09 ba 17 | 20 74 6d 70 25 21 34 3d |%+4)....| tmp%!4=|
|00001380| 69 73 70 72 21 28 70 25 | 2b 38 29 0d 09 c4 0f 20 |ispr!(p%|+8).... |
|00001390| 74 6d 70 25 3f 38 3d 26 | 30 44 0d 09 ce 25 20 e7 |tmp%?8=&|0D...% .|
|000013a0| 20 66 24 3d 24 74 6d 70 | 25 20 8c 20 71 25 3d a4 | f$=$tmp|% . q%=.|
|000013b0| 73 68 69 66 74 28 70 25 | 2c 71 25 2c 73 25 29 0d |shift(p%|,q%,s%).|
|000013c0| 09 d8 0b 20 70 25 2b 3d | 73 25 0d 09 e2 0d 20 fd |... p%+=|s%.... .|
|000013d0| 20 70 25 3e 3d 6c 25 0d | 09 ec 28 20 c8 99 20 22 | p%>=l%.|..( .. "|
|000013e0| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 32 35 36 |OS_Sprit|eOp",256|
|000013f0| 2b 38 2c 63 73 70 72 20 | b8 20 2c 2c 2c 6e 25 0d |+8,cspr |. ,,,n%.|
|00001400| 09 f6 27 20 e7 20 6e 25 | 3e 6e 61 6c 74 25 20 8c |..' . n%|>nalt% .|
|00001410| 20 65 72 25 3d b9 3a 65 | 72 24 3d c2 66 24 2c 33 | er%=.:e|r$=.f$,3|
|00001420| 29 2b 22 31 23 22 0d 0a | 00 27 20 e7 20 6e 25 3c |)+"1#"..|.' . n%<|
|00001430| 6e 61 6c 74 25 20 8c 20 | 65 72 25 3d b9 3a 65 72 |nalt% . |er%=.:er|
|00001440| 24 3d c2 66 24 2c 33 29 | 2b 22 32 23 22 0d 0a 0a |$=.f$,3)|+"2#"...|
|00001450| 29 20 e7 20 63 73 76 5f | 65 72 72 25 3d b9 20 8c |) . csv_|err%=. .|
|00001460| 20 65 72 25 3d b9 3a 65 | 72 24 3d c2 66 24 2c 33 | er%=.:e|r$=.f$,3|
|00001470| 29 2b 22 33 23 22 0d 0a | 14 0c 20 e7 20 65 72 25 |)+"3#"..|.. . er%|
|00001480| 20 8c 0d 0a 1e 0e 20 f2 | 6f 64 64 28 65 72 24 29 | ..... .|odd(er$)|
|00001490| 0d 0a 28 06 20 cc 0d 0a | 32 3a 20 c8 99 20 22 4f |..(. ...|2: .. "O|
|000014a0| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 32 35 36 2b |S_Sprite|Op",256+|
|000014b0| 31 32 2c 63 73 70 72 2c | 22 3c 57 69 6d 70 24 53 |12,cspr,|"<Wimp$S|
|000014c0| 63 72 61 70 44 69 72 3e | 22 2b 22 2e 74 6d 70 22 |crapDir>|"+".tmp"|
|000014d0| 0d 0a 3c 34 20 c8 99 20 | 22 57 69 6d 70 5f 53 70 |..<4 .. |"Wimp_Sp|
|000014e0| 72 69 74 65 4f 70 22 2c | 31 31 2c 2c 22 3c 57 69 |riteOp",|11,,"<Wi|
|000014f0| 6d 70 24 53 63 72 61 70 | 44 69 72 3e 22 2b 22 2e |mp$Scrap|Dir>"+".|
|00001500| 74 6d 70 22 0d 0a 46 2c | 20 c8 99 20 22 4f 53 5f |tmp"..F,| .. "OS_|
|00001510| 46 69 6c 65 22 2c 36 2c | 22 3c 57 69 6d 70 24 53 |File",6,|"<Wimp$S|
|00001520| 63 72 61 70 44 69 72 3e | 22 2b 22 2e 74 6d 70 22 |crapDir>|"+".tmp"|
|00001530| 0d 0a 50 06 20 cd 0d 0a | 5a 05 e1 0d 0a 64 05 3a |..P. ...|Z....d.:|
|00001540| 0d 0a 6e 16 dd 20 a4 73 | 68 69 66 74 28 66 25 2c |..n.. .s|hift(f%,|
|00001550| 74 25 2c 6e 25 29 0d 0a | 78 17 f4 20 3d 3d 3d 3d |t%,n%)..|x.. ====|
|00001560| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 0d 0a 82 |========|=====...|
|00001570| 3b 20 c8 99 20 22 57 69 | 6d 70 5f 54 72 61 6e 73 |; .. "Wi|mp_Trans|
|00001580| 66 65 72 42 6c 6f 63 6b | 22 2c 74 61 73 6b 25 2c |ferBlock|",task%,|
|00001590| 69 73 70 72 2b 66 25 2c | 74 61 73 6b 25 2c 63 73 |ispr+f%,|task%,cs|
|000015a0| 70 72 2b 74 25 2c 6e 25 | 0d 0a 8c 17 20 63 73 70 |pr+t%,n%|.... csp|
|000015b0| 72 21 31 32 3d 63 73 70 | 72 21 31 32 2b 6e 25 0d |r!12=csp|r!12+n%.|
|000015c0| 0a 96 21 20 24 28 63 73 | 70 72 2b 74 25 2b 34 29 |..! $(cs|pr+t%+4)|
|000015d0| 3d 22 69 64 7e 22 2b c3 | 28 63 73 70 72 21 34 29 |="id~"+.|(cspr!4)|
|000015e0| 0d 0a a0 14 20 63 73 70 | 72 21 34 3d 63 73 70 72 |.... csp|r!4=cspr|
|000015f0| 21 34 2b 31 0d 0a aa 12 | 20 63 73 70 72 21 28 74 |!4+1....| cspr!(t|
|00001600| 25 2b 38 29 3d 30 0d 0a | b4 13 20 63 73 70 72 21 |%+8)=0..|.. cspr!|
|00001610| 28 74 25 2b 31 32 29 3d | 30 0d 0a be 0a 3d 74 25 |(t%+12)=|0....=t%|
|00001620| 2b 6e 25 0d 0a c8 05 3a | 0d 0a d2 0f dd 20 f2 73 |+n%....:|..... .s|
|00001630| 77 61 70 28 66 25 29 0d | 0a dc 12 f4 20 3d 3d 3d |wap(f%).|.... ===|
|00001640| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 0d 0a e6 0c 20 ea 20 |========|=.... . |
|00001650| 61 25 2c 62 25 0d 0a f0 | 11 20 e7 20 66 25 3c 6e |a%,b%...|. . f%<n|
|00001660| 61 6c 74 25 20 8c 0d 0a | fa 15 20 e3 20 69 25 3d |alt% ...|.. . i%=|
|00001670| 31 20 b8 20 6e 61 6c 74 | 25 2d 31 0d 0b 04 1a 20 |1 . nalt|%-1.... |
|00001680| e7 20 64 69 73 25 28 69 | 25 29 3d 66 25 20 8c 20 |. dis%(i|%)=f% . |
|00001690| 61 25 3d 69 25 0d 0b 0e | 19 20 e7 20 64 69 73 25 |a%=i%...|. . dis%|
|000016a0| 28 69 25 29 3d 30 20 8c | 20 62 25 3d 69 25 0d 0b |(i%)=0 .| b%=i%..|
|000016b0| 18 06 20 ed 0d 0b 22 1b | 20 64 69 73 25 28 61 25 |.. ...".| dis%(a%|
|000016c0| 29 3d 30 3a 64 69 73 25 | 28 62 25 29 3d 66 25 0d |)=0:dis%|(b%)=f%.|
|000016d0| 0b 2c 18 20 f2 67 65 74 | 5f 74 65 78 74 28 61 6c |.,. .get|_text(al|
|000016e0| 74 25 28 61 25 29 29 0d | 0b 36 15 20 f2 69 64 28 |t%(a%)).|.6. .id(|
|000016f0| 22 69 64 7e 22 2b c3 28 | 66 25 29 29 0d 0b 40 29 |"id~"+.(|f%))..@)|
|00001700| 20 c8 99 20 22 57 69 6d | 70 5f 53 70 72 69 74 65 | .. "Wim|p_Sprite|
|00001710| 4f 70 22 2c 31 31 2c 2c | 61 6c 69 61 73 24 2b 22 |Op",11,,|alias$+"|
|00001720| 2e 7e 7a 7e 22 0d 0b 4a | 0f 20 e3 20 69 25 3d 31 |.~z~"..J|. . i%=1|
|00001730| 20 b8 20 37 0d 0b 54 20 | 20 f2 77 72 69 74 65 28 | . 7..T | .write(|
|00001740| 64 61 74 24 28 69 25 29 | 2c 6d 61 69 6e 25 2c 69 |dat$(i%)|,main%,i|
|00001750| 25 2b 37 29 0d 0b 5e 06 | 20 ed 0d 0b 68 13 20 e3 |%+7)..^.| ...h. .|
|00001760| 20 69 25 3d 31 20 b8 20 | 74 61 6c 74 25 0d 0b 72 | i%=1 . |talt%..r|
|00001770| 19 20 f2 73 68 6f 77 28 | 6d 61 69 6e 25 2c 69 25 |. .show(|main%,i%|
|00001780| 2b 31 34 2c 30 29 0d 0b | 7c 06 20 ed 0d 0b 86 06 |+14,0)..||. .....|
|00001790| 20 cd 0d 0b 90 05 e1 0d | 0b 9a 05 3a 0d 0b a4 0d | .......|...:....|
|000017a0| dd 20 f2 69 64 28 69 24 | 29 0d 0b ae 10 f4 20 3d |. .id(i$|)..... =|
|000017b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 0d 0b b8 09 20 ea 20 |========|=.... . |
|000017c0| 77 25 0d 0b c2 22 20 c8 | 99 20 22 57 69 6d 70 5f |w%..." .|. "Wimp_|
|000017d0| 42 61 73 65 4f 66 53 70 | 72 69 74 65 73 22 20 b8 |BaseOfSp|rites" .|
|000017e0| 20 2c 77 25 0d 0b cc 29 | 20 c8 99 20 22 4f 53 5f | ,w%...)| .. "OS_|
|000017f0| 53 70 72 69 74 65 4f 70 | 22 2c 32 38 32 2c 77 25 |SpriteOp|",282,w%|
|00001800| 2c 22 69 64 7e 30 22 2c | 22 69 7e 64 22 0d 0b d6 |,"id~0",|"i~d"...|
|00001810| 26 20 c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f |& .. "OS|_SpriteO|
|00001820| 70 22 2c 32 38 32 2c 77 | 25 2c 69 24 2c 22 69 64 |p",282,w|%,i$,"id|
|00001830| 7e 30 22 0d 0b e0 25 20 | c8 99 20 22 4f 53 5f 53 |~0"...% |.. "OS_S|
|00001840| 70 72 69 74 65 4f 70 22 | 2c 32 38 32 2c 77 25 2c |priteOp"|,282,w%,|
|00001850| 22 69 7e 64 22 2c 69 24 | 0d 0b ea 05 e1 0d 0b f4 |"i~d",i$|........|
|00001860| 05 3a 0d 0b fe 0e dd 20 | f2 6f 64 64 28 66 24 29 |.:..... |.odd(f$)|
|00001870| 0d 0c 08 11 f4 20 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..... ==|========|
|00001880| 3d 0d 0c 12 1d 20 64 61 | 74 24 28 29 3d 22 22 3a |=.... da|t$()="":|
|00001890| 64 61 74 24 28 31 29 3d | 22 26 22 2b 66 24 0d 0c |dat$(1)=|"&"+f$..|
|000018a0| 1c 2e 20 e7 20 c2 66 24 | 29 3d 22 23 22 20 8c 20 |.. . .f$|)="#" . |
|000018b0| 64 61 74 24 28 31 29 3d | 22 26 22 2b c0 66 24 2c |dat$(1)=|"&"+.f$,|
|000018c0| 33 29 3a 66 24 3d c2 66 | 24 2c 32 29 0d 0c 26 0c |3):f$=.f|$,2)..&.|
|000018d0| 20 c8 8e 20 66 24 20 ca | 0d 0c 30 32 20 c9 20 22 | .. f$ .|..02 . "|
|000018e0| 31 30 30 30 22 20 3a 64 | 61 74 24 28 36 29 3d 22 |1000" :d|at$(6)="|
|000018f0| 44 69 72 65 63 74 6f 72 | 79 22 3a f2 69 64 28 22 |Director|y":.id("|
|00001900| 64 69 72 65 63 74 72 79 | 22 29 0d 0c 3a 35 20 c9 |directry|")..:5 .|
|00001910| 20 22 32 30 30 30 22 20 | 3a 64 61 74 24 28 36 29 | "2000" |:dat$(6)|
|00001920| 3d 22 41 70 70 6c 69 63 | 61 74 69 6f 6e 22 3a f2 |="Applic|ation":.|
|00001930| 69 64 28 22 61 70 70 6c | 69 63 61 74 6e 22 29 0d |id("appl|icatn").|
|00001940| 0c 44 25 20 c9 20 22 33 | 30 30 30 22 20 3a 64 61 |.D% . "3|000" :da|
|00001950| 74 24 28 36 29 3d 22 55 | 6e 74 79 70 65 64 20 66 |t$(6)="U|ntyped f|
|00001960| 69 6c 65 22 0d 0c 4e 2c | 20 c9 20 22 78 78 78 22 |ile"..N,| . "xxx"|
|00001970| 20 20 3a 64 61 74 24 28 | 36 29 3d 22 42 61 64 20 | :dat$(|6)="Bad |
|00001980| 68 65 78 20 69 6e 20 66 | 69 6c 65 74 79 70 65 22 |hex in f|iletype"|
|00001990| 0d 0c 58 0c 20 c9 20 22 | 31 23 22 3a 0d 0c 62 33 |..X. . "|1#":..b3|
|000019a0| 20 64 61 74 24 28 36 29 | 3d 22 44 61 74 61 20 69 | dat$(6)|="Data i|
|000019b0| 6e 63 6f 6e 73 69 73 74 | 65 6e 74 20 66 6f 72 20 |nconsist|ent for |
|000019c0| 22 2b 64 61 74 24 28 31 | 29 3a f2 62 65 65 70 0d |"+dat$(1|):.beep.|
|000019d0| 0c 6c 31 20 64 61 74 24 | 28 37 29 3d 22 44 65 73 |.l1 dat$|(7)="Des|
|000019e0| 63 72 69 70 74 69 6f 6e | 20 6d 69 73 73 69 6e 67 |cription| missing|
|000019f0| 20 69 6e 20 27 63 73 76 | 5f 27 20 66 69 6c 65 22 | in 'csv|_' file"|
|00001a00| 0d 0c 76 0c 20 c9 20 22 | 32 23 22 3a 0d 0c 80 33 |..v. . "|2#":...3|
|00001a10| 20 64 61 74 24 28 36 29 | 3d 22 44 61 74 61 20 69 | dat$(6)|="Data i|
|00001a20| 6e 63 6f 6e 73 69 73 74 | 65 6e 74 20 66 6f 72 20 |nconsist|ent for |
|00001a30| 22 2b 64 61 74 24 28 31 | 29 3a f2 62 65 65 70 0d |"+dat$(1|):.beep.|
|00001a40| 0c 8a 2b 20 64 61 74 24 | 28 37 29 3d 22 49 6d 61 |..+ dat$|(7)="Ima|
|00001a50| 67 65 20 6d 69 73 73 69 | 6e 67 20 69 6e 20 27 73 |ge missi|ng in 's|
|00001a60| 70 72 5f 27 20 66 69 6c | 65 22 0d 0c 94 0c 20 c9 |pr_' fil|e".... .|
|00001a70| 20 22 33 23 22 3a 0d 0c | 9e 36 20 64 61 74 24 28 | "3#":..|.6 dat$(|
|00001a80| 36 29 3d 22 45 72 72 6f | 72 20 69 6e 20 27 63 73 |6)="Erro|r in 'cs|
|00001a90| 76 5f 27 20 66 69 6c 65 | 20 66 6f 72 20 22 2b 64 |v_' file| for "+d|
|00001aa0| 61 74 24 28 31 29 3a f2 | 62 65 65 70 0d 0c a8 23 |at$(1):.|beep...#|
|00001ab0| 20 64 61 74 24 28 37 29 | 3d 22 2d 20 74 6f 6f 20 | dat$(7)|="- too |
|00001ac0| 6d 61 6e 79 20 63 6f 6d | 6d 61 73 2e 2e 2e 22 0d |many com|mas...".|
|00001ad0| 0c b2 31 20 7f 20 3a 20 | 64 61 74 24 28 36 29 3d |..1 . : |dat$(6)=|
|00001ae0| 22 46 69 6c 65 74 79 70 | 65 20 6e 6f 74 20 75 6e |"Filetyp|e not un|
|00001af0| 64 65 72 73 74 6f 6f 64 | 20 2d 20 26 22 2b 66 24 |derstood| - &"+f$|
|00001b00| 0d 0c bc 06 20 cb 0d 0c | c6 05 e1 0d 0c d0 05 3a |.... ...|.......:|
|00001b10| 0d 0c da 12 dd 20 f2 67 | 65 74 5f 63 73 76 28 66 |..... .g|et_csv(f|
|00001b20| 24 29 0d 0c e4 15 f4 20 | 3d 3d 3d 3d 3d 3d 3d 3d |$)..... |========|
|00001b30| 3d 3d 3d 3d 3d 3d 3d 0d | 0c ee 0e 20 66 24 3d c0 |=======.|... f$=.|
|00001b40| 66 24 2c 31 29 0d 0c f8 | 11 20 e7 20 66 24 3c 3e |f$,1)...|. . f$<>|
|00001b50| 63 73 76 24 20 8c 0d 0d | 02 3e 20 c8 99 20 22 4f |csv$ ...|.> .. "O|
|00001b60| 53 5f 46 69 6c 65 22 2c | 26 46 46 2c 61 6c 69 61 |S_File",|&FF,alia|
|00001b70| 73 24 2b 22 2e 44 61 74 | 61 2e 63 73 76 5f 22 2b |s$+".Dat|a.csv_"+|
|00001b80| 66 24 2c 64 61 74 61 25 | 20 b8 20 2c 2c 2c 2c 63 |f$,data%| . ,,,,c|
|00001b90| 73 76 6c 25 0d 0d 0c 0c | 20 63 73 76 24 3d 66 24 |svl%....| csv$=f$|
|00001ba0| 0d 0d 16 06 20 cd 0d 0d | 20 1f 20 68 78 31 24 3d |.... ...| . hx1$=|
|00001bb0| c1 68 78 33 24 2c 31 2b | a0 28 22 26 22 2b 66 24 |.hx3$,1+|.("&"+f$|
|00001bc0| 29 2c 31 37 29 0d 0d 2a | 05 e1 0d 0d 34 05 3a 0d |),17)..*|....4.:.|
|00001bd0| 0d 3e 0e dd 20 a4 68 65 | 78 28 66 24 29 0d 0d 48 |.>.. .he|x(f$)..H|
|00001be0| 0f f4 20 3d 3d 3d 3d 3d | 3d 3d 3d 3d 0d 0d 52 1e |.. =====|====..R.|
|00001bf0| 20 ea 20 68 24 3a 68 24 | 3d 61 6c 69 61 73 24 2b | . h$:h$|=alias$+|
|00001c00| 22 2e 73 70 72 69 74 65 | 73 22 0d 0d 5c 29 20 c8 |".sprite|s"..\) .|
|00001c10| 99 20 22 57 69 6d 70 5f | 53 70 72 69 74 65 4f 70 |. "Wimp_|SpriteOp|
|00001c20| 22 2c 31 31 2c 2c 61 6c | 69 61 73 24 2b 22 2e 7e |",11,,al|ias$+".~|
|00001c30| 7a 7e 22 0d 0d 66 34 20 | c8 99 20 22 57 69 6d 70 |z~"..f4 |.. "Wimp|
|00001c40| 5f 52 65 61 64 50 69 78 | 54 72 61 6e 73 22 2c 26 |_ReadPix|Trans",&|
|00001c50| 31 30 30 2c 31 2c 22 7e | 7a 7e 22 2c 2c 2c 2c 7a |100,1,"~|z~",,,,z|
|00001c60| 25 2c 7a 25 2b 33 32 0d | 0d 70 1e 20 e7 20 7a 25 |%,z%+32.|.p. . z%|
|00001c70| 21 34 2f 7a 25 21 31 32 | 3e 31 20 8c 20 68 24 2b |!4/z%!12|>1 . h$+|
|00001c80| 3d 22 32 32 22 0d 0d 7a | 1e 20 c8 99 20 22 57 69 |="22"..z|. .. "Wi|
|00001c90| 6d 70 5f 53 70 72 69 74 | 65 4f 70 22 2c 31 31 2c |mp_Sprit|eOp",11,|
|00001ca0| 2c 68 24 0d 0d 84 14 3d | a4 63 6f 6e 28 a0 28 22 |,h$....=|.con(.("|
|00001cb0| 26 22 2b 66 24 29 29 0d | 0d 8e 05 3a 0d 0d 98 10 |&"+f$)).|...:....|
|00001cc0| dd 20 a4 76 61 6c 69 64 | 28 66 24 29 0d 0d a2 11 |. .valid|(f$)....|
|00001cd0| f4 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 0d 0d ac |. ======|=====...|
|00001ce0| 12 20 ea 20 69 25 2c 76 | 24 3a 76 24 3d 22 22 0d |. . i%,v|$:v$="".|
|00001cf0| 0d b6 0f 20 e3 20 69 25 | 3d 31 20 b8 20 33 0d 0d |... . i%|=1 . 3..|
|00001d00| c0 24 20 e7 20 a7 68 78 | 32 24 2c c1 66 24 2c 69 |.$ . .hx|2$,.f$,i|
|00001d10| 25 2c 31 29 29 3d 30 20 | 8c 20 76 24 3d 22 78 78 |%,1))=0 |. v$="xx|
|00001d20| 78 22 0d 0d ca 06 20 ed | 0d 0d d4 14 20 e7 20 a9 |x".... .|.... . .|
|00001d30| 66 24 3e 33 20 8c 20 76 | 24 3d 66 24 0d 0d de 07 |f$>3 . v|$=f$....|
|00001d40| 3d 76 24 0d 0d e8 05 3a | 0d 0d f2 0d dd 20 f2 73 |=v$....:|..... .s|
|00001d50| 65 61 72 63 68 0d 0d fc | 10 f4 20 3d 3d 3d 3d 3d |earch...|.. =====|
|00001d60| 3d 3d 3d 3d 3d 0d 0e 06 | 28 20 ea 20 6f 6b 25 2c |=====...|( . ok%,|
|00001d70| 69 25 2c 6a 25 2c 6b 25 | 2c 6c 25 2c 6d 25 2c 6e |i%,j%,k%|,l%,m%,n|
|00001d80| 25 2c 6f 25 2c 70 25 2c | 61 24 2c 73 24 0d 0e 10 |%,o%,p%,|a$,s$...|
|00001d90| 23 20 6f 6b 25 3d 30 3a | 6e 25 3d 30 3a 6d 25 3d |# ok%=0:|n%=0:m%=|
|00001da0| 32 3a 61 24 3d 68 78 31 | 24 3a 71 25 3d 26 32 30 |2:a$=hx1|$:q%=&20|
|00001db0| 0d 0e 1a 17 20 f2 77 72 | 69 74 65 28 22 22 2c 73 |.... .wr|ite("",s|
|00001dc0| 72 63 68 25 2c 33 29 0d | 0e 24 19 20 73 24 3d 24 |rch%,3).|.$. s$=$|
|00001dd0| 28 a4 72 65 61 64 28 73 | 72 63 68 25 2c 32 29 29 |(.read(s|rch%,2))|
|00001de0| 0d 0e 2e 1d 20 e7 20 73 | 72 24 3d 73 24 20 8c 20 |.... . s|r$=s$ . |
|00001df0| 6e 25 3d 31 20 8b 20 73 | 72 24 3d 73 24 0d 0e 38 |n%=1 . s|r$=s$..8|
|00001e00| 29 20 70 25 3d 97 73 24 | 3a 73 24 3d c2 73 24 2c |) p%=.s$|:s$=.s$,|
|00001e10| a9 73 24 2d 31 29 3a 24 | 73 74 30 25 3d 73 24 3a |.s$-1):$|st0%=s$:|
|00001e20| 6c 25 3d a9 73 24 0d 0e | 42 0f 20 e7 20 73 24 3c |l%=.s$..|B. . s$<|
|00001e30| 3e 22 22 20 8c 0d 0e 4c | 10 20 e3 20 69 25 3d 31 |>"" ...L|. . i%=1|
|00001e40| 20 b8 20 31 37 0d 0e 56 | 18 20 f2 67 65 74 5f 63 | . 17..V|. .get_c|
|00001e50| 73 76 28 c1 61 24 2c 69 | 25 2c 31 29 29 0d 0e 60 |sv(.a$,i|%,1))..`|
|00001e60| 1f 20 e3 20 6a 25 3d 64 | 61 74 61 25 20 b8 20 64 |. . j%=d|ata% . d|
|00001e70| 61 74 61 25 2b 63 73 76 | 6c 25 2d 31 0d 0e 6a 30 |ata%+csv|l%-1..j0|
|00001e80| 20 e7 20 3f 6a 25 3d 26 | 30 41 20 8c 20 21 73 74 | . ?j%=&|0A . !st|
|00001e90| 31 25 3d 6a 25 21 31 3a | e7 20 24 73 74 31 25 3e |1%=j%!1:|. $st1%>|
|00001ea0| 24 73 74 32 25 20 8c 20 | 6d 25 3d 30 0d 0e 74 1f |$st2% . |m%=0..t.|
|00001eb0| 20 e7 20 28 3f 6a 25 20 | 84 20 63 73 25 29 3d 28 | . (?j% |. cs%)=(|
|00001ec0| 70 25 20 84 20 63 73 25 | 29 20 8c 0d 0e 7e 12 20 |p% . cs%|) ...~. |
|00001ed0| 6f 6b 25 3d 31 3a 6f 25 | 3d 73 74 30 25 0d 0e 88 |ok%=1:o%|=st0%...|
|00001ee0| 10 20 e3 20 6b 25 3d 31 | 20 b8 20 6c 25 0d 0e 92 |. . k%=1| . l%...|
|00001ef0| 37 20 e7 20 28 6a 25 3f | 6b 25 20 84 20 63 73 25 |7 . (j%?|k% . cs%|
|00001f00| 29 3c 3e 28 3f 6f 25 20 | 84 20 63 73 25 29 20 8c |)<>(?o% |. cs%) .|
|00001f10| 20 6f 6b 25 3d 30 3a 6b | 25 3d 6c 25 20 8b 20 6f | ok%=0:k|%=l% . o|
|00001f20| 25 2b 3d 31 0d 0e 9c 06 | 20 ed 0d 0e a6 1a 20 e7 |%+=1....| ..... .|
|00001f30| 20 6f 6b 25 2b 6e 25 2b | 6d 25 3d 34 20 8c 20 6f | ok%+n%+|m%=4 . o|
|00001f40| 6b 25 3d 30 0d 0e b0 2f | 20 e7 20 6f 6b 25 3d 31 |k%=0.../| . ok%=1|
|00001f50| 20 8c 20 69 25 3d 31 37 | 3a 6a 25 3d 64 61 74 61 | . i%=17|:j%=data|
|00001f60| 25 2b 63 73 76 6c 25 3a | 21 73 74 32 25 3d 21 73 |%+csvl%:|!st2%=!s|
|00001f70| 74 31 25 0d 0e ba 06 20 | cd 0d 0e c4 06 20 ed 0d |t1%.... |..... ..|
|00001f80| 0e ce 06 20 ed 0d 0e d8 | 28 20 73 24 3d 24 28 73 |... ....|( s$=$(s|
|00001f90| 74 31 25 2b 31 29 3a f2 | 77 72 69 74 65 28 22 26 |t1%+1):.|write("&|
|00001fa0| 22 2b 73 24 2c 73 72 63 | 68 25 2c 33 29 0d 0e e2 |"+s$,src|h%,3)...|
|00001fb0| 33 20 e7 20 6f 6b 25 3d | 30 20 8c 20 73 24 3d 66 |3 . ok%=|0 . s$=f|
|00001fc0| 69 6c 65 24 3a f2 77 72 | 69 74 65 28 22 4e 6f 74 |ile$:.wr|ite("Not|
|00001fd0| 20 66 6f 75 6e 64 22 2c | 73 72 63 68 25 2c 33 29 | found",|srch%,3)|
|00001fe0| 0d 0e ec 1a 20 e7 20 6f | 6b 25 3d 31 20 84 20 66 |.... . o|k%=1 . f|
|00001ff0| 69 6c 65 24 3c 3e 22 22 | 20 8c 0d 0e f6 13 20 66 |ile$<>""| ..... f|
|00002000| 69 6c 65 24 3d a4 68 65 | 78 28 73 24 29 0d 0f 00 |ile$=.he|x(s$)...|
|00002010| 14 20 f2 67 65 74 5f 63 | 73 76 28 66 69 6c 65 24 |. .get_c|sv(file$|
|00002020| 29 0d 0f 0a 19 20 f2 73 | 68 6f 77 5f 69 6e 66 6f |).... .s|how_info|
|00002030| 28 66 69 6c 65 24 2c 22 | 22 29 0d 0f 14 06 20 cd |(file$,"|").... .|
|00002040| 0d 0f 1e 06 20 cd 0d 0f | 28 05 e1 0d 0f 32 05 3a |.... ...|(....2.:|
|00002050| 0d 0f 3c 0b dd 20 f2 63 | 61 73 65 0d 0f 46 0e f4 |..<.. .c|ase..F..|
|00002060| 20 3d 3d 3d 3d 3d 3d 3d | 3d 0d 0f 50 0e 20 e7 20 | =======|=..P. . |
|00002070| 63 73 25 3d 30 20 8c 0d | 0f 5a 1c 20 63 73 25 3d |cs%=0 ..|.Z. cs%=|
|00002080| 26 32 30 3a f2 73 65 74 | 28 73 72 63 68 25 2c 34 |&20:.set|(srch%,4|
|00002090| 2c 30 29 0d 0f 64 06 20 | cc 0d 0f 6e 1a 20 63 73 |,0)..d. |...n. cs|
|000020a0| 25 3d 30 3a f2 73 65 74 | 28 73 72 63 68 25 2c 34 |%=0:.set|(srch%,4|
|000020b0| 2c 31 29 0d 0f 78 06 20 | cd 0d 0f 82 05 e1 0d 0f |,1)..x. |........|
|000020c0| 8c 05 3a 0d 0f 96 46 22 | ab ab ab ab ab ab ab ab |..:...F"|........|
|000020d0| ab ab ab ab ab ab ab ab | ab ab ab ab ab ab ab ab |........|........|
|000020e0| ab ab 20 46 69 6c 65 72 | 20 50 72 6f 63 65 64 75 |.. Filer| Procedu|
|000020f0| 72 65 73 20 bb bb bb bb | bb bb bb bb bb bb bb bb |res ....|........|
|00002100| bb bb bb bb bb bb bb bb | bb 0d 0f a0 05 3a 0d 0f |........|.....:..|
|00002110| aa 12 dd 20 f2 72 65 63 | 65 69 76 65 28 72 25 29 |... .rec|eive(r%)|
|00002120| 0d 0f b4 15 f4 20 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..... ==|========|
|00002130| 3d 3d 3d 3d 3d 0d 0f be | 0c 20 c8 8e 20 72 25 20 |=====...|. .. r% |
|00002140| ca 0d 0f c8 0f 20 c9 20 | 30 3a 20 f2 71 75 69 74 |..... . |0: .quit|
|00002150| 0d 0f d2 2a 20 c9 20 33 | 3a 20 e7 20 62 6c 6b 25 |...* . 3|: . blk%|
|00002160| 21 31 32 3d 30 20 8c 20 | f2 64 61 74 61 6c 6f 61 |!12=0 . |.dataloa|
|00002170| 64 28 62 6c 6b 25 21 34 | 30 29 0d 0f dc 06 20 cb |d(blk%!4|0).... .|
|00002180| 0d 0f e6 05 e1 0d 0f f0 | 05 3a 0d 0f fa 12 dd 20 |........|.:..... |
|00002190| f2 64 61 74 61 6c 6f 61 | 64 28 62 29 0d 10 04 15 |.dataloa|d(b)....|
|000021a0| f4 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |. ======|========|
|000021b0| 3d 0d 10 0e 27 20 62 6c | 6b 25 21 31 32 3d 62 6c |=...' bl|k%!12=bl|
|000021c0| 6b 25 21 38 3a 62 6c 6b | 25 21 31 36 3d 34 3a 62 |k%!8:blk|%!16=4:b|
|000021d0| 6c 6b 25 21 30 3d 36 34 | 0d 10 18 29 20 c8 99 20 |lk%!0=64|...) .. |
|000021e0| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|000021f0| 65 22 2c 31 37 2c 62 6c | 6b 25 2c 62 6c 6b 25 21 |e",17,bl|k%,blk%!|
|00002200| 34 0d 10 22 11 20 f2 6f | 70 65 6e 28 6d 61 69 6e |4..". .o|pen(main|
|00002210| 25 29 0d 10 2c 14 20 66 | 69 6c 65 24 3d a4 68 65 |%)..,. f|ile$=.he|
|00002220| 78 28 c3 7e 62 29 0d 10 | 36 15 20 66 65 72 24 3d |x(.~b)..|6. fer$=|
|00002230| a4 76 61 6c 69 64 28 c3 | 7e 62 29 0d 10 40 14 20 |.valid(.|~b)..@. |
|00002240| f2 67 65 74 5f 63 73 76 | 28 66 69 6c 65 24 29 0d |.get_csv|(file$).|
|00002250| 10 4a 1b 20 f2 73 68 6f | 77 5f 69 6e 66 6f 28 66 |.J. .sho|w_info(f|
|00002260| 69 6c 65 24 2c 66 65 72 | 24 29 0d 10 54 05 e1 0d |ile$,fer|$)..T...|
|00002270| 10 5e 05 3a 0d 10 68 46 | 22 ab ab ab ab ab ab ab |.^.:..hF|".......|
|00002280| ab ab ab ab ab ab ab ab | ab ab ab ab 20 49 63 6f |........|.... Ico|
|00002290| 6e 20 61 6e 64 20 53 70 | 72 69 74 65 20 50 72 6f |n and Sp|rite Pro|
|000022a0| 63 65 64 75 72 65 73 20 | bb bb bb bb bb bb bb bb |cedures |........|
|000022b0| bb bb bb bb bb bb bb bb | bb bb 0d 10 72 05 3a 0d |........|....r.:.|
|000022c0| 10 7c 13 dd 20 f2 69 6e | 69 74 5f 73 70 72 69 74 |.|.. .in|it_sprit|
|000022d0| 65 73 0d 10 86 16 f4 20 | 3d 3d 3d 3d 3d 3d 3d 3d |es..... |========|
|000022e0| 3d 3d 3d 3d 3d 3d 3d 3d | 0d 10 90 1d 20 de 20 69 |========|.... . i|
|000022f0| 73 70 72 20 26 33 34 30 | 30 30 2c 63 73 70 72 20 |spr &340|00,cspr |
|00002300| 26 32 30 30 30 0d 10 9a | 1b 20 21 69 73 70 72 3d |&2000...|. !ispr=|
|00002310| 26 33 34 30 30 30 3a 69 | 73 70 72 21 38 3d 31 36 |&34000:i|spr!8=16|
|00002320| 0d 10 a4 1e 20 c8 99 20 | 22 4f 53 5f 53 70 72 69 |.... .. |"OS_Spri|
|00002330| 74 65 4f 70 22 2c 32 36 | 35 2c 69 73 70 72 0d 10 |teOp",26|5,ispr..|
|00002340| ae 1a 20 21 63 73 70 72 | 3d 26 31 35 30 30 3a 63 |.. !cspr|=&1500:c|
|00002350| 73 70 72 21 38 3d 31 36 | 0d 10 b8 1e 20 c8 99 20 |spr!8=16|.... .. |
|00002360| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 32 36 |"OS_Spri|teOp",26|
|00002370| 35 2c 63 73 70 72 0d 10 | c2 05 e1 0d 10 cc 05 3a |5,cspr..|.......:|
|00002380| 0d 10 d6 12 dd 20 f2 69 | 63 6f 6e 5f 6f 6e 5f 62 |..... .i|con_on_b|
|00002390| 61 72 0d 10 e0 15 f4 20 | 3d 3d 3d 3d 3d 3d 3d 3d |ar..... |========|
|000023a0| 3d 3d 3d 3d 3d 3d 3d 0d | 10 ea 2a 20 21 62 6c 6b |=======.|..* !blk|
|000023b0| 25 3d 2d 31 3a 62 6c 6b | 25 21 34 3d 30 3a 62 6c |%=-1:blk|%!4=0:bl|
|000023c0| 6b 25 21 38 3d 30 3a 62 | 6c 6b 25 21 31 32 3d 36 |k%!8=0:b|lk%!12=6|
|000023d0| 39 0d 10 f4 32 20 62 6c | 6b 25 21 31 36 3d 36 38 |9...2 bl|k%!16=68|
|000023e0| 3a 62 6c 6b 25 21 32 30 | 3d 26 33 30 30 32 3a 24 |:blk%!20|=&3002:$|
|000023f0| 28 62 6c 6b 25 2b 32 34 | 29 3d 22 21 22 2b 6e 61 |(blk%+24|)="!"+na|
|00002400| 6d 65 24 0d 10 fe 25 20 | c8 99 20 22 57 69 6d 70 |me$...% |.. "Wimp|
|00002410| 5f 43 72 65 61 74 65 49 | 63 6f 6e 22 2c 2c 62 6c |_CreateI|con",,bl|
|00002420| 6b 25 20 b8 20 69 63 25 | 0d 11 08 05 e1 0d 11 12 |k% . ic%|........|
|00002430| 05 3a 0d 11 1c 4c dd 20 | a4 72 65 61 64 28 77 25 |.:...L. |.read(w%|
|00002440| 2c 69 25 29 3a 62 75 66 | 25 21 30 3d 77 25 3a 62 |,i%):buf|%!0=w%:b|
|00002450| 75 66 25 21 34 3d 69 25 | 3a c8 99 20 22 57 69 6d |uf%!4=i%|:.. "Wim|
|00002460| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00002470| 2c 62 75 66 25 3a 3d 62 | 75 66 25 21 32 38 0d 11 |,buf%:=b|uf%!28..|
|00002480| 26 05 3a 0d 11 30 3a dd | 20 f2 77 72 69 74 65 28 |&.:..0:.| .write(|
|00002490| 77 24 2c 77 25 2c 69 25 | 29 3a 24 28 a4 72 65 61 |w$,w%,i%|):$(.rea|
|000024a0| 64 28 77 25 2c 69 25 29 | 29 3d 77 24 3a f2 73 68 |d(w%,i%)|)=w$:.sh|
|000024b0| 6f 77 28 77 25 2c 69 25 | 2c 30 29 3a e1 0d 11 3a |ow(w%,i%|,0):...:|
|000024c0| 05 3a 0d 11 44 1a dd 20 | f2 62 65 65 70 3a d4 20 |.:..D.. |.beep:. |
|000024d0| 31 2c 2d 35 2c 32 30 30 | 2c 31 3a e1 0d 11 4e 05 |1,-5,200|,1:...N.|
|000024e0| 3a 0d 11 58 15 dd 20 f2 | 73 68 6f 77 28 77 25 2c |:..X.. .|show(w%,|
|000024f0| 69 25 2c 73 25 29 0d 11 | 62 18 f4 20 3d 3d 3d 3d |i%,s%)..|b.. ====|
|00002500| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 0d 11 |========|======..|
|00002510| 6c 37 20 62 75 66 25 21 | 30 3d 77 25 3a 62 75 66 |l7 buf%!|0=w%:buf|
|00002520| 25 21 34 3d 69 25 3a 62 | 75 66 25 21 38 3d 28 2d |%!4=i%:b|uf%!8=(-|
|00002530| 73 25 29 3c 3c 32 31 3a | 62 75 66 25 21 31 32 3d |s%)<<21:|buf%!12=|
|00002540| 31 3c 3c 32 31 0d 11 76 | 21 20 c8 99 20 22 57 69 |1<<21..v|! .. "Wi|
|00002550| 6d 70 5f 53 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_SetIc|onState"|
|00002560| 2c 2c 62 75 66 25 0d 11 | 80 05 e1 0d 11 8a 05 3a |,,buf%..|.......:|
|00002570| 0d 11 94 15 dd 20 f2 73 | 65 74 28 77 25 2c 69 63 |..... .s|et(w%,ic|
|00002580| 25 2c 73 25 29 0d 11 9e | 18 f4 20 3d 3d 3d 3d 3d |%,s%)...|.. =====|
|00002590| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 0d 11 a8 |========|=====...|
|000025a0| 19 20 62 75 66 25 21 30 | 3d 77 25 3a 62 75 66 25 |. buf%!0|=w%:buf%|
|000025b0| 21 34 3d 69 63 25 0d 11 | b2 20 20 62 75 66 25 21 |!4=ic%..|. buf%!|
|000025c0| 38 3d 73 25 3c 3c 32 31 | 3a 62 75 66 25 21 31 32 |8=s%<<21|:buf%!12|
|000025d0| 3d 31 3c 3c 32 31 0d 11 | bc 21 20 c8 99 20 22 57 |=1<<21..|.! .. "W|
|000025e0| 69 6d 70 5f 53 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_SetI|conState|
|000025f0| 22 2c 2c 62 75 66 25 0d | 11 c6 05 e1 0d 11 d0 05 |",,buf%.|........|
|00002600| 3a 0d 11 da 46 22 ab ab | ab ab ab ab ab ab ab ab |:...F"..|........|
|00002610| ab ab ab ab ab ab ab ab | ab ab ab ab ab ab ab ab |........|........|
|00002620| 20 57 69 6d 70 20 50 72 | 6f 63 65 64 75 72 65 73 | Wimp Pr|ocedures|
|00002630| 20 bb bb bb bb bb bb bb | bb bb bb bb bb bb bb bb | .......|........|
|00002640| bb bb bb bb bb bb bb 0d | 11 e4 05 3a 0d 11 ee 16 |........|...:....|
|00002650| dd 20 f2 69 6e 69 74 5f | 77 69 6d 70 28 61 70 70 |. .init_|wimp(app|
|00002660| 24 29 0d 11 f8 19 f4 20 | 3d 3d 3d 3d 3d 3d 3d 3d |$)..... |========|
|00002670| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0d 12 02 1a 20 |========|===.... |
|00002680| de 20 62 6c 6b 25 20 26 | 33 30 30 2c 62 75 66 25 |. blk% &|300,buf%|
|00002690| 20 26 31 30 30 0d 12 0c | 1c 20 65 72 72 5f 66 6c | &100...|. err_fl|
|000026a0| 67 25 3d 33 3a 24 62 6c | 6b 25 3d 22 54 41 53 4b |g%=3:$bl|k%="TASK|
|000026b0| 22 0d 12 16 31 20 c8 99 | 20 22 57 69 6d 70 5f 49 |"...1 ..| "Wimp_I|
|000026c0| 6e 69 74 69 61 6c 69 73 | 65 22 2c 32 30 30 2c 21 |nitialis|e",200,!|
|000026d0| 62 6c 6b 25 2c 61 70 70 | 24 20 b8 20 2c 74 61 73 |blk%,app|$ . ,tas|
|000026e0| 6b 25 0d 12 20 23 20 c8 | 99 20 22 4d 65 6e 75 55 |k%.. # .|. "MenuU|
|000026f0| 74 69 6c 5f 49 6e 69 74 | 69 61 6c 69 73 65 22 2c |til_Init|ialise",|
|00002700| 30 31 30 2c 30 0d 12 2a | 05 e1 0d 12 34 05 3a 0d |010,0..*|....4.:.|
|00002710| 12 3e 2a dd 20 a4 70 6f | 6c 6c 28 70 25 29 3a c8 |.>*. .po|ll(p%):.|
|00002720| 99 26 34 30 30 43 37 2c | 70 25 2c 62 6c 6b 25 20 |.&400C7,|p%,blk% |
|00002730| b8 20 70 25 3a 20 3d 70 | 25 0d 12 48 05 3a 0d 12 |. p%: =p|%..H.:..|
|00002740| 52 12 dd 20 f2 67 65 74 | 5f 77 69 6e 64 6f 77 73 |R.. .get|_windows|
|00002750| 0d 12 5c 15 f4 20 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..\.. ==|========|
|00002760| 3d 3d 3d 3d 3d 0d 12 66 | 1c 20 de 20 77 73 25 20 |=====..f|. . ws% |
|00002770| 26 39 30 30 3a 77 66 25 | 3d 77 73 25 2b 26 39 30 |&900:wf%|=ws%+&90|
|00002780| 30 0d 12 70 30 20 c8 99 | 20 22 57 69 6d 70 5f 4f |0..p0 ..| "Wimp_O|
|00002790| 70 65 6e 54 65 6d 70 6c | 61 74 65 22 2c 2c 61 6c |penTempl|ate",,al|
|000027a0| 69 61 73 24 2b 22 2e 54 | 65 6d 70 6c 61 74 65 73 |ias$+".T|emplates|
|000027b0| 22 0d 12 7a 3e 20 c8 99 | 20 22 57 69 6d 70 5f 4c |"..z> ..| "Wimp_L|
|000027c0| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 64 61 |oadTempl|ate",,da|
|000027d0| 74 61 25 2c 77 73 25 2c | 77 66 25 2c 2d 31 2c 22 |ta%,ws%,|wf%,-1,"|
|000027e0| 69 6e 66 6f 22 2c 30 20 | b8 20 2c 2c 77 73 25 0d |info",0 |. ,,ws%.|
|000027f0| 12 84 22 20 24 28 64 61 | 74 61 25 21 28 38 38 2b |.." $(da|ta%!(88+|
|00002800| 28 33 2a 33 32 29 2b 32 | 30 29 29 3d 76 65 72 73 |(3*32)+2|0))=vers|
|00002810| 24 0d 12 8e 2a 20 c8 99 | 20 22 57 69 6d 70 5f 43 |$...* ..| "Wimp_C|
|00002820| 72 65 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 64 61 |reateWin|dow",,da|
|00002830| 74 61 25 20 b8 20 69 6e | 66 6f 25 0d 12 98 3e 20 |ta% . in|fo%...> |
|00002840| c8 99 20 22 57 69 6d 70 | 5f 4c 6f 61 64 54 65 6d |.. "Wimp|_LoadTem|
|00002850| 70 6c 61 74 65 22 2c 2c | 64 61 74 61 25 2c 77 73 |plate",,|data%,ws|
|00002860| 25 2c 77 66 25 2c 2d 31 | 2c 22 6d 61 69 6e 22 2c |%,wf%,-1|,"main",|
|00002870| 30 20 b8 20 2c 2c 77 73 | 25 0d 12 a2 2a 20 c8 99 |0 . ,,ws|%...* ..|
|00002880| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e | "Wimp_C|reateWin|
|00002890| 64 6f 77 22 2c 2c 64 61 | 74 61 25 20 b8 20 6d 61 |dow",,da|ta% . ma|
|000028a0| 69 6e 25 0d 12 ac 3e 20 | c8 99 20 22 57 69 6d 70 |in%...> |.. "Wimp|
|000028b0| 5f 4c 6f 61 64 54 65 6d | 70 6c 61 74 65 22 2c 2c |_LoadTem|plate",,|
|000028c0| 64 61 74 61 25 2c 77 73 | 25 2c 77 66 25 2c 2d 31 |data%,ws|%,wf%,-1|
|000028d0| 2c 22 73 72 63 68 22 2c | 30 20 b8 20 2c 2c 77 73 |,"srch",|0 . ,,ws|
|000028e0| 25 0d 12 b6 2a 20 c8 99 | 20 22 57 69 6d 70 5f 43 |%...* ..| "Wimp_C|
|000028f0| 72 65 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 64 61 |reateWin|dow",,da|
|00002900| 74 61 25 20 b8 20 73 72 | 63 68 25 0d 12 c0 3e 20 |ta% . sr|ch%...> |
|00002910| c8 99 20 22 57 69 6d 70 | 5f 4c 6f 61 64 54 65 6d |.. "Wimp|_LoadTem|
|00002920| 70 6c 61 74 65 22 2c 2c | 64 61 74 61 25 2c 77 73 |plate",,|data%,ws|
|00002930| 25 2c 77 66 25 2c 2d 31 | 2c 22 6b 65 79 70 22 2c |%,wf%,-1|,"keyp",|
|00002940| 30 20 b8 20 2c 2c 77 73 | 25 0d 12 ca 2a 20 c8 99 |0 . ,,ws|%...* ..|
|00002950| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e | "Wimp_C|reateWin|
|00002960| 64 6f 77 22 2c 2c 64 61 | 74 61 25 20 b8 20 6b 65 |dow",,da|ta% . ke|
|00002970| 79 70 25 0d 12 d4 1c 20 | c8 99 20 22 57 69 6d 70 |yp%.... |.. "Wimp|
|00002980| 5f 43 6c 6f 73 65 54 65 | 6d 70 6c 61 74 65 22 0d |_CloseTe|mplate".|
|00002990| 12 de 05 e1 0d 12 e8 05 | 3a 0d 12 f2 0a dd 20 f2 |........|:..... .|
|000029a0| 77 69 6e 0d 12 fc 0d f4 | 20 3d 3d 3d 3d 3d 3d 3d |win.....| =======|
|000029b0| 0d 13 06 15 20 e7 20 62 | 6c 6b 25 21 30 3d 6d 61 |.... . b|lk%!0=ma|
|000029c0| 69 6e 25 20 8c 0d 13 10 | 1a 20 78 6f 25 3d 62 6c |in% ....|. xo%=bl|
|000029d0| 6b 25 21 34 3a 79 6f 25 | 3d 62 6c 6b 25 21 38 0d |k%!4:yo%|=blk%!8.|
|000029e0| 13 1a 1c 20 78 6d 25 3d | 62 6c 6b 25 21 31 32 3a |... xm%=|blk%!12:|
|000029f0| 79 6d 25 3d 62 6c 6b 25 | 21 31 36 0d 13 24 10 20 |ym%=blk%|!16..$. |
|00002a00| e7 20 6b 65 79 66 25 3d | b9 20 8c 0d 13 2e 11 20 |. keyf%=|. ..... |
|00002a10| 62 6c 6b 25 21 30 3d 6b | 65 79 70 25 0d 13 38 23 |blk%!0=k|eyp%..8#|
|00002a20| 20 62 6c 6b 25 21 34 3d | 78 6f 25 2b 32 33 38 3a | blk%!4=|xo%+238:|
|00002a30| 62 6c 6b 25 21 31 32 3d | 78 6f 25 2b 34 34 34 0d |blk%!12=|xo%+444.|
|00002a40| 13 42 23 20 62 6c 6b 25 | 21 38 3d 79 6f 25 2b 33 |.B# blk%|!8=yo%+3|
|00002a50| 34 30 3a 62 6c 6b 25 21 | 31 36 3d 79 6f 25 2b 36 |40:blk%!|16=yo%+6|
|00002a60| 33 32 0d 13 4c 1f 20 c8 | 99 20 22 57 69 6d 70 5f |32..L. .|. "Wimp_|
|00002a70| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6b |OpenWind|ow",,blk|
|00002a80| 25 0d 13 56 12 20 62 6c | 6b 25 21 32 38 3d 6b 65 |%..V. bl|k%!28=ke|
|00002a90| 79 70 25 0d 13 60 06 20 | cd 0d 13 6a 27 20 62 6c |yp%..`. |...j' bl|
|00002aa0| 6b 25 21 30 3d 6d 61 69 | 6e 25 3a 62 6c 6b 25 21 |k%!0=mai|n%:blk%!|
|00002ab0| 34 3d 78 6f 25 3a 62 6c | 6b 25 21 38 3d 79 6f 25 |4=xo%:bl|k%!8=yo%|
|00002ac0| 0d 13 74 1c 20 62 6c 6b | 25 21 31 32 3d 78 6d 25 |..t. blk|%!12=xm%|
|00002ad0| 3a 62 6c 6b 25 21 31 36 | 3d 79 6d 25 0d 13 7e 06 |:blk%!16|=ym%..~.|
|00002ae0| 20 cd 0d 13 88 1f 20 c8 | 99 20 22 57 69 6d 70 5f | ..... .|. "Wimp_|
|00002af0| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6b |OpenWind|ow",,blk|
|00002b00| 25 0d 13 92 05 e1 0d 13 | 9c 05 3a 0d 13 a6 0f dd |%.......|..:.....|
|00002b10| 20 f2 6f 70 65 6e 28 48 | 25 29 0d 13 b0 12 f4 20 | .open(H|%)..... |
|00002b20| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 0d 13 ba 0e |========|====....|
|00002b30| 20 62 6c 6b 25 21 30 3d | 48 25 0d 13 c4 24 20 c8 | blk%!0=|H%...$ .|
|00002b40| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00002b50| 77 53 74 61 74 65 22 2c | 30 2c 62 6c 6b 25 0d 13 |wState",|0,blk%..|
|00002b60| ce 11 20 e7 20 48 25 3d | 6b 65 79 70 25 20 8c 0d |.. . H%=|keyp% ..|
|00002b70| 13 d8 11 20 62 75 66 25 | 21 30 3d 6d 61 69 6e 25 |... buf%|!0=main%|
|00002b80| 0d 13 e2 24 20 c8 99 20 | 22 57 69 6d 70 5f 47 65 |...$ .. |"Wimp_Ge|
|00002b90| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 30 2c |tWindowS|tate",0,|
|00002ba0| 62 75 66 25 0d 13 ec 1a | 20 78 6f 25 3d 62 75 66 |buf%....| xo%=buf|
|00002bb0| 25 21 34 3a 79 6f 25 3d | 62 75 66 25 21 38 0d 13 |%!4:yo%=|buf%!8..|
|00002bc0| f6 23 20 62 6c 6b 25 21 | 34 3d 78 6f 25 2b 32 33 |.# blk%!|4=xo%+23|
|00002bd0| 38 3a 62 6c 6b 25 21 31 | 32 3d 78 6f 25 2b 34 34 |8:blk%!1|2=xo%+44|
|00002be0| 34 0d 14 00 23 20 62 6c | 6b 25 21 38 3d 79 6f 25 |4...# bl|k%!8=yo%|
|00002bf0| 2b 33 34 30 3a 62 6c 6b | 25 21 31 36 3d 79 6f 25 |+340:blk|%!16=yo%|
|00002c00| 2b 36 33 32 0d 14 0a 06 | 20 cd 0d 14 14 0f 20 62 |+632....| ..... b|
|00002c10| 6c 6b 25 21 32 38 3d 2d | 31 0d 14 1e 20 20 c8 99 |lk%!28=-|1... ..|
|00002c20| 20 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f | "Wimp_O|penWindo|
|00002c30| 77 22 2c 30 2c 62 6c 6b | 25 0d 14 28 05 e1 0d 14 |w",0,blk|%..(....|
|00002c40| 32 05 3a 0d 14 3c 10 dd | 20 f2 63 6c 6f 73 65 28 |2.:..<..| .close(|
|00002c50| 48 25 29 0d 14 46 13 f4 | 20 3d 3d 3d 3d 3d 3d 3d |H%)..F..| =======|
|00002c60| 3d 3d 3d 3d 3d 3d 0d 14 | 50 0e 20 62 6c 6b 25 21 |======..|P. blk%!|
|00002c70| 30 3d 48 25 0d 14 5a 21 | 20 c8 99 20 22 57 69 6d |0=H%..Z!| .. "Wim|
|00002c80| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 30 |p_CloseW|indow",0|
|00002c90| 2c 62 6c 6b 25 0d 14 64 | 11 20 e7 20 48 25 3d 6d |,blk%..d|. . H%=m|
|00002ca0| 61 69 6e 25 20 8c 0d 14 | 6e 11 20 62 6c 6b 25 21 |ain% ...|n. blk%!|
|00002cb0| 30 3d 6b 65 79 70 25 0d | 14 78 21 20 c8 99 20 22 |0=keyp%.|.x! .. "|
|00002cc0| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00002cd0| 22 2c 30 2c 62 6c 6b 25 | 0d 14 82 06 20 cd 0d 14 |",0,blk%|.... ...|
|00002ce0| 8c 1c 20 62 6c 6b 25 21 | 30 3d 6d 61 69 6e 25 3a |.. blk%!|0=main%:|
|00002cf0| 62 6c 6b 25 21 31 36 3d | 2d 31 0d 14 96 05 e1 0d |blk%!16=|-1......|
|00002d00| 14 a0 05 3a 0d 14 aa 11 | dd 20 f2 72 65 64 72 61 |...:....|. .redra|
|00002d10| 77 28 48 25 29 0d 14 b4 | 14 f4 20 3d 3d 3d 3d 3d |w(H%)...|.. =====|
|00002d20| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 0d 14 be 16 20 ea 20 |========|=.... . |
|00002d30| 6d 6f 72 65 25 3a 62 6c | 6b 25 21 30 3d 48 25 0d |more%:bl|k%!0=H%.|
|00002d40| 14 c8 29 20 c8 99 20 22 | 57 69 6d 70 5f 52 65 64 |..) .. "|Wimp_Red|
|00002d50| 72 61 77 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6b 25 |rawWindo|w",,blk%|
|00002d60| 20 b8 20 6d 6f 72 65 25 | 0d 14 d2 0d 20 c8 95 20 | . more%|.... .. |
|00002d70| 6d 6f 72 65 25 0d 14 dc | 29 20 c8 99 20 22 57 69 |more%...|) .. "Wi|
|00002d80| 6d 70 5f 47 65 74 52 65 | 63 74 61 6e 67 6c 65 22 |mp_GetRe|ctangle"|
|00002d90| 2c 2c 62 6c 6b 25 20 b8 | 20 6d 6f 72 65 25 0d 14 |,,blk% .| more%..|
|00002da0| e6 06 20 ce 0d 14 f0 05 | e1 0d 14 fa 05 3a 0d 15 |.. .....|.....:..|
|00002db0| 04 46 22 ab ab ab ab ab | ab ab ab ab ab ab ab ab |.F".....|........|
|00002dc0| ab ab ab ab ab ab ab ab | ab ab ab ab ab 20 41 73 |........|..... As|
|00002dd0| 73 6d 20 50 72 6f 63 65 | 64 75 72 65 73 20 bb bb |sm Proce|dures ..|
|00002de0| bb bb bb bb bb bb bb bb | bb bb bb bb bb bb bb bb |........|........|
|00002df0| bb bb bb bb 0d 15 0e 05 | 3a 0d 15 18 0b dd 20 f2 |........|:..... .|
|00002e00| 61 73 73 6d 0d 15 22 0e | f4 20 3d 3d 3d 3d 3d 3d |assm..".|. ======|
|00002e10| 3d 3d 0d 15 2c 09 20 ea | 20 69 25 0d 15 36 10 20 |==..,. .| i%..6. |
|00002e20| de 20 63 6f 64 65 20 31 | 30 30 30 0d 15 40 14 20 |. code 1|000..@. |
|00002e30| 74 79 70 65 62 75 66 3d | 30 3a 6c 65 6e 3d 31 0d |typebuf=|0:len=1.|
|00002e40| 15 4a 13 20 63 73 76 3d | 32 3a 61 6c 74 62 75 66 |.J. csv=|2:altbuf|
|00002e50| 3d 33 0d 15 54 17 20 74 | 6d 70 3d 34 3a 70 74 72 |=3..T. t|mp=4:ptr|
|00002e60| 3d 35 3a 61 6e 73 77 3d | 30 0d 15 5e 13 20 66 31 |=5:answ=|0..^. f1|
|00002e70| 3d 36 3a 66 32 3d 37 3a | 66 33 3d 38 0d 15 68 15 |=6:f2=7:|f3=8..h.|
|00002e80| 20 74 31 3d 39 3a 74 32 | 3d 31 30 3a 74 33 3d 31 | t1=9:t2|=10:t3=1|
|00002e90| 31 0d 15 72 16 20 e3 20 | 70 61 73 73 25 3d 30 20 |1..r. . |pass%=0 |
|00002ea0| b8 20 32 20 88 20 32 0d | 15 7c 0c 20 50 25 3d 63 |. 2 . 2.|.|. P%=c|
|00002eb0| 6f 64 65 0d 15 86 0f 20 | 5b 4f 50 54 20 70 61 73 |ode.... |[OPT pas|
|00002ec0| 73 25 0d 15 90 05 3b 0d | 15 9a 32 3b 2d 2d 2d 2d |s%....;.|..2;----|
|00002ed0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002ee0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 15 a4 11 3b 20 20 |--------|-....; |
|00002f00| 4f 6e 20 65 6e 74 72 79 | 20 2d 0d 15 ae 2b 3b 20 |On entry| -...+; |
|00002f10| 20 20 20 52 30 20 69 73 | 20 61 64 64 72 65 73 73 | R0 is| address|
|00002f20| 20 6f 66 20 66 69 6c 65 | 74 79 70 65 20 72 65 71 | of file|type req|
|00002f30| 75 69 72 65 64 0d 15 b8 | 21 3b 20 20 20 20 52 31 |uired...|!; R1|
|00002f40| 20 69 73 20 6c 65 6e 67 | 74 68 20 6f 66 20 64 61 | is leng|th of da|
|00002f50| 74 61 66 69 6c 65 0d 15 | c2 22 3b 20 20 20 20 52 |tafile..|."; R|
|00002f60| 32 20 69 73 20 61 64 64 | 72 65 73 73 20 6f 66 20 |2 is add|ress of |
|00002f70| 64 61 74 61 66 69 6c 65 | 0d 15 cc 2c 3b 20 20 20 |datafile|...,; |
|00002f80| 20 52 33 20 69 73 20 61 | 64 64 72 65 73 73 20 6f | R3 is a|ddress o|
|00002f90| 66 20 6f 75 74 70 75 74 | 20 64 61 74 61 20 62 75 |f output| data bu|
|00002fa0| 66 66 65 72 0d 15 d6 10 | 3b 20 20 4f 6e 20 65 78 |ffer....|; On ex|
|00002fb0| 69 74 20 2d 0d 15 e0 33 | 3b 20 20 20 20 52 30 20 |it -...3|; R0 |
|00002fc0| 69 73 20 20 20 6e 75 6d | 62 65 72 20 6f 66 20 6d |is num|ber of m|
|00002fd0| 61 74 63 68 65 73 20 66 | 6f 75 6e 64 20 66 6f 72 |atches f|ound for|
|00002fe0| 20 27 66 69 6e 64 27 0d | 15 ea 30 3b 20 20 20 20 | 'find'.|..0; |
|00002ff0| 20 20 20 6f 72 20 20 20 | 6e 65 78 74 20 6b 6e 6f | or |next kno|
|00003000| 77 6e 20 66 69 6c 65 74 | 79 70 65 20 66 6f 72 20 |wn filet|ype for |
|00003010| 27 66 69 6e 64 78 27 0d | 15 f4 05 3b 0d 15 fe 09 |'findx'.|...;....|
|00003020| 2e 66 69 6e 64 0d 16 08 | 1c 20 53 54 4d 46 44 20 |.find...|. STMFD |
|00003030| 52 31 33 21 2c 7b 52 35 | 2d 52 31 32 2c 52 31 34 |R13!,{R5|-R12,R14|
|00003040| 7d 0d 16 12 20 20 4c 44 | 52 42 20 74 31 2c 5b 74 |}... LD|RB t1,[t|
|00003050| 79 70 65 62 75 66 2c 23 | 30 5d 20 20 20 20 3b 20 |ypebuf,#|0] ; |
|00003060| 5c 0d 16 1c 21 20 4c 44 | 52 42 20 74 32 2c 5b 74 |\...! LD|RB t2,[t|
|00003070| 79 70 65 62 75 66 2c 23 | 31 5d 20 20 20 20 3b 20 |ypebuf,#|1] ; |
|00003080| 20 5c 0d 16 26 31 20 4c | 44 52 42 20 74 33 2c 5b | \..&1 L|DRB t3,[|
|00003090| 74 79 70 65 62 75 66 2c | 23 32 5d 20 20 20 20 3b |typebuf,|#2] ;|
|000030a0| 20 20 67 65 74 20 66 69 | 6c 65 74 79 70 65 20 64 | get fi|letype d|
|000030b0| 61 74 61 0d 16 30 31 20 | 84 52 20 74 31 2c 74 31 |ata..01 |.R t1,t1|
|000030c0| 2c 23 26 32 30 20 20 20 | 20 20 20 20 20 20 20 3b |,#&20 | ;|
|000030d0| 20 20 61 6e 64 20 6d 61 | 6b 65 20 6c 6f 77 65 72 | and ma|ke lower|
|000030e0| 63 61 73 65 0d 16 3a 20 | 20 84 52 20 74 32 2c 74 |case..: | .R t2,t|
|000030f0| 32 2c 23 26 32 30 20 20 | 20 20 20 20 20 20 20 20 |2,#&20 | |
|00003100| 3b 20 20 2f 0d 16 44 1f | 20 84 52 20 74 33 2c 74 |; /..D.| .R t3,t|
|00003110| 33 2c 23 26 32 30 20 20 | 20 20 20 20 20 20 20 20 |3,#&20 | |
|00003120| 3b 20 2f 0d 16 4e 1e 20 | 4d 4f 56 20 70 74 72 2c |; /..N. |MOV ptr,|
|00003130| 23 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |#0 | |
|00003140| 3b 0d 16 58 1e 20 4d 4f | 56 20 61 6e 73 77 2c 23 |;..X. MO|V answ,#|
|00003150| 30 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 0d |0 | ;.|
|00003160| 16 62 1e 2e 6c 6f 6f 70 | 20 20 20 20 20 20 20 20 |.b..loop| |
|00003170| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 0d 16 6c | | ;..l|
|00003180| 2c 20 43 4d 50 20 70 74 | 72 2c 6c 65 6e 20 20 20 |, CMP pt|r,len |
|00003190| 20 20 20 20 20 20 20 20 | 20 20 3b 20 20 65 6e 64 | | ; end|
|000031a0| 20 6f 66 20 64 61 74 61 | 3f 0d 16 76 2d 20 42 43 | of data|?..v- BC|
|000031b0| 53 20 65 6e 64 20 20 20 | 20 20 20 20 20 20 20 20 |S end | |
|000031c0| 20 20 20 20 20 20 3b 20 | 20 66 69 6e 69 73 68 20 | ; | finish |
|000031d0| 69 66 20 79 65 73 0d 16 | 80 31 20 41 44 44 20 70 |if yes..|.1 ADD p|
|000031e0| 74 72 2c 70 74 72 2c 23 | 31 20 20 20 20 20 20 20 |tr,ptr,#|1 |
|000031f0| 20 20 20 3b 20 20 69 6e | 63 72 65 6d 65 6e 74 20 | ; in|crement |
|00003200| 70 6f 69 6e 74 65 72 0d | 16 8a 28 20 4c 44 52 42 |pointer.|..( LDRB|
|00003210| 20 74 6d 70 2c 5b 63 73 | 76 2c 23 31 5d 21 20 20 | tmp,[cs|v,#1]! |
|00003220| 20 20 20 20 3b 20 20 67 | 65 74 20 62 79 74 65 0d | ; g|et byte.|
|00003230| 16 94 32 20 43 4d 50 20 | 74 6d 70 2c 23 26 30 41 |..2 CMP |tmp,#&0A|
|00003240| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 20 20 69 | | ; i|
|00003250| 73 20 69 74 20 65 6e 64 | 20 6f 66 20 6c 69 6e 65 |s it end| of line|
|00003260| 3f 0d 16 9e 2b 20 42 4e | 45 20 6c 6f 6f 70 20 20 |?...+ BN|E loop |
|00003270| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 20 | | ; |
|00003280| 20 6c 6f 6f 70 20 69 66 | 20 6e 6f 74 0d 16 a8 31 | loop if| not...1|
|00003290| 20 41 44 44 20 70 74 72 | 2c 70 74 72 2c 23 34 20 | ADD ptr|,ptr,#4 |
|000032a0| 20 20 20 20 20 20 20 20 | 20 3b 20 20 69 6e 63 72 | | ; incr|
|000032b0| 65 6d 65 6e 74 20 70 6f | 69 6e 74 65 72 0d 16 b2 |ement po|inter...|
|000032c0| 2d 20 4c 44 52 42 20 66 | 31 2c 5b 63 73 76 2c 23 |- LDRB f|1,[csv,#|
|000032d0| 31 5d 21 20 20 20 20 20 | 20 20 3b 20 20 6a 75 6d |1]! | ; jum|
|000032e0| 70 20 6f 76 65 72 20 27 | 26 27 0d 16 bc 20 20 4c |p over '|&'... L|
|000032f0| 44 52 42 20 66 31 2c 5b | 63 73 76 2c 23 31 5d 21 |DRB f1,[|csv,#1]!|
|00003300| 20 20 20 20 20 20 20 3b | 20 5c 0d 16 c6 21 20 4c | ;| \...! L|
|00003310| 44 52 42 20 66 32 2c 5b | 63 73 76 2c 23 31 5d 21 |DRB f2,[|csv,#1]!|
|00003320| 20 20 20 20 20 20 20 3b | 20 20 5c 0d 16 d0 33 20 | ;| \...3 |
|00003330| 4c 44 52 42 20 66 33 2c | 5b 63 73 76 2c 23 31 5d |LDRB f3,|[csv,#1]|
|00003340| 21 20 20 20 20 20 20 20 | 3b 20 20 67 65 74 20 33 |! |; get 3|
|00003350| 20 62 79 74 65 20 66 69 | 6c 65 74 79 70 65 0d 16 | byte fi|letype..|
|00003360| da 31 20 84 52 20 66 31 | 2c 66 31 2c 23 26 32 30 |.1 .R f1|,f1,#&20|
|00003370| 20 20 20 20 20 20 20 20 | 20 20 3b 20 20 61 6e 64 | | ; and|
|00003380| 20 6d 61 6b 65 20 6c 6f | 77 65 72 63 61 73 65 0d | make lo|wercase.|
|00003390| 16 e4 20 20 84 52 20 66 | 32 2c 66 32 2c 23 26 32 |.. .R f|2,f2,#&2|
|000033a0| 30 20 20 20 20 20 20 20 | 20 20 20 3b 20 20 2f 0d |0 | ; /.|
|000033b0| 16 ee 1f 20 84 52 20 66 | 33 2c 66 33 2c 23 26 32 |... .R f|3,f3,#&2|
|000033c0| 30 20 20 20 20 20 20 20 | 20 20 20 3b 20 2f 0d 16 |0 | ; /..|
|000033d0| f8 1e 20 4d 4f 56 20 74 | 6d 70 2c 23 30 20 20 20 |.. MOV t|mp,#0 |
|000033e0| 20 20 20 20 20 20 20 20 | 20 20 20 3b 0d 17 02 20 | | ;... |
|000033f0| 20 43 4d 50 20 66 31 2c | 74 31 20 20 20 20 20 20 | CMP f1,|t1 |
|00003400| 20 20 20 20 20 20 20 20 | 20 3b 20 5c 0d 17 0c 21 | | ; \...!|
|00003410| 20 41 44 44 4e 45 20 74 | 6d 70 2c 74 6d 70 2c 23 | ADDNE t|mp,tmp,#|
|00003420| 31 20 20 20 20 20 20 20 | 20 3b 20 20 5c 0d 17 16 |1 | ; \...|
|00003430| 30 20 43 4d 50 20 66 32 | 2c 74 32 20 20 20 20 20 |0 CMP f2|,t2 |
|00003440| 20 20 20 20 20 20 20 20 | 20 20 3b 20 20 63 6f 6d | | ; com|
|00003450| 70 61 72 65 20 66 69 6c | 65 74 79 70 65 0d 17 20 |pare fil|etype.. |
|00003460| 32 20 41 44 44 4e 45 20 | 74 6d 70 2c 74 6d 70 2c |2 ADDNE |tmp,tmp,|
|00003470| 23 31 20 20 20 20 20 20 | 20 20 3b 20 20 77 69 74 |#1 | ; wit|
|00003480| 68 20 74 68 61 74 20 72 | 65 71 75 69 72 65 64 0d |h that r|equired.|
|00003490| 17 2a 21 20 43 4d 50 20 | 66 33 2c 74 33 20 20 20 |.*! CMP |f3,t3 |
|000034a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 20 20 2f | | ; /|
|000034b0| 0d 17 34 20 20 41 44 44 | 4e 45 20 74 6d 70 2c 74 |..4 ADD|NE tmp,t|
|000034c0| 6d 70 2c 23 31 20 20 20 | 20 20 20 20 20 3b 20 2f |mp,#1 | ; /|
|000034d0| 0d 17 3e 39 20 43 4d 50 | 20 61 6c 74 62 75 66 2c |..>9 CMP| altbuf,|
|000034e0| 23 30 20 20 20 20 20 20 | 20 20 20 20 20 3b 20 20 |#0 | ; |
|000034f0| 73 65 61 72 63 68 69 6e | 67 20 66 6f 72 20 58 2c |searchin|g for X,|
|00003500| 31 2c 32 20 65 74 63 2e | 3f 0d 17 48 35 20 42 45 |1,2 etc.|?..H5 BE|
|00003510| 51 20 66 69 6e 64 78 20 | 20 20 20 20 20 20 20 20 |Q findx | |
|00003520| 20 20 20 20 20 20 3b 20 | 20 69 66 20 79 65 73 2c | ; | if yes,|
|00003530| 20 6a 75 6d 70 20 74 6f | 20 66 69 6e 64 78 0d 17 | jump to| findx..|
|00003540| 52 30 20 43 4d 50 20 74 | 6d 70 2c 23 30 20 20 20 |R0 CMP t|mp,#0 |
|00003550| 20 20 20 20 20 20 20 20 | 20 20 20 3b 20 20 69 73 | | ; is|
|00003560| 20 74 68 69 73 20 74 68 | 65 20 6f 6e 65 3f 0d 17 | this th|e one?..|
|00003570| 5c 2b 20 42 4e 45 20 6c | 6f 6f 70 20 20 20 20 20 |\+ BNE l|oop |
|00003580| 20 20 20 20 20 20 20 20 | 20 20 20 3b 20 20 6c 6f | | ; lo|
|00003590| 6f 70 20 69 66 20 6e 6f | 74 0d 17 66 1e 20 53 55 |op if no|t..f. SU|
|000035a0| 42 20 74 6d 70 2c 70 74 | 72 2c 23 33 20 20 20 20 |B tmp,pt|r,#3 |
|000035b0| 20 20 20 20 20 20 3b 0d | 17 70 31 20 53 54 52 20 | ;.|.p1 STR |
|000035c0| 74 6d 70 2c 5b 61 6c 74 | 62 75 66 5d 2c 23 34 20 |tmp,[alt|buf],#4 |
|000035d0| 20 20 20 20 3b 20 20 73 | 61 76 65 20 61 64 64 72 | ; s|ave addr|
|000035e0| 20 6f 66 20 69 6e 66 6f | 0d 17 7a 38 20 41 44 44 | of info|..z8 ADD|
|000035f0| 20 61 6e 73 77 2c 61 6e | 73 77 2c 23 31 20 20 20 | answ,an|sw,#1 |
|00003600| 20 20 20 20 20 3b 20 20 | 69 6e 63 72 65 6d 65 6e | ; |incremen|
|00003610| 74 20 66 69 6c 65 74 79 | 70 65 20 63 6f 75 6e 74 |t filety|pe count|
|00003620| 0d 17 84 2f 20 42 20 6c | 6f 6f 70 20 20 20 20 20 |.../ B l|oop |
|00003630| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 20 20 | | ; |
|00003640| 63 6f 6e 74 69 6e 75 65 | 20 73 65 61 72 63 68 0d |continue| search.|
|00003650| 17 8e 1e 2e 66 69 6e 64 | 78 20 20 20 20 20 20 20 |....find|x |
|00003660| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 0d 17 98 | | ;...|
|00003670| 30 20 43 4d 50 20 61 6e | 73 77 2c 23 31 20 20 20 |0 CMP an|sw,#1 |
|00003680| 20 20 20 20 20 20 20 20 | 20 20 3b 20 20 61 72 65 | | ; are|
|00003690| 20 77 65 20 63 68 65 63 | 6b 69 6e 67 3f 0d 17 a2 | we chec|king?...|
|000036a0| 34 20 42 45 51 20 74 65 | 73 74 20 20 20 20 20 20 |4 BEQ te|st |
|000036b0| 20 20 20 20 20 20 20 20 | 20 20 3b 20 20 69 66 20 | | ; if |
|000036c0| 79 65 73 2c 20 6a 75 6d | 70 20 74 6f 20 74 65 73 |yes, jum|p to tes|
|000036d0| 74 0d 17 ac 39 20 43 4d | 50 20 74 6d 70 2c 23 30 |t...9 CM|P tmp,#0|
|000036e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 20 | | ; |
|000036f0| 20 68 61 76 65 20 77 65 | 20 72 65 61 63 68 65 64 | have we| reached|
|00003700| 20 66 69 6c 65 74 79 70 | 65 3f 0d 17 b6 2b 20 42 | filetyp|e?...+ B|
|00003710| 4e 45 20 6c 6f 6f 70 20 | 20 20 20 20 20 20 20 20 |NE loop | |
|00003720| 20 20 20 20 20 20 20 3b | 20 20 6c 6f 6f 70 20 69 | ;| loop i|
|00003730| 66 20 6e 6f 74 0d 17 c0 | 31 20 4d 4f 56 20 61 6e |f not...|1 MOV an|
|00003740| 73 77 2c 23 31 20 20 20 | 20 20 20 20 20 20 20 20 |sw,#1 | |
|00003750| 20 20 3b 20 20 73 65 74 | 20 6d 61 72 6b 65 72 20 | ; set| marker |
|00003760| 69 66 20 79 65 73 0d 17 | ca 1e 2e 74 65 73 74 20 |if yes..|...test |
|00003770| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003780| 20 20 20 3b 0d 17 d4 1e | 20 4d 4f 56 20 74 6d 70 | ;....| MOV tmp|
|00003790| 2c 63 73 76 20 20 20 20 | 20 20 20 20 20 20 20 20 |,csv | |
|000037a0| 20 3b 0d 17 de 2d 20 4c | 44 52 42 20 66 31 2c 5b | ;...- L|DRB f1,[|
|000037b0| 74 6d 70 2c 23 31 5d 21 | 20 20 20 20 20 20 20 3b |tmp,#1]!| ;|
|000037c0| 20 20 6a 75 6d 70 20 6f | 76 65 72 20 27 2c 27 0d | jump o|ver ','.|
|000037d0| 17 e8 2e 20 4c 44 52 42 | 20 66 31 2c 5b 74 6d 70 |... LDRB| f1,[tmp|
|000037e0| 2c 23 31 5d 21 20 20 20 | 20 20 20 20 3b 20 20 67 |,#1]! | ; g|
|000037f0| 65 74 20 58 2c 31 2c 32 | 20 65 74 63 2e 0d 17 f2 |et X,1,2| etc....|
|00003800| 29 20 43 4d 50 20 66 31 | 2c 23 26 33 31 20 20 20 |) CMP f1|,#&31 |
|00003810| 20 20 20 20 20 20 20 20 | 20 20 3b 20 20 69 73 20 | | ; is |
|00003820| 69 74 20 27 31 27 0d 17 | fc 2f 20 42 4e 45 20 6c |it '1'..|./ BNE l|
|00003830| 6f 6f 70 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |oop | |
|00003840| 20 20 20 3b 20 20 63 6f | 6e 74 69 6e 75 65 20 73 | ; co|ntinue s|
|00003850| 65 61 72 63 68 0d 18 06 | 31 20 53 55 42 20 61 6e |earch...|1 SUB an|
|00003860| 73 77 2c 70 74 72 2c 23 | 33 20 20 20 20 20 20 20 |sw,ptr,#|3 |
|00003870| 20 20 3b 20 20 73 61 76 | 65 20 61 64 64 72 20 6f | ; sav|e addr o|
|00003880| 66 20 69 6e 66 6f 0d 18 | 10 0a 20 42 20 65 6e 64 |f info..|.. B end|
|00003890| 0d 18 1a 09 2e 63 6f 6e | 76 0d 18 24 1c 20 53 54 |.....con|v..$. ST|
|000038a0| 4d 46 44 20 52 31 33 21 | 2c 7b 52 35 2d 52 31 32 |MFD R13!|,{R5-R12|
|000038b0| 2c 52 31 34 7d 0d 18 2e | 2e 20 53 57 49 20 22 4f |,R14}...|. SWI "O|
|000038c0| 53 5f 43 6f 6e 76 65 72 | 74 48 65 78 34 22 20 20 |S_Conver|tHex4" |
|000038d0| 20 20 3b 20 20 63 6f 6e | 76 65 72 74 20 74 6f 20 | ; con|vert to |
|000038e0| 68 65 78 0d 18 38 20 20 | 4c 44 52 42 20 66 31 2c |hex..8 |LDRB f1,|
|000038f0| 5b 61 6e 73 77 2c 23 31 | 5d 20 20 20 20 20 20 20 |[answ,#1|] |
|00003900| 3b 20 5c 0d 18 42 21 20 | 4c 44 52 42 20 66 32 2c |; \..B! |LDRB f2,|
|00003910| 5b 61 6e 73 77 2c 23 32 | 5d 20 20 20 20 20 20 20 |[answ,#2|] |
|00003920| 3b 20 20 5c 0d 18 4c 1e | 20 4c 44 52 42 20 66 33 |; \..L.| LDRB f3|
|00003930| 2c 5b 61 6e 73 77 2c 23 | 33 5d 20 20 20 20 20 20 |,[answ,#|3] |
|00003940| 20 3b 0d 18 56 30 20 84 | 52 20 66 31 2c 66 31 2c | ;..V0 .|R f1,f1,|
|00003950| 23 26 32 30 20 20 20 20 | 20 20 20 20 20 20 3b 20 |#&20 | ; |
|00003960| 20 67 65 74 20 66 69 6c | 65 74 79 70 65 20 64 61 | get fil|etype da|
|00003970| 74 61 0d 18 60 31 20 84 | 52 20 66 32 2c 66 32 2c |ta..`1 .|R f2,f2,|
|00003980| 23 26 32 30 20 20 20 20 | 20 20 20 20 20 20 3b 20 |#&20 | ; |
|00003990| 20 61 6e 64 20 6d 61 6b | 65 20 6c 6f 77 65 72 63 | and mak|e lowerc|
|000039a0| 61 73 65 0d 18 6a 1f 20 | 84 52 20 66 33 2c 66 33 |ase..j. |.R f3,f3|
|000039b0| 2c 23 26 32 30 20 20 20 | 20 20 20 20 20 20 20 3b |,#&20 | ;|
|000039c0| 20 20 0d 18 74 1e 20 53 | 54 52 42 20 66 31 2c 5b | ..t. S|TRB f1,[|
|000039d0| 61 6e 73 77 2c 23 30 5d | 20 20 20 20 20 20 20 3b |answ,#0]| ;|
|000039e0| 0d 18 7e 21 20 53 54 52 | 42 20 66 32 2c 5b 61 6e |..~! STR|B f2,[an|
|000039f0| 73 77 2c 23 31 5d 20 20 | 20 20 20 20 20 3b 20 20 |sw,#1] | ; |
|00003a00| 2f 0d 18 88 20 20 53 54 | 52 42 20 66 33 2c 5b 61 |/... ST|RB f3,[a|
|00003a10| 6e 73 77 2c 23 32 5d 20 | 20 20 20 20 20 20 3b 20 |nsw,#2] | ; |
|00003a20| 2f 0d 18 92 1e 20 4d 4f | 56 20 74 6d 70 2c 23 26 |/.... MO|V tmp,#&|
|00003a30| 30 44 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 0d |0D | ;.|
|00003a40| 18 9c 1e 20 53 54 52 42 | 20 74 6d 70 2c 5b 61 6e |... STRB| tmp,[an|
|00003a50| 73 77 2c 23 33 5d 20 20 | 20 20 20 20 3b 0d 18 a6 |sw,#3] | ;...|
|00003a60| 08 2e 65 6e 64 0d 18 b0 | 1b 20 4c 44 4d 46 44 20 |..end...|. LDMFD |
|00003a70| 52 31 33 21 2c 7b 52 35 | 2d 52 31 32 2c 50 43 7d |R13!,{R5|-R12,PC}|
|00003a80| 0d 18 ba 08 20 5d 3a ed | 0d 18 c4 05 e1 0d 18 ce |.... ]:.|........|
|00003a90| 05 3a 0d 18 d8 46 22 ab | ab ab ab ab ab ab ab ab |.:...F".|........|
|00003aa0| ab ab ab ab ab ab ab ab | ab ab ab ab ab ab ab ab |........|........|
|00003ab0| ab 20 4d 65 6e 75 20 50 | 72 6f 63 65 64 75 72 65 |. Menu P|rocedure|
|00003ac0| 73 20 bb bb bb bb bb bb | bb bb bb bb bb bb bb bb |s ......|........|
|00003ad0| bb bb bb bb bb bb bb bb | 0d 18 e2 05 3a 0d 18 ec |........|....:...|
|00003ae0| 10 dd 20 f2 69 6e 69 74 | 5f 6d 65 6e 75 0d 18 f6 |.. .init|_menu...|
|00003af0| 13 f4 20 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.. =====|========|
|00003b00| 0d 19 00 25 20 c8 99 20 | 22 4d 65 6e 75 55 74 69 |...% .. |"MenuUti|
|00003b10| 6c 5f 4e 65 77 22 2c 2c | 6e 61 6d 65 24 20 b8 20 |l_New",,|name$ . |
|00003b20| 6d 65 6e 75 25 0d 19 0a | 1e 20 c8 99 20 22 4d 65 |menu%...|. .. "Me|
|00003b30| 6e 75 55 74 69 6c 5f 41 | 64 64 22 2c 2c 22 49 6e |nuUtil_A|dd",,"In|
|00003b40| 66 6f 22 0d 19 14 21 20 | c8 99 20 22 4d 65 6e 75 |fo"...! |.. "Menu|
|00003b50| 55 74 69 6c 5f 53 75 62 | 4d 65 6e 75 22 2c 2c 69 |Util_Sub|Menu",,i|
|00003b60| 6e 66 6f 25 0d 19 1e 36 | 20 c8 99 20 22 4d 65 6e |nfo%...6| .. "Men|
|00003b70| 75 55 74 69 6c 5f 41 64 | 64 22 2c 2c 22 53 65 61 |uUtil_Ad|d",,"Sea|
|00003b80| 72 63 68 22 2c 22 53 65 | 61 72 63 68 22 20 b8 20 |rch","Se|arch" . |
|00003b90| 6d 65 6e 75 5f 73 72 63 | 68 25 0d 19 28 21 20 c8 |menu_src|h%..(! .|
|00003ba0| 99 20 22 4d 65 6e 75 55 | 74 69 6c 5f 53 75 62 4d |. "MenuU|til_SubM|
|00003bb0| 65 6e 75 22 2c 2c 73 72 | 63 68 25 0d 19 32 25 20 |enu",,sr|ch%..2% |
|00003bc0| c8 99 20 22 4d 65 6e 75 | 55 74 69 6c 5f 41 64 64 |.. "Menu|Util_Add|
|00003bd0| 22 2c 2c 22 51 75 69 74 | 22 2c 22 51 75 69 74 22 |",,"Quit|","Quit"|
|00003be0| 0d 19 3c 05 e1 0d 19 46 | 05 3a 0d 19 50 12 dd 20 |..<....F|.:..P.. |
|00003bf0| f2 64 65 63 6f 64 65 5f | 6d 65 6e 75 0d 19 5a 15 |.decode_|menu..Z.|
|00003c00| f4 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |. ======|========|
|00003c10| 3d 0d 19 64 14 20 ea 20 | 61 64 6a 75 73 74 25 2c |=..d. . |adjust%,|
|00003c20| 69 74 65 6d 25 0d 19 6e | 38 20 c8 99 20 22 4d 65 |item%..n|8 .. "Me|
|00003c30| 6e 75 55 74 69 6c 5f 44 | 65 63 6f 64 65 22 2c 2c |nuUtil_D|ecode",,|
|00003c40| 62 6c 6b 25 20 b8 20 68 | 61 6e 64 6c 65 72 25 2c |blk% . h|andler%,|
|00003c50| 61 64 6a 75 73 74 25 2c | 69 74 65 6d 25 0d 19 78 |adjust%,|item%..x|
|00003c60| 16 20 69 74 65 6d 24 3d | 24 28 69 74 65 6d 25 21 |. item$=|$(item%!|
|00003c70| 31 32 29 0d 19 82 0f 20 | c8 8e 20 69 74 65 6d 24 |12).... |.. item$|
|00003c80| 20 ca 0d 19 8c 1a 20 c9 | 20 22 51 75 69 74 22 20 | ..... .| "Quit" |
|00003c90| 20 20 20 20 20 3a 20 f2 | 71 75 69 74 0d 19 96 06 | : .|quit....|
|00003ca0| 20 cb 0d 19 a0 23 20 e7 | 20 61 64 6a 75 73 74 25 | ....# .| adjust%|
|00003cb0| 20 8c 20 c8 99 20 22 4d | 65 6e 75 55 74 69 6c 5f | . .. "M|enuUtil_|
|00003cc0| 53 68 6f 77 22 0d 19 aa | 05 e1 0d 19 b4 05 3a 0d |Show"...|......:.|
|00003cd0| 19 be 46 22 ab ab ab ab | ab ab ab ab ab ab ab ab |..F"....|........|
|00003ce0| ab ab ab ab ab ab ab ab | ab ab ab ab ab ab ab ab |........|........|
|00003cf0| ab ab 20 45 52 52 4f 52 | 53 20 bb bb bb bb bb bb |.. ERROR|S ......|
|00003d00| bb bb bb bb bb bb bb bb | bb bb bb bb bb bb bb bb |........|........|
|00003d10| bb bb bb bb bb 0d 19 c8 | 05 3a 0d 19 d2 10 dd 20 |........|.:..... |
|00003d20| f2 65 72 72 6f 72 28 65 | 24 29 0d 19 dc 13 f4 20 |.error(e|$)..... |
|00003d30| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 0d 19 e6 |========|=====...|
|00003d40| 26 20 e7 20 65 72 72 5f | 66 6c 67 25 3d 33 20 8c |& . err_|flg%=3 .|
|00003d50| 20 65 24 2b 3d 22 2c 20 | 43 6f 64 65 20 22 2b c3 | e$+=", |Code "+.|
|00003d60| 28 9e 29 0d 19 f0 1b 20 | f2 65 72 72 62 6f 78 28 |(.).... |.errbox(|
|00003d70| 65 24 29 3a 65 72 72 5f | 66 6c 67 25 3d 33 0d 19 |e$):err_|flg%=3..|
|00003d80| fa 05 e1 0d 1a 04 05 3a | 0d 1a 0e 13 dd 20 f2 65 |.......:|..... .e|
|00003d90| 72 72 62 6f 78 28 65 72 | 72 24 29 0d 1a 18 15 f4 |rrbox(er|r$).....|
|00003da0| 20 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d | =======|========|
|00003db0| 0d 1a 22 25 20 ea 20 65 | 72 72 25 3a 21 62 6c 6b |.."% . e|rr%:!blk|
|00003dc0| 25 3d 9f 3a 24 28 62 6c | 6b 25 2b 34 29 3d 65 72 |%=.:$(bl|k%+4)=er|
|00003dd0| 72 24 2b bd 30 0d 1a 2c | 36 20 c8 99 20 22 57 69 |r$+.0..,|6 .. "Wi|
|00003de0| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|00003df0| 62 6c 6b 25 2c 65 72 72 | 5f 66 6c 67 25 2c 6e 61 |blk%,err|_flg%,na|
|00003e00| 6d 65 24 20 b8 20 2c 65 | 72 72 25 0d 1a 36 21 20 |me$ . ,e|rr%..6! |
|00003e10| e7 20 65 72 72 5f 66 6c | 67 25 3c 3e 31 20 84 20 |. err_fl|g%<>1 . |
|00003e20| 65 72 72 25 3d 32 20 f2 | 71 75 69 74 0d 1a 40 05 |err%=2 .|quit..@.|
|00003e30| e1 0d 1a 4a 05 3a 0d 1a | 54 0b dd 20 f2 71 75 69 |...J.:..|T.. .qui|
|00003e40| 74 0d 1a 5e 0e f4 20 3d | 3d 3d 3d 3d 3d 3d 3d 0d |t..^.. =|=======.|
|00003e50| 1a 68 1a 20 c8 99 20 22 | 57 69 6d 70 5f 43 6c 6f |.h. .. "|Wimp_Clo|
|00003e60| 73 65 44 6f 77 6e 22 3a | e0 0d 1a 72 05 e1 0d ff |seDown":|...r....|
+--------+-------------------------+-------------------------+--------+--------+
