home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1995-11-20 | 33.3 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
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 10 9f e5 3c 20 9f e5 | 34 30 9f e5 04 00 12 e4 |D...< ..|40......|
|00000010| 04 00 03 e4 04 10 51 e2 | fb ff ff 5a 00 00 8f e2 |......Q.|...Z....|
|00000020| 05 00 00 ef 42 41 53 49 | 43 20 2d 51 75 69 74 20 |....BASI|C -Quit |
|00000030| 40 30 30 30 30 39 30 30 | 30 2c 30 30 30 31 31 34 |@0000900|0,000114|
|00000040| 43 34 00 01 c4 14 01 00 | 14 05 01 00 c4 84 00 00 |C4......|........|
|00000050| 0d 00 0a 1c 20 f4 20 3e | 24 2e 21 42 6f 74 74 6c |.... . >|$.!Bottl|
|00000060| 65 2e 21 52 55 4e 49 4d | 41 47 45 42 0d 00 19 29 |e.!RUNIM|AGEB...)|
|00000070| 20 c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 6e | .."Hour|glass_On|
|00000080| 22 3a f4 54 52 41 43 45 | 20 54 4f 20 22 24 2e 44 |":.TRACE| TO "$.D|
|00000090| 45 42 55 47 22 0d 00 46 | 25 20 f2 73 65 74 75 70 |EBUG"..F|% .setup|
|000000a0| 3a f2 73 65 74 75 70 32 | 3a f2 73 65 74 75 70 33 |:.setup2|:.setup3|
|000000b0| 3a f2 72 65 61 64 5f 76 | 65 72 0d 00 55 24 20 ee |:.read_v|er..U$ .|
|000000c0| 20 85 20 e7 20 a4 77 69 | 6d 70 65 72 72 6f 72 20 | . . .wi|mperror |
|000000d0| c8 98 20 8b 20 f2 65 72 | 72 6f 72 3a c8 98 0d 00 |.. . .er|ror:....|
|000000e0| 82 2e 20 f2 77 6f 72 64 | 73 28 77 6f 72 64 5f 70 |.. .word|s(word_p|
|000000f0| 61 74 68 24 29 3a f2 77 | 6f 72 64 73 6d 65 6e 75 |ath$):.w|ordsmenu|
|00000100| 28 77 6f 72 64 73 6d 65 | 6e 75 25 29 0d 00 91 21 |(wordsme|nu%)...!|
|00000110| 20 f2 64 61 74 61 5f 62 | 61 6e 6b 28 70 61 74 68 | .data_b|ank(path|
|00000120| 24 2b 22 2e 64 65 66 61 | 75 6c 74 22 29 0d 00 a0 |$+".defa|ult")...|
|00000130| 30 20 f2 72 65 61 64 66 | 6f 6e 74 73 3a e7 20 66 |0 .readf|onts:. f|
|00000140| 6f 75 6e 64 5f 66 6f 6e | 74 3d a3 20 f2 66 6f 6e |ound_fon|t=. .fon|
|00000150| 74 5f 6e 6f 74 66 6f 75 | 6e 64 3a c8 98 0d 00 a3 |t_notfou|nd:.....|
|00000160| 29 20 f2 73 74 61 72 74 | 75 70 5f 6d 65 6d 3a f2 |) .start|up_mem:.|
|00000170| 73 65 74 75 70 5f 68 65 | 6c 70 3a f2 67 72 61 62 |setup_he|lp:.grab|
|00000180| 5f 73 65 74 75 70 0d 00 | af 22 20 f2 6d 61 69 6e |_setup..|." .main|
|00000190| 6d 65 6e 75 28 6d 6d 65 | 6e 75 25 29 3a f2 67 65 |menu(mme|nu%):.ge|
|000001a0| 74 5f 61 5f 77 6f 72 64 | 0d 00 be 18 20 c8 99 22 |t_a_word|.... .."|
|000001b0| 48 6f 75 72 67 6c 61 73 | 73 5f 53 6d 61 73 68 22 |Hourglas|s_Smash"|
|000001c0| 0d 00 cd 04 0d 00 dc 0e | 20 63 6c 6f 73 65 64 25 |........| closed%|
|000001d0| 3d b9 0d 00 eb 1e 20 ee | 20 85 20 e7 20 a4 77 69 |=..... .| . . .wi|
|000001e0| 6d 70 65 72 72 6f 72 20 | 8b 20 f2 65 72 72 6f 72 |mperror |. .error|
|000001f0| 0d 00 fa 06 20 f5 0d 01 | 09 31 20 e7 20 63 6c 6f |.... ...|.1 . clo|
|00000200| 73 65 64 25 20 f2 69 63 | 6f 6e 62 61 72 77 61 69 |sed% .ic|onbarwai|
|00000210| 74 3a e7 20 71 75 69 74 | 25 3d b9 20 f2 63 6c 6f |t:. quit|%=. .clo|
|00000220| 73 65 5f 64 6f 77 6e 0d | 01 18 0c 20 f2 72 65 67 |se_down.|... .reg|
|00000230| 62 6f 78 0d 01 27 3e 20 | f2 6f 70 65 6e 77 69 6e |box..'> |.openwin|
|00000240| 64 6f 77 28 77 68 61 6e | 64 6c 65 31 25 29 3a f2 |dow(whan|dle1%):.|
|00000250| 6f 70 65 6e 6d 61 69 6e | 3a f2 6d 69 6e 69 5f 70 |openmain|:.mini_p|
|00000260| 6f 6c 6c 3a f2 75 70 64 | 61 74 65 5f 74 69 74 6c |oll:.upd|ate_titl|
|00000270| 65 0d 01 36 2b 20 c8 99 | 22 57 69 6d 70 5f 53 65 |e..6+ ..|"Wimp_Se|
|00000280| 74 43 61 72 65 74 50 6f | 73 69 74 69 6f 6e 22 2c |tCaretPo|sition",|
|00000290| 77 68 61 6e 64 6c 65 31 | 25 2c 2d 31 0d 01 45 1d |whandle1|%,-1..E.|
|000002a0| 20 71 75 69 74 25 3d a3 | 3a 63 6c 6f 73 65 64 25 | quit%=.|:closed%|
|000002b0| 3d a3 3a 65 6e 64 25 3d | a3 0d 01 54 06 20 f5 0d |=.:end%=|...T. ..|
|000002c0| 01 72 0b 20 20 f2 70 6f | 6c 6c 0d 01 81 1d 20 fd |.r. .po|ll.... .|
|000002d0| 20 71 75 69 74 25 20 84 | 20 63 6c 6f 73 65 64 25 | quit% .| closed%|
|000002e0| 20 84 20 65 6e 64 25 0d | 01 90 04 0d 01 9f 18 20 | . end%.|....... |
|000002f0| e7 20 71 75 69 74 25 20 | f2 63 6c 6f 73 65 5f 64 |. quit% |.close_d|
|00000300| 6f 77 6e 0d 01 ae 04 0d | 01 bd 18 20 63 6c 6f 73 |own.....|... clos|
|00000310| 65 64 25 3d b9 3a f2 63 | 6c 6f 73 65 61 6c 6c 0d |ed%=.:.c|loseall.|
|00000320| 01 cc 1c 20 c8 99 22 57 | 69 6d 70 5f 43 72 65 61 |... .."W|imp_Crea|
|00000330| 74 65 4d 65 6e 75 22 2c | 2c 2d 31 0d 01 db 0e 20 |teMenu",|,-1.... |
|00000340| fd 20 71 75 69 74 25 3d | b9 0d 01 ea 10 20 f4 2d |. quit%=|..... .-|
|00000350| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 01 f9 11 20 dd f2 |--------|-.... ..|
|00000360| 63 6c 6f 73 65 5f 64 6f | 77 6e 0d 02 08 0f 20 ee |close_do|wn.... .|
|00000370| 20 85 3a e5 20 8d 44 71 | 42 0d 02 17 35 20 f2 63 | .:. .Dq|B...5 .c|
|00000380| 6c 6f 73 65 61 6c 6c 3a | c8 99 22 4d 65 73 73 61 |loseall:|.."Messa|
|00000390| 67 65 54 72 61 6e 73 5f | 43 6c 6f 73 65 46 69 6c |geTrans_|CloseFil|
|000003a0| 65 22 2c 6d 65 73 73 61 | 67 65 5f 70 74 72 0d 02 |e",messa|ge_ptr..|
|000003b0| 35 23 20 c8 99 22 58 4f | 53 5f 4d 6f 64 75 6c 65 |5# .."XO|S_Module|
|000003c0| 22 2c 37 2c 2c 6d 65 73 | 73 61 67 65 5f 61 72 65 |",7,,mes|sage_are|
|000003d0| 61 0d 02 44 16 20 ff 28 | 22 52 4d 4b 49 4c 4c 20 |a..D. .(|"RMKILL |
|000003e0| 53 6f 75 6e 64 22 29 0d | 02 53 17 20 ff 28 22 52 |Sound").|.S. .("R|
|000003f0| 4d 4b 49 4c 4c 20 53 6f | 75 6e 64 31 22 29 0d 02 |MKILL So|und1")..|
|00000400| 62 17 20 ff 28 22 52 4d | 4b 49 4c 4c 20 53 6f 75 |b. .("RM|KILL Sou|
|00000410| 6e 64 33 22 29 0d 02 71 | 37 20 24 62 6c 6f 63 6b |nd3")..q|7 $block|
|00000420| 25 3d 22 54 41 53 4b 22 | 3a c8 99 22 57 69 6d 70 |%="TASK"|:.."Wimp|
|00000430| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 2c 74 61 73 6b |_CloseDo|wn",task|
|00000440| 25 2c 21 62 6c 6f 63 6b | 25 3a c8 98 0d 02 8f 06 |%,!block|%:......|
|00000450| 20 e1 0d 02 9e 04 0d 02 | ad 10 20 f4 2d 2d 2d 2d | .......|.. .----|
|00000460| 2d 2d 2d 2d 2d 2d 0d 02 | bc 12 20 dd f2 69 63 6f |------..|.. ..ico|
|00000470| 6e 62 61 72 77 61 69 74 | 0d 02 cb 1d 20 65 6e 64 |nbarwait|.... end|
|00000480| 25 3d a3 3a 63 6c 6f 73 | 65 64 25 3d a3 3a 71 75 |%=.:clos|ed%=.:qu|
|00000490| 69 74 25 3d a3 0d 02 da | 06 20 f5 0d 03 25 24 20 |it%=....|. ...%$ |
|000004a0| c8 99 22 57 69 6d 70 5f | 50 6f 6c 6c 22 2c 2c 62 |.."Wimp_|Poll",,b|
|000004b0| 6c 6f 63 6b 25 20 b8 20 | 72 65 61 73 6f 6e 25 0d |lock% . |reason%.|
|000004c0| 03 34 11 20 c8 8e 20 72 | 65 61 73 6f 6e 25 20 ca |.4. .. r|eason% .|
|000004d0| 0d 03 43 10 20 20 c9 20 | 36 3a f2 6d 6f 75 73 65 |..C. . |6:.mouse|
|000004e0| 0d 03 52 27 20 20 c9 20 | 38 3a c8 99 22 57 69 6d |..R' . |8:.."Wim|
|000004f0| 70 5f 50 72 6f 63 65 73 | 73 4b 65 79 22 2c 62 6c |p_Proces|sKey",bl|
|00000500| 6f 63 6b 25 21 32 34 0d | 03 61 19 20 20 c9 20 39 |ock%!24.|.a. . 9|
|00000510| 3a f2 69 63 6f 6e 62 61 | 72 6f 70 74 69 6f 6e 73 |:.iconba|roptions|
|00000520| 0d 03 70 1a 20 20 c9 20 | 31 37 2c 31 38 3a f2 69 |..p. . |17,18:.i|
|00000530| 63 6f 6e 72 65 63 65 69 | 76 65 0d 03 7f 06 20 cb |conrecei|ve.... .|
|00000540| 0d 03 8e 13 20 fd 20 65 | 6e 64 25 20 84 20 71 75 |.... . e|nd% . qu|
|00000550| 69 74 25 0d 03 9d 06 20 | e1 0d 03 ac 11 20 f4 2d |it%.... |..... .-|
|00000560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 03 bb 15 20 dd |--------|--.... .|
|00000570| f2 69 63 6f 6e 62 61 72 | 6f 70 74 69 6f 6e 73 0d |.iconbar|options.|
|00000580| 03 ca 14 20 63 68 6f 69 | 63 65 25 3d 21 62 6c 6f |... choi|ce%=!blo|
|00000590| 63 6b 25 0d 03 d9 27 20 | e7 20 63 68 6f 69 63 65 |ck%...' |. choice|
|000005a0| 25 3d 31 20 f2 76 65 72 | 69 66 79 73 68 75 74 64 |%=1 .ver|ifyshutd|
|000005b0| 6f 77 6e 3a 65 6e 64 25 | 3d b9 0d 03 e8 06 20 e1 |own:end%|=..... .|
|000005c0| 0d 03 f7 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|000005d0| 0d 04 06 12 20 dd f2 69 | 63 6f 6e 72 65 63 65 69 |.... ..i|conrecei|
|000005e0| 76 65 0d 04 15 13 20 c8 | 8e 20 62 6c 6f 63 6b 25 |ve.... .|. block%|
|000005f0| 21 31 36 20 ca 0d 04 24 | 13 20 20 c9 20 30 3a 71 |!16 ...$|. . 0:q|
|00000600| 75 69 74 25 3d b9 3a e1 | 0d 04 33 33 20 20 c9 20 |uit%=.:.|..33 . |
|00000610| 33 3a e7 20 62 6c 6f 63 | 6b 25 21 34 30 3d 26 46 |3:. bloc|k%!40=&F|
|00000620| 46 46 20 65 6e 64 25 3d | b9 3a f2 64 72 61 67 3a |FF end%=|.:.drag:|
|00000630| f2 6f 70 65 6e 6d 61 69 | 6e 3a e1 0d 04 42 1d 20 |.openmai|n:...B. |
|00000640| 20 c9 20 26 34 30 30 43 | 31 3a f2 6d 6f 64 65 5f | . &400C|1:.mode_|
|00000650| 63 68 61 6e 67 65 64 32 | 0d 04 51 06 20 cb 0d 04 |changed2|..Q. ...|
|00000660| 60 06 20 e1 0d 04 6f 10 | 20 f4 2d 2d 2d 2d 2d 2d |`. ...o.| .------|
|00000670| 2d 2d 2d 2d 0d 04 7e 0f | 20 dd f2 63 6c 6f 73 65 |----..~.| ..close|
|00000680| 61 6c 6c 0d 04 82 36 20 | 62 6c 6f 63 6b 25 21 30 |all...6 |block%!0|
|00000690| 3d 77 68 61 6e 64 6c 65 | 31 25 3a c8 99 22 57 69 |=whandle|1%:.."Wi|
|000006a0| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|000006b0| 2c 62 6c 6f 63 6b 25 3a | e1 0d 04 e7 10 20 f4 2d |,block%:|..... .-|
|000006c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 04 f6 13 20 dd f2 |--------|-.... ..|
|000006d0| 6d 6f 64 65 5f 63 68 61 | 6e 67 65 64 0d 05 14 3e |mode_cha|nged...>|
|000006e0| 20 69 6e 25 21 30 3d 31 | 32 3a 69 6e 25 21 34 3d | in%!0=1|2:in%!4=|
|000006f0| 35 3a 69 6e 25 21 38 3d | 2d 31 3a c8 99 22 4f 53 |5:in%!8=|-1:.."OS|
|00000700| 5f 52 65 61 64 56 64 75 | 56 61 72 69 61 62 6c 65 |_ReadVdu|Variable|
|00000710| 73 22 2c 69 6e 25 2c 6f | 75 25 0d 05 23 2a 20 74 |s",in%,o|u%..#* t|
|00000720| 6f 70 5f 79 3d 28 6f 75 | 25 21 30 29 2b 31 3a 74 |op_y=(ou|%!0)+1:t|
|00000730| 6f 70 5f 79 3d 28 32 5e | 6f 75 25 21 34 29 2a 74 |op_y=(2^|ou%!4)*t|
|00000740| 6f 70 5f 79 0d 05 32 3e | 20 69 6e 25 21 30 3d 31 |op_y..2>| in%!0=1|
|00000750| 31 3a 69 6e 25 21 34 3d | 34 3a 69 6e 25 21 38 3d |1:in%!4=|4:in%!8=|
|00000760| 2d 31 3a c8 99 22 4f 53 | 5f 52 65 61 64 56 64 75 |-1:.."OS|_ReadVdu|
|00000770| 56 61 72 69 61 62 6c 65 | 73 22 2c 69 6e 25 2c 6f |Variable|s",in%,o|
|00000780| 75 25 0d 05 41 2a 20 74 | 6f 70 5f 78 3d 28 6f 75 |u%..A* t|op_x=(ou|
|00000790| 25 21 30 29 2b 31 3a 74 | 6f 70 5f 78 3d 28 32 5e |%!0)+1:t|op_x=(2^|
|000007a0| 6f 75 25 21 34 29 2a 74 | 6f 70 5f 78 0d 05 6e 06 |ou%!4)*t|op_x..n.|
|000007b0| 20 e1 0d 05 7d 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ...}. .|--------|
|000007c0| 2d 2d 0d 05 8c 14 20 dd | f2 6d 6f 64 65 5f 63 68 |--.... .|.mode_ch|
|000007d0| 61 6e 67 65 64 32 0d 05 | aa 3e 20 69 6e 25 21 30 |anged2..|.> in%!0|
|000007e0| 3d 31 32 3a 69 6e 25 21 | 34 3d 35 3a 69 6e 25 21 |=12:in%!|4=5:in%!|
|000007f0| 38 3d 2d 31 3a c8 99 22 | 4f 53 5f 52 65 61 64 56 |8=-1:.."|OS_ReadV|
|00000800| 64 75 56 61 72 69 61 62 | 6c 65 73 22 2c 69 6e 25 |duVariab|les",in%|
|00000810| 2c 6f 75 25 0d 05 b9 2a | 20 74 6f 70 5f 79 3d 28 |,ou%...*| top_y=(|
|00000820| 6f 75 25 21 30 29 2b 31 | 3a 74 6f 70 5f 79 3d 28 |ou%!0)+1|:top_y=(|
|00000830| 32 5e 6f 75 25 21 34 29 | 2a 74 6f 70 5f 79 0d 05 |2^ou%!4)|*top_y..|
|00000840| c8 06 20 e1 0d 05 d7 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|00000850| 2d 2d 2d 2d 0d 05 e6 10 | 20 dd f2 6d 69 6e 69 5f |----....| ..mini_|
|00000860| 70 6f 6c 6c 0d 05 f5 08 | 20 54 3d 30 0d 06 04 06 |poll....| T=0....|
|00000870| 20 f5 0d 06 13 28 20 20 | c8 99 22 57 69 6d 70 5f | ....( |.."Wimp_|
|00000880| 50 6f 6c 6c 22 2c 26 30 | 30 2c 62 6c 6f 63 6b 25 |Poll",&0|0,block%|
|00000890| 20 b8 20 72 65 61 73 6f | 6e 25 0d 06 22 12 20 20 | . reaso|n%..". |
|000008a0| c8 8e 20 72 65 61 73 6f | 6e 25 20 ca 0d 06 31 13 |.. reaso|n% ...1.|
|000008b0| 20 20 20 c9 20 31 20 3a | f2 72 65 64 72 61 77 0d | . 1 :|.redraw.|
|000008c0| 06 40 27 20 20 20 c9 20 | 32 20 3a c8 99 22 57 69 |.@' . |2 :.."Wi|
|000008d0| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|000008e0| 62 6c 6f 63 6b 25 0d 06 | 4f 07 20 20 cb 0d 06 5e |block%..|O. ...^|
|000008f0| 0a 20 20 54 2b 3d 31 0d | 06 6d 0a 20 fd 20 54 3e |. T+=1.|.m. . T>|
|00000900| 33 0d 06 7c 06 20 e1 0d | 06 8b 10 20 f4 2d 2d 2d |3..|. ..|... .---|
|00000910| 2d 2d 2d 2d 2d 2d 2d 0d | 06 9a 0b 20 dd f2 70 6f |-------.|... ..po|
|00000920| 6c 6c 0d 06 a9 27 20 c8 | 99 22 57 69 6d 70 5f 50 |ll...' .|."Wimp_P|
|00000930| 6f 6c 6c 22 2c 26 30 30 | 2c 62 6c 6f 63 6b 25 20 |oll",&00|,block% |
|00000940| b8 20 72 65 61 73 6f 6e | 25 0d 06 b8 11 20 c8 8e |. reason|%.... ..|
|00000950| 20 72 65 61 73 6f 6e 25 | 20 ca 0d 06 c7 12 20 20 | reason%| ..... |
|00000960| c9 20 31 20 3a f2 72 65 | 64 72 61 77 0d 06 d6 26 |. 1 :.re|draw...&|
|00000970| 20 20 c9 20 32 20 3a c8 | 99 22 57 69 6d 70 5f 4f | . 2 :.|."Wimp_O|
|00000980| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |penWindo|w",,bloc|
|00000990| 6b 25 0d 06 e5 17 20 20 | c9 20 33 20 3a f2 77 68 |k%.... |. 3 :.wh|
|000009a0| 69 63 68 5f 63 6c 6f 73 | 65 0d 06 f4 15 20 20 c9 |ich_clos|e.... .|
|000009b0| 20 36 20 3a f2 65 64 69 | 74 6d 6f 75 73 65 0d 07 | 6 :.edi|tmouse..|
|000009c0| 03 14 20 20 c9 20 37 20 | 3a f2 63 61 6c 6c 73 61 |.. . 7 |:.callsa|
|000009d0| 76 65 0d 07 12 14 20 20 | c9 20 38 20 3a f2 6b 65 |ve.... |. 8 :.ke|
|000009e0| 79 70 72 65 73 73 0d 07 | 21 18 20 20 c9 20 39 20 |ypress..|!. . 9 |
|000009f0| 3a f2 6f 70 74 69 6f 6e | 73 65 6c 65 63 74 0d 07 |:.option|select..|
|00000a00| 30 1a 20 20 c9 20 31 37 | 2c 31 38 3a f2 72 65 63 |0. . 17|,18:.rec|
|00000a10| 65 69 76 65 64 61 74 61 | 0d 07 3f 06 20 cb 0d 07 |eivedata|..?. ...|
|00000a20| 5e 1b 20 e7 20 74 71 5f | 66 6c 61 67 3d b9 20 f2 |^. . tq_|flag=. .|
|00000a30| 74 6f 6f 5f 71 75 69 63 | 6b 0d 07 4e 06 20 e1 0d |too_quic|k..N. ..|
|00000a40| 07 5d 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |.]. .---|-------.|
|00000a50| 07 6c 12 20 dd f2 77 68 | 69 63 68 5f 63 6c 6f 73 |.l. ..wh|ich_clos|
|00000a60| 65 0d 07 7b 41 20 e7 20 | 62 6c 6f 63 6b 25 21 30 |e..{A . |block%!0|
|00000a70| 3c 3e 77 68 61 6e 64 6c | 65 31 25 20 c8 99 22 57 |<>whandl|e1% .."W|
|00000a80| 69 6d 70 5f 53 65 74 43 | 61 72 65 74 50 6f 73 69 |imp_SetC|aretPosi|
|00000a90| 74 69 6f 6e 22 2c 77 68 | 61 6e 64 6c 65 31 25 2c |tion",wh|andle1%,|
|00000aa0| 2d 31 0d 07 8a 2d 20 e7 | 20 62 6c 6f 63 6b 25 21 |-1...- .| block%!|
|00000ab0| 30 3d 77 68 61 6e 64 6c | 65 31 25 20 f2 63 6c 6f |0=whandl|e1% .clo|
|00000ac0| 73 65 61 6c 6c 3a 63 6c | 6f 73 65 64 25 3d b9 0d |seall:cl|osed%=..|
|00000ad0| 07 99 06 20 e1 0d 07 a8 | 11 20 f4 2d 2d 2d 2d 2d |... ....|. .-----|
|00000ae0| 2d 2d 2d 2d 2d 2d 0d 07 | b7 12 20 dd f2 72 65 63 |------..|.. ..rec|
|00000af0| 65 69 76 65 64 61 74 61 | 0d 07 c6 13 20 c8 8e 20 |eivedata|.... .. |
|00000b00| 62 6c 6f 63 6b 25 21 31 | 36 20 ca 0d 07 d5 11 20 |block%!1|6 ..... |
|00000b10| 20 c9 20 30 3a 71 75 69 | 74 25 3d b9 0d 07 f3 13 | . 0:qui|t%=.....|
|00000b20| 20 20 c9 20 32 3a f2 73 | 61 76 65 64 61 74 61 0d | . 2:.s|avedata.|
|00000b30| 08 02 0f 20 20 c9 20 33 | 3a f2 64 72 61 67 0d 08 |... . 3|:.drag..|
|00000b40| 11 1c 20 20 c9 20 26 34 | 30 30 43 31 3a f2 6d 6f |.. . &4|00C1:.mo|
|00000b50| 64 65 5f 63 68 61 6e 67 | 65 64 0d 08 12 18 20 20 |de_chang|ed.... |
|00000b60| c9 20 26 35 30 32 3a f2 | 69 6e 74 65 72 5f 68 65 |. &502:.|inter_he|
|00000b70| 6c 70 0d 08 20 06 20 cb | 0d 08 2f 06 20 e1 0d 08 |lp.. . .|../. ...|
|00000b80| 3e 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 08 |>. .----|------..|
|00000b90| 4d 0b 20 dd f2 64 72 61 | 67 0d 08 5c 25 20 66 69 |M. ..dra|g..\% fi|
|00000ba0| 6c 65 74 79 70 65 25 3d | 62 6c 6f 63 6b 25 21 34 |letype%=|block%!4|
|00000bb0| 30 3a 44 4e 24 3d 22 22 | 3a 61 25 3d 2d 31 0d 08 |0:DN$=""|:a%=-1..|
|00000bc0| 6b 25 20 f5 20 61 25 2b | 3d 31 3a 62 25 3d 62 6c |k% . a%+|=1:b%=bl|
|00000bd0| 6f 63 6b 25 3f 28 34 34 | 2b 61 25 29 3a fd 20 62 |ock%?(44|+a%):. b|
|00000be0| 25 3d 30 0d 08 7a 2e 20 | 62 6c 6f 63 6b 25 3f 28 |%=0..z. |block%?(|
|00000bf0| 34 34 2b 61 25 29 3d 31 | 33 3a 44 4e 24 3d 24 28 |44+a%)=1|3:DN$=$(|
|00000c00| 62 6c 6f 63 6b 25 2b 34 | 34 29 3a 4d 55 24 3d 22 |block%+4|4):MU$="|
|00000c10| 22 0d 08 98 35 20 e7 20 | 66 69 6c 65 74 79 70 65 |"...5 . |filetype|
|00000c20| 25 3c 3e 26 46 46 46 3a | e7 20 66 69 6c 65 74 79 |%<>&FFF:|. filety|
|00000c30| 70 65 25 3c 3e 34 30 39 | 36 3a f2 64 72 61 67 65 |pe%<>409|6:.drage|
|00000c40| 72 72 6f 72 3a e1 0d 08 | b6 17 20 e7 20 66 69 6c |rror:...|.. . fil|
|00000c50| 65 74 79 70 65 25 3d 26 | 46 46 46 20 8c 0d 08 c5 |etype%=&|FFF ....|
|00000c60| 1d 20 20 f2 64 61 74 61 | 5f 62 61 6e 6b 28 44 4e |. .data|_bank(DN|
|00000c70| 24 29 3a f2 69 6d 70 6f | 72 32 0d 08 d4 06 20 cc |$):.impo|r2.... .|
|00000c80| 0d 08 e3 3e 20 20 77 6f | 72 64 5f 70 61 74 68 24 |...> wo|rd_path$|
|00000c90| 3d 44 4e 24 3a f2 77 6f | 72 64 73 28 77 6f 72 64 |=DN$:.wo|rds(word|
|00000ca0| 5f 70 61 74 68 24 29 3a | f2 77 6f 72 64 73 6d 65 |_path$):|.wordsme|
|00000cb0| 6e 75 28 77 6f 72 64 73 | 6d 65 6e 75 25 29 0d 08 |nu(words|menu%)..|
|00000cc0| f2 06 20 cd 0d 09 01 06 | 20 e1 0d 09 10 10 20 f4 |.. .....| ..... .|
|00000cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 09 1f 2d 20 dd |--------|--...- .|
|00000ce0| f2 64 72 61 67 65 72 72 | 6f 72 3a f2 72 6d 28 22 |.dragerr|or:.rm("|
|00000cf0| 45 52 52 31 22 29 3a f2 | 65 72 72 62 6f 78 28 74 |ERR1"):.|errbox(t|
|00000d00| 65 78 74 24 29 3a e1 0d | 0a 2d 10 20 f4 2d 2d 2d |ext$):..|.-. .---|
|00000d10| 2d 2d 2d 2d 2d 2d 2d 0d | 0a 3c 0c 20 dd f2 6d 6f |-------.|.<. ..mo|
|00000d20| 75 73 65 0d 0a 4b 1b 20 | 78 25 3d 21 62 6c 6f 63 |use..K. |x%=!bloc|
|00000d30| 6b 25 3a 79 25 3d 62 6c | 6f 63 6b 25 21 34 0d 0a |k%:y%=bl|ock%!4..|
|00000d40| 5a 0b 20 c8 8e 20 b9 20 | ca 0d 0a 69 14 20 20 c9 |Z. .. . |...i. .|
|00000d50| 20 62 6c 6f 63 6b 25 21 | 31 32 3d 2d 32 0d 0a 78 | block%!|12=-2..x|
|00000d60| 17 20 20 20 e7 20 62 6c | 6f 63 6b 25 21 38 20 80 |. . bl|ock%!8 .|
|00000d70| 20 32 20 8c 0d 0a 87 31 | 20 20 20 f2 72 6d 28 22 | 2 ....1| .rm("|
|00000d80| 4d 55 49 31 22 29 3a f2 | 64 72 61 77 6d 65 6e 75 |MUI1"):.|drawmenu|
|00000d90| 28 6d 65 6e 75 25 2c 74 | 65 78 74 24 2c 78 25 2c |(menu%,t|ext$,x%,|
|00000da0| 79 25 2c b9 29 0d 0a 96 | 1f 20 20 cc 20 e7 20 62 |y%,.)...|. . . b|
|00000db0| 6c 6f 63 6b 25 21 38 20 | 80 20 35 20 8c 20 65 6e |lock%!8 |. 5 . en|
|00000dc0| 64 25 3d b9 0d 0a a5 07 | 20 20 cd 0d 0a b4 06 20 |d%=.....| ..... |
|00000dd0| cb 0d 0a c3 06 20 e1 0d | 0a d2 10 20 f4 2d 2d 2d |..... ..|... .---|
|00000de0| 2d 2d 2d 2d 2d 2d 2d 0d | 0a e1 10 20 dd f2 65 64 |-------.|... ..ed|
|00000df0| 69 74 6d 6f 75 73 65 0d | 0a f0 48 20 78 70 6f 73 |itmouse.|..H xpos|
|00000e00| 3d 21 62 6c 6f 63 6b 25 | 3a 79 70 6f 73 3d 62 6c |=!block%|:ypos=bl|
|00000e10| 6f 63 6b 25 21 34 3a 62 | 75 3d 62 6c 6f 63 6b 25 |ock%!4:b|u=block%|
|00000e20| 21 38 3a 77 69 6e 64 25 | 3d 62 6c 6f 63 6b 25 21 |!8:wind%|=block%!|
|00000e30| 31 32 3a 69 63 3d 62 6c | 6f 63 6b 25 21 31 36 0d |12:ic=bl|ock%!16.|
|00000e40| 0a ff 0b 20 4d 55 24 3d | 22 22 0d 0b 0e 18 20 e7 |... MU$=|"".... .|
|00000e50| 20 77 69 6e 64 25 3d 2d | 32 20 80 20 62 75 3d 32 | wind%=-|2 . bu=2|
|00000e60| 20 8c 0d 0b 1d 11 20 20 | f2 72 6d 28 22 4d 55 49 | ..... |.rm("MUI|
|00000e70| 31 22 29 0d 0b 2c 35 20 | 20 f2 64 72 61 77 6d 65 |1")..,5 | .drawme|
|00000e80| 6e 75 28 6d 65 6e 75 25 | 2c 74 65 78 74 24 2c 78 |nu(menu%|,text$,x|
|00000e90| 70 6f 73 2c 79 70 6f 73 | 2c b9 29 3a 4d 55 24 3d |pos,ypos|,.):MU$=|
|00000ea0| 22 69 63 6f 6e 22 3a e1 | 0d 0b 3b 06 20 cd 0d 0b |"icon":.|..;. ...|
|00000eb0| 4a 04 0d 0b 59 0f 20 c8 | 8e 20 77 69 6e 64 25 20 |J...Y. .|. wind% |
|00000ec0| ca 0d 0b 68 04 0d 0b 77 | 25 20 f4 20 20 20 20 20 |...h...w|% . |
|00000ed0| 20 20 20 20 20 2a 2a 2a | 2a 20 4d 61 69 6e 20 57 | ***|* Main W|
|00000ee0| 69 6e 64 6f 77 20 2a 2a | 2a 2a 0d 0b 86 10 20 c9 |indow **|**.... .|
|00000ef0| 20 77 68 61 6e 64 6c 65 | 31 25 0d 0b 95 0d 20 e7 | whandle|1%.... .|
|00000f00| 20 62 75 3d 32 20 8c 0d | 0b a4 40 20 20 f2 6d 61 | bu=2 ..|..@ .ma|
|00000f10| 69 6e 6d 65 6e 75 28 6d | 6d 65 6e 75 25 29 3a c8 |inmenu(m|menu%):.|
|00000f20| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e |."Wimp_C|reateMen|
|00000f30| 75 22 2c 2c 6d 6d 65 6e | 75 25 2c 78 70 6f 73 2d |u",,mmen|u%,xpos-|
|00000f40| 35 31 2c 79 70 6f 73 0d | 0b b3 2c 20 20 4d 55 24 |51,ypos.|.., MU$|
|00000f50| 3d 22 6d 61 69 6e 6d 65 | 6e 75 22 3a 78 6d 65 6e |="mainme|nu":xmen|
|00000f60| 75 3d 78 70 6f 73 3a 79 | 6d 65 6e 75 3d 79 70 6f |u=xpos:y|menu=ypo|
|00000f70| 73 3a e1 0d 0b c2 06 20 | cd 0d 0b d1 2b 20 c8 99 |s:..... |....+ ..|
|00000f80| 22 57 69 6d 70 5f 53 65 | 74 43 61 72 65 74 50 6f |"Wimp_Se|tCaretPo|
|00000f90| 73 69 74 69 6f 6e 22 2c | 77 68 61 6e 64 6c 65 31 |sition",|whandle1|
|00000fa0| 25 2c 2d 31 0d 0b e0 36 | 20 62 6c 6f 63 6b 25 21 |%,-1...6| block%!|
|00000fb0| 30 3d 77 68 61 6e 64 6c | 65 31 25 3a c8 99 22 57 |0=whandl|e1%:.."W|
|00000fc0| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 49 6e 66 |imp_GetW|indowInf|
|00000fd0| 6f 22 2c 2c 62 6c 6f 63 | 6b 25 0d 0b ef 1f 20 f2 |o",,bloc|k%.... .|
|00000fe0| 67 65 74 6f 72 69 67 69 | 6e 28 62 6c 6f 63 6b 25 |getorigi|n(block%|
|00000ff0| 2c 78 30 25 2c 79 30 25 | 29 0d 0b fe 04 0d 0c 0d |,x0%,y0%|).......|
|00001000| 24 20 e7 20 79 70 6f 73 | 3e 79 30 25 2d 35 32 36 |$ . ypos|>y0%-526|
|00001010| 20 80 20 79 70 6f 73 3c | 79 30 25 2d 34 39 34 20 | . ypos<|y0%-494 |
|00001020| 8c 0d 0c 1c 25 20 20 e7 | 20 78 70 6f 73 3e 78 30 |....% .| xpos>x0|
|00001030| 25 2b 33 30 20 80 20 78 | 70 6f 73 3c 78 30 25 2b |%+30 . x|pos<x0%+|
|00001040| 31 30 37 30 20 8c 0d 0c | 2b 1d 20 20 20 78 3d 78 |1070 ...|+. x=x|
|00001050| 70 6f 73 2d 78 30 25 2d | 33 30 3a 78 3d 78 20 81 |pos-x0%-|30:x=x .|
|00001060| 20 34 30 0d 0c 2c 2c 20 | 20 20 c8 99 22 4f 53 5f | 40..,, | .."OS_|
|00001070| 52 65 61 64 4d 6f 6e 6f | 74 6f 6e 69 63 54 69 6d |ReadMono|tonicTim|
|00001080| 65 22 20 b8 20 6b 65 79 | 5f 74 69 6d 65 32 25 0d |e" . key|_time2%.|
|00001090| 0c 3a 17 20 20 20 f2 63 | 68 6f 73 65 6e 5f 61 5f |.:. .c|hosen_a_|
|000010a0| 6c 65 74 74 65 72 0d 0c | 3b 46 20 20 20 c8 99 22 |letter..|;F .."|
|000010b0| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|000010c0| 22 2c 77 68 61 6e 64 6c | 65 31 25 2c 33 30 2b 28 |",whandl|e1%,30+(|
|000010d0| 34 30 2a 78 29 2c 2d 35 | 33 32 2c 33 30 2b 28 34 |40*x),-5|32,30+(4|
|000010e0| 30 2a 78 29 2b 33 36 2c | 2d 34 39 32 0d 0c 49 07 |0*x)+36,|-492..I.|
|000010f0| 20 20 cd 0d 0c 58 06 20 | cd 0d 0c 67 04 0d 0c 76 | ...X. |...g...v|
|00001100| 19 20 e7 20 69 63 3d 31 | 39 20 f2 63 6c 69 63 6b |. . ic=1|9 .click|
|00001110| 5f 74 72 61 73 68 0d 0c | 85 18 20 e7 20 69 63 3d |_trash..|.. . ic=|
|00001120| 31 36 20 f2 63 6c 69 63 | 6b 5f 68 69 6e 74 0d 0c |16 .clic|k_hint..|
|00001130| 94 1e 20 e7 20 69 63 3d | 31 37 20 f2 63 6c 69 63 |.. . ic=|17 .clic|
|00001140| 6b 5f 64 69 66 66 69 63 | 75 6c 74 79 0d 0c a3 19 |k_diffic|ulty....|
|00001150| 20 e7 20 69 63 3d 31 38 | 20 f2 63 6c 69 63 6b 5f | . ic=18| .click_|
|00001160| 66 69 6c 65 73 0d 0c b2 | 26 20 f4 20 20 20 20 20 |files...|& . |
|00001170| 20 20 20 20 20 2a 2a 2a | 20 4f 74 68 65 72 20 77 | ***| Other w|
|00001180| 69 6e 64 6f 77 73 20 2a | 2a 2a 2a 0d 0c c1 04 0d |indows *|***.....|
|00001190| 0c d0 04 0d 0c df 06 20 | cb 0d 0c ee 2b 20 c8 99 |....... |....+ ..|
|000011a0| 22 57 69 6d 70 5f 53 65 | 74 43 61 72 65 74 50 6f |"Wimp_Se|tCaretPo|
|000011b0| 73 69 74 69 6f 6e 22 2c | 77 68 61 6e 64 6c 65 31 |sition",|whandle1|
|000011c0| 25 2c 2d 31 0d 0c fd 06 | 20 e1 0d 0d 0c 10 20 f4 |%,-1....| ..... .|
|000011d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 0d 1b 14 20 dd |--------|--.... .|
|000011e0| f2 63 61 72 65 74 28 43 | 25 2c 77 68 25 29 0d 0d |.caret(C|%,wh%)..|
|000011f0| 2a 13 20 f2 69 72 65 61 | 64 28 43 25 2c 77 68 25 |*. .irea|d(C%,wh%|
|00001200| 29 0d 0d 39 19 20 e7 20 | 61 24 3d 22 22 20 6c 3d |)..9. . |a$="" l=|
|00001210| 2d 31 20 8b 20 6c 3d a9 | 61 24 0d 0d 48 2e 20 c8 |-1 . l=.|a$..H. .|
|00001220| 99 20 22 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 |. "Wimp_|SetCaret|
|00001230| 50 6f 73 69 74 69 6f 6e | 22 2c 77 68 25 2c 43 25 |Position|",wh%,C%|
|00001240| 2c 30 2c 2c 2d 31 2c 6c | 0d 0d 57 06 20 e1 0d 0d |,0,,-1,l|..W. ...|
|00001250| 66 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 0d |f. .----|------..|
|00001260| 75 28 20 dd f2 70 69 63 | 74 75 72 65 28 58 53 49 |u( ..pic|ture(XSI|
|00001270| 5a 45 2c 59 53 49 5a 45 | 2c 73 73 73 70 61 63 65 |ZE,YSIZE|,ssspace|
|00001280| 2c 73 73 73 24 29 0d 0d | 84 08 20 ea 20 85 0d 0d |,sss$)..|.. . ...|
|00001290| 93 23 20 ee 20 85 20 ea | 3a f7 20 85 3a ef 32 36 |.# . . .|:. .:.26|
|000012a0| 3a db 3a f1 f6 24 3a f1 | c3 9e 3a 5a 24 3d be 3a |:.:..$:.|..:Z$=.:|
|000012b0| e1 0d 0d a2 13 20 24 73 | 70 72 6e 61 6d 65 25 3d |..... $s|prname%=|
|000012c0| 73 73 73 24 0d 0d b1 10 | 20 e7 20 73 73 73 24 3d |sss$....| . sss$=|
|000012d0| 22 22 20 8c 0d 0d c0 37 | 20 20 c8 99 22 4f 53 5f |"" ....7| .."OS_|
|000012e0| 53 70 72 69 74 65 4f 70 | 22 2c 32 36 39 2c 73 73 |SpriteOp|",269,ss|
|000012f0| 73 70 61 63 65 2c 73 70 | 72 6e 61 6d 65 25 2c 31 |space,sp|rname%,1|
|00001300| 33 2c 31 20 b8 20 2c 2c | 2c 52 33 0d 0d cf 17 20 |3,1 . ,,|,R3.... |
|00001310| 20 3f 28 73 70 72 6e 61 | 6d 65 25 2b 52 33 29 3d | ?(sprna|me%+R3)=|
|00001320| 31 33 0d 0d de 06 20 cd | 0d 0d ed 33 20 c8 99 22 |13.... .|...3 .."|
|00001330| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 32 38 30 |OS_Sprit|eOp",280|
|00001340| 2c 73 73 73 70 61 63 65 | 2c 24 73 70 72 6e 61 6d |,ssspace|,$sprnam|
|00001350| 65 25 20 b8 20 2c 2c 61 | 64 64 25 0d 0d fc 3a 20 |e% . ,,a|dd%...: |
|00001360| c8 99 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |.."OS_Sp|riteOp",|
|00001370| 35 35 32 2c 73 73 73 70 | 61 63 65 2c 61 64 64 25 |552,sssp|ace,add%|
|00001380| 20 b8 20 2c 2c 2c 73 78 | 25 2c 73 79 25 2c 2c 73 | . ,,,sx|%,sy%,,s|
|00001390| 6d 6f 64 65 25 0d 0e 0b | 16 20 65 25 3d 28 61 64 |mode%...|. e%=(ad|
|000013a0| 64 25 21 33 32 2d 34 34 | 29 2f 38 0d 0e 1a 12 20 |d%!32-44|)/8.... |
|000013b0| 70 61 6c 25 3d 70 61 6c | 62 75 66 66 25 0d 0e 29 |pal%=pal|buff%..)|
|000013c0| 04 0d 0e 38 0c 20 c8 8e | 20 65 25 20 ca 0d 0e 47 |...8. ..| e% ...G|
|000013d0| 09 20 20 c9 20 30 0d 0e | 56 2e 20 20 c8 99 22 4f |. . 0..|V. .."O|
|000013e0| 53 5f 52 65 61 64 4d 6f | 64 65 56 61 72 69 61 62 |S_ReadMo|deVariab|
|000013f0| 6c 65 22 2c 73 6d 6f 64 | 65 25 2c 39 20 b8 20 2c |le",smod|e%,9 . ,|
|00001400| 2c 70 70 25 0d 0e 65 0e | 20 20 c8 8e 20 70 70 25 |,pp%..e.| .. pp%|
|00001410| 20 ca 0d 0e 74 13 20 20 | 20 c9 20 30 3a 70 61 6c | ...t. | . 0:pal|
|00001420| 25 3d 70 30 25 0d 0e 83 | 13 20 20 20 c9 20 31 3a |%=p0%...|. . 1:|
|00001430| 70 61 6c 25 3d 70 31 25 | 0d 0e 92 13 20 20 20 c9 |pal%=p1%|.... .|
|00001440| 20 32 3a 70 61 6c 25 3d | 70 32 25 0d 0e a1 13 20 | 2:pal%=|p2%.... |
|00001450| 20 20 c9 20 33 3a 70 61 | 6c 25 3d 70 33 25 0d 0e | . 3:pa|l%=p3%..|
|00001460| b0 06 20 cb 0d 0e bf 04 | 0d 0e ce 0d 20 c9 20 32 |.. .....|.... . 2|
|00001470| 2c 34 2c 31 36 0d 0e dd | 13 20 20 e3 20 69 25 3d |,4,16...|. . i%=|
|00001480| 30 20 b8 20 65 25 2d 31 | 0d 0e ec 20 20 20 70 61 |0 . e%-1|... pa|
|00001490| 6c 25 21 28 69 25 2a 34 | 29 3d 61 64 64 25 21 28 |l%!(i%*4|)=add%!(|
|000014a0| 34 34 2b 69 25 2a 38 29 | 0d 0e fb 0a 20 20 ed 20 |44+i%*8)|.... . |
|000014b0| 69 25 0d 0f 0a 09 20 c9 | 20 36 34 0d 0f 19 3e 20 |i%.... .| 64...> |
|000014c0| 20 e3 20 67 72 61 62 25 | 3d 30 20 b8 20 32 30 34 | . grab%|=0 . 204|
|000014d0| 38 2d 38 20 88 20 38 3a | 70 61 6c 25 21 28 67 72 |8-8 . 8:|pal%!(gr|
|000014e0| 61 62 25 3e 3e 31 29 3d | 61 64 64 25 21 28 67 72 |ab%>>1)=|add%!(gr|
|000014f0| 61 62 25 2b 34 34 29 3a | ed 0d 0f 28 06 20 cb 0d |ab%+44):|...(. ..|
|00001500| 0f 37 04 0d 0f 46 12 20 | e7 20 73 6d 6f 64 65 25 |.7...F. |. smode%|
|00001510| 3d 2d 31 20 e1 0d 0f 55 | 30 20 e7 20 73 73 73 24 |=-1 ...U|0 . sss$|
|00001520| 3d 22 69 6d 31 46 48 47 | 46 22 20 4b 75 3d 32 38 |="im1FHG|F" Ku=28|
|00001530| 3a 4b 75 70 3d 30 20 8b | 20 4b 75 3d 2d 31 3a 4b |:Kup=0 .| Ku=-1:K|
|00001540| 75 70 3d 2d 31 0d 0f 64 | 43 20 e7 20 65 25 3c 36 |up=-1..d|C . e%<6|
|00001550| 34 20 c8 99 22 43 6f 6c | 6f 75 72 54 72 61 6e 73 |4 .."Col|ourTrans|
|00001560| 5f 53 65 6c 65 63 74 54 | 61 62 6c 65 22 2c 73 6d |_SelectT|able",sm|
|00001570| 6f 64 65 25 2c 70 61 6c | 25 2c 4b 75 2c 4b 75 70 |ode%,pal|%,Ku,Kup|
|00001580| 2c 74 72 61 6e 73 32 25 | 0d 0f 73 04 0d 0f 82 0e |,trans2%|..s.....|
|00001590| 20 e7 20 65 25 3e 36 33 | 20 8c 0d 0f 91 22 20 20 | . e%>63| ...." |
|000015a0| e3 20 51 25 3d 30 20 b8 | 20 32 35 35 3a 74 72 61 |. Q%=0 .| 255:tra|
|000015b0| 6e 73 32 25 3f 51 25 3d | 51 25 3a ed 0d 0f a0 12 |ns2%?Q%=|Q%:.....|
|000015c0| 20 20 e3 20 51 25 3d 30 | 20 b8 20 32 35 35 0d 0f | . Q%=0| . 255..|
|000015d0| af 42 20 20 c8 99 22 43 | 6f 6c 6f 75 72 54 72 61 |.B .."C|olourTra|
|000015e0| 6e 73 5f 52 65 74 75 72 | 6e 43 6f 6c 6f 75 72 4e |ns_Retur|nColourN|
|000015f0| 75 6d 62 65 72 22 2c 70 | 61 6c 25 21 28 51 25 3c |umber",p|al%!(Q%<|
|00001600| 3c 32 29 20 b8 20 74 72 | 61 6e 73 32 25 3f 51 25 |<2) . tr|ans2%?Q%|
|00001610| 0d 0f be 07 20 20 ed 0d | 0f cd 3c 20 20 c8 99 22 |.... ..|..< .."|
|00001620| 43 6f 6c 6f 75 72 54 72 | 61 6e 73 5f 53 65 6c 65 |ColourTr|ans_Sele|
|00001630| 63 74 54 61 62 6c 65 22 | 2c 73 6d 6f 64 65 25 2c |ctTable"|,smode%,|
|00001640| 70 61 6c 25 2c 4b 75 2c | 4b 75 70 2c 74 72 61 6e |pal%,Ku,|Kup,tran|
|00001650| 73 32 25 0d 0f dc 06 20 | cd 0d 0f eb 04 0d 0f fa |s2%.... |........|
|00001660| 2e 20 c8 99 22 4f 53 5f | 52 65 61 64 4d 6f 64 65 |. .."OS_|ReadMode|
|00001670| 56 61 72 69 61 62 6c 65 | 22 2c 73 6d 6f 64 65 25 |Variable|",smode%|
|00001680| 2c 34 20 b8 20 2c 2c 78 | 6d 61 67 0d 10 09 2e 20 |,4 . ,,x|mag.... |
|00001690| c8 99 22 4f 53 5f 52 65 | 61 64 4d 6f 64 65 56 61 |.."OS_Re|adModeVa|
|000016a0| 72 69 61 62 6c 65 22 2c | 73 6d 6f 64 65 25 2c 35 |riable",|smode%,5|
|000016b0| 20 b8 20 2c 2c 79 6d 61 | 67 0d 10 18 24 20 73 78 | . ,,yma|g...$ sx|
|000016c0| 25 3d 28 73 78 25 3c 3c | 78 6d 61 67 29 3a 73 79 |%=(sx%<<|xmag):sy|
|000016d0| 25 3d 28 73 79 25 3c 3c | 79 6d 61 67 29 0d 10 27 |%=(sy%<<|ymag)..'|
|000016e0| 04 0d 10 36 2b 20 c8 99 | 22 4f 53 5f 52 65 61 64 |...6+ ..|"OS_Read|
|000016f0| 4d 6f 64 65 56 61 72 69 | 61 62 6c 65 22 2c 2d 31 |ModeVari|able",-1|
|00001700| 2c 35 20 b8 20 2c 2c 79 | 6d 61 67 32 0d 10 45 2b |,5 . ,,y|mag2..E+|
|00001710| 20 c8 99 22 4f 53 5f 52 | 65 61 64 4d 6f 64 65 56 | .."OS_R|eadModeV|
|00001720| 61 72 69 61 62 6c 65 22 | 2c 2d 31 2c 34 20 b8 20 |ariable"|,-1,4 . |
|00001730| 2c 2c 78 6d 61 67 32 0d | 10 54 30 20 f4 49 46 20 |,,xmag2.|.T0 .IF |
|00001740| 70 72 6e 74 5f 73 74 61 | 74 75 73 3d 31 20 78 6d |prnt_sta|tus=1 xm|
|00001750| 61 67 32 3d 78 73 74 69 | 6e 74 3a 79 6d 61 67 32 |ag2=xsti|nt:ymag2|
|00001760| 3d 79 73 74 69 6e 74 0d | 10 63 04 0d 10 72 31 20 |=ystint.|.c...r1 |
|00001770| 66 61 3d 28 32 5e 79 6d | 61 67 32 29 2f 28 32 5e |fa=(2^ym|ag2)/(2^|
|00001780| 79 6d 61 67 29 3a 66 61 | 32 3d 28 32 5e 78 6d 61 |ymag):fa|2=(2^xma|
|00001790| 67 32 29 2f 28 32 5e 78 | 6d 61 67 29 0d 10 81 04 |g2)/(2^x|mag)....|
|000017a0| 0d 10 90 26 20 72 61 74 | 69 6f 78 3d 58 53 49 5a |...& rat|iox=XSIZ|
|000017b0| 45 2f 73 78 25 3a 72 61 | 74 69 6f 79 3d 59 53 49 |E/sx%:ra|tioy=YSI|
|000017c0| 5a 45 2f 73 79 25 0d 10 | 9f 43 20 f4 49 46 20 72 |ZE/sy%..|.C .IF r|
|000017d0| 61 74 69 6f 78 3c 72 61 | 74 69 6f 79 20 73 66 6e |atiox<ra|tioy sfn|
|000017e0| 25 3d 58 53 49 5a 45 3a | 73 66 64 25 3d 73 78 25 |%=XSIZE:|sfd%=sx%|
|000017f0| 20 45 4c 53 45 20 73 66 | 6e 25 3d 59 53 49 5a 45 | ELSE sf|n%=YSIZE|
|00001800| 3a 73 66 64 25 3d 73 79 | 25 0d 10 ae 30 20 73 66 |:sfd%=sy|%...0 sf|
|00001810| 6e 31 25 3d 58 53 49 5a | 45 3a 73 66 64 31 25 3d |n1%=XSIZ|E:sfd1%=|
|00001820| 73 78 25 3a 73 66 6e 32 | 25 3d 59 53 49 5a 45 3a |sx%:sfn2|%=YSIZE:|
|00001830| 73 66 64 32 25 3d 73 79 | 25 0d 10 bd 3f 20 21 6d |sfd2%=sy|%...? !m|
|00001840| 61 67 25 3d 73 66 6e 31 | 25 3a 6d 61 67 25 21 34 |ag%=sfn1|%:mag%!4|
|00001850| 3d 73 66 6e 32 25 3a 6d | 61 67 25 21 38 3d 73 66 |=sfn2%:m|ag%!8=sf|
|00001860| 64 31 25 2a 66 61 32 3a | 6d 61 67 25 21 31 32 3d |d1%*fa2:|mag%!12=|
|00001870| 73 66 64 32 25 2a 66 61 | 0d 10 cc 30 20 73 78 25 |sfd2%*fa|...0 sx%|
|00001880| 3d 73 78 25 2a 28 73 66 | 6e 31 25 2f 73 66 64 31 |=sx%*(sf|n1%/sfd1|
|00001890| 25 29 3a 73 79 25 3d 73 | 79 25 2a 28 73 66 6e 32 |%):sy%=s|y%*(sfn2|
|000018a0| 25 2f 73 66 64 32 25 29 | 0d 10 db 08 20 f7 20 85 |%/sfd2%)|.... . .|
|000018b0| 0d 10 ea 06 20 e1 0d 10 | f9 10 20 f4 2d 2d 2d 2d |.... ...|.. .----|
|000018c0| 2d 2d 2d 2d 2d 2d 0d 11 | 08 15 20 dd f2 76 65 72 |------..|.. ..ver|
|000018d0| 69 66 79 73 68 75 74 64 | 6f 77 6e 0d 11 17 3f 20 |ifyshutd|own...? |
|000018e0| 62 6c 6f 63 6b 25 21 30 | 3d 77 68 61 6e 64 6c 65 |block%!0|=whandle|
|000018f0| 31 25 3a c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |1%:.. "W|imp_Clos|
|00001900| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00001910| 3a 71 75 69 74 25 3d b9 | 3a e1 0d 11 26 06 20 e1 |:quit%=.|:...&. .|
|00001920| 0d 11 35 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..5. .--|--------|
|00001930| 0d 11 44 13 20 dd f2 6f | 70 74 69 6f 6e 73 65 6c |..D. ..o|ptionsel|
|00001940| 65 63 74 0d 11 53 34 20 | 63 68 6f 69 63 65 25 3d |ect..S4 |choice%=|
|00001950| 21 62 6c 6f 63 6b 25 3a | 63 68 6f 69 63 65 32 25 |!block%:|choice2%|
|00001960| 3d 62 6c 6f 63 6b 25 21 | 34 3a 63 72 65 61 74 65 |=block%!|4:create|
|00001970| 5f 6d 65 6e 75 3d 30 0d | 11 62 1e 20 f4 53 59 53 |_menu=0.|.b. .SYS|
|00001980| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00001990| 22 2c 2c 2d 31 0d 11 71 | 24 20 c8 99 22 57 69 6d |",,-1..q|$ .."Wim|
|000019a0| 70 5f 47 65 74 50 6f 69 | 6e 74 65 72 49 6e 66 6f |p_GetPoi|nterInfo|
|000019b0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 11 80 3a 20 78 70 |",,block|%...: xp|
|000019c0| 6f 73 3d 21 62 6c 6f 63 | 6b 25 3a 79 70 6f 73 3d |os=!bloc|k%:ypos=|
|000019d0| 62 6c 6f 63 6b 25 21 34 | 3a e7 20 62 6c 6f 63 6b |block%!4|:. block|
|000019e0| 25 21 38 3d 31 20 63 72 | 65 61 74 65 5f 6d 65 6e |%!8=1 cr|eate_men|
|000019f0| 75 3d 31 0d 11 8f 28 20 | e7 20 4d 55 24 3d 22 6d |u=1...( |. MU$="m|
|00001a00| 61 69 6e 6d 65 6e 75 22 | 20 f2 6f 70 74 69 6f 6e |ainmenu"| .option|
|00001a10| 5f 6d 61 69 6e 6d 65 6e | 75 3a e1 0d 11 9e 22 20 |_mainmen|u:...." |
|00001a20| e7 20 4d 55 24 3d 22 46 | 69 6c 65 73 22 20 f2 6f |. MU$="F|iles" .o|
|00001a30| 70 74 69 6f 6e 5f 46 69 | 6c 65 73 3a e1 0d 11 ad |ption_Fi|les:....|
|00001a40| 20 20 e7 20 63 68 6f 69 | 63 65 25 3d 31 20 f2 76 | . choi|ce%=1 .v|
|00001a50| 65 72 69 66 79 73 68 75 | 74 64 6f 77 6e 0d 11 bc |erifyshu|tdown...|
|00001a60| 06 20 e1 0d 11 cb 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..... |.-------|
|00001a70| 2d 2d 2d 0d 11 da 16 20 | dd f2 6f 70 74 69 6f 6e |---.... |..option|
|00001a80| 5f 6d 61 69 6e 6d 65 6e | 75 0d 11 e9 50 20 e7 20 |_mainmen|u...P . |
|00001a90| 63 68 6f 69 63 65 25 3d | 30 20 77 6f 72 64 5f 70 |choice%=|0 word_p|
|00001aa0| 61 74 68 24 3d 64 65 66 | 61 75 6c 74 5f 70 24 3a |ath$=def|ault_p$:|
|00001ab0| f2 77 6f 72 64 73 28 77 | 6f 72 64 5f 70 61 74 68 |.words(w|ord_path|
|00001ac0| 24 29 3a f2 77 6f 72 64 | 73 6d 65 6e 75 28 77 6f |$):.word|smenu(wo|
|00001ad0| 72 64 73 6d 65 6e 75 25 | 29 0d 11 f8 20 20 e7 20 |rdsmenu%|)... . |
|00001ae0| 63 68 6f 69 63 65 25 3d | 31 20 f2 73 61 76 65 64 |choice%=|1 .saved|
|00001af0| 65 66 61 75 6c 74 73 3a | e1 0d 11 fd 20 20 e7 20 |efaults:|.... . |
|00001b00| 63 68 6f 69 63 65 25 3d | 32 20 f2 73 61 76 65 5f |choice%=|2 .save_|
|00001b10| 64 65 66 61 75 6c 74 3a | e1 0d 12 07 1e 20 e7 20 |default:|..... . |
|00001b20| 63 68 6f 69 63 65 25 3d | 33 20 73 6f 75 6e 64 5f |choice%=|3 sound_|
|00001b30| 6c 65 76 65 6c 3d 30 0d | 12 16 1f 20 e7 20 63 68 |level=0.|... . ch|
|00001b40| 6f 69 63 65 25 3d 34 20 | 73 6f 75 6e 64 5f 6c 65 |oice%=4 |sound_le|
|00001b50| 76 65 6c 3d 2d 35 0d 12 | 25 20 20 e7 20 63 68 6f |vel=-5..|% . cho|
|00001b60| 69 63 65 25 3d 35 20 73 | 6f 75 6e 64 5f 6c 65 76 |ice%=5 s|ound_lev|
|00001b70| 65 6c 3d 2d 31 30 0d 12 | 34 20 20 e7 20 63 68 6f |el=-10..|4 . cho|
|00001b80| 69 63 65 25 3d 36 20 73 | 6f 75 6e 64 5f 6c 65 76 |ice%=6 s|ound_lev|
|00001b90| 65 6c 3d 2d 31 35 0d 12 | 43 51 20 e7 20 63 72 65 |el=-15..|CQ . cre|
|00001ba0| 61 74 65 5f 6d 65 6e 75 | 3d 31 20 f2 6d 61 69 6e |ate_menu|=1 .main|
|00001bb0| 6d 65 6e 75 28 6d 6d 65 | 6e 75 25 29 3a c8 99 22 |menu(mme|nu%):.."|
|00001bc0| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|00001bd0| 2c 2c 6d 6d 65 6e 75 25 | 2c 78 6d 65 6e 75 2d 35 |,,mmenu%|,xmenu-5|
|00001be0| 31 2c 79 6d 65 6e 75 0d | 12 52 06 20 e1 0d 12 61 |1,ymenu.|.R. ...a|
|00001bf0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 12 70 |. .-----|-----..p|
|00001c00| 13 20 dd f2 6f 70 74 69 | 6f 6e 5f 46 69 6c 65 73 |. ..opti|on_Files|
|00001c10| 0d 12 7f 29 20 44 4e 24 | 3d 77 6f 72 64 5f 70 61 |...) DN$|=word_pa|
|00001c20| 74 68 24 2b 22 2e 22 2b | 77 6f 72 64 73 24 28 63 |th$+"."+|words$(c|
|00001c30| 68 6f 69 63 65 25 2b 31 | 29 0d 12 8e 1c 20 f2 64 |hoice%+1|).... .d|
|00001c40| 61 74 61 5f 62 61 6e 6b | 28 44 4e 24 29 3a f2 69 |ata_bank|(DN$):.i|
|00001c50| 6d 70 6f 72 32 0d 12 9d | 41 20 e7 20 63 72 65 61 |mpor2...|A . crea|
|00001c60| 74 65 5f 6d 65 6e 75 3d | 31 20 c8 99 22 57 69 6d |te_menu=|1 .."Wim|
|00001c70| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 77 |p_Create|Menu",,w|
|00001c80| 6f 72 64 73 6d 65 6e 75 | 25 2c 78 70 6f 73 2d 35 |ordsmenu|%,xpos-5|
|00001c90| 31 2c 79 70 6f 73 0d 12 | ac 06 20 e1 0d 12 bb 10 |1,ypos..|.. .....|
|00001ca0| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 12 ca 0f | .------|----....|
|00001cb0| 20 dd a4 54 65 6d 70 28 | 54 24 29 0d 12 d9 12 20 | ..Temp(|T$).... |
|00001cc0| 24 77 69 6e 5f 69 64 65 | 6e 25 3d 54 24 0d 12 e8 |$win_ide|n%=T$...|
|00001cd0| 09 20 ea 20 68 25 0d 12 | f7 11 20 77 64 61 25 3d |. . h%..|.. wda%=|
|00001ce0| 77 64 61 74 61 31 25 0d | 13 06 4b 20 c8 99 22 57 |wdata1%.|..K .."W|
|00001cf0| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00001d00| 22 2c 2c 62 6c 6f 63 6b | 25 2c 77 64 61 74 61 31 |",,block|%,wdata1|
|00001d10| 25 2c 77 64 31 65 6e 64 | 25 2c 2d 31 2c 77 69 6e |%,wd1end|%,-1,win|
|00001d20| 5f 69 64 65 6e 25 20 b8 | 20 2c 2c 77 64 61 74 61 |_iden% .| ,,wdata|
|00001d30| 31 25 0d 13 15 18 20 62 | 6c 6f 63 6b 25 21 36 34 |1%.... b|lock%!64|
|00001d40| 3d 69 63 6f 6e 73 70 61 | 63 65 0d 13 24 40 20 e7 |=iconspa|ce..$@ .|
|00001d50| 20 54 24 3d 22 4d 61 69 | 6e 22 20 6e 61 6d 65 25 | T$="Mai|n" name%|
|00001d60| 3d 62 6c 6f 63 6b 25 21 | 37 32 3a f2 73 65 74 5f |=block%!|72:.set_|
|00001d70| 6d 61 69 6e 5f 69 63 6f | 6e 73 3a 62 6c 6f 63 6b |main_ico|ns:block|
|00001d80| 25 21 31 32 3d 74 6f 70 | 5f 79 0d 13 33 6f 20 e7 |%!12=top|_y..3o .|
|00001d90| 20 54 24 3d 22 63 6c 6f | 73 65 64 6f 77 6e 22 20 | T$="clo|sedown" |
|00001da0| 62 6c 6f 63 6b 25 21 28 | 38 38 2b 34 2a 33 32 2b |block%!(|88+4*32+|
|00001db0| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 3a 62 6c |24)=icon|space:bl|
|00001dc0| 6f 63 6b 25 21 28 38 38 | 2b 35 2a 33 32 2b 32 34 |ock%!(88|+5*32+24|
|00001dd0| 29 3d 69 63 6f 6e 73 70 | 61 63 65 3a 62 6c 6f 63 |)=iconsp|ace:bloc|
|00001de0| 6b 25 21 28 38 38 2b 38 | 2a 33 32 2b 32 34 29 3d |k%!(88+8|*32+24)=|
|00001df0| 69 63 6f 6e 73 70 61 63 | 65 0d 13 42 4f 20 e7 20 |iconspac|e..BO . |
|00001e00| 54 24 3d 22 77 61 72 6e | 69 6e 67 22 20 62 6c 6f |T$="warn|ing" blo|
|00001e10| 63 6b 25 21 28 38 38 2b | 34 2a 33 32 2b 32 34 29 |ck%!(88+|4*32+24)|
|00001e20| 3d 69 63 6f 6e 73 70 61 | 63 65 3a 62 6c 6f 63 6b |=iconspa|ce:block|
|00001e30| 25 21 28 38 38 2b 35 2a | 33 32 2b 32 34 29 3d 69 |%!(88+5*|32+24)=i|
|00001e40| 63 6f 6e 73 70 61 63 65 | 0d 13 51 30 20 e7 20 54 |conspace|..Q0 . T|
|00001e50| 24 3d 22 65 72 72 62 6f | 78 22 20 62 6c 6f 63 6b |$="errbo|x" block|
|00001e60| 25 21 28 38 38 2b 34 2a | 33 32 2b 32 34 29 3d 69 |%!(88+4*|32+24)=i|
|00001e70| 63 6f 6e 73 70 61 63 65 | 0d 13 53 2d 20 e7 20 54 |conspace|..S- . T|
|00001e80| 24 3d 22 72 65 67 22 20 | 62 6c 6f 63 6b 25 21 28 |$="reg" |block%!(|
|00001e90| 38 38 2b 34 2a 33 32 2b | 32 34 29 3d 69 63 6f 6e |88+4*32+|24)=icon|
|00001ea0| 73 70 61 63 65 0d 13 60 | 27 20 c8 99 22 57 69 6d |space..`|' .."Wim|
|00001eb0| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00001ec0| 2c 62 6c 6f 63 6b 25 20 | b8 20 68 25 0d 13 6f 08 |,block% |. h%..o.|
|00001ed0| 20 3d 68 25 0d 13 7e 10 | 20 f4 2d 2d 2d 2d 2d 2d | =h%..~.| .------|
|00001ee0| 2d 2d 2d 2d 0d 13 8d 15 | 20 dd f2 73 65 74 5f 6d |----....| ..set_m|
|00001ef0| 61 69 6e 5f 69 63 6f 6e | 73 0d 13 9c 14 20 f7 20 |ain_icon|s.... . |
|00001f00| 8d 64 49 53 3a f5 3a f3 | 20 69 63 5f 6e 0d 13 ab |.dIS:.:.| ic_n...|
|00001f10| 30 20 e7 20 69 63 5f 6e | 3c 3e 2d 31 20 62 6c 6f |0 . ic_n|<>-1 blo|
|00001f20| 63 6b 25 21 28 38 38 2b | 69 63 5f 6e 2a 33 32 2b |ck%!(88+|ic_n*32+|
|00001f30| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 0d 13 ba |24)=icon|space...|
|00001f40| 10 20 fd 20 69 63 5f 6e | 3d 2d 31 3a e1 0d 13 c9 |. . ic_n|=-1:....|
|00001f50| 44 20 dc 20 30 2c 31 2c | 32 2c 33 2c 34 2c 35 2c |D . 0,1,|2,3,4,5,|
|00001f60| 36 2c 37 2c 38 2c 39 2c | 31 30 2c 31 31 2c 31 32 |6,7,8,9,|10,11,12|
|00001f70| 2c 31 33 2c 31 34 2c 31 | 35 2c 31 36 2c 31 37 2c |,13,14,1|5,16,17,|
|00001f80| 32 32 2c 32 33 2c 32 34 | 2c 32 36 2c 32 37 2c 2d |22,23,24|,26,27,-|
|00001f90| 31 0d 13 d8 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |1.... .-|--------|
|00001fa0| 2d 0d 13 e7 0c 20 dd f2 | 65 72 72 6f 72 0d 13 f6 |-.... ..|error...|
|00001fb0| 1d 20 21 62 6c 6f 63 6b | 25 3d 9f 3a f2 65 72 72 |. !block|%=.:.err|
|00001fc0| 62 6f 78 28 74 65 78 74 | 24 29 0d 14 05 06 20 e1 |box(text|$).... .|
|00001fd0| 0d 14 14 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|00001fe0| 0d 14 23 10 20 dd a4 77 | 69 6d 70 65 72 72 6f 72 |..#. ..w|imperror|
|00001ff0| 0d 14 32 0e 20 21 62 6c | 6f 63 6b 25 3d 9f 0d 14 |..2. !bl|ock%=...|
|00002000| 5f 29 20 24 28 62 6c 6f | 63 6b 25 2b 34 29 3d f6 |_) $(blo|ck%+4)=.|
|00002010| 24 2b 22 20 28 22 2b c3 | 9f 2b 22 29 22 2b 22 20 |$+" ("+.|.+")"+" |
|00002020| 22 2b c3 9e 2b bd 30 0d | 14 6e 34 20 f2 72 6d 28 |"+..+.0.|.n4 .rm(|
|00002030| 22 45 52 4d 31 22 29 3a | c8 99 22 57 69 6d 70 5f |"ERM1"):|.."Wimp_|
|00002040| 52 65 70 6f 72 74 45 72 | 72 6f 72 22 2c 62 6c 6f |ReportEr|ror",blo|
|00002050| 63 6b 25 2c 31 2c 74 65 | 78 74 24 0d 14 7d 07 20 |ck%,1,te|xt$..}. |
|00002060| 3d b9 0d 14 8c 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d |=..... .|--------|
|00002070| 2d 2d 0d 14 9b 40 20 dd | a4 69 63 6f 6e 64 65 66 |--...@ .|.icondef|
|00002080| 28 77 68 61 6e 64 6c 65 | 25 2c 69 78 25 2c 69 79 |(whandle|%,ix%,iy|
|00002090| 25 2c 69 77 25 2c 69 68 | 25 2c 66 6c 61 67 25 2c |%,iw%,ih|%,flag%,|
|000020a0| 74 65 78 74 24 2c 64 31 | 25 2c 64 32 25 2c 64 33 |text$,d1|%,d2%,d3|
|000020b0| 25 29 0d 14 aa 30 20 62 | 6c 6f 63 6b 25 21 30 3d |%)...0 b|lock%!0=|
|000020c0| 77 68 61 6e 64 6c 65 25 | 3a 62 6c 6f 63 6b 25 21 |whandle%|:block%!|
|000020d0| 34 3d 69 78 25 3a 62 6c | 6f 63 6b 25 21 38 3d 69 |4=ix%:bl|ock%!8=i|
|000020e0| 79 25 0d 14 b9 28 20 62 | 6c 6f 63 6b 25 21 31 32 |y%...( b|lock%!12|
|000020f0| 3d 69 78 25 2b 69 77 25 | 3a 62 6c 6f 63 6b 25 21 |=ix%+iw%|:block%!|
|00002100| 31 36 3d 69 79 25 2b 69 | 68 25 0d 14 c8 14 20 62 |16=iy%+i|h%.... b|
|00002110| 6c 6f 63 6b 25 21 32 30 | 3d 66 6c 61 67 25 0d 14 |lock%!20|=flag%..|
|00002120| d7 0e 20 e7 20 64 31 25 | 3d 30 20 8c 0d 14 e6 17 |.. . d1%|=0 .....|
|00002130| 20 24 28 62 6c 6f 63 6b | 25 2b 32 34 29 3d 74 65 | $(block|%+24)=te|
|00002140| 78 74 24 0d 14 f5 06 20 | cc 0d 15 04 20 20 62 6c |xt$.... |.... bl|
|00002150| 6f 63 6b 25 21 32 34 3d | 64 31 25 3a 62 6c 6f 63 |ock%!24=|d1%:bloc|
|00002160| 6b 25 21 32 38 3d 64 32 | 25 0d 15 13 12 20 62 6c |k%!28=d2|%.... bl|
|00002170| 6f 63 6b 25 21 33 32 3d | 64 33 25 0d 15 22 06 20 |ock%!32=|d3%..". |
|00002180| cd 0d 15 31 2c 20 c8 99 | 20 22 57 69 6d 70 5f 43 |...1, ..| "Wimp_C|
|00002190| 72 65 61 74 65 49 63 6f | 6e 22 2c 2c 62 6c 6f 63 |reateIco|n",,bloc|
|000021a0| 6b 25 20 b8 20 69 68 61 | 6e 64 6c 65 25 0d 15 40 |k% . iha|ndle%..@|
|000021b0| 0e 20 3d 69 68 61 6e 64 | 6c 65 25 0d 15 4f 10 20 |. =ihand|le%..O. |
|000021c0| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 15 5e 15 20 |.-------|---..^. |
|000021d0| dd f2 6f 70 65 6e 77 69 | 6e 64 6f 77 28 47 25 29 |..openwi|ndow(G%)|
|000021e0| 0d 15 6d 10 20 62 6c 6f | 63 6b 25 21 30 3d 47 25 |..m. blo|ck%!0=G%|
|000021f0| 0d 15 7c 25 20 c8 99 20 | 22 57 69 6d 70 5f 47 65 |..|% .. |"Wimp_Ge|
|00002200| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 2c 62 |tWindowS|tate",,b|
|00002210| 6c 6f 63 6b 25 0d 15 8b | 20 20 c8 99 22 57 69 6d |lock%...| .."Wim|
|00002220| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|00002230| 6c 6f 63 6b 25 0d 15 9a | 06 20 e1 0d 15 a9 10 20 |lock%...|. ..... |
|00002240| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 15 b8 2a 20 |.-------|---...* |
|00002250| dd f2 64 72 61 77 6d 65 | 6e 75 28 6d 25 2c 6d 65 |..drawme|nu(m%,me|
|00002260| 6e 75 24 2c 78 25 2c 79 | 25 2c 6f 6e 69 63 6f 6e |nu$,x%,y|%,onicon|
|00002270| 62 61 72 25 29 0d 15 c7 | 4a 20 6d 25 3f 31 32 3d |bar%)...|J m%?12=|
|00002280| 37 3a 6d 25 3f 31 33 3d | 32 3a 6d 25 3f 31 34 3d |7:m%?13=|2:m%?14=|
|00002290| 37 3a 6d 25 3f 31 35 3d | 30 3a 6d 25 21 31 36 3d |7:m%?15=|0:m%!16=|
|000022a0| 32 30 30 3a 6d 25 21 32 | 30 3d 34 34 3a 6d 25 21 |200:m%!2|0=44:m%!|
|000022b0| 32 34 3d 30 3a 70 74 72 | 25 3d 6d 25 2b 32 38 0d |24=0:ptr|%=m%+28.|
|000022c0| 15 d6 1e 20 24 6d 25 3d | c0 6d 65 6e 75 24 2c a7 |... $m%=|.menu$,.|
|000022d0| 6d 65 6e 75 24 2c 22 2c | 22 29 2d 31 29 0d 15 e5 |menu$,",|")-1)...|
|000022e0| 1a 20 6d 65 6e 75 24 2b | 3d 22 2c 22 3a 65 6e 74 |. menu$+|=",":ent|
|000022f0| 72 69 65 73 25 3d 30 0d | 15 f4 11 20 c8 95 20 6d |ries%=0.|... .. m|
|00002300| 65 6e 75 24 3c 3e 22 22 | 0d 16 03 20 20 6d 65 6e |enu$<>""|... men|
|00002310| 75 24 3d c1 6d 65 6e 75 | 24 2c a7 6d 65 6e 75 24 |u$=.menu|$,.menu$|
|00002320| 2c 22 2c 22 29 2b 31 29 | 0d 16 12 12 20 e7 20 6d |,",")+1)|.... . m|
|00002330| 65 6e 75 24 3c 3e 22 22 | 20 8c 0d 16 21 27 20 70 |enu$<>""| ...!' p|
|00002340| 74 72 25 21 30 3d 30 3a | 70 74 72 25 21 34 3d 2d |tr%!0=0:|ptr%!4=-|
|00002350| 31 3a 70 74 72 25 21 38 | 3d 26 37 30 30 30 30 32 |1:ptr%!8|=&700002|
|00002360| 31 0d 16 30 3a 20 24 28 | 70 74 72 25 2b 31 32 29 |1..0: $(|ptr%+12)|
|00002370| 3d c0 6d 65 6e 75 24 2c | a7 6d 65 6e 75 24 2c 22 |=.menu$,|.menu$,"|
|00002380| 2c 22 29 2d 31 29 3a 70 | 74 72 25 2b 3d 32 34 3a |,")-1):p|tr%+=24:|
|00002390| 65 6e 74 72 69 65 73 25 | 2b 3d 31 0d 16 3f 06 20 |entries%|+=1..?. |
|000023a0| cd 0d 16 4e 06 20 ce 0d | 16 5d 1c 20 70 74 72 25 |...N. ..|.]. ptr%|
|000023b0| 21 2d 32 34 3d 70 74 72 | 25 21 2d 32 34 20 84 20 |!-24=ptr|%!-24 . |
|000023c0| 26 38 30 0d 16 6c 21 20 | e7 20 6f 6e 69 63 6f 6e |&80..l! |. onicon|
|000023d0| 62 61 72 25 20 6d 25 21 | 33 32 3d 77 68 61 6e 64 |bar% m%!|32=whand|
|000023e0| 6c 65 32 25 0d 16 7b 36 | 20 e7 20 6f 6e 69 63 6f |le2%..{6| . onico|
|000023f0| 6e 62 61 72 25 20 8c 20 | 79 70 6f 73 25 3d 39 36 |nbar% . |ypos%=96|
|00002400| 2b 65 6e 74 72 69 65 73 | 25 2a 34 34 20 8b 20 79 |+entries|%*44 . y|
|00002410| 70 6f 73 25 3d 79 25 2b | 32 30 0d 16 8a 29 20 c8 |pos%=y%+|20...) .|
|00002420| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 4d 65 |. "Wimp_|CreateMe|
|00002430| 6e 75 22 2c 2c 6d 25 2c | 78 25 2d 36 34 2c 79 70 |nu",,m%,|x%-64,yp|
|00002440| 6f 73 25 0d 16 99 06 20 | e1 0d 16 a8 10 20 f4 2d |os%.... |..... .-|
|00002450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 16 b7 24 20 dd f2 |--------|-...$ ..|
|00002460| 67 65 74 6f 72 69 67 69 | 6e 28 62 6c 6f 63 6b 25 |getorigi|n(block%|
|00002470| 2c f8 20 78 30 25 2c f8 | 20 79 30 25 29 0d 16 c6 |,. x0%,.| y0%)...|
|00002480| 33 20 78 30 25 3d 62 6c | 6f 63 6b 25 21 34 2d 62 |3 x0%=bl|ock%!4-b|
|00002490| 6c 6f 63 6b 25 21 32 30 | 3a 79 30 25 3d 62 6c 6f |lock%!20|:y0%=blo|
|000024a0| 63 6b 25 21 31 36 2d 62 | 6c 6f 63 6b 25 21 32 34 |ck%!16-b|lock%!24|
|000024b0| 0d 16 d5 06 20 e1 0d 16 | e4 10 20 f4 2d 2d 2d 2d |.... ...|.. .----|
|000024c0| 2d 2d 2d 2d 2d 2d 0d 16 | f3 15 20 dd f2 69 73 65 |------..|.. ..ise|
|000024d0| 74 28 78 25 2c 61 24 2c | 57 48 29 0d 17 02 3a 20 |t(x%,a$,|WH)...: |
|000024e0| 62 6c 6f 63 6b 25 21 30 | 3d 57 48 3a 62 6c 6f 63 |block%!0|=WH:bloc|
|000024f0| 6b 25 21 34 3d 78 25 3a | c8 99 22 57 69 6d 70 5f |k%!4=x%:|.."Wimp_|
|00002500| 47 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 62 |GetIconS|tate",,b|
|00002510| 6c 6f 63 6b 25 0d 17 11 | 49 20 24 28 62 6c 6f 63 |lock%...|I $(bloc|
|00002520| 6b 25 21 32 38 29 3d 61 | 24 3a 62 6c 6f 63 6b 25 |k%!28)=a|$:block%|
|00002530| 21 38 3d 30 3a 62 6c 6f | 63 6b 25 21 31 32 3d 30 |!8=0:blo|ck%!12=0|
|00002540| 3a c8 99 22 57 69 6d 70 | 5f 53 65 74 49 63 6f 6e |:.."Wimp|_SetIcon|
|00002550| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 0d 17 |State",,|block%..|
|00002560| 2f 06 20 e1 0d 17 3e 10 | 20 f4 2d 2d 2d 2d 2d 2d |/. ...>.| .------|
|00002570| 2d 2d 2d 2d 0d 17 4d 13 | 20 dd f2 69 72 65 61 64 |----..M.| ..iread|
|00002580| 28 78 25 2c 57 48 29 0d | 17 5c 4a 20 62 6c 6f 63 |(x%,WH).|.\J bloc|
|00002590| 6b 25 21 30 3d 57 48 3a | 62 6c 6f 63 6b 25 21 34 |k%!0=WH:|block%!4|
|000025a0| 3d 78 25 3a c8 99 22 57 | 69 6d 70 5f 47 65 74 49 |=x%:.."W|imp_GetI|
|000025b0| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |conState|",,block|
|000025c0| 25 3a 61 24 3d 24 28 62 | 6c 6f 63 6b 25 21 32 38 |%:a$=$(b|lock%!28|
|000025d0| 29 0d 17 7a 06 20 e1 0d | 17 89 10 20 f4 2d 2d 2d |)..z. ..|... .---|
|000025e0| 2d 2d 2d 2d 2d 2d 2d 0d | 17 98 13 20 dd f2 6d 61 |-------.|... ..ma|
|000025f0| 69 6e 6d 65 6e 75 28 6d | 25 29 0d 17 a7 3f 20 6d |inmenu(m|%)...? m|
|00002600| 25 3f 31 32 3d 37 3a 6d | 25 3f 31 33 3d 32 3a 6d |%?12=7:m|%?13=2:m|
|00002610| 25 3f 31 34 3d 37 3a 6d | 25 3f 31 35 3d 30 3a 6d |%?14=7:m|%?15=0:m|
|00002620| 25 21 31 36 3d 32 33 34 | 3a 6d 25 21 32 30 3d 34 |%!16=234|:m%!20=4|
|00002630| 34 3a 6d 25 21 32 34 3d | 30 0d 17 b6 1d 20 70 74 |4:m%!24=|0.... pt|
|00002640| 72 25 3d 6d 25 2b 32 38 | 3a 69 6e 64 69 72 25 3d |r%=m%+28|:indir%=|
|00002650| 6d 25 2b 32 35 36 0d 17 | c5 2b 20 f2 72 6d 28 22 |m%+256..|.+ .rm("|
|00002660| 4d 55 41 31 22 29 3a 6d | 6d 6c 3d a7 74 65 78 74 |MUA1"):m|ml=.text|
|00002670| 24 2c 22 2c 22 29 3a 65 | 6e 74 72 69 65 73 25 3d |$,","):e|ntries%=|
|00002680| 30 0d 17 d4 31 20 24 6d | 25 3d c0 74 65 78 74 24 |0...1 $m|%=.text$|
|00002690| 2c 6d 6d 6c 2d 31 29 3a | 74 65 78 74 24 3d c2 74 |,mml-1):|text$=.t|
|000026a0| 65 78 74 24 2c a9 28 74 | 65 78 74 24 29 2d 6d 6d |ext$,.(t|ext$)-mm|
|000026b0| 6c 29 0d 17 e3 06 20 f5 | 0d 17 f2 29 20 20 6d 6d |l).... .|...) mm|
|000026c0| 6c 3d a7 74 65 78 74 24 | 2c 22 2c 22 29 3a 6d 65 |l=.text$|,","):me|
|000026d0| 6e 75 24 3d c0 74 65 78 | 74 24 2c 6d 6d 6c 2d 31 |nu$=.tex|t$,mml-1|
|000026e0| 29 0d 18 01 14 20 20 e7 | 20 6d 65 6e 75 24 3c 3e |).... .| menu$<>|
|000026f0| 22 2a 22 20 8c 0d 18 10 | 21 20 20 20 74 65 78 74 |"*" ....|! text|
|00002700| 24 3d c2 74 65 78 74 24 | 2c a9 28 74 65 78 74 24 |$=.text$|,.(text$|
|00002710| 29 2d 6d 6d 6c 29 0d 18 | 1f 32 20 20 20 70 74 72 |)-mml)..|.2 ptr|
|00002720| 25 21 30 3d 30 3a e7 20 | 65 6e 74 72 69 65 73 25 |%!0=0:. |entries%|
|00002730| 3d 31 20 84 20 65 6e 74 | 72 69 65 73 25 3d 32 20 |=1 . ent|ries%=2 |
|00002740| 70 74 72 25 21 30 3d 32 | 0d 18 2e 2c 20 20 20 e7 |ptr%!0=2|..., .|
|00002750| 20 65 6e 74 72 69 65 73 | 25 3d 33 20 80 20 73 6f | entries|%=3 . so|
|00002760| 75 6e 64 5f 6c 65 76 65 | 6c 3d 30 20 70 74 72 25 |und_leve|l=0 ptr%|
|00002770| 21 30 3d 31 0d 18 3d 2d | 20 20 20 e7 20 65 6e 74 |!0=1..=-| . ent|
|00002780| 72 69 65 73 25 3d 34 20 | 80 20 73 6f 75 6e 64 5f |ries%=4 |. sound_|
|00002790| 6c 65 76 65 6c 3d 2d 35 | 20 70 74 72 25 21 30 3d |level=-5| ptr%!0=|
|000027a0| 31 0d 18 4c 2e 20 20 20 | e7 20 65 6e 74 72 69 65 |1..L. |. entrie|
|000027b0| 73 25 3d 35 20 80 20 73 | 6f 75 6e 64 5f 6c 65 76 |s%=5 . s|ound_lev|
|000027c0| 65 6c 3d 2d 31 30 20 70 | 74 72 25 21 30 3d 31 0d |el=-10 p|tr%!0=1.|
|000027d0| 18 5b 2e 20 20 20 e7 20 | 65 6e 74 72 69 65 73 25 |.[. . |entries%|
|000027e0| 3d 36 20 80 20 73 6f 75 | 6e 64 5f 6c 65 76 65 6c |=6 . sou|nd_level|
|000027f0| 3d 2d 31 35 20 70 74 72 | 25 21 30 3d 31 0d 18 6a |=-15 ptr|%!0=1..j|
|00002800| 20 20 20 20 70 74 72 25 | 21 34 3d 2d 31 3a 70 74 | ptr%|!4=-1:pt|
|00002810| 72 25 21 38 3d 26 37 30 | 30 30 30 32 31 0d 18 79 |r%!8=&70|00021..y|
|00002820| 15 20 20 20 e7 20 a9 6d | 65 6e 75 24 3c 3d 31 32 |. . .m|enu$<=12|
|00002830| 20 8c 0d 18 7a 2d 20 20 | 20 20 24 28 70 74 72 25 | ...z- | $(ptr%|
|00002840| 2b 31 32 29 3d 6d 65 6e | 75 24 3a 70 74 72 25 2b |+12)=men|u$:ptr%+|
|00002850| 3d 32 34 3a 65 6e 74 72 | 69 65 73 25 2b 3d 31 0d |=24:entr|ies%+=1.|
|00002860| 18 7b 08 20 20 20 cc 0d | 18 7c 3f 20 20 20 20 70 |.{. ..|.|? p|
|00002870| 74 72 25 21 31 32 3d 69 | 6e 64 69 72 25 3a 70 74 |tr%!12=i|ndir%:pt|
|00002880| 72 25 21 31 36 3d 30 3a | 70 74 72 25 21 32 30 3d |r%!16=0:|ptr%!20=|
|00002890| a9 6d 65 6e 75 24 2b 31 | 3a 24 69 6e 64 69 72 25 |.menu$+1|:$indir%|
|000028a0| 3d 6d 65 6e 75 24 0d 18 | 7d 46 20 20 20 20 70 74 |=menu$..|}F pt|
|000028b0| 72 25 21 38 3d 28 70 74 | 72 25 21 38 20 84 20 26 |r%!8=(pt|r%!8 . &|
|000028c0| 31 30 30 29 3a 70 74 72 | 25 2b 3d 32 34 3a 65 6e |100):ptr|%+=24:en|
|000028d0| 74 72 69 65 73 25 2b 3d | 31 3a 69 6e 64 69 72 25 |tries%+=|1:indir%|
|000028e0| 2b 3d 28 a9 6d 65 6e 75 | 24 2b 31 29 0d 18 7e 08 |+=(.menu|$+1)..~.|
|000028f0| 20 20 20 cd 0d 18 88 32 | 20 20 20 e7 20 36 34 2b | ....2| . 64+|
|00002900| 28 a9 6d 65 6e 75 24 2a | 31 34 29 3e 6d 25 21 31 |(.menu$*|14)>m%!1|
|00002910| 36 20 6d 25 21 31 36 3d | 36 34 2b 28 a9 6d 65 6e |6 m%!16=|64+(.men|
|00002920| 75 24 2a 31 34 29 0d 18 | 97 07 20 20 cd 0d 18 a6 |u$*14)..|.. ....|
|00002930| 15 20 20 e7 20 70 74 72 | 25 3e 6d 25 2b 32 35 36 |. . ptr|%>m%+256|
|00002940| 20 8c 0d 18 b5 1e 20 20 | 20 85 20 31 2c 22 4e 4f | ..... | . 1,"NO|
|00002950| 20 52 4f 4f 4d 20 46 4f | 52 20 4d 45 4e 55 53 22 | ROOM FO|R MENUS"|
|00002960| 0d 18 c4 07 20 20 cc 0d | 18 d3 2f 20 20 20 e7 20 |.... ..|../ . |
|00002970| 69 6e 64 69 72 25 3e 6d | 25 2b 34 35 30 20 85 20 |indir%>m|%+450 . |
|00002980| 32 2c 22 4d 45 4e 55 20 | 49 54 45 4d 53 20 54 4f |2,"MENU |ITEMS TO|
|00002990| 4f 20 42 49 47 22 0d 18 | e2 07 20 20 cd 0d 18 f1 |O BIG"..|.. ....|
|000029a0| 10 20 fd 20 6d 65 6e 75 | 24 3d 22 2a 22 0d 19 00 |. . menu|$="*"...|
|000029b0| 1c 20 70 74 72 25 21 2d | 32 34 3d 70 74 72 25 21 |. ptr%!-|24=ptr%!|
|000029c0| 2d 32 34 20 84 20 26 38 | 30 0d 19 1e 06 20 e1 0d |-24 . &8|0.... ..|
|000029d0| 19 e1 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|000029e0| 19 f0 2d 20 dd f2 73 74 | 79 6c 65 31 28 73 63 61 |..- ..st|yle1(sca|
|000029f0| 6c 65 2c 74 78 70 6f 73 | 25 2c 74 79 70 6f 73 25 |le,txpos|%,typos%|
|00002a00| 29 3a f2 68 61 6e 67 6d | 61 6e 3a e1 0d 1a 1d 10 |):.hangm|an:.....|
|00002a10| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 1a 2c 0e | .------|----..,.|
|00002a20| 20 dd f2 70 61 6c 69 6e | 69 74 0d 1a 3b 1c 20 70 | ..palin|it..;. p|
|00002a30| 30 25 21 30 3d 26 66 66 | 66 66 66 66 30 30 3a 70 |0%!0=&ff|ffff00:p|
|00002a40| 30 25 21 34 3d 30 0d 1a | 4a 3d 20 70 31 25 21 30 |0%!4=0..|J= p1%!0|
|00002a50| 3d 26 66 66 66 66 66 66 | 30 30 3a 70 31 25 21 34 |=&ffffff|00:p1%!4|
|00002a60| 3d 26 62 62 62 62 62 62 | 30 30 3a 70 31 25 21 38 |=&bbbbbb|00:p1%!8|
|00002a70| 3d 26 37 37 37 37 37 37 | 30 30 3a 70 31 25 21 31 |=&777777|00:p1%!1|
|00002a80| 32 3d 30 0d 1a 59 45 20 | 70 32 25 21 30 3d 26 66 |2=0..YE |p2%!0=&f|
|00002a90| 66 66 66 66 66 30 30 3a | 70 32 25 21 34 3d 26 64 |fffff00:|p2%!4=&d|
|00002aa0| 64 64 64 64 64 30 30 3a | 70 32 25 21 38 3d 26 62 |ddddd00:|p2%!8=&b|
|00002ab0| 62 62 62 62 62 30 30 3a | 70 32 25 21 31 32 3d 26 |bbbbb00:|p2%!12=&|
|00002ac0| 39 39 39 39 39 39 30 30 | 0d 1a 68 40 20 70 32 25 |99999900|..h@ p2%|
|00002ad0| 21 31 36 3d 26 37 37 37 | 37 37 37 30 30 3a 70 32 |!16=&777|77700:p2|
|00002ae0| 25 21 32 30 3d 26 35 35 | 35 35 35 35 30 30 3a 70 |%!20=&55|555500:p|
|00002af0| 32 25 21 32 34 3d 26 33 | 33 33 33 33 33 30 30 3a |2%!24=&3|3333300:|
|00002b00| 70 32 25 21 32 38 3d 30 | 0d 1a 77 48 20 70 32 25 |p2%!28=0|..wH p2%|
|00002b10| 21 33 32 3d 26 39 39 34 | 34 30 30 30 30 3a 70 32 |!32=&994|40000:p2|
|00002b20| 25 21 33 36 3d 26 30 30 | 65 65 65 65 30 30 3a 70 |%!36=&00|eeee00:p|
|00002b30| 32 25 21 34 30 3d 26 30 | 30 63 63 30 30 30 30 3a |2%!40=&0|0cc0000:|
|00002b40| 70 32 25 21 34 34 3d 26 | 30 30 30 30 64 64 30 30 |p2%!44=&|0000dd00|
|00002b50| 0d 1a 86 48 20 70 32 25 | 21 34 38 3d 26 62 62 65 |...H p2%|!48=&bbe|
|00002b60| 65 65 65 30 30 3a 70 32 | 25 21 35 32 3d 26 30 30 |eee00:p2|%!52=&00|
|00002b70| 38 38 35 35 30 30 3a 70 | 32 25 21 35 36 3d 26 30 |885500:p|2%!56=&0|
|00002b80| 30 62 62 66 66 30 30 3a | 70 32 25 21 36 30 3d 26 |0bbff00:|p2%!60=&|
|00002b90| 66 66 62 62 30 30 30 30 | 0d 1a 95 45 20 70 33 25 |ffbb0000|...E p3%|
|00002ba0| 21 30 3d 26 30 30 30 30 | 30 30 30 30 3a 70 33 25 |!0=&0000|0000:p3%|
|00002bb0| 21 34 3d 26 31 30 31 30 | 31 30 30 30 3a 70 33 25 |!4=&1010|1000:p3%|
|00002bc0| 21 38 3d 26 32 30 32 30 | 32 30 30 30 3a 70 33 25 |!8=&2020|2000:p3%|
|00002bd0| 21 31 32 3d 26 33 30 33 | 30 33 30 30 30 0d 1a a4 |!12=&303|03000...|
|00002be0| 48 20 70 33 25 21 31 36 | 3d 26 30 30 30 30 34 30 |H p3%!16|=&000040|
|00002bf0| 30 30 3a 70 33 25 21 32 | 30 3d 26 31 30 31 30 35 |00:p3%!2|0=&10105|
|00002c00| 30 30 30 3a 70 33 25 21 | 32 34 3d 26 32 30 32 30 |000:p3%!|24=&2020|
|00002c10| 36 30 30 30 3a 70 33 25 | 21 32 38 3d 26 33 30 33 |6000:p3%|!28=&303|
|00002c20| 30 37 30 30 30 0d 1a b3 | 48 20 70 33 25 21 33 32 |07000...|H p3%!32|
|00002c30| 3d 26 34 30 30 30 30 30 | 30 30 3a 70 33 25 21 33 |=&400000|00:p3%!3|
|00002c40| 36 3d 26 35 30 31 30 31 | 30 30 30 3a 70 33 25 21 |6=&50101|000:p3%!|
|00002c50| 34 30 3d 26 36 30 32 30 | 32 30 30 30 3a 70 33 25 |40=&6020|2000:p3%|
|00002c60| 21 34 34 3d 26 37 30 33 | 30 33 30 30 30 0d 1a c2 |!44=&703|03000...|
|00002c70| 48 20 70 33 25 21 34 38 | 3d 26 34 30 30 30 34 30 |H p3%!48|=&400040|
|00002c80| 30 30 3a 70 33 25 21 35 | 32 3d 26 35 30 31 30 35 |00:p3%!5|2=&50105|
|00002c90| 30 30 30 3a 70 33 25 21 | 35 36 3d 26 36 30 32 30 |000:p3%!|56=&6020|
|00002ca0| 36 30 30 30 3a 70 33 25 | 21 36 30 3d 26 37 30 33 |6000:p3%|!60=&703|
|00002cb0| 30 37 30 30 30 0d 1a d1 | 06 20 e1 0d 1d fb 10 20 |07000...|. ..... |
|00002cc0| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 1e 0a 10 20 |.-------|---.... |
|00002cd0| dd f2 72 65 61 64 66 6f | 6e 74 73 0d 1e 0d 11 20 |..readfo|nts.... |
|00002ce0| 66 6f 75 6e 64 5f 66 6f | 6e 74 3d b9 0d 1e 0e 08 |found_fo|nt=.....|
|00002cf0| 20 ea 20 85 0d 1e 0f 1d | 20 ee 20 85 20 ea 3a f7 | . .....| . . .:.|
|00002d00| 20 85 3a 66 6f 75 6e 64 | 5f 66 6f 6e 74 3d a3 3a | .:found|_font=.:|
|00002d10| e1 0d 1e 19 3f 20 c8 99 | 22 46 6f 6e 74 5f 46 69 |....? ..|"Font_Fi|
|00002d20| 6e 64 46 6f 6e 74 22 2c | 2c 22 54 72 69 6e 69 74 |ndFont",|,"Trinit|
|00002d30| 79 2e 42 6f 6c 64 22 2c | 28 31 36 2a 32 34 29 2c |y.Bold",|(16*24),|
|00002d40| 28 31 36 2a 32 34 29 20 | b8 20 66 6f 6e 74 32 25 |(16*24) |. font2%|
|00002d50| 0d 1e 1e 08 20 f7 20 85 | 0d 1f ae 06 20 e1 0d 1f |.... . .|.... ...|
|00002d60| bd 11 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |.. .----|-------.|
|00002d70| 1f cc 0c 20 dd f2 73 65 | 74 75 70 0d 1f db 3d 20 |... ..se|tup...= |
|00002d80| de 20 61 72 65 61 25 20 | 32 35 36 2c 73 70 65 6c |. area% |256,spel|
|00002d90| 6c 5f 61 72 65 61 20 32 | 30 2a 31 30 32 34 2c 6d |l_area 2|0*1024,m|
|00002da0| 69 6b 20 35 35 36 2c 48 | 69 6e 74 73 24 28 33 29 |ik 556,H|ints$(3)|
|00002db0| 3a 68 6d 61 78 25 3d 30 | 0d 1f ea 3d 20 c8 99 22 |:hmax%=0|...= .."|
|00002dc0| 4f 53 5f 52 65 61 64 56 | 61 72 56 61 6c 22 2c 22 |OS_ReadV|arVal","|
|00002dd0| 21 42 6f 74 74 6c 65 24 | 44 69 72 22 2c 61 72 65 |!Bottle$|Dir",are|
|00002de0| 61 25 2c 32 35 36 2c 30 | 2c 33 20 b8 20 2c 2c 6c |a%,256,0|,3 . ,,l|
|00002df0| 65 6e 67 74 68 0d 1f f9 | 21 20 61 72 65 61 25 3f |ength...|! area%?|
|00002e00| 6c 65 6e 67 74 68 3d 31 | 33 3a 70 61 74 68 24 3d |length=1|3:path$=|
|00002e10| 24 61 72 65 61 25 0d 20 | 08 1a 20 59 24 3d 70 61 |$area%. |.. Y$=pa|
|00002e20| 74 68 24 2b 22 2e 54 65 | 6d 70 6c 61 74 65 73 22 |th$+".Te|mplates"|
|00002e30| 0d 20 17 2b 20 de 20 70 | 30 25 20 38 2c 70 31 25 |. .+ . p|0% 8,p1%|
|00002e40| 20 31 36 2c 70 32 25 20 | 36 34 2c 70 33 25 20 36 | 16,p2% |64,p3% 6|
|00002e50| 34 3a 73 6d 6f 64 65 25 | 3d 2d 31 0d 20 26 2d 20 |4:smode%|=-1. &- |
|00002e60| de 20 70 61 6c 62 75 66 | 66 25 20 32 30 34 38 2c |. palbuf|f% 2048,|
|00002e70| 74 72 61 6e 73 32 25 20 | 32 30 34 38 2c 42 75 66 |trans2% |2048,Buf|
|00002e80| 66 65 72 25 20 31 32 38 | 0d 20 35 2e 20 de 20 74 |fer% 128|. 5. . t|
|00002e90| 72 61 6e 73 25 20 31 36 | 2c 72 65 63 74 25 20 31 |rans% 16|,rect% 1|
|00002ea0| 36 2c 70 6c 6f 74 61 74 | 25 20 38 2c 72 65 63 74 |6,plotat|% 8,rect|
|00002eb0| 69 6e 25 20 31 36 0d 20 | 44 34 20 de 20 62 6c 6f |in% 16. |D4 . blo|
|00002ec0| 63 6b 25 20 31 35 30 30 | 30 2c 6d 6d 65 6e 75 25 |ck% 1500|0,mmenu%|
|00002ed0| 20 35 30 30 2c 62 6c 6f | 63 6b 32 25 20 32 35 36 | 500,blo|ck2% 256|
|00002ee0| 2c 54 75 6d 62 6c 65 28 | 38 29 0d 20 53 32 20 de |,Tumble(|8). S2 .|
|00002ef0| 20 62 6c 6f 63 6b 32 25 | 20 32 35 36 2c 6d 65 6e | block2%| 256,men|
|00002f00| 75 25 20 35 30 30 2c 6d | 61 67 25 20 31 36 2c 64 |u% 500,m|ag% 16,d|
|00002f10| 69 72 73 65 61 72 63 68 | 20 39 32 34 0d 20 62 22 |irsearch| 924. b"|
|00002f20| 20 63 72 65 61 74 65 5f | 6d 65 6e 75 3d 30 3a 73 | create_|menu=0:s|
|00002f30| 6f 75 6e 64 5f 6c 65 76 | 65 6c 3d 2d 31 30 0d 20 |ound_lev|el=-10. |
|00002f40| 71 33 20 73 61 76 65 64 | 5f 6f 6b 3d b9 3a 68 69 |q3 saved|_ok=.:hi|
|00002f50| 6e 74 73 5f 67 69 76 65 | 6e 25 3d 30 3a 64 69 66 |nts_give|n%=0:dif|
|00002f60| 66 25 3d 31 3a 68 69 6e | 74 5f 6c 69 6d 69 74 3d |f%=1:hin|t_limit=|
|00002f70| 30 0d 20 80 23 20 4d 55 | 24 3d 22 22 3a 73 6b 69 |0. .# MU|$="":ski|
|00002f80| 70 5f 66 6c 61 67 3d a3 | 3a 6b 65 79 5f 74 69 6d |p_flag=.|:key_tim|
|00002f90| 65 25 3d 30 0d 20 8f 0b | 20 f7 20 8d 74 5e 60 0d |e%=0. ..| . .t^`.|
|00002fa0| 20 9e 1c 20 dc 20 31 35 | 2c 31 34 2c 31 33 2c 31 | .. . 15|,14,13,1|
|00002fb0| 32 2c 31 31 2c 31 30 2c | 36 2c 35 0d 20 ad 20 20 |2,11,10,|6,5. . |
|00002fc0| e3 20 46 3d 31 20 b8 20 | 38 3a f3 20 47 3a 54 75 |. F=1 . |8:. G:Tu|
|00002fd0| 6d 62 6c 65 28 46 29 3d | 47 3a ed 0d 20 bc 0e 20 |mble(F)=|G:.. .. |
|00002fe0| e3 20 46 3d 31 20 b8 20 | 38 0d 20 cb 2e 20 20 66 |. F=1 . |8. .. f|
|00002ff0| 31 3d b3 28 38 29 3a 66 | 32 3d b3 28 38 29 3a c8 |1=.(8):f|2=.(8):.|
|00003000| 94 20 54 75 6d 62 6c 65 | 28 66 31 29 2c 54 75 6d |. Tumble|(f1),Tum|
|00003010| 62 6c 65 28 66 32 29 0d | 20 da 06 20 ed 0d 20 e9 |ble(f2).| .. .. .|
|00003020| 30 20 70 6c 61 79 65 72 | 5f 73 63 6f 72 65 25 3d |0 player|_score%=|
|00003030| 30 3a 66 6c 69 70 3d 30 | 3a 62 6f 74 74 6c 65 73 |0:flip=0|:bottles|
|00003040| 25 3d 30 3a 74 71 5f 66 | 6c 61 67 3d a3 0d 20 f8 |%=0:tq_f|lag=.. .|
|00003050| 09 20 c8 a0 20 34 0d 21 | 07 2c 20 ff 20 28 22 52 |. .. 4.!|., . ("R|
|00003060| 4d 4c 6f 61 64 20 22 2b | 28 70 61 74 68 24 2b 22 |MLoad "+|(path$+"|
|00003070| 2e 53 6f 75 6e 64 73 2e | 53 6f 75 6e 64 46 78 22 |.Sounds.|SoundFx"|
|00003080| 29 29 0d 21 16 17 20 2a | 43 48 41 4e 4e 45 4c 56 |)).!.. *|CHANNELV|
|00003090| 4f 49 43 45 20 32 20 31 | 30 0d 21 25 12 20 73 6f |OICE 2 1|0.!%. so|
|000030a0| 75 6e 64 5f 70 69 74 63 | 68 3d 32 0d 21 34 2b 20 |und_pitc|h=2.!4+ |
|000030b0| ff 20 28 22 52 4d 4c 6f | 61 64 20 22 2b 28 70 61 |. ("RMLo|ad "+(pa|
|000030c0| 74 68 24 2b 22 2e 53 6f | 75 6e 64 73 2e 53 6f 75 |th$+".So|unds.Sou|
|000030d0| 6e 64 31 22 29 29 0d 21 | 43 17 20 2a 43 48 41 4e |nd1")).!|C. *CHAN|
|000030e0| 4e 45 4c 56 4f 49 43 45 | 20 33 20 31 31 0d 21 52 |NELVOICE| 3 11.!R|
|000030f0| 2b 20 ff 20 28 22 52 4d | 4c 6f 61 64 20 22 2b 28 |+ . ("RM|Load "+(|
|00003100| 70 61 74 68 24 2b 22 2e | 53 6f 75 6e 64 73 2e 53 |path$+".|Sounds.S|
|00003110| 6f 75 6e 64 33 22 29 29 | 0d 21 61 17 20 2a 43 48 |ound3"))|.!a. *CH|
|00003120| 41 4e 4e 45 4c 56 4f 49 | 43 45 20 34 20 31 32 0d |ANNELVOI|CE 4 12.|
|00003130| 21 70 06 20 e1 0d 21 7f | 10 20 f4 2d 2d 2d 2d 2d |!p. ..!.|. .-----|
|00003140| 2d 2d 2d 2d 2d 0d 21 8e | 0d 20 dd f2 73 65 74 75 |-----.!.|. ..setu|
|00003150| 70 32 0d 21 9d 12 20 de | 20 77 6f 72 64 73 24 28 |p2.!.. .| words$(|
|00003160| 32 35 35 29 0d 21 ac 1f | 20 de 20 64 73 6b 25 20 |255).!..| . dsk% |
|00003170| 31 32 30 2c 77 6f 72 64 | 73 6d 65 6e 75 25 20 36 |120,word|smenu% 6|
|00003180| 33 30 30 0d 21 bb 2e 20 | de 20 73 70 72 6e 61 6d |300.!.. |. sprnam|
|00003190| 65 25 20 31 33 2c 69 63 | 6f 6e 73 70 61 63 65 20 |e% 13,ic|onspace |
|000031a0| 33 35 2a 31 30 32 34 2c | 46 52 45 44 25 20 32 35 |35*1024,|FRED% 25|
|000031b0| 36 0d 21 ca 21 20 de 20 | 77 69 6e 5f 69 64 65 6e |6.!.! . |win_iden|
|000031c0| 25 20 31 31 2c 69 6e 25 | 20 31 32 2c 6f 75 25 20 |% 11,in%| 12,ou% |
|000031d0| 31 32 0d 21 d9 2a 20 de | 20 77 64 61 74 61 31 25 |12.!.* .| wdata1%|
|000031e0| 20 31 35 30 30 30 3a 77 | 64 31 65 6e 64 25 3d 77 | 15000:w|d1end%=w|
|000031f0| 64 61 74 61 31 25 2b 31 | 35 30 30 30 0d 21 e8 3e |data1%+1|5000.!.>|
|00003200| 20 69 6e 25 21 30 3d 31 | 32 3a 69 6e 25 21 34 3d | in%!0=1|2:in%!4=|
|00003210| 35 3a 69 6e 25 21 38 3d | 2d 31 3a c8 99 22 4f 53 |5:in%!8=|-1:.."OS|
|00003220| 5f 52 65 61 64 56 64 75 | 56 61 72 69 61 62 6c 65 |_ReadVdu|Variable|
|00003230| 73 22 2c 69 6e 25 2c 6f | 75 25 0d 21 f7 2a 20 74 |s",in%,o|u%.!.* t|
|00003240| 6f 70 5f 79 3d 28 6f 75 | 25 21 30 29 2b 31 3a 74 |op_y=(ou|%!0)+1:t|
|00003250| 6f 70 5f 79 3d 28 32 5e | 6f 75 25 21 34 29 2a 74 |op_y=(2^|ou%!4)*t|
|00003260| 6f 70 5f 79 0d 22 06 3e | 20 69 6e 25 21 30 3d 31 |op_y.".>| in%!0=1|
|00003270| 31 3a 69 6e 25 21 34 3d | 34 3a 69 6e 25 21 38 3d |1:in%!4=|4:in%!8=|
|00003280| 2d 31 3a c8 99 22 4f 53 | 5f 52 65 61 64 56 64 75 |-1:.."OS|_ReadVdu|
|00003290| 56 61 72 69 61 62 6c 65 | 73 22 2c 69 6e 25 2c 6f |Variable|s",in%,o|
|000032a0| 75 25 0d 22 15 2a 20 74 | 6f 70 5f 78 3d 28 6f 75 |u%.".* t|op_x=(ou|
|000032b0| 25 21 30 29 2b 31 3a 74 | 6f 70 5f 78 3d 28 32 5e |%!0)+1:t|op_x=(2^|
|000032c0| 6f 75 25 21 34 29 2a 74 | 6f 70 5f 78 0d 22 24 24 |ou%!4)*t|op_x."$$|
|000032d0| 20 6d 64 61 74 61 62 6c | 6f 63 6b 25 3d 93 3a 6d | mdatabl|ock%=.:m|
|000032e0| 64 61 74 61 62 6c 6f 63 | 6b 5f 65 6e 64 25 3d 93 |databloc|k_end%=.|
|000032f0| 0d 22 33 35 20 c8 99 22 | 4f 53 5f 53 70 72 69 74 |."35 .."|OS_Sprit|
|00003300| 65 4f 70 22 2c 32 36 35 | 2c 69 63 6f 6e 73 70 61 |eOp",265|,iconspa|
|00003310| 63 65 3a 21 69 63 6f 6e | 73 70 61 63 65 3d 33 35 |ce:!icon|space=35|
|00003320| 2a 31 30 32 34 0d 22 42 | 21 20 69 63 6f 6e 73 70 |*1024."B|! iconsp|
|00003330| 61 63 65 21 34 3d 30 3a | 69 63 6f 6e 73 70 61 63 |ace!4=0:|iconspac|
|00003340| 65 21 38 3d 31 36 0d 22 | 51 1a 20 24 62 6c 6f 63 |e!8=16."|Q. $bloc|
|00003350| 6b 25 3d 22 54 41 53 4b | 22 3a 77 64 24 3d 22 22 |k%="TASK|":wd$=""|
|00003360| 0d 22 60 30 20 de 20 41 | 78 28 31 35 29 2c 41 77 |."`0 . A|x(15),Aw|
|00003370| 6f 72 64 24 28 31 35 29 | 2c 41 63 6f 72 72 65 63 |ord$(15)|,Acorrec|
|00003380| 74 24 28 31 35 29 2c 41 | 6c 70 68 61 28 32 36 29 |t$(15),A|lpha(26)|
|00003390| 0d 22 6f 1a 20 e3 20 46 | 3d 31 20 b8 20 31 35 3a |."o. . F|=1 . 15:|
|000033a0| 41 78 28 46 29 3d 2d 31 | 3a ed 0d 22 7e 1c 20 e3 |Ax(F)=-1|:.."~. .|
|000033b0| 20 46 3d 31 20 b8 20 32 | 36 3a 41 6c 70 68 61 28 | F=1 . 2|6:Alpha(|
|000033c0| 46 29 3d 31 3a ed 0d 22 | 8d 3e 20 c8 99 22 57 69 |F)=1:.."|.> .."Wi|
|000033d0| 6d 70 5f 49 6e 69 74 69 | 61 6c 69 73 65 22 2c 32 |mp_Initi|alise",2|
|000033e0| 30 30 2c 21 62 6c 6f 63 | 6b 25 2c 22 42 6f 74 74 |00,!bloc|k%,"Bott|
|000033f0| 6c 65 22 20 b8 20 76 65 | 72 73 69 6f 6e 25 2c 74 |le" . ve|rsion%,t|
|00003400| 61 73 6b 25 0d 22 9c 0c | 20 71 75 69 74 25 3d a3 |ask%."..| quit%=.|
|00003410| 0d 22 ab 1e 20 c8 99 22 | 57 69 6d 70 5f 4f 70 65 |.".. .."|Wimp_Ope|
|00003420| 6e 54 65 6d 70 6c 61 74 | 65 22 2c 2c 59 24 0d 22 |nTemplat|e",,Y$."|
|00003430| ba 34 20 77 68 61 6e 64 | 6c 65 31 25 3d a4 54 65 |.4 whand|le1%=.Te|
|00003440| 6d 70 28 22 4d 61 69 6e | 22 29 3a 77 68 61 6e 64 |mp("Main|"):whand|
|00003450| 6c 65 32 25 3d a4 54 65 | 6d 70 28 22 49 6e 66 6f |le2%=.Te|mp("Info|
|00003460| 22 29 0d 22 c9 3d 20 77 | 68 61 6e 64 6c 65 39 25 |").".= w|handle9%|
|00003470| 3d a4 54 65 6d 70 28 22 | 77 61 72 6e 69 6e 67 22 |=.Temp("|warning"|
|00003480| 29 3a 77 68 61 6e 64 6c | 65 31 35 25 3d a4 54 65 |):whandl|e15%=.Te|
|00003490| 6d 70 28 22 63 6c 6f 73 | 65 64 6f 77 6e 22 29 0d |mp("clos|edown").|
|000034a0| 22 d8 2e 20 72 65 67 25 | 3d a4 54 65 6d 70 28 22 |".. reg%|=.Temp("|
|000034b0| 72 65 67 22 29 3a 65 72 | 72 62 6f 78 25 3d a4 54 |reg"):er|rbox%=.T|
|000034c0| 65 6d 70 28 22 65 72 72 | 62 6f 78 22 29 0d 22 e7 |emp("err|box").".|
|000034d0| 1b 20 c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 54 |. .."Wim|p_CloseT|
|000034e0| 65 6d 70 6c 61 74 65 22 | 0d 22 e8 19 20 59 31 24 |emplate"|.".. Y1$|
|000034f0| 3d 70 61 74 68 24 2b 22 | 2e 69 63 6f 6e 73 32 32 |=path$+"|.icons22|
|00003500| 22 0d 22 e9 48 20 c8 99 | 22 4f 53 5f 52 65 61 64 |".".H ..|"OS_Read|
|00003510| 4d 6f 64 65 56 61 72 69 | 61 62 6c 65 22 2c 2d 31 |ModeVari|able",-1|
|00003520| 2c 35 20 b8 20 2c 2c 79 | 6d 61 67 32 3a e7 20 79 |,5 . ,,y|mag2:. y|
|00003530| 6d 61 67 32 3e 31 20 59 | 31 24 3d 70 61 74 68 24 |mag2>1 Y|1$=path$|
|00003540| 2b 22 2e 69 63 6f 6e 73 | 22 0d 22 ea 48 20 c8 99 |+".icons|".".H ..|
|00003550| 22 4f 53 5f 52 65 61 64 | 4d 6f 64 65 56 61 72 69 |"OS_Read|ModeVari|
|00003560| 61 62 6c 65 22 2c 2d 31 | 2c 34 20 b8 20 2c 2c 78 |able",-1|,4 . ,,x|
|00003570| 6d 61 67 32 3a e7 20 78 | 6d 61 67 32 3e 31 20 59 |mag2:. x|mag2>1 Y|
|00003580| 31 24 3d 70 61 74 68 24 | 2b 22 2e 69 63 6f 6e 73 |1$=path$|+".icons|
|00003590| 22 0d 22 f6 26 20 c8 99 | 22 4f 53 5f 53 70 72 69 |".".& ..|"OS_Spri|
|000035a0| 74 65 4f 70 22 2c 32 36 | 36 2c 69 63 6f 6e 73 70 |teOp",26|6,iconsp|
|000035b0| 61 63 65 2c 59 31 24 0d | 23 05 0d 20 f2 70 61 6c |ace,Y1$.|#.. .pal|
|000035c0| 69 6e 69 74 0d 23 14 38 | 20 69 62 61 72 31 25 3d |init.#.8| ibar1%=|
|000035d0| a4 69 63 6f 6e 64 65 66 | 28 2d 31 2c 30 2c 30 2c |.icondef|(-1,0,0,|
|000035e0| 36 38 2c 36 38 2c 26 33 | 30 30 32 2c 22 21 42 6f |68,68,&3|002,"!Bo|
|000035f0| 74 74 6c 65 22 2c 30 2c | 30 2c 30 29 0d 23 23 0e |ttle",0,|0,0).##.|
|00003600| 20 64 75 6d 3d b3 28 2d | 91 29 0d 23 32 04 0d 23 | dum=.(-|.).#2..#|
|00003610| 41 3d 20 c8 99 22 4f 53 | 5f 52 65 61 64 56 61 72 |A= .."OS|_ReadVar|
|00003620| 56 61 6c 22 2c 22 42 6f | 74 74 6c 65 5f 54 61 69 |Val","Bo|ttle_Tai|
|00003630| 6c 22 2c 46 52 45 44 25 | 2c 32 35 36 2c 30 2c 33 |l",FRED%|,256,0,3|
|00003640| 20 b8 20 2c 2c 6c 65 6e | 67 74 68 0d 23 50 55 20 | . ,,len|gth.#PU |
|00003650| 46 52 45 44 25 3f 6c 65 | 6e 67 74 68 3d 31 33 3a |FRED%?le|ngth=13:|
|00003660| 63 6f 6d 64 24 3d 24 46 | 52 45 44 25 3a 62 65 72 |comd$=$F|RED%:ber|
|00003670| 74 25 3d ad 28 63 6f 6d | 64 24 2b 22 2e 21 52 75 |t%=.(com|d$+".!Ru|
|00003680| 6e 22 29 3a e7 20 62 65 | 72 74 25 3d 30 20 63 6f |n"):. be|rt%=0 co|
|00003690| 6d 64 24 3d 22 22 20 8b | 20 d9 23 62 65 72 74 25 |md$="" .| .#bert%|
|000036a0| 0d 23 5f 3e 20 c8 99 22 | 4f 53 5f 52 65 61 64 56 |.#_> .."|OS_ReadV|
|000036b0| 61 72 56 61 6c 22 2c 22 | 42 6f 74 74 6c 65 24 57 |arVal","|Bottle$W|
|000036c0| 6f 72 64 73 22 2c 61 72 | 65 61 25 2c 32 35 36 2c |ords",ar|ea%,256,|
|000036d0| 30 2c 33 20 b8 20 2c 2c | 6c 65 6e 67 74 68 0d 23 |0,3 . ,,|length.#|
|000036e0| 6e 26 20 61 72 65 61 25 | 3f 6c 65 6e 67 74 68 3d |n& area%|?length=|
|000036f0| 31 33 3a 77 6f 72 64 5f | 70 61 74 68 24 3d 24 61 |13:word_|path$=$a|
|00003700| 72 65 61 25 0d 23 6f 33 | 20 e7 20 77 6f 72 64 5f |rea%.#o3| . word_|
|00003710| 70 61 74 68 24 3d 22 55 | 4e 53 45 54 22 20 77 6f |path$="U|NSET" wo|
|00003720| 72 64 5f 70 61 74 68 24 | 3d 70 61 74 68 24 2b 22 |rd_path$|=path$+"|
|00003730| 2e 77 6f 72 64 73 22 0d | 23 75 1a 20 64 65 66 61 |.words".|#u. defa|
|00003740| 75 6c 74 5f 70 24 3d 77 | 6f 72 64 5f 70 61 74 68 |ult_p$=w|ord_path|
|00003750| 24 0d 23 7d 06 20 e1 0d | 23 8c 10 20 f4 2d 2d 2d |$.#}. ..|#.. .---|
|00003760| 2d 2d 2d 2d 2d 2d 2d 0d | 23 9b 0d 20 dd f2 73 65 |-------.|#.. ..se|
|00003770| 74 75 70 33 0d 23 aa 2e | 20 59 37 24 3d 70 61 74 |tup3.#..| Y7$=pat|
|00003780| 68 24 2b 22 2e 4d 65 73 | 73 61 67 65 73 22 3a de |h$+".Mes|sages":.|
|00003790| 20 6d 65 73 73 61 67 65 | 5f 61 72 65 61 20 33 30 | message|_area 30|
|000037a0| 30 30 0d 23 b9 28 20 de | 20 6d 65 73 73 61 67 65 |00.#.( .| message|
|000037b0| 5f 70 74 72 20 31 35 2c | 73 71 75 25 20 31 36 2c |_ptr 15,|squ% 16,|
|000037c0| 4d 62 75 66 66 25 20 32 | 35 36 0d 23 c8 3b 20 c8 |Mbuff% 2|56.#.; .|
|000037d0| 99 22 4d 65 73 73 61 67 | 65 54 72 61 6e 73 5f 4f |."Messag|eTrans_O|
|000037e0| 70 65 6e 46 69 6c 65 22 | 2c 6d 65 73 73 61 67 65 |penFile"|,message|
|000037f0| 5f 70 74 72 2c 59 37 24 | 2c 6d 65 73 73 61 67 65 |_ptr,Y7$|,message|
|00003800| 5f 61 72 65 61 0d 23 cd | 29 20 f2 72 6d 28 22 76 |_area.#.|) .rm("v|
|00003810| 65 72 6e 22 29 3a f2 69 | 73 65 74 28 37 2c 74 65 |ern"):.i|set(7,te|
|00003820| 78 74 24 2c 77 68 61 6e | 64 6c 65 32 25 29 0d 23 |xt$,whan|dle2%).#|
|00003830| d7 06 20 e1 0d 23 e6 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. ..#..| .------|
|00003840| 2d 2d 2d 2d 0d 23 f5 0e | 20 dd f2 72 6d 28 72 6d |----.#..| ..rm(rm|
|00003850| 24 29 0d 24 04 40 20 c8 | 99 22 4d 65 73 73 61 67 |$).$.@ .|."Messag|
|00003860| 65 54 72 61 6e 73 5f 4c | 6f 6f 6b 75 70 22 2c 6d |eTrans_L|ookup",m|
|00003870| 65 73 73 61 67 65 5f 70 | 74 72 2c 72 6d 24 2c 30 |essage_p|tr,rm$,0|
|00003880| 20 b8 20 2c 2c 6d 5f 70 | 74 72 25 2c 6d 5f 6c 65 | . ,,m_p|tr%,m_le|
|00003890| 6e 25 0d 24 13 3d 20 74 | 65 78 74 24 3d 22 22 3a |n%.$.= t|ext$="":|
|000038a0| e3 20 6c 6f 6f 70 31 34 | 3d 30 20 b8 20 6d 5f 6c |. loop14|=0 . m_l|
|000038b0| 65 6e 25 2d 31 3a 74 65 | 78 74 24 2b 3d bd 28 6d |en%-1:te|xt$+=.(m|
|000038c0| 5f 70 74 72 25 3f 6c 6f | 6f 70 31 34 29 3a ed 0d |_ptr%?lo|op14):..|
|000038d0| 24 22 06 20 e1 0d 24 31 | 10 20 f4 2d 2d 2d 2d 2d |$". ..$1|. .-----|
|000038e0| 2d 2d 2d 2d 2d 0d 24 40 | 0d 20 dd a4 6d 73 28 41 |-----.$@|. ..ms(A|
|000038f0| 24 29 0d 24 4f 09 20 ea | 20 4c 25 0d 24 5e 43 20 |$).$O. .| L%.$^C |
|00003900| c8 99 22 4d 65 73 73 61 | 67 65 54 72 61 6e 73 5f |.."Messa|geTrans_|
|00003910| 4c 6f 6f 6b 75 70 22 2c | 6d 65 73 73 61 67 65 5f |Lookup",|message_|
|00003920| 70 74 72 2c 41 24 2c 4d | 62 75 66 66 25 2c 32 35 |ptr,A$,M|buff%,25|
|00003930| 36 2c 22 22 2c 22 22 20 | b8 2c 2c 2c 4c 25 0d 24 |6,"","" |.,,,L%.$|
|00003940| 6d 1a 20 4d 62 75 66 66 | 25 3f 4c 25 3d 31 33 3a |m. Mbuff|%?L%=13:|
|00003950| 3d 24 4d 62 75 66 66 25 | 0d 25 d5 10 20 f4 2d 2d |=$Mbuff%|.%.. .--|
|00003960| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 25 e4 13 20 dd f2 73 |--------|.%.. ..s|
|00003970| 61 76 65 5f 64 65 66 61 | 75 6c 74 0d 25 f3 08 20 |ave_defa|ult.%.. |
|00003980| ea 20 85 0d 26 02 1d 20 | ee 20 85 20 ea 3a f7 20 |. ..&.. |. . .:. |
|00003990| 85 3a f2 73 61 76 65 5f | 65 72 72 6f 72 31 3a e1 |.:.save_|error1:.|
|000039a0| 0d 26 11 50 20 c8 99 22 | 4f 53 5f 46 69 6c 65 22 |.&.P .."|OS_File"|
|000039b0| 2c 31 30 2c 28 70 61 74 | 68 24 2b 22 2e 64 65 66 |,10,(pat|h$+".def|
|000039c0| 61 75 6c 74 22 29 2c 26 | 46 46 46 2c 2c 73 70 65 |ault"),&|FFF,,spe|
|000039d0| 6c 6c 5f 61 72 65 61 2c | 28 73 70 65 6c 6c 5f 61 |ll_area,|(spell_a|
|000039e0| 72 65 61 2b 73 70 65 6c | 6c 5f 6c 65 6e 2b 31 29 |rea+spel|l_len+1)|
|000039f0| 0d 26 20 08 20 f7 20 85 | 0d 26 2f 1c 20 c8 99 22 |.& . . .|.&/. .."|
|00003a00| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|00003a10| 2c 2c 2d 31 0d 26 3e 2b | 20 c8 99 22 57 69 6d 70 |,,-1.&>+| .."Wimp|
|00003a20| 5f 53 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_SetCare|tPositio|
|00003a30| 6e 22 2c 77 68 61 6e 64 | 6c 65 31 25 2c 2d 31 0d |n",whand|le1%,-1.|
|00003a40| 26 4d 06 20 e1 0d 26 5c | 10 20 f4 2d 2d 2d 2d 2d |&M. ..&\|. .-----|
|00003a50| 2d 2d 2d 2d 2d 0d 26 6b | 12 20 dd f2 73 61 76 65 |-----.&k|. ..save|
|00003a60| 5f 65 72 72 6f 72 31 0d | 26 7a 1f 20 f2 72 6d 28 |_error1.|&z. .rm(|
|00003a70| 22 45 52 52 38 22 29 3a | f2 65 72 72 62 6f 78 28 |"ERR8"):|.errbox(|
|00003a80| 74 65 78 74 24 29 0d 26 | 89 06 20 e1 0d 26 98 10 |text$).&|.. ..&..|
|00003a90| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 26 a7 0f | .------|----.&..|
|00003aa0| 20 dd f2 63 61 6c 6c 73 | 61 76 65 0d 26 b6 1e 20 | ..calls|ave.&.. |
|00003ab0| f2 69 72 65 61 64 28 30 | 2c 77 68 61 6e 64 6c 65 |.iread(0|,whandle|
|00003ac0| 38 25 29 3a 4c 24 3d 61 | 24 0d 26 c5 24 20 c8 99 |8%):L$=a|$.&.$ ..|
|00003ad0| 22 57 69 6d 70 5f 47 65 | 74 50 6f 69 6e 74 65 72 |"Wimp_Ge|tPointer|
|00003ae0| 49 6e 66 6f 22 2c 2c 62 | 6c 6f 63 6b 25 0d 26 d4 |Info",,b|lock%.&.|
|00003af0| 3f 20 62 6c 6f 63 6b 25 | 21 32 30 3d 62 6c 6f 63 |? block%|!20=bloc|
|00003b00| 6b 25 21 31 32 3a 62 6c | 6f 63 6b 25 21 32 34 3d |k%!12:bl|ock%!24=|
|00003b10| 62 6c 6f 63 6b 25 21 31 | 36 3a 62 6c 6f 63 6b 25 |block%!1|6:block%|
|00003b20| 21 32 38 3d 62 6c 6f 63 | 6b 25 21 30 0d 26 e3 31 |!28=bloc|k%!0.&.1|
|00003b30| 20 62 6c 6f 63 6b 25 21 | 33 32 3d 62 6c 6f 63 6b | block%!|32=block|
|00003b40| 25 21 34 3a 62 6c 6f 63 | 6b 25 21 33 36 3d 31 30 |%!4:bloc|k%!36=10|
|00003b50| 30 3a 62 6c 6f 63 6b 25 | 21 30 3d 36 34 0d 26 f2 |0:block%|!0=64.&.|
|00003b60| 2b 20 62 6c 6f 63 6b 25 | 21 31 32 3d 30 3a 62 6c |+ block%|!12=0:bl|
|00003b70| 6f 63 6b 25 21 31 36 3d | 31 3a 62 6c 6f 63 6b 25 |ock%!16=|1:block%|
|00003b80| 21 34 30 3d 26 46 46 46 | 0d 27 01 22 20 24 28 62 |!40=&FFF|.'." $(b|
|00003b90| 6c 6f 63 6b 25 2b 34 34 | 29 3d a4 67 65 74 6c 65 |lock%+44|)=.getle|
|00003ba0| 61 66 6e 61 6d 65 28 4c | 24 29 0d 27 10 37 20 c8 |afname(L|$).'.7 .|
|00003bb0| 99 22 57 69 6d 70 5f 53 | 65 6e 64 4d 65 73 73 61 |."Wimp_S|endMessa|
|00003bc0| 67 65 22 2c 31 37 2c 62 | 6c 6f 63 6b 25 2c 62 6c |ge",17,b|lock%,bl|
|00003bd0| 6f 63 6b 25 21 32 30 2c | 62 6c 6f 63 6b 25 21 32 |ock%!20,|block%!2|
|00003be0| 34 0d 27 1f 06 20 e1 0d | 27 2e 10 20 f4 2d 2d 2d |4.'.. ..|'.. .---|
|00003bf0| 2d 2d 2d 2d 2d 2d 2d 0d | 27 3d 19 20 dd a4 67 65 |-------.|'=. ..ge|
|00003c00| 74 6c 65 61 66 6e 61 6d | 65 28 6e 61 6d 65 24 29 |tleafnam|e(name$)|
|00003c10| 0d 27 4c 13 20 c8 95 20 | a7 6e 61 6d 65 24 2c 22 |.'L. .. |.name$,"|
|00003c20| 2e 22 29 0d 27 5b 20 20 | 6e 61 6d 65 24 3d c1 6e |.").'[ |name$=.n|
|00003c30| 61 6d 65 24 2c a7 6e 61 | 6d 65 24 2c 22 2e 22 29 |ame$,.na|me$,".")|
|00003c40| 2b 31 29 0d 27 6a 06 20 | ce 0d 27 79 0e 20 3d 6e |+1).'j. |..'y. =n|
|00003c50| 61 6d 65 24 2b bd 30 0d | 27 88 10 20 f4 2d 2d 2d |ame$+.0.|'.. .---|
|00003c60| 2d 2d 2d 2d 2d 2d 2d 0d | 27 97 12 20 dd f2 64 72 |-------.|'.. ..dr|
|00003c70| 61 67 6f 75 74 6c 69 6e | 65 0d 27 a6 36 20 21 62 |agoutlin|e.'.6 !b|
|00003c80| 6c 6f 63 6b 25 3d 77 68 | 61 6e 64 6c 65 38 25 3a |lock%=wh|andle8%:|
|00003c90| c8 99 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |.."Wimp_|GetWindo|
|00003ca0| 77 53 74 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 0d |wState",|,block%.|
|00003cb0| 27 b5 33 20 6f 78 25 3d | 62 6c 6f 63 6b 25 21 34 |'.3 ox%=|block%!4|
|00003cc0| 2d 62 6c 6f 63 6b 25 21 | 32 30 3a 6f 79 25 3d 62 |-block%!|20:oy%=b|
|00003cd0| 6c 6f 63 6b 25 21 31 36 | 2d 62 6c 6f 63 6b 25 21 |lock%!16|-block%!|
|00003ce0| 32 30 0d 27 c4 2d 20 62 | 6c 6f 63 6b 25 21 34 3d |20.'.- b|lock%!4=|
|00003cf0| 32 3a c8 99 22 57 69 6d | 70 5f 47 65 74 49 63 6f |2:.."Wim|p_GetIco|
|00003d00| 6e 53 74 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 0d |nState",|,block%.|
|00003d10| 27 d3 37 20 21 62 6c 6f | 63 6b 25 3d 77 68 61 6e |'.7 !blo|ck%=whan|
|00003d20| 64 6c 65 38 25 3a 62 6c | 6f 63 6b 25 21 34 3d 35 |dle8%:bl|ock%!4=5|
|00003d30| 3a 62 6c 6f 63 6b 25 21 | 38 3d 6f 78 25 2b 62 6c |:block%!|8=ox%+bl|
|00003d40| 6f 63 6b 25 21 38 0d 27 | e2 34 20 62 6c 6f 63 6b |ock%!8.'|.4 block|
|00003d50| 25 21 31 32 3d 6f 79 25 | 2b 62 6c 6f 63 6b 25 21 |%!12=oy%|+block%!|
|00003d60| 31 32 3a 62 6c 6f 63 6b | 25 21 31 36 3d 6f 78 25 |12:block|%!16=ox%|
|00003d70| 2b 62 6c 6f 63 6b 25 21 | 31 36 0d 27 f1 34 20 62 |+block%!|16.'.4 b|
|00003d80| 6c 6f 63 6b 25 21 32 30 | 3d 6f 79 25 2b 62 6c 6f |lock%!20|=oy%+blo|
|00003d90| 63 6b 25 21 32 30 3a 62 | 6c 6f 63 6b 25 21 32 34 |ck%!20:b|lock%!24|
|00003da0| 3d 30 3a 62 6c 6f 63 6b | 25 21 32 38 3d 30 0d 28 |=0:block|%!28=0.(|
|00003db0| 00 2c 20 62 6c 6f 63 6b | 25 21 33 32 3d 26 37 46 |., block|%!32=&7F|
|00003dc0| 46 46 46 46 46 46 3a 62 | 6c 6f 63 6b 25 21 33 36 |FFFFFF:b|lock%!36|
|00003dd0| 3d 26 37 46 46 46 46 46 | 46 46 0d 28 0f 1d 20 c8 |=&7FFFFF|FF.(.. .|
|00003de0| 99 22 57 69 6d 70 5f 44 | 72 61 67 42 6f 78 22 2c |."Wimp_D|ragBox",|
|00003df0| 2c 62 6c 6f 63 6b 25 0d | 28 1e 06 20 e1 0d 28 2d |,block%.|(.. ..(-|
|00003e00| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 28 3c |. .-----|-----.(<|
|00003e10| 0c 20 dd f2 64 65 6c 61 | 79 0d 28 4b 1b 20 e3 20 |. ..dela|y.(K. . |
|00003e20| 74 69 6d 65 5f 6c 6f 6f | 70 3d 31 20 b8 20 34 30 |time_loo|p=1 . 40|
|00003e30| 30 30 3a ed 0d 28 5a 06 | 20 e1 0d 28 69 10 20 f4 |00:..(Z.| ..(i. .|
|00003e40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 28 78 0d 20 dd |--------|--.(x. .|
|00003e50| f2 63 61 72 64 5f 78 0d | 28 87 24 20 c8 99 22 57 |.card_x.|(.$ .."W|
|00003e60| 69 6d 70 5f 50 6f 6c 6c | 22 2c 2c 62 6c 6f 63 6b |imp_Poll|",,block|
|00003e70| 25 20 b8 20 72 65 61 73 | 6f 6e 25 0d 28 96 11 20 |% . reas|on%.(.. |
|00003e80| c8 8e 20 72 65 61 73 6f | 6e 25 20 ca 0d 28 a5 12 |.. reaso|n% ..(..|
|00003e90| 20 20 c9 20 31 20 3a f2 | 72 65 64 72 61 77 0d 28 | . 1 :.|redraw.(|
|00003ea0| b4 26 20 20 c9 20 32 20 | 3a c8 99 22 57 69 6d 70 |.& . 2 |:.."Wimp|
|00003eb0| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|00003ec0| 6f 63 6b 25 0d 28 c3 06 | 20 cb 0d 28 d2 06 20 e1 |ock%.(..| ..(.. .|
|00003ed0| 0d 28 e1 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.(.. .--|--------|
|00003ee0| 0d 28 f0 1d 20 dd f2 61 | 6c 65 72 74 28 6d 65 24 |.(.. ..a|lert(me$|
|00003ef0| 2c 62 75 74 31 24 2c 62 | 75 74 32 24 29 0d 28 ff |,but1$,b|ut2$).(.|
|00003f00| 1b 20 f2 69 73 65 74 28 | 32 2c 6d 65 24 2c 77 68 |. .iset(|2,me$,wh|
|00003f10| 61 6e 64 6c 65 39 25 29 | 0d 29 0e 36 20 f2 69 73 |andle9%)|.).6 .is|
|00003f20| 65 74 28 36 2c 62 75 74 | 31 24 2c 77 68 61 6e 64 |et(6,but|1$,whand|
|00003f30| 6c 65 39 25 29 3a f2 69 | 73 65 74 28 37 2c 62 75 |le9%):.i|set(7,bu|
|00003f40| 74 32 24 2c 77 68 61 6e | 64 6c 65 39 25 29 0d 29 |t2$,whan|dle9%).)|
|00003f50| 1d 10 20 61 6c 65 72 74 | 3d 2d 31 3a ef 37 0d 29 |.. alert|=-1:.7.)|
|00003f60| 2c 36 20 62 6c 6f 63 6b | 25 21 30 3d 77 68 61 6e |,6 block|%!0=whan|
|00003f70| 64 6c 65 39 25 3a c8 99 | 22 57 69 6d 70 5f 47 65 |dle9%:..|"Wimp_Ge|
|00003f80| 74 57 69 6e 64 6f 77 49 | 6e 66 6f 22 2c 2c 62 6c |tWindowI|nfo",,bl|
|00003f90| 6f 63 6b 25 0d 29 3b 4a | 20 78 31 3d 62 6c 6f 63 |ock%.);J| x1=bloc|
|00003fa0| 6b 25 21 34 3a 79 31 3d | 62 6c 6f 63 6b 25 21 38 |k%!4:y1=|block%!8|
|00003fb0| 3a 77 69 64 3d 62 6c 6f | 63 6b 25 21 31 32 2d 62 |:wid=blo|ck%!12-b|
|00003fc0| 6c 6f 63 6b 25 21 34 3a | 68 67 74 3d 62 6c 6f 63 |lock%!4:|hgt=bloc|
|00003fd0| 6b 25 21 31 36 2d 62 6c | 6f 63 6b 25 21 38 0d 29 |k%!16-bl|ock%!8.)|
|00003fe0| 4a 20 20 c8 99 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |J .."Wi|mp_OpenW|
|00003ff0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 29 |indow",,|block%.)|
|00004000| 59 3f 20 c8 97 20 c8 93 | 20 78 31 2c 79 31 2c 77 |Y? .. ..| x1,y1,w|
|00004010| 69 64 2c 68 67 74 3a c8 | 99 22 57 69 6d 70 5f 53 |id,hgt:.|."Wimp_S|
|00004020| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00004030| 2c 77 68 61 6e 64 6c 65 | 39 25 2c 2d 31 0d 29 68 |,whandle|9%,-1.)h|
|00004040| 06 20 f5 0d 29 77 26 20 | 20 c8 99 20 22 57 69 6d |. ..)w& | .. "Wim|
|00004050| 70 5f 50 6f 6c 6c 22 2c | 2c 62 6c 6f 63 6b 25 20 |p_Poll",|,block% |
|00004060| b8 20 72 65 61 73 6f 6e | 25 0d 29 86 12 20 20 c8 |. reason|%.).. .|
|00004070| 8e 20 72 65 61 73 6f 6e | 25 20 ca 0d 29 95 13 20 |. reason|% ..).. |
|00004080| 20 20 c9 20 31 20 3a f2 | 72 65 64 72 61 77 0d 29 | . 1 :.|redraw.)|
|00004090| a4 28 20 20 20 c9 20 32 | 20 3a c8 99 20 22 57 69 |.( . 2| :.. "Wi|
|000040a0| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|000040b0| 62 6c 6f 63 6b 25 0d 29 | b3 0c 20 20 20 c9 20 36 |block%.)|.. . 6|
|000040c0| 20 3a 0d 29 c2 1d 20 20 | 20 20 e7 20 62 6c 6f 63 | :.).. | . bloc|
|000040d0| 6b 25 21 31 36 3d 36 20 | 61 6c 65 72 74 3d 32 0d |k%!16=6 |alert=2.|
|000040e0| 29 d1 1d 20 20 20 20 e7 | 20 62 6c 6f 63 6b 25 21 |).. .| block%!|
|000040f0| 31 36 3d 37 20 61 6c 65 | 72 74 3d 30 0d 29 e0 22 |16=7 ale|rt=0.)."|
|00004100| 20 20 20 c9 20 38 20 3a | e7 20 62 6c 6f 63 6b 25 | . 8 :|. block%|
|00004110| 21 32 34 3d 31 33 20 61 | 6c 65 72 74 3d 32 0d 29 |!24=13 a|lert=2.)|
|00004120| ef 07 20 20 cb 0d 29 fe | 10 20 fd 20 61 6c 65 72 |.. ..).|. . aler|
|00004130| 74 3c 3e 2d 31 0d 2a 0d | 1f 20 e7 20 61 6c 65 72 |t<>-1.*.|. . aler|
|00004140| 74 3d 32 20 f2 7a 32 28 | 34 2c 77 68 61 6e 64 6c |t=2 .z2(|4,whandl|
|00004150| 65 39 25 29 0d 2a 1c 57 | 20 e7 20 61 6c 65 72 74 |e9%).*.W| . alert|
|00004160| 3d 30 20 f2 69 73 65 74 | 28 35 2c 22 72 61 69 73 |=0 .iset|(5,"rais|
|00004170| 65 31 22 2c 77 68 61 6e | 64 6c 65 39 25 29 3a f2 |e1",whan|dle9%):.|
|00004180| 64 65 6c 61 79 3a f2 6d | 69 6e 69 5f 70 6f 6c 6c |delay:.m|ini_poll|
|00004190| 3a f2 69 73 65 74 28 35 | 2c 22 72 61 69 73 65 22 |:.iset(5|,"raise"|
|000041a0| 2c 77 68 61 6e 64 6c 65 | 39 25 29 0d 2a 2b 1f 20 |,whandle|9%).*+. |
|000041b0| f2 72 65 73 74 6f 72 65 | 66 75 6c 6c 6d 6f 75 73 |.restore|fullmous|
|000041c0| 65 72 65 63 74 61 6e 67 | 6c 65 0d 2a 3a 34 20 62 |erectang|le.*:4 b|
|000041d0| 6c 6f 63 6b 25 21 30 3d | 77 68 61 6e 64 6c 65 39 |lock%!0=|whandle9|
|000041e0| 25 3a c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |%:.."Wim|p_CloseW|
|000041f0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 2a |indow",,|block%.*|
|00004200| 49 2b 20 c8 99 22 57 69 | 6d 70 5f 53 65 74 43 61 |I+ .."Wi|mp_SetCa|
|00004210| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 77 68 61 |retPosit|ion",wha|
|00004220| 6e 64 6c 65 31 25 2c 2d | 31 0d 2a 58 06 20 e1 0d |ndle1%,-|1.*X. ..|
|00004230| 2a 67 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |*g. .---|-------.|
|00004240| 2a 76 12 20 dd f2 61 6c | 65 72 74 32 28 6d 65 24 |*v. ..al|ert2(me$|
|00004250| 29 0d 2a 85 28 20 f2 69 | 73 65 74 28 32 2c 6d 65 |).*.( .i|set(2,me|
|00004260| 24 2c 77 68 61 6e 64 6c | 65 31 35 25 29 3a 61 6c |$,whandl|e15%):al|
|00004270| 65 72 74 3d 2d 31 3a ef | 37 0d 2a 94 37 20 62 6c |ert=-1:.|7.*.7 bl|
|00004280| 6f 63 6b 25 21 30 3d 77 | 68 61 6e 64 6c 65 31 35 |ock%!0=w|handle15|
|00004290| 25 3a c8 99 22 57 69 6d | 70 5f 47 65 74 57 69 6e |%:.."Wim|p_GetWin|
|000042a0| 64 6f 77 49 6e 66 6f 22 | 2c 2c 62 6c 6f 63 6b 25 |dowInfo"|,,block%|
|000042b0| 0d 2a a3 4a 20 78 31 3d | 62 6c 6f 63 6b 25 21 34 |.*.J x1=|block%!4|
|000042c0| 3a 79 31 3d 62 6c 6f 63 | 6b 25 21 38 3a 77 69 64 |:y1=bloc|k%!8:wid|
|000042d0| 3d 62 6c 6f 63 6b 25 21 | 31 32 2d 62 6c 6f 63 6b |=block%!|12-block|
|000042e0| 25 21 34 3a 68 67 74 3d | 62 6c 6f 63 6b 25 21 31 |%!4:hgt=|block%!1|
|000042f0| 36 2d 62 6c 6f 63 6b 25 | 21 38 0d 2a b2 34 20 c8 |6-block%|!8.*.4 .|
|00004300| 99 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f |."Wimp_O|penWindo|
|00004310| 77 22 2c 2c 62 6c 6f 63 | 6b 25 3a c8 97 20 c8 93 |w",,bloc|k%:.. ..|
|00004320| 20 78 31 2c 79 31 2c 77 | 69 64 2c 68 67 74 0d 2a | x1,y1,w|id,hgt.*|
|00004330| c1 06 20 f5 0d 2a d0 26 | 20 20 c8 99 20 22 57 69 |.. ..*.&| .. "Wi|
|00004340| 6d 70 5f 50 6f 6c 6c 22 | 2c 2c 62 6c 6f 63 6b 25 |mp_Poll"|,,block%|
|00004350| 20 b8 20 72 65 61 73 6f | 6e 25 0d 2a df 13 20 20 | . reaso|n%.*.. |
|00004360| 20 c8 8e 20 72 65 61 73 | 6f 6e 25 20 ca 0d 2a ee | .. reas|on% ..*.|
|00004370| 14 20 20 20 20 c9 20 31 | 20 3a f2 72 65 64 72 61 |. . 1| :.redra|
|00004380| 77 0d 2a fd 29 20 20 20 | 20 c9 20 32 20 3a c8 99 |w.*.) | . 2 :..|
|00004390| 20 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f | "Wimp_O|penWindo|
|000043a0| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 2b 0c 0c 20 20 |w",,bloc|k%.+.. |
|000043b0| 20 20 c9 20 36 3a 0d 2b | 1b 1e 20 20 20 20 20 e7 | . 6:.+|.. .|
|000043c0| 20 62 6c 6f 63 6b 25 21 | 31 36 3d 36 20 61 6c 65 | block%!|16=6 ale|
|000043d0| 72 74 3d 32 0d 2b 2a 1e | 20 20 20 20 20 e7 20 62 |rt=2.+*.| . b|
|000043e0| 6c 6f 63 6b 25 21 31 36 | 3d 37 20 61 6c 65 72 74 |lock%!16|=7 alert|
|000043f0| 3d 30 0d 2b 39 1e 20 20 | 20 20 20 e7 20 62 6c 6f |=0.+9. | . blo|
|00004400| 63 6b 25 21 31 36 3d 39 | 20 61 6c 65 72 74 3d 34 |ck%!16=9| alert=4|
|00004410| 0d 2b 48 08 20 20 20 cb | 0d 2b 57 10 20 fd 20 61 |.+H. .|.+W. . a|
|00004420| 6c 65 72 74 3c 3e 2d 31 | 0d 2b 66 20 20 e7 20 61 |lert<>-1|.+f . a|
|00004430| 6c 65 72 74 3d 32 20 f2 | 7a 31 28 34 2c 77 68 61 |lert=2 .|z1(4,wha|
|00004440| 6e 64 6c 65 31 35 25 29 | 0d 2b 75 20 20 e7 20 61 |ndle15%)|.+u . a|
|00004450| 6c 65 72 74 3d 30 20 f2 | 7a 31 28 35 2c 77 68 61 |lert=0 .|z1(5,wha|
|00004460| 6e 64 6c 65 31 35 25 29 | 0d 2b 84 20 20 e7 20 61 |ndle15%)|.+. . a|
|00004470| 6c 65 72 74 3d 34 20 f2 | 7a 31 28 38 2c 77 68 61 |lert=4 .|z1(8,wha|
|00004480| 6e 64 6c 65 31 35 25 29 | 0d 2b 93 1f 20 f2 72 65 |ndle15%)|.+.. .re|
|00004490| 73 74 6f 72 65 66 75 6c | 6c 6d 6f 75 73 65 72 65 |storeful|lmousere|
|000044a0| 63 74 61 6e 67 6c 65 0d | 2b a2 35 20 62 6c 6f 63 |ctangle.|+.5 bloc|
|000044b0| 6b 25 21 30 3d 77 68 61 | 6e 64 6c 65 31 35 25 3a |k%!0=wha|ndle15%:|
|000044c0| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |.."Wimp_|CloseWin|
|000044d0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 0d 2b b1 06 |dow",,bl|ock%.+..|
|000044e0| 20 e1 0d 2b c0 0f 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..+.. .|--------|
|000044f0| 2d 0d 2b cf 14 20 dd f2 | 66 6f 6e 74 5f 6e 6f 74 |-.+.. ..|font_not|
|00004500| 66 6f 75 6e 64 0d 2b de | 10 20 f2 72 6d 28 22 41 |found.+.|. .rm("A|
|00004510| 4c 54 38 22 29 0d 2b e0 | 19 20 24 28 62 6c 6f 63 |LT8").+.|. $(bloc|
|00004520| 6b 25 2b 34 29 3d 74 65 | 78 74 24 2b bd 30 0d 2b |k%+4)=te|xt$+.0.+|
|00004530| e8 34 20 f2 72 6d 28 22 | 45 52 4d 31 22 29 3a c8 |.4 .rm("|ERM1"):.|
|00004540| 99 22 57 69 6d 70 5f 52 | 65 70 6f 72 74 45 72 72 |."Wimp_R|eportErr|
|00004550| 6f 72 22 2c 62 6c 6f 63 | 6b 25 2c 31 2c 74 65 78 |or",bloc|k%,1,tex|
|00004560| 74 24 0d 2c b0 06 20 e1 | 0d 2c bf 10 20 f4 2d 2d |t$.,.. .|.,.. .--|
|00004570| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 2c ce 23 20 dd f2 66 |--------|.,.# ..f|
|00004580| 72 61 6d 65 28 66 78 25 | 2c 66 79 25 2c 68 74 25 |rame(fx%|,fy%,ht%|
|00004590| 2c 77 64 25 2c 68 65 61 | 64 24 29 0d 2c dd 2c 20 |,wd%,hea|d$).,., |
|000045a0| 6c 25 3d 28 31 36 2a 28 | 31 2b a9 68 65 61 64 24 |l%=(16*(|1+.head$|
|000045b0| 29 29 2b 38 3a 68 25 3d | 35 34 3a e7 20 eb 3e 31 |))+8:h%=|54:. .>1|
|000045c0| 35 20 68 25 3d 35 32 0d | 2c ec 19 20 c8 99 22 57 |5 h%=52.|,.. .."W|
|000045d0| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 30 |imp_SetC|olour",0|
|000045e0| 0d 2c fb 21 20 c8 93 20 | 66 78 25 2b 31 36 2c 66 |.,.! .. |fx%+16,f|
|000045f0| 79 25 2b 68 74 25 2d 32 | 34 2c 6c 25 2c 68 25 2d |y%+ht%-2|4,l%,h%-|
|00004600| 32 0d 2d 0a 23 20 c8 93 | 20 66 78 25 2b 31 36 2b |2.-.# ..| fx%+16+|
|00004610| 32 2c 66 79 25 2b 68 74 | 25 2d 32 34 2c 6c 25 2d |2,fy%+ht|%-24,l%-|
|00004620| 34 2c 68 25 0d 2d 19 2d | 20 c8 99 22 57 69 6d 70 |4,h%.-.-| .."Wimp|
|00004630| 5f 53 65 74 43 6f 6c 6f | 75 72 22 2c 34 3a ec 20 |_SetColo|ur",4:. |
|00004640| 66 78 25 2b 31 38 2c 66 | 79 25 2b 68 74 25 2d 32 |fx%+18,f|y%+ht%-2|
|00004650| 34 0d 2d 28 1d 20 df 20 | 66 78 25 2b 31 38 2b 6c |4.-(. . |fx%+18+l|
|00004660| 25 2d 34 2c 66 79 25 2b | 68 74 25 2d 32 34 0d 2d |%-4,fy%+|ht%-24.-|
|00004670| 37 31 20 ec 20 66 78 25 | 2b 31 38 2c 66 79 25 2b |71 . fx%|+18,fy%+|
|00004680| 68 74 25 2d 32 32 3a df | 20 66 78 25 2b 31 38 2b |ht%-22:.| fx%+18+|
|00004690| 6c 25 2d 34 2c 66 79 25 | 2b 68 74 25 2d 32 32 0d |l%-4,fy%|+ht%-22.|
|000046a0| 2d 46 37 20 ec 20 66 78 | 25 2b 31 36 2b 6c 25 2c |-F7 . fx|%+16+l%,|
|000046b0| 66 79 25 2b 68 74 25 2d | 32 34 3a df 20 66 78 25 |fy%+ht%-|24:. fx%|
|000046c0| 2b 31 36 2b 6c 25 2c 66 | 79 25 2b 68 74 25 2b 28 |+16+l%,f|y%+ht%+(|
|000046d0| 68 25 2d 32 34 29 0d 2d | 55 37 20 ec 20 66 78 25 |h%-24).-|U7 . fx%|
|000046e0| 2b 31 34 2b 6c 25 2c 66 | 79 25 2b 68 74 25 2d 32 |+14+l%,f|y%+ht%-2|
|000046f0| 34 3a df 20 66 78 25 2b | 31 34 2b 6c 25 2c 66 79 |4:. fx%+|14+l%,fy|
|00004700| 25 2b 68 74 25 2b 28 68 | 25 2d 32 34 29 0d 2d 64 |%+ht%+(h|%-24).-d|
|00004710| 04 0d 2d 73 2c 20 c8 99 | 22 57 69 6d 70 5f 53 65 |..-s, ..|"Wimp_Se|
|00004720| 74 43 6f 6c 6f 75 72 22 | 2c 30 3a c8 93 20 66 78 |tColour"|,0:.. fx|
|00004730| 25 2c 66 79 25 2c 77 64 | 25 2c 68 74 25 0d 2d 82 |%,fy%,wd|%,ht%.-.|
|00004740| 36 20 c8 93 20 66 78 25 | 2b 32 2c 66 79 25 2c 77 |6 .. fx%|+2,fy%,w|
|00004750| 64 25 2d 34 2c 68 74 25 | 3a c8 93 20 66 78 25 2b |d%-4,ht%|:.. fx%+|
|00004760| 34 2c 66 79 25 2b 34 2c | 77 64 25 2d 38 2c 68 74 |4,fy%+4,|wd%-8,ht|
|00004770| 25 2d 36 0d 2d 91 20 20 | c8 93 20 66 78 25 2b 36 |%-6.-. |.. fx%+6|
|00004780| 2c 66 79 25 2b 34 2c 77 | 64 25 2d 31 32 2c 68 74 |,fy%+4,w|d%-12,ht|
|00004790| 25 2d 32 0d 2d a0 20 20 | ec 20 66 78 25 2c 66 79 |%-2.-. |. fx%,fy|
|000047a0| 25 2b 32 3a df 20 66 78 | 25 2b 77 64 25 2c 66 79 |%+2:. fx|%+wd%,fy|
|000047b0| 25 2b 32 0d 2d af 27 20 | ec 20 66 78 25 2c 66 79 |%+2.-.' |. fx%,fy|
|000047c0| 25 2b 68 74 25 2b 32 3a | df 20 66 78 25 2b 31 30 |%+ht%+2:|. fx%+10|
|000047d0| 2c 66 79 25 2b 68 74 25 | 2b 32 0d 2d be 35 20 c8 |,fy%+ht%|+2.-.5 .|
|000047e0| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|000047f0| 22 2c 34 3a ec 20 66 78 | 25 2b 32 2c 66 79 25 3a |",4:. fx|%+2,fy%:|
|00004800| df 20 66 78 25 2b 77 64 | 25 2d 32 2c 66 79 25 0d |. fx%+wd|%-2,fy%.|
|00004810| 2d cd 48 20 ec 20 66 78 | 25 2b 77 64 25 2c 66 79 |-.H . fx|%+wd%,fy|
|00004820| 25 3a df 20 66 78 25 2b | 77 64 25 2c 66 79 25 2b |%:. fx%+|wd%,fy%+|
|00004830| 68 74 25 3a ec 20 66 78 | 25 2b 77 64 25 2d 32 2c |ht%:. fx|%+wd%-2,|
|00004840| 66 79 25 3a df 20 66 78 | 25 2b 77 64 25 2d 32 2c |fy%:. fx|%+wd%-2,|
|00004850| 66 79 25 2b 68 74 25 0d | 2d dc 22 20 ec 20 66 78 |fy%+ht%.|-." . fx|
|00004860| 25 2b 34 2c 66 79 25 3a | df 20 66 78 25 2b 34 2c |%+4,fy%:|. fx%+4,|
|00004870| 66 79 25 2b 68 74 25 2d | 32 0d 2d eb 24 20 ec 20 |fy%+ht%-|2.-.$ . |
|00004880| 66 78 25 2b 36 2c 66 79 | 25 2b 34 3a df 20 66 78 |fx%+6,fy|%+4:. fx|
|00004890| 25 2b 36 2c 66 79 25 2b | 68 74 25 2d 32 0d 2d fa |%+6,fy%+|ht%-2.-.|
|000048a0| 2c 20 ec 20 66 78 25 2b | 34 2c 66 79 25 2b 68 74 |, . fx%+|4,fy%+ht|
|000048b0| 25 2d 32 3a df 20 66 78 | 25 2b 77 64 25 2d 36 2c |%-2:. fx|%+wd%-6,|
|000048c0| 66 79 25 2b 68 74 25 2d | 32 0d 2e 09 04 0d 2e 18 |fy%+ht%-|2.......|
|000048d0| 3d 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |= .."Wim|p_SetCol|
|000048e0| 6f 75 72 22 2c 31 3a c8 | 93 20 c8 90 20 66 78 25 |our",1:.|. .. fx%|
|000048f0| 2b 32 32 2c 66 79 25 2b | 68 74 25 2d 31 38 2c 6c |+22,fy%+|ht%-18,l|
|00004900| 25 2d 31 30 2c 34 38 2d | 31 30 0d 2e 27 37 20 c8 |%-10,48-|10..'7 .|
|00004910| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|00004920| 22 2c 37 3a ec 20 66 78 | 25 2b 31 36 2b 31 32 2c |",7:. fx|%+16+12,|
|00004930| 66 79 25 2b 68 74 25 2b | 31 36 3a f1 68 65 61 64 |fy%+ht%+|16:.head|
|00004940| 24 0d 2e 36 06 20 e1 0d | 2e 45 10 20 f4 2d 2d 2d |$..6. ..|.E. .---|
|00004950| 2d 2d 2d 2d 2d 2d 2d 0d | 2e 54 13 20 dd f2 75 70 |-------.|.T. ..up|
|00004960| 64 61 74 65 5f 74 69 74 | 6c 65 0d 2e 63 39 20 62 |date_tit|le..c9 b|
|00004970| 6c 6f 63 6b 25 21 30 3d | 77 68 61 6e 64 6c 65 31 |lock%!0=|whandle1|
|00004980| 25 3a c8 99 22 57 69 6d | 70 5f 47 65 74 57 69 6e |%:.."Wim|p_GetWin|
|00004990| 64 6f 77 4f 75 74 6c 69 | 6e 65 22 2c 2c 62 6c 6f |dowOutli|ne",,blo|
|000049a0| 63 6b 25 0d 2e 72 48 20 | c8 99 22 57 69 6d 70 5f |ck%..rH |.."Wimp_|
|000049b0| 46 6f 72 63 65 52 65 64 | 72 61 77 22 2c 2d 31 2c |ForceRed|raw",-1,|
|000049c0| 62 6c 6f 63 6b 25 21 34 | 2c 28 62 6c 6f 63 6b 25 |block%!4|,(block%|
|000049d0| 21 31 36 2d 34 30 29 2c | 62 6c 6f 63 6b 25 21 31 |!16-40),|block%!1|
|000049e0| 32 2c 62 6c 6f 63 6b 25 | 21 31 36 0d 2e 81 06 20 |2,block%|!16.... |
|000049f0| e1 0d 2e 90 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|00004a00| 2d 0d 2e 9f 0f 20 dd f2 | 6f 70 65 6e 6d 61 69 6e |-.... ..|openmain|
|00004a10| 0d 2e ae 37 20 62 6c 6f | 63 6b 25 21 30 3d 77 68 |...7 blo|ck%!0=wh|
|00004a20| 61 6e 64 6c 65 31 25 3a | c8 99 22 57 69 6d 70 5f |andle1%:|.."Wimp_|
|00004a30| 47 65 74 57 69 6e 64 6f | 77 53 74 61 74 65 22 2c |GetWindo|wState",|
|00004a40| 2c 62 6c 6f 63 6b 25 0d | 2e bd 38 20 62 6c 6f 63 |,block%.|..8 bloc|
|00004a50| 6b 25 21 32 30 3d 30 3a | 62 6c 6f 63 6b 25 21 32 |k%!20=0:|block%!2|
|00004a60| 34 3d 30 3a c8 99 22 57 | 69 6d 70 5f 4f 70 65 6e |4=0:.."W|imp_Open|
|00004a70| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00004a80| 2e cc 06 20 e1 0d 2e db | 10 20 f4 2d 2d 2d 2d 2d |... ....|. .-----|
|00004a90| 2d 2d 2d 2d 2d 0d 2e ea | 0f 20 dd f2 72 65 61 64 |-----...|. ..read|
|00004aa0| 5f 76 65 72 0d 2e f9 14 | 20 2a 53 65 74 20 52 69 |_ver....| *Set Ri|
|00004ab0| 73 63 24 56 65 72 20 33 | 0d 2f 08 34 20 ff 28 22 |sc$Ver 3|./.4 .("|
|00004ac0| 52 4d 45 6e 73 75 72 65 | 20 55 74 69 6c 69 74 79 |RMEnsure| Utility|
|00004ad0| 4d 6f 64 75 6c 65 20 33 | 2e 30 30 20 53 65 74 20 |Module 3|.00 Set |
|00004ae0| 52 69 73 63 24 56 65 72 | 20 32 22 29 0d 2f 17 39 |Risc$Ver| 2")./.9|
|00004af0| 20 c8 99 22 58 4f 53 5f | 52 65 61 64 56 61 72 56 | .."XOS_|ReadVarV|
|00004b00| 61 6c 22 2c 22 52 69 73 | 63 24 56 65 72 22 2c 62 |al","Ris|c$Ver",b|
|00004b10| 6c 6f 63 6b 25 2c 32 35 | 36 2c 30 2c 30 20 b8 20 |lock%,25|6,0,0 . |
|00004b20| 2c 2c 6c 65 6e 0d 2f 26 | 20 20 62 6c 6f 63 6b 25 |,,len./&| block%|
|00004b30| 3f 6c 65 6e 3d 31 33 3a | 72 69 73 63 24 3d 24 62 |?len=13:|risc$=$b|
|00004b40| 6c 6f 63 6b 25 0d 2f 35 | 14 20 2a 55 6e 53 65 74 |lock%./5|. *UnSet|
|00004b50| 20 52 69 73 63 24 56 65 | 72 0d 2f 44 06 20 e1 0d | Risc$Ve|r./D. ..|
|00004b60| 2f 53 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |/S. .---|-------.|
|00004b70| 2f 62 20 20 dd f2 72 65 | 73 74 6f 72 65 66 75 6c |/b ..re|storeful|
|00004b80| 6c 6d 6f 75 73 65 72 65 | 63 74 61 6e 67 6c 65 0d |lmousere|ctangle.|
|00004b90| 2f 71 36 20 ea 20 62 25 | 2c 58 45 69 67 25 2c 59 |/q6 . b%|,XEig%,Y|
|00004ba0| 45 69 67 25 2c 58 70 69 | 78 25 2c 59 70 69 78 25 |Eig%,Xpi|x%,Ypix%|
|00004bb0| 2c 58 4f 53 55 75 6e 69 | 74 73 25 2c 59 4f 53 75 |,XOSUuni|ts%,YOSu|
|00004bc0| 6e 69 74 73 25 0d 2f 80 | 34 20 de 20 62 25 20 36 |nits%./.|4 . b% 6|
|00004bd0| 34 3a 62 25 21 30 3d 34 | 3a 62 25 21 34 3d 35 3a |4:b%!0=4|:b%!4=5:|
|00004be0| 62 25 21 38 3d 31 31 3a | 62 25 21 31 32 3d 31 32 |b%!8=11:|b%!12=12|
|00004bf0| 3a 62 25 21 31 36 3d 2d | 31 0d 2f 8f 22 20 c8 99 |:b%!16=-|1./." ..|
|00004c00| 22 4f 53 5f 52 65 61 64 | 56 64 75 56 61 72 69 61 |"OS_Read|VduVaria|
|00004c10| 62 6c 65 73 22 2c 62 25 | 2c 62 25 0d 2f 9e 30 20 |bles",b%|,b%./.0 |
|00004c20| 58 45 69 67 25 3d 21 62 | 25 3a 59 45 69 67 25 3d |XEig%=!b|%:YEig%=|
|00004c30| 62 25 21 34 3a 58 70 69 | 78 25 3d 62 25 21 38 3a |b%!4:Xpi|x%=b%!8:|
|00004c40| 59 70 69 78 25 3d 62 25 | 21 31 32 0d 2f ad 3c 20 |Ypix%=b%|!12./.< |
|00004c50| 58 4f 53 55 6e 69 74 73 | 25 3d 28 58 70 69 78 25 |XOSUnits|%=(Xpix%|
|00004c60| 2b 31 29 2a 32 5e 58 45 | 69 67 25 3a 59 4f 53 55 |+1)*2^XE|ig%:YOSU|
|00004c70| 6e 69 74 73 25 3d 28 59 | 70 69 78 25 2b 31 29 2a |nits%=(Y|pix%+1)*|
|00004c80| 32 5e 59 45 69 67 25 0d | 2f bc 22 20 c8 97 20 c8 |2^YEig%.|/." .. .|
|00004c90| 93 20 30 2c 30 2c 58 4f | 53 55 6e 69 74 73 25 2c |. 0,0,XO|SUnits%,|
|00004ca0| 59 4f 53 55 6e 69 74 73 | 25 0d 2f cb 06 20 e1 0d |YOSUnits|%./.. ..|
|00004cb0| 2f da 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |/.. .---|-------.|
|00004cc0| 2f e9 0f 20 dd f2 6b 65 | 79 70 72 65 73 73 0d 2f |/.. ..ke|ypress./|
|00004cd0| f8 1d 20 49 25 3d 62 6c | 6f 63 6b 25 21 34 3a 4b |.. I%=bl|ock%!4:K|
|00004ce0| 25 3d 62 6c 6f 63 6b 25 | 21 32 34 0d 30 07 12 20 |%=block%|!24.0.. |
|00004cf0| c8 8e 20 62 6c 6f 63 6b | 25 21 30 20 ca 0d 30 16 |.. block|%!0 ..0.|
|00004d00| 11 20 20 c9 20 77 68 61 | 6e 64 6c 65 31 25 0d 30 |. . wha|ndle1%.0|
|00004d10| 17 1e 20 20 20 e7 20 4b | 25 3e 39 36 20 80 20 4b |.. . K|%>96 . K|
|00004d20| 25 3c 31 32 33 20 4b 25 | 2d 3d 33 32 0d 30 1b 18 |%<123 K%|-=32.0..|
|00004d30| 20 20 20 e7 20 4b 25 3e | 36 34 20 80 20 4b 25 3c | . K%>|64 . K%<|
|00004d40| 39 31 20 8c 0d 30 26 2d | 20 20 20 20 c8 99 22 4f |91 ..0&-| .."O|
|00004d50| 53 5f 52 65 61 64 4d 6f | 6e 6f 74 6f 6e 69 63 54 |S_ReadMo|notonicT|
|00004d60| 69 6d 65 22 20 b8 20 6b | 65 79 5f 74 69 6d 65 32 |ime" . k|ey_time2|
|00004d70| 25 0d 30 27 2d 20 20 20 | 20 e7 20 6b 65 79 5f 74 |%.0'- | . key_t|
|00004d80| 69 6d 65 32 25 2d 6b 65 | 79 5f 74 69 6d 65 25 3c |ime2%-ke|y_time%<|
|00004d90| 37 30 20 74 71 5f 66 6c | 61 67 3d b9 3a e1 0d 30 |70 tq_fl|ag=.:..0|
|00004da0| 28 1c 20 20 20 20 6b 65 | 79 5f 74 69 6d 65 25 3d |(. ke|y_time%=|
|00004db0| 6b 65 79 5f 74 69 6d 65 | 32 25 0d 30 34 60 20 20 |key_time|2%.04` |
|00004dc0| 20 20 78 3d 4b 25 2d 36 | 35 3a f2 63 68 6f 73 65 | x=K%-6|5:.chose|
|00004dd0| 6e 5f 61 5f 6c 65 74 74 | 65 72 3a c8 99 22 57 69 |n_a_lett|er:.."Wi|
|00004de0| 6d 70 5f 46 6f 72 63 65 | 52 65 64 72 61 77 22 2c |mp_Force|Redraw",|
|00004df0| 77 68 61 6e 64 6c 65 31 | 25 2c 33 30 2b 28 34 30 |whandle1|%,30+(40|
|00004e00| 2a 78 29 2c 2d 35 33 32 | 2c 33 30 2b 28 34 30 2a |*x),-532|,30+(40*|
|00004e10| 78 29 2b 33 36 2c 2d 34 | 39 32 0d 30 43 08 20 20 |x)+36,-4|92.0C. |
|00004e20| 20 cc 0d 30 52 1e 20 20 | 20 20 c8 99 22 57 69 6d | ..0R. | .."Wim|
|00004e30| 70 5f 50 72 6f 63 65 73 | 73 4b 65 79 22 2c 4b 25 |p_Proces|sKey",K%|
|00004e40| 0d 30 61 08 20 20 20 cd | 0d 30 70 06 20 cb 0d 30 |.0a. .|.0p. ..0|
|00004e50| 7f 06 20 e1 0d 30 8e 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. ..0..| .------|
|00004e60| 2d 2d 2d 2d 0d 30 9d 12 | 20 dd f2 72 61 64 69 6f |----.0..| ..radio|
|00004e70| 5f 63 6c 69 63 6b 0d 30 | ac 37 20 62 6c 6f 63 6b |_click.0|.7 block|
|00004e80| 25 21 30 3d 77 68 61 6e | 64 6c 65 31 25 3a c8 99 |%!0=whan|dle1%:..|
|00004e90| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 |"Wimp_Ge|tWindowS|
|00004ea0| 74 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 0d 30 bb |tate",,b|lock%.0.|
|00004eb0| 1f 20 f2 67 65 74 6f 72 | 69 67 69 6e 28 62 6c 6f |. .getor|igin(blo|
|00004ec0| 63 6b 25 2c 78 30 25 2c | 79 30 25 29 0d 30 ca 4f |ck%,x0%,|y0%).0.O|
|00004ed0| 20 62 6c 6f 63 6b 25 21 | 30 3d 77 68 61 6e 64 6c | block%!|0=whandl|
|00004ee0| 65 31 25 3a 62 6c 6f 63 | 6b 25 21 34 3d 33 32 3a |e1%:bloc|k%!4=32:|
|00004ef0| 62 6c 6f 63 6b 25 21 38 | 3d 2d 36 33 38 3a 62 6c |block%!8|=-638:bl|
|00004f00| 6f 63 6b 25 21 31 32 3d | 31 30 37 32 3a 62 6c 6f |ock%!12=|1072:blo|
|00004f10| 63 6b 25 21 31 36 3d 2d | 35 36 32 0d 30 d9 2a 20 |ck%!16=-|562.0.* |
|00004f20| c8 99 22 57 69 6d 70 5f | 55 70 64 61 74 65 57 69 |.."Wimp_|UpdateWi|
|00004f30| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |ndow",,b|lock% . |
|00004f40| 6d 6f 72 65 25 0d 30 e8 | 0d 20 c8 95 20 6d 6f 72 |more%.0.|. .. mor|
|00004f50| 65 25 0d 31 06 3f 20 20 | c8 99 22 4f 53 5f 53 70 |e%.1.? |.."OS_Sp|
|00004f60| 72 69 74 65 4f 70 22 2c | 32 39 30 2c 67 72 61 62 |riteOp",|290,grab|
|00004f70| 5f 6d 65 6d 73 74 61 72 | 74 2c 22 67 72 61 62 22 |_memstar|t,"grab"|
|00004f80| 2c 78 30 25 2b 32 38 2c | 79 30 25 2d 36 33 38 2c |,x0%+28,|y0%-638,|
|00004f90| 30 0d 31 15 2b 20 20 c8 | 99 22 57 69 6d 70 5f 47 |0.1.+ .|."Wimp_G|
|00004fa0| 65 74 52 65 63 74 61 6e | 67 6c 65 22 2c 2c 62 6c |etRectan|gle",,bl|
|00004fb0| 6f 63 6b 25 20 b8 20 6d | 6f 72 65 25 0d 31 24 06 |ock% . m|ore%.1$.|
|00004fc0| 20 ce 0d 31 33 06 20 e1 | 0d 31 42 11 20 f4 2d 2d | ..13. .|.1B. .--|
|00004fd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 31 51 12 20 dd f2 |--------|-.1Q. ..|
|00004fe0| 63 68 6f 6f 73 65 5f 66 | 6f 6e 74 0d 31 60 10 20 |choose_f|ont.1`. |
|00004ff0| 63 68 6f 69 63 65 25 3d | 2d 39 39 0d 31 6f 16 20 |choice%=|-99.1o. |
|00005000| e3 20 6c 6f 6f 70 3d 31 | 20 b8 20 66 6f 6e 74 73 |. loop=1| . fonts|
|00005010| 25 0d 31 7e 29 20 20 e7 | 20 24 66 5f 61 6e 73 25 |%.1~) .| $f_ans%|
|00005020| 3d 66 6f 6e 74 73 24 28 | 6c 6f 6f 70 29 20 63 68 |=fonts$(|loop) ch|
|00005030| 6f 69 63 65 25 3d 6c 6f | 6f 70 0d 31 8d 06 20 ed |oice%=lo|op.1.. .|
|00005040| 0d 31 9c 15 20 e7 20 63 | 68 6f 69 63 65 25 3c 3e |.1.. . c|hoice%<>|
|00005050| 2d 39 39 20 e1 0d 31 ab | 19 20 6c 6c 3d a9 28 24 |-99 ..1.|. ll=.($|
|00005060| 66 5f 61 6e 73 25 29 3a | 6c 6f 6f 70 3d 31 0d 31 |f_ans%):|loop=1.1|
|00005070| ba 06 20 f5 0d 31 c9 2e | 20 20 e7 20 24 66 5f 61 |.. ..1..| . $f_a|
|00005080| 6e 73 25 3d c0 66 6f 6e | 74 73 24 28 6c 6f 6f 70 |ns%=.fon|ts$(loop|
|00005090| 29 2c 6c 6c 29 20 63 68 | 6f 69 63 65 25 3d 6c 6f |),ll) ch|oice%=lo|
|000050a0| 6f 70 0d 31 d8 0d 20 20 | 6c 6f 6f 70 2b 3d 31 0d |op.1.. |loop+=1.|
|000050b0| 31 e7 21 20 fd 20 63 68 | 6f 69 63 65 25 3c 3e 2d |1.! . ch|oice%<>-|
|000050c0| 39 39 20 84 20 6c 6f 6f | 70 3e 66 6f 6e 74 73 25 |99 . loo|p>fonts%|
|000050d0| 0d 31 f6 1b 20 e7 20 63 | 68 6f 69 63 65 25 3d 39 |.1.. . c|hoice%=9|
|000050e0| 39 20 63 68 6f 69 63 65 | 25 3d 31 0d 32 05 06 20 |9 choice|%=1.2.. |
|000050f0| e1 0d 32 14 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..2.. .-|--------|
|00005100| 2d 0d 32 23 11 20 dd f2 | 63 68 65 63 6b 5f 6e 61 |-.2#. ..|check_na|
|00005110| 6d 65 0d 32 32 19 20 e7 | 20 28 a7 24 6e 61 6d 65 |me.22. .| (.$name|
|00005120| 25 2c 22 2a 22 29 29 3e | 30 20 e1 0d 32 41 13 20 |%,"*"))>|0 ..2A. |
|00005130| e7 20 73 61 76 65 64 5f | 6f 6b 3d b9 20 e1 0d 32 |. saved_|ok=. ..2|
|00005140| 50 25 20 24 6e 61 6d 65 | 25 3d 24 6e 61 6d 65 25 |P% $name|%=$name%|
|00005150| 2b 22 20 2a 22 3a f2 75 | 70 64 61 74 65 5f 74 69 |+" *":.u|pdate_ti|
|00005160| 74 6c 65 0d 32 5f 06 20 | e1 0d 32 6e 10 20 f4 2d |tle.2_. |..2n. .-|
|00005170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 32 7d 15 20 dd f2 |--------|-.2}. ..|
|00005180| 63 6c 69 63 6b 5f 64 72 | 61 67 73 61 76 65 0d 32 |click_dr|agsave.2|
|00005190| 8c 27 20 e7 20 69 63 3d | 32 20 80 20 28 62 75 20 |.' . ic=|2 . (bu |
|000051a0| 80 20 26 35 30 29 3e 30 | 20 f2 64 72 61 67 6f 75 |. &50)>0| .dragou|
|000051b0| 74 6c 69 6e 65 0d 32 9b | 0e 20 e7 20 69 63 3c 3e |tline.2.|. . ic<>|
|000051c0| 31 20 e1 0d 32 aa 4a 20 | e7 20 62 75 3d 34 20 84 |1 ..2.J |. bu=4 .|
|000051d0| 20 62 75 3d 31 20 8c 20 | f2 69 72 65 61 64 28 30 | bu=1 . |.iread(0|
|000051e0| 2c 77 68 61 6e 64 6c 65 | 38 25 29 3a f2 73 61 76 |,whandle|8%):.sav|
|000051f0| 65 28 61 24 29 3a c8 99 | 22 57 69 6d 70 5f 43 72 |e(a$):..|"Wimp_Cr|
|00005200| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 2d 31 0d 32 b9 |eateMenu|",,-1.2.|
|00005210| 06 20 e1 0d 32 c8 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..2.. |.-------|
|00005220| 2d 2d 2d 0d 3d 45 0d 20 | dd f2 72 65 64 72 61 77 |---.=E. |..redraw|
|00005230| 0d 3d 54 15 20 c8 99 22 | 48 6f 75 72 67 6c 61 73 |.=T. .."|Hourglas|
|00005240| 73 5f 4f 6e 22 0d 3d 63 | 3b 20 77 69 6e 64 6f 77 |s_On".=c|; window|
|00005250| 25 3d 62 6c 6f 63 6b 25 | 21 30 3a c8 99 22 57 69 |%=block%|!0:.."Wi|
|00005260| 6d 70 5f 52 65 64 72 61 | 77 57 69 6e 64 6f 77 22 |mp_Redra|wWindow"|
|00005270| 2c 2c 62 6c 6f 63 6b 25 | 20 b8 20 6d 6f 72 65 25 |,,block%| . more%|
|00005280| 0d 3d 81 0d 20 c8 95 20 | 6d 6f 72 65 25 0d 3d 90 |.=.. .. |more%.=.|
|00005290| 20 20 20 f2 67 65 74 6f | 72 69 67 69 6e 28 62 6c | .geto|rigin(bl|
|000052a0| 6f 63 6b 25 2c 78 30 25 | 2c 79 30 25 29 0d 3d 9f |ock%,x0%|,y0%).=.|
|000052b0| 41 20 20 67 78 30 25 3d | 62 6c 6f 63 6b 25 21 32 |A gx0%=|block%!2|
|000052c0| 38 3a 67 79 30 25 3d 62 | 6c 6f 63 6b 25 21 33 32 |8:gy0%=b|lock%!32|
|000052d0| 3a 67 78 31 25 3d 62 6c | 6f 63 6b 25 21 33 36 3a |:gx1%=bl|ock%!36:|
|000052e0| 67 79 31 25 3d 62 6c 6f | 63 6b 25 21 34 30 0d 3d |gy1%=blo|ck%!40.=|
|000052f0| ae 39 20 20 67 78 30 25 | 3d 28 67 78 30 25 2d 78 |.9 gx0%|=(gx0%-x|
|00005300| 30 25 29 81 33 32 2a 33 | 32 2b 78 30 25 3a 67 79 |0%).32*3|2+x0%:gy|
|00005310| 31 25 3d 28 67 79 31 25 | 2d 79 30 25 29 81 33 32 |1%=(gy1%|-y0%).32|
|00005320| 2a 33 32 2b 79 30 25 0d | 3d bd 04 0d 3d cc 11 20 |*32+y0%.|=...=.. |
|00005330| c8 8e 20 77 69 6e 64 6f | 77 25 20 ca 0d 3d db 04 |.. windo|w% ..=..|
|00005340| 0d 3d ea 10 20 c9 20 77 | 68 61 6e 64 6c 65 31 25 |.=.. . w|handle1%|
|00005350| 0d 3d f9 35 20 20 e7 20 | a4 69 6e 74 65 72 73 65 |.=.5 . |.interse|
|00005360| 63 74 28 78 30 25 2b 31 | 36 2c 79 30 25 2d 37 34 |ct(x0%+1|6,y0%-74|
|00005370| 34 2c 78 30 25 2b 31 30 | 37 38 2c 79 30 25 2d 34 |4,x0%+10|78,y0%-4|
|00005380| 37 36 29 20 8c 0d 3e 08 | 27 20 20 20 f2 74 65 78 |76) ..>.|' .tex|
|00005390| 74 62 6f 78 28 78 30 25 | 2b 34 34 2c 79 30 25 2d |tbox(x0%|+44,y0%-|
|000053a0| 37 32 32 2c 31 30 30 38 | 2c 36 34 29 0d 3e 17 2a |722,1008|,64).>.*|
|000053b0| 20 20 20 f2 62 6f 72 5f | 66 72 61 6d 65 28 78 30 | .bor_|frame(x0|
|000053c0| 25 2b 31 36 2c 79 30 25 | 2d 37 34 34 2c 31 30 36 |%+16,y0%|-744,106|
|000053d0| 32 2c 32 30 36 29 0d 3e | 26 29 20 20 20 f2 62 6f |2,206).>|&) .bo|
|000053e0| 72 5f 66 72 61 6d 65 28 | 78 30 25 2b 31 36 2c 79 |r_frame(|x0%+16,y|
|000053f0| 30 25 2d 35 34 30 2c 31 | 30 36 32 2c 36 30 29 0d |0%-540,1|062,60).|
|00005400| 3e 44 40 20 20 20 c8 99 | 22 4f 53 5f 53 70 72 69 |>D@ ..|"OS_Spri|
|00005410| 74 65 4f 70 22 2c 32 39 | 30 2c 67 72 61 62 5f 6d |teOp",29|0,grab_m|
|00005420| 65 6d 73 74 61 72 74 2c | 22 67 72 61 62 22 2c 78 |emstart,|"grab",x|
|00005430| 30 25 2b 32 38 2c 79 30 | 25 2d 36 33 38 2c 30 0d |0%+28,y0|%-638,0.|
|00005440| 3e 80 07 20 20 cd 0d 3e | 8f 04 0d 3e 9e 0e 20 c9 |>.. ..>|...>.. .|
|00005450| 20 65 72 72 62 6f 78 25 | 0d 3e ad 36 20 20 f2 72 | errbox%|.>.6 .r|
|00005460| 6d 28 22 46 52 41 36 22 | 29 3a f2 66 72 61 6d 65 |m("FRA6"|):.frame|
|00005470| 28 78 30 25 2b 32 34 2c | 79 30 25 2d 33 36 30 2c |(x0%+24,|y0%-360,|
|00005480| 33 30 34 2c 35 32 36 2c | 74 65 78 74 24 29 0d 3e |304,526,|text$).>|
|00005490| bc 04 0d 3e cb 41 20 c9 | 20 77 68 61 6e 64 6c 65 |...>.A .| whandle|
|000054a0| 39 25 3a f2 72 6d 28 22 | 46 52 41 33 22 29 3a f2 |9%:.rm("|FRA3"):.|
|000054b0| 66 72 61 6d 65 28 78 30 | 25 2b 32 34 2c 79 30 25 |frame(x0|%+24,y0%|
|000054c0| 2d 33 36 30 2c 33 30 34 | 2c 35 32 36 2c 74 65 78 |-360,304|,526,tex|
|000054d0| 74 24 29 0d 3e da 04 0d | 3e e9 06 20 cb 0d 3e f8 |t$).>...|>.. ..>.|
|000054e0| 2a 20 c8 99 22 57 69 6d | 70 5f 47 65 74 52 65 63 |* .."Wim|p_GetRec|
|000054f0| 74 61 6e 67 6c 65 22 2c | 2c 62 6c 6f 63 6b 25 20 |tangle",|,block% |
|00005500| b8 20 6d 6f 72 65 25 0d | 3f 07 06 20 ce 0d 3f 16 |. more%.|?.. ..?.|
|00005510| 04 0d 3f 34 18 20 c8 99 | 22 48 6f 75 72 67 6c 61 |..?4. ..|"Hourgla|
|00005520| 73 73 5f 53 6d 61 73 68 | 22 0d 3f 43 06 20 e1 0d |ss_Smash|".?C. ..|
|00005530| 3f 52 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |?R. .---|-------.|
|00005540| 3f 61 21 20 dd a4 69 6e | 74 65 72 73 65 63 74 28 |?a! ..in|tersect(|
|00005550| 78 30 25 2c 79 30 25 2c | 78 31 25 2c 79 31 25 29 |x0%,y0%,|x1%,y1%)|
|00005560| 0d 3f 70 1f 20 e7 20 78 | 31 25 3c 67 78 30 25 20 |.?p. . x|1%<gx0% |
|00005570| 84 20 78 30 25 3e 67 78 | 31 25 20 8c 20 3d a3 0d |. x0%>gx|1% . =..|
|00005580| 3f 7f 1f 20 e7 20 79 31 | 25 3c 67 79 30 25 20 84 |?.. . y1|%<gy0% .|
|00005590| 20 79 30 25 3e 67 79 31 | 25 20 8c 20 3d a3 0d 3f | y0%>gy1|% . =..?|
|000055a0| 8e 07 20 3d b9 0d 3f 9d | 10 20 f4 2d 2d 2d 2d 2d |.. =..?.|. .-----|
|000055b0| 2d 2d 2d 2d 2d 0d 3f ac | 20 20 dd f2 72 65 63 74 |-----.?.| ..rect|
|000055c0| 66 69 6c 6c 28 78 30 25 | 2c 79 30 25 2c 78 31 25 |fill(x0%|,y0%,x1%|
|000055d0| 2c 79 31 25 29 0d 3f bb | 17 20 ea 20 78 78 25 2c |,y1%).?.|. . xx%,|
|000055e0| 79 79 25 2c 68 74 25 2c | 77 69 64 25 0d 3f ca 1e |yy%,ht%,|wid%.?..|
|000055f0| 20 e7 20 78 31 25 3c 67 | 78 30 25 20 84 20 78 30 | . x1%<g|x0% . x0|
|00005600| 25 3e 67 78 31 25 20 8c | 20 e1 0d 3f d9 1e 20 e7 |%>gx1% .| ..?.. .|
|00005610| 20 79 31 25 3c 67 79 30 | 25 20 84 20 79 30 25 3e | y1%<gy0|% . y0%>|
|00005620| 67 79 31 25 20 8c 20 e1 | 0d 3f e8 22 20 e7 20 78 |gy1% . .|.?." . x|
|00005630| 30 25 3e 67 78 30 25 20 | 78 78 25 3d 78 30 25 20 |0%>gx0% |xx%=x0% |
|00005640| 8b 20 78 78 25 3d 67 78 | 30 25 0d 3f f7 22 20 e7 |. xx%=gx|0%.?." .|
|00005650| 20 79 30 25 3e 67 79 30 | 25 20 79 79 25 3d 79 30 | y0%>gy0|% yy%=y0|
|00005660| 25 20 8b 20 79 79 25 3d | 67 79 30 25 0d 40 06 2c |% . yy%=|gy0%.@.,|
|00005670| 20 e7 20 78 31 25 3c 67 | 78 31 25 20 77 69 64 25 | . x1%<g|x1% wid%|
|00005680| 3d 78 31 25 2d 78 78 25 | 20 8b 20 77 69 64 25 3d |=x1%-xx%| . wid%=|
|00005690| 67 78 31 25 2d 78 78 25 | 0d 40 15 2a 20 e7 20 79 |gx1%-xx%|.@.* . y|
|000056a0| 31 25 3c 67 79 31 25 20 | 68 74 25 3d 79 31 25 2d |1%<gy1% |ht%=y1%-|
|000056b0| 79 79 25 20 8b 20 68 74 | 25 3d 67 79 31 25 2d 79 |yy% . ht|%=gy1%-y|
|000056c0| 79 25 0d 40 24 1b 20 c8 | 93 20 c8 90 20 78 78 25 |y%.@$. .|. .. xx%|
|000056d0| 2c 79 79 25 2c 77 69 64 | 25 2c 68 74 25 0d 40 33 |,yy%,wid|%,ht%.@3|
|000056e0| 06 20 e1 0d 40 42 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..@B. |.-------|
|000056f0| 2d 2d 2d 0d 40 51 1f 20 | dd f2 74 65 78 74 62 6f |---.@Q. |..textbo|
|00005700| 78 28 62 78 25 2c 62 79 | 25 2c 77 64 25 2c 68 74 |x(bx%,by|%,wd%,ht|
|00005710| 25 29 0d 40 60 2f 20 c8 | 99 22 57 69 6d 70 5f 53 |%).@`/ .|."Wimp_S|
|00005720| 65 74 43 6f 6c 6f 75 72 | 22 2c 30 3a c8 93 20 c8 |etColour|",0:.. .|
|00005730| 90 20 62 78 25 2c 62 79 | 25 2c 77 64 25 2c 68 74 |. bx%,by|%,wd%,ht|
|00005740| 25 0d 40 6f 37 20 c8 99 | 22 57 69 6d 70 5f 53 65 |%.@o7 ..|"Wimp_Se|
|00005750| 74 43 6f 6c 6f 75 72 22 | 2c 31 3a c8 93 20 c8 90 |tColour"|,1:.. ..|
|00005760| 20 62 78 25 2b 34 2c 62 | 79 25 2b 34 2c 77 64 25 | bx%+4,b|y%+4,wd%|
|00005770| 2d 38 2c 68 74 25 2d 38 | 0d 40 7e 19 20 c8 99 22 |-8,ht%-8|.@~. .."|
|00005780| 57 69 6d 70 5f 53 65 74 | 43 6f 6c 6f 75 72 22 2c |Wimp_Set|Colour",|
|00005790| 34 0d 40 8d 1c 20 c8 93 | 20 c8 90 20 62 78 25 2c |4.@.. ..| .. bx%,|
|000057a0| 62 79 25 2b 32 2c 32 2c | 68 74 25 2d 32 0d 40 9c |by%+2,2,|ht%-2.@.|
|000057b0| 20 20 c8 93 20 c8 90 20 | 62 78 25 2c 62 79 25 2b | .. .. |bx%,by%+|
|000057c0| 68 74 25 2d 32 2c 77 64 | 25 2d 32 2c 32 0d 40 ab |ht%-2,wd|%-2,2.@.|
|000057d0| 2b 20 ec 20 62 78 25 2c | 62 79 25 3a ec 20 62 78 |+ . bx%,|by%:. bx|
|000057e0| 25 2c 62 79 25 2b 32 3a | f0 20 38 35 2c 62 78 25 |%,by%+2:|. 85,bx%|
|000057f0| 2b 32 2c 62 79 25 2b 32 | 0d 40 ba 43 20 ec 20 62 |+2,by%+2|.@.C . b|
|00005800| 78 25 2b 77 64 25 2c 62 | 79 25 2b 68 74 25 3a ec |x%+wd%,b|y%+ht%:.|
|00005810| 20 62 78 25 2b 77 64 25 | 2d 32 2c 62 79 25 2b 68 | bx%+wd%|-2,by%+h|
|00005820| 74 25 3a f0 20 38 35 2c | 62 78 25 2b 77 64 25 2d |t%:. 85,|bx%+wd%-|
|00005830| 32 2c 62 79 25 2b 68 74 | 25 2d 32 0d 40 c9 06 20 |2,by%+ht|%-2.@.. |
|00005840| e1 0d 40 d8 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..@.. .-|--------|
|00005850| 2d 0d 40 e7 21 20 dd f2 | 62 6f 72 5f 66 72 61 6d |-.@.! ..|bor_fram|
|00005860| 65 28 66 78 25 2c 66 79 | 25 2c 77 64 25 2c 68 74 |e(fx%,fy|%,wd%,ht|
|00005870| 25 29 0d 40 f6 2c 20 c8 | 99 22 57 69 6d 70 5f 53 |%).@., .|."Wimp_S|
|00005880| 65 74 43 6f 6c 6f 75 72 | 22 2c 30 3a c8 93 20 66 |etColour|",0:.. f|
|00005890| 78 25 2c 66 79 25 2c 77 | 64 25 2c 68 74 25 0d 41 |x%,fy%,w|d%,ht%.A|
|000058a0| 05 36 20 c8 93 20 66 78 | 25 2b 32 2c 66 79 25 2c |.6 .. fx|%+2,fy%,|
|000058b0| 77 64 25 2d 34 2c 68 74 | 25 3a c8 93 20 66 78 25 |wd%-4,ht|%:.. fx%|
|000058c0| 2b 34 2c 66 79 25 2b 34 | 2c 77 64 25 2d 38 2c 68 |+4,fy%+4|,wd%-8,h|
|000058d0| 74 25 2d 36 0d 41 14 20 | 20 c8 93 20 66 78 25 2b |t%-6.A. | .. fx%+|
|000058e0| 36 2c 66 79 25 2b 34 2c | 77 64 25 2d 31 32 2c 68 |6,fy%+4,|wd%-12,h|
|000058f0| 74 25 2d 32 0d 41 23 27 | 20 ec 20 66 78 25 2c 66 |t%-2.A#'| . fx%,f|
|00005900| 79 25 2b 68 74 25 2b 32 | 3a df 20 66 78 25 2b 31 |y%+ht%+2|:. fx%+1|
|00005910| 30 2c 66 79 25 2b 68 74 | 25 2b 32 0d 41 32 20 20 |0,fy%+ht|%+2.A2 |
|00005920| ec 20 66 78 25 2c 66 79 | 25 2b 32 3a df 20 66 78 |. fx%,fy|%+2:. fx|
|00005930| 25 2b 77 64 25 2c 66 79 | 25 2b 32 0d 41 41 35 20 |%+wd%,fy|%+2.AA5 |
|00005940| c8 99 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |.."Wimp_|SetColou|
|00005950| 72 22 2c 34 3a ec 20 66 | 78 25 2b 32 2c 66 79 25 |r",4:. f|x%+2,fy%|
|00005960| 3a df 20 66 78 25 2b 77 | 64 25 2d 32 2c 66 79 25 |:. fx%+w|d%-2,fy%|
|00005970| 0d 41 50 48 20 ec 20 66 | 78 25 2b 77 64 25 2c 66 |.APH . f|x%+wd%,f|
|00005980| 79 25 3a df 20 66 78 25 | 2b 77 64 25 2c 66 79 25 |y%:. fx%|+wd%,fy%|
|00005990| 2b 68 74 25 3a ec 20 66 | 78 25 2b 77 64 25 2d 32 |+ht%:. f|x%+wd%-2|
|000059a0| 2c 66 79 25 3a df 20 66 | 78 25 2b 77 64 25 2d 32 |,fy%:. f|x%+wd%-2|
|000059b0| 2c 66 79 25 2b 68 74 25 | 0d 41 5f 24 20 ec 20 66 |,fy%+ht%|.A_$ . f|
|000059c0| 78 25 2b 34 2c 66 79 25 | 2b 34 3a df 20 66 78 25 |x%+4,fy%|+4:. fx%|
|000059d0| 2b 34 2c 66 79 25 2b 68 | 74 25 2d 32 0d 41 6e 24 |+4,fy%+h|t%-2.An$|
|000059e0| 20 ec 20 66 78 25 2b 36 | 2c 66 79 25 2b 36 3a df | . fx%+6|,fy%+6:.|
|000059f0| 20 66 78 25 2b 36 2c 66 | 79 25 2b 68 74 25 2d 32 | fx%+6,f|y%+ht%-2|
|00005a00| 0d 41 7d 2c 20 ec 20 66 | 78 25 2b 34 2c 66 79 25 |.A}, . f|x%+4,fy%|
|00005a10| 2b 68 74 25 2d 32 3a df | 20 66 78 25 2b 77 64 25 |+ht%-2:.| fx%+wd%|
|00005a20| 2d 36 2c 66 79 25 2b 68 | 74 25 2d 32 0d 41 8c 06 |-6,fy%+h|t%-2.A..|
|00005a30| 20 e1 0d 41 9b 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..A.. .|--------|
|00005a40| 2d 2d 0d 41 aa 13 20 dd | f2 7a 31 28 69 63 63 2c |--.A.. .|.z1(icc,|
|00005a50| 77 68 68 25 29 0d 41 b9 | 1c 20 f2 69 73 65 74 28 |whh%).A.|. .iset(|
|00005a60| 69 63 63 2c 22 70 6c 69 | 6e 32 22 2c 77 68 68 25 |icc,"pli|n2",whh%|
|00005a70| 29 0d 41 c8 24 20 c8 99 | 22 57 69 6d 70 5f 50 6f |).A.$ ..|"Wimp_Po|
|00005a80| 6c 6c 22 2c 2c 62 6c 6f | 63 6b 25 20 b8 20 72 65 |ll",,blo|ck% . re|
|00005a90| 61 73 6f 6e 25 0d 41 d7 | 11 20 c8 8e 20 72 65 61 |ason%.A.|. .. rea|
|00005aa0| 73 6f 6e 25 20 ca 0d 41 | e6 12 20 20 c9 20 31 20 |son% ..A|.. . 1 |
|00005ab0| 3a f2 72 65 64 72 61 77 | 0d 41 f5 26 20 20 c9 20 |:.redraw|.A.& . |
|00005ac0| 32 20 3a c8 99 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |2 :.."Wi|mp_OpenW|
|00005ad0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 42 |indow",,|block%.B|
|00005ae0| 04 06 20 cb 0d 42 13 23 | 20 f2 64 65 6c 61 79 3a |.. ..B.#| .delay:|
|00005af0| f2 69 73 65 74 28 69 63 | 63 2c 22 70 6c 69 6e 31 |.iset(ic|c,"plin1|
|00005b00| 22 2c 77 68 68 25 29 0d | 42 22 06 20 e1 0d 42 31 |",whh%).|B". ..B1|
|00005b10| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 42 40 |. .-----|-----.B@|
|00005b20| 0e 20 dd f2 68 61 6e 67 | 6d 61 6e 0d 42 4f 3f 20 |. ..hang|man.BO? |
|00005b30| 73 74 3d 28 31 30 34 30 | 2f 32 29 3a 72 65 3d 28 |st=(1040|/2):re=(|
|00005b40| a9 28 77 64 24 29 2a 37 | 32 29 2b 28 a9 28 77 64 |.(wd$)*7|2)+(.(wd|
|00005b50| 24 29 2a 31 32 29 3a 73 | 74 3d 73 74 2d 28 72 65 |$)*12):s|t=st-(re|
|00005b60| 2f 32 29 3a 73 74 31 3d | 73 74 0d 42 50 47 20 c8 |/2):st1=|st.BPG .|
|00005b70| 99 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 33 |."OS_Spr|iteOp",3|
|00005b80| 31 36 2c 67 72 61 62 5f | 6d 65 6d 73 74 61 72 74 |16,grab_|memstart|
|00005b90| 2c 22 67 72 61 62 22 2c | 6d 69 6b 20 b8 20 53 52 |,"grab",|mik . SR|
|00005ba0| 52 30 2c 53 52 52 31 2c | 53 52 52 32 2c 53 52 52 |R0,SRR1,|SRR2,SRR|
|00005bb0| 33 0d 42 51 2b 20 c8 99 | 22 57 69 6d 70 5f 53 65 |3.BQ+ ..|"Wimp_Se|
|00005bc0| 74 43 6f 6c 6f 75 72 22 | 2c 31 3a c8 93 20 c8 90 |tColour"|,1:.. ..|
|00005bd0| 20 30 2c 30 2c 31 31 30 | 30 2c 37 36 0d 42 5e 14 | 0,0,110|0,76.B^.|
|00005be0| 20 e3 20 6c 6f 6f 70 3d | 31 20 b8 20 a9 77 64 24 | . loop=|1 . .wd$|
|00005bf0| 0d 42 7c 2b 20 20 c8 99 | 22 57 69 6d 70 5f 53 65 |.B|+ ..|"Wimp_Se|
|00005c00| 74 43 6f 6c 6f 75 72 22 | 2c 30 3a c8 93 20 c8 90 |tColour"|,0:.. ..|
|00005c10| 20 73 74 2c 30 2c 37 32 | 2c 37 32 0d 42 8b 28 20 | st,0,72|,72.B.( |
|00005c20| 20 c8 99 22 57 69 6d 70 | 5f 53 65 74 43 6f 6c 6f | .."Wimp|_SetColo|
|00005c30| 75 72 22 2c 37 3a c8 93 | 20 73 74 2c 30 2c 37 32 |ur",7:..| st,0,72|
|00005c40| 2c 37 32 0d 42 a9 0c 20 | 20 73 74 2b 3d 38 34 0d |,72.B.. | st+=84.|
|00005c50| 42 b8 06 20 ed 0d 42 c7 | 10 20 73 6b 69 70 5f 66 |B.. ..B.|. skip_f|
|00005c60| 6c 61 67 3d a3 0d 43 5d | 04 0d 43 6c 3f 20 c8 99 |lag=..C]|..Cl? ..|
|00005c70| 22 46 6f 6e 74 5f 46 69 | 6e 64 46 6f 6e 74 22 2c |"Font_Fi|ndFont",|
|00005c80| 2c 22 54 72 69 6e 69 74 | 79 2e 42 6f 6c 64 22 2c |,"Trinit|y.Bold",|
|00005c90| 28 31 36 2a 32 34 29 2c | 28 31 36 2a 32 34 29 20 |(16*24),|(16*24) |
|00005ca0| b8 20 66 6f 6e 74 32 25 | 0d 43 7b 1c 20 c8 99 22 |. font2%|.C{. .."|
|00005cb0| 46 6f 6e 74 5f 53 65 74 | 46 6f 6e 74 22 2c 66 6f |Font_Set|Font",fo|
|00005cc0| 6e 74 32 25 0d 43 8a 32 | 20 c8 99 22 43 6f 6c 6f |nt2%.C.2| .."Colo|
|00005cd0| 75 72 54 72 61 6e 73 5f | 53 65 74 46 6f 6e 74 43 |urTrans_|SetFontC|
|00005ce0| 6f 6c 6f 75 72 73 22 2c | 2c 26 46 46 46 46 46 46 |olours",|,&FFFFFF|
|00005cf0| 30 30 2c 30 2c 36 0d 43 | 99 1c 20 c8 99 22 46 6f |00,0,6.C|.. .."Fo|
|00005d00| 6e 74 5f 53 65 74 46 6f | 6e 74 22 2c 66 6f 6e 74 |nt_SetFo|nt",font|
|00005d10| 32 25 0d 43 a8 04 0d 43 | b7 11 20 e3 20 46 3d 31 |2%.C...C|.. . F=1|
|00005d20| 20 b8 20 a9 77 64 24 0d | 43 c6 11 20 20 e7 20 41 | . .wd$.|C.. . A|
|00005d30| 78 28 46 29 3d 31 20 8c | 0d 43 d5 20 20 20 20 4b |x(F)=1 .|.C. K|
|00005d40| 24 3d c1 77 64 24 2c 46 | 2c 31 29 3a 41 77 6f 72 |$=.wd$,F|,1):Awor|
|00005d50| 64 24 28 46 29 3d 4b 24 | 0d 43 e4 2f 20 20 20 c8 |d$(F)=K$|.C./ .|
|00005d60| 99 22 46 6f 6e 74 5f 53 | 74 72 69 6e 67 42 42 6f |."Font_S|tringBBo|
|00005d70| 78 22 2c 2c 4b 24 20 b8 | 20 52 30 2c 52 31 2c 52 |x",,K$ .| R0,R1,R|
|00005d80| 32 2c 52 33 2c 52 34 0d | 43 f3 1a 20 20 20 46 57 |2,R3,R4.|C.. FW|
|00005d90| 25 3d 28 28 52 33 2d 52 | 31 29 2f 34 30 30 29 2f |%=((R3-R|1)/400)/|
|00005da0| 32 0d 44 02 29 20 20 20 | 70 25 3d 73 74 31 2b 32 |2.D.) |p%=st1+2|
|00005db0| 34 2b 28 28 46 2d 31 29 | 2a 38 34 29 3a 70 25 3d |4+((F-1)|*84):p%=|
|00005dc0| 70 25 2d 28 46 57 25 2f | 32 29 0d 44 11 23 20 20 |p%-(FW%/|2).D.# |
|00005dd0| 20 c8 99 22 46 6f 6e 74 | 5f 50 61 69 6e 74 22 2c | .."Font|_Paint",|
|00005de0| 2c 4b 24 2c 26 31 30 2c | 70 25 2c 31 36 0d 44 20 |,K$,&10,|p%,16.D |
|00005df0| 07 20 20 cd 0d 44 2f 06 | 20 ed 0d 44 30 28 20 c8 |. ..D/.| ..D0( .|
|00005e00| 99 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 53 |."OS_Spr|iteOp",S|
|00005e10| 52 52 30 2c 53 52 52 31 | 2c 53 52 52 32 2c 53 52 |RR0,SRR1|,SRR2,SR|
|00005e20| 52 33 0d 44 31 45 20 f4 | 53 59 53 22 57 69 6d 70 |R3.D1E .|SYS"Wimp|
|00005e30| 5f 46 6f 72 63 65 52 65 | 64 72 61 77 22 2c 77 68 |_ForceRe|draw",wh|
|00005e40| 61 6e 64 6c 65 31 25 2c | 32 38 2c 2d 36 33 38 2c |andle1%,|28,-638,|
|00005e50| 31 30 36 38 2c 2d 35 36 | 34 3a 50 52 4f 43 6d 69 |1068,-56|4:PROCmi|
|00005e60| 6e 69 5f 70 6f 6c 6c 0d | 44 33 11 20 f2 72 61 64 |ni_poll.|D3. .rad|
|00005e70| 69 6f 5f 63 6c 69 63 6b | 0d 44 3e 06 20 e1 0d 44 |io_click|.D>. ..D|
|00005e80| 4d 11 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |M. .----|-------.|
|00005e90| 44 5c 18 20 dd f2 64 61 | 74 61 5f 62 61 6e 6b 28 |D\. ..da|ta_bank(|
|00005ea0| 70 70 61 74 68 24 29 0d | 44 6b 15 20 c8 99 22 48 |ppath$).|Dk. .."H|
|00005eb0| 6f 75 72 67 6c 61 73 73 | 5f 4f 6e 22 0d 44 7a 2a |ourglass|_On".Dz*|
|00005ec0| 20 c8 99 22 4f 53 5f 46 | 69 6c 65 22 2c 31 37 2c | .."OS_F|ile",17,|
|00005ed0| 70 70 61 74 68 24 20 b8 | 20 2c 2c 2c 2c 73 70 65 |ppath$ .| ,,,,spe|
|00005ee0| 6c 6c 5f 6c 65 6e 0d 44 | 89 25 20 c8 99 22 4f 53 |ll_len.D|.% .."OS|
|00005ef0| 5f 46 69 6c 65 22 2c 31 | 36 2c 70 70 61 74 68 24 |_File",1|6,ppath$|
|00005f00| 2c 73 70 65 6c 6c 5f 61 | 72 65 61 0d 44 98 19 20 |,spell_a|rea.D.. |
|00005f10| e3 20 6c 6f 6f 70 3d 30 | 20 b8 20 73 70 65 6c 6c |. loop=0| . spell|
|00005f20| 5f 6c 65 6e 0d 44 a7 33 | 20 20 e7 20 3f 28 73 70 |_len.D.3| . ?(sp|
|00005f30| 65 6c 6c 5f 61 72 65 61 | 2b 6c 6f 6f 70 29 3c 33 |ell_area|+loop)<3|
|00005f40| 32 20 3f 28 73 70 65 6c | 6c 5f 61 72 65 61 2b 6c |2 ?(spel|l_area+l|
|00005f50| 6f 6f 70 29 3d 31 33 0d | 44 b6 06 20 ed 0d 44 c5 |oop)=13.|D.. ..D.|
|00005f60| 1f 20 3f 28 73 70 65 6c | 6c 5f 61 72 65 61 2b 73 |. ?(spel|l_area+s|
|00005f70| 70 65 6c 6c 5f 6c 65 6e | 29 3d 31 33 0d 44 d4 04 |pell_len|)=13.D..|
|00005f80| 0d 44 e3 13 20 77 6f 72 | 64 5f 63 6f 75 6e 74 65 |.D.. wor|d_counte|
|00005f90| 72 3d 30 0d 44 f2 16 20 | e3 20 46 3d 31 20 b8 20 |r=0.D.. |. F=1 . |
|00005fa0| 73 70 65 6c 6c 5f 6c 65 | 6e 0d 45 01 2a 20 20 e7 |spell_le|n.E.* .|
|00005fb0| 20 3f 28 73 70 65 6c 6c | 5f 61 72 65 61 2b 46 29 | ?(spell|_area+F)|
|00005fc0| 3d 31 33 20 77 6f 72 64 | 5f 63 6f 75 6e 74 65 72 |=13 word|_counter|
|00005fd0| 2b 3d 31 0d 45 10 06 20 | ed 0d 45 1f 0e 20 6c 3d |+=1.E.. |..E.. l=|
|00005fe0| a9 70 70 61 74 68 24 0d | 45 2e 1f 20 f5 3a 6c 3d |.ppath$.|E.. .:l=|
|00005ff0| 6c 2d 31 3a fd 20 c1 70 | 70 61 74 68 24 2c 6c 2c |l-1:. .p|path$,l,|
|00006000| 31 29 3d 22 2e 22 0d 45 | 3d 3a 20 24 6e 61 6d 65 |1)=".".E|=: $name|
|00006010| 25 3d 22 42 6f 74 74 6c | 65 20 2d 20 22 2b c2 70 |%="Bottl|e - "+.p|
|00006020| 70 61 74 68 24 2c a9 70 | 70 61 74 68 24 2d 28 6c |path$,.p|path$-(l|
|00006030| 29 29 3a f2 75 70 64 61 | 74 65 5f 74 69 74 6c 65 |)):.upda|te_title|
|00006040| 0d 45 4c 18 20 c8 99 22 | 48 6f 75 72 67 6c 61 73 |.EL. .."|Hourglas|
|00006050| 73 5f 53 6d 61 73 68 22 | 0d 45 5b 06 20 e1 0d 45 |s_Smash"|.E[. ..E|
|00006060| 6a 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 45 |j. .----|------.E|
|00006070| 79 11 20 dd f2 67 65 74 | 5f 61 5f 77 6f 72 64 0d |y. ..get|_a_word.|
|00006080| 45 88 10 20 6f 6c 64 5f | 77 64 24 3d 77 64 24 0d |E.. old_|wd$=wd$.|
|00006090| 45 97 06 20 f5 0d 45 a6 | 1c 20 20 6c 3d b3 28 77 |E.. ..E.|. l=.(w|
|000060a0| 6f 72 64 5f 63 6f 75 6e | 74 65 72 29 3a 6c 2d 3d |ord_coun|ter):l-=|
|000060b0| 31 0d 45 b5 0d 20 20 e7 | 20 6c 3d 30 20 8c 0d 45 |1.E.. .| l=0 ..E|
|000060c0| c4 17 20 20 20 77 64 31 | 24 3d 24 73 70 65 6c 6c |.. wd1|$=$spell|
|000060d0| 5f 61 72 65 61 0d 45 d3 | 07 20 20 cc 0d 45 e2 1e |_area.E.|. ..E..|
|000060e0| 20 20 20 6c 6f 6f 70 32 | 3d 30 3a 6c 6f 6f 70 3d | loop2|=0:loop=|
|000060f0| 73 70 65 6c 6c 5f 61 72 | 65 61 0d 45 f1 08 20 20 |spell_ar|ea.E.. |
|00006100| 20 f5 0d 46 00 1e 20 20 | 20 20 f5 3a 6c 6f 6f 70 | ..F.. | .:loop|
|00006110| 2b 3d 31 3a fd 20 3f 28 | 6c 6f 6f 70 29 3d 31 33 |+=1:. ?(|loop)=13|
|00006120| 0d 46 0f 1f 20 20 20 20 | 77 64 31 24 3d 24 28 6c |.F.. |wd1$=$(l|
|00006130| 6f 6f 70 2b 31 29 3a 6c | 6f 6f 70 32 2b 3d 31 0d |oop+1):l|oop2+=1.|
|00006140| 46 1e 10 20 20 20 fd 20 | 6c 6f 6f 70 32 3d 6c 0d |F.. . |loop2=l.|
|00006150| 46 2d 07 20 20 cd 0d 46 | 3c 04 0d 46 4b 12 20 20 |F-. ..F|<..FK. |
|00006160| 6c 3d a7 77 64 31 24 2c | 22 2c 22 29 0d 46 5a 0d |l=.wd1$,|",").FZ.|
|00006170| 20 20 e7 20 6c 3d 30 20 | 8c 0d 46 69 18 20 20 20 | . l=0 |..Fi. |
|00006180| 77 64 24 3d 77 64 31 24 | 3a 63 6c 75 65 24 3d 22 |wd$=wd1$|:clue$="|
|00006190| 22 0d 46 78 07 20 20 cc | 0d 46 87 15 20 20 20 77 |".Fx. .|.F.. w|
|000061a0| 64 24 3d c0 77 64 31 24 | 2c 6c 2d 31 29 0d 46 96 |d$=.wd1$|,l-1).F.|
|000061b0| 1b 20 20 20 63 6c 75 65 | 24 3d c2 77 64 31 24 2c |. clue|$=.wd1$,|
|000061c0| a9 77 64 31 24 2d 6c 29 | 0d 46 a5 07 20 20 cd 0d |.wd1$-l)|.F.. ..|
|000061d0| 46 b4 1d 20 fd 20 77 64 | 24 3c 3e 6f 6c 64 5f 77 |F.. . wd|$<>old_w|
|000061e0| 64 24 20 80 20 a9 77 64 | 24 3c 31 36 0d 46 c3 14 |d$ . .wd|$<16.F..|
|000061f0| 20 e7 20 a9 77 64 24 3c | 32 20 e5 20 8d 70 57 45 | . .wd$<|2 . .pWE|
|00006200| 0d 46 c4 0d 20 f2 68 61 | 6e 67 6d 61 6e 0d 46 c5 |.F.. .ha|ngman.F.|
|00006210| 31 20 e3 20 46 3d 31 20 | b8 20 33 3a 48 69 6e 74 |1 . F=1 |. 3:Hint|
|00006220| 73 24 28 46 29 3d 22 22 | 3a ed 3a 6b 6c 3d 31 3a |s$(F)=""|:.:kl=1:|
|00006230| 68 69 6e 74 73 5f 67 69 | 76 65 6e 25 3d 30 0d 46 |hints_gi|ven%=0.F|
|00006240| c6 25 20 e7 20 63 6c 75 | 65 24 3c 3e 22 22 20 48 |.% . clu|e$<>"" H|
|00006250| 69 6e 74 73 24 28 31 29 | 3d 63 6c 75 65 24 3a 6b |ints$(1)|=clue$:k|
|00006260| 6c 3d 32 0d 46 c7 0f 20 | e3 20 46 3d 6b 6c 20 b8 |l=2.F.. |. F=kl .|
|00006270| 20 33 0d 46 c8 43 20 20 | 61 3d b3 28 a9 77 64 24 | 3.F.C |a=.(.wd$|
|00006280| 29 3a e7 20 48 69 6e 74 | 73 24 28 46 29 3c 3e c1 |):. Hint|s$(F)<>.|
|00006290| 77 64 24 2c 61 2c 31 29 | 20 48 69 6e 74 73 24 28 |wd$,a,1)| Hints$(|
|000062a0| 46 29 3d c1 77 64 24 2c | 61 2c 31 29 20 8b 20 e5 |F)=.wd$,|a,1) . .|
|000062b0| 20 8d 60 48 46 0d 46 c9 | 06 20 ed 0d 46 ca 0f 20 | .`HF.F.|. ..F.. |
|000062c0| e3 20 46 3d 30 20 b8 20 | 32 35 0d 46 cb 43 20 20 |. F=0 . |25.F.C |
|000062d0| f2 69 72 65 61 64 28 32 | 38 2b 46 2c 77 68 61 6e |.iread(2|8+F,whan|
|000062e0| 64 6c 65 31 25 29 3a e7 | 20 61 24 3d 22 20 22 20 |dle1%):.| a$=" " |
|000062f0| f2 69 73 65 74 28 32 38 | 2b 46 2c bd 28 36 35 2b |.iset(28|+F,.(65+|
|00006300| 46 29 2c 77 68 61 6e 64 | 6c 65 31 25 29 0d 46 cc |F),whand|le1%).F.|
|00006310| 06 20 ed 0d 46 d2 06 20 | e1 0d 46 e1 10 20 f4 2d |. ..F.. |..F.. .-|
|00006320| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 46 f0 1f 20 dd f2 |--------|-.F.. ..|
|00006330| 70 6c 69 6e 62 6f 78 28 | 62 78 25 2c 62 79 25 2c |plinbox(|bx%,by%,|
|00006340| 77 64 25 2c 68 74 25 29 | 0d 46 ff 2f 20 c8 99 22 |wd%,ht%)|.F./ .."|
|00006350| 57 69 6d 70 5f 53 65 74 | 43 6f 6c 6f 75 72 22 2c |Wimp_Set|Colour",|
|00006360| 34 3a c8 93 20 c8 90 20 | 62 78 25 2c 62 79 25 2c |4:.. .. |bx%,by%,|
|00006370| 77 64 25 2c 68 74 25 0d | 47 0e 37 20 c8 99 22 57 |wd%,ht%.|G.7 .."W|
|00006380| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 31 |imp_SetC|olour",1|
|00006390| 3a c8 93 20 c8 90 20 62 | 78 25 2b 34 2c 62 79 25 |:.. .. b|x%+4,by%|
|000063a0| 2b 34 2c 77 64 25 2d 38 | 2c 68 74 25 2d 38 0d 47 |+4,wd%-8|,ht%-8.G|
|000063b0| 1d 19 20 c8 99 22 57 69 | 6d 70 5f 53 65 74 43 6f |.. .."Wi|mp_SetCo|
|000063c0| 6c 6f 75 72 22 2c 30 0d | 47 2c 1c 20 c8 93 20 c8 |lour",0.|G,. .. .|
|000063d0| 90 20 62 78 25 2c 62 79 | 25 2b 32 2c 32 2c 68 74 |. bx%,by|%+2,2,ht|
|000063e0| 25 2d 32 0d 47 3b 20 20 | c8 93 20 c8 90 20 62 78 |%-2.G; |.. .. bx|
|000063f0| 25 2c 62 79 25 2b 68 74 | 25 2d 32 2c 77 64 25 2d |%,by%+ht|%-2,wd%-|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
