home *** CD-ROM | disk | FTP | other *** search
Unknown | 1995-09-27 | 12.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 4c f4 20 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |...L. ==|========|
|00000010| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000020| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000030| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 0d 00 14 4c |========|====...L|
|00000050| f4 20 3d 3d 3d 20 41 70 | 70 6c 69 63 61 74 69 6f |. === Ap|plicatio|
|00000060| 6e 20 73 70 65 63 69 66 | 69 63 20 69 6e 69 74 69 |n specif|ic initi|
|00000070| 61 6c 69 73 61 74 69 6f | 6e 20 20 20 20 20 20 20 |alisatio|n |
|00000080| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000090| 20 20 20 20 20 3d 3d 3d | 0d 00 1e 4c f4 20 3d 3d | ===|...L. ==|
|000000a0| 3d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |= | |
|000000b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000e0| 20 3d 3d 3d 0d 00 28 4c | 4e 61 6d 65 24 3d 22 55 | ===..(L|Name$="U|
|000000f0| 6e 48 54 4d 4c 22 20 20 | 20 20 20 20 20 20 20 20 |nHTML" | |
|00000100| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000110| 3a f4 20 74 68 65 20 74 | 61 73 6b 20 6e 61 6d 65 |:. the t|ask name|
|00000120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3d 3d 3d | | ===|
|00000130| 0d 00 32 4c 76 65 72 73 | 69 6f 6e 24 3d 22 31 2e |..2Lvers|ion$="1.|
|00000140| 30 30 20 32 37 2d 53 65 | 70 2d 39 35 22 20 20 20 |00 27-Se|p-95" |
|00000150| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a f4 20 74 | | :. t|
|00000160| 68 65 20 76 65 72 73 69 | 6f 6e 20 6e 75 6d 62 65 |he versi|on numbe|
|00000170| 72 20 20 20 20 20 20 20 | 20 3d 3d 3d 0d 00 3c 4c |r | ===..<L|
|00000180| 53 61 76 65 24 3d 22 54 | 65 78 74 46 69 6c 65 22 |Save$="T|extFile"|
|00000190| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000001a0| 20 20 20 20 20 20 20 20 | 3a f4 20 64 65 66 61 75 | |:. defau|
|000001b0| 6c 74 20 73 61 76 65 66 | 69 6c 65 20 6e 61 6d 65 |lt savef|ile name|
|000001c0| 20 20 20 20 20 3d 3d 3d | 0d 00 46 4c 44 61 74 61 | ===|..FLData|
|000001d0| 25 3d 30 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |%=0 | |
|000001e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000001f0| 20 20 20 20 3a f4 20 6c | 6f 63 61 74 69 6f 6e 20 | :. l|ocation |
|00000200| 6f 66 20 70 72 6f 63 65 | 73 73 65 64 20 64 61 74 |of proce|ssed dat|
|00000210| 61 3d 3d 3d 0d 00 50 4c | 44 61 74 61 4c 65 6e 25 |a===..PL|DataLen%|
|00000220| 3d 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |=0 | |
|00000230| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000240| 3a f4 20 6c 65 6e 67 74 | 68 20 6f 66 20 64 61 74 |:. lengt|h of dat|
|00000250| 61 20 20 20 20 20 20 20 | 20 20 20 20 20 3d 3d 3d |a | ===|
|00000260| 0d 00 5a 4c 49 6e 70 75 | 74 25 3d 30 20 20 20 20 |..ZLInpu|t%=0 |
|00000270| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000280| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a f4 20 6c | | :. l|
|00000290| 6f 63 61 74 69 6f 6e 20 | 6f 66 20 73 6f 75 72 63 |ocation |of sourc|
|000002a0| 65 20 64 61 74 61 20 20 | 20 3d 3d 3d 0d 00 64 4c |e data | ===..dL|
|000002b0| 49 6e 70 75 74 4c 65 6e | 25 3d 30 20 20 20 20 20 |InputLen|%=0 |
|000002c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000002d0| 20 20 20 20 20 20 20 20 | 3a f4 20 6c 65 6e 67 74 | |:. lengt|
|000002e0| 68 20 6f 66 20 73 6f 75 | 72 63 65 20 64 61 74 61 |h of sou|rce data|
|000002f0| 20 20 20 20 20 3d 3d 3d | 0d 00 6e 4c 46 69 6c 65 | ===|..nLFile|
|00000300| 54 79 70 65 24 3d 22 46 | 46 46 22 20 20 20 20 20 |Type$="F|FF" |
|00000310| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000320| 20 20 20 20 3a f4 20 73 | 65 74 74 79 70 65 20 66 | :. s|ettype f|
|00000330| 6f 72 20 6f 75 74 70 75 | 74 20 20 20 20 20 20 20 |or outpu|t |
|00000340| 20 3d 3d 3d 0d 00 78 4c | 46 69 6c 65 54 79 70 65 | ===..xL|FileType|
|00000350| 25 3d 26 46 46 46 20 20 | 20 20 20 20 20 20 20 20 |%=&FFF | |
|00000360| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000370| 3a f4 20 73 65 74 74 79 | 70 65 20 66 6f 72 20 6f |:. setty|pe for o|
|00000380| 75 74 70 75 74 20 20 20 | 20 20 20 20 20 3d 3d 3d |utput | ===|
|00000390| 0d 00 82 4c 73 63 72 61 | 70 72 65 66 25 3d 30 20 |...Lscra|pref%=0 |
|000003a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000003b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a f4 20 61 | | :. a|
|000003c0| 72 65 20 77 65 20 75 73 | 69 6e 67 20 53 63 72 61 |re we us|ing Scra|
|000003d0| 70 46 69 6c 65 20 20 20 | 20 3d 3d 3d 0d 00 8c 04 |pFile | ===....|
|000003e0| 0d 00 96 44 61 25 3d 97 | 28 22 61 22 29 3a 7a 25 |...Da%=.|("a"):z%|
|000003f0| 3d 97 28 22 7a 22 29 3a | 41 25 3d 97 28 22 41 22 |=.("z"):|A%=.("A"|
|00000400| 29 3a 5a 25 3d 97 28 22 | 5a 22 29 20 20 20 3a f4 |):Z%=.("|Z") :.|
|00000410| 20 67 6f 20 66 61 73 74 | 65 72 20 76 61 72 69 61 | go fast|er varia|
|00000420| 62 6c 65 73 0d 00 a0 30 | 6c 66 24 3d bd 28 31 30 |bles...0|lf$=.(10|
|00000430| 29 3a 6c 66 32 24 3d 6c | 66 24 2b 6c 66 24 3a 67 |):lf2$=l|f$+lf$:g|
|00000440| 74 25 3d 97 28 22 3e 22 | 29 3a 6c 74 25 3d 97 28 |t%=.(">"|):lt%=.(|
|00000450| 22 3c 22 29 0d 00 aa 55 | 74 61 67 63 68 61 72 73 |"<")...U|tagchars|
|00000460| 24 3d 22 41 42 43 44 45 | 46 47 48 49 4a 4b 4c 4d |$="ABCDE|FGHIJKLM|
|00000470| 4e 4f 50 51 52 53 54 55 | 56 57 58 59 5a 30 31 32 |NOPQRSTU|VWXYZ012|
|00000480| 33 34 35 36 37 38 39 2f | 22 20 20 20 3a f4 20 63 |3456789/|" :. c|
|00000490| 68 61 72 73 20 74 68 61 | 74 20 63 61 6e 20 62 65 |hars tha|t can be|
|000004a0| 20 69 6e 20 61 20 54 41 | 47 0d 00 b4 04 0d 00 be | in a TA|G.......|
|000004b0| 04 0d 00 c8 45 70 72 65 | 25 3d a3 20 20 20 20 20 |....Epre|%=. |
|000004c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000004d0| 20 20 20 20 20 20 20 20 | 20 3a f4 20 66 6c 61 67 | | :. flag|
|000004e0| 20 66 6f 72 20 50 52 45 | 46 4f 52 4d 41 54 54 45 | for PRE|FORMATTE|
|000004f0| 44 20 74 65 78 74 0d 00 | d2 04 0d 00 dc 4c f4 20 |D text..|.....L. |
|00000500| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000510| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000520| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000530| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000540| 3d 3d 3d 3d 3d 3d 0d 00 | e6 04 0d 00 f0 04 0d 00 |======..|........|
|00000550| fa 1a 44 69 72 24 3d 22 | 3c 22 2b 4e 61 6d 65 24 |..Dir$="|<"+Name$|
|00000560| 2b 22 24 44 69 72 3e 22 | 0d 01 04 21 de 20 62 25 |+"$Dir>"|...!. b%|
|00000570| 20 31 30 30 30 2c 20 51 | 25 20 31 30 30 30 2c 20 | 1000, Q|% 1000, |
|00000580| 4d 65 6e 75 25 20 34 30 | 30 0d 01 0e 0e 24 62 25 |Menu% 40|0....$b%|
|00000590| 3d 22 54 41 53 4b 22 0d | 01 18 28 c8 99 22 57 69 |="TASK".|..(.."Wi|
|000005a0| 6d 70 5f 49 6e 69 74 69 | 61 6c 69 73 65 22 2c 20 |mp_Initi|alise", |
|000005b0| 32 30 30 2c 20 21 62 25 | 2c 20 4e 61 6d 65 24 0d |200, !b%|, Name$.|
|000005c0| 01 22 04 0d 01 2c 2b d3 | 3d 93 2d 26 31 30 30 3a |."...,+.|=.-&100:|
|000005d0| 48 65 61 70 25 3d 93 3a | f2 49 6e 69 74 48 65 61 |Heap%=.:|.InitHea|
|000005e0| 70 28 48 65 61 70 25 2c | 20 26 31 30 30 29 0d 01 |p(Heap%,| &100)..|
|000005f0| 36 04 0d 01 40 09 f2 49 | 6e 69 74 0d 01 4a 0e ee |6...@..I|nit..J..|
|00000600| 20 85 20 f2 45 72 72 6f | 72 0d 01 54 05 f5 0d 01 | . .Erro|r..T....|
|00000610| 5e 21 20 c8 99 22 57 69 | 6d 70 5f 50 6f 6c 6c 22 |^! .."Wi|mp_Poll"|
|00000620| 2c 20 34 39 2c 20 62 25 | 20 b8 20 61 63 74 25 0d |, 49, b%| . act%.|
|00000630| 01 68 0e 20 c8 8e 20 61 | 63 74 25 20 ca 0d 01 72 |.h. .. a|ct% ...r|
|00000640| 11 20 20 c9 20 31 3a f2 | 52 65 64 72 61 77 0d 01 |. . 1:.|Redraw..|
|00000650| 7c 23 20 20 c9 20 32 3a | c8 99 22 57 69 6d 70 5f ||# . 2:|.."Wimp_|
|00000660| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 20 2c 20 62 |OpenWind|ow", , b|
|00000670| 25 0d 01 86 3f 20 20 c9 | 20 33 3a e7 20 21 62 25 |%...? .| 3:. !b%|
|00000680| 3d 53 61 76 65 25 20 8c | 20 f2 63 6c 6f 73 65 73 |=Save% .| .closes|
|00000690| 61 76 65 20 8b 20 c8 99 | 22 57 69 6d 70 5f 43 6c |ave . ..|"Wimp_Cl|
|000006a0| 6f 73 65 57 69 6e 64 6f | 77 22 2c 20 2c 20 62 25 |oseWindo|w", , b%|
|000006b0| 0d 01 90 12 20 20 c9 20 | 36 3a f2 42 75 74 74 6f |.... . |6:.Butto|
|000006c0| 6e 73 0d 01 9a 13 20 20 | c9 20 37 3a f2 44 72 61 |ns.... |. 7:.Dra|
|000006d0| 67 28 62 25 29 0d 01 a4 | 25 20 20 c9 20 38 3a c8 |g(b%)...|% . 8:.|
|000006e0| 99 22 57 69 6d 70 5f 50 | 72 6f 63 65 73 73 4b 65 |."Wimp_P|rocessKe|
|000006f0| 79 22 2c 28 62 25 21 32 | 34 29 0d 01 ae 18 20 20 |y",(b%!2|4).... |
|00000700| c9 20 39 3a f2 6d 65 6e | 75 73 65 6c 65 63 74 69 |. 9:.men|uselecti|
|00000710| 6f 6e 0d 01 b8 22 20 20 | c9 20 31 37 2c 20 31 38 |on..." |. 17, 18|
|00000720| 3a f2 4d 65 73 73 61 67 | 65 28 62 25 21 31 36 2c |:.Messag|e(b%!16,|
|00000730| 20 62 25 29 0d 01 c2 06 | 20 cb 0d 01 cc 0b fd 20 | b%)....| ...... |
|00000740| 51 75 69 74 25 0d 01 d6 | 16 c8 99 22 57 69 6d 70 |Quit%...|..."Wimp|
|00000750| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 0d 01 e0 06 c8 |_CloseDo|wn".....|
|00000760| 98 0d 01 ea 04 0d 01 f4 | 0a dd f2 49 6e 69 74 0d |........|...Init.|
|00000770| 01 fe 0b 20 ea 20 69 73 | 70 25 0d 02 08 12 20 ee |... . is|p%.... .|
|00000780| 20 85 20 f2 45 72 72 6f | 72 3a c8 98 0d 02 12 0e | . .Erro|r:......|
|00000790| 20 69 64 70 74 72 25 3d | 51 25 0d 02 1c 04 0d 02 | idptr%=|Q%......|
|000007a0| 26 1f 20 f4 20 3d 3d 20 | 6c 6f 61 64 20 74 68 65 |&. . == |load the|
|000007b0| 20 74 65 6d 70 6c 61 74 | 65 73 20 3d 3d 0d 02 30 | templat|es ==..0|
|000007c0| 2f 20 c8 99 22 57 69 6d | 70 5f 4f 70 65 6e 54 65 |/ .."Wim|p_OpenTe|
|000007d0| 6d 70 6c 61 74 65 22 2c | 20 2c 20 44 69 72 24 2b |mplate",| , Dir$+|
|000007e0| 22 2e 54 65 6d 70 6c 61 | 74 65 73 22 0d 02 3a 4a |".Templa|tes"..:J|
|000007f0| 20 c8 99 22 57 69 6d 70 | 5f 4c 6f 61 64 54 65 6d | .."Wimp|_LoadTem|
|00000800| 70 6c 61 74 65 22 2c 20 | 2c 20 62 25 2c 20 69 64 |plate", |, b%, id|
|00000810| 70 74 72 25 2c 20 51 25 | 2b 31 30 30 30 2c 20 2d |ptr%, Q%|+1000, -|
|00000820| 31 2c 20 22 49 6e 66 6f | 22 20 b8 20 2c 20 2c 20 |1, "Info|" . , , |
|00000830| 69 64 70 74 72 25 0d 02 | 44 28 20 c8 99 22 57 69 |idptr%..|D( .."Wi|
|00000840| 6d 70 5f 43 72 65 61 74 | 65 57 69 6e 64 6f 77 22 |mp_Creat|eWindow"|
|00000850| 2c 20 2c 20 62 25 20 b8 | 20 49 6e 66 6f 25 0d 02 |, , b% .| Info%..|
|00000860| 4e 4a 20 c8 99 22 57 69 | 6d 70 5f 4c 6f 61 64 54 |NJ .."Wi|mp_LoadT|
|00000870| 65 6d 70 6c 61 74 65 22 | 2c 20 2c 20 62 25 2c 20 |emplate"|, , b%, |
|00000880| 69 64 70 74 72 25 2c 20 | 51 25 2b 31 30 30 30 2c |idptr%, |Q%+1000,|
|00000890| 20 2d 31 2c 20 22 53 61 | 76 65 22 20 b8 20 2c 20 | -1, "Sa|ve" . , |
|000008a0| 2c 20 69 64 70 74 72 25 | 0d 02 58 28 20 c8 99 22 |, idptr%|..X( .."|
|000008b0| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|000008c0| 77 22 2c 20 2c 20 62 25 | 20 b8 20 53 61 76 65 25 |w", , b%| . Save%|
|000008d0| 0d 02 62 1b 20 c8 99 22 | 57 69 6d 70 5f 43 6c 6f |..b. .."|Wimp_Clo|
|000008e0| 73 65 54 65 6d 70 6c 61 | 74 65 22 0d 02 6c 04 0d |seTempla|te"..l..|
|000008f0| 02 76 22 20 f4 20 3d 3d | 20 46 69 6e 64 20 74 68 |.v" . ==| Find th|
|00000900| 65 20 69 63 6f 6e 62 61 | 72 20 69 63 6f 6e 20 3d |e iconba|r icon =|
|00000910| 3d 0d 02 80 0e 20 de 20 | 69 73 70 25 20 31 32 0d |=.... . |isp% 12.|
|00000920| 02 8a 0b 20 21 62 25 3d | 2d 31 0d 02 94 24 20 62 |... !b%=|-1...$ b|
|00000930| 25 21 34 3d 30 3a 62 25 | 21 31 32 3d 38 30 3a 62 |%!4=0:b%|!12=80:b|
|00000940| 25 21 38 3d 30 3a 62 25 | 21 31 36 3d 38 30 0d 02 |%!8=0:b%|!16=80..|
|00000950| 9e 20 20 62 25 21 32 30 | 3d 26 33 31 30 32 3a 24 |. b%!20|=&3102:$|
|00000960| 69 73 70 25 3d 22 21 22 | 2b 4e 61 6d 65 24 0d 02 |isp%="!"|+Name$..|
|00000970| a8 26 20 62 25 21 32 34 | 3d 69 73 70 25 3a 62 25 |.& b%!24|=isp%:b%|
|00000980| 21 32 38 3d 31 3a 62 25 | 21 33 32 3d a9 24 69 73 |!28=1:b%|!32=.$is|
|00000990| 70 25 2b 31 0d 02 b2 24 | 20 c8 99 22 57 69 6d 70 |p%+1...$| .."Wimp|
|000009a0| 5f 43 72 65 61 74 65 49 | 63 6f 6e 22 2c 20 2c 20 |_CreateI|con", , |
|000009b0| 62 25 20 b8 20 69 68 25 | 0d 02 bc 04 0d 02 c6 38 |b% . ih%|.......8|
|000009c0| 20 f4 20 3d 3d 20 70 75 | 74 20 74 68 65 20 76 65 | . == pu|t the ve|
|000009d0| 72 73 69 6f 6e 20 6e 75 | 6d 62 65 72 20 69 6e 74 |rsion nu|mber int|
|000009e0| 6f 20 74 68 65 20 69 6e | 66 6f 20 77 69 6e 64 6f |o the in|fo windo|
|000009f0| 77 20 3d 3d 0d 02 d0 1b | 20 24 a4 69 28 49 6e 66 |w ==....| $.i(Inf|
|00000a00| 6f 25 2c 20 33 29 3d 76 | 65 72 73 69 6f 6e 24 0d |o%, 3)=v|ersion$.|
|00000a10| 02 da 04 0d 02 e4 25 20 | f4 20 3d 3d 20 44 65 66 |......% |. == Def|
|00000a20| 61 75 6c 74 20 6e 61 6d | 65 20 66 6f 72 20 73 61 |ault nam|e for sa|
|00000a30| 76 65 64 20 66 69 6c 65 | 0d 02 ee 26 20 53 61 76 |ved file|...& Sav|
|00000a40| 65 49 25 3d a4 69 28 53 | 61 76 65 25 2c 20 31 29 |eI%=.i(S|ave%, 1)|
|00000a50| 3a 24 53 61 76 65 49 25 | 3d 53 61 76 65 24 0d 02 |:$SaveI%|=Save$..|
|00000a60| f8 04 0d 03 02 0c 20 51 | 75 69 74 25 3d a3 0d 03 |...... Q|uit%=...|
|00000a70| 0c 04 0d 03 16 05 e1 0d | 03 20 04 0d 03 2a 1b dd |........|. ...*..|
|00000a80| f2 4d 65 73 73 61 67 65 | 28 6d 65 73 73 61 67 65 |.Message|(message|
|00000a90| 25 2c 20 62 25 29 0d 03 | 34 19 20 52 65 66 25 3d |%, b%)..|4. Ref%=|
|00000aa0| 62 25 21 38 3a 54 61 73 | 6b 25 3d 62 25 21 34 0d |b%!8:Tas|k%=b%!4.|
|00000ab0| 03 3e 12 20 c8 8e 20 6d | 65 73 73 61 67 65 25 20 |.>. .. m|essage% |
|00000ac0| ca 0d 03 48 11 20 20 c9 | 20 30 3a 51 75 69 74 25 |...H. .| 0:Quit%|
|00000ad0| 3d b9 0d 03 52 28 20 20 | c9 20 31 3a 20 20 f4 20 |=...R( |. 1: . |
|00000ae0| 64 6f 20 74 68 65 20 73 | 63 72 61 70 20 66 69 6c |do the s|crap fil|
|00000af0| 65 20 62 75 73 69 6e 65 | 73 73 0d 03 5c 44 20 20 |e busine|ss..\D |
|00000b00| 20 20 20 20 20 20 20 20 | 20 20 c8 99 20 22 58 4f | | .. "XO|
|00000b10| 53 5f 52 65 61 64 56 61 | 72 56 61 6c 22 2c 22 57 |S_ReadVa|rVal","W|
|00000b20| 69 6d 70 24 53 63 72 61 | 70 22 2c 2c 2d 31 2c 30 |imp$Scra|p",,-1,0|
|00000b30| 2c 33 20 b8 20 2c 2c 65 | 78 69 73 74 73 25 0d 03 |,3 . ,,e|xists%..|
|00000b40| 66 3c 20 20 20 20 20 20 | 20 20 20 20 20 20 e7 20 |f< | . |
|00000b50| 65 78 69 73 74 73 25 3d | 30 20 8c 20 85 20 31 2c |exists%=|0 . . 1,|
|00000b60| 22 3c 57 69 6d 70 24 53 | 63 72 61 70 3e 20 6e 6f |"<Wimp$S|crap> no|
|00000b70| 74 20 64 65 66 69 6e 65 | 64 22 0d 03 70 35 20 20 |t define|d"..p5 |
|00000b80| 20 20 20 20 20 20 20 20 | 20 20 62 25 21 33 36 3d | | b%!36=|
|00000b90| 2d 31 3a 24 28 62 25 2b | 34 34 29 3d 22 3c 57 69 |-1:$(b%+|44)="<Wi|
|00000ba0| 6d 70 24 53 63 72 61 70 | 3e 22 2b bd 28 30 29 0d |mp$Scrap|>"+.(0).|
|00000bb0| 03 7a 2b 20 20 20 20 20 | 20 20 20 20 20 20 20 21 |.z+ | !|
|00000bc0| 62 25 3d 28 34 38 2b a9 | 22 3c 57 69 6d 70 24 53 |b%=(48+.|"<Wimp$S|
|00000bd0| 63 72 61 70 3e 22 29 80 | ac 33 0d 03 84 43 20 20 |crap>").|.3...C |
|00000be0| 20 20 20 20 20 20 20 20 | 20 20 62 25 21 31 32 3d | | b%!12=|
|00000bf0| 62 25 21 38 3a 62 25 21 | 31 36 3d 32 3a c8 99 20 |b%!8:b%!|16=2:.. |
|00000c00| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00000c10| 65 22 2c 31 37 2c 62 25 | 2c 62 25 21 34 0d 03 8e |e",17,b%|,b%!4...|
|00000c20| 1e 20 20 20 20 20 20 20 | 20 20 20 20 20 73 63 72 |. | scr|
|00000c30| 61 70 72 65 66 25 3d 62 | 25 21 38 0d 03 98 19 20 |apref%=b|%!8.... |
|00000c40| 20 c9 20 32 3a e7 20 ac | 20 53 61 76 69 6e 67 25 | . 2:. .| Saving%|
|00000c50| 20 8c 20 e1 0d 03 a2 37 | 20 20 20 ff 28 22 53 41 | . ....7| .("SA|
|00000c60| 56 45 20 22 2b a4 73 28 | 62 25 2b 34 34 29 2b 22 |VE "+.s(|b%+44)+"|
|00000c70| 20 22 2b c3 7e 44 61 74 | 61 25 2b 22 20 2b 22 2b | "+.~Dat|a%+" +"+|
|00000c80| c3 7e 44 61 74 61 4c 65 | 6e 25 29 0d 03 ac 2c 20 |.~DataLe|n%)..., |
|00000c90| 20 20 ff 28 22 53 45 54 | 54 59 50 45 20 22 2b a4 | .("SET|TYPE "+.|
|00000ca0| 73 28 62 25 2b 34 34 29 | 2b 22 20 22 2b 46 69 6c |s(b%+44)|+" "+Fil|
|00000cb0| 65 54 79 70 65 24 29 0d | 03 b6 10 20 20 20 53 61 |eType$).|... Sa|
|00000cc0| 76 69 6e 67 25 3d a3 0d | 03 c0 21 20 20 20 62 25 |ving%=..|..! b%|
|00000cd0| 21 31 32 3d 52 65 66 25 | 3a 62 25 21 31 36 3d 33 |!12=Ref%|:b%!16=3|
|00000ce0| 3a 21 62 25 3d 32 35 36 | 0d 03 ca 30 20 20 20 c8 |:!b%=256|...0 .|
|00000cf0| 99 22 57 69 6d 70 5f 53 | 65 6e 64 4d 65 73 73 61 |."Wimp_S|endMessa|
|00000d00| 67 65 22 2c 20 31 38 2c | 20 62 25 2c 20 62 25 21 |ge", 18,| b%, b%!|
|00000d10| 32 30 2c 62 25 21 32 34 | 0d 03 d4 20 20 20 20 c8 |20,b%!24|... .|
|00000d20| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e |."Wimp_C|reateMen|
|00000d30| 75 22 2c 20 2c 20 2d 31 | 0d 03 de 11 20 20 20 f2 |u", , -1|.... .|
|00000d40| 63 6c 6f 73 65 73 61 76 | 65 0d 03 e8 17 20 20 c9 |closesav|e.... .|
|00000d50| 20 33 3a f2 44 61 74 61 | 4c 6f 61 64 28 62 25 29 | 3:.Data|Load(b%)|
|00000d60| 0d 03 f2 1a 20 20 c9 20 | 26 34 30 30 43 31 3a f2 |.... . |&400C1:.|
|00000d70| 43 68 61 6e 67 65 4d 6f | 64 65 0d 03 fc 06 20 cb |ChangeMo|de.... .|
|00000d80| 0d 04 06 05 e1 0d 04 10 | 04 0d 04 1a 0f dd f2 63 |........|.......c|
|00000d90| 6c 6f 73 65 73 61 76 65 | 0d 04 24 2e 20 20 62 25 |losesave|..$. b%|
|00000da0| 21 30 3d 53 61 76 65 25 | 3a c8 99 22 57 69 6d 70 |!0=Save%|:.."Wimp|
|00000db0| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00000dc0| 2c 20 2c 20 62 25 0d 04 | 2e 20 20 20 c8 99 22 57 |, , b%..|. .."W|
|00000dd0| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00000de0| 2c 20 2c 20 62 25 0d 04 | 38 11 20 20 f2 52 65 6d |, , b%..|8. .Rem|
|00000df0| 6f 76 65 46 69 6c 65 0d | 04 42 05 e1 0d 04 4c 04 |oveFile.|.B....L.|
|00000e00| 0d 04 56 0e dd f2 44 72 | 61 67 28 62 25 29 0d 04 |..V...Dr|ag(b%)..|
|00000e10| 60 0c 20 ea 20 66 69 6c | 65 24 0d 04 6a 20 20 66 |`. . fil|e$..j f|
|00000e20| 69 6c 65 24 3d a4 67 65 | 74 5f 6c 65 61 66 28 a4 |ile$=.ge|t_leaf(.|
|00000e30| 73 28 53 61 76 65 49 25 | 29 29 0d 04 74 0e 20 53 |s(SaveI%|))..t. S|
|00000e40| 61 76 69 6e 67 25 3d b9 | 0d 04 7e 22 20 c8 99 22 |aving%=.|..~" .."|
|00000e50| 57 69 6d 70 5f 47 65 74 | 50 6f 69 6e 74 65 72 49 |Wimp_Get|PointerI|
|00000e60| 6e 66 6f 22 2c 20 2c 20 | 62 25 0d 04 88 23 20 62 |nfo", , |b%...# b|
|00000e70| 25 21 34 30 3d 46 69 6c | 65 54 79 70 65 25 3a 24 |%!40=Fil|eType%:$|
|00000e80| 28 62 25 2b 34 34 29 3d | 66 69 6c 65 24 0d 04 92 |(b%+44)=|file$...|
|00000e90| 35 20 62 25 21 33 36 3d | 44 61 74 61 4c 65 6e 25 |5 b%!36=|DataLen%|
|00000ea0| 3a 62 25 21 33 32 3d 62 | 25 21 34 3a 62 25 21 32 |:b%!32=b|%!4:b%!2|
|00000eb0| 34 3d 62 25 21 31 36 3a | 62 25 21 32 38 3d 62 25 |4=b%!16:|b%!28=b%|
|00000ec0| 21 30 0d 04 9c 20 20 62 | 25 21 32 30 3d 62 25 21 |!0... b|%!20=b%!|
|00000ed0| 31 32 3a 62 25 21 31 36 | 3d 31 3a 62 25 21 30 3d |12:b%!16|=1:b%!0=|
|00000ee0| 36 34 0d 04 a6 2f 20 c8 | 99 22 57 69 6d 70 5f 53 |64.../ .|."Wimp_S|
|00000ef0| 65 6e 64 4d 65 73 73 61 | 67 65 22 2c 20 31 38 2c |endMessa|ge", 18,|
|00000f00| 20 62 25 2c 20 62 25 21 | 32 30 2c 20 62 25 21 32 | b%, b%!|20, b%!2|
|00000f10| 34 0d 04 b0 05 e1 0d 04 | ba 04 0d 04 c4 13 dd 20 |4.......|....... |
|00000f20| a4 67 65 74 5f 6c 65 61 | 66 28 66 24 29 0d 04 ce |.get_lea|f(f$)...|
|00000f30| 0f c8 95 20 a7 66 24 2c | 22 2e 22 29 0d 04 d8 16 |... .f$,|".")....|
|00000f40| 66 24 3d c1 66 24 2c a7 | 66 24 2c 22 2e 22 29 2b |f$=.f$,.|f$,".")+|
|00000f50| 31 29 0d 04 e2 05 ce 0d | 04 ec 0a 3d 66 24 2b bd |1)......|...=f$+.|
|00000f60| 30 0d 04 f6 04 0d 05 00 | 16 dd f2 49 6e 69 74 44 |0.......|...InitD|
|00000f70| 72 61 67 28 77 25 2c 20 | 69 25 29 0d 05 0a 0d 20 |rag(w%, |i%).... |
|00000f80| ea 20 78 25 2c 20 79 25 | 0d 05 14 2a 20 62 25 21 |. x%, y%|...* b%!|
|00000f90| 30 3d 77 25 3a c8 99 22 | 57 69 6d 70 5f 47 65 74 |0=w%:.."|Wimp_Get|
|00000fa0| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 20 2c 20 |WindowSt|ate", , |
|00000fb0| 62 25 0d 05 1e 1c 20 78 | 25 3d 62 25 21 34 3a 79 |b%.... x|%=b%!4:y|
|00000fc0| 25 3d 62 25 21 38 3a 62 | 25 21 34 3d 69 25 0d 05 |%=b%!8:b|%!4=i%..|
|00000fd0| 28 20 20 c8 99 22 57 69 | 6d 70 5f 47 65 74 49 63 |( .."Wi|mp_GetIc|
|00000fe0| 6f 6e 53 74 61 74 65 22 | 2c 20 2c 20 62 25 0d 05 |onState"|, , b%..|
|00000ff0| 32 1e 20 62 25 21 34 3d | 35 3a 62 25 21 38 2b 3d |2. b%!4=|5:b%!8+=|
|00001000| 78 25 3a 62 25 21 31 32 | 2b 3d 79 25 0d 05 3c 18 |x%:b%!12|+=y%..<.|
|00001010| 20 62 25 21 31 36 2b 3d | 78 25 3a 62 25 21 32 30 | b%!16+=|x%:b%!20|
|00001020| 2b 3d 79 25 0d 05 46 2a | 20 62 25 21 32 34 3d 30 |+=y%..F*| b%!24=0|
|00001030| 3a 62 25 21 32 38 3d 30 | 3a 62 25 21 33 32 3d 32 |:b%!28=0|:b%!32=2|
|00001040| 30 30 30 3a 62 25 21 33 | 36 3d 32 30 30 30 0d 05 |000:b%!3|6=2000..|
|00001050| 50 22 20 62 25 21 30 3d | 30 3a c8 99 22 57 69 6d |P" b%!0=|0:.."Wim|
|00001060| 70 5f 44 72 61 67 42 6f | 78 22 2c 20 2c 20 62 25 |p_DragBo|x", , b%|
|00001070| 0d 05 5a 05 e1 0d 05 64 | 04 0d 05 6e 10 dd f2 52 |..Z....d|...n...R|
|00001080| 65 6d 6f 76 65 46 69 6c | 65 0d 05 78 2a 20 e7 20 |emoveFil|e..x* . |
|00001090| 44 61 74 61 25 3e 30 20 | 8c 20 f2 46 72 65 65 42 |Data%>0 |. .FreeB|
|000010a0| 6c 6f 63 6b 28 44 61 74 | 61 25 29 3a 44 61 74 61 |lock(Dat|a%):Data|
|000010b0| 25 3d 30 0d 05 82 2d 20 | e7 20 49 6e 70 75 74 25 |%=0...- |. Input%|
|000010c0| 3e 30 20 8c 20 f2 46 72 | 65 65 42 6c 6f 63 6b 28 |>0 . .Fr|eeBlock(|
|000010d0| 49 6e 70 75 74 25 29 3a | 49 6e 70 75 74 25 3d 30 |Input%):|Input%=0|
|000010e0| 0d 05 8c 05 e1 0d 05 96 | 04 0d 05 a0 22 f4 20 61 |........|....". a|
|000010f0| 20 6d 65 6e 75 20 69 74 | 65 6d 20 68 61 73 20 62 | menu it|em has b|
|00001100| 65 65 6e 20 63 6c 69 63 | 6b 65 64 0d 05 aa 13 dd |een clic|ked.....|
|00001110| f2 6d 65 6e 75 73 65 6c | 65 63 74 69 6f 6e 0d 05 |.menusel|ection..|
|00001120| b4 0d c8 8e 20 62 25 21 | 30 20 ca 0d 05 be 20 20 |.... b%!|0 .... |
|00001130| 20 c9 20 31 3a 51 75 69 | 74 25 3d b9 3a 20 f4 20 | . 1:Qui|t%=.: . |
|00001140| 71 75 69 74 20 61 63 74 | 69 6f 6e 0d 05 c8 05 cb |quit act|ion.....|
|00001150| 0d 05 d2 05 e1 0d 05 dc | 04 0d 05 e6 0d dd f2 42 |........|.......B|
|00001160| 75 74 74 6f 6e 73 0d 05 | f0 09 20 ea 20 6d 24 0d |uttons..|.. . m$.|
|00001170| 05 fa 0f 20 c8 8e 20 62 | 25 21 31 32 20 ca 0d 06 |... .. b|%!12 ...|
|00001180| 04 0b 20 20 20 c9 20 2d | 32 0d 06 0e 15 20 20 20 |.. . -|2.... |
|00001190| 20 20 e7 20 62 25 21 38 | 20 80 20 32 20 8c 0d 06 | . b%!8| . 2 ...|
|000011a0| 18 22 20 20 20 20 20 20 | 20 6d 24 3d 22 49 6e 66 |." | m$="Inf|
|000011b0| 6f 7c 5b 49 6e 66 6f 25 | 5d 2c 51 75 69 74 7c 22 |o|[Info%|],Quit|"|
|000011c0| 0d 06 22 2b 20 20 20 20 | 20 20 20 f2 43 72 65 61 |.."+ | .Crea|
|000011d0| 74 65 4d 65 6e 75 28 32 | 2c 20 4d 65 6e 75 25 2c |teMenu(2|, Menu%,|
|000011e0| 20 4e 61 6d 65 24 2c 20 | 6d 24 29 0d 06 2c 26 20 | Name$, |m$)..,& |
|000011f0| 20 20 20 20 20 20 4d 6f | 75 73 65 58 25 3d 62 25 | Mo|useX%=b%|
|00001200| 21 30 2d 38 30 3a 4d 6f | 75 73 65 59 25 3d 31 38 |!0-80:Mo|useY%=18|
|00001210| 34 0d 06 36 39 20 20 20 | 20 20 20 20 c8 99 22 57 |4..69 | .."W|
|00001220| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00001230| 20 2c 20 4d 65 6e 75 25 | 2c 20 4d 6f 75 73 65 58 | , Menu%|, MouseX|
|00001240| 25 2c 20 4d 6f 75 73 65 | 59 25 0d 06 40 0a 20 20 |%, Mouse|Y%..@. |
|00001250| 20 20 20 cd 0d 06 4a 2e | 20 20 20 c9 20 53 61 76 | ...J.| . Sav|
|00001260| 65 25 3a e7 20 62 25 21 | 31 36 3d 30 20 8c 20 f2 |e%:. b%!|16=0 . .|
|00001270| 49 6e 69 74 44 72 61 67 | 28 53 61 76 65 25 2c 20 |InitDrag|(Save%, |
|00001280| 30 29 0d 06 54 06 20 cb | 0d 06 5e 05 e1 0d 06 68 |0)..T. .|..^....h|
|00001290| 04 0d 06 72 33 dd a4 73 | 28 61 25 29 3a 61 24 3d |...r3..s|(a%):a$=|
|000012a0| 22 22 3a c8 95 20 3f 61 | 25 3e 3d 33 32 3a 61 24 |"":.. ?a|%>=32:a$|
|000012b0| 2b 3d bd 28 3f 61 25 29 | 3a 61 25 2b 3d 31 3a ce |+=.(?a%)|:a%+=1:.|
|000012c0| 3a 3d 61 24 0d 06 7c 04 | 0d 06 86 0b dd f2 45 72 |:=a$..|.|......Er|
|000012d0| 72 6f 72 0d 06 90 1b 20 | c8 99 22 57 69 6d 70 5f |ror.... |.."Wimp_|
|000012e0| 44 72 61 67 42 6f 78 22 | 2c 20 2c 20 2d 31 0d 06 |DragBox"|, , -1..|
|000012f0| 9a 27 20 21 62 25 3d 9f | 3a 24 28 62 25 2b 34 29 |.' !b%=.|:$(b%+4)|
|00001300| 3d f6 24 2b 22 3a 20 61 | 74 20 6c 69 6e 65 20 22 |=.$+": a|t line "|
|00001310| 2b c3 28 9e 29 0d 06 a4 | 27 20 c8 99 22 57 69 6d |+.(.)...|' .."Wim|
|00001320| 70 5f 52 65 70 6f 72 74 | 45 72 72 6f 72 22 2c 20 |p_Report|Error", |
|00001330| 62 25 2c 20 31 2c 20 4e | 61 6d 65 24 0d 06 ae 16 |b%, 1, N|ame$....|
|00001340| 20 c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 66 | .."Hour|glass_Of|
|00001350| 66 22 0d 06 b8 05 e1 0d | 06 c2 04 0d 06 cc 0f dd |f"......|........|
|00001360| f2 64 65 62 75 67 28 41 | 24 29 0d 06 d6 15 20 21 |.debug(A|$).... !|
|00001370| 62 25 3d 9f 3a 24 28 62 | 25 2b 34 29 3d 41 24 0d |b%=.:$(b|%+4)=A$.|
|00001380| 06 e0 27 20 c8 99 22 57 | 69 6d 70 5f 52 65 70 6f |..' .."W|imp_Repo|
|00001390| 72 74 45 72 72 6f 72 22 | 2c 20 62 25 2c 20 31 2c |rtError"|, b%, 1,|
|000013a0| 20 4e 61 6d 65 24 0d 06 | ea 05 e1 0d 06 f4 04 0d | Name$..|........|
|000013b0| 06 fe 12 dd f2 44 61 74 | 61 4c 6f 61 64 28 62 25 |.....Dat|aLoad(b%|
|000013c0| 29 0d 07 08 17 20 ea 20 | 70 24 2c 20 73 25 2c 20 |).... . |p$, s%, |
|000013d0| 6f 62 6a 25 2c 20 70 25 | 0d 07 12 34 20 62 25 21 |obj%, p%|...4 b%!|
|000013e0| 31 32 3d 62 25 21 38 3a | 62 25 21 31 36 3d 34 3a |12=b%!8:|b%!16=4:|
|000013f0| c8 99 22 57 69 6d 70 5f | 53 65 6e 64 4d 65 73 73 |.."Wimp_|SendMess|
|00001400| 61 67 65 22 2c 31 37 2c | 62 25 2c 30 0d 07 1c 1f |age",17,|b%,0....|
|00001410| 20 f4 20 49 46 20 62 25 | 21 31 32 3c 3e 30 20 54 | . IF b%|!12<>0 T|
|00001420| 48 45 4e 20 45 4e 44 50 | 52 4f 43 0d 07 26 11 20 |HEN ENDP|ROC..&. |
|00001430| 70 24 3d a4 73 28 62 25 | 2b 34 34 29 0d 07 30 1e |p$=.s(b%|+44)..0.|
|00001440| 20 c8 99 22 4f 53 5f 46 | 69 6c 65 22 2c 20 35 2c | .."OS_F|ile", 5,|
|00001450| 20 70 24 20 b8 20 6f 62 | 6a 25 0d 07 3a 22 20 e7 | p$ . ob|j%..:" .|
|00001460| 20 6f 62 6a 25 3c 3e 31 | 20 8c 20 85 20 31 2c 20 | obj%<>1| . . 1, |
|00001470| 22 4e 6f 74 20 61 20 66 | 69 6c 65 22 0d 07 44 25 |"Not a f|ile"..D%|
|00001480| 20 73 25 3d a4 46 69 6c | 65 53 69 7a 65 28 70 24 | s%=.Fil|eSize(p$|
|00001490| 29 3a 70 25 3d a4 41 6c | 6c 6f 63 28 73 25 2b 31 |):p%=.Al|loc(s%+1|
|000014a0| 29 0d 07 4e 2b 20 e7 20 | 70 25 3c 3d 30 20 8c 20 |)..N+ . |p%<=0 . |
|000014b0| 85 20 31 2c 20 22 4e 6f | 20 72 6f 6f 6d 20 66 6f |. 1, "No| room fo|
|000014c0| 72 20 74 68 69 73 20 66 | 69 6c 65 22 0d 07 58 1b |r this f|ile"..X.|
|000014d0| 20 e7 20 49 6e 70 75 74 | 25 20 8c 20 f2 52 65 6d | . Input|% . .Rem|
|000014e0| 6f 76 65 46 69 6c 65 0d | 07 62 25 20 c8 99 22 4f |oveFile.|.b% .."O|
|000014f0| 53 5f 46 69 6c 65 22 2c | 20 32 35 35 2c 20 70 24 |S_File",| 255, p$|
|00001500| 2c 20 70 25 3a 70 25 3f | 73 25 3d 30 0d 07 6c 1b |, p%:p%?|s%=0..l.|
|00001510| 20 49 6e 70 75 74 25 3d | 70 25 3a 49 6e 70 75 74 | Input%=|p%:Input|
|00001520| 4c 65 6e 25 3d 73 25 0d | 07 76 3f 20 f2 50 72 6f |Len%=s%.|.v? .Pro|
|00001530| 63 65 73 73 3a f4 20 3d | 3d 20 69 6e 76 6f 6b 65 |cess:. =|= invoke|
|00001540| 20 74 68 65 20 61 70 70 | 6c 69 63 61 74 69 6f 6e | the app|lication|
|00001550| 20 63 6f 6e 76 65 72 73 | 69 6f 6e 20 72 6f 75 74 | convers|ion rout|
|00001560| 69 6e 65 20 3d 3d 0d 07 | 80 2d 20 62 25 21 30 3d |ine ==..|.- b%!0=|
|00001570| 53 61 76 65 25 3a c8 99 | 22 57 69 6d 70 5f 47 65 |Save%:..|"Wimp_Ge|
|00001580| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 20 2c |tWindowS|tate", ,|
|00001590| 20 62 25 0d 07 8a 1e 20 | c8 99 22 57 69 6d 70 5f | b%.... |.."Wimp_|
|000015a0| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 20 2c 20 62 |OpenWind|ow", , b|
|000015b0| 25 0d 07 94 05 e1 0d 07 | 9e 04 0d 07 a8 3c dd a4 |%.......|.....<..|
|000015c0| 46 69 6c 65 53 69 7a 65 | 28 70 24 29 3a c8 99 22 |FileSize|(p$):.."|
|000015d0| 4f 53 5f 46 69 6c 65 22 | 2c 20 35 2c 20 70 24 20 |OS_File"|, 5, p$ |
|000015e0| b8 20 2c 20 2c 20 2c 20 | 2c 20 73 69 7a 65 25 3a |. , , , |, size%:|
|000015f0| 3d 73 69 7a 65 25 0d 07 | b2 04 0d 07 bc 37 dd f2 |=size%..|.....7..|
|00001600| 49 6e 69 74 48 65 61 70 | 28 48 65 61 70 25 2c 20 |InitHeap|(Heap%, |
|00001610| 6c 25 29 3a c8 99 22 4f | 53 5f 48 65 61 70 22 2c |l%):.."O|S_Heap",|
|00001620| 20 30 2c 20 48 65 61 70 | 25 2c 20 2c 20 6c 25 3a | 0, Heap|%, , l%:|
|00001630| e1 0d 07 c6 04 0d 07 d0 | 0f dd a4 41 6c 6c 6f 63 |........|...Alloc|
|00001640| 28 73 25 29 0d 07 da 0d | 20 ea 20 66 25 2c 20 70 |(s%)....| . f%, p|
|00001650| 25 0d 07 e4 2d 20 c8 99 | 22 58 4f 53 5f 48 65 61 |%...- ..|"XOS_Hea|
|00001660| 70 22 2c 20 32 2c 20 48 | 65 61 70 25 2c 20 2c 20 |p", 2, H|eap%, , |
|00001670| 73 25 20 b8 20 2c 20 2c | 20 70 25 3b 66 25 0d 07 |s% . , ,| p%;f%..|
|00001680| ee 0f 20 e7 20 66 25 20 | 80 20 31 20 8c 0d 07 f8 |.. . f% |. 1 ....|
|00001690| 3d 20 20 c8 99 22 57 69 | 6d 70 5f 53 6c 6f 74 53 |= .."Wi|mp_SlotS|
|000016a0| 69 7a 65 22 2c 20 48 65 | 61 70 25 2b 48 65 61 70 |ize", He|ap%+Heap|
|000016b0| 25 21 38 2b 26 31 30 30 | 2b 73 25 2d 26 38 30 30 |%!8+&100|+s%-&800|
|000016c0| 30 2c 20 2d 31 20 b8 20 | 66 25 0d 08 02 0f 20 20 |0, -1 . |f%.... |
|000016d0| 66 25 2b 3d 26 38 30 30 | 30 0d 08 0c 30 20 20 c8 |f%+=&800|0...0 .|
|000016e0| 99 22 4f 53 5f 48 65 61 | 70 22 2c 20 35 2c 20 48 |."OS_Hea|p", 5, H|
|000016f0| 65 61 70 25 2c 20 2c 20 | 66 25 2d 48 65 61 70 25 |eap%, , |f%-Heap%|
|00001700| 2d 48 65 61 70 25 21 31 | 32 0d 08 16 2a 20 20 c8 |-Heap%!1|2...* .|
|00001710| 99 22 4f 53 5f 48 65 61 | 70 22 2c 20 32 2c 20 48 |."OS_Hea|p", 2, H|
|00001720| 65 61 70 25 2c 20 2c 20 | 73 25 20 b8 20 2c 20 2c |eap%, , |s% . , ,|
|00001730| 20 70 25 0d 08 20 06 20 | cd 0d 08 2a 07 3d 70 25 | p%.. . |...*.=p%|
|00001740| 0d 08 34 04 0d 08 3e 15 | dd f2 46 72 65 65 42 6c |..4...>.|..FreeBl|
|00001750| 6f 63 6b 28 f8 20 70 25 | 29 0d 08 48 10 20 e7 20 |ock(. p%|)..H. . |
|00001760| 70 25 3c 3d 30 20 8c 20 | e1 0d 08 52 1e 20 c8 99 |p%<=0 . |...R. ..|
|00001770| 22 4f 53 5f 48 65 61 70 | 22 2c 20 33 2c 20 48 65 |"OS_Heap|", 3, He|
|00001780| 61 70 25 2c 20 70 25 0d | 08 5c 2e 20 c8 99 22 4f |ap%, p%.|.\. .."O|
|00001790| 53 5f 48 65 61 70 22 2c | 20 35 2c 20 48 65 61 70 |S_Heap",| 5, Heap|
|000017a0| 25 2c 20 2c 20 48 65 61 | 70 25 21 38 2d 48 65 61 |%, , Hea|p%!8-Hea|
|000017b0| 70 25 21 31 32 0d 08 66 | 30 20 c8 99 22 57 69 6d |p%!12..f|0 .."Wim|
|000017c0| 70 5f 53 6c 6f 74 53 69 | 7a 65 22 2c 20 48 65 61 |p_SlotSi|ze", Hea|
|000017d0| 70 25 2b 48 65 61 70 25 | 21 31 32 2d 26 38 30 30 |p%+Heap%|!12-&800|
|000017e0| 30 2c 20 2d 31 0d 08 70 | 0a 20 70 25 3d 2d 31 0d |0, -1..p|. p%=-1.|
|000017f0| 08 7a 05 e1 0d 08 84 04 | 0d 08 8e 0c dd f2 52 65 |.z......|......Re|
|00001800| 64 72 61 77 0d 08 98 2b | 20 20 f4 20 2d 20 61 6c |draw...+| . - al|
|00001810| 6c 20 74 68 65 73 65 20 | 77 69 6e 64 6f 77 73 20 |l these |windows |
|00001820| 61 72 65 20 61 75 74 6f | 6d 61 74 69 63 20 2d 0d |are auto|matic -.|
|00001830| 08 a2 05 e1 0d 08 ac 04 | 0d 08 b6 10 dd f2 43 68 |........|......Ch|
|00001840| 61 6e 67 65 4d 6f 64 65 | 0d 08 c0 2b 20 20 f4 20 |angeMode|...+ . |
|00001850| 2d 20 61 6c 6c 20 74 68 | 65 73 65 20 77 69 6e 64 |- all th|ese wind|
|00001860| 6f 77 73 20 61 72 65 20 | 61 75 74 6f 6d 61 74 69 |ows are |automati|
|00001870| 63 20 2d 0d 08 ca 05 e1 | 0d 08 d4 04 0d 08 de 2d |c -.....|.......-|
|00001880| dd f2 43 72 65 61 74 65 | 4d 65 6e 75 28 6e 75 6d |..Create|Menu(num|
|00001890| 25 2c 20 73 74 61 72 74 | 25 2c 20 74 69 74 6c 65 |%, start|%, title|
|000018a0| 24 2c 20 6d 65 6e 75 24 | 29 0d 08 e8 2f 20 ea 20 |$, menu$|).../ . |
|000018b0| 63 6f 64 65 32 24 2c 20 | 74 31 24 2c 20 63 6f 64 |code2$, |t1$, cod|
|000018c0| 65 24 2c 20 77 69 64 74 | 68 25 2c 20 6d 62 25 2c |e$, widt|h%, mb%,|
|000018d0| 20 73 75 62 70 74 72 25 | 0d 08 f2 19 20 77 69 64 | subptr%|.... wid|
|000018e0| 74 68 25 3d 31 36 2a a9 | 74 69 74 6c 65 24 2d 31 |th%=16*.|title$-1|
|000018f0| 36 0d 08 fc 21 20 6d 62 | 25 3d 73 74 61 72 74 25 |6...! mb|%=start%|
|00001900| 3a 24 6d 62 25 3d c0 74 | 69 74 6c 65 24 2c 20 31 |:$mb%=.t|itle$, 1|
|00001910| 31 29 0d 09 06 12 20 6d | 62 25 21 31 32 3d 26 37 |1).... m|b%!12=&7|
|00001920| 30 32 30 37 0d 09 10 17 | 20 6d 62 25 21 32 30 3d |0207....| mb%!20=|
|00001930| 34 34 3a 6d 62 25 21 32 | 34 3d 30 0d 09 1a 0c 20 |44:mb%!2|4=0.... |
|00001940| 6d 62 25 2b 3d 32 38 0d | 09 24 0d 20 74 24 3d 6d |mb%+=28.|.$. t$=m|
|00001950| 65 6e 75 24 0d 09 2e 12 | 20 e3 20 49 25 3d 31 20 |enu$....| . I%=1 |
|00001960| b8 20 6e 75 6d 25 0d 09 | 38 10 20 20 73 75 62 70 |. num%..|8. subp|
|00001970| 74 72 25 3d 2d 31 0d 09 | 42 1b 20 20 74 31 24 3d |tr%=-1..|B. t1$=|
|00001980| c0 74 24 2c 20 a7 74 24 | 2c 20 22 2c 22 29 2d 31 |.t$, .t$|, ",")-1|
|00001990| 29 0d 09 4c 20 20 20 74 | 69 74 6c 65 24 3d c0 74 |)..L t|itle$=.t|
|000019a0| 31 24 2c 20 a7 74 31 24 | 2c 20 22 7c 22 29 2d 31 |1$, .t1$|, "|")-1|
|000019b0| 29 0d 09 56 1f 20 20 63 | 6f 64 65 24 3d c1 74 31 |)..V. c|ode$=.t1|
|000019c0| 24 2c 20 a7 74 31 24 2c | 20 22 7c 22 29 2b 31 29 |$, .t1$,| "|")+1)|
|000019d0| 0d 09 60 16 20 20 e7 20 | a7 63 6f 64 65 24 2c 20 |..`. . |.code$, |
|000019e0| 22 5b 22 29 20 8c 0d 09 | 6a 25 20 20 20 63 6f 64 |"[") ...|j% cod|
|000019f0| 65 32 24 3d c1 63 6f 64 | 65 24 2c 20 a7 63 6f 64 |e2$=.cod|e$, .cod|
|00001a00| 65 24 2c 20 22 5b 22 29 | 2b 31 29 0d 09 74 2a 20 |e$, "[")|+1)..t* |
|00001a10| 20 20 73 75 62 70 74 72 | 25 3d a0 20 c0 63 6f 64 | subptr|%=. .cod|
|00001a20| 65 32 24 2c 20 a7 63 6f | 64 65 32 24 2c 20 22 5d |e2$, .co|de2$, "]|
|00001a30| 22 29 2d 31 29 0d 09 7e | 07 20 20 cd 0d 09 88 1c |")-1)..~|. .....|
|00001a40| 20 20 24 28 6d 62 25 2b | 31 32 29 3d c0 74 69 74 | $(mb%+|12)=.tit|
|00001a50| 6c 65 24 2c 20 31 31 29 | 0d 09 92 33 20 20 e7 20 |le$, 11)|...3 . |
|00001a60| 77 69 64 74 68 25 3c 31 | 36 2a a9 74 69 74 6c 65 |width%<1|6*.title|
|00001a70| 24 2b 31 36 20 8c 20 77 | 69 64 74 68 25 3d 31 36 |$+16 . w|idth%=16|
|00001a80| 2a a9 74 69 74 6c 65 24 | 2b 31 36 0d 09 9c 1a 20 |*.title$|+16.... |
|00001a90| 20 74 24 3d c1 74 24 2c | 20 a7 74 24 2c 20 22 2c | t$=.t$,| .t$, ",|
|00001aa0| 22 29 2b 31 29 0d 09 a6 | 0d 20 20 6d 62 25 21 30 |")+1)...|. mb%!0|
|00001ab0| 3d 30 0d 09 b0 13 20 20 | 6d 62 25 21 34 3d 73 75 |=0.... |mb%!4=su|
|00001ac0| 62 70 74 72 25 0d 09 ba | 14 20 20 6d 62 25 21 38 |bptr%...|. mb%!8|
|00001ad0| 3d 26 37 30 30 30 30 32 | 31 0d 09 c4 0d 20 20 6d |=&700002|1.... m|
|00001ae0| 62 25 2b 3d 32 34 0d 09 | ce 06 20 ed 0d 09 d8 1c |b%+=24..|.. .....|
|00001af0| 20 6d 62 25 21 2d 32 34 | 3d 28 6d 62 25 21 2d 32 | mb%!-24|=(mb%!-2|
|00001b00| 34 20 84 20 26 38 30 29 | 0d 09 e2 15 20 73 74 61 |4 . &80)|.... sta|
|00001b10| 72 74 25 21 31 36 3d 77 | 69 64 74 68 25 0d 09 ec |rt%!16=w|idth%...|
|00001b20| 05 e1 0d 09 f6 04 0d 0a | 00 04 0d 0a 0a 2b f4 20 |........|.....+. |
|00001b30| 73 65 74 73 20 6f 72 20 | 63 6c 65 61 72 73 20 22 |sets or |clears "|
|00001b40| 67 72 65 79 65 64 2d 6f | 75 74 22 20 6d 65 6e 75 |greyed-o|ut" menu|
|00001b50| 20 66 6c 61 67 0d 0a 14 | 3c dd f2 53 68 61 64 65 | flag...|<..Shade|
|00001b60| 28 70 25 2c 20 6e 25 29 | 3a 70 25 2b 3d 4d 65 6e |(p%, n%)|:p%+=Men|
|00001b70| 75 25 2b 6e 25 2a 32 34 | 2b 32 38 3a 70 25 21 38 |u%+n%*24|+28:p%!8|
|00001b80| 3d 70 25 21 38 20 84 20 | 26 34 30 30 30 30 30 3a |=p%!8 . |&400000:|
|00001b90| e1 0d 0a 1e 04 0d 0a 28 | 1b f4 20 73 65 74 73 20 |.......(|.. sets |
|00001ba0| 22 74 69 63 6b 22 20 6d | 65 6e 75 20 66 6c 61 67 |"tick" m|enu flag|
|00001bb0| 0d 0a 32 2e dd f2 74 69 | 63 6b 28 6e 25 29 3a 70 |..2...ti|ck(n%):p|
|00001bc0| 25 3d 4d 65 6e 75 25 2b | 6e 25 2a 32 34 2b 32 38 |%=Menu%+|n%*24+28|
|00001bd0| 3a 21 70 25 3d 21 70 25 | 20 84 20 31 3a e1 0d 0a |:!p%=!p%| . 1:...|
|00001be0| 3c 04 0d 0a 46 1d f4 20 | 72 65 73 65 74 73 20 22 |<...F.. |resets "|
|00001bf0| 74 69 63 6b 22 20 6d 65 | 6e 75 20 66 6c 61 67 0d |tick" me|nu flag.|
|00001c00| 0a 50 31 dd f2 75 6e 74 | 69 63 6b 28 6e 25 29 3a |.P1..unt|ick(n%):|
|00001c10| 70 25 3d 4d 65 6e 75 25 | 2b 6e 25 2a 32 34 2b 32 |p%=Menu%|+n%*24+2|
|00001c20| 38 3a 21 70 25 3d 21 70 | 25 20 80 20 2d 32 3a e1 |8:!p%=!p|% . -2:.|
|00001c30| 0d 0a 5a 04 0d 0a 64 26 | f4 20 72 65 74 75 72 6e |..Z...d&|. return|
|00001c40| 73 20 61 20 70 6f 69 6e | 74 65 72 20 74 6f 20 61 |s a poin|ter to a|
|00001c50| 20 74 65 78 74 20 69 63 | 6f 6e 0d 0a 6e 42 dd a4 | text ic|on..nB..|
|00001c60| 69 28 77 25 2c 20 69 25 | 29 3a 62 25 21 30 3d 77 |i(w%, i%|):b%!0=w|
|00001c70| 25 3a 62 25 21 34 3d 69 | 25 3a c8 99 22 57 69 6d |%:b%!4=i|%:.."Wim|
|00001c80| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00001c90| 20 2c 20 62 25 3a 3d 62 | 25 21 32 38 0d 0a 78 04 | , b%:=b|%!28..x.|
|00001ca0| 0d 0a 82 04 0d 0a 8c 40 | f4 20 3d 3d 3d 3d 3d 3d |.......@|. ======|
|00001cb0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001cc0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001cd0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001ce0| 3d 3d 3d 3d 0d 0a 96 40 | f4 20 3d 3d 3d 20 41 70 |====...@|. === Ap|
|00001cf0| 70 6c 69 63 61 74 69 6f | 6e 20 73 70 65 63 69 66 |plicatio|n specif|
|00001d00| 69 63 20 72 6f 75 74 69 | 6e 65 73 20 66 6f 6c 6c |ic routi|nes foll|
|00001d10| 6f 77 20 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |ow =====|========|
|00001d20| 3d 3d 3d 3d 0d 0a a0 40 | f4 20 3d 3d 3d 3d 3d 3d |====...@|. ======|
|00001d30| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001d40| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001d50| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001d60| 3d 3d 3d 3d 0d 0a aa 04 | 0d 0a b4 04 0d 0a be 0d |====....|........|
|00001d70| dd f2 50 72 6f 63 65 73 | 73 0d 0a c8 08 ea 20 49 |..Proces|s..... I|
|00001d80| 25 0d 0a d2 14 c8 99 22 | 48 6f 75 72 67 6c 61 73 |%......"|Hourglas|
|00001d90| 73 5f 4f 6e 22 0d 0a dc | 0d 64 25 3d 49 6e 70 75 |s_On"...|.d%=Inpu|
|00001da0| 74 25 0d 0a e6 20 44 61 | 74 61 25 3d a4 41 6c 6c |t%... Da|ta%=.All|
|00001db0| 6f 63 28 49 6e 70 75 74 | 4c 65 6e 25 20 2b 32 30 |oc(Input|Len% +20|
|00001dc0| 30 29 0d 0a f0 0c 6f 25 | 3d 44 61 74 61 25 0d 0a |0)....o%|=Data%..|
|00001dd0| fa 05 f5 0d 0b 04 0e 20 | 20 41 24 3d a4 67 65 74 |....... | A$=.get|
|00001de0| 6c 0d 0b 0e 10 20 20 e7 | 20 41 24 3c 3e 22 22 20 |l.... .| A$<>"" |
|00001df0| 8c 0d 0b 18 27 20 20 20 | 20 e7 20 c0 41 24 2c 31 |....' | . .A$,1|
|00001e00| 29 3d 22 3c 22 20 8c 20 | f2 74 61 67 20 8b 20 f2 |)="<" . |.tag . .|
|00001e10| 74 65 78 74 28 41 24 29 | 0d 0b 22 07 20 20 cd 0d |text(A$)|..". ..|
|00001e20| 0b 2c 1a fd 20 64 25 2d | 49 6e 70 75 74 25 3e 3d |.,.. d%-|Input%>=|
|00001e30| 49 6e 70 75 74 4c 65 6e | 25 0d 0b 36 15 44 61 74 |InputLen|%..6.Dat|
|00001e40| 61 4c 65 6e 25 3d 6f 25 | 2d 44 61 74 61 25 0d 0b |aLen%=o%|-Data%..|
|00001e50| 40 15 c8 99 22 48 6f 75 | 72 67 6c 61 73 73 5f 4f |@..."Hou|rglass_O|
|00001e60| 66 66 22 0d 0b 4a 05 e1 | 0d 0b 54 04 0d 0b 5e 11 |ff"..J..|..T...^.|
|00001e70| dd f2 74 65 78 74 28 74 | 65 78 74 24 29 0d 0b 68 |..text(t|ext$)..h|
|00001e80| 21 f4 20 74 68 69 73 20 | 70 72 6f 63 65 64 75 72 |!. this |procedur|
|00001e90| 65 20 69 73 20 72 65 63 | 75 72 73 69 76 65 0d 0b |e is rec|ursive..|
|00001ea0| 72 08 ea 20 4c 25 0d 0b | 7c 12 4c 25 3d a7 74 65 |r.. L%..||.L%=.te|
|00001eb0| 78 74 24 2c 22 26 22 29 | 0d 0b 86 1a e7 20 4c 25 |xt$,"&")|..... L%|
|00001ec0| 3d 30 20 8c 20 f2 6f 75 | 74 28 74 65 78 74 24 29 |=0 . .ou|t(text$)|
|00001ed0| 3a e1 0d 0b 90 23 f4 20 | 2d 20 61 6e 20 61 6d 70 |:....#. |- an amp|
|00001ee0| 65 72 73 61 6e 64 20 68 | 61 73 20 62 65 65 6e 20 |ersand h|as been |
|00001ef0| 66 6f 75 6e 64 0d 0b 9a | 16 f2 6f 75 74 28 c0 74 |found...|..out(.t|
|00001f00| 65 78 74 24 2c 4c 25 2d | 31 29 29 0d 0b a4 16 74 |ext$,L%-|1))....t|
|00001f10| 65 78 74 24 3d c1 74 65 | 78 74 24 2c 4c 25 2b 31 |ext$=.te|xt$,L%+1|
|00001f20| 29 0d 0b ae 12 4c 25 3d | a7 74 65 78 74 24 2c 22 |)....L%=|.text$,"|
|00001f30| 3b 22 29 0d 0b b8 1e e7 | 20 4c 25 3d 30 20 8c 20 |;").....| L%=0 . |
|00001f40| f2 6f 75 74 28 22 26 22 | 2b 74 65 78 74 24 29 3a |.out("&"|+text$):|
|00001f50| e1 0d 0b c2 2e f4 20 2d | 20 61 6e 64 20 61 6d 70 |...... -| and amp|
|00001f60| 65 72 73 61 6e 64 20 61 | 6e 64 20 73 65 6d 69 63 |ersand a|nd semic|
|00001f70| 6f 6c 6f 6e 20 77 65 72 | 65 20 66 6f 75 6e 64 0d |olon wer|e found.|
|00001f80| 0b cc 1a f2 73 70 65 63 | 69 61 6c 28 c0 74 65 78 |....spec|ial(.tex|
|00001f90| 74 24 2c 4c 25 2d 31 29 | 29 0d 0b d6 17 f2 74 65 |t$,L%-1)|).....te|
|00001fa0| 78 74 28 c1 74 65 78 74 | 24 2c 4c 25 2b 31 29 29 |xt(.text|$,L%+1))|
|00001fb0| 0d 0b e0 05 e1 0d 0b ea | 04 0d 0b f4 11 dd f2 73 |........|.......s|
|00001fc0| 70 65 63 69 61 6c 28 53 | 24 29 0d 0b fe 12 e7 20 |pecial(S|$)..... |
|00001fd0| c0 53 24 2c 31 29 3d 22 | 23 22 20 8c 0d 0c 08 12 |.S$,1)="|#" .....|
|00001fe0| 20 20 53 25 3d bb 28 c1 | 53 24 2c 32 29 29 0d 0c | S%=.(.|S$,2))..|
|00001ff0| 12 26 20 20 e7 20 53 25 | 3e 33 31 20 80 20 53 25 |.& . S%|>31 . S%|
|00002000| 3c 32 35 35 20 8c 20 f2 | 6f 75 74 28 bd 28 53 25 |<255 . .|out(.(S%|
|00002010| 29 29 3a e1 0d 0c 1c 05 | cd 0d 0c 26 3c f4 20 2d |)):.....|...&<. -|
|00002020| 20 72 65 6d 65 6d 62 65 | 72 20 77 68 65 74 68 65 | remembe|r whethe|
|00002030| 72 20 74 68 65 20 66 69 | 72 73 74 20 62 79 74 65 |r the fi|rst byte|
|00002040| 20 69 73 20 75 70 70 65 | 72 20 63 61 73 65 20 6f | is uppe|r case o|
|00002050| 72 20 6e 6f 74 0d 0c 30 | 1d e7 20 53 24 3c 3d 22 |r not..0|.. S$<="|
|00002060| 5a 22 20 8c 20 75 70 25 | 3d b9 20 8b 20 75 70 25 |Z" . up%|=. . up%|
|00002070| 3d a3 0d 0c 3a 1b f4 20 | 63 6f 6e 76 65 72 74 20 |=...:.. |convert |
|00002080| 74 6f 20 75 70 70 65 72 | 20 63 61 73 65 0d 0c 44 |to upper| case..D|
|00002090| 12 e3 20 49 25 3d 31 20 | b8 20 a9 28 53 24 29 0d |.. I%=1 |. .(S$).|
|000020a0| 0c 4e 15 20 20 43 25 3d | 97 28 c1 53 24 2c 49 25 |.N. C%=|.(.S$,I%|
|000020b0| 2c 31 29 29 0d 0c 58 19 | 20 20 e7 20 43 25 3e 3d |,1))..X.| . C%>=|
|000020c0| 61 25 20 80 20 43 25 3c | 3d 7a 25 20 8c 0d 0c 62 |a% . C%<|=z% ...b|
|000020d0| 13 20 20 20 20 43 25 3d | 43 25 2b 41 25 2d 61 25 |. C%=|C%+A%-a%|
|000020e0| 0d 0c 6c 24 20 20 20 20 | 53 24 3d c0 53 24 2c 49 |..l$ |S$=.S$,I|
|000020f0| 25 2d 31 29 2b bd 28 43 | 25 29 2b c1 53 24 2c 49 |%-1)+.(C|%)+.S$,I|
|00002100| 25 2b 31 29 0d 0c 76 07 | 20 20 cd 0d 0c 80 05 ed |%+1)..v.| ......|
|00002110| 0d 0c 8a 0b c8 8e 20 53 | 24 20 ca 0d 0c 94 1c 20 |...... S|$ ..... |
|00002120| 20 c9 20 22 4c 54 22 20 | 20 20 20 20 20 3a f2 6f | . "LT" | :.o|
|00002130| 75 74 28 22 3c 22 29 0d | 0c 9e 1c 20 20 c9 20 22 |ut("<").|... . "|
|00002140| 47 54 22 20 20 20 20 20 | 20 3a f2 6f 75 74 28 22 |GT" | :.out("|
|00002150| 3e 22 29 0d 0c a8 1c 20 | 20 c9 20 22 41 4d 50 22 |>").... | . "AMP"|
|00002160| 20 20 20 20 20 3a f2 6f | 75 74 28 22 26 22 29 0d | :.o|ut("&").|
|00002170| 0c b2 30 20 20 c9 20 22 | 41 45 4c 49 47 22 20 20 |..0 . "|AELIG" |
|00002180| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002190| c6 22 29 20 8b 20 f2 6f | 75 74 28 22 e6 22 29 0d |.") . .o|ut(".").|
|000021a0| 0c bc 30 20 20 c9 20 22 | 41 41 43 55 54 45 22 20 |..0 . "|AACUTE" |
|000021b0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000021c0| c1 22 29 20 8b 20 f2 6f | 75 74 28 22 e1 22 29 0d |.") . .o|ut(".").|
|000021d0| 0c c6 30 20 20 c9 20 22 | 41 43 49 52 43 22 20 20 |..0 . "|ACIRC" |
|000021e0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000021f0| c2 22 29 20 8b 20 f2 6f | 75 74 28 22 e2 22 29 0d |.") . .o|ut(".").|
|00002200| 0c d0 30 20 20 c9 20 22 | 41 47 52 41 56 45 22 20 |..0 . "|AGRAVE" |
|00002210| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002220| c0 22 29 20 8b 20 f2 6f | 75 74 28 22 e0 22 29 0d |.") . .o|ut(".").|
|00002230| 0c da 30 20 20 c9 20 22 | 41 52 49 4e 47 22 20 20 |..0 . "|ARING" |
|00002240| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002250| c5 22 29 20 8b 20 f2 6f | 75 74 28 22 e5 22 29 0d |.") . .o|ut(".").|
|00002260| 0c e4 30 20 20 c9 20 22 | 41 54 49 4c 44 45 22 20 |..0 . "|ATILDE" |
|00002270| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002280| c3 22 29 20 8b 20 f2 6f | 75 74 28 22 e3 22 29 0d |.") . .o|ut(".").|
|00002290| 0c ee 30 20 20 c9 20 22 | 41 55 4d 4c 22 20 20 20 |..0 . "|AUML" |
|000022a0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000022b0| c4 22 29 20 8b 20 f2 6f | 75 74 28 22 e4 22 29 0d |.") . .o|ut(".").|
|000022c0| 0c f8 30 20 20 c9 20 22 | 43 43 45 44 49 4c 22 20 |..0 . "|CCEDIL" |
|000022d0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000022e0| c7 22 29 20 8b 20 f2 6f | 75 74 28 22 e7 22 29 0d |.") . .o|ut(".").|
|000022f0| 0d 02 30 20 20 c9 20 22 | 45 54 48 22 20 20 20 20 |..0 . "|ETH" |
|00002300| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002310| d0 22 29 20 8b 20 f2 6f | 75 74 28 22 f0 22 29 0d |.") . .o|ut(".").|
|00002320| 0d 0c 30 20 20 c9 20 22 | 45 41 43 55 54 45 22 20 |..0 . "|EACUTE" |
|00002330| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002340| c9 22 29 20 8b 20 f2 6f | 75 74 28 22 e9 22 29 0d |.") . .o|ut(".").|
|00002350| 0d 16 30 20 20 c9 20 22 | 45 43 49 52 43 22 20 20 |..0 . "|ECIRC" |
|00002360| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002370| ca 22 29 20 8b 20 f2 6f | 75 74 28 22 ea 22 29 0d |.") . .o|ut(".").|
|00002380| 0d 20 30 20 20 c9 20 22 | 45 47 52 41 56 45 22 20 |. 0 . "|EGRAVE" |
|00002390| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000023a0| c8 22 29 20 8b 20 f2 6f | 75 74 28 22 e8 22 29 0d |.") . .o|ut(".").|
|000023b0| 0d 2a 30 20 20 c9 20 22 | 45 55 4d 4c 22 20 20 20 |.*0 . "|EUML" |
|000023c0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000023d0| cb 22 29 20 8b 20 f2 6f | 75 74 28 22 eb 22 29 0d |.") . .o|ut(".").|
|000023e0| 0d 34 30 20 20 c9 20 22 | 49 41 43 55 54 45 22 20 |.40 . "|IACUTE" |
|000023f0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002400| cd 22 29 20 8b 20 f2 6f | 75 74 28 22 ed 22 29 0d |.") . .o|ut(".").|
|00002410| 0d 3e 30 20 20 c9 20 22 | 49 43 49 52 43 22 20 20 |.>0 . "|ICIRC" |
|00002420| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002430| ce 22 29 20 8b 20 f2 6f | 75 74 28 22 ee 22 29 0d |.") . .o|ut(".").|
|00002440| 0d 48 30 20 20 c9 20 22 | 49 47 52 41 56 45 22 20 |.H0 . "|IGRAVE" |
|00002450| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002460| cc 22 29 20 8b 20 f2 6f | 75 74 28 22 ec 22 29 0d |.") . .o|ut(".").|
|00002470| 0d 52 30 20 20 c9 20 22 | 49 55 4d 4c 22 20 20 20 |.R0 . "|IUML" |
|00002480| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002490| cf 22 29 20 8b 20 f2 6f | 75 74 28 22 ef 22 29 0d |.") . .o|ut(".").|
|000024a0| 0d 5c 30 20 20 c9 20 22 | 4e 54 49 4c 44 45 22 20 |.\0 . "|NTILDE" |
|000024b0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000024c0| d1 22 29 20 8b 20 f2 6f | 75 74 28 22 f1 22 29 0d |.") . .o|ut(".").|
|000024d0| 0d 66 30 20 20 c9 20 22 | 4f 41 43 55 54 45 22 20 |.f0 . "|OACUTE" |
|000024e0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000024f0| d3 22 29 20 8b 20 f2 6f | 75 74 28 22 f3 22 29 0d |.") . .o|ut(".").|
|00002500| 0d 70 30 20 20 c9 20 22 | 4f 43 49 52 43 22 20 20 |.p0 . "|OCIRC" |
|00002510| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002520| d4 22 29 20 8b 20 f2 6f | 75 74 28 22 f4 22 29 0d |.") . .o|ut(".").|
|00002530| 0d 7a 30 20 20 c9 20 22 | 4f 47 52 41 56 45 22 20 |.z0 . "|OGRAVE" |
|00002540| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002550| d2 22 29 20 8b 20 f2 6f | 75 74 28 22 f2 22 29 0d |.") . .o|ut(".").|
|00002560| 0d 84 30 20 20 c9 20 22 | 4f 53 4c 41 53 48 22 20 |..0 . "|OSLASH" |
|00002570| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002580| d8 22 29 20 8b 20 f2 6f | 75 74 28 22 f8 22 29 0d |.") . .o|ut(".").|
|00002590| 0d 8e 30 20 20 c9 20 22 | 4f 54 49 4c 44 45 22 20 |..0 . "|OTILDE" |
|000025a0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000025b0| d5 22 29 20 8b 20 f2 6f | 75 74 28 22 f5 22 29 0d |.") . .o|ut(".").|
|000025c0| 0d 98 30 20 20 c9 20 22 | 4f 55 4d 4c 22 20 20 20 |..0 . "|OUML" |
|000025d0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000025e0| d6 22 29 20 8b 20 f2 6f | 75 74 28 22 f6 22 29 0d |.") . .o|ut(".").|
|000025f0| 0d a2 30 20 20 c9 20 22 | 54 48 4f 52 4e 22 20 20 |..0 . "|THORN" |
|00002600| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002610| de 22 29 20 8b 20 f2 6f | 75 74 28 22 fe 22 29 0d |.") . .o|ut(".").|
|00002620| 0d ac 30 20 20 c9 20 22 | 55 41 43 55 54 45 22 20 |..0 . "|UACUTE" |
|00002630| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002640| da 22 29 20 8b 20 f2 6f | 75 74 28 22 fa 22 29 0d |.") . .o|ut(".").|
|00002650| 0d b6 30 20 20 c9 20 22 | 55 43 49 52 43 22 20 20 |..0 . "|UCIRC" |
|00002660| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002670| db 22 29 20 8b 20 f2 6f | 75 74 28 22 fb 22 29 0d |.") . .o|ut(".").|
|00002680| 0d c0 30 20 20 c9 20 22 | 55 47 52 41 56 45 22 20 |..0 . "|UGRAVE" |
|00002690| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000026a0| d9 22 29 20 8b 20 f2 6f | 75 74 28 22 f9 22 29 0d |.") . .o|ut(".").|
|000026b0| 0d ca 30 20 20 c9 20 22 | 55 55 4d 4c 22 20 20 20 |..0 . "|UUML" |
|000026c0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|000026d0| dc 22 29 20 8b 20 f2 6f | 75 74 28 22 fc 22 29 0d |.") . .o|ut(".").|
|000026e0| 0d d4 30 20 20 c9 20 22 | 59 41 43 55 54 45 22 20 |..0 . "|YACUTE" |
|000026f0| 20 3a e7 20 75 70 25 20 | 8c 20 f2 6f 75 74 28 22 | :. up% |. .out("|
|00002700| dd 22 29 20 8b 20 f2 6f | 75 74 28 22 fd 22 29 0d |.") . .o|ut(".").|
|00002710| 0d de 1c 20 20 c9 20 22 | 53 5a 4c 49 47 22 20 20 |... . "|SZLIG" |
|00002720| 20 3a f2 6f 75 74 28 22 | df 22 29 0d 0d e8 1c 20 | :.out("|.").... |
|00002730| 20 c9 20 22 59 55 4d 4c | 22 20 20 20 20 3a f2 6f | . "YUML|" :.o|
|00002740| 75 74 28 22 ff 22 29 0d | 0d f2 1d 20 20 c9 20 22 |ut(".").|... . "|
|00002750| 51 55 4f 54 22 20 20 20 | 20 3a f2 6f 75 74 28 22 |QUOT" | :.out("|
|00002760| 22 22 22 29 0d 0d fc 1c | 20 20 c9 20 22 4e 44 41 |""")....| . "NDA|
|00002770| 53 48 22 20 20 20 3a f2 | 6f 75 74 28 22 99 22 29 |SH" :.|out(".")|
|00002780| 0d 0e 06 1c 20 20 c9 20 | 22 4d 44 41 53 48 22 20 |.... . |"MDASH" |
|00002790| 20 20 3a f2 6f 75 74 28 | 22 98 22 29 0d 0e 10 1c | :.out(|".")....|
|000027a0| 20 20 c9 20 22 45 4e 53 | 50 22 20 20 20 20 3a f2 | . "ENS|P" :.|
|000027b0| 6f 75 74 28 22 20 22 29 | 0d 0e 1a 1c 20 20 c9 20 |out(" ")|.... . |
|000027c0| 22 45 4d 53 50 22 20 20 | 20 20 3a f2 6f 75 74 28 |"EMSP" | :.out(|
|000027d0| 22 20 22 29 0d 0e 24 1c | 20 20 c9 20 22 4e 42 53 |" ")..$.| . "NBS|
|000027e0| 50 22 20 20 20 20 3a f2 | 6f 75 74 28 22 a0 22 29 |P" :.|out(".")|
|000027f0| 0d 0e 2e 1c 20 20 c9 20 | 22 43 4f 50 59 22 20 20 |.... . |"COPY" |
|00002800| 20 20 3a f2 6f 75 74 28 | 22 a9 22 29 0d 0e 38 1c | :.out(|".")..8.|
|00002810| 20 20 c9 20 22 54 52 41 | 44 45 22 20 20 20 3a f2 | . "TRA|DE" :.|
|00002820| 6f 75 74 28 22 8d 22 29 | 0d 0e 42 1c 20 20 c9 20 |out(".")|..B. . |
|00002830| 22 52 45 47 22 20 20 20 | 20 20 3a f2 6f 75 74 28 |"REG" | :.out(|
|00002840| 22 ae 22 29 0d 0e 4c 1c | 20 20 c9 20 22 49 45 58 |".")..L.| . "IEX|
|00002850| 43 4c 22 20 20 20 3a f2 | 6f 75 74 28 22 a1 22 29 |CL" :.|out(".")|
|00002860| 0d 0e 56 1c 20 20 c9 20 | 22 50 4f 55 4e 44 22 20 |..V. . |"POUND" |
|00002870| 20 20 3a f2 6f 75 74 28 | 22 a3 22 29 0d 0e 60 1c | :.out(|".")..`.|
|00002880| 20 20 c9 20 22 59 45 4e | 22 20 20 20 20 20 3a f2 | . "YEN|" :.|
|00002890| 6f 75 74 28 22 a5 22 29 | 0d 0e 6a 1c 20 20 c9 20 |out(".")|..j. . |
|000028a0| 22 42 52 56 42 41 52 22 | 20 20 3a f2 6f 75 74 28 |"BRVBAR"| :.out(|
|000028b0| 22 a6 22 29 0d 0e 74 1c | 20 20 c9 20 22 53 45 43 |".")..t.| . "SEC|
|000028c0| 54 22 20 20 20 20 3a f2 | 6f 75 74 28 22 a7 22 29 |T" :.|out(".")|
|000028d0| 0d 0e 7e 1c 20 20 c9 20 | 22 4c 41 51 55 4f 22 20 |..~. . |"LAQUO" |
|000028e0| 20 20 3a f2 6f 75 74 28 | 22 ab 22 29 0d 0e 88 1c | :.out(|".")....|
|000028f0| 20 20 c9 20 22 52 41 51 | 55 4f 22 20 20 20 3a f2 | . "RAQ|UO" :.|
|00002900| 6f 75 74 28 22 bb 22 29 | 0d 0e 92 1c 20 20 c9 20 |out(".")|.... . |
|00002910| 22 4e 4f 54 22 20 20 20 | 20 20 3a f2 6f 75 74 28 |"NOT" | :.out(|
|00002920| 22 ac 22 29 0d 0e 9c 1c | 20 20 c9 20 22 44 45 47 |".")....| . "DEG|
|00002930| 22 20 20 20 20 20 3a f2 | 6f 75 74 28 22 b0 22 29 |" :.|out(".")|
|00002940| 0d 0e a6 1c 20 20 c9 20 | 22 50 4c 55 53 4d 4e 22 |.... . |"PLUSMN"|
|00002950| 20 20 3a f2 6f 75 74 28 | 22 b1 22 29 0d 0e b0 1c | :.out(|".")....|
|00002960| 20 20 c9 20 22 53 55 50 | 31 22 20 20 20 20 3a f2 | . "SUP|1" :.|
|00002970| 6f 75 74 28 22 b9 22 29 | 0d 0e ba 1c 20 20 c9 20 |out(".")|.... . |
|00002980| 22 53 55 50 32 22 20 20 | 20 20 3a f2 6f 75 74 28 |"SUP2" | :.out(|
|00002990| 22 b2 22 29 0d 0e c4 1c | 20 20 c9 20 22 53 55 50 |".")....| . "SUP|
|000029a0| 33 22 20 20 20 20 3a f2 | 6f 75 74 28 22 b3 22 29 |3" :.|out(".")|
|000029b0| 0d 0e ce 1c 20 20 c9 20 | 22 4d 49 43 52 4f 22 20 |.... . |"MICRO" |
|000029c0| 20 20 3a f2 6f 75 74 28 | 22 b5 22 29 0d 0e d8 1f | :.out(|".")....|
|000029d0| 20 20 c9 20 22 50 41 52 | 41 22 20 20 20 20 3a f2 | . "PAR|A" :.|
|000029e0| 6f 54 41 4e 75 74 28 22 | b6 22 29 0d 0e e2 1c 20 |oTANut("|.").... |
|000029f0| 20 c9 20 22 4d 49 44 44 | 4f 54 22 20 20 3a f2 6f | . "MIDD|OT" :.o|
|00002a00| 75 74 28 22 b7 22 29 0d | 0e ec 1c 20 20 c9 20 22 |ut(".").|... . "|
|00002a10| 46 52 41 43 31 34 22 20 | 20 3a f2 6f 75 74 28 22 |FRAC14" | :.out("|
|00002a20| bc 22 29 0d 0e f6 1c 20 | 20 c9 20 22 46 52 41 43 |.").... | . "FRAC|
|00002a30| 31 32 22 20 20 3a f2 6f | 75 74 28 22 bd 22 29 0d |12" :.o|ut(".").|
|00002a40| 0f 00 1c 20 20 c9 20 22 | 49 51 55 45 53 54 22 20 |... . "|IQUEST" |
|00002a50| 20 3a f2 6f 75 74 28 22 | bf 22 29 0d 0f 0a 1c 20 | :.out("|.").... |
|00002a60| 20 c9 20 22 46 52 41 43 | 33 34 22 20 20 3a f2 6f | . "FRAC|34" :.o|
|00002a70| 75 74 28 22 be 22 29 0d | 0f 14 3a 20 20 c9 20 22 |ut(".").|..: . "|
|00002a80| 53 48 59 22 20 20 20 20 | 20 3a f4 20 64 6f 20 6e |SHY" | :. do n|
|00002a90| 6f 74 68 69 6e 67 20 2d | 20 73 6f 66 74 20 68 79 |othing -| soft hy|
|00002aa0| 70 68 65 6e 20 69 73 20 | 69 6e 76 69 73 69 62 6c |phen is |invisibl|
|00002ab0| 65 0d 0f 1e 18 20 20 7f | 3a f2 6f 75 74 28 22 26 |e.... .|:.out("&|
|00002ac0| 22 2b 53 24 2b 22 3b 22 | 29 0d 0f 28 05 cb 0d 0f |"+S$+";"|)..(....|
|00002ad0| 32 05 e1 0d 0f 3c 04 0d | 0f 46 04 0d 0f 50 09 dd |2....<..|.F...P..|
|00002ae0| f2 74 61 67 0d 0f 5a 14 | f4 20 67 65 74 20 65 6e |.tag..Z.|. get en|
|00002af0| 74 69 72 65 20 74 61 67 | 0d 0f 64 20 c8 95 20 a7 |tire tag|..d .. .|
|00002b00| 41 24 2c 22 3e 22 29 3d | 30 3a 20 41 24 3d 41 24 |A$,">")=|0: A$=A$|
|00002b10| 2b a4 67 65 74 6c 3a ce | 0d 0f 6e 1b f4 20 63 6f |+.getl:.|..n.. co|
|00002b20| 6e 76 65 72 74 20 74 6f | 20 75 70 70 65 72 20 63 |nvert to| upper c|
|00002b30| 61 73 65 0d 0f 78 12 e3 | 20 49 25 3d 31 20 b8 20 |ase..x..| I%=1 . |
|00002b40| a9 28 41 24 29 0d 0f 82 | 15 20 20 43 25 3d 97 28 |.(A$)...|. C%=.(|
|00002b50| c1 41 24 2c 49 25 2c 31 | 29 29 0d 0f 8c 19 20 20 |.A$,I%,1|)).... |
|00002b60| e7 20 43 25 3e 3d 61 25 | 20 80 20 43 25 3c 3d 7a |. C%>=a%| . C%<=z|
|00002b70| 25 20 8c 0d 0f 96 13 20 | 20 20 20 43 25 3d 43 25 |% ..... | C%=C%|
|00002b80| 2b 41 25 2d 61 25 0d 0f | a0 24 20 20 20 20 41 24 |+A%-a%..|.$ A$|
|00002b90| 3d c0 41 24 2c 49 25 2d | 31 29 2b bd 28 43 25 29 |=.A$,I%-|1)+.(C%)|
|00002ba0| 2b c1 41 24 2c 49 25 2b | 31 29 0d 0f aa 07 20 20 |+.A$,I%+|1).... |
|00002bb0| cd 0d 0f b4 05 ed 0d 0f | be 2f f4 20 70 65 65 6c |........|./. peel|
|00002bc0| 20 6f 66 66 20 74 68 65 | 20 74 61 67 20 63 6f 64 | off the| tag cod|
|00002bd0| 65 20 66 72 6f 6d 20 61 | 6e 79 20 70 61 72 61 6d |e from a|ny param|
|00002be0| 65 74 65 72 73 0d 0f c8 | 0b 74 61 67 24 3d 22 22 |eters...|.tag$=""|
|00002bf0| 0d 0f d2 08 49 25 3d 32 | 0d 0f dc 05 f5 0d 0f e6 |....I%=2|........|
|00002c00| 12 20 20 43 24 3d c1 41 | 24 2c 49 25 2c 31 29 0d |. C$=.A|$,I%,1).|
|00002c10| 0f f0 25 20 20 e7 20 a7 | 74 61 67 63 68 61 72 73 |..% . .|tagchars|
|00002c20| 24 2c 43 24 29 20 8c 20 | 74 61 67 24 3d 74 61 67 |$,C$) . |tag$=tag|
|00002c30| 24 2b 43 24 0d 0f fa 0b | 20 20 49 25 2b 3d 31 0d |$+C$....| I%+=1.|
|00002c40| 10 04 16 fd 20 a7 74 61 | 67 63 68 61 72 73 24 2c |.... .ta|gchars$,|
|00002c50| 43 24 29 3d 30 0d 10 0e | 1b f4 20 73 70 65 63 69 |C$)=0...|.. speci|
|00002c60| 66 69 63 20 74 61 67 20 | 68 61 6e 64 6c 69 6e 67 |fic tag |handling|
|00002c70| 0d 10 18 0d c8 8e 20 74 | 61 67 24 20 ca 0d 10 22 |...... t|ag$ ..."|
|00002c80| 1b 20 20 c9 20 22 2f 41 | 22 20 20 20 20 3a 20 f2 |. . "/A|" : .|
|00002c90| 6f 75 74 28 22 20 22 29 | 0d 10 2c 23 20 20 c9 20 |out(" ")|..,# . |
|00002ca0| 22 49 4d 47 22 20 20 20 | 3a 20 f2 6f 75 74 28 22 |"IMG" |: .out("|
|00002cb0| 20 5b 49 6d 61 67 65 5d | 20 22 29 0d 10 36 1b 20 | [Image]| ")..6. |
|00002cc0| 20 c9 20 22 48 45 41 44 | 22 20 20 3a 20 f2 6f 75 | . "HEAD|" : .ou|
|00002cd0| 74 28 6c 66 24 29 0d 10 | 40 1c 20 20 c9 20 22 2f |t(lf$)..|@. . "/|
|00002ce0| 48 45 41 44 22 20 3a 20 | f2 6f 75 74 28 6c 66 32 |HEAD" : |.out(lf2|
|00002cf0| 24 29 0d 10 4a 1b 20 20 | c9 20 22 54 49 54 4c 45 |$)..J. |. "TITLE|
|00002d00| 22 20 3a 20 f2 6f 75 74 | 28 6c 66 24 29 0d 10 54 |" : .out|(lf$)..T|
|00002d10| 1c 20 20 c9 20 22 2f 54 | 49 54 4c 45 22 3a 20 f2 |. . "/T|ITLE": .|
|00002d20| 6f 75 74 28 6c 66 32 24 | 29 0d 10 5e 1b 20 20 c9 |out(lf2$|)..^. .|
|00002d30| 20 22 48 31 22 20 20 20 | 20 3a 20 f2 6f 75 74 28 | "H1" | : .out(|
|00002d40| 6c 66 24 29 0d 10 68 1c | 20 20 c9 20 22 2f 48 31 |lf$)..h.| . "/H1|
|00002d50| 22 20 20 20 3a 20 f2 6f | 75 74 28 6c 66 32 24 29 |" : .o|ut(lf2$)|
|00002d60| 0d 10 72 1b 20 20 c9 20 | 22 48 32 22 20 20 20 20 |..r. . |"H2" |
|00002d70| 3a 20 f2 6f 75 74 28 6c | 66 24 29 0d 10 7c 1c 20 |: .out(l|f$)..|. |
|00002d80| 20 c9 20 22 2f 48 32 22 | 20 20 20 3a 20 f2 6f 75 | . "/H2"| : .ou|
|00002d90| 74 28 6c 66 32 24 29 0d | 10 86 1b 20 20 c9 20 22 |t(lf2$).|... . "|
|00002da0| 48 33 22 20 20 20 20 3a | 20 f2 6f 75 74 28 6c 66 |H3" :| .out(lf|
|00002db0| 24 29 0d 10 90 1c 20 20 | c9 20 22 2f 48 33 22 20 |$).... |. "/H3" |
|00002dc0| 20 20 3a 20 f2 6f 75 74 | 28 6c 66 32 24 29 0d 10 | : .out|(lf2$)..|
|00002dd0| 9a 1b 20 20 c9 20 22 48 | 34 22 20 20 20 20 3a 20 |.. . "H|4" : |
|00002de0| f2 6f 75 74 28 6c 66 24 | 29 0d 10 a4 1c 20 20 c9 |.out(lf$|).... .|
|00002df0| 20 22 2f 48 34 22 20 20 | 20 3a 20 f2 6f 75 74 28 | "/H4" | : .out(|
|00002e00| 6c 66 32 24 29 0d 10 ae | 1b 20 20 c9 20 22 48 35 |lf2$)...|. . "H5|
|00002e10| 22 20 20 20 20 3a 20 f2 | 6f 75 74 28 6c 66 24 29 |" : .|out(lf$)|
|00002e20| 0d 10 b8 1c 20 20 c9 20 | 22 2f 48 35 22 20 20 20 |.... . |"/H5" |
|00002e30| 3a 20 f2 6f 75 74 28 6c | 66 32 24 29 0d 10 c2 1b |: .out(l|f2$)....|
|00002e40| 20 20 c9 20 22 48 36 22 | 20 20 20 20 3a 20 f2 6f | . "H6"| : .o|
|00002e50| 75 74 28 6c 66 24 29 0d | 10 cc 1c 20 20 c9 20 22 |ut(lf$).|... . "|
|00002e60| 2f 48 36 22 20 20 20 3a | 20 f2 6f 75 74 28 6c 66 |/H6" :| .out(lf|
|00002e70| 32 24 29 0d 10 d6 1b 20 | 20 c9 20 22 42 52 22 20 |2$).... | . "BR" |
|00002e80| 20 20 20 3a 20 f2 6f 75 | 74 28 6c 66 24 29 0d 10 | : .ou|t(lf$)..|
|00002e90| e0 23 20 20 c9 20 22 44 | 44 22 20 20 20 20 3a 20 |.# . "D|D" : |
|00002ea0| f2 6f 75 74 28 6c 66 24 | 2b 22 20 20 20 20 20 22 |.out(lf$|+" "|
|00002eb0| 29 0d 10 ea 1b 20 20 c9 | 20 22 44 54 22 20 20 20 |).... .| "DT" |
|00002ec0| 20 3a 20 f2 6f 75 74 28 | 6c 66 24 29 0d 10 f4 1c | : .out(|lf$)....|
|00002ed0| 20 20 c9 20 22 50 22 20 | 20 20 20 20 3a 20 f2 6f | . "P" | : .o|
|00002ee0| 75 74 28 6c 66 32 24 29 | 0d 10 fe 1b 20 20 c9 20 |ut(lf2$)|.... . |
|00002ef0| 22 4c 49 22 20 20 20 20 | 3a 20 f2 6f 75 74 28 6c |"LI" |: .out(l|
|00002f00| 66 24 29 0d 11 08 1b 20 | 20 c9 20 22 2f 4c 49 22 |f$).... | . "/LI"|
|00002f10| 20 20 20 3a 20 f2 6f 75 | 74 28 6c 66 24 29 0d 11 | : .ou|t(lf$)..|
|00002f20| 12 1b 20 20 c9 20 22 2f | 54 52 22 20 20 20 3a 20 |.. . "/|TR" : |
|00002f30| f2 6f 75 74 28 6c 66 24 | 29 0d 11 1c 1e 20 20 c9 |.out(lf$|).... .|
|00002f40| 20 22 41 44 44 52 45 53 | 53 22 20 20 3a 20 f2 6f | "ADDRES|S" : .o|
|00002f50| 75 74 28 6c 66 24 29 0d | 11 26 1e 20 20 c9 20 22 |ut(lf$).|.&. . "|
|00002f60| 2f 41 44 44 52 45 53 53 | 22 20 3a 20 f2 6f 75 74 |/ADDRESS|" : .out|
|00002f70| 28 6c 66 24 29 0d 11 30 | 1e 20 20 c9 20 22 43 41 |(lf$)..0|. . "CA|
|00002f80| 50 54 49 4f 4e 22 20 20 | 3a 20 f2 6f 75 74 28 6c |PTION" |: .out(l|
|00002f90| 66 24 29 0d 11 3a 1e 20 | 20 c9 20 22 2f 43 41 50 |f$)..:. | . "/CAP|
|00002fa0| 54 49 4f 4e 22 20 3a 20 | f2 6f 75 74 28 6c 66 24 |TION" : |.out(lf$|
|00002fb0| 29 0d 11 44 18 20 20 c9 | 20 22 50 52 45 22 20 20 |)..D. .| "PRE" |
|00002fc0| 20 3a 20 70 72 65 25 3d | b9 0d 11 4e 18 20 20 c9 | : pre%=|...N. .|
|00002fd0| 20 22 2f 50 52 45 22 20 | 20 3a 20 70 72 65 25 3d | "/PRE" | : pre%=|
|00002fe0| a3 0d 11 58 72 20 20 c9 | 20 22 48 52 22 20 20 20 |...Xr .| "HR" |
|00002ff0| 20 3a 20 f2 6f 75 74 28 | 6c 66 24 2b 22 2d 2d 2d | : .out(|lf$+"---|
|00003000| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 22 2b 6c |--------|-----"+l|
|00003050| 66 24 29 0d 11 62 05 cb | 0d 11 6c 05 e1 0d 11 76 |f$)..b..|..l....v|
|00003060| 04 0d 11 80 1e dd a4 67 | 65 74 6c 3a f4 20 3d 3d |.......g|etl:. ==|
|00003070| 20 67 65 74 20 61 20 63 | 68 75 6e 6b 20 3d 3d 0d | get a c|hunk ==.|
|00003080| 11 8a 0a 20 20 ea 20 73 | 24 0d 11 94 0b 20 20 73 |... . s|$.... s|
|00003090| 24 3d 22 22 0d 11 9e 07 | 20 20 f5 0d 11 a8 1c 20 |$=""....| ..... |
|000030a0| 20 20 20 73 24 3d 73 24 | 2b bd 28 3f 64 25 29 3a | s$=s$|+.(?d%):|
|000030b0| 64 25 3d 64 25 2b 31 0d | 11 b2 4e 20 20 fd 20 3f |d%=d%+1.|..N . ?|
|000030c0| 64 25 3d 31 30 20 84 20 | 3f 64 25 3d 31 33 20 84 |d%=10 . |?d%=13 .|
|000030d0| 20 3f 64 25 3d 67 74 25 | 20 84 20 3f 64 25 3d 6c | ?d%=gt%| . ?d%=l|
|000030e0| 74 25 20 84 20 64 25 2d | 49 6e 70 75 74 25 3e 3d |t% . d%-|Input%>=|
|000030f0| 49 6e 70 75 74 4c 65 6e | 25 20 84 20 a9 28 73 24 |InputLen|% . .(s$|
|00003100| 29 3e 32 30 30 0d 11 bc | 04 0d 11 c6 19 20 20 e7 |)>200...|..... .|
|00003110| 20 3f 64 25 3d 31 30 20 | 84 20 3f 64 25 3d 31 33 | ?d%=10 |. ?d%=13|
|00003120| 20 8c 0d 11 d0 11 20 20 | 20 20 73 24 3d 73 24 2b | ..... | s$=s$+|
|00003130| 22 20 22 0d 11 da 34 20 | 20 20 20 e7 20 70 72 65 |" "...4 | . pre|
|00003140| 25 3d b9 20 80 20 3f 64 | 25 3d 31 30 20 80 20 c0 |%=. . ?d|%=10 . .|
|00003150| 73 24 29 3c 3e 22 3c 22 | 20 8c 20 73 24 3d 73 24 |s$)<>"<"| . s$=s$|
|00003160| 2b bd 28 3f 64 25 29 0d | 11 e4 0f 20 20 20 20 64 |+.(?d%).|... d|
|00003170| 25 3d 64 25 2b 31 0d 11 | ee 07 20 20 cc 0d 11 f8 |%=d%+1..|.. ....|
|00003180| 21 20 20 20 20 e7 20 3f | 64 25 3c 3e 6c 74 25 20 |! . ?|d%<>lt% |
|00003190| 8c 20 73 24 3d 73 24 2b | bd 28 3f 64 25 29 0d 12 |. s$=s$+|.(?d%)..|
|000031a0| 02 07 20 20 cd 0d 12 0c | 04 0d 12 16 19 20 20 e7 |.. ....|..... .|
|000031b0| 20 3f 64 25 3d 67 74 25 | 20 8c 20 64 25 3d 64 25 | ?d%=gt%| . d%=d%|
|000031c0| 2b 31 0d 12 20 04 0d 12 | 2a 29 f4 20 3d 3d 20 63 |+1.. ...|*). == c|
|000031d0| 6f 70 79 20 6f 72 20 64 | 69 73 63 61 72 64 20 65 |opy or d|iscard e|
|000031e0| 78 74 72 61 20 43 52 20 | 61 6e 64 20 4c 46 73 0d |xtra CR |and LFs.|
|000031f0| 12 34 18 20 20 c8 95 20 | 3f 64 25 3d 31 30 20 84 |.4. .. |?d%=10 .|
|00003200| 20 3f 64 25 3d 31 33 0d | 12 3e 34 20 20 20 20 e7 | ?d%=13.|.>4 .|
|00003210| 20 70 72 65 25 3d b9 20 | 80 20 3f 64 25 3d 31 30 | pre%=. |. ?d%=10|
|00003220| 20 80 20 c0 73 24 29 3c | 3e 22 3c 22 20 8c 20 73 | . .s$)<|>"<" . s|
|00003230| 24 3d 73 24 2b bd 28 3f | 64 25 29 0d 12 48 0d 20 |$=s$+.(?|d%)..H. |
|00003240| 20 20 20 64 25 2b 3d 31 | 0d 12 52 07 20 20 ce 0d | d%+=1|..R. ..|
|00003250| 12 5c 04 0d 12 66 07 3d | 73 24 0d 12 70 04 0d 12 |.\...f.=|s$..p...|
|00003260| 7a 0d dd f2 6f 75 74 28 | 41 24 29 0d 12 84 0c 20 |z...out(|A$).... |
|00003270| 20 24 6f 25 3d 41 24 0d | 12 8e 0f 20 20 6f 25 2b | $o%=A$.|... o%+|
|00003280| 3d a9 28 41 24 29 0d 12 | 98 05 e1 0d 12 a2 04 0d |=.(A$)..|........|
|00003290| ff | |. | |
+--------+-------------------------+-------------------------+--------+--------+