home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1994-01-27 | 16.2 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 0d 00 14 2a f4 20 42 61 | 73 69 63 20 43 6f 6e 76 |...*. Ba|sic Conv|
|00000020| 65 72 74 65 72 2c 20 28 | 43 29 31 39 39 33 20 4a |erter, (|C)1993 J|
|00000030| 2e 47 2e 48 61 72 73 74 | 6f 6e 0d 00 1e 05 3a 0d |.G.Harst|on....:.|
|00000040| 00 28 1b ee 20 85 20 ef | 34 3a f6 3a f1 22 20 61 |.(.. . .|4:.:." a|
|00000050| 74 20 22 2b c3 28 9e 29 | 3a e0 0d 00 32 1b c8 9b |t "+.(.)|:...2...|
|00000060| 20 22 3c 4f 62 65 79 24 | 44 69 72 3e 2e 4d 65 6e | "<Obey$|Dir>.Men|
|00000070| 75 4c 69 62 22 0d 00 3c | 05 3a 0d 00 46 3d de 20 |uLib"..<|.:..F=. |
|00000080| 6d 65 6e 75 66 72 65 65 | 25 20 26 35 30 30 3a 6d |menufree|% &500:m|
|00000090| 65 6e 75 65 6e 64 25 3d | 6d 65 6e 75 66 72 65 65 |enuend%=|menufree|
|000000a0| 25 2b 26 35 30 30 20 20 | 20 20 3a f4 20 6d 65 6e |%+&500 | :. men|
|000000b0| 75 20 73 74 75 66 66 0d | 00 50 46 de 20 62 6c 6f |u stuff.|.PF. blo|
|000000c0| 63 6b 25 20 26 31 30 30 | 30 20 20 20 20 20 20 20 |ck% &100|0 |
|000000d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000e0| 20 20 20 20 20 20 20 3a | f4 20 6d 61 69 6e 20 53 | :|. main S|
|000000f0| 59 53 20 63 61 6c 6c 20 | 62 6c 6f 63 6b 0d 00 5a |YS call |block..Z|
|00000100| 44 de 20 62 6c 6f 63 6b | 32 25 20 38 30 20 20 20 |D. block|2% 80 |
|00000110| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a f4 20 | | :. |
|00000130| 67 65 6e 65 72 61 6c 20 | 75 73 65 20 62 6c 6f 63 |general |use bloc|
|00000140| 6b 0d 00 64 41 60 77 62 | 63 6f 6c 3d 26 30 3a 60 |k..dA`wb|col=&0:`|
|00000150| 77 66 63 6f 6c 3d 26 37 | 3a 60 74 66 63 6f 6c 3d |wfcol=&7|:`tfcol=|
|00000160| 26 37 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |&7 | |
|00000170| 20 20 20 3a f4 20 6d 65 | 6e 75 20 63 6f 6c 6f 75 | :. me|nu colou|
|00000180| 72 73 0d 00 6e 12 74 65 | 6d 70 73 69 7a 65 25 3d |rs..n.te|mpsize%=|
|00000190| 32 30 30 30 0d 00 78 50 | de 20 74 65 6d 70 25 20 |2000..xP|. temp% |
|000001a0| 74 65 6d 70 73 69 7a 65 | 25 3a 65 6e 64 6f 66 74 |tempsize|%:endoft|
|000001b0| 65 6d 70 25 3d 74 65 6d | 70 25 2b 74 65 6d 70 73 |emp%=tem|p%+temps|
|000001c0| 69 7a 65 25 3a f4 20 66 | 6f 72 20 69 6e 64 69 72 |ize%:. f|or indir|
|000001d0| 65 63 74 65 64 20 74 65 | 6d 70 6c 61 74 65 20 69 |ected te|mplate i|
|000001e0| 63 6f 6e 73 0d 00 82 4a | f4 20 44 49 4d 20 49 63 |cons...J|. DIM Ic|
|000001f0| 6f 6e 49 6e 64 69 72 65 | 63 74 69 6f 6e 42 6c 6f |onIndire|ctionBlo|
|00000200| 63 6b 25 20 32 30 30 30 | 20 20 20 20 20 20 20 20 |ck% 2000| |
|00000210| 20 20 20 20 3a 52 45 4d | 20 69 6e 64 69 72 65 63 | :REM| indirec|
|00000220| 74 65 64 20 69 63 6f 6e | 20 62 6c 6f 63 6b 0d 00 |ted icon| block..|
|00000230| 8c 0b 64 65 62 75 67 3d | a3 0d 00 96 05 3a 0d 00 |..debug=|.....:..|
|00000240| a0 2e ee 20 85 20 c8 99 | 20 22 57 69 6d 70 5f 43 |... . ..| "Wimp_C|
|00000250| 6c 6f 73 65 44 6f 77 6e | 22 3a f6 3a f1 22 20 61 |loseDown|":.:." a|
|00000260| 74 20 6c 69 6e 65 20 22 | 3b 9e 3a e0 0d 00 aa 3b |t line "|;.:....;|
|00000270| 70 72 6f 67 6e 61 6d 65 | 24 3d 22 42 61 73 69 63 |progname|$="Basic|
|00000280| 20 43 6f 6e 76 65 72 74 | 65 72 22 3a de 20 74 61 | Convert|er":. ta|
|00000290| 73 6b 69 64 25 20 34 3a | 24 74 61 73 6b 69 64 25 |skid% 4:|$taskid%|
|000002a0| 3d 22 54 41 53 4b 22 0d | 00 b4 3a c8 99 20 22 57 |="TASK".|..:.. "W|
|000002b0| 69 6d 70 5f 49 6e 69 74 | 69 61 6c 69 73 65 22 2c |imp_Init|ialise",|
|000002c0| 32 30 30 2c 21 74 61 73 | 6b 69 64 25 2c 70 72 6f |200,!tas|kid%,pro|
|000002d0| 67 6e 61 6d 65 24 20 b8 | 20 76 65 72 73 69 6f 6e |gname$ .| version|
|000002e0| 25 0d 00 be 4a de 20 71 | 25 20 26 37 30 30 2c 62 |%...J. q|% &700,b|
|000002f0| 75 66 66 65 72 25 20 26 | 33 30 30 2c 65 6e 64 62 |uffer% &|300,endb|
|00000300| 75 66 25 20 2d 31 2c 69 | 63 6f 6e 69 6e 66 25 20 |uf% -1,i|coninf% |
|00000310| 34 30 2c 20 6f 70 74 62 | 75 66 66 25 20 31 30 30 |40, optb|uff% 100|
|00000320| 2c 20 68 65 61 70 25 20 | 32 30 30 0d 00 c8 35 c8 |, heap% |200...5.|
|00000330| 99 20 22 58 4f 53 5f 46 | 69 6c 65 22 2c 35 2c 22 |. "XOS_F|ile",5,"|
|00000340| 3c 42 61 73 43 6f 6e 76 | 24 44 69 72 3e 2e 21 53 |<BasConv|$Dir>.!S|
|00000350| 70 72 69 74 65 73 22 20 | b8 20 2c 2c 2c 2c 74 25 |prites" |. ,,,,t%|
|00000360| 0d 00 d2 22 de 20 73 70 | 72 69 74 65 73 25 20 74 |...". sp|rites% t|
|00000370| 25 2b 34 3a 21 73 70 72 | 69 74 65 73 25 3d 74 25 |%+4:!spr|ites%=t%|
|00000380| 2b 34 0d 00 dc 38 c8 99 | 20 22 4f 53 5f 46 69 6c |+4...8..| "OS_Fil|
|00000390| 65 22 2c 32 35 35 2c 22 | 3c 42 61 73 43 6f 6e 76 |e",255,"|<BasConv|
|000003a0| 24 44 69 72 3e 2e 21 53 | 70 72 69 74 65 73 22 2c |$Dir>.!S|prites",|
|000003b0| 73 70 72 69 74 65 73 25 | 2b 34 0d 00 e6 1f 69 63 |sprites%|+4....ic|
|000003c0| 62 61 72 25 3d a4 69 63 | 6f 6e 62 61 72 28 22 21 |bar%=.ic|onbar("!|
|000003d0| 62 61 73 63 6f 6e 76 22 | 29 0d 00 f0 27 f2 67 65 |basconv"|)...'.ge|
|000003e0| 74 70 6f 69 6e 74 65 72 | 3a 78 6f 25 3d 6d 6f 75 |tpointer|:xo%=mou|
|000003f0| 73 65 78 25 3a 79 6f 25 | 3d 6d 6f 75 73 65 79 25 |sex%:yo%|=mousey%|
|00000400| 0d 00 fa 23 f2 69 6e 69 | 74 54 65 6d 70 6c 61 74 |...#.ini|tTemplat|
|00000410| 65 73 3a f4 20 53 65 74 | 20 75 70 20 77 69 6e 64 |es:. Set| up wind|
|00000420| 6f 77 73 0d 01 04 1d f2 | 69 6e 69 74 4d 65 6e 75 |ows.....|initMenu|
|00000430| 73 3a f4 20 53 65 74 20 | 75 70 20 6d 65 6e 75 73 |s:. Set |up menus|
|00000440| 0d 01 0e 1c 6f 70 65 6e | 25 3d a3 3a 64 65 73 74 |....open|%=.:dest|
|00000450| 66 69 6c 65 6e 61 6d 65 | 24 3d 22 22 0d 01 18 20 |filename|$=""... |
|00000460| ee 20 85 20 f2 65 72 72 | 6f 72 28 9f 2c f6 24 2b |. . .err|or(.,.$+|
|00000470| 22 20 28 22 2b c3 9e 2b | 22 29 22 29 0d 01 22 25 |" ("+..+|")").."%|
|00000480| c8 99 20 22 57 69 6d 70 | 5f 44 72 61 67 42 6f 78 |.. "Wimp|_DragBox|
|00000490| 22 2c 2c 2d 31 3a 57 69 | 6d 70 4d 61 73 6b 25 3d |",,-1:Wi|mpMask%=|
|000004a0| 31 0d 01 2c 05 f5 0d 01 | 36 31 20 20 c8 99 20 22 |1..,....|61 .. "|
|000004b0| 57 69 6d 70 5f 50 6f 6c | 6c 22 2c 57 69 6d 70 4d |Wimp_Pol|l",WimpM|
|000004c0| 61 73 6b 25 2c 71 25 2c | 91 2b 31 30 30 20 b8 20 |ask%,q%,|.+100 . |
|000004d0| 72 65 61 73 6f 6e 25 0d | 01 40 25 e7 64 65 62 75 |reason%.|.@%.debu|
|000004e0| 67 20 ef 34 2c 33 30 3a | f1 22 72 65 61 73 6f 6e |g .4,30:|."reason|
|000004f0| 25 3d 20 22 3b 72 65 61 | 73 6f 6e 25 0d 01 4a 12 |%= ";rea|son%..J.|
|00000500| 20 20 c8 8e 20 72 65 61 | 73 6f 6e 25 20 ca 0d 01 | .. rea|son% ...|
|00000510| 54 1e 20 20 20 20 c9 20 | 31 3a f2 52 65 64 72 61 |T. . |1:.Redra|
|00000520| 77 57 69 6e 64 6f 77 28 | 21 71 25 29 0d 01 5e 44 |wWindow(|!q%)..^D|
|00000530| 20 20 20 20 c9 20 32 3a | f2 4d 6f 76 65 57 69 6e | . 2:|.MoveWin|
|00000540| 64 6f 77 28 21 71 25 2c | 71 25 21 34 2c 71 25 21 |dow(!q%,|q%!4,q%!|
|00000550| 38 2c 71 25 21 31 32 2c | 71 25 21 31 36 2c 71 25 |8,q%!12,|q%!16,q%|
|00000560| 21 32 30 2c 71 25 21 32 | 34 2c 71 25 21 32 38 29 |!20,q%!2|4,q%!28)|
|00000570| 0d 01 68 1d 20 20 20 20 | c9 20 33 3a f2 43 6c 6f |..h. |. 3:.Clo|
|00000580| 73 65 57 69 6e 64 6f 77 | 28 21 71 25 29 0d 01 72 |seWindow|(!q%)..r|
|00000590| 38 20 20 20 20 c9 20 36 | 3a f2 63 68 65 63 6b 6d |8 . 6|:.checkm|
|000005a0| 6f 75 73 65 28 21 71 25 | 2c 71 25 21 34 2c 71 25 |ouse(!q%|,q%!4,q%|
|000005b0| 21 38 2c 71 25 21 31 32 | 2c 71 25 21 31 36 2c 71 |!8,q%!12|,q%!16,q|
|000005c0| 25 21 32 30 29 0d 01 7c | 18 20 20 20 20 c9 20 37 |%!20)..||. . 7|
|000005d0| 3a f2 64 72 61 67 62 6f | 78 28 71 25 29 0d 01 86 |:.dragbo|x(q%)...|
|000005e0| 20 20 20 20 20 c9 20 38 | 3a f2 6b 65 79 28 21 71 | . 8|:.key(!q|
|000005f0| 25 2c 71 25 21 34 2c 71 | 25 21 32 34 29 0d 01 90 |%,q%!4,q|%!24)...|
|00000600| 27 20 20 20 20 c9 20 39 | 3a f2 6d 65 6e 75 73 65 |' . 9|:.menuse|
|00000610| 6c 65 63 74 28 6d 65 6e | 75 68 61 6e 64 6c 65 25 |lect(men|uhandle%|
|00000620| 2c 71 25 29 0d 01 9a 1c | 20 20 20 20 c9 20 31 37 |,q%)....| . 17|
|00000630| 2c 31 38 3a f2 72 65 63 | 65 69 76 65 28 71 25 29 |,18:.rec|eive(q%)|
|00000640| 0d 01 a4 07 20 20 cb 0d | 01 ae 07 fd 20 a3 0d 01 |.... ..|.... ...|
|00000650| b8 05 e0 0d 01 c2 05 3a | 0d 01 cc 12 dd f2 65 72 |.......:|......er|
|00000660| 72 6f 72 28 41 25 2c 41 | 24 29 0d 01 d6 1a 21 71 |ror(A%,A|$)....!q|
|00000670| 25 3d 41 25 3a 24 28 71 | 25 2b 34 29 3d 41 24 2b |%=A%:$(q|%+4)=A$+|
|00000680| bd 28 30 29 0d 01 e0 38 | c8 99 20 22 57 69 6d 70 |.(0)...8|.. "Wimp|
|00000690| 5f 52 65 70 6f 72 74 45 | 72 72 6f 72 22 2c 71 25 |_ReportE|rror",q%|
|000006a0| 2c 25 30 30 30 30 30 31 | 2c 70 72 6f 67 6e 61 6d |,%000001|,prognam|
|000006b0| 65 24 20 b8 20 72 65 73 | 75 6c 74 25 0d 01 ea 10 |e$ . res|ult%....|
|000006c0| f4 20 20 20 50 52 4f 43 | 71 75 69 74 0d 01 f4 05 |. PROC|quit....|
|000006d0| e1 0d 01 fe 05 3a 0d 02 | 08 2f f4 20 2d 2d 2d 2d |.....:..|./. ----|
|000006e0| 2d 2d 2d 2d 2d 2d 2d 20 | 53 65 74 20 75 70 20 74 |------- |Set up t|
|000006f0| 65 6d 70 6c 61 74 65 73 | 20 2d 2d 2d 2d 2d 2d 2d |emplates| -------|
|00000700| 2d 2d 2d 2d 2d 0d 02 12 | 13 dd f2 69 6e 69 74 54 |-----...|...initT|
|00000710| 65 6d 70 6c 61 74 65 73 | 0d 02 1c 35 c8 99 20 22 |emplates|...5.. "|
|00000720| 57 69 6d 70 5f 4f 70 65 | 6e 54 65 6d 70 6c 61 74 |Wimp_Ope|nTemplat|
|00000730| 65 22 2c 2c 22 3c 42 61 | 73 43 6f 6e 76 24 44 69 |e",,"<Ba|sConv$Di|
|00000740| 72 3e 2e 54 65 6d 70 6c | 61 74 65 73 22 0d 02 26 |r>.Templ|ates"..&|
|00000750| 24 77 5f 69 6e 66 6f 25 | 3d 20 20 20 a4 54 65 6d |$w_info%|= .Tem|
|00000760| 70 6c 61 74 65 28 22 50 | 72 6f 67 49 6e 66 6f 22 |plate("P|rogInfo"|
|00000770| 29 0d 02 30 21 77 5f 73 | 61 76 65 61 73 25 3d a4 |)..0!w_s|aveas%=.|
|00000780| 54 65 6d 70 6c 61 74 65 | 28 22 73 61 76 65 61 73 |Template|("saveas|
|00000790| 22 29 0d 02 3a 05 3a 0d | 02 44 1b c8 99 20 22 57 |")..:.:.|.D... "W|
|000007a0| 69 6d 70 5f 43 6c 6f 73 | 65 54 65 6d 70 6c 61 74 |imp_Clos|eTemplat|
|000007b0| 65 22 0d 02 4e 05 e1 0d | 02 58 05 3a 0d 02 62 4a |e"..N...|.X.:..bJ|
|000007c0| f4 20 74 65 6d 70 25 2c | 65 6e 64 6f 66 74 65 6d |. temp%,|endoftem|
|000007d0| 70 25 20 4d 55 53 54 20 | 62 65 20 47 6c 6f 62 61 |p% MUST |be Globa|
|000007e0| 6c 2e 20 74 65 6d 70 25 | 20 69 73 20 69 6e 63 72 |l. temp%| is incr|
|000007f0| 65 6d 65 6e 74 65 64 20 | 62 79 20 46 4e 54 65 6d |emented |by FNTem|
|00000800| 70 6c 61 74 65 2e 0d 02 | 6c 05 3a 0d 02 76 12 dd |plate...|l.:..v..|
|00000810| a4 54 65 6d 70 6c 61 74 | 65 28 41 24 29 0d 02 80 |.Templat|e(A$)...|
|00000820| 08 ea 20 41 25 0d 02 8a | 46 c8 99 20 22 57 69 6d |.. A%...|F.. "Wim|
|00000830| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00000840| 2c 62 6c 6f 63 6b 25 2c | 74 65 6d 70 25 2c 65 6e |,block%,|temp%,en|
|00000850| 64 6f 66 74 65 6d 70 25 | 2c 2d 31 2c 41 24 2c 30 |doftemp%|,-1,A$,0|
|00000860| 20 20 b8 20 2c 2c 74 65 | 6d 70 25 0d 02 94 27 c8 | . ,,te|mp%...'.|
|00000870| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 57 69 |. "Wimp_|CreateWi|
|00000880| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |ndow",,b|lock% . |
|00000890| 41 25 0d 02 9e 07 3d 41 | 25 0d 02 a8 05 3a 0d 02 |A%....=A|%....:..|
|000008a0| b2 2f f4 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |./. ----|------- |
|000008b0| 53 65 74 20 75 70 20 6d | 65 6e 75 73 20 2d 2d 2d |Set up m|enus ---|
|000008c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 02 bc |--------|-----...|
|000008d0| 0f dd f2 69 6e 69 74 4d | 65 6e 75 73 0d 02 c6 34 |...initM|enus...4|
|000008e0| 6d 5f 69 63 6f 6e 62 61 | 72 25 3d a4 63 72 6d 65 |m_iconba|r%=.crme|
|000008f0| 6e 75 28 22 23 42 61 73 | 43 6f 6e 76 2c 49 6e 66 |nu("#Bas|Conv,Inf|
|00000900| 6f 3e 77 5f 69 6e 66 6f | 25 2c 51 75 69 74 22 29 |o>w_info|%,Quit")|
|00000910| 0d 02 d0 62 6d 5f 73 61 | 76 65 61 73 25 3d 20 a4 |...bm_sa|veas%= .|
|00000920| 63 72 6d 65 6e 75 28 22 | 23 43 6f 6e 76 65 72 74 |crmenu("|#Convert|
|00000930| 20 74 6f 2c 21 42 41 53 | 49 43 3e 77 5f 73 61 76 | to,!BAS|IC>w_sav|
|00000940| 65 61 73 25 2c 21 54 65 | 78 74 3e 77 5f 73 61 76 |eas%,!Te|xt>w_sav|
|00000950| 65 61 73 25 2c 21 52 65 | 76 65 72 73 65 64 3e 77 |eas%,!Re|versed>w|
|00000960| 5f 73 61 76 65 61 73 25 | 2c 44 6f 20 2a 44 49 52 |_saveas%|,Do *DIR|
|00000970| 22 29 0d 02 da 05 3a 0d | 02 e4 05 e1 0d 02 ee 05 |")....:.|........|
|00000980| 3a 0d 02 f8 31 dd a4 70 | 61 72 28 73 65 70 24 29 |:...1..p|ar(sep$)|
|00000990| 3a 69 31 25 3d 69 25 2b | 31 3a 69 25 3d a7 6d 65 |:i1%=i%+|1:i%=.me|
|000009a0| 6e 75 24 2b 73 65 70 24 | 2c 73 65 70 24 2c 69 31 |nu$+sep$|,sep$,i1|
|000009b0| 25 29 0d 03 02 17 3d c1 | 6d 65 6e 75 24 2c 69 31 |%)....=.|menu$,i1|
|000009c0| 25 2c 69 25 2d 69 31 25 | 29 0d 03 0c 05 3a 0d 03 |%,i%-i1%|)....:..|
|000009d0| 16 2f f4 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |./. ----|------- |
|000009e0| 4f 70 65 6e 2f 43 6c 6f | 73 65 20 77 69 6e 64 6f |Open/Clo|se windo|
|000009f0| 77 73 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 03 20 |ws -----|-----.. |
|00000a00| 42 dd a4 4f 70 65 6e 28 | 77 68 61 6e 64 6c 65 25 |B..Open(|whandle%|
|00000a10| 29 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |) | |
|00000a20| 20 20 20 20 20 20 3a f4 | 20 54 52 55 45 20 69 66 | :.| TRUE if|
|00000a30| 20 77 69 6e 64 6f 77 20 | 69 73 20 6f 70 65 6e 0d | window |is open.|
|00000a40| 03 2a 15 21 62 6c 6f 63 | 6b 32 25 3d 77 68 61 6e |.*.!bloc|k2%=whan|
|00000a50| 64 6c 65 25 0d 03 34 25 | c8 99 20 22 57 69 6d 70 |dle%..4%|.. "Wimp|
|00000a60| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00000a70| 2c 2c 62 6c 6f 63 6b 32 | 25 0d 03 3e 18 3d 62 6c |,,block2|%..>.=bl|
|00000a80| 6f 63 6b 32 25 21 33 32 | 20 80 20 25 31 3c 3c 31 |ock2%!32| . %1<<1|
|00000a90| 36 0d 03 48 04 0d 03 52 | 44 dd a4 43 6c 6f 73 65 |6..H...R|D..Close|
|00000aa0| 64 28 77 68 61 6e 64 6c | 65 25 29 20 20 20 20 20 |d(whandl|e%) |
|00000ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a f4 | | :.|
|00000ac0| 20 54 52 55 45 20 69 66 | 20 77 69 6e 64 6f 77 20 | TRUE if| window |
|00000ad0| 69 73 20 63 6c 6f 73 65 | 64 0d 03 5c 15 21 62 6c |is close|d..\.!bl|
|00000ae0| 6f 63 6b 32 25 3d 77 68 | 61 6e 64 6c 65 25 0d 03 |ock2%=wh|andle%..|
|00000af0| 66 25 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |f%.. "Wi|mp_GetWi|
|00000b00| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |ndowStat|e",,bloc|
|00000b10| 6b 32 25 0d 03 70 1f 3d | 20 28 28 62 6c 6f 63 6b |k2%..p.=| ((block|
|00000b20| 32 25 21 33 32 20 80 20 | 25 31 3c 3c 31 36 29 3d |2%!32 . |%1<<16)=|
|00000b30| 30 29 0d 03 7a 04 0d 03 | 84 1c dd f2 52 65 64 72 |0)..z...|....Redr|
|00000b40| 61 77 57 69 6e 64 6f 77 | 28 77 68 61 6e 64 6c 65 |awWindow|(whandle|
|00000b50| 25 29 0d 03 8e 14 21 62 | 6c 6f 63 6b 25 3d 77 68 |%)....!b|lock%=wh|
|00000b60| 61 6e 64 6c 65 25 0d 03 | 98 2a c8 99 20 22 57 69 |andle%..|.*.. "Wi|
|00000b70| 6d 70 5f 52 65 64 72 61 | 77 57 69 6e 64 6f 77 22 |mp_Redra|wWindow"|
|00000b80| 2c 2c 62 6c 6f 63 6b 25 | 20 b8 20 6d 6f 72 65 25 |,,block%| . more%|
|00000b90| 0d 03 a2 11 f2 69 6e 66 | 6f 28 62 6c 6f 63 6b 25 |.....inf|o(block%|
|00000ba0| 29 0d 03 ac 15 f4 20 50 | 52 4f 43 64 6f 73 6f 6d |)..... P|ROCdosom|
|00000bb0| 65 74 68 69 6e 67 0d 03 | b6 05 e1 0d 03 c0 04 0d |ething..|........|
|00000bc0| 03 ca 11 dd f2 46 6f 72 | 63 65 52 65 64 72 61 77 |.....For|ceRedraw|
|00000bd0| 0d 03 d4 36 c8 99 20 22 | 57 69 6d 70 5f 46 6f 72 |...6.. "|Wimp_For|
|00000be0| 63 65 52 65 64 72 61 77 | 22 2c 2d 31 2c 2d 31 30 |ceRedraw|",-1,-10|
|00000bf0| 30 30 30 2c 2d 31 30 30 | 30 30 2c 31 30 30 30 30 |000,-100|00,10000|
|00000c00| 2c 31 30 30 30 30 0d 03 | de 05 e1 0d 03 e8 04 0d |,10000..|........|
|00000c10| 03 f2 31 dd f2 69 6e 66 | 6f 28 71 25 29 20 20 20 |..1..inf|o(q%) |
|00000c20| 3a f4 20 65 78 74 72 61 | 63 74 20 77 6f 72 6b 20 |:. extra|ct work |
|00000c30| 61 72 65 61 20 69 6e 66 | 6f 72 6d 61 74 69 6f 6e |area inf|ormation|
|00000c40| 0d 03 fc 3a f4 20 57 69 | 6d 70 5f 52 65 64 72 61 |...:. Wi|mp_Redra|
|00000c50| 77 57 69 6e 64 6f 77 20 | 61 6e 64 20 57 69 6d 70 |wWindow |and Wimp|
|00000c60| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 20 |_GetWind|owState |
|00000c70| 69 6e 66 6f 20 62 6c 6f | 63 6b 0d 04 06 3b 78 30 |info blo|ck...;x0|
|00000c80| 25 3d 71 25 21 34 20 20 | 20 20 20 20 20 20 20 20 |%=q%!4 | |
|00000c90| 20 3a f4 20 76 69 73 61 | 62 6c 65 20 61 72 65 61 | :. visa|ble area|
|00000ca0| 20 6d 69 6e 69 6d 75 6d | 20 78 20 63 6f 6f 72 64 | minimum| x coord|
|00000cb0| 69 6e 61 74 65 0d 04 10 | 3b 79 30 25 3d 71 25 21 |inate...|;y0%=q%!|
|00000cc0| 38 20 20 20 20 20 20 20 | 20 20 20 20 3a f4 20 76 |8 | :. v|
|00000cd0| 69 73 61 62 6c 65 20 61 | 72 65 61 20 6d 69 6e 69 |isable a|rea mini|
|00000ce0| 6d 75 6d 20 79 20 63 6f | 6f 72 64 69 6e 61 74 65 |mum y co|ordinate|
|00000cf0| 0d 04 1a 3b 78 31 25 3d | 71 25 21 31 32 20 20 20 |...;x1%=|q%!12 |
|00000d00| 20 20 20 20 20 20 20 3a | f4 20 76 69 73 61 62 6c | :|. visabl|
|00000d10| 65 20 61 72 65 61 20 6d | 61 78 69 6d 75 6d 20 78 |e area m|aximum x|
|00000d20| 20 63 6f 6f 72 64 69 6e | 61 74 65 0d 04 24 3b 79 | coordin|ate..$;y|
|00000d30| 31 25 3d 71 25 21 31 36 | 20 20 20 20 20 20 20 20 |1%=q%!16| |
|00000d40| 20 20 3a f4 20 76 69 73 | 61 62 6c 65 20 61 72 65 | :. vis|able are|
|00000d50| 61 20 6d 61 78 69 6d 75 | 6d 20 79 20 63 6f 6f 72 |a maximu|m y coor|
|00000d60| 64 69 6e 61 74 65 0d 04 | 2e 29 73 63 78 25 3d 71 |dinate..|.)scx%=q|
|00000d70| 25 21 32 30 20 20 20 20 | 20 20 20 20 20 3a f4 20 |%!20 | :. |
|00000d80| 73 63 72 6f 6c 6c 20 58 | 20 6f 66 66 73 65 74 0d |scroll X| offset.|
|00000d90| 04 38 29 73 63 79 25 3d | 71 25 21 32 34 20 20 20 |.8)scy%=|q%!24 |
|00000da0| 20 20 20 20 20 20 3a f4 | 20 73 63 72 6f 6c 6c 20 | :.| scroll |
|00000db0| 59 20 6f 66 66 73 65 74 | 0d 04 42 49 58 25 3d 78 |Y offset|..BIX%=x|
|00000dc0| 30 25 2d 73 63 78 25 20 | 20 20 20 20 20 20 20 3a |0%-scx% | :|
|00000dd0| f4 20 20 20 58 25 2c 59 | 25 20 69 73 20 74 6f 70 |. X%,Y|% is top|
|00000de0| 20 6c 65 66 74 20 6f 66 | 20 77 69 6e 64 6f 77 20 | left of| window |
|00000df0| 21 21 21 21 20 28 6e 6f | 74 20 73 63 72 65 65 6e |!!!! (no|t screen|
|00000e00| 29 0d 04 4c 3f 59 25 3d | 79 31 25 2d 73 63 79 25 |)..L?Y%=|y1%-scy%|
|00000e10| 20 20 20 20 20 20 20 20 | 3a f4 20 20 20 61 6c 6c | |:. all|
|00000e20| 20 67 72 61 70 68 69 63 | 73 20 61 72 65 20 62 61 | graphic|s are ba|
|00000e30| 73 65 64 20 6f 6e 20 58 | 25 20 61 6e 64 20 59 25 |sed on X|% and Y%|
|00000e40| 0d 04 56 05 e1 0d 04 60 | 04 0d 04 6a 1a dd f2 4f |..V....`|...j...O|
|00000e50| 70 65 6e 57 69 6e 64 6f | 77 28 77 68 61 6e 64 6c |penWindo|w(whandl|
|00000e60| 65 25 29 0d 04 74 15 62 | 6c 6f 63 6b 25 21 30 3d |e%)..t.b|lock%!0=|
|00000e70| 77 68 61 6e 64 6c 65 25 | 0d 04 7e 24 c8 99 20 22 |whandle%|..~$.. "|
|00000e80| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|00000e90| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 0d 04 88 2d |ate",,bl|ock%...-|
|00000ea0| 62 6c 6f 63 6b 25 21 32 | 38 3d 2d 31 3a c8 99 20 |block%!2|8=-1:.. |
|00000eb0| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00000ec0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 04 92 05 e1 0d 04 |",,block|%.......|
|00000ed0| 9c 04 0d 04 a6 1b dd f2 | 43 6c 6f 73 65 57 69 6e |........|CloseWin|
|00000ee0| 64 6f 77 28 77 68 61 6e | 64 6c 65 25 29 0d 04 b0 |dow(whan|dle%)...|
|00000ef0| 13 e7 20 77 68 61 6e 64 | 6c 65 25 3c 3e 30 20 8c |.. whand|le%<>0 .|
|00000f00| 0d 04 ba 17 20 20 62 6c | 6f 63 6b 25 21 30 3d 77 |.... bl|ock%!0=w|
|00000f10| 68 61 6e 64 6c 65 25 0d | 04 c4 24 20 20 c8 99 20 |handle%.|..$ .. |
|00000f20| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|00000f30| 77 22 2c 30 2c 62 6c 6f | 63 6b 25 0d 04 ce 05 cd |w",0,blo|ck%.....|
|00000f40| 0d 04 d8 05 e1 0d 04 e2 | 05 3a 0d 04 ec 3c dd f2 |........|.:...<..|
|00000f50| 4d 6f 76 65 57 69 6e 64 | 6f 77 28 68 61 6e 64 6c |MoveWind|ow(handl|
|00000f60| 65 25 2c 78 30 25 2c 79 | 30 25 2c 78 31 25 2c 79 |e%,x0%,y|0%,x1%,y|
|00000f70| 31 25 2c 73 63 78 25 2c | 73 63 79 25 2c 62 68 61 |1%,scx%,|scy%,bha|
|00000f80| 6e 64 6c 65 25 29 0d 04 | f6 11 e7 68 61 6e 64 6c |ndle%)..|...handl|
|00000f90| 65 25 3d 2d 31 8c e1 0d | 05 00 1f 71 25 21 30 3d |e%=-1...|...q%!0=|
|00000fa0| 68 61 6e 64 6c 65 25 3a | 71 25 21 32 38 3d 62 68 |handle%:|q%!28=bh|
|00000fb0| 61 6e 64 6c 65 25 0d 05 | 0a 29 71 25 21 34 3d 78 |andle%..|.)q%!4=x|
|00000fc0| 30 25 3a 71 25 21 38 3d | 79 30 25 3a 71 25 21 31 |0%:q%!8=|y0%:q%!1|
|00000fd0| 32 3d 78 31 25 3a 71 25 | 21 31 36 3d 79 31 25 0d |2=x1%:q%|!16=y1%.|
|00000fe0| 05 14 19 71 25 21 32 30 | 3d 73 63 78 25 3a 71 25 |...q%!20|=scx%:q%|
|00000ff0| 21 32 34 3d 73 63 79 25 | 0d 05 1e 1c c8 99 20 22 |!24=scy%|...... "|
|00001000| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00001010| 2c 2c 71 25 0d 05 28 05 | e1 0d 05 32 05 3a 0d 05 |,,q%..(.|...2.:..|
|00001020| 3c 1c dd f2 64 65 6c 65 | 74 65 77 69 6e 64 6f 77 |<...dele|tewindow|
|00001030| 28 77 68 61 6e 64 6c 65 | 25 29 0d 05 46 13 e7 20 |(whandle|%)..F.. |
|00001040| 77 68 61 6e 64 6c 65 25 | 3c 3e 30 20 8c 0d 05 50 |whandle%|<>0 ...P|
|00001050| 17 20 20 62 6c 6f 63 6b | 25 21 30 3d 77 68 61 6e |. block|%!0=whan|
|00001060| 64 6c 65 25 0d 05 5a 24 | 20 20 c8 99 20 22 57 69 |dle%..Z$| .. "Wi|
|00001070| 6d 70 5f 44 65 6c 65 74 | 65 57 69 6e 64 6f 77 22 |mp_Delet|eWindow"|
|00001080| 2c 2c 62 6c 6f 63 6b 25 | 0d 05 64 05 cd 0d 05 6e |,,block%|..d....n|
|00001090| 05 e1 0d 05 78 04 0d 05 | 82 2f f4 20 2d 2d 2d 2d |....x...|./. ----|
|000010a0| 2d 2d 2d 2d 2d 2d 2d 20 | 50 6f 70 20 75 70 20 61 |------- |Pop up a|
|000010b0| 20 6d 65 6e 75 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | menu --|--------|
|000010c0| 2d 2d 2d 2d 2d 0d 05 8c | 14 dd f2 6d 65 6e 75 28 |-----...|...menu(|
|000010d0| 6d 25 2c 68 25 2c 77 25 | 29 0d 05 96 30 ea 20 59 |m%,h%,w%|)...0. Y|
|000010e0| 25 2c 6d 6f 75 73 65 78 | 25 2c 6d 6f 75 73 65 79 |%,mousex|%,mousey|
|000010f0| 25 2c 77 68 61 6e 64 6c | 65 25 2c 69 68 61 6e 64 |%,whandl|e%,ihand|
|00001100| 6c 65 25 2c 74 79 70 65 | 25 0d 05 a0 12 6d 65 6e |le%,type|%....men|
|00001110| 75 68 61 6e 64 6c 65 25 | 3d 6d 25 0d 05 aa 24 c8 |uhandle%|=m%...$.|
|00001120| 99 20 22 57 69 6d 70 5f | 47 65 74 50 6f 69 6e 74 |. "Wimp_|GetPoint|
|00001130| 65 72 49 6e 66 6f 22 2c | 2c 62 6c 6f 63 6b 25 0d |erInfo",|,block%.|
|00001140| 05 b4 25 6d 6f 75 73 65 | 78 25 3d 62 6c 6f 63 6b |..%mouse|x%=block|
|00001150| 25 21 30 3a 6d 6f 75 73 | 65 79 25 3d 62 6c 6f 63 |%!0:mous|ey%=bloc|
|00001160| 6b 25 21 34 0d 05 be 29 | 77 68 61 6e 64 6c 65 25 |k%!4...)|whandle%|
|00001170| 3d 62 6c 6f 63 6b 25 21 | 31 32 3a 69 68 61 6e 64 |=block%!|12:ihand|
|00001180| 6c 65 25 3d 62 6c 6f 63 | 6b 25 21 31 36 0d 05 c8 |le%=bloc|k%!16...|
|00001190| 33 e7 20 77 68 61 6e 64 | 6c 65 25 3c 30 20 59 25 |3. whand|le%<0 Y%|
|000011a0| 3d 68 25 2a 33 32 2b 31 | 32 30 20 8b 20 59 25 3d |=h%*32+1|20 . Y%=|
|000011b0| 6d 6f 75 73 65 79 25 2b | 68 25 2a 33 32 2b 37 32 |mousey%+|h%*32+72|
|000011c0| 0d 05 d2 30 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |...0.. "|Wimp_Cre|
|000011d0| 61 74 65 4d 65 6e 75 22 | 2c 2c 6d 25 2c 6d 6f 75 |ateMenu"|,,m%,mou|
|000011e0| 73 65 78 25 2d 36 36 2b | 77 25 2a 31 36 2c 59 25 |sex%-66+|w%*16,Y%|
|000011f0| 0d 05 dc 05 e1 0d 05 e6 | 05 3a 0d 05 f0 51 2d 2d |........|.:...Q--|
|00001200| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001210| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001240| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 05 fa 05 3a |--------|---....:|
|00001250| 0d 06 04 30 f4 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |...0. --|------- |
|00001260| 52 65 63 65 69 76 65 20 | 61 20 57 69 6d 70 20 6d |Receive |a Wimp m|
|00001270| 65 73 73 61 67 65 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |essage -|--------|
|00001280| 0d 06 0e 32 dd f2 72 65 | 63 65 69 76 65 28 71 25 |...2..re|ceive(q%|
|00001290| 29 3a e7 64 65 62 75 67 | 3a ef 34 2c 33 30 3a f1 |):.debug|:.4,30:.|
|000012a0| 22 52 65 63 65 69 76 65 | 3a 20 22 3b 7e 71 25 21 |"Receive|: ";~q%!|
|000012b0| 31 36 0d 06 18 0e c8 8e | 20 71 25 21 31 36 20 ca |16......| q%!16 .|
|000012c0| 0d 06 22 14 20 20 c9 20 | 30 3a 20 f2 66 69 6e 69 |..". . |0: .fini|
|000012d0| 73 68 3a e0 0d 06 2c 30 | 20 20 c9 20 32 3a 20 64 |sh:...,0| . 2: d|
|000012e0| 65 73 74 66 69 6c 65 6e | 61 6d 65 24 3d a4 67 65 |estfilen|ame$=.ge|
|000012f0| 74 73 74 72 28 71 25 2b | 34 34 29 3a f2 63 6f 6e |tstr(q%+|44):.con|
|00001300| 76 65 72 74 0d 06 36 2c | 20 20 c9 20 33 3a 20 e7 |vert..6,| . 3: .|
|00001310| 20 71 25 21 31 32 3d 30 | 20 8c 20 f2 73 63 61 6e | q%!12=0| . .scan|
|00001320| 28 a4 67 65 74 73 74 72 | 28 71 25 2b 34 34 29 29 |(.getstr|(q%+44))|
|00001330| 0d 06 40 31 20 20 c9 20 | 26 34 30 30 43 30 3a 20 |..@1 . |&400C0: |
|00001340| f2 53 75 62 4d 65 6e 75 | 28 71 25 21 32 30 2c 71 |.SubMenu|(q%!20,q|
|00001350| 25 21 32 34 2c 71 25 21 | 32 38 2c 71 25 21 33 32 |%!24,q%!|28,q%!32|
|00001360| 29 0d 06 4a 05 cb 0d 06 | 54 05 e1 0d 06 5e 05 3a |)..J....|T....^.:|
|00001370| 0d 06 68 22 dd f2 53 75 | 62 4d 65 6e 75 28 77 69 |..h"..Su|bMenu(wi|
|00001380| 6e 64 6f 77 25 2c 77 78 | 25 2c 77 79 25 2c 6d 69 |ndow%,wx|%,wy%,mi|
|00001390| 25 29 0d 06 72 12 20 20 | c8 8e 20 77 69 6e 64 6f |%)..r. |.. windo|
|000013a0| 77 25 20 ca 0d 06 7c 14 | 20 20 20 20 c9 20 77 5f |w% ...|.| . w_|
|000013b0| 73 61 76 65 61 73 25 3a | 0d 06 86 12 20 20 20 20 |saveas%:|.... |
|000013c0| 20 20 c8 8e 20 6d 69 25 | 20 ca 0d 06 90 41 20 20 | .. mi%| ....A |
|000013d0| 20 20 20 20 20 20 c9 20 | 30 3a 20 f2 53 65 74 49 | . |0: .SetI|
|000013e0| 63 6f 6e 28 77 5f 73 61 | 76 65 61 73 25 2c 20 32 |con(w_sa|veas%, 2|
|000013f0| 2c 20 22 66 69 6c 65 5f | 66 66 62 22 2c 20 a3 29 |, "file_|ffb", .)|
|00001400| 3a 44 65 73 74 25 3d 26 | 46 46 42 0d 06 9a 41 20 |:Dest%=&|FFB...A |
|00001410| 20 20 20 20 20 20 20 c9 | 20 31 3a 20 f2 53 65 74 | .| 1: .Set|
|00001420| 49 63 6f 6e 28 77 5f 73 | 61 76 65 61 73 25 2c 20 |Icon(w_s|aveas%, |
|00001430| 32 2c 20 22 66 69 6c 65 | 5f 66 66 66 22 2c 20 a3 |2, "file|_fff", .|
|00001440| 29 3a 44 65 73 74 25 3d | 26 46 46 46 0d 06 a4 41 |):Dest%=|&FFF...A|
|00001450| 20 20 20 20 20 20 20 20 | c9 20 32 3a 20 f2 53 65 | |. 2: .Se|
|00001460| 74 49 63 6f 6e 28 77 5f | 73 61 76 65 61 73 25 2c |tIcon(w_|saveas%,|
|00001470| 20 32 2c 20 22 66 69 6c | 65 5f 62 62 64 22 2c 20 | 2, "fil|e_bbd", |
|00001480| a3 29 3a 44 65 73 74 25 | 3d 26 42 42 44 0d 06 ae |.):Dest%|=&BBD...|
|00001490| 0b 20 20 20 20 20 20 cb | 0d 06 b8 07 20 20 cb 0d |. .|.... ..|
|000014a0| 06 c2 2e 20 20 c8 99 20 | 22 57 69 6d 70 5f 43 72 |... .. |"Wimp_Cr|
|000014b0| 65 61 74 65 53 75 62 4d | 65 6e 75 22 2c 2c 77 69 |eateSubM|enu",,wi|
|000014c0| 6e 64 6f 77 25 2c 77 78 | 25 2c 77 79 25 0d 06 cc |ndow%,wx|%,wy%...|
|000014d0| 05 e1 0d 06 d6 05 3a 0d | 06 e0 2f f4 20 2d 2d 2d |......:.|../. ---|
|000014e0| 2d 2d 2d 2d 2d 2d 2d 2d | 20 41 20 6d 6f 75 73 65 |--------| A mouse|
|000014f0| 20 63 6c 69 63 6b 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d | click -|--------|
|00001500| 2d 2d 2d 2d 2d 2d 0d 06 | ea 37 dd f2 63 68 65 63 |------..|.7..chec|
|00001510| 6b 6d 6f 75 73 65 28 6d | 6f 75 73 65 78 25 2c 6d |kmouse(m|ousex%,m|
|00001520| 6f 75 73 65 79 25 2c 62 | 25 2c 77 68 61 6e 64 6c |ousey%,b|%,whandl|
|00001530| 65 25 2c 69 63 6f 6e 25 | 2c 6f 62 25 29 0d 06 f4 |e%,icon%|,ob%)...|
|00001540| 35 73 65 6c 65 63 74 25 | 3d 62 25 20 80 20 34 3a |5select%|=b% . 4:|
|00001550| 73 65 6c 65 63 74 31 25 | 3d 62 25 20 80 20 26 34 |select1%|=b% . &4|
|00001560| 30 30 3a 64 72 61 67 53 | 25 3d 62 25 20 80 20 26 |00:dragS|%=b% . &|
|00001570| 34 30 0d 06 fe 12 6d 65 | 6e 75 25 20 20 3d 62 25 |40....me|nu% =b%|
|00001580| 20 80 20 32 0d 07 08 35 | 61 64 6a 75 73 74 25 3d | . 2...5|adjust%=|
|00001590| 62 25 20 80 20 31 3a 61 | 64 6a 75 73 74 31 25 3d |b% . 1:a|djust1%=|
|000015a0| 62 25 20 80 20 26 31 30 | 30 3a 64 72 61 67 41 25 |b% . &10|0:dragA%|
|000015b0| 3d 62 25 20 80 20 26 31 | 30 0d 07 12 05 3a 0d 07 |=b% . &1|0....:..|
|000015c0| 1c 24 e7 64 65 62 75 67 | 3a ef 34 2c 33 30 3a f1 |.$.debug|:.4,30:.|
|000015d0| 22 69 63 6f 6e 25 3d 22 | 3b 69 63 6f 6e 25 2c 7e |"icon%="|;icon%,~|
|000015e0| 62 25 0d 07 26 0d e7 20 | 6d 65 6e 75 25 20 8c 0d |b%..&.. |menu% ..|
|000015f0| 07 30 39 20 20 e7 20 77 | 68 61 6e 64 6c 65 25 3d |.09 . w|handle%=|
|00001600| 2d 32 20 80 20 69 63 6f | 6e 25 3d 69 63 62 61 72 |-2 . ico|n%=icbar|
|00001610| 25 20 20 f2 6d 65 6e 75 | 28 6d 5f 69 63 6f 6e 62 |% .menu|(m_iconb|
|00001620| 61 72 25 2c 32 2c 30 29 | 0d 07 3a 05 cd 0d 07 44 |ar%,2,0)|..:....D|
|00001630| 04 0d 07 4e 61 e7 20 73 | 65 6c 65 63 74 25 20 80 |...Na. s|elect% .|
|00001640| 20 77 68 61 6e 64 6c 65 | 25 3d 77 5f 73 61 76 65 | whandle|%=w_save|
|00001650| 61 73 25 20 80 20 69 63 | 6f 6e 25 3d 30 20 8c 20 |as% . ic|on%=0 . |
|00001660| 64 65 73 74 66 69 6c 65 | 6e 61 6d 65 24 3d a4 47 |destfile|name$=.G|
|00001670| 65 74 49 63 6f 6e 28 77 | 5f 73 61 76 65 61 73 25 |etIcon(w|_saveas%|
|00001680| 2c 20 31 2c 20 b9 29 3a | f2 63 6f 6e 76 65 72 74 |, 1, .):|.convert|
|00001690| 3a e1 0d 07 58 04 0d 07 | 62 17 e7 20 64 72 61 67 |:...X...|b.. drag|
|000016a0| 53 25 20 84 20 64 72 61 | 67 41 25 20 8c 0d 07 6c |S% . dra|gA% ...l|
|000016b0| 2a 20 20 74 68 69 73 69 | 63 6f 6e 25 3d 32 3a f2 |* thisi|con%=2:.|
|000016c0| 73 65 74 75 70 64 72 61 | 67 62 6f 78 28 77 5f 73 |setupdra|gbox(w_s|
|000016d0| 61 76 65 61 73 25 29 0d | 07 76 05 cd 0d 07 80 04 |aveas%).|.v......|
|000016e0| 0d 07 8a 05 e1 0d 07 94 | 05 3a 0d 07 9e 0c dd f2 |........|.:......|
|000016f0| 61 64 6a 75 73 74 0d 07 | a8 24 c8 99 20 22 57 69 |adjust..|.$.. "Wi|
|00001700| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00001710| 6f 22 2c 2c 62 6c 6f 63 | 6b 25 0d 07 b2 16 e7 20 |o",,bloc|k%..... |
|00001720| 28 62 6c 6f 63 6b 25 21 | 38 20 80 20 31 29 20 8c |(block%!|8 . 1) .|
|00001730| 0d 07 bc 16 f2 6d 65 6e | 75 28 6d 65 6e 75 68 61 |.....men|u(menuha|
|00001740| 6e 64 6c 65 25 29 0d 07 | c6 3f 20 20 f4 20 65 6e |ndle%)..|.? . en|
|00001750| 73 75 72 65 20 6d 65 73 | 73 61 67 65 20 77 69 6e |sure mes|sage win|
|00001760| 64 6f 77 20 6f 70 65 6e | 73 20 69 6e 20 66 72 6f |dow open|s in fro|
|00001770| 6e 74 20 6f 66 20 6d 65 | 6e 75 20 6e 6f 74 20 62 |nt of me|nu not b|
|00001780| 65 68 69 6e 64 0d 07 d0 | 19 20 20 e7 20 a4 4f 70 |ehind...|. . .Op|
|00001790| 65 6e 28 6d 65 73 73 61 | 67 65 25 29 20 8c 0d 07 |en(messa|ge%) ...|
|000017a0| da 1c 20 20 f2 43 6c 6f | 73 65 57 69 6e 64 6f 77 |.. .Clo|seWindow|
|000017b0| 28 6d 65 73 73 61 67 65 | 25 29 0d 07 e4 1b 20 20 |(message|%).... |
|000017c0| f2 4f 70 65 6e 57 69 6e | 64 6f 77 28 6d 65 73 73 |.OpenWin|dow(mess|
|000017d0| 61 67 65 25 29 0d 07 ee | 07 20 20 cd 0d 07 f8 05 |age%)...|. .....|
|000017e0| cd 0d 08 02 05 e1 0d 08 | 0c 05 3a 0d 08 16 2f f4 |........|..:.../.|
|000017f0| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 20 4b 65 79 | -------|---- Key|
|00001800| 20 70 72 65 73 73 65 64 | 20 2d 2d 2d 2d 2d 2d 2d | pressed| -------|
|00001810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 08 20 16 dd f2 |--------|--.. ...|
|00001820| 6b 65 79 28 77 25 2c 69 | 63 25 2c 6b 65 79 25 29 |key(w%,i|c%,key%)|
|00001830| 0d 08 2a 58 e7 77 25 3d | 77 5f 73 61 76 65 61 73 |..*X.w%=|w_saveas|
|00001840| 25 20 80 20 6b 65 79 25 | 3d 31 33 20 f2 63 68 65 |% . key%|=13 .che|
|00001850| 63 6b 6d 6f 75 73 65 28 | 30 2c 30 2c 34 2c 77 5f |ckmouse(|0,0,4,w_|
|00001860| 73 61 76 65 61 73 25 2c | 30 2c 30 29 20 8b 20 c8 |saveas%,|0,0) . .|
|00001870| 99 20 22 57 69 6d 70 5f | 50 72 6f 63 65 73 73 4b |. "Wimp_|ProcessK|
|00001880| 65 79 22 2c 6b 65 79 25 | 0d 08 34 05 e1 0d 08 3e |ey",key%|..4....>|
|00001890| 05 3a 0d 08 48 2f f4 20 | 2d 2d 2d 2d 2d 2d 2d 2d |.:..H/. |--------|
|000018a0| 2d 2d 2d 20 53 65 74 20 | 75 70 20 61 20 64 72 61 |--- Set |up a dra|
|000018b0| 67 20 62 6f 78 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |g box --|--------|
|000018c0| 2d 0d 08 52 1b dd f2 73 | 65 74 75 70 64 72 61 67 |-..R...s|etupdrag|
|000018d0| 62 6f 78 28 77 69 6e 64 | 6f 77 25 29 0d 08 5c 21 |box(wind|ow%)..\!|
|000018e0| ea 20 77 65 78 2c 77 65 | 79 2c 6d 69 6e 78 2c 6d |. wex,we|y,minx,m|
|000018f0| 61 78 78 2c 6d 69 6e 79 | 2c 6d 61 78 79 0d 08 66 |axx,miny|,maxy..f|
|00001900| 4b 21 71 25 3d 77 69 6e | 64 6f 77 25 3a c8 99 20 |K!q%=win|dow%:.. |
|00001910| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 |"Wimp_Ge|tWindowS|
|00001920| 74 61 74 65 22 2c 2c 71 | 25 3a 77 65 78 3d 71 25 |tate",,q|%:wex=q%|
|00001930| 21 34 2d 71 25 21 32 30 | 3a 77 65 79 3d 71 25 21 |!4-q%!20|:wey=q%!|
|00001940| 31 36 2d 71 25 21 32 34 | 0d 08 70 3d 6d 69 6e 78 |16-q%!24|..p=minx|
|00001950| 3d 71 25 21 31 32 2b 77 | 65 78 3a 6d 69 6e 79 3d |=q%!12+w|ex:miny=|
|00001960| 71 25 21 31 36 2b 77 65 | 79 3a 6d 61 78 78 3d 71 |q%!16+we|y:maxx=q|
|00001970| 25 21 34 2d 77 65 78 3a | 6d 61 78 79 3d 71 25 21 |%!4-wex:|maxy=q%!|
|00001980| 38 2d 77 65 79 0d 08 7a | 39 21 71 25 3d 77 69 6e |8-wey..z|9!q%=win|
|00001990| 64 6f 77 25 3a 71 25 21 | 34 3d 74 68 69 73 69 63 |dow%:q%!|4=thisic|
|000019a0| 6f 6e 25 3a c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |on%:.. "|Wimp_Get|
|000019b0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 71 25 0d 08 |IconStat|e",,q%..|
|000019c0| 84 2e 6d 69 6e 78 3d 71 | 25 21 38 3a 6d 69 6e 79 |..minx=q|%!8:miny|
|000019d0| 3d 71 25 21 31 32 3a 6d | 61 78 78 3d 71 25 21 31 |=q%!12:m|axx=q%!1|
|000019e0| 36 3a 6d 61 78 79 3d 71 | 25 21 32 30 0d 08 8e 51 |6:maxy=q|%!20...Q|
|000019f0| 21 71 25 3d 77 69 6e 64 | 6f 77 25 3a 71 25 21 34 |!q%=wind|ow%:q%!4|
|00001a00| 3d 35 3a 71 25 21 38 3d | 6d 69 6e 78 2b 77 65 78 |=5:q%!8=|minx+wex|
|00001a10| 3a 71 25 21 31 32 3d 6d | 69 6e 79 2b 77 65 79 3a |:q%!12=m|iny+wey:|
|00001a20| 71 25 21 31 36 3d 6d 61 | 78 78 2b 77 65 78 3a 71 |q%!16=ma|xx+wex:q|
|00001a30| 25 21 32 30 3d 6d 61 78 | 79 2b 77 65 79 0d 08 98 |%!20=max|y+wey...|
|00001a40| 49 71 25 21 32 34 3d 30 | 3a 71 25 21 32 38 3d 30 |Iq%!24=0|:q%!28=0|
|00001a50| 3a 71 25 21 33 32 3d 26 | 37 46 46 46 46 46 46 46 |:q%!32=&|7FFFFFFF|
|00001a60| 3a 71 25 21 33 36 3d 26 | 37 46 46 46 46 46 46 46 |:q%!36=&|7FFFFFFF|
|00001a70| 3a c8 99 20 22 57 69 6d | 70 5f 44 72 61 67 42 6f |:.. "Wim|p_DragBo|
|00001a80| 78 22 2c 2c 71 25 0d 08 | a2 17 f4 20 64 72 61 67 |x",,q%..|... drag|
|00001a90| 62 6f 78 73 61 76 65 25 | 3d 54 52 55 45 0d 08 ac |boxsave%|=TRUE...|
|00001aa0| 05 e1 0d 08 b6 05 3a 0d | 08 c0 2f f4 20 2d 2d 2d |......:.|../. ---|
|00001ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 20 44 65 70 6f 73 69 74 |--------| Deposit|
|00001ac0| 20 61 20 64 72 61 67 67 | 65 64 20 69 74 65 6d 20 | a dragg|ed item |
|00001ad0| 2d 2d 2d 2d 2d 2d 0d 08 | ca 11 dd f2 64 72 61 67 |------..|....drag|
|00001ae0| 62 6f 78 28 71 25 29 0d | 08 d4 1f f4 20 49 46 20 |box(q%).|.... IF |
|00001af0| 64 72 61 67 62 6f 78 73 | 61 76 65 25 3d 54 52 55 |dragboxs|ave%=TRU|
|00001b00| 45 20 54 48 45 4e 0d 08 | de 14 20 20 64 72 61 67 |E THEN..|.. drag|
|00001b10| 62 6f 78 73 61 76 65 25 | 3d a3 0d 08 e8 11 20 20 |boxsave%|=..... |
|00001b20| f2 67 65 74 70 6f 69 6e | 74 65 72 0d 08 f2 15 20 |.getpoin|ter.... |
|00001b30| 20 66 69 6c 65 74 72 61 | 6e 73 66 65 72 25 3d b9 | filetra|nsfer%=.|
|00001b40| 0d 08 fc 2a 20 20 74 61 | 72 67 65 74 5f 77 69 6e |...* ta|rget_win|
|00001b50| 25 3d 68 61 6e 64 6c 65 | 25 3a 74 61 72 67 65 74 |%=handle|%:target|
|00001b60| 5f 69 63 25 3d 69 63 6f | 6e 25 0d 09 06 29 20 20 |_ic%=ico|n%...) |
|00001b70| 74 61 72 67 65 74 5f 78 | 25 3d 6d 6f 75 73 65 78 |target_x|%=mousex|
|00001b80| 25 3a 74 61 72 67 65 74 | 5f 79 25 3d 6d 6f 75 73 |%:target|_y%=mous|
|00001b90| 65 79 25 0d 09 10 16 20 | 20 74 61 72 67 65 74 5f |ey%.... | target_|
|00001ba0| 69 6e 64 65 78 25 3d 2d | 31 0d 09 1a 34 20 20 64 |index%=-|1...4 d|
|00001bb0| 61 74 61 73 61 76 65 24 | 3d a4 6c 65 61 66 6e 61 |atasave$|=.leafna|
|00001bc0| 6d 65 28 a4 47 65 74 49 | 63 6f 6e 28 77 5f 73 61 |me(.GetI|con(w_sa|
|00001bd0| 76 65 61 73 25 2c 20 31 | 2c 20 b9 29 29 0d 09 24 |veas%, 1|, .))..$|
|00001be0| 1d 20 20 71 25 21 30 3d | 36 30 3a 71 25 21 31 32 |. q%!0=|60:q%!12|
|00001bf0| 3d 30 3a 71 25 21 31 36 | 3d 31 0d 09 2e 28 20 20 |=0:q%!16|=1...( |
|00001c00| 71 25 21 32 30 3d 74 61 | 72 67 65 74 5f 77 69 6e |q%!20=ta|rget_win|
|00001c10| 25 3a 71 25 21 32 34 3d | 74 61 72 67 65 74 5f 69 |%:q%!24=|target_i|
|00001c20| 63 25 0d 09 38 25 20 20 | 71 25 21 32 38 3d 74 61 |c%..8% |q%!28=ta|
|00001c30| 72 67 65 74 5f 78 25 3a | 71 25 21 33 32 3d 74 61 |rget_x%:|q%!32=ta|
|00001c40| 72 67 65 74 5f 79 25 0d | 09 42 21 20 20 71 25 21 |rget_y%.|.B! q%!|
|00001c50| 33 36 3d 31 3a 71 25 21 | 34 30 3d 31 3a f4 20 46 |36=1:q%!|40=1:. F|
|00001c60| 69 6c 65 20 74 79 70 65 | 0d 09 4c 1d 20 20 24 28 |ile type|..L. $(|
|00001c70| 71 25 2b 34 34 29 3d 64 | 61 74 61 73 61 76 65 24 |q%+44)=d|atasave$|
|00001c80| 2b bd 28 30 29 0d 09 56 | 2f 20 20 c8 99 20 22 57 |+.(0)..V|/ .. "W|
|00001c90| 69 6d 70 5f 53 65 6e 64 | 4d 65 73 73 61 67 65 22 |imp_Send|Message"|
|00001ca0| 2c 31 37 2c 71 25 2c 68 | 61 6e 64 6c 65 25 2c 69 |,17,q%,h|andle%,i|
|00001cb0| 63 6f 6e 25 0d 09 60 11 | 20 20 6d 79 72 65 66 25 |con%..`.| myref%|
|00001cc0| 3d 71 25 21 38 0d 09 6a | 05 e1 0d 09 74 05 3a 0d |=q%!8..j|....t.:.|
|00001cd0| 09 7e 0b f4 20 45 4e 44 | 49 46 0d 09 88 05 e1 0d |.~.. END|IF......|
|00001ce0| 09 92 05 3a 0d 09 9c 2f | f4 20 2d 2d 2d 2d 2d 2d |...:.../|. ------|
|00001cf0| 2d 2d 2d 2d 2d 20 41 20 | 6d 65 6e 75 20 73 65 6c |----- A |menu sel|
|00001d00| 65 63 74 69 6f 6e 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ection -|--------|
|00001d10| 2d 2d 2d 0d 09 a6 24 dd | f2 6d 65 6e 75 73 65 6c |---...$.|.menusel|
|00001d20| 65 63 74 28 6d 65 6e 75 | 68 61 6e 64 6c 65 25 2c |ect(menu|handle%,|
|00001d30| 6d 65 6e 75 73 25 29 0d | 09 b0 41 e7 64 65 62 75 |menus%).|..A.debu|
|00001d40| 67 3a ef 34 2c 33 30 3a | f1 22 6d 65 6e 75 68 61 |g:.4,30:|."menuha|
|00001d50| 6e 64 6c 65 25 3d 22 3b | 6d 65 6e 75 68 61 6e 64 |ndle%=";|menuhand|
|00001d60| 6c 65 25 3b 22 20 20 21 | 6d 65 6e 75 73 25 3d 22 |le%;" !|menus%="|
|00001d70| 3b 21 6d 65 6e 75 73 25 | 0d 09 ba 0b ea 20 61 24 |;!menus%|..... a$|
|00001d80| 2c 61 25 0d 09 c4 14 c8 | 8e 20 6d 65 6e 75 68 61 |,a%.....|. menuha|
|00001d90| 6e 64 6c 65 25 20 ca 0d | 09 ce 13 20 20 c9 20 6d |ndle% ..|... . m|
|00001da0| 5f 69 63 6f 6e 62 61 72 | 25 3a 0d 09 d8 14 20 20 |_iconbar|%:.... |
|00001db0| 20 20 c8 8e 20 21 6d 65 | 6e 75 73 25 20 ca 0d 09 | .. !me|nus% ...|
|00001dc0| e2 16 20 20 20 20 20 20 | c9 20 31 3a 20 f2 66 69 |.. |. 1: .fi|
|00001dd0| 6e 69 73 68 0d 09 ec 09 | 20 20 20 20 cb 0d 09 f6 |nish....| ....|
|00001de0| 12 20 20 c9 20 6d 5f 73 | 61 76 65 61 73 25 3a 0d |. . m_s|aveas%:.|
|00001df0| 0a 00 14 20 20 20 20 c8 | 8e 20 21 6d 65 6e 75 73 |... .|. !menus|
|00001e00| 25 20 ca 0d 0a 0a 22 20 | 20 20 20 20 20 c9 20 30 |% ...." | . 0|
|00001e10| 3a 20 44 65 73 74 25 3d | 26 46 46 42 3a f2 63 6f |: Dest%=|&FFB:.co|
|00001e20| 6e 76 65 72 74 0d 0a 14 | 22 20 20 20 20 20 20 c9 |nvert...|" .|
|00001e30| 20 31 3a 20 44 65 73 74 | 25 3d 26 46 46 46 3a f2 | 1: Dest|%=&FFF:.|
|00001e40| 63 6f 6e 76 65 72 74 0d | 0a 1e 22 20 20 20 20 20 |convert.|.." |
|00001e50| 20 c9 20 32 3a 20 44 65 | 73 74 25 3d 26 42 42 44 | . 2: De|st%=&BBD|
|00001e60| 3a f2 63 6f 6e 76 65 72 | 74 0d 0a 28 55 20 20 20 |:.conver|t..(U |
|00001e70| 20 20 20 c9 20 33 3a 20 | 66 24 3d 64 65 73 74 66 | . 3: |f$=destf|
|00001e80| 69 6c 65 6e 61 6d 65 24 | 3a c8 95 20 c2 66 24 2c |ilename$|:.. .f$,|
|00001e90| 31 29 3c 3e 22 2e 22 20 | 66 24 3d c0 66 24 2c a9 |1)<>"." |f$=.f$,.|
|00001ea0| 66 24 2d 31 29 3a ce 3a | ff 22 44 69 72 20 22 2b |f$-1):.:|."Dir "+|
|00001eb0| c0 66 24 2c a9 66 24 2d | 31 29 3a ef 20 37 0d 0a |.f$,.f$-|1):. 7..|
|00001ec0| 32 09 20 20 20 20 cb 0d | 0a 3c 07 20 20 cb 0d 0a |2. ..|.<. ...|
|00001ed0| 46 05 e1 0d 0a 50 05 3a | 0d 0a 5a 21 f4 20 2d 2d |F....P.:|..Z!. --|
|00001ee0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 20 51 75 69 74 20 2d |--------|- Quit -|
|00001ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 0a 64 0c dd f2 66 |--------|-..d...f|
|00001f00| 69 6e 69 73 68 0d 0a 6e | 17 c8 99 20 22 57 69 6d |inish..n|... "Wim|
|00001f10| 70 5f 43 6c 6f 73 65 44 | 6f 77 6e 22 0d 0a 78 05 |p_CloseD|own"..x.|
|00001f20| e1 0d 0a 82 05 3a 0d 0a | 8c 10 dd f2 67 65 74 70 |.....:..|....getp|
|00001f30| 6f 69 6e 74 65 72 0d 0a | 96 20 c8 99 20 22 57 69 |ointer..|. .. "Wi|
|00001f40| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00001f50| 6f 22 2c 2c 71 25 0d 0a | a0 48 6d 6f 75 73 65 78 |o",,q%..|.Hmousex|
|00001f60| 25 3d 21 71 25 3a 6d 6f | 75 73 65 79 25 3d 71 25 |%=!q%:mo|usey%=q%|
|00001f70| 21 34 3a 62 25 3d 71 25 | 21 38 3a 68 61 6e 64 6c |!4:b%=q%|!8:handl|
|00001f80| 65 25 3d 71 25 21 31 32 | 3a 69 63 6f 6e 25 3d 71 |e%=q%!12|:icon%=q|
|00001f90| 25 21 31 36 3a 6f 62 25 | 3d 71 25 21 32 30 0d 0a |%!16:ob%|=q%!20..|
|00001fa0| aa 05 e1 0d 0a b4 05 3a | 0d 0a be 0e dd f2 65 72 |.......:|......er|
|00001fb0| 72 6f 72 62 6f 78 0d 0a | c8 19 c8 99 20 22 57 69 |rorbox..|.... "Wi|
|00001fc0| 6d 70 5f 44 72 61 67 42 | 6f 78 22 2c 2c 2d 31 0d |mp_DragB|ox",,-1.|
|00001fd0| 0a d2 30 21 62 75 66 66 | 65 72 25 3d 9f 3a 24 28 |..0!buff|er%=.:$(|
|00001fe0| 62 75 66 66 65 72 25 2b | 34 29 3d f6 24 2b 22 20 |buffer%+|4)=.$+" |
|00001ff0| 61 74 20 6c 69 6e 65 20 | 22 2b c3 9e 2b bd 30 0d |at line |"+..+.0.|
|00002000| 0a dc 29 c8 99 20 22 57 | 69 6d 70 5f 52 65 70 6f |..).. "W|imp_Repo|
|00002010| 72 74 45 72 72 6f 72 22 | 2c 62 75 66 66 65 72 25 |rtError"|,buffer%|
|00002020| 2c 31 2c 22 52 43 53 22 | 0d 0a e6 0d f2 66 69 6e |,1,"RCS"|.....fin|
|00002030| 69 73 68 3a e0 0d 0a f0 | 05 e1 0d 0a fa 05 3a 0d |ish:....|......:.|
|00002040| 0b 04 16 dd a4 69 63 6f | 6e 62 61 72 28 73 70 6e |.....ico|nbar(spn|
|00002050| 61 6d 65 24 29 0d 0b 0e | 11 21 71 25 3d 2d 31 3a |ame$)...|.!q%=-1:|
|00002060| 71 25 21 34 3d 30 0d 0b | 18 13 71 25 21 38 3d 30 |q%!4=0..|..q%!8=0|
|00002070| 3a 71 25 21 31 32 3d 36 | 33 0d 0b 22 18 71 25 21 |:q%!12=6|3..".q%!|
|00002080| 31 36 3d 36 34 3a 71 25 | 21 32 30 3d 26 32 31 30 |16=64:q%|!20=&210|
|00002090| 32 0d 0b 2c 18 de 20 71 | 25 21 32 34 20 28 a9 73 |2..,.. q|%!24 (.s|
|000020a0| 70 6e 61 6d 65 24 2b 31 | 29 0d 0b 36 14 24 28 71 |pname$+1|)..6.$(q|
|000020b0| 25 21 32 34 29 3d 73 70 | 6e 61 6d 65 24 0d 0b 40 |%!24)=sp|name$..@|
|000020c0| 12 71 25 21 32 38 3d 73 | 70 72 69 74 65 73 25 0d |.q%!28=s|prites%.|
|000020d0| 0b 4a 16 71 25 21 33 32 | 3d a9 28 73 70 6e 61 6d |.J.q%!32|=.(spnam|
|000020e0| 65 24 29 2b 31 0d 0b 54 | 22 c8 99 20 22 57 69 6d |e$)+1..T|".. "Wim|
|000020f0| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 71 |p_Create|Icon",,q|
|00002100| 25 20 b8 20 69 63 25 0d | 0b 5e 08 3d 69 63 25 0d |% . ic%.|.^.=ic%.|
|00002110| 0b 68 05 3a 0d 0b 72 10 | dd a4 67 65 74 73 74 72 |.h.:..r.|..getstr|
|00002120| 28 61 25 29 0d 0b 7c 08 | ea 20 62 24 0d 0b 86 0e |(a%)..|.|. b$....|
|00002130| c8 95 20 3f 61 25 3e 3d | 33 32 0d 0b 90 0f 20 62 |.. ?a%>=|32.... b|
|00002140| 24 2b 3d bd 28 3f 61 25 | 29 0d 0b 9a 0a 20 61 25 |$+=.(?a%|).... a%|
|00002150| 2b 3d 31 0d 0b a4 05 ce | 0d 0b ae 07 3d 62 24 0d |+=1.....|....=b$.|
|00002160| 0b b8 05 3a 0d 0b c2 12 | dd a4 6c 65 61 66 6e 61 |...:....|..leafna|
|00002170| 6d 65 28 61 24 29 0d 0b | cc 23 c8 95 a7 61 24 2c |me(a$)..|.#...a$,|
|00002180| 22 2e 22 29 3a 61 24 3d | c1 61 24 2c a7 61 24 2c |"."):a$=|.a$,.a$,|
|00002190| 22 2e 22 29 2b 31 29 3a | ce 0d 0b d6 07 3d 61 24 |".")+1):|.....=a$|
|000021a0| 0d 0b e0 05 3a 0d 0b ea | 3a f4 20 2d 2d 2d 2d 2d |....:...|:. -----|
|000021b0| 2d 2d 2d 2d 2d 2d 20 4d | 6f 64 69 66 79 20 61 6e |------ M|odify an|
|000021c0| 20 65 78 69 73 74 69 6e | 67 20 69 63 6f 6e 20 6e | existin|g icon n|
|000021d0| 20 61 20 77 69 6e 64 6f | 77 20 2d 2d 2d 2d 2d 0d | a windo|w -----.|
|000021e0| 0b f4 26 dd f2 53 65 74 | 49 63 6f 6e 28 77 69 6e |..&..Set|Icon(win|
|000021f0| 64 6f 77 25 2c 69 63 6f | 6e 25 2c 73 74 61 74 65 |dow%,ico|n%,state|
|00002200| 24 2c 66 25 29 0d 0b fe | 47 21 6f 70 74 62 75 66 |$,f%)...|G!optbuf|
|00002210| 66 25 3d 77 69 6e 64 6f | 77 25 3a 6f 70 74 62 75 |f%=windo|w%:optbu|
|00002220| 66 66 25 21 34 3d 69 63 | 6f 6e 25 3a c8 99 20 22 |ff%!4=ic|on%:.. "|
|00002230| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|00002240| 65 22 2c 2c 6f 70 74 62 | 75 66 66 25 0d 0c 08 36 |e",,optb|uff%...6|
|00002250| e7 20 66 25 20 24 28 6f | 70 74 62 75 66 66 25 21 |. f% $(o|ptbuff%!|
|00002260| 32 38 29 3d 73 74 61 74 | 65 24 20 8b 20 24 28 6f |28)=stat|e$ . $(o|
|00002270| 70 74 62 75 66 66 25 2b | 32 38 29 3d 73 74 61 74 |ptbuff%+|28)=stat|
|00002280| 65 24 0d 0c 12 45 21 6f | 70 74 62 75 66 66 25 3d |e$...E!o|ptbuff%=|
|00002290| 77 69 6e 64 6f 77 25 3a | 6f 70 74 62 75 66 66 25 |window%:|optbuff%|
|000022a0| 21 34 3d 69 63 6f 6e 25 | 3a c8 99 20 22 57 69 6d |!4=icon%|:.. "Wim|
|000022b0| 70 5f 44 65 6c 65 74 65 | 49 63 6f 6e 22 2c 2c 6f |p_Delete|Icon",,o|
|000022c0| 70 74 62 75 66 66 25 0d | 0c 1c 37 6f 70 74 62 75 |ptbuff%.|..7optbu|
|000022d0| 66 66 25 21 34 3d 77 69 | 6e 64 6f 77 25 3a c8 99 |ff%!4=wi|ndow%:..|
|000022e0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 49 63 6f | "Wimp_C|reateIco|
|000022f0| 6e 22 2c 2c 6f 70 74 62 | 75 66 66 25 2b 34 0d 0c |n",,optb|uff%+4..|
|00002300| 26 44 21 71 25 3d 77 69 | 6e 64 6f 77 25 3a 71 25 |&D!q%=wi|ndow%:q%|
|00002310| 21 34 3d 69 63 6f 6e 25 | 3a 71 25 21 38 3d 30 3a |!4=icon%|:q%!8=0:|
|00002320| 71 25 21 31 32 3d 30 3a | c8 99 20 22 57 69 6d 70 |q%!12=0:|.. "Wimp|
|00002330| 5f 53 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_SetIcon|State",,|
|00002340| 71 25 0d 0c 30 05 e1 0d | 0c 3a 05 3a 0d 0c 44 31 |q%..0...|.:.:..D1|
|00002350| f4 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 47 65 |. ------|----- Ge|
|00002360| 74 20 74 68 65 20 73 74 | 61 74 65 20 6f 66 20 61 |t the st|ate of a|
|00002370| 6e 20 69 63 6f 6e 20 2d | 2d 2d 2d 2d 2d 0d 0c 4e |n icon -|-----..N|
|00002380| 1f dd a4 47 65 74 49 63 | 6f 6e 28 77 69 6e 64 6f |...GetIc|on(windo|
|00002390| 77 25 2c 69 63 6f 6e 25 | 2c 66 25 29 0d 0c 58 47 |w%,icon%|,f%)..XG|
|000023a0| 21 6f 70 74 62 75 66 66 | 25 3d 77 69 6e 64 6f 77 |!optbuff|%=window|
|000023b0| 25 3a 6f 70 74 62 75 66 | 66 25 21 34 3d 69 63 6f |%:optbuf|f%!4=ico|
|000023c0| 6e 25 3a c8 99 20 22 57 | 69 6d 70 5f 47 65 74 49 |n%:.. "W|imp_GetI|
|000023d0| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 6f 70 74 62 75 |conState|",,optbu|
|000023e0| 66 66 25 0d 0c 62 2a e7 | 20 66 25 3a 3d 24 28 6f |ff%..b*.| f%:=$(o|
|000023f0| 70 74 62 75 66 66 25 21 | 32 38 29 20 8b 20 3d 24 |ptbuff%!|28) . =$|
|00002400| 28 6f 70 74 62 75 66 66 | 25 2b 32 38 29 0d 0c 6c |(optbuff|%+28)..l|
|00002410| 05 3a 0d 0c 76 35 f4 20 | 52 45 4d 20 2d 2d 2d 2d |.:..v5. |REM ----|
|00002420| 2d 2d 2d 2d 2d 2d 2d 20 | 53 65 6c 65 63 74 20 61 |------- |Select a|
|00002430| 6e 20 69 63 6f 6e 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |n icon -|--------|
|00002440| 2d 2d 2d 2d 2d 2d 2d 0d | 0c 80 29 f4 20 44 45 46 |-------.|..). DEF|
|00002450| 50 52 4f 43 53 65 6c 65 | 63 74 49 63 6f 6e 28 77 |PROCSele|ctIcon(w|
|00002460| 69 6e 64 6f 77 25 2c 69 | 63 6f 6e 25 2c 66 25 29 |indow%,i|con%,f%)|
|00002470| 0d 0c 8a 3d f4 20 71 25 | 21 30 3d 77 69 6e 64 6f |...=. q%|!0=windo|
|00002480| 77 25 3a 71 25 21 34 3d | 69 63 6f 6e 25 3a 71 25 |w%:q%!4=|icon%:q%|
|00002490| 21 38 3d 31 3c 3c 32 31 | 3a 71 25 21 31 32 3d 28 |!8=1<<21|:q%!12=(|
|000024a0| 66 25 20 41 4e 44 20 31 | 29 3c 3c 32 31 0d 0c 94 |f% AND 1|)<<21...|
|000024b0| 20 f4 20 53 59 53 22 57 | 69 6d 70 5f 53 65 74 49 | . SYS"W|imp_SetI|
|000024c0| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 71 25 0d 0c 9e |conState|",,q%...|
|000024d0| 0d f4 20 45 4e 44 50 52 | 4f 43 0d 0c a8 05 3a 0d |.. ENDPR|OC....:.|
|000024e0| 0c b2 4d f4 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..M. ---|--------|
|000024f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002500| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002510| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 0c bc 05 |--------|----....|
|00002530| 3a 0d 0c c6 0e dd f2 73 | 63 61 6e 28 66 24 29 0d |:......s|can(f$).|
|00002540| 0c d0 3a ea 20 63 6f 75 | 6e 74 31 25 2c 64 69 72 |..:. cou|nt1%,dir|
|00002550| 24 2c 6c 25 2c 65 25 2c | 72 30 25 3a 6e 75 6d 62 |$,l%,e%,|r0%:numb|
|00002560| 65 72 25 3d a3 3a 6b 65 | 79 25 3d ac a6 2d 31 3a |er%=.:ke|y%=..-1:|
|00002570| 6b 65 79 32 25 3d a6 2d | 32 0d 0c da 43 c8 99 20 |key2%=.-|2...C.. |
|00002580| 22 58 4f 53 5f 46 69 6c | 65 22 2c 35 2c 66 24 20 |"XOS_Fil|e",5,f$ |
|00002590| b8 20 72 30 25 2c 2c 6c | 25 2c 65 25 3a e7 6b 65 |. r0%,,l|%,e%:.ke|
|000025a0| 79 32 25 20 6c 25 3d 30 | 3a f4 20 49 67 6e 6f 72 |y2% l%=0|:. Ignor|
|000025b0| 65 20 63 6f 6e 76 65 72 | 73 69 6f 6e 0d 0c e4 1b |e conver|sion....|
|000025c0| e7 20 72 30 25 3d 32 20 | ff 22 44 69 72 20 22 2b |. r0%=2 |."Dir "+|
|000025d0| 66 24 3a ef 37 3a e1 0d | 0c ee 0e e7 20 72 30 25 |f$:.7:..|.... r0%|
|000025e0| 3c 3e 31 20 e1 0d 0c f8 | 30 f4 20 49 46 20 49 4e |<>1 ....|0. IF IN|
|000025f0| 4b 45 59 2d 32 3a 4f 53 | 43 4c 49 22 57 49 4d 50 |KEY-2:OS|CLI"WIMP|
|00002600| 54 41 53 4b 22 5a 38 30 | 20 22 2b 66 24 3a 45 4e |TASK"Z80| "+f$:EN|
|00002610| 44 50 52 4f 43 0d 0d 02 | 45 73 6f 75 72 63 65 66 |DPROC...|Esourcef|
|00002620| 69 6c 65 6e 61 6d 65 24 | 3d 66 24 3a 64 65 73 74 |ilename$|=f$:dest|
|00002630| 66 69 6c 65 6e 61 6d 65 | 24 3d 66 24 3a f2 53 65 |filename|$=f$:.Se|
|00002640| 74 49 63 6f 6e 28 77 5f | 73 61 76 65 61 73 25 2c |tIcon(w_|saveas%,|
|00002650| 20 31 2c 20 66 24 2c 20 | b9 29 0d 0d 0c 24 e7 28 | 1, f$, |.)...$.(|
|00002660| 6c 25 80 26 46 46 46 30 | 30 29 3d 26 46 46 42 30 |l%.&FFF0|0)=&FFB0|
|00002670| 30 20 f2 42 61 73 54 6f | 54 65 78 74 3a e1 0d 0d |0 .BasTo|Text:...|
|00002680| 16 24 e7 28 6c 25 80 26 | 46 46 46 30 30 29 3d 26 |.$.(l%.&|FFF00)=&|
|00002690| 46 46 46 30 30 20 f2 54 | 65 78 74 54 6f 42 61 73 |FFF00 .T|extToBas|
|000026a0| 3a e1 0d 0d 20 24 e7 28 | 6c 25 80 26 46 46 46 30 |:... $.(|l%.&FFF0|
|000026b0| 30 29 3d 26 42 42 44 30 | 30 20 f2 52 65 76 72 54 |0)=&BBD0|0 .RevrT|
|000026c0| 6f 42 61 73 3a e1 0d 0d | 2a 22 c8 95 20 c2 66 24 |oBas:...|*".. .f$|
|000026d0| 2c 31 29 3c 3e 22 2e 22 | 20 66 24 3d c0 66 24 2c |,1)<>"."| f$=.f$,|
|000026e0| a9 66 24 2d 31 29 3a ce | 0d 0d 34 1a ff 22 44 69 |.f$-1):.|..4.."Di|
|000026f0| 72 20 22 2b c0 66 24 2c | a9 66 24 2d 31 29 3a ef |r "+.f$,|.f$-1):.|
|00002700| 20 37 0d 0d 3e 05 e1 0d | 0d 48 05 3a 0d 0d 52 30 | 7..>...|.H.:..R0|
|00002710| dd f2 63 6f 6e 76 65 72 | 74 3a 6b 65 79 25 3d ac |..conver|t:key%=.|
|00002720| a6 2d 31 3a c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |.-1:.. "|Wimp_Cre|
|00002730| 61 74 65 4d 65 6e 75 22 | 2c 2c 2d 31 0d 0d 5c 49 |ateMenu"|,,-1..\I|
|00002740| e7 64 65 62 75 67 3a ef | 34 2c 33 30 3a f1 22 43 |.debug:.|4,30:."C|
|00002750| 6f 6e 76 65 72 74 69 6e | 67 20 22 3b 73 6f 75 72 |onvertin|g ";sour|
|00002760| 63 65 66 69 6c 65 6e 61 | 6d 65 24 3b 22 20 74 6f |cefilena|me$;" to|
|00002770| 20 22 3b 64 65 73 74 66 | 69 6c 65 6e 61 6d 65 24 | ";destf|ilename$|
|00002780| 3b 22 20 20 22 0d 0d 66 | 33 e7 53 6f 75 72 63 65 |;" "..f|3.Source|
|00002790| 25 3d 26 46 46 46 20 f2 | 54 65 78 74 54 6f 42 61 |%=&FFF .|TextToBa|
|000027a0| 73 47 6f 3a e1 3a f4 20 | 44 65 73 74 20 6d 75 73 |sGo:.:. |Dest mus|
|000027b0| 74 20 62 65 20 46 46 42 | 0d 0d 70 2d e7 53 6f 75 |t be FFB|..p-.Sou|
|000027c0| 72 63 65 25 3d 26 46 46 | 42 20 80 20 44 65 73 74 |rce%=&FF|B . Dest|
|000027d0| 25 3d 26 46 46 46 20 f2 | 42 61 73 54 6f 54 65 78 |%=&FFF .|BasToTex|
|000027e0| 74 47 6f 3a e1 0d 0d 7a | 2d e7 53 6f 75 72 63 65 |tGo:...z|-.Source|
|000027f0| 25 3d 26 46 46 42 20 80 | 20 44 65 73 74 25 3d 26 |%=&FFB .| Dest%=&|
|00002800| 42 42 44 20 f2 42 61 73 | 54 6f 52 65 76 72 47 6f |BBD .Bas|ToRevrGo|
|00002810| 3a e1 0d 0d 84 33 e7 53 | 6f 75 72 63 65 25 3d 26 |:....3.S|ource%=&|
|00002820| 42 42 44 20 f2 52 65 76 | 72 54 6f 42 61 73 47 6f |BBD .Rev|rToBasGo|
|00002830| 3a e1 3a f4 20 44 65 73 | 74 20 6d 75 73 74 20 62 |:.:. Des|t must b|
|00002840| 65 20 46 46 42 0d 0d 8e | 05 e1 0d 0d 98 05 3a 0d |e FFB...|......:.|
|00002850| 0d a2 0f dd f2 52 65 76 | 72 54 6f 42 61 73 0d 0d |.....Rev|rToBas..|
|00002860| ac 1d f2 73 65 74 5f 73 | 68 61 64 65 28 6d 5f 73 |...set_s|hade(m_s|
|00002870| 61 76 65 61 73 25 2c 30 | 2c a3 29 0d 0d b6 1d f2 |aveas%,0|,.).....|
|00002880| 73 65 74 5f 73 68 61 64 | 65 28 6d 5f 73 61 76 65 |set_shad|e(m_save|
|00002890| 61 73 25 2c 31 2c b9 29 | 0d 0d c0 1d f2 73 65 74 |as%,1,.)|.....set|
|000028a0| 5f 73 68 61 64 65 28 6d | 5f 73 61 76 65 61 73 25 |_shade(m|_saveas%|
|000028b0| 2c 32 2c b9 29 0d 0d ca | 25 53 6f 75 72 63 65 25 |,2,.)...|%Source%|
|000028c0| 3d 26 42 42 44 3a f2 6d | 65 6e 75 28 6d 5f 73 61 |=&BBD:.m|enu(m_sa|
|000028d0| 76 65 61 73 25 2c 34 2c | 30 29 0d 0d d4 05 e1 0d |veas%,4,|0)......|
|000028e0| 0d de 05 3a 0d 0d e8 11 | dd f2 52 65 76 72 54 6f |...:....|..RevrTo|
|000028f0| 42 61 73 47 6f 0d 0d f2 | 23 69 6e 25 3d 8e 28 73 |BasGo...|#in%=.(s|
|00002900| 6f 75 72 63 65 66 69 6c | 65 6e 61 6d 65 24 29 3a |ourcefil|ename$):|
|00002910| e7 69 6e 25 3d 30 20 e1 | 0d 0d fc 50 6f 75 74 25 |.in%=0 .|...Pout%|
|00002920| 3d ae 28 22 3c 57 69 6d | 70 24 53 63 72 61 70 3e |=.("<Wim|p$Scrap>|
|00002930| 22 29 3a e7 6f 75 74 25 | 3d 30 20 d9 23 69 6e 25 |"):.out%|=0 .#in%|
|00002940| 3a f2 65 72 72 6f 72 28 | 32 31 34 2c 22 43 61 6e |:.error(|214,"Can|
|00002950| 27 74 20 6f 70 65 6e 20 | 3c 57 69 6d 70 24 53 63 |'t open |<Wimp$Sc|
|00002960| 72 61 70 3e 22 29 3a e1 | 0d 0e 06 15 c8 99 20 22 |rap>"):.|...... "|
|00002970| 48 6f 75 72 67 6c 61 73 | 73 5f 4f 6e 22 0d 0e 10 |Hourglas|s_On"...|
|00002980| 18 6c 65 6e 25 3d 9a 23 | 69 6e 25 3a d5 23 6f 75 |.len%=.#|in%:.#ou|
|00002990| 74 25 2c 31 33 0d 0e 1a | 2f f5 3a c8 99 20 22 48 |t%,13...|/.:.. "H|
|000029a0| 6f 75 72 67 6c 61 73 73 | 5f 50 65 72 63 65 6e 74 |ourglass|_Percent|
|000029b0| 61 67 65 22 2c 31 30 30 | 2a 8f 23 69 6e 25 2f a2 |age",100|*.#in%/.|
|000029c0| 23 69 6e 25 0d 0e 24 1f | 20 20 6c 69 6e 65 31 25 |#in%..$.| line1%|
|000029d0| 3d 9a 23 69 6e 25 3a 6c | 69 6e 65 32 25 3d 9a 23 |=.#in%:l|ine2%=.#|
|000029e0| 69 6e 25 0d 0e 2e 2d 20 | 20 d5 23 6f 75 74 25 2c |in%...- | .#out%,|
|000029f0| 6c 69 6e 65 32 25 3a d5 | 23 6f 75 74 25 2c 6c 69 |line2%:.|#out%,li|
|00002a00| 6e 65 31 25 3a d5 23 6f | 75 74 25 2c 6c 65 6e 25 |ne1%:.#o|ut%,len%|
|00002a10| 0d 0e 38 20 20 20 f5 62 | 25 3d 9a 23 69 6e 25 3a |..8 .b|%=.#in%:|
|00002a20| d5 23 6f 75 74 25 2c 62 | 25 3a fd 62 25 3d 31 33 |.#out%,b|%:.b%=13|
|00002a30| 0d 0e 42 10 20 20 6c 65 | 6e 25 3d 9a 23 69 6e 25 |..B. le|n%=.#in%|
|00002a40| 0d 0e 4c 13 fd 6c 65 6e | 25 3d 30 20 84 20 c5 23 |..L..len|%=0 . .#|
|00002a50| 69 6e 25 0d 0e 56 32 d5 | 23 6f 75 74 25 2c 26 46 |in%..V2.|#out%,&F|
|00002a60| 46 3a e7 ac c5 23 69 6e | 25 20 62 25 3d 9a 23 69 |F:...#in|% b%=.#i|
|00002a70| 6e 25 3a e7 62 25 3c 3e | 26 46 46 20 d5 23 6f 75 |n%:.b%<>|&FF .#ou|
|00002a80| 74 25 2c 62 25 0d 0e 60 | 27 e7 ac c5 23 69 6e 25 |t%,b%..`|'...#in%|
|00002a90| 20 62 25 3d 9a 23 69 6e | 25 3a e7 62 25 3c 3e 26 | b%=.#in|%:.b%<>&|
|00002aa0| 46 46 20 d5 23 6f 75 74 | 25 2c 62 25 0d 0e 6a 20 |FF .#out|%,b%..j |
|00002ab0| e7 ac c5 23 69 6e 25 20 | f5 d5 23 6f 75 74 25 2c |...#in% |..#out%,|
|00002ac0| 9a 23 69 6e 25 3a fd c5 | 23 69 6e 25 0d 0e 74 10 |.#in%:..|#in%..t.|
|00002ad0| d9 23 6f 75 74 25 3a d9 | 23 69 6e 25 0d 0e 7e 16 |.#out%:.|#in%..~.|
|00002ae0| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 66 |.. "Hour|glass_Of|
|00002af0| 66 22 0d 0e 88 21 ff 22 | 53 65 74 54 79 70 65 20 |f"...!."|SetType |
|00002b00| 3c 57 69 6d 70 24 53 63 | 72 61 70 3e 20 42 61 73 |<Wimp$Sc|rap> Bas|
|00002b10| 69 63 22 0d 0e 92 40 ff | 22 43 6f 70 79 20 3c 57 |ic"...@.|"Copy <W|
|00002b20| 69 6d 70 24 53 63 72 61 | 70 3e 20 22 2b 64 65 73 |imp$Scra|p> "+des|
|00002b30| 74 66 69 6c 65 6e 61 6d | 65 24 2b 22 20 7e 43 20 |tfilenam|e$+" ~C |
|00002b40| 44 20 46 20 7e 4c 20 7e | 4e 20 7e 50 20 7e 52 20 |D F ~L ~|N ~P ~R |
|00002b50| 7e 56 22 0d 0e 9c 05 e1 | 0d 0e a6 05 3a 0d 0e b0 |~V".....|....:...|
|00002b60| 11 dd f2 42 61 73 54 6f | 52 65 76 72 47 6f 0d 0e |...BasTo|RevrGo..|
|00002b70| ba 23 69 6e 25 3d 8e 28 | 73 6f 75 72 63 65 66 69 |.#in%=.(|sourcefi|
|00002b80| 6c 65 6e 61 6d 65 24 29 | 3a e7 69 6e 25 3d 30 20 |lename$)|:.in%=0 |
|00002b90| e1 0d 0e c4 50 6f 75 74 | 25 3d ae 28 22 3c 57 69 |....Pout|%=.("<Wi|
|00002ba0| 6d 70 24 53 63 72 61 70 | 3e 22 29 3a e7 6f 75 74 |mp$Scrap|>"):.out|
|00002bb0| 25 3d 30 20 d9 23 69 6e | 25 3a f2 65 72 72 6f 72 |%=0 .#in|%:.error|
|00002bc0| 28 32 31 34 2c 22 43 61 | 6e 27 74 20 6f 70 65 6e |(214,"Ca|n't open|
|00002bd0| 20 3c 57 69 6d 70 24 53 | 63 72 61 70 3e 22 29 3a | <Wimp$S|crap>"):|
|00002be0| e1 0d 0e ce 15 c8 99 20 | 22 48 6f 75 72 67 6c 61 |....... |"Hourgla|
|00002bf0| 73 73 5f 4f 6e 22 0d 0e | d8 19 62 25 3d 9a 23 69 |ss_On"..|..b%=.#i|
|00002c00| 6e 25 3a 6c 69 6e 65 31 | 25 3d 9a 23 69 6e 25 0d |n%:line1|%=.#in%.|
|00002c10| 0e e2 2f f5 3a c8 99 20 | 22 48 6f 75 72 67 6c 61 |../.:.. |"Hourgla|
|00002c20| 73 73 5f 50 65 72 63 65 | 6e 74 61 67 65 22 2c 31 |ss_Perce|ntage",1|
|00002c30| 30 30 2a 8f 23 69 6e 25 | 2f a2 23 69 6e 25 0d 0e |00*.#in%|/.#in%..|
|00002c40| ec 1d 20 20 6c 69 6e 65 | 32 25 3d 9a 23 69 6e 25 |.. line|2%=.#in%|
|00002c50| 3a 6c 65 6e 25 3d 9a 23 | 69 6e 25 0d 0e f6 2d 20 |:len%=.#|in%...- |
|00002c60| 20 d5 23 6f 75 74 25 2c | 6c 65 6e 25 3a d5 23 6f | .#out%,|len%:.#o|
|00002c70| 75 74 25 2c 6c 69 6e 65 | 32 25 3a d5 23 6f 75 74 |ut%,line|2%:.#out|
|00002c80| 25 2c 6c 69 6e 65 31 25 | 0d 0f 00 20 20 20 f5 62 |%,line1%|... .b|
|00002c90| 25 3d 9a 23 69 6e 25 3a | d5 23 6f 75 74 25 2c 62 |%=.#in%:|.#out%,b|
|00002ca0| 25 3a fd 62 25 3d 31 33 | 0d 0f 0a 12 20 20 6c 69 |%:.b%=13|.... li|
|00002cb0| 6e 65 31 25 3d 9a 23 69 | 6e 25 0d 0f 14 17 fd 6c |ne1%=.#i|n%.....l|
|00002cc0| 69 6e 65 31 25 3d 26 46 | 46 20 84 20 c5 23 69 6e |ine1%=&F|F . .#in|
|00002cd0| 25 0d 0f 1e 22 d5 23 6f | 75 74 25 2c 30 3a d5 23 |%...".#o|ut%,0:.#|
|00002ce0| 6f 75 74 25 2c 26 46 46 | 3a d5 23 6f 75 74 25 2c |out%,&FF|:.#out%,|
|00002cf0| 26 46 46 0d 0f 28 20 e7 | ac c5 23 69 6e 25 20 f5 |&FF..( .|..#in% .|
|00002d00| d5 23 6f 75 74 25 2c 9a | 23 69 6e 25 3a fd c5 23 |.#out%,.|#in%:..#|
|00002d10| 69 6e 25 0d 0f 32 10 d9 | 23 6f 75 74 25 3a d9 23 |in%..2..|#out%:.#|
|00002d20| 69 6e 25 0d 0f 3c 16 c8 | 99 20 22 48 6f 75 72 67 |in%..<..|. "Hourg|
|00002d30| 6c 61 73 73 5f 4f 66 66 | 22 0d 0f 46 1f ff 22 53 |lass_Off|"..F.."S|
|00002d40| 65 74 54 79 70 65 20 3c | 57 69 6d 70 24 53 63 72 |etType <|Wimp$Scr|
|00002d50| 61 70 3e 20 42 42 44 22 | 0d 0f 50 40 ff 22 43 6f |ap> BBD"|..P@."Co|
|00002d60| 70 79 20 3c 57 69 6d 70 | 24 53 63 72 61 70 3e 20 |py <Wimp|$Scrap> |
|00002d70| 22 2b 64 65 73 74 66 69 | 6c 65 6e 61 6d 65 24 2b |"+destfi|lename$+|
|00002d80| 22 20 7e 43 20 44 20 46 | 20 7e 4c 20 7e 4e 20 7e |" ~C D F| ~L ~N ~|
|00002d90| 50 20 7e 52 20 7e 56 22 | 0d 0f 5a 05 e1 0d 0f 64 |P ~R ~V"|..Z....d|
|00002da0| 05 3a 0d 0f 6e 0f dd f2 | 42 61 73 54 6f 54 65 78 |.:..n...|BasToTex|
|00002db0| 74 0d 0f 78 1c 69 6e 25 | 3d 8e 28 66 24 29 3a 62 |t..x.in%|=.(f$):b|
|00002dc0| 25 3d 9a 23 69 6e 25 3a | d9 23 69 6e 25 0d 0f 82 |%=.#in%:|.#in%...|
|00002dd0| 19 e7 20 62 25 3c 3e 31 | 33 20 f2 54 65 78 74 54 |.. b%<>1|3 .TextT|
|00002de0| 6f 42 61 73 3a e1 0d 0f | 8c 1d f2 73 65 74 5f 73 |oBas:...|...set_s|
|00002df0| 68 61 64 65 28 6d 5f 73 | 61 76 65 61 73 25 2c 30 |hade(m_s|aveas%,0|
|00002e00| 2c b9 29 0d 0f 96 1d f2 | 73 65 74 5f 73 68 61 64 |,.).....|set_shad|
|00002e10| 65 28 6d 5f 73 61 76 65 | 61 73 25 2c 31 2c a3 29 |e(m_save|as%,1,.)|
|00002e20| 0d 0f a0 1d f2 73 65 74 | 5f 73 68 61 64 65 28 6d |.....set|_shade(m|
|00002e30| 5f 73 61 76 65 61 73 25 | 2c 32 2c a3 29 0d 0f aa |_saveas%|,2,.)...|
|00002e40| 25 53 6f 75 72 63 65 25 | 3d 26 46 46 42 3a f2 6d |%Source%|=&FFB:.m|
|00002e50| 65 6e 75 28 6d 5f 73 61 | 76 65 61 73 25 2c 34 2c |enu(m_sa|veas%,4,|
|00002e60| 30 29 0d 0f b4 05 e1 0d | 0f be 05 3a 0d 0f c8 11 |0)......|...:....|
|00002e70| dd f2 42 61 73 54 6f 54 | 65 78 74 47 6f 0d 0f d2 |..BasToT|extGo...|
|00002e80| 21 ea 20 6c 69 6e 65 25 | 2c 6c 65 6e 25 2c 62 25 |!. line%|,len%,b%|
|00002e90| 2c 6c 6e 65 72 72 25 2c | 71 75 6f 74 65 25 0d 0f |,lnerr%,|quote%..|
|00002ea0| dc 23 69 6e 25 3d 8e 28 | 73 6f 75 72 63 65 66 69 |.#in%=.(|sourcefi|
|00002eb0| 6c 65 6e 61 6d 65 24 29 | 3a 62 25 3d 9a 23 69 6e |lename$)|:b%=.#in|
|00002ec0| 25 0d 0f e6 4f 6f 75 74 | 25 3d ae 22 3c 57 69 6d |%...Oout|%=."<Wim|
|00002ed0| 70 24 53 63 72 61 70 3e | 22 3a e7 20 6f 75 74 25 |p$Scrap>|":. out%|
|00002ee0| 3d 30 20 d9 23 69 6e 25 | 3a f2 65 72 72 6f 72 28 |=0 .#in%|:.error(|
|00002ef0| 32 31 34 2c 22 43 61 6e | 27 74 20 6f 70 65 6e 20 |214,"Can|'t open |
|00002f00| 3c 57 69 6d 70 24 53 63 | 72 61 70 3e 22 29 3a e1 |<Wimp$Sc|rap>"):.|
|00002f10| 0d 0f f0 15 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 |...... "|Hourglas|
|00002f20| 73 5f 4f 6e 22 0d 0f fa | 32 6c 69 6e 65 25 3d 9a |s_On"...|2line%=.|
|00002f30| 23 69 6e 25 3a f5 3a 6c | 69 6e 65 25 3d 32 35 36 |#in%:.:l|ine%=256|
|00002f40| 2a 6c 69 6e 65 25 2b 9a | 23 69 6e 25 3a 6c 65 6e |*line%+.|#in%:len|
|00002f50| 25 3d 9a 23 69 6e 25 0d | 10 04 2d c8 99 20 22 48 |%=.#in%.|..-.. "H|
|00002f60| 6f 75 72 67 6c 61 73 73 | 5f 50 65 72 63 65 6e 74 |ourglass|_Percent|
|00002f70| 61 67 65 22 2c 8f 23 69 | 6e 25 2f a2 23 69 6e 25 |age",.#i|n%/.#in%|
|00002f80| 2a 31 30 30 0d 10 0e 2b | e7 6e 75 6d 62 65 72 25 |*100...+|.number%|
|00002f90| 20 d5 23 6f 75 74 25 2c | c4 35 2d a9 c3 6c 69 6e | .#out%,|.5-..lin|
|00002fa0| 65 25 2c 22 20 22 29 2b | c3 6c 69 6e 65 25 3b 0d |e%," ")+|.line%;.|
|00002fb0| 10 18 30 f5 3a 62 25 3d | 9a 23 69 6e 25 3a d5 23 |..0.:b%=|.#in%:.#|
|00002fc0| 6f 75 74 25 2c a4 63 68 | 61 72 28 62 25 29 3b 3a |out%,.ch|ar(b%);:|
|00002fd0| fd 62 25 3d 31 33 20 84 | 20 6c 6e 65 72 72 25 0d |.b%=13 .| lnerr%.|
|00002fe0| 10 22 23 6c 69 6e 65 25 | 3d 9a 23 69 6e 25 3a fd |."#line%|=.#in%:.|
|00002ff0| 6c 69 6e 65 25 3d 26 46 | 46 20 84 20 6c 6e 65 72 |line%=&F|F . lner|
|00003000| 72 25 0d 10 2c 30 d9 23 | 6f 75 74 25 3a d9 23 69 |r%..,0.#|out%:.#i|
|00003010| 6e 25 3a 69 6e 25 3d 30 | 3a 6f 75 74 25 3d 30 3a |n%:in%=0|:out%=0:|
|00003020| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 66 |.. "Hour|glass_Of|
|00003030| 66 22 0d 10 36 24 e7 6c | 6e 65 72 72 25 20 6e 75 |f"..6$.l|nerr% nu|
|00003040| 6d 62 65 72 25 3d b9 3a | f2 42 61 73 54 6f 54 65 |mber%=.:|.BasToTe|
|00003050| 78 74 47 6f 3a e1 0d 10 | 40 28 e7 20 a6 2d 31 20 |xtGo:...|@(. .-1 |
|00003060| 6b 65 79 25 3d a3 3a f4 | 20 43 68 65 63 6b 20 53 |key%=.:.| Check S|
|00003070| 48 49 46 54 20 6f 6e 63 | 65 20 6d 6f 72 65 0d 10 |HIFT onc|e more..|
|00003080| 4a 47 e7 20 6b 65 79 25 | 20 ff 22 53 65 74 54 79 |JG. key%| ."SetTy|
|00003090| 70 65 20 3c 57 69 6d 70 | 24 53 63 72 61 70 3e 20 |pe <Wimp|$Scrap> |
|000030a0| 42 41 53 49 43 22 20 8b | 20 ff 22 53 65 74 54 79 |BASIC" .| ."SetTy|
|000030b0| 70 65 20 3c 57 69 6d 70 | 24 53 63 72 61 70 3e 20 |pe <Wimp|$Scrap> |
|000030c0| 54 65 78 74 22 0d 10 54 | 40 ff 22 43 6f 70 79 20 |Text"..T|@."Copy |
|000030d0| 3c 57 69 6d 70 24 53 63 | 72 61 70 3e 20 22 2b 64 |<Wimp$Sc|rap> "+d|
|000030e0| 65 73 74 66 69 6c 65 6e | 61 6d 65 24 2b 22 20 7e |estfilen|ame$+" ~|
|000030f0| 43 20 44 20 46 20 7e 4c | 20 7e 4e 20 7e 50 20 7e |C D F ~L| ~N ~P ~|
|00003100| 52 20 7e 56 22 0d 10 5e | 05 e1 0d 10 68 05 3a 0d |R ~V"..^|....h.:.|
|00003110| 10 72 22 dd a4 63 68 61 | 72 28 62 25 29 3a ea 20 |.r"..cha|r(b%):. |
|00003120| 61 24 2c 62 24 3a e7 62 | 25 3d 31 33 3a 3d bd 31 |a$,b$:.b|%=13:=.1|
|00003130| 30 0d 10 7c 19 e7 62 25 | 3d 33 34 20 71 75 6f 74 |0..|..b%|=34 quot|
|00003140| 65 25 3d ac 71 75 6f 74 | 65 25 0d 10 86 19 e7 62 |e%=.quot|e%.....b|
|00003150| 25 3c 31 32 37 20 84 20 | 71 75 6f 74 65 25 3a 3d |%<127 . |quote%:=|
|00003160| bd 62 25 0d 10 90 12 e7 | 62 25 3d 31 34 31 3a 3d |.b%.....|b%=141:=|
|00003170| a4 6c 69 6e 65 0d 10 9a | 24 e7 62 25 3e 26 43 35 |.line...|$.b%>&C5|
|00003180| 20 80 20 62 25 3c 26 43 | 39 20 62 25 3d 62 25 2a | . b%<&C|9 b%=b%*|
|00003190| 32 35 36 2b 9a 23 69 6e | 25 0d 10 a4 26 f7 3a f5 |256+.#in|%...&.:.|
|000031a0| 3a f3 20 61 24 2c 62 24 | 3a fd a0 61 24 3d 62 25 |:. a$,b$|:..a$=b%|
|000031b0| 20 84 20 61 24 3d 22 26 | 30 30 22 3a 3d 62 24 0d | . a$="&|00":=b$.|
|000031c0| 10 ae 05 3a 0d 10 b8 18 | dd a4 6c 69 6e 65 3a ea |...:....|..line:.|
|000031d0| 20 6c 31 25 2c 6c 32 25 | 2c 6c 33 25 0d 10 c2 34 | l1%,l2%|,l3%...4|
|000031e0| 6c 31 25 3d 9a 23 69 6e | 25 3a 6c 32 25 3d 9a 23 |l1%=.#in|%:l2%=.#|
|000031f0| 69 6e 25 3a 6c 33 25 3d | 9a 23 69 6e 25 3a e7 ac |in%:l3%=|.#in%:..|
|00003200| 6e 75 6d 62 65 72 25 20 | 6c 6e 65 72 72 25 3d b9 |number% |lnerr%=.|
|00003210| 0d 10 cc 48 3d c3 28 28 | 6c 32 25 20 80 20 36 33 |...H=.((|l2% . 63|
|00003220| 29 2b 28 6c 33 25 20 80 | 20 36 33 29 2a 32 35 36 |)+(l3% .| 63)*256|
|00003230| 2b 28 28 6c 31 25 20 80 | 20 26 33 30 29 82 26 31 |+((l1% .| &30).&1|
|00003240| 30 29 2a 34 2b 28 28 6c | 31 25 80 26 43 29 82 26 |0)*4+((l|1%.&C).&|
|00003250| 34 29 2a 34 30 39 36 29 | 0d 10 d6 05 3a 0d 10 e0 |4)*4096)|....:...|
|00003260| 0f dd f2 54 65 78 74 54 | 6f 42 61 73 0d 10 ea 1d |...TextT|oBas....|
|00003270| f2 73 65 74 5f 73 68 61 | 64 65 28 6d 5f 73 61 76 |.set_sha|de(m_sav|
|00003280| 65 61 73 25 2c 30 2c a3 | 29 0d 10 f4 1d f2 73 65 |eas%,0,.|).....se|
|00003290| 74 5f 73 68 61 64 65 28 | 6d 5f 73 61 76 65 61 73 |t_shade(|m_saveas|
|000032a0| 25 2c 31 2c b9 29 0d 10 | fe 1d f2 73 65 74 5f 73 |%,1,.)..|...set_s|
|000032b0| 68 61 64 65 28 6d 5f 73 | 61 76 65 61 73 25 2c 32 |hade(m_s|aveas%,2|
|000032c0| 2c b9 29 0d 11 08 25 53 | 6f 75 72 63 65 25 3d 26 |,.)...%S|ource%=&|
|000032d0| 46 46 46 3a f2 6d 65 6e | 75 28 6d 5f 73 61 76 65 |FFF:.men|u(m_save|
|000032e0| 61 73 25 2c 34 2c 30 29 | 0d 11 12 05 e1 0d 11 1c |as%,4,0)|........|
|000032f0| 05 3a 0d 11 26 11 dd f2 | 54 65 78 74 54 6f 42 61 |.:..&...|TextToBa|
|00003300| 73 47 6f 0d 11 30 51 ff | 22 43 6f 70 79 20 22 2b |sGo..0Q.|"Copy "+|
|00003310| 73 6f 75 72 63 65 66 69 | 6c 65 6e 61 6d 65 24 2b |sourcefi|lename$+|
|00003320| 22 20 3c 57 69 6d 70 24 | 53 63 72 61 70 44 69 72 |" <Wimp$|ScrapDir|
|00003330| 3e 2e 42 61 73 43 6f 6e | 76 54 6d 70 20 7e 43 20 |>.BasCon|vTmp ~C |
|00003340| 7e 44 20 46 20 7e 4c 20 | 7e 4e 20 7e 50 20 7e 52 |~D F ~L |~N ~P ~R|
|00003350| 20 7e 56 22 0d 11 3a 30 | ff 22 53 65 74 54 79 70 | ~V"..:0|."SetTyp|
|00003360| 65 20 3c 57 69 6d 70 24 | 53 63 72 61 70 44 69 72 |e <Wimp$|ScrapDir|
|00003370| 3e 2e 42 61 73 43 6f 6e | 76 54 6d 70 20 20 42 61 |>.BasCon|vTmp Ba|
|00003380| 73 69 63 22 0d 11 44 55 | 6f 75 74 25 3d ae 22 3c |sic"..DU|out%=."<|
|00003390| 57 69 6d 70 24 53 63 72 | 61 70 44 69 72 3e 2e 45 |Wimp$Scr|apDir>.E|
|000033a0| 78 65 63 46 69 6c 65 22 | 3a d5 23 6f 75 74 25 2c |xecFile"|:.#out%,|
|000033b0| 22 2a 42 61 73 69 63 20 | 2d 6c 6f 61 64 20 3c 57 |"*Basic |-load <W|
|000033c0| 69 6d 70 24 53 63 72 61 | 70 44 69 72 3e 2e 42 61 |imp$Scra|pDir>.Ba|
|000033d0| 73 43 6f 6e 76 54 6d 70 | 22 0d 11 4e 27 d5 23 6f |sConvTmp|"..N'.#o|
|000033e0| 75 74 25 2c 22 53 41 56 | 45 20 22 22 22 2b 64 65 |ut%,"SAV|E """+de|
|000033f0| 73 74 66 69 6c 65 6e 61 | 6d 65 24 2b 22 22 22 22 |stfilena|me$+""""|
|00003400| 0d 11 58 37 d5 23 6f 75 | 74 25 2c 22 53 59 53 20 |..X7.#ou|t%,"SYS |
|00003410| 22 22 57 69 6d 70 5f 43 | 6f 6d 6d 61 6e 64 57 69 |""Wimp_C|ommandWi|
|00003420| 6e 64 6f 77 22 22 2c 2d | 31 3a 2a 51 75 69 74 22 |ndow"",-|1:*Quit"|
|00003430| 3a d9 23 6f 75 74 25 0d | 11 62 54 ff 22 53 65 74 |:.#out%.|.bT."Set|
|00003440| 54 79 70 65 20 3c 57 69 | 6d 70 24 53 63 72 61 70 |Type <Wi|mp$Scrap|
|00003450| 44 69 72 3e 2e 45 78 65 | 63 46 69 6c 65 20 43 6f |Dir>.Exe|cFile Co|
|00003460| 6d 6d 61 6e 64 22 3a ff | 22 57 69 6d 70 54 61 73 |mmand":.|"WimpTas|
|00003470| 6b 20 3c 57 69 6d 70 24 | 53 63 72 61 70 44 69 72 |k <Wimp$|ScrapDir|
|00003480| 3e 2e 45 78 65 63 46 69 | 6c 65 22 0d 11 6c 26 ff |>.ExecFi|le"..l&.|
|00003490| 22 44 65 6c 65 74 65 20 | 3c 57 69 6d 70 24 53 63 |"Delete |<Wimp$Sc|
|000034a0| 72 61 70 44 69 72 3e 2e | 45 78 65 63 46 69 6c 65 |rapDir>.|ExecFile|
|000034b0| 22 0d 11 76 05 e1 0d 11 | 80 05 3a 0d 11 8a 4d f4 |"..v....|..:...M.|
|000034c0| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|000034d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003500| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 11 94 14 f4 20 4f 6c |--------|..... Ol|
|00003510| 64 65 72 20 76 65 72 73 | 69 6f 6e 3a 0d 11 9e 0e |der vers|ion:....|
|00003520| ea 20 61 24 2c 6c 69 6e | 65 25 0d 11 a8 59 69 6e |. a$,lin|e%...Yin|
|00003530| 25 3d 8e 28 66 24 29 3a | 6f 75 74 25 3d ae 22 3c |%=.(f$):|out%=."<|
|00003540| 57 69 6d 70 24 53 63 72 | 61 70 3e 22 3a e7 20 6f |Wimp$Scr|ap>":. o|
|00003550| 75 74 25 3d 30 20 d9 23 | 69 6e 25 3a f2 65 72 72 |ut%=0 .#|in%:.err|
|00003560| 6f 72 28 32 31 34 2c 22 | 43 61 6e 27 74 20 6f 70 |or(214,"|Can't op|
|00003570| 65 6e 20 3c 57 69 6d 70 | 24 53 63 72 61 70 3e 22 |en <Wimp|$Scrap>"|
|00003580| 29 3a e1 0d 11 b2 15 c8 | 99 20 22 48 6f 75 72 67 |):......|. "Hourg|
|00003590| 6c 61 73 73 5f 4f 6e 22 | 0d 11 bc 2f f5 3a c8 99 |lass_On"|.../.:..|
|000035a0| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 50 65 72 63 | "Hourgl|ass_Perc|
|000035b0| 65 6e 74 61 67 65 22 2c | 8f 23 69 6e 25 2f a2 23 |entage",|.#in%/.#|
|000035c0| 69 6e 25 2a 31 30 30 0d | 11 c6 16 61 24 3d be 23 |in%*100.|...a$=.#|
|000035d0| 69 6e 25 3a f2 63 6f 6e | 76 28 61 24 29 0d 11 d0 |in%:.con|v(a$)...|
|000035e0| 1f fd c5 23 69 6e 25 3a | d5 23 6f 75 74 25 2c 31 |...#in%:|.#out%,1|
|000035f0| 33 3a d5 23 6f 75 74 25 | 2c 26 46 46 0d 11 da 1d |3:.#out%|,&FF....|
|00003600| d9 23 6f 75 74 25 3a d9 | 23 69 6e 25 3a 6f 75 74 |.#out%:.|#in%:out|
|00003610| 25 3d 30 3a 69 6e 25 3d | 30 0d 11 e4 21 ff 22 53 |%=0:in%=|0...!."S|
|00003620| 65 74 54 79 70 65 20 3c | 57 69 6d 70 24 53 63 72 |etType <|Wimp$Scr|
|00003630| 61 70 3e 20 42 41 53 49 | 43 22 0d 11 ee 35 ff 22 |ap> BASI|C"...5."|
|00003640| 43 6f 70 79 20 3c 57 69 | 6d 70 24 53 63 72 61 70 |Copy <Wi|mp$Scrap|
|00003650| 3e 20 22 2b 66 24 2b 22 | 20 7e 43 20 44 20 46 20 |> "+f$+"| ~C D F |
|00003660| 7e 4c 20 7e 4e 20 7e 50 | 20 7e 52 20 7e 56 22 0d |~L ~N ~P| ~R ~V".|
|00003670| 11 f8 16 c8 99 20 22 48 | 6f 75 72 67 6c 61 73 73 |..... "H|ourglass|
|00003680| 5f 4f 66 66 22 0d 12 02 | 05 e1 0d 12 0c 05 3a 0d |_Off"...|......:.|
|00003690| 12 16 0e dd f2 63 6f 6e | 76 28 61 24 29 0d 12 20 |.....con|v(a$).. |
|000036a0| 0b ea 20 62 24 2c 66 25 | 0d 12 2a 1d c8 95 20 c0 |.. b$,f%|..*... .|
|000036b0| 61 24 2c 31 29 3d 22 20 | 22 20 61 24 3d c1 61 24 |a$,1)=" |" a$=.a$|
|000036c0| 2c 32 29 3a ce 0d 12 34 | 74 e7 c0 61 24 2c 31 29 |,2):...4|t..a$,1)|
|000036d0| 3e 3d 22 30 22 20 80 20 | c0 61 24 2c 31 29 3c 3d |>="0" . |.a$,1)<=|
|000036e0| 22 39 22 20 8c 20 6c 69 | 6e 65 25 3d 30 3a f5 3a |"9" . li|ne%=0:.:|
|000036f0| 6c 69 6e 65 25 3d 6c 69 | 6e 65 25 2a 31 30 2b 97 |line%=li|ne%*10+.|
|00003700| 61 24 2d 34 38 3a 61 24 | 3d c1 61 24 2c 32 29 3a |a$-48:a$|=.a$,2):|
|00003710| fd c0 61 24 2c 31 29 3c | 22 30 22 20 84 20 c0 61 |..a$,1)<|"0" . .a|
|00003720| 24 2c 31 29 3e 22 39 22 | 20 8b 20 6c 69 6e 65 25 |$,1)>"9"| . line%|
|00003730| 3d 6c 69 6e 65 25 2b 31 | 30 0d 12 3e 2f d5 23 6f |=line%+1|0..>/.#o|
|00003740| 75 74 25 2c 31 33 3a d5 | 23 6f 75 74 25 2c 6c 69 |ut%,13:.|#out%,li|
|00003750| 6e 65 25 81 32 35 36 3a | d5 23 6f 75 74 25 2c 6c |ne%.256:|.#out%,l|
|00003760| 69 6e 65 25 80 26 46 46 | 0d 12 48 12 f5 3a f2 62 |ine%.&FF|..H..:.b|
|00003770| 79 74 65 3a fd 61 24 3d | 22 22 0d 12 52 1b d5 23 |yte:.a$=|""..R..#|
|00003780| 6f 75 74 25 2c 34 2b a9 | 62 24 3a d5 23 6f 75 74 |out%,4+.|b$:.#out|
|00003790| 25 2c 62 24 3b 0d 12 5c | 05 e1 0d 12 66 05 3a 0d |%,b$;..\|....f.:.|
|000037a0| 12 70 13 dd f2 62 79 74 | 65 3a e7 61 24 3d 22 22 |.p...byt|e:.a$=""|
|000037b0| 20 e1 0d 12 7a 26 62 25 | 3d a4 74 6f 6b 65 6e 3a | ...z&b%|=.token:|
|000037c0| e7 20 62 25 3e 26 46 46 | 20 62 24 3d 62 24 2b bd |. b%>&FF| b$=b$+.|
|000037d0| 28 62 25 81 32 35 36 29 | 0d 12 84 17 62 24 3d 62 |(b%.256)|....b$=b|
|000037e0| 24 2b bd 62 25 3a e7 62 | 25 3e 26 46 46 20 e1 0d |$+.b%:.b|%>&FF ..|
|000037f0| 12 8e 21 e7 20 28 66 25 | 20 80 20 31 29 3d 30 20 |..!. (f%| . 1)=0 |
|00003800| 80 20 62 25 3d 97 22 3a | 22 20 66 25 3d 30 3a e1 |. b%=.":|" f%=0:.|
|00003810| 0d 12 98 39 e7 20 28 66 | 25 3d 30 20 80 20 62 25 |...9. (f|%=0 . b%|
|00003820| 3d 97 22 2a 22 29 20 84 | 20 62 25 3d 26 46 34 20 |=."*") .| b%=&F4 |
|00003830| 84 20 62 25 3d 26 44 43 | 20 62 24 3d 62 24 2b 61 |. b%=&DC| b$=b$+a|
|00003840| 24 3a 61 24 3d 22 22 3a | e1 0d 12 a2 0d 66 25 3d |$:a$="":|.....f%=|
|00003850| 66 25 20 84 20 34 0d 12 | ac 15 e7 20 62 25 3d 33 |f% . 4..|... b%=3|
|00003860| 34 3a 66 25 3d 66 25 82 | 31 3a e1 0d 12 b6 1c e7 |4:f%=f%.|1:......|
|00003870| 20 62 25 3d 26 41 34 20 | 84 20 62 25 3d 26 46 32 | b%=&A4 |. b%=&F2|
|00003880| 20 66 25 3d 32 3a e1 0d | 12 c0 05 e1 0d 12 ca 05 | f%=2:..|........|
|00003890| 3a 0d 12 d4 0b dd a4 74 | 6f 6b 65 6e 0d 12 de 0e |:......t|oken....|
|000038a0| ea 20 64 25 2c 68 24 2c | 74 24 0d 12 e8 1e e7 61 |. d%,h$,|t$.....a|
|000038b0| 24 3c 22 41 22 20 84 20 | 61 24 3e 22 7a 22 20 66 |$<"A" . |a$>"z" f|
|000038c0| 25 3d 66 25 80 26 46 44 | 0d 12 f2 32 e7 61 24 3c |%=f%.&FD|...2.a$<|
|000038d0| 22 41 22 20 84 20 61 24 | 3e 22 5a 22 20 84 20 28 |"A" . a$|>"Z" . (|
|000038e0| 66 25 80 33 29 3a 64 25 | 3d 97 61 24 3a 61 24 3d |f%.3):d%|=.a$:a$=|
|000038f0| c1 61 24 2c 32 29 3a 3d | 64 25 0d 12 fc 11 64 25 |.a$,2):=|d%....d%|
|00003900| 3d a7 61 24 2c 22 2e 22 | 29 3a f7 0d 13 06 0d f5 |=.a$,"."|):......|
|00003910| 3a f3 20 68 24 2c 74 24 | 0d 13 10 3a fd 68 24 3d |:. h$,t$|...:.h$=|
|00003920| 22 26 30 30 22 20 84 20 | c0 61 24 2c a9 74 24 29 |"&00" . |.a$,.t$)|
|00003930| 3d 74 24 20 84 20 28 64 | 25 3e 30 20 80 20 c0 61 |=t$ . (d|%>0 . .a|
|00003940| 24 2c 64 25 2d 31 29 3d | c0 74 24 2c 64 25 2d 31 |$,d%-1)=|.t$,d%-1|
|00003950| 29 29 0d 13 1a 23 e7 20 | 68 24 3d 22 26 30 30 22 |))...#. |h$="&00"|
|00003960| 3a 64 25 3d 97 61 24 3a | 61 24 3d c1 61 24 2c 32 |:d%=.a$:|a$=.a$,2|
|00003970| 29 3a 3d 64 25 0d 13 24 | 26 e7 20 c0 61 24 2c a9 |):=d%..$|&. .a$,.|
|00003980| 74 24 29 3d 74 24 3a 61 | 24 3d c1 61 24 2c a9 74 |t$)=t$:a|$=.a$,.t|
|00003990| 24 2b 31 29 3a 3d a0 28 | 68 24 29 0d 13 2e 17 61 |$+1):=.(|h$)....a|
|000039a0| 24 3d c1 61 24 2c 64 25 | 2b 31 29 3a 3d a0 28 68 |$=.a$,d%|+1):=.(h|
|000039b0| 24 29 0d 13 38 05 3a 0d | 13 42 0d f4 20 54 6f 6b |$)..8.:.|.B.. Tok|
|000039c0| 65 6e 73 3a 0d 13 4c 40 | f4 20 28 43 6f 75 6c 64 |ens:..L@|. (Could|
|000039d0| 20 72 65 70 6c 61 63 65 | 20 74 68 69 73 20 62 79 | replace| this by|
|000039e0| 20 6c 6f 6f 6b 69 6e 67 | 20 69 6e 20 74 68 65 20 | looking| in the |
|000039f0| 42 41 53 49 43 20 6d 6f | 64 75 6c 65 20 69 74 73 |BASIC mo|dule its|
|00003a00| 65 6c 66 29 0d 13 56 05 | 3a 0d 13 60 4a dc 20 26 |elf)..V.|:..`J. &|
|00003a10| 38 30 2c 41 4e 44 2c 26 | 39 34 2c 41 42 53 2c 26 |80,AND,&|94,ABS,&|
|00003a20| 39 35 2c 41 43 53 2c 26 | 39 36 2c 41 44 56 41 4c |95,ACS,&|96,ADVAL|
|00003a30| 2c 26 39 37 2c 41 53 43 | 2c 26 39 38 2c 41 53 4e |,&97,ASC|,&98,ASN|
|00003a40| 2c 26 39 39 2c 41 54 4e | 2c 26 43 37 38 46 2c 41 |,&99,ATN|,&C78F,A|
|00003a50| 55 54 4f 0d 13 6a 5a dc | 20 26 43 36 38 45 2c 41 |UTO..jZ.| &C68E,A|
|00003a60| 50 50 45 4e 44 2c 26 39 | 41 2c 42 47 45 54 2c 26 |PPEND,&9|A,BGET,&|
|00003a70| 44 35 2c 42 50 55 54 2c | 26 43 38 39 45 2c 42 45 |D5,BPUT,|&C89E,BE|
|00003a80| 41 54 53 2c 26 43 36 38 | 46 2c 42 45 41 54 2c 26 |ATS,&C68|F,BEAT,&|
|00003a90| 46 42 2c 43 4f 4c 4f 55 | 52 2c 26 44 36 2c 43 41 |FB,COLOU|R,&D6,CA|
|00003aa0| 4c 4c 2c 26 43 38 38 45 | 2c 43 41 53 45 0d 13 74 |LL,&C88E|,CASE..t|
|00003ab0| 4e dc 20 26 44 37 2c 43 | 48 41 49 4e 2c 26 42 44 |N. &D7,C|HAIN,&BD|
|00003ac0| 2c 43 48 52 24 2c 26 44 | 38 2c 43 4c 45 41 52 2c |,CHR$,&D|8,CLEAR,|
|00003ad0| 26 44 39 2c 43 4c 4f 53 | 45 2c 26 44 41 2c 43 4c |&D9,CLOS|E,&DA,CL|
|00003ae0| 47 2c 26 44 42 2c 43 4c | 53 2c 26 39 42 2c 43 4f |G,&DB,CL|S,&9B,CO|
|00003af0| 53 2c 26 39 43 2c 43 4f | 55 4e 54 0d 13 7e 52 dc |S,&9C,CO|UNT..~R.|
|00003b00| 20 26 43 38 38 46 2c 43 | 49 52 43 4c 45 2c 26 46 | &C88F,C|IRCLE,&F|
|00003b10| 42 2c 43 4f 4c 4f 52 2c | 26 44 43 2c 44 41 54 41 |B,COLOR,|&DC,DATA|
|00003b20| 2c 26 39 44 2c 44 45 47 | 2c 26 44 44 2c 44 45 46 |,&9D,DEG|,&DD,DEF|
|00003b30| 2c 26 43 37 39 30 2c 44 | 45 4c 45 54 45 2c 26 38 |,&C790,D|ELETE,&8|
|00003b40| 31 2c 44 49 56 2c 26 44 | 45 2c 44 49 4d 0d 13 88 |1,DIV,&D|E,DIM...|
|00003b50| 5d dc 20 26 44 46 2c 44 | 52 41 57 2c 26 45 31 2c |]. &DF,D|RAW,&E1,|
|00003b60| 45 4e 44 50 52 4f 43 2c | 26 43 37 39 31 2c 45 44 |ENDPROC,|&C791,ED|
|00003b70| 49 54 2c 26 43 45 2c 45 | 4e 44 57 48 49 4c 45 2c |IT,&CE,E|NDWHILE,|
|00003b80| 26 43 42 2c 45 4e 44 43 | 41 53 45 2c 26 43 44 2c |&CB,ENDC|ASE,&CD,|
|00003b90| 45 4e 44 49 46 2c 26 45 | 30 2c 45 4e 44 2c 26 45 |ENDIF,&E|0,END,&E|
|00003ba0| 32 2c 45 4e 56 45 4c 4f | 50 45 0d 13 92 52 dc 20 |2,ENVELO|PE...R. |
|00003bb0| 26 43 43 2c 45 4c 53 45 | 2c 26 38 42 2c 45 4c 53 |&CC,ELSE|,&8B,ELS|
|00003bc0| 45 2c 26 41 30 2c 45 56 | 41 4c 2c 26 39 45 2c 45 |E,&A0,EV|AL,&9E,E|
|00003bd0| 52 4c 2c 26 38 35 2c 45 | 52 52 4f 52 2c 26 43 35 |RL,&85,E|RROR,&C5|
|00003be0| 2c 45 4f 46 2c 26 38 32 | 2c 45 4f 52 2c 26 39 46 |,EOF,&82|,EOR,&9F|
|00003bf0| 2c 45 52 52 2c 26 41 31 | 2c 45 58 50 0d 13 9c 51 |,ERR,&A1|,EXP...Q|
|00003c00| dc 20 26 41 32 2c 45 58 | 54 2c 26 43 38 39 44 2c |. &A2,EX|T,&C89D,|
|00003c10| 45 4c 4c 49 50 53 45 2c | 26 45 33 2c 46 4f 52 2c |ELLIPSE,|&E3,FOR,|
|00003c20| 26 41 33 2c 46 41 4c 53 | 45 2c 26 43 38 39 30 2c |&A3,FALS|E,&C890,|
|00003c30| 46 49 4c 4c 2c 26 41 34 | 2c 46 4e 2c 26 45 35 2c |FILL,&A4|,FN,&E5,|
|00003c40| 47 4f 54 4f 2c 26 42 45 | 2c 47 45 54 24 0d 13 a6 |GOTO,&BE|,GET$...|
|00003c50| 51 dc 20 26 41 35 2c 47 | 45 54 2c 26 45 34 2c 47 |Q. &A5,G|ET,&E4,G|
|00003c60| 4f 53 55 42 2c 26 45 36 | 2c 47 43 4f 4c 2c 26 39 |OSUB,&E6|,GCOL,&9|
|00003c70| 33 2c 48 49 4d 45 4d 2c | 26 43 36 39 32 2c 48 45 |3,HIMEM,|&C692,HE|
|00003c80| 4c 50 2c 26 45 38 2c 49 | 4e 50 55 54 2c 26 45 37 |LP,&E8,I|NPUT,&E7|
|00003c90| 2c 49 46 2c 26 42 46 2c | 49 4e 4b 45 59 24 0d 13 |,IF,&BF,|INKEY$..|
|00003ca0| b0 59 dc 20 26 41 36 2c | 49 4e 4b 45 59 2c 26 41 |.Y. &A6,|INKEY,&A|
|00003cb0| 38 2c 49 4e 54 2c 26 41 | 37 2c 49 4e 53 54 52 28 |8,INT,&A|7,INSTR(|
|00003cc0| 2c 26 43 38 39 41 2c 49 | 4e 53 54 41 4c 4c 2c 26 |,&C89A,I|NSTALL,&|
|00003cd0| 43 37 39 33 2c 4c 49 53 | 54 2c 26 38 36 2c 4c 49 |C793,LIS|T,&86,LI|
|00003ce0| 4e 45 2c 26 43 36 39 34 | 2c 4c 4f 41 44 2c 26 39 |NE,&C694|,LOAD,&9|
|00003cf0| 32 2c 4c 4f 4d 45 4d 0d | 13 ba 52 dc 20 26 45 41 |2,LOMEM.|..R. &EA|
|00003d00| 2c 4c 4f 43 41 4c 2c 26 | 43 30 2c 4c 45 46 54 24 |,LOCAL,&|C0,LEFT$|
|00003d10| 28 2c 26 41 39 2c 4c 45 | 4e 2c 26 45 39 2c 4c 45 |(,&A9,LE|N,&E9,LE|
|00003d20| 54 2c 26 41 42 2c 4c 4f | 47 2c 26 41 41 2c 4c 4e |T,&AB,LO|G,&AA,LN|
|00003d30| 2c 26 43 38 39 42 2c 4c | 49 42 52 41 52 59 2c 26 |,&C89B,L|IBRARY,&|
|00003d40| 43 36 39 35 2c 4c 56 41 | 52 0d 13 c4 50 dc 20 26 |C695,LVA|R...P. &|
|00003d50| 43 31 2c 4d 49 44 24 28 | 2c 26 45 42 2c 4d 4f 44 |C1,MID$(|,&EB,MOD|
|00003d60| 45 2c 26 38 33 2c 4d 4f | 44 2c 26 45 43 2c 4d 4f |E,&83,MO|D,&EC,MO|
|00003d70| 56 45 2c 26 43 38 39 37 | 2c 4d 4f 55 53 45 2c 26 |VE,&C897|,MOUSE,&|
|00003d80| 45 44 2c 4e 45 58 54 2c | 26 43 36 39 36 2c 4e 45 |ED,NEXT,|&C696,NE|
|00003d90| 57 2c 26 41 43 2c 4e 4f | 54 0d 13 ce 50 dc 20 26 |W,&AC,NO|T...P. &|
|00003da0| 43 36 39 37 2c 4f 4c 44 | 2c 26 45 45 2c 4f 4e 2c |C697,OLD|,&EE,ON,|
|00003db0| 26 38 37 2c 4f 46 46 2c | 26 43 41 2c 4f 46 2c 26 |&87,OFF,|&CA,OF,&|
|00003dc0| 43 38 39 31 2c 4f 52 49 | 47 49 4e 2c 26 38 34 2c |C891,ORI|GIN,&84,|
|00003dd0| 4f 52 2c 26 38 45 2c 4f | 50 45 4e 49 4e 2c 26 41 |OR,&8E,O|PENIN,&A|
|00003de0| 45 2c 4f 50 45 4e 4f 55 | 54 0d 13 d8 58 dc 20 26 |E,OPENOU|T...X. &|
|00003df0| 41 44 2c 4f 50 45 4e 55 | 50 2c 26 46 46 2c 4f 53 |AD,OPENU|P,&FF,OS|
|00003e00| 43 4c 49 2c 26 37 46 2c | 4f 54 48 45 52 57 49 53 |CLI,&7F,|OTHERWIS|
|00003e10| 45 2c 26 43 38 41 33 2c | 4f 56 45 52 4c 41 59 2c |E,&C8A3,|OVERLAY,|
|00003e20| 26 46 31 2c 50 52 49 4e | 54 2c 26 39 30 2c 50 41 |&F1,PRIN|T,&90,PA|
|00003e30| 47 45 2c 26 38 46 2c 50 | 54 52 2c 26 41 46 2c 50 |GE,&8F,P|TR,&AF,P|
|00003e40| 49 0d 13 e2 57 dc 20 26 | 46 30 2c 50 4c 4f 54 2c |I...W. &|F0,PLOT,|
|00003e50| 26 42 30 2c 50 4f 49 4e | 54 28 2c 26 43 38 39 32 |&B0,POIN|T(,&C892|
|00003e60| 2c 50 4f 49 4e 54 2c 26 | 46 32 2c 50 52 4f 43 2c |,POINT,&|F2,PROC,|
|00003e70| 26 42 31 2c 50 4f 53 2c | 26 43 38 39 38 2c 51 55 |&B1,POS,|&C898,QU|
|00003e80| 49 54 2c 26 46 38 2c 52 | 45 54 55 52 4e 2c 26 46 |IT,&F8,R|ETURN,&F|
|00003e90| 35 2c 52 45 50 45 41 54 | 0d 13 ec 51 dc 20 26 46 |5,REPEAT|...Q. &F|
|00003ea0| 36 2c 52 45 50 4f 52 54 | 2c 26 46 33 2c 52 45 41 |6,REPORT|,&F3,REA|
|00003eb0| 44 2c 26 46 34 2c 52 45 | 4d 2c 26 46 39 2c 52 55 |D,&F4,RE|M,&F9,RU|
|00003ec0| 4e 2c 26 42 32 2c 52 41 | 44 2c 26 46 37 2c 52 45 |N,&B2,RA|D,&F7,RE|
|00003ed0| 53 54 4f 52 45 2c 26 43 | 32 2c 52 49 47 48 54 24 |STORE,&C|2,RIGHT$|
|00003ee0| 28 2c 26 42 33 2c 52 4e | 44 0d 13 f6 5a dc 20 26 |(,&B3,RN|D...Z. &|
|00003ef0| 43 38 39 33 2c 52 45 43 | 54 41 4e 47 4c 45 2c 26 |C893,REC|TANGLE,&|
|00003f00| 43 37 39 38 2c 52 45 4e | 55 4d 42 45 52 2c 26 38 |C798,REN|UMBER,&8|
|00003f10| 38 2c 53 54 45 50 2c 26 | 43 36 39 39 2c 53 41 56 |8,STEP,&|C699,SAV|
|00003f20| 45 2c 26 42 34 2c 53 47 | 4e 2c 26 42 35 2c 53 49 |E,&B4,SG|N,&B5,SI|
|00003f30| 4e 2c 26 42 36 2c 53 51 | 52 2c 26 44 34 2c 53 4f |N,&B6,SQ|R,&D4,SO|
|00003f40| 55 4e 44 0d 14 00 58 dc | 20 26 38 39 2c 53 50 43 |UND...X.| &89,SPC|
|00003f50| 2c 26 43 33 2c 53 54 52 | 24 2c 26 43 34 2c 53 54 |,&C3,STR|$,&C4,ST|
|00003f60| 52 49 4e 47 24 28 2c 26 | 46 41 2c 53 54 4f 50 2c |RING$(,&|FA,STOP,|
|00003f70| 26 43 38 41 32 2c 53 54 | 45 52 45 4f 2c 26 43 36 |&C8A2,ST|EREO,&C6|
|00003f80| 38 45 2c 53 55 4d 2c 26 | 43 38 39 34 2c 53 57 41 |8E,SUM,&|C894,SWA|
|00003f90| 50 2c 26 43 38 39 39 2c | 53 59 53 0d 14 0a 50 dc |P,&C899,|SYS...P.|
|00003fa0| 20 26 42 37 2c 54 41 4e | 2c 26 38 41 2c 54 41 42 | &B7,TAN|,&8A,TAB|
|00003fb0| 28 2c 26 43 38 39 46 2c | 54 45 4d 50 4f 2c 26 38 |(,&C89F,|TEMPO,&8|
|00003fc0| 43 2c 54 48 45 4e 2c 26 | 39 31 2c 54 49 4d 45 2c |C,THEN,&|91,TIME,|
|00003fd0| 26 43 38 39 43 2c 54 49 | 4e 54 2c 26 42 38 2c 54 |&C89C,TI|NT,&B8,T|
|00003fe0| 4f 2c 26 46 43 2c 54 52 | 41 43 45 0d 14 14 50 dc |O,&FC,TR|ACE...P.|
|00003ff0| 20 26 42 39 2c 54 52 55 | 45 2c 26 43 36 39 42 2c | &B9,TRU|E,&C69B,|
|00004000| 54 57 49 4e 4f 2c 26 43 | 36 39 41 2c 54 57 49 4e |TWINO,&C|69A,TWIN|
|00004010| 2c 26 46 44 2c 55 4e 54 | 49 4c 2c 26 42 41 2c 55 |,&FD,UNT|IL,&BA,U|
|00004020| 53 52 2c 26 45 46 2c 56 | 44 55 2c 26 42 42 2c 56 |SR,&EF,V|DU,&BB,V|
|00004030| 41 4c 2c 26 42 43 2c 56 | 50 4f 53 0d 14 1e 48 dc |AL,&BC,V|POS...H.|
|00004040| 20 26 43 38 41 30 2c 56 | 4f 49 43 45 53 2c 26 43 | &C8A0,V|OICES,&C|
|00004050| 38 41 31 2c 56 4f 49 43 | 45 2c 26 43 38 39 35 2c |8A1,VOIC|E,&C895,|
|00004060| 57 48 49 4c 45 2c 26 43 | 39 2c 57 48 45 4e 2c 26 |WHILE,&C|9,WHEN,&|
|00004070| 43 38 39 36 2c 57 41 49 | 54 2c 26 46 45 2c 57 49 |C896,WAI|T,&FE,WI|
|00004080| 44 54 48 0d 14 28 33 dc | 20 26 43 46 2c 50 54 52 |DTH..(3.| &CF,PTR|
|00004090| 2c 26 44 30 2c 50 41 47 | 45 2c 26 44 31 2c 54 49 |,&D0,PAG|E,&D1,TI|
|000040a0| 4d 45 2c 26 44 32 2c 4c | 4f 4d 45 4d 2c 26 44 33 |ME,&D2,L|OMEM,&D3|
|000040b0| 2c 48 49 4d 45 4d 0d 14 | 32 1c dc 20 26 30 30 2c |,HIMEM..|2.. &00,|
|000040c0| 5b 75 6e 6c 69 73 74 61 | 62 6c 65 20 74 6f 6b 65 |[unlista|ble toke|
|000040d0| 6e 5d 0d ff | |n].. | |
+--------+-------------------------+-------------------------+--------+--------+
