home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1992-11-28 | 71.0 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 41 42 |@0000900|0,0001AB|
|00000040| 44 30 00 11 d0 ab 01 00 | 20 9c 01 00 d0 1b 01 00 |D0......| .......|
|00000050| 0d 00 0a 1c 20 f4 20 3e | 24 2e 21 57 6f 72 64 5f |.... . >|$.!Word_|
|00000060| 53 2e 21 52 55 4e 49 4d | 41 47 45 42 0d 00 14 15 |S.!RUNIM|AGEB....|
|00000070| 20 c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 6e | .."Hour|glass_On|
|00000080| 22 0d 00 1e 31 20 f2 73 | 65 74 75 70 3a f2 72 65 |"...1 .s|etup:.re|
|00000090| 61 64 5f 76 65 72 3a f2 | 73 65 74 75 70 32 3a f2 |ad_ver:.|setup2:.|
|000000a0| 73 65 74 75 70 33 3a f2 | 63 68 65 63 6b 5f 70 61 |setup3:.|check_pa|
|000000b0| 74 68 0d 00 21 47 20 e7 | 20 72 69 73 63 24 3e 3d |th..!G .| risc$>=|
|000000c0| 22 33 22 20 ff 28 22 52 | 4d 45 4e 53 55 52 45 20 |"3" .("R|MENSURE |
|000000d0| 44 72 61 77 46 69 6c 65 | 20 30 2e 30 20 52 4d 4c |DrawFile| 0.0 RML|
|000000e0| 4f 41 44 20 3c 4f 62 65 | 79 24 44 69 72 3e 2e 44 |OAD <Obe|y$Dir>.D|
|000000f0| 72 61 77 46 69 6c 65 22 | 29 0d 00 28 24 20 ee 20 |rawFile"|)..($ . |
|00000100| 85 20 e7 20 a4 77 69 6d | 70 65 72 72 6f 72 20 c8 |. . .wim|perror .|
|00000110| 98 20 8b 20 f2 65 72 72 | 6f 72 3a c8 98 0d 00 32 |. . .err|or:....2|
|00000120| 2b 20 f2 72 6d 28 22 4d | 55 41 35 22 29 3a 72 65 |+ .rm("M|UA5"):re|
|00000130| 67 24 3d 22 2e 22 2b 74 | 65 78 74 24 3a f2 73 65 |g$="."+t|ext$:.se|
|00000140| 74 75 70 5f 68 65 6c 70 | 0d 00 3c 2d 20 f2 63 6f |tup_help|..<- .co|
|00000150| 6c 6f 75 72 6d 65 6e 75 | 28 63 6f 6c 6d 65 6e 75 |lourmenu|(colmenu|
|00000160| 2c 31 29 3a f2 6d 61 69 | 6e 6d 65 6e 75 28 6d 6d |,1):.mai|nmenu(mm|
|00000170| 65 6e 75 25 29 0d 00 46 | 80 20 f2 62 6f 72 64 65 |enu%)..F|. .borde|
|00000180| 72 73 28 62 6f 72 64 65 | 72 5f 70 61 74 68 24 29 |rs(borde|r_path$)|
|00000190| 3a e7 20 62 6f 72 64 65 | 72 73 24 28 31 29 3d 22 |:. borde|rs$(1)="|
|000001a0| 4e 6f 6e 65 22 20 62 6f | 72 64 65 72 5f 70 61 74 |None" bo|rder_pat|
|000001b0| 68 24 3d 73 75 70 5f 70 | 61 74 68 24 2b 22 62 6f |h$=sup_p|ath$+"bo|
|000001c0| 72 64 65 72 73 22 3a 64 | 65 66 61 75 6c 74 5f 70 |rders":d|efault_p|
|000001d0| 24 3d 62 6f 72 64 65 72 | 5f 70 61 74 68 24 3a f2 |$=border|_path$:.|
|000001e0| 62 6f 72 64 65 72 73 28 | 62 6f 72 64 65 72 5f 70 |borders(|border_p|
|000001f0| 61 74 68 24 29 0d 00 50 | 2f 20 f2 62 6f 72 64 65 |ath$)..P|/ .borde|
|00000200| 72 73 6d 65 6e 75 28 62 | 6f 72 64 65 72 73 6d 65 |rsmenu(b|ordersme|
|00000210| 6e 75 25 29 3a f2 64 65 | 66 69 6e 65 5f 70 61 74 |nu%):.de|fine_pat|
|00000220| 74 65 72 6e 0d 00 5a 47 | 20 f2 73 74 61 72 74 75 |tern..ZG| .startu|
|00000230| 70 5f 6d 65 6d 3a f2 67 | 72 61 62 5f 73 65 74 75 |p_mem:.g|rab_setu|
|00000240| 70 3a f2 72 65 61 64 66 | 6f 6e 74 73 3a f2 66 6f |p:.readf|onts:.fo|
|00000250| 6e 74 6d 65 6e 75 28 66 | 6f 6e 74 6d 65 6e 75 25 |ntmenu(f|ontmenu%|
|00000260| 2c 31 29 3a f2 73 65 74 | 75 70 34 0d 00 64 45 20 |,1):.set|up4..dE |
|00000270| 69 6d 5f 74 79 70 65 24 | 3d 22 62 6f 72 64 65 72 |im_type$|="border|
|00000280| 22 3a 44 4e 24 3d 28 70 | 61 74 68 24 2b 22 2e 62 |":DN$=(p|ath$+".b|
|00000290| 61 6e 6e 65 72 31 22 29 | 3a f2 69 6d 70 6f 72 74 |anner1")|:.import|
|000002a0| 5f 66 69 6c 65 3a 73 61 | 76 65 64 5f 6f 6b 3d b9 |_file:sa|ved_ok=.|
|000002b0| 0d 00 6e 18 20 c8 99 22 | 48 6f 75 72 67 6c 61 73 |..n. .."|Hourglas|
|000002c0| 73 5f 53 6d 61 73 68 22 | 0d 00 78 5a 20 e7 20 63 |s_Smash"|..xZ . c|
|000002d0| 6f 6d 64 24 3c 3e 22 22 | 20 f2 6c 6f 61 64 28 63 |omd$<>""| .load(c|
|000002e0| 6f 6d 64 24 29 3a e7 20 | c2 63 6f 6d 64 24 2c 37 |omd$):. |.comd$,7|
|000002f0| 29 3c 3e 22 41 5a 66 61 | 75 6c 74 22 20 24 6e 61 |)<>"AZfa|ult" $na|
|00000300| 6d 65 25 3d 63 6f 6d 64 | 24 3a f2 75 70 64 61 74 |me%=comd|$:.updat|
|00000310| 65 5f 74 69 74 6c 65 3a | 73 61 76 65 64 5f 6f 6b |e_title:|saved_ok|
|00000320| 3d b9 0d 00 82 26 20 e7 | 20 63 6f 6d 64 24 3c 3e |=....& .| comd$<>|
|00000330| 22 22 20 63 6c 6f 73 65 | 64 25 3d a3 20 8b 20 63 |"" close|d%=. . c|
|00000340| 6c 6f 73 65 64 25 3d b9 | 0d 00 8c 1e 20 ee 20 85 |losed%=.|.... . .|
|00000350| 20 e7 20 a4 77 69 6d 70 | 65 72 72 6f 72 20 8b 20 | . .wimp|error . |
|00000360| f2 65 72 72 6f 72 0d 00 | 96 06 20 f5 0d 00 a0 31 |.error..|.. ....1|
|00000370| 20 e7 20 63 6c 6f 73 65 | 64 25 20 f2 69 63 6f 6e | . close|d% .icon|
|00000380| 62 61 72 77 61 69 74 3a | e7 20 71 75 69 74 25 3d |barwait:|. quit%=|
|00000390| b9 20 f2 63 6c 6f 73 65 | 5f 64 6f 77 6e 0d 00 aa |. .close|_down...|
|000003a0| 0c 20 f2 72 65 67 62 6f | 78 0d 00 b4 3b 20 f2 76 |. .regbo|x...; .v|
|000003b0| 76 31 28 77 68 61 6e 64 | 6c 65 31 25 29 3a c8 99 |v1(whand|le1%):..|
|000003c0| 22 57 69 6d 70 5f 53 65 | 74 43 61 72 65 74 50 6f |"Wimp_Se|tCaretPo|
|000003d0| 73 69 74 69 6f 6e 22 2c | 77 68 61 6e 64 6c 65 31 |sition",|whandle1|
|000003e0| 25 2c 2d 31 0d 00 be 2b | 20 c8 99 22 57 69 6d 70 |%,-1...+| .."Wimp|
|000003f0| 5f 53 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_SetCare|tPositio|
|00000400| 6e 22 2c 77 68 61 6e 64 | 6c 65 31 25 2c 2d 31 0d |n",whand|le1%,-1.|
|00000410| 00 c8 3d 20 e7 20 73 61 | 76 65 5f 64 69 61 3d 31 |..= . sa|ve_dia=1|
|00000420| 20 f2 6f 70 65 6e 77 69 | 6e 64 6f 77 32 28 77 68 | .openwi|ndow2(wh|
|00000430| 61 6e 64 6c 65 38 25 29 | 3a f2 63 61 72 65 74 28 |andle8%)|:.caret(|
|00000440| 30 2c 77 68 61 6e 64 6c | 65 38 25 29 0d 00 d2 1d |0,whandl|e8%)....|
|00000450| 20 71 75 69 74 25 3d a3 | 3a 63 6c 6f 73 65 64 25 | quit%=.|:closed%|
|00000460| 3d a3 3a 65 6e 64 25 3d | a3 0d 00 dc 06 20 f5 0d |=.:end%=|..... ..|
|00000470| 00 f0 0b 20 20 f2 70 6f | 6c 6c 0d 00 fa 1d 20 fd |... .po|ll.... .|
|00000480| 20 71 75 69 74 25 20 84 | 20 63 6c 6f 73 65 64 25 | quit% .| closed%|
|00000490| 20 84 20 65 6e 64 25 0d | 01 0e 18 20 e7 20 71 75 | . end%.|... . qu|
|000004a0| 69 74 25 20 f2 63 6c 6f | 73 65 5f 64 6f 77 6e 0d |it% .clo|se_down.|
|000004b0| 01 18 30 20 63 6c 6f 73 | 65 64 25 3d b9 3a f2 63 |..0 clos|ed%=.:.c|
|000004c0| 6c 6f 73 65 61 6c 6c 3a | c8 99 22 57 69 6d 70 5f |loseall:|.."Wimp_|
|000004d0| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 2d 31 0d |CreateMe|nu",,-1.|
|000004e0| 01 22 0e 20 fd 20 71 75 | 69 74 25 3d b9 0d 01 2c |.". . qu|it%=...,|
|000004f0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 01 36 |. .-----|-----..6|
|00000500| 11 20 dd f2 63 6c 6f 73 | 65 5f 64 6f 77 6e 0d 01 |. ..clos|e_down..|
|00000510| 40 36 20 f2 63 6c 6f 73 | 65 61 6c 6c 32 3a c8 99 |@6 .clos|eall2:..|
|00000520| 22 4d 65 73 73 61 67 65 | 54 72 61 6e 73 5f 43 6c |"Message|Trans_Cl|
|00000530| 6f 73 65 46 69 6c 65 22 | 2c 6d 65 73 73 61 67 65 |oseFile"|,message|
|00000540| 5f 70 74 72 0d 01 4a 23 | 20 c8 99 22 58 4f 53 5f |_ptr..J#| .."XOS_|
|00000550| 4d 6f 64 75 6c 65 22 2c | 37 2c 2c 6d 65 73 73 61 |Module",|7,,messa|
|00000560| 67 65 5f 61 72 65 61 0d | 01 54 37 20 24 62 6c 6f |ge_area.|.T7 $blo|
|00000570| 63 6b 25 3d 22 54 41 53 | 4b 22 3a c8 99 22 57 69 |ck%="TAS|K":.."Wi|
|00000580| 6d 70 5f 43 6c 6f 73 65 | 44 6f 77 6e 22 2c 74 61 |mp_Close|Down",ta|
|00000590| 73 6b 25 2c 21 62 6c 6f | 63 6b 25 3a c8 98 0d 01 |sk%,!blo|ck%:....|
|000005a0| 5e 06 20 e1 0d 01 68 10 | 20 f4 2d 2d 2d 2d 2d 2d |^. ...h.| .------|
|000005b0| 2d 2d 2d 2d 0d 01 72 12 | 20 dd f2 69 63 6f 6e 62 |----..r.| ..iconb|
|000005c0| 61 72 77 61 69 74 0d 01 | 7c 26 20 65 6e 64 25 3d |arwait..||& end%=|
|000005d0| a3 3a 63 6c 6f 73 65 64 | 25 3d a3 3a 71 75 69 74 |.:closed|%=.:quit|
|000005e0| 25 3d a3 3a 69 62 77 61 | 69 74 3d b9 0d 01 86 06 |%=.:ibwa|it=.....|
|000005f0| 20 f5 0d 01 90 24 20 c8 | 99 22 57 69 6d 70 5f 50 | ....$ .|."Wimp_P|
|00000600| 6f 6c 6c 22 2c 2c 62 6c | 6f 63 6b 25 20 b8 20 72 |oll",,bl|ock% . r|
|00000610| 65 61 73 6f 6e 25 0d 01 | 9a 11 20 c8 8e 20 72 65 |eason%..|.. .. re|
|00000620| 61 73 6f 6e 25 20 ca 0d | 01 a4 0f 20 c9 20 36 3a |ason% ..|... . 6:|
|00000630| f2 6d 6f 75 73 65 0d 01 | ae 26 20 c9 20 38 3a c8 |.mouse..|.& . 8:.|
|00000640| 99 22 57 69 6d 70 5f 50 | 72 6f 63 65 73 73 4b 65 |."Wimp_P|rocessKe|
|00000650| 79 22 2c 62 6c 6f 63 6b | 25 21 32 34 0d 01 b8 18 |y",block|%!24....|
|00000660| 20 c9 20 39 3a f2 69 63 | 6f 6e 62 61 72 6f 70 74 | . 9:.ic|onbaropt|
|00000670| 69 6f 6e 73 0d 01 c2 19 | 20 c9 20 31 37 2c 31 38 |ions....| . 17,18|
|00000680| 3a f2 69 63 6f 6e 72 65 | 63 65 69 76 65 0d 01 cc |:.iconre|ceive...|
|00000690| 06 20 cb 0d 01 d6 13 20 | fd 20 65 6e 64 25 20 84 |. ..... |. end% .|
|000006a0| 20 71 75 69 74 25 0d 01 | d7 0d 20 69 62 77 61 69 | quit%..|.. ibwai|
|000006b0| 74 3d a3 0d 01 e0 06 20 | e1 0d 01 ea 11 20 f4 2d |t=..... |..... .-|
|000006c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 01 f4 15 20 dd |--------|--.... .|
|000006d0| f2 69 63 6f 6e 62 61 72 | 6f 70 74 69 6f 6e 73 0d |.iconbar|options.|
|000006e0| 01 fe 14 20 63 68 6f 69 | 63 65 25 3d 21 62 6c 6f |... choi|ce%=!blo|
|000006f0| 63 6b 25 0d 02 08 13 20 | e7 20 73 61 76 65 64 5f |ck%.... |. saved_|
|00000700| 6f 6b 3d a3 20 8c 0d 02 | 12 24 20 20 e7 20 63 68 |ok=. ...|.$ . ch|
|00000710| 6f 69 63 65 25 3d 31 20 | f2 76 65 72 69 66 79 73 |oice%=1 |.verifys|
|00000720| 68 75 74 64 6f 77 6e 32 | 3a e1 0d 02 1c 06 20 cc |hutdown2|:..... .|
|00000730| 0d 02 26 16 20 20 65 6e | 64 25 3d b9 3a 71 75 69 |..&. en|d%=.:qui|
|00000740| 74 25 3d b9 3a e1 0d 02 | 30 06 20 cd 0d 02 3a 06 |t%=.:...|0. ...:.|
|00000750| 20 e1 0d 02 44 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ...D. .|--------|
|00000760| 2d 2d 0d 02 4e 12 20 dd | f2 69 63 6f 6e 72 65 63 |--..N. .|.iconrec|
|00000770| 65 69 76 65 0d 02 58 13 | 20 c8 8e 20 62 6c 6f 63 |eive..X.| .. bloc|
|00000780| 6b 25 21 31 36 20 ca 0d | 02 62 12 20 c9 20 30 3a |k%!16 ..|.b. . 0:|
|00000790| 71 75 69 74 25 3d b9 3a | e1 0d 02 6c 08 20 c9 20 |quit%=.:|...l. . |
|000007a0| 33 0d 02 76 19 20 20 e7 | 20 62 6c 6f 63 6b 25 21 |3..v. .| block%!|
|000007b0| 34 30 3d 26 32 30 30 30 | 20 8c 0d 02 80 13 20 20 |40=&2000| ..... |
|000007c0| 20 65 6e 64 25 3d b9 3a | f2 64 72 61 67 0d 02 8a | end%=.:|.drag...|
|000007d0| 07 20 20 cd 0d 02 94 15 | 20 c9 20 35 3a f2 64 6f |. .....| . 5:.do|
|000007e0| 75 62 6c 65 63 6c 69 63 | 6b 0d 02 9e 1c 20 c9 20 |ubleclic|k.... . |
|000007f0| 26 34 30 30 43 31 3a f2 | 6d 6f 64 65 5f 63 68 61 |&400C1:.|mode_cha|
|00000800| 6e 67 65 64 32 0d 02 a8 | 06 20 cb 0d 02 b2 06 20 |nged2...|. ..... |
|00000810| e1 0d 02 bc 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|00000820| 2d 0d 02 c6 0f 20 dd f2 | 63 6c 6f 73 65 61 6c 6c |-.... ..|closeall|
|00000830| 0d 02 d0 3f 20 62 6c 6f | 63 6b 25 21 30 3d 77 68 |...? blo|ck%!0=wh|
|00000840| 61 6e 64 6c 65 31 25 3a | c8 99 22 57 69 6d 70 5f |andle1%:|.."Wimp_|
|00000850| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|00000860| 6f 63 6b 25 3a f2 63 6c | 6f 73 65 61 6c 6c 32 0d |ock%:.cl|oseall2.|
|00000870| 02 da 06 20 e1 0d 02 e4 | 10 20 f4 2d 2d 2d 2d 2d |... ....|. .-----|
|00000880| 2d 2d 2d 2d 2d 0d 02 ee | 10 20 dd f2 63 6c 6f 73 |-----...|. ..clos|
|00000890| 65 61 6c 6c 32 0d 02 f8 | 34 20 62 6c 6f 63 6b 25 |eall2...|4 block%|
|000008a0| 21 30 3d 77 68 61 6e 64 | 6c 65 38 25 3a c8 99 22 |!0=whand|le8%:.."|
|000008b0| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|000008c0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 03 02 35 20 62 6c |",,block|%...5 bl|
|000008d0| 6f 63 6b 25 21 30 3d 77 | 68 61 6e 64 6c 65 31 31 |ock%!0=w|handle11|
|000008e0| 25 3a c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |%:.."Wim|p_CloseW|
|000008f0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 03 |indow",,|block%..|
|00000900| 0c 35 20 62 6c 6f 63 6b | 25 21 30 3d 77 68 61 6e |.5 block|%!0=whan|
|00000910| 64 6c 65 31 34 25 3a c8 | 99 22 57 69 6d 70 5f 43 |dle14%:.|."Wimp_C|
|00000920| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |loseWind|ow",,blo|
|00000930| 63 6b 25 0d 03 16 34 20 | 62 6c 6f 63 6b 25 21 30 |ck%...4 |block%!0|
|00000940| 3d 66 6f 6e 74 5f 77 69 | 6e 25 3a c8 99 22 57 69 |=font_wi|n%:.."Wi|
|00000950| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00000960| 2c 62 6c 6f 63 6b 25 0d | 03 20 65 20 62 6c 6f 63 |,block%.|. e bloc|
|00000970| 6b 25 21 30 3d 67 72 69 | 64 5f 73 69 7a 65 25 3a |k%!0=gri|d_size%:|
|00000980| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |.."Wimp_|CloseWin|
|00000990| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 3a 62 6c 6f |dow",,bl|ock%:blo|
|000009a0| 63 6b 25 21 30 3d 6c 69 | 73 74 5f 77 69 6e 25 3a |ck%!0=li|st_win%:|
|000009b0| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |.."Wimp_|CloseWin|
|000009c0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 0d 03 2a 33 |dow",,bl|ock%..*3|
|000009d0| 20 62 6c 6f 63 6b 25 21 | 30 3d 6c 61 79 5f 77 69 | block%!|0=lay_wi|
|000009e0| 6e 25 3a c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |n%:.."Wi|mp_Close|
|000009f0| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00000a00| 03 34 35 20 62 6c 6f 63 | 6b 25 21 30 3d 74 6f 6f |.45 bloc|k%!0=too|
|00000a10| 6c 73 5f 77 69 6e 25 3a | c8 99 22 57 69 6d 70 5f |ls_win%:|.."Wimp_|
|00000a20| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|00000a30| 6f 63 6b 25 0d 03 3e 06 | 20 e1 0d 03 48 10 20 f4 |ock%..>.| ...H. .|
|00000a40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 03 52 13 20 dd |--------|--..R. .|
|00000a50| f2 6d 6f 64 65 5f 63 68 | 61 6e 67 65 64 0d 03 5c |.mode_ch|anged..\|
|00000a60| 0f 20 73 61 76 65 5f 64 | 69 61 3d 30 0d 03 66 3e |. save_d|ia=0..f>|
|00000a70| 20 69 6e 25 21 30 3d 31 | 32 3a 69 6e 25 21 34 3d | in%!0=1|2:in%!4=|
|00000a80| 35 3a 69 6e 25 21 38 3d | 2d 31 3a c8 99 22 4f 53 |5:in%!8=|-1:.."OS|
|00000a90| 5f 52 65 61 64 56 64 75 | 56 61 72 69 61 62 6c 65 |_ReadVdu|Variable|
|00000aa0| 73 22 2c 69 6e 25 2c 6f | 75 25 0d 03 70 2a 20 74 |s",in%,o|u%..p* t|
|00000ab0| 6f 70 5f 79 3d 28 6f 75 | 25 21 30 29 2b 31 3a 74 |op_y=(ou|%!0)+1:t|
|00000ac0| 6f 70 5f 79 3d 28 32 5e | 6f 75 25 21 34 29 2a 74 |op_y=(2^|ou%!4)*t|
|00000ad0| 6f 70 5f 79 0d 03 7a 3e | 20 69 6e 25 21 30 3d 31 |op_y..z>| in%!0=1|
|00000ae0| 31 3a 69 6e 25 21 34 3d | 34 3a 69 6e 25 21 38 3d |1:in%!4=|4:in%!8=|
|00000af0| 2d 31 3a c8 99 22 4f 53 | 5f 52 65 61 64 56 64 75 |-1:.."OS|_ReadVdu|
|00000b00| 56 61 72 69 61 62 6c 65 | 73 22 2c 69 6e 25 2c 6f |Variable|s",in%,o|
|00000b10| 75 25 0d 03 84 2a 20 74 | 6f 70 5f 78 3d 28 6f 75 |u%...* t|op_x=(ou|
|00000b20| 25 21 30 29 2b 31 3a 74 | 6f 70 5f 78 3d 28 32 5e |%!0)+1:t|op_x=(2^|
|00000b30| 6f 75 25 21 34 29 2a 74 | 6f 70 5f 78 0d 03 8e 1a |ou%!4)*t|op_x....|
|00000b40| 20 e7 20 6f 6c 64 5f 73 | 74 79 6c 65 5f 6d 6f 64 | . old_s|tyle_mod|
|00000b50| 65 3c 3e eb 20 8c 0d 03 | 98 20 20 20 f2 67 72 61 |e<>. ...|. .gra|
|00000b60| 62 5f 73 65 74 75 70 3a | f2 73 74 79 6c 65 31 28 |b_setup:|.style1(|
|00000b70| 31 2c 30 2c 30 29 0d 03 | a2 06 20 cd 0d 03 ac 14 |1,0,0)..|.. .....|
|00000b80| 20 f2 76 76 31 28 77 68 | 61 6e 64 6c 65 31 25 29 | .vv1(wh|andle1%)|
|00000b90| 0d 03 b6 06 20 e1 0d 03 | c0 10 20 f4 2d 2d 2d 2d |.... ...|.. .----|
|00000ba0| 2d 2d 2d 2d 2d 2d 0d 03 | ca 14 20 dd f2 6d 6f 64 |------..|.. ..mod|
|00000bb0| 65 5f 63 68 61 6e 67 65 | 64 32 0d 03 d4 0f 20 73 |e_change|d2.... s|
|00000bc0| 61 76 65 5f 64 69 61 3d | 30 0d 03 de 3e 20 69 6e |ave_dia=|0...> in|
|00000bd0| 25 21 30 3d 31 32 3a 69 | 6e 25 21 34 3d 35 3a 69 |%!0=12:i|n%!4=5:i|
|00000be0| 6e 25 21 38 3d 2d 31 3a | c8 99 22 4f 53 5f 52 65 |n%!8=-1:|.."OS_Re|
|00000bf0| 61 64 56 64 75 56 61 72 | 69 61 62 6c 65 73 22 2c |adVduVar|iables",|
|00000c00| 69 6e 25 2c 6f 75 25 0d | 03 e8 2a 20 74 6f 70 5f |in%,ou%.|..* top_|
|00000c10| 79 3d 28 6f 75 25 21 30 | 29 2b 31 3a 74 6f 70 5f |y=(ou%!0|)+1:top_|
|00000c20| 79 3d 28 32 5e 6f 75 25 | 21 34 29 2a 74 6f 70 5f |y=(2^ou%|!4)*top_|
|00000c30| 79 0d 03 f2 3e 20 69 6e | 25 21 30 3d 31 31 3a 69 |y...> in|%!0=11:i|
|00000c40| 6e 25 21 34 3d 34 3a 69 | 6e 25 21 38 3d 2d 31 3a |n%!4=4:i|n%!8=-1:|
|00000c50| c8 99 22 4f 53 5f 52 65 | 61 64 56 64 75 56 61 72 |.."OS_Re|adVduVar|
|00000c60| 69 61 62 6c 65 73 22 2c | 69 6e 25 2c 6f 75 25 0d |iables",|in%,ou%.|
|00000c70| 03 fc 2a 20 74 6f 70 5f | 78 3d 28 6f 75 25 21 30 |..* top_|x=(ou%!0|
|00000c80| 29 2b 31 3a 74 6f 70 5f | 78 3d 28 32 5e 6f 75 25 |)+1:top_|x=(2^ou%|
|00000c90| 21 34 29 2a 74 6f 70 5f | 78 0d 04 06 1a 20 e7 20 |!4)*top_|x.... . |
|00000ca0| 6f 6c 64 5f 73 74 79 6c | 65 5f 6d 6f 64 65 3c 3e |old_styl|e_mode<>|
|00000cb0| eb 20 8c 0d 04 10 20 20 | 20 f2 67 72 61 62 5f 73 |. .... | .grab_s|
|00000cc0| 65 74 75 70 3a f2 73 74 | 79 6c 65 31 28 31 2c 30 |etup:.st|yle1(1,0|
|00000cd0| 2c 30 29 0d 04 1a 06 20 | cd 0d 04 24 06 20 e1 0d |,0).... |...$. ..|
|00000ce0| 04 2e 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00000cf0| 04 38 10 20 dd f2 6d 69 | 6e 69 5f 70 6f 6c 6c 0d |.8. ..mi|ni_poll.|
|00000d00| 04 42 08 20 54 3d 30 0d | 04 4c 06 20 f5 0d 04 56 |.B. T=0.|.L. ...V|
|00000d10| 28 20 20 c8 99 22 57 69 | 6d 70 5f 50 6f 6c 6c 22 |( .."Wi|mp_Poll"|
|00000d20| 2c 26 30 30 2c 62 6c 6f | 63 6b 25 20 b8 20 72 65 |,&00,blo|ck% . re|
|00000d30| 61 73 6f 6e 25 0d 04 60 | 12 20 20 c8 8e 20 72 65 |ason%..`|. .. re|
|00000d40| 61 73 6f 6e 25 20 ca 0d | 04 6a 13 20 20 20 c9 20 |ason% ..|.j. . |
|00000d50| 31 20 3a f2 72 65 64 72 | 61 77 0d 04 74 27 20 20 |1 :.redr|aw..t' |
|00000d60| 20 c9 20 32 20 3a c8 99 | 22 57 69 6d 70 5f 4f 70 | . 2 :..|"Wimp_Op|
|00000d70| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|00000d80| 25 0d 04 7e 07 20 20 cb | 0d 04 88 0a 20 20 54 2b |%..~. .|.... T+|
|00000d90| 3d 31 0d 04 92 0a 20 fd | 20 54 3e 33 0d 04 9c 06 |=1.... .| T>3....|
|00000da0| 20 e1 0d 04 a6 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|00000db0| 2d 2d 0d 04 b0 0b 20 dd | f2 70 6f 6c 6c 0d 04 ba |--.... .|.poll...|
|00000dc0| 10 20 f2 63 68 65 63 6b | 5f 6e 61 6d 65 0d 04 c4 |. .check|_name...|
|00000dd0| 27 20 c8 99 22 57 69 6d | 70 5f 50 6f 6c 6c 22 2c |' .."Wim|p_Poll",|
|00000de0| 26 30 30 2c 62 6c 6f 63 | 6b 25 20 b8 20 72 65 61 |&00,bloc|k% . rea|
|00000df0| 73 6f 6e 25 0d 04 ce 11 | 20 c8 8e 20 72 65 61 73 |son%....| .. reas|
|00000e00| 6f 6e 25 20 ca 0d 04 d8 | 12 20 20 c9 20 31 20 3a |on% ....|. . 1 :|
|00000e10| f2 72 65 64 72 61 77 0d | 04 e2 20 20 20 c9 20 32 |.redraw.|.. . 2|
|00000e20| 20 3a f2 6f 70 65 6e 77 | 69 6e 64 6f 77 28 62 6c | :.openw|indow(bl|
|00000e30| 6f 63 6b 25 21 30 29 0d | 04 ec 17 20 20 c9 20 33 |ock%!0).|... . 3|
|00000e40| 20 3a f2 77 68 69 63 68 | 5f 63 6c 6f 73 65 0d 04 | :.which|_close..|
|00000e50| f6 15 20 20 c9 20 36 20 | 3a f2 65 64 69 74 6d 6f |.. . 6 |:.editmo|
|00000e60| 75 73 65 0d 05 00 14 20 | 20 c9 20 37 20 3a f2 63 |use.... | . 7 :.c|
|00000e70| 61 6c 6c 73 61 76 65 0d | 05 0a 14 20 20 c9 20 38 |allsave.|... . 8|
|00000e80| 20 3a f2 6b 65 79 70 72 | 65 73 73 0d 05 14 18 20 | :.keypr|ess.... |
|00000e90| 20 c9 20 39 20 3a f2 6f | 70 74 69 6f 6e 73 65 6c | . 9 :.o|ptionsel|
|00000ea0| 65 63 74 0d 05 1e 1a 20 | 20 c9 20 31 37 2c 31 38 |ect.... | . 17,18|
|00000eb0| 3a f2 72 65 63 65 69 76 | 65 64 61 74 61 0d 05 28 |:.receiv|edata..(|
|00000ec0| 06 20 cb 0d 05 32 1d 20 | e7 20 6e 65 77 5f 66 69 |. ...2. |. new_fi|
|00000ed0| 74 74 69 6e 67 3d b9 20 | f2 66 69 74 74 69 6e 67 |tting=. |.fitting|
|00000ee0| 0d 05 3c 20 20 e7 20 66 | 6f 6e 74 5f 6e 6f 74 3d |..< . f|ont_not=|
|00000ef0| 31 20 f2 66 6f 6e 74 5f | 6e 6f 74 66 6f 75 6e 64 |1 .font_|notfound|
|00000f00| 0d 05 46 06 20 e1 0d 05 | 50 10 20 f4 2d 2d 2d 2d |..F. ...|P. .----|
|00000f10| 2d 2d 2d 2d 2d 2d 0d 05 | 5a 12 20 dd f2 77 68 69 |------..|Z. ..whi|
|00000f20| 63 68 5f 63 6c 6f 73 65 | 0d 05 64 41 20 e7 20 62 |ch_close|..dA . b|
|00000f30| 6c 6f 63 6b 25 21 30 3c | 3e 77 68 61 6e 64 6c 65 |lock%!0<|>whandle|
|00000f40| 31 25 20 c8 99 22 57 69 | 6d 70 5f 53 65 74 43 61 |1% .."Wi|mp_SetCa|
|00000f50| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 77 68 61 |retPosit|ion",wha|
|00000f60| 6e 64 6c 65 31 25 2c 2d | 31 0d 05 6e 2d 20 e7 20 |ndle1%,-|1..n- . |
|00000f70| 62 6c 6f 63 6b 25 21 30 | 3d 77 68 61 6e 64 6c 65 |block%!0|=whandle|
|00000f80| 31 25 20 f2 63 6c 6f 73 | 65 61 6c 6c 3a 63 6c 6f |1% .clos|eall:clo|
|00000f90| 73 65 64 25 3d b9 0d 05 | 78 1c 20 e7 20 62 6c 6f |sed%=...|x. . blo|
|00000fa0| 63 6b 25 21 30 3d 77 68 | 61 6e 64 6c 65 31 31 25 |ck%!0=wh|andle11%|
|00000fb0| 20 8c 0d 05 82 19 20 20 | 62 6f 72 64 65 72 5f 70 | ..... |border_p|
|00000fc0| 61 74 68 24 3d 6f 6c 64 | 5f 70 24 0d 05 8c 22 20 |ath$=old|_p$..." |
|00000fd0| 20 c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 | .."Wimp|_CloseWi|
|00000fe0| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 05 96 |ndow",,b|lock%...|
|00000ff0| 06 20 cd 0d 05 a0 36 20 | e7 20 62 6c 6f 63 6b 25 |. ....6 |. block%|
|00001000| 21 30 3d 66 6f 6e 74 5f | 77 69 6e 25 20 c8 99 22 |!0=font_|win% .."|
|00001010| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00001020| 22 2c 2c 62 6c 6f 63 6b | 25 0d 05 aa 67 20 e7 20 |",,block|%...g . |
|00001030| 62 6c 6f 63 6b 25 21 30 | 3d 67 72 69 64 5f 73 69 |block%!0|=grid_si|
|00001040| 7a 65 25 20 c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |ze% .."W|imp_Clos|
|00001050| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00001060| 3a 62 6c 6f 63 6b 25 21 | 30 3d 6c 69 73 74 5f 77 |:block%!|0=list_w|
|00001070| 69 6e 25 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |in%:.."W|imp_Clos|
|00001080| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00001090| 0d 05 b4 37 20 e7 20 62 | 6c 6f 63 6b 25 21 30 3d |...7 . b|lock%!0=|
|000010a0| 77 68 61 6e 64 6c 65 31 | 34 25 20 c8 99 22 57 69 |whandle1|4% .."Wi|
|000010b0| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|000010c0| 2c 62 6c 6f 63 6b 25 0d | 05 be 35 20 e7 20 62 6c |,block%.|..5 . bl|
|000010d0| 6f 63 6b 25 21 30 3d 6c | 61 79 5f 77 69 6e 25 20 |ock%!0=l|ay_win% |
|000010e0| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |.."Wimp_|CloseWin|
|000010f0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 0d 05 c8 06 |dow",,bl|ock%....|
|00001100| 20 e1 0d 05 d2 11 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|00001110| 2d 2d 2d 0d 05 dc 12 20 | dd f2 72 65 63 65 69 76 |---.... |..receiv|
|00001120| 65 64 61 74 61 0d 05 e6 | 13 20 c8 8e 20 62 6c 6f |edata...|. .. blo|
|00001130| 63 6b 25 21 31 36 20 ca | 0d 05 f0 11 20 20 c9 20 |ck%!16 .|.... . |
|00001140| 30 3a 71 75 69 74 25 3d | b9 0d 05 fa 18 20 20 c9 |0:quit%=|..... .|
|00001150| 20 31 3a f2 64 61 74 61 | 5f 73 61 76 65 5f 72 65 | 1:.data|_save_re|
|00001160| 63 0d 06 04 13 20 20 c9 | 20 32 3a f2 73 61 76 65 |c.... .| 2:.save|
|00001170| 64 61 74 61 0d 06 0e 0f | 20 20 c9 20 33 3a f2 64 |data....| . 3:.d|
|00001180| 72 61 67 0d 06 18 16 20 | 20 c9 20 35 3a f2 64 6f |rag.... | . 5:.do|
|00001190| 75 62 6c 65 63 6c 69 63 | 6b 0d 06 22 1c 20 20 c9 |ubleclic|k..". .|
|000011a0| 20 26 34 30 30 43 31 3a | f2 6d 6f 64 65 5f 63 68 | &400C1:|.mode_ch|
|000011b0| 61 6e 67 65 64 0d 06 2c | 18 20 20 c9 20 26 35 30 |anged..,|. . &50|
|000011c0| 32 3a f2 69 6e 74 65 72 | 5f 68 65 6c 70 0d 06 36 |2:.inter|_help..6|
|000011d0| 06 20 cb 0d 06 40 06 20 | e1 0d 06 4a 10 20 f4 2d |. ...@. |...J. .-|
|000011e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 06 54 12 20 dd f2 |--------|-..T. ..|
|000011f0| 64 6f 75 62 6c 65 63 6c | 69 63 6b 0d 06 5e 32 20 |doublecl|ick..^2 |
|00001200| 52 30 3d 30 3a 66 69 6c | 65 74 79 70 65 25 3d 62 |R0=0:fil|etype%=b|
|00001210| 6c 6f 63 6b 25 21 34 30 | 3a e7 20 66 69 6c 65 74 |lock%!40|:. filet|
|00001220| 79 70 65 25 3c 3e 26 32 | 30 30 30 20 e1 0d 06 72 |ype%<>&2|000 ...r|
|00001230| 11 20 44 4e 24 3d 22 22 | 3a 61 25 3d 2d 31 0d 06 |. DN$=""|:a%=-1..|
|00001240| 7c 25 20 f5 20 61 25 2b | 3d 31 3a 62 25 3d 62 6c ||% . a%+|=1:b%=bl|
|00001250| 6f 63 6b 25 3f 28 34 34 | 2b 61 25 29 3a fd 20 62 |ock%?(44|+a%):. b|
|00001260| 25 3d 30 0d 06 86 30 20 | 62 6c 6f 63 6b 25 3f 28 |%=0...0 |block%?(|
|00001270| 34 34 2b 61 25 29 3d 31 | 33 3a 44 4e 24 3d 24 28 |44+a%)=1|3:DN$=$(|
|00001280| 62 6c 6f 63 6b 25 2b 34 | 34 29 3a 62 65 72 72 6f |block%+4|4):berro|
|00001290| 72 3d 30 0d 06 90 30 20 | 6b 6b 24 3d 44 4e 24 2b |r=0...0 |kk$=DN$+|
|000012a0| 22 2e 77 73 71 5f 44 61 | 74 61 22 3a c8 99 22 4f |".wsq_Da|ta":.."O|
|000012b0| 53 5f 46 69 6c 65 22 2c | 31 37 2c 6b 6b 24 20 b8 |S_File",|17,kk$ .|
|000012c0| 20 52 30 0d 06 9a 0d 20 | e7 20 52 30 3d 30 20 e1 | R0.... |. R0=0 .|
|000012d0| 0d 06 9b 16 20 e7 20 69 | 62 77 61 69 74 3d b9 20 |.... . i|bwait=. |
|000012e0| 65 6e 64 25 3d b9 0d 06 | a4 23 20 62 6c 6f 63 6b |end%=...|.# block|
|000012f0| 25 21 31 32 3d 62 6c 6f | 63 6b 25 21 38 3a 62 6c |%!12=blo|ck%!8:bl|
|00001300| 6f 63 6b 25 21 31 36 3d | 34 0d 06 ae 2c 20 c8 99 |ock%!16=|4..., ..|
|00001310| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00001320| 65 22 2c 31 37 2c 62 6c | 6f 63 6b 25 2c 62 6c 6f |e",17,bl|ock%,blo|
|00001330| 63 6b 25 21 34 0d 06 c2 | 12 20 c8 8e 20 73 61 76 |ck%!4...|. .. sav|
|00001340| 65 64 5f 6f 6b 20 ca 0d | 06 cc 08 20 c9 20 a3 0d |ed_ok ..|... . ..|
|00001350| 06 d6 35 20 20 f2 72 6d | 28 22 42 55 54 36 22 29 |..5 .rm|("BUT6")|
|00001360| 3a 62 75 74 31 24 3d 74 | 65 78 74 24 3a f2 72 6d |:but1$=t|ext$:.rm|
|00001370| 28 22 42 55 54 34 22 29 | 3a 62 75 74 32 24 3d 74 |("BUT4")|:but2$=t|
|00001380| 65 78 74 24 0d 06 e0 2b | 20 20 f2 72 6d 28 22 41 |ext$...+| .rm("A|
|00001390| 4c 54 31 22 29 3a f2 61 | 6c 65 72 74 28 74 65 78 |LT1"):.a|lert(tex|
|000013a0| 74 24 2c 62 75 74 31 24 | 2c 62 75 74 32 24 29 0d |t$,but1$|,but2$).|
|000013b0| 06 ea 11 20 20 e7 20 61 | 6c 65 72 74 3d 30 20 e1 |... . a|lert=0 .|
|000013c0| 0d 06 f4 06 20 cb 0d 06 | fe 33 20 f2 6c 6f 61 64 |.... ...|.3 .load|
|000013d0| 28 44 4e 24 29 3a 24 6e | 61 6d 65 25 3d 44 4e 24 |(DN$):$n|ame%=DN$|
|000013e0| 3a f2 75 70 64 61 74 65 | 5f 74 69 74 6c 65 3a 73 |:.update|_title:s|
|000013f0| 61 76 65 64 5f 6f 6b 3d | b9 0d 07 08 06 20 e1 0d |aved_ok=|..... ..|
|00001400| 07 12 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00001410| 07 1c 0b 20 dd f2 64 72 | 61 67 0d 07 26 25 20 66 |... ..dr|ag..&% f|
|00001420| 69 6c 65 74 79 70 65 25 | 3d 62 6c 6f 63 6b 25 21 |iletype%|=block%!|
|00001430| 34 30 3a 44 4e 24 3d 22 | 22 3a 61 25 3d 2d 31 0d |40:DN$="|":a%=-1.|
|00001440| 07 30 25 20 f5 20 61 25 | 2b 3d 31 3a 62 25 3d 62 |.0% . a%|+=1:b%=b|
|00001450| 6c 6f 63 6b 25 3f 28 34 | 34 2b 61 25 29 3a fd 20 |lock%?(4|4+a%):. |
|00001460| 62 25 3d 30 0d 07 3a 2e | 20 62 6c 6f 63 6b 25 3f |b%=0..:.| block%?|
|00001470| 28 34 34 2b 61 25 29 3d | 31 33 3a 44 4e 24 3d 24 |(44+a%)=|13:DN$=$|
|00001480| 28 62 6c 6f 63 6b 25 2b | 34 34 29 3a 4d 55 24 3d |(block%+|44):MU$=|
|00001490| 22 22 0d 07 44 22 20 e7 | 20 66 69 6c 65 74 79 70 |""..D" .| filetyp|
|000014a0| 65 25 3d 26 32 30 30 30 | 20 f2 77 73 71 5f 66 69 |e%=&2000| .wsq_fi|
|000014b0| 6c 65 3a e1 0d 07 4e 1c | 20 e7 20 62 6c 6f 63 6b |le:...N.| . block|
|000014c0| 25 21 32 30 3d 77 68 61 | 6e 64 6c 65 31 25 20 8c |%!20=wha|ndle1% .|
|000014d0| 0d 07 58 33 20 20 69 6d | 5f 74 79 70 65 24 3d 22 |..X3 im|_type$="|
|000014e0| 62 6f 72 64 65 72 22 3a | f2 69 6d 70 6f 72 74 5f |border":|.import_|
|000014f0| 66 69 6c 65 3a f2 73 74 | 79 6c 65 31 28 31 2c 30 |file:.st|yle1(1,0|
|00001500| 2c 30 29 0d 07 62 31 20 | 20 c8 99 22 57 69 6d 70 |,0)..b1 | .."Wimp|
|00001510| 5f 46 6f 72 63 65 52 65 | 64 72 61 77 22 2c 77 68 |_ForceRe|draw",wh|
|00001520| 61 6e 64 6c 65 31 25 2c | 30 2c 2d 39 30 30 2c 37 |andle1%,|0,-900,7|
|00001530| 30 30 2c 30 0d 07 6c 07 | 20 20 e1 0d 07 76 06 20 |00,0..l.| ...v. |
|00001540| cd 0d 07 80 23 20 e7 20 | 62 6c 6f 63 6b 25 21 32 |....# . |block%!2|
|00001550| 30 3d 77 68 61 6e 64 6c | 65 31 31 25 20 f2 64 72 |0=whandl|e11% .dr|
|00001560| 61 67 5f 32 0d 07 8a 06 | 20 e1 0d 07 94 10 20 f4 |ag_2....| ..... .|
|00001570| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 07 9e 0f 20 dd |--------|--.... .|
|00001580| f2 77 73 71 5f 66 69 6c | 65 0d 07 a8 30 20 6b 6b |.wsq_fil|e...0 kk|
|00001590| 24 3d 44 4e 24 2b 22 2e | 77 73 71 5f 44 61 74 61 |$=DN$+".|wsq_Data|
|000015a0| 22 3a c8 99 22 4f 53 5f | 46 69 6c 65 22 2c 31 37 |":.."OS_|File",17|
|000015b0| 2c 6b 6b 24 20 b8 20 52 | 30 0d 07 b2 18 20 e7 20 |,kk$ . R|0.... . |
|000015c0| 52 30 3d 30 20 f2 64 72 | 61 67 65 72 72 6f 72 3a |R0=0 .dr|agerror:|
|000015d0| e1 0d 07 bc 13 20 e7 20 | 73 61 76 65 64 5f 6f 6b |..... . |saved_ok|
|000015e0| 3d a3 20 8c 0d 07 c6 35 | 20 20 f2 72 6d 28 22 42 |=. ....5| .rm("B|
|000015f0| 55 54 36 22 29 3a 62 75 | 74 31 24 3d 74 65 78 74 |UT6"):bu|t1$=text|
|00001600| 24 3a f2 72 6d 28 22 42 | 55 54 34 22 29 3a 62 75 |$:.rm("B|UT4"):bu|
|00001610| 74 32 24 3d 74 65 78 74 | 24 0d 07 d0 2b 20 20 f2 |t2$=text|$...+ .|
|00001620| 72 6d 28 22 41 4c 54 31 | 22 29 3a f2 61 6c 65 72 |rm("ALT1|"):.aler|
|00001630| 74 28 74 65 78 74 24 2c | 62 75 74 31 24 2c 62 75 |t(text$,|but1$,bu|
|00001640| 74 32 24 29 0d 07 da 12 | 20 20 e7 20 61 6c 65 72 |t2$)....| . aler|
|00001650| 74 3d 30 20 3a e1 0d 07 | e4 06 20 cd 0d 07 ee 28 |t=0 :...|.. ....(|
|00001660| 20 24 6e 61 6d 65 25 3d | 44 4e 24 3a f2 75 70 64 | $name%=|DN$:.upd|
|00001670| 61 74 65 5f 74 69 74 6c | 65 3a f2 6c 6f 61 64 28 |ate_titl|e:.load(|
|00001680| 44 4e 24 29 0d 07 f8 06 | 20 e1 0d 08 02 10 20 f4 |DN$)....| ..... .|
|00001690| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 08 0c 2d 20 dd |--------|--...- .|
|000016a0| f2 64 72 61 67 65 72 72 | 6f 72 3a f2 72 6d 28 22 |.dragerr|or:.rm("|
|000016b0| 45 52 52 31 22 29 3a f2 | 65 72 72 62 6f 78 28 74 |ERR1"):.|errbox(t|
|000016c0| 65 78 74 24 29 3a e1 0d | 08 16 10 20 f4 2d 2d 2d |ext$):..|... .---|
|000016d0| 2d 2d 2d 2d 2d 2d 2d 0d | 08 20 14 20 dd f2 64 61 |-------.|. . ..da|
|000016e0| 74 61 5f 73 61 76 65 5f | 72 65 63 0d 08 2a 11 20 |ta_save_|rec..*. |
|000016f0| 73 63 72 61 70 5f 72 65 | 66 25 3d 30 0d 08 34 13 |scrap_re|f%=0..4.|
|00001700| 20 c8 8e 20 62 6c 6f 63 | 6b 25 21 34 30 20 ca 0d | .. bloc|k%!40 ..|
|00001710| 08 3e 10 20 c9 20 26 46 | 46 39 2c 26 41 46 46 0d |.>. . &F|F9,&AFF.|
|00001720| 08 48 39 20 20 c8 99 22 | 58 4f 53 5f 52 65 61 64 |.H9 .."|XOS_Read|
|00001730| 56 61 72 56 61 6c 22 2c | 22 57 69 6d 70 24 53 63 |VarVal",|"Wimp$Sc|
|00001740| 72 61 70 22 2c 2c 2d 31 | 2c 30 2c 33 20 b8 20 2c |rap",,-1|,0,3 . ,|
|00001750| 2c 65 78 69 73 74 73 25 | 0d 08 52 29 20 20 e7 20 |,exists%|..R) . |
|00001760| 65 78 69 73 74 73 25 3d | 30 20 8c 20 f2 72 6d 28 |exists%=|0 . .rm(|
|00001770| 22 45 52 52 49 22 29 3a | 85 20 31 2c 74 65 78 74 |"ERRI"):|. 1,text|
|00001780| 24 0d 08 5c 26 20 20 66 | 69 6c 65 74 79 70 65 25 |$..\& f|iletype%|
|00001790| 3d 62 6c 6f 63 6b 25 21 | 34 30 3a 44 4e 24 3d 22 |=block%!|40:DN$="|
|000017a0| 22 3a 61 25 3d 2d 31 0d | 08 66 26 20 20 f5 20 61 |":a%=-1.|.f& . a|
|000017b0| 25 2b 3d 31 3a 62 25 3d | 62 6c 6f 63 6b 25 3f 28 |%+=1:b%=|block%?(|
|000017c0| 34 34 2b 61 25 29 3a fd | 20 62 25 3d 30 0d 08 70 |44+a%):.| b%=0..p|
|000017d0| 28 20 20 62 6c 6f 63 6b | 25 3f 28 34 34 2b 61 25 |( block|%?(44+a%|
|000017e0| 29 3d 31 33 3a 44 4e 24 | 3d 24 28 62 6c 6f 63 6b |)=13:DN$|=$(block|
|000017f0| 25 2b 34 34 29 0d 08 7a | 30 20 20 62 6c 6f 63 6b |%+44)..z|0 block|
|00001800| 25 21 30 3d 36 30 3a 62 | 6c 6f 63 6b 25 21 31 36 |%!0=60:b|lock%!16|
|00001810| 3d 32 3a 62 6c 6f 63 6b | 25 21 31 32 3d 62 6c 6f |=2:block|%!12=blo|
|00001820| 63 6b 25 21 38 0d 08 84 | 31 20 20 24 28 62 6c 6f |ck%!8...|1 $(blo|
|00001830| 63 6b 25 2b 34 34 29 3d | 22 3c 57 69 6d 70 24 53 |ck%+44)=|"<Wimp$S|
|00001840| 63 72 61 70 3e 22 2b bd | 30 3a 62 6c 6f 63 6b 25 |crap>"+.|0:block%|
|00001850| 21 33 36 3d 2d 31 0d 08 | 8e 3a 20 20 c8 99 22 57 |!36=-1..|.: .."W|
|00001860| 69 6d 70 5f 53 65 6e 64 | 4d 65 73 73 61 67 65 22 |imp_Send|Message"|
|00001870| 2c 31 37 2c 62 6c 6f 63 | 6b 25 2c 62 6c 6f 63 6b |,17,bloc|k%,block|
|00001880| 25 21 34 3a 73 63 72 61 | 70 5f 72 65 66 25 3d 31 |%!4:scra|p_ref%=1|
|00001890| 0d 08 98 06 20 cb 0d 08 | a2 06 20 e1 0d 08 ac 10 |.... ...|.. .....|
|000018a0| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 08 b6 0c | .------|----....|
|000018b0| 20 dd f2 6d 6f 75 73 65 | 0d 08 c0 1b 20 78 25 3d | ..mouse|.... x%=|
|000018c0| 21 62 6c 6f 63 6b 25 3a | 79 25 3d 62 6c 6f 63 6b |!block%:|y%=block|
|000018d0| 25 21 34 0d 08 ca 0b 20 | c8 8e 20 b9 20 ca 0d 08 |%!4.... |.. . ...|
|000018e0| d4 14 20 20 c9 20 62 6c | 6f 63 6b 25 21 31 32 3d |.. . bl|ock%!12=|
|000018f0| 2d 32 0d 08 de 17 20 20 | 20 e7 20 62 6c 6f 63 6b |-2.... | . block|
|00001900| 25 21 38 20 80 20 32 20 | 8c 0d 08 e8 31 20 20 20 |%!8 . 2 |....1 |
|00001910| f2 72 6d 28 22 4d 55 49 | 31 22 29 3a f2 64 72 61 |.rm("MUI|1"):.dra|
|00001920| 77 6d 65 6e 75 28 6d 65 | 6e 75 25 2c 74 65 78 74 |wmenu(me|nu%,text|
|00001930| 24 2c 78 25 2c 79 25 2c | b9 29 0d 08 f2 1f 20 20 |$,x%,y%,|.).... |
|00001940| cc 20 e7 20 62 6c 6f 63 | 6b 25 21 38 20 80 20 35 |. . bloc|k%!8 . 5|
|00001950| 20 8c 20 65 6e 64 25 3d | b9 0d 08 fc 07 20 20 cd | . end%=|..... .|
|00001960| 0d 09 06 06 20 cb 0d 09 | 10 06 20 e1 0d 09 1a 10 |.... ...|.. .....|
|00001970| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 09 24 10 | .------|----..$.|
|00001980| 20 dd f2 65 64 69 74 6d | 6f 75 73 65 0d 09 2e 48 | ..editm|ouse...H|
|00001990| 20 78 70 6f 73 3d 21 62 | 6c 6f 63 6b 25 3a 79 70 | xpos=!b|lock%:yp|
|000019a0| 6f 73 3d 62 6c 6f 63 6b | 25 21 34 3a 62 75 3d 62 |os=block|%!4:bu=b|
|000019b0| 6c 6f 63 6b 25 21 38 3a | 77 69 6e 64 25 3d 62 6c |lock%!8:|wind%=bl|
|000019c0| 6f 63 6b 25 21 31 32 3a | 69 63 3d 62 6c 6f 63 6b |ock%!12:|ic=block|
|000019d0| 25 21 31 36 0d 09 38 0b | 20 4d 55 24 3d 22 22 0d |%!16..8.| MU$="".|
|000019e0| 09 42 18 20 e7 20 77 69 | 6e 64 25 3d 2d 32 20 80 |.B. . wi|nd%=-2 .|
|000019f0| 20 62 75 3d 32 20 8c 0d | 09 4c 11 20 20 f2 72 6d | bu=2 ..|.L. .rm|
|00001a00| 28 22 4d 55 49 31 22 29 | 0d 09 56 35 20 20 f2 64 |("MUI1")|..V5 .d|
|00001a10| 72 61 77 6d 65 6e 75 28 | 6d 65 6e 75 25 2c 74 65 |rawmenu(|menu%,te|
|00001a20| 78 74 24 2c 78 70 6f 73 | 2c 79 70 6f 73 2c b9 29 |xt$,xpos|,ypos,.)|
|00001a30| 3a 4d 55 24 3d 22 69 63 | 6f 6e 22 3a e1 0d 09 60 |:MU$="ic|on":...`|
|00001a40| 06 20 cd 0d 09 6a 0f 20 | c8 8e 20 77 69 6e 64 25 |. ...j. |.. wind%|
|00001a50| 20 ca 0d 09 74 25 20 f4 | 20 20 20 20 20 20 20 20 | ...t% .| |
|00001a60| 20 20 2a 2a 2a 2a 20 4d | 61 69 6e 20 57 69 6e 64 | **** M|ain Wind|
|00001a70| 6f 77 20 2a 2a 2a 2a 0d | 09 7e 10 20 c9 20 77 68 |ow ****.|.~. . wh|
|00001a80| 61 6e 64 6c 65 31 25 0d | 09 88 34 20 62 6c 6f 63 |andle1%.|..4 bloc|
|00001a90| 6b 25 21 30 3d 77 68 61 | 6e 64 6c 65 38 25 3a c8 |k%!0=wha|ndle8%:.|
|00001aa0| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 |."Wimp_C|loseWind|
|00001ab0| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 09 92 36 20 |ow",,blo|ck%...6 |
|00001ac0| 73 61 76 65 5f 64 69 61 | 3d 30 3a c8 99 22 57 69 |save_dia|=0:.."Wi|
|00001ad0| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|00001ae0| 69 6f 6e 22 2c 77 68 61 | 6e 64 6c 65 31 25 2c 2d |ion",wha|ndle1%,-|
|00001af0| 31 0d 09 9c 14 20 e7 20 | 62 75 3d 32 20 80 20 69 |1.... . |bu=2 . i|
|00001b00| 63 3c 30 20 8c 0d 09 a6 | 2d 20 20 f2 6d 61 69 6e |c<0 ....|- .main|
|00001b10| 6d 65 6e 75 28 6d 6d 65 | 6e 75 25 29 3a 78 6d 65 |menu(mme|nu%):xme|
|00001b20| 6e 75 3d 78 70 6f 73 3a | 79 6d 65 6e 75 3d 79 70 |nu=xpos:|ymenu=yp|
|00001b30| 6f 73 0d 09 b0 3f 20 20 | c8 99 22 57 69 6d 70 5f |os...? |.."Wimp_|
|00001b40| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 6d 6d 65 |CreateMe|nu",,mme|
|00001b50| 6e 75 25 2c 78 70 6f 73 | 2d 35 31 2c 79 70 6f 73 |nu%,xpos|-51,ypos|
|00001b60| 3a 4d 55 24 3d 22 6d 61 | 69 6e 6d 65 6e 75 22 3a |:MU$="ma|inmenu":|
|00001b70| e1 0d 09 ba 06 20 cd 0d | 09 c4 2b 20 c8 99 22 57 |..... ..|..+ .."W|
|00001b80| 69 6d 70 5f 53 65 74 43 | 61 72 65 74 50 6f 73 69 |imp_SetC|aretPosi|
|00001b90| 74 69 6f 6e 22 2c 77 68 | 61 6e 64 6c 65 31 25 2c |tion",wh|andle1%,|
|00001ba0| 2d 31 0d 09 ce 37 20 62 | 6c 6f 63 6b 25 21 30 3d |-1...7 b|lock%!0=|
|00001bb0| 77 68 61 6e 64 6c 65 31 | 25 3a c8 99 22 57 69 6d |whandle1|%:.."Wim|
|00001bc0| 70 5f 47 65 74 57 69 6e | 64 6f 77 53 74 61 74 65 |p_GetWin|dowState|
|00001bd0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 09 d8 1f 20 f2 67 |",,block|%.... .g|
|00001be0| 65 74 6f 72 69 67 69 6e | 28 62 6c 6f 63 6b 25 2c |etorigin|(block%,|
|00001bf0| 78 30 25 2c 79 30 25 29 | 0d 09 e2 26 20 f4 20 20 |x0%,y0%)|...& . |
|00001c00| 20 20 20 20 20 20 20 20 | 2a 2a 2a 20 4f 74 68 65 | |*** Othe|
|00001c10| 72 20 77 69 6e 64 6f 77 | 73 20 2a 2a 2a 2a 0d 09 |r window|s ****..|
|00001c20| ec 11 20 c9 20 74 6f 6f | 6c 73 5f 77 69 6e 25 0d |.. . too|ls_win%.|
|00001c30| 09 f6 1c 20 e7 20 69 63 | 3d 38 20 f2 6f 70 65 6e |... . ic|=8 .open|
|00001c40| 5f 67 72 69 64 73 69 7a | 65 3a e1 0d 0a 00 18 20 |_gridsiz|e:..... |
|00001c50| e7 20 69 63 3d 39 20 f2 | 6f 70 65 6e 5f 66 6f 6e |. ic=9 .|open_fon|
|00001c60| 74 3a e1 0d 0a 0a 1a 20 | e7 20 69 63 3d 31 34 20 |t:..... |. ic=14 |
|00001c70| f2 6f 70 65 6e 5f 70 72 | 69 6e 74 3a e1 0d 0a 14 |.open_pr|int:....|
|00001c80| 17 20 e7 20 69 63 3d 31 | 32 20 f2 72 65 73 65 74 |. . ic=1|2 .reset|
|00001c90| 69 74 3a e1 0d 0a 1e 19 | 20 e7 20 69 63 3d 31 33 |it:.....| . ic=13|
|00001ca0| 20 f2 6f 70 65 6e 5f 73 | 61 76 65 3a e1 0d 0a 28 | .open_s|ave:...(|
|00001cb0| 18 20 e7 20 69 63 3d 31 | 35 20 f2 73 65 74 75 70 |. . ic=1|5 .setup|
|00001cc0| 5f 70 61 74 68 0d 0a 32 | 1a 20 e7 20 69 63 3d 31 |_path..2|. . ic=1|
|00001cd0| 31 20 f2 6f 70 65 6e 5f | 70 61 74 74 65 72 6e 0d |1 .open_|pattern.|
|00001ce0| 0a 3c 1e 20 e7 20 69 63 | 3d 31 30 20 f2 6f 70 65 |.<. . ic|=10 .ope|
|00001cf0| 6e 5f 62 6f 72 64 65 72 | 73 6d 65 6e 75 0d 0a 46 |n_border|smenu..F|
|00001d00| 10 20 c9 20 66 6f 6e 74 | 5f 77 69 6e 25 0d 0a 50 |. . font|_win%..P|
|00001d10| 16 20 e7 20 69 63 3d 36 | 20 f2 73 65 6c 5f 74 69 |. . ic=6| .sel_ti|
|00001d20| 74 6c 65 0d 0a 5a 15 20 | e7 20 69 63 3d 37 20 f2 |tle..Z. |. ic=7 .|
|00001d30| 73 65 6c 5f 74 65 78 74 | 0d 0a 64 15 20 e7 20 69 |sel_text|..d. . i|
|00001d40| 63 3d 38 20 f2 73 65 6c | 5f 67 72 69 64 0d 0a 6e |c=8 .sel|_grid..n|
|00001d50| 15 20 e7 20 69 63 3d 31 | 33 20 f2 73 65 6c 5f 74 |. . ic=1|3 .sel_t|
|00001d60| 72 79 0d 0a 78 0e 20 e7 | 20 69 63 3d 31 30 20 8c |ry..x. .| ic=10 .|
|00001d70| 0d 0a 82 16 20 20 f2 7a | 32 28 39 2c 66 6f 6e 74 |.... .z|2(9,font|
|00001d80| 5f 77 69 6e 25 29 0d 0a | 8c 3d 20 20 e7 20 62 75 |_win%)..|.= . bu|
|00001d90| 3c 3e 31 20 62 6c 6f 63 | 6b 25 21 30 3d 66 6f 6e |<>1 bloc|k%!0=fon|
|00001da0| 74 5f 77 69 6e 25 3a c8 | 99 22 57 69 6d 70 5f 43 |t_win%:.|."Wimp_C|
|00001db0| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |loseWind|ow",,blo|
|00001dc0| 63 6b 25 0d 0a 96 37 20 | 20 c8 99 22 57 69 6d 70 |ck%...7 | .."Wimp|
|00001dd0| 5f 53 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_SetCare|tPositio|
|00001de0| 6e 22 2c 77 68 61 6e 64 | 6c 65 31 25 2c 2d 31 3a |n",whand|le1%,-1:|
|00001df0| f2 6d 69 6e 69 5f 70 6f | 6c 6c 0d 0a a0 40 20 20 |.mini_po|ll...@ |
|00001e00| f2 73 74 79 6c 65 31 28 | 31 2c 30 2c 30 29 3a c8 |.style1(|1,0,0):.|
|00001e10| 99 22 57 69 6d 70 5f 46 | 6f 72 63 65 52 65 64 72 |."Wimp_F|orceRedr|
|00001e20| 61 77 22 2c 77 68 61 6e | 64 6c 65 31 25 2c 30 2c |aw",whan|dle1%,0,|
|00001e30| 2d 38 37 32 2c 36 31 36 | 2c 30 0d 0a aa 10 20 20 |-872,616|,0.... |
|00001e40| 73 61 76 65 64 5f 6f 6b | 3d a3 0d 0a b4 06 20 cd |saved_ok|=..... .|
|00001e50| 0d 0a be 0e 20 e7 20 69 | 63 3d 31 32 20 8c 0d 0a |.... . i|c=12 ...|
|00001e60| c8 17 20 20 f2 7a 31 28 | 31 31 2c 66 6f 6e 74 5f |.. .z1(|11,font_|
|00001e70| 77 69 6e 25 29 0d 0a d2 | 33 20 20 f2 69 73 65 74 |win%)...|3 .iset|
|00001e80| 28 30 2c 66 6f 6e 74 73 | 24 28 6f 74 74 29 2c 66 |(0,fonts|$(ott),f|
|00001e90| 6f 6e 74 5f 77 69 6e 25 | 29 3a 74 69 74 6c 65 5f |ont_win%|):title_|
|00001ea0| 66 6f 6e 74 3d 6f 74 74 | 0d 0a dc 32 20 20 f2 69 |font=ott|...2 .i|
|00001eb0| 73 65 74 28 33 2c 66 6f | 6e 74 73 24 28 6f 74 66 |set(3,fo|nts$(otf|
|00001ec0| 29 2c 66 6f 6e 74 5f 77 | 69 6e 25 29 3a 74 65 78 |),font_w|in%):tex|
|00001ed0| 74 5f 66 6f 6e 74 3d 6f | 74 66 0d 0a e6 32 20 20 |t_font=o|tf...2 |
|00001ee0| f2 69 73 65 74 28 34 2c | 66 6f 6e 74 73 24 28 6f |.iset(4,|fonts$(o|
|00001ef0| 67 66 29 2c 66 6f 6e 74 | 5f 77 69 6e 25 29 3a 67 |gf),font|_win%):g|
|00001f00| 72 69 64 5f 66 6f 6e 74 | 3d 6f 67 66 0d 0a f0 35 |rid_font|=ogf...5|
|00001f10| 20 20 62 6c 6f 63 6b 25 | 21 30 3d 66 6f 6e 74 5f | block%|!0=font_|
|00001f20| 77 69 6e 25 3a c8 99 22 | 57 69 6d 70 5f 43 6c 6f |win%:.."|Wimp_Clo|
|00001f30| 73 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |seWindow|",,block|
|00001f40| 25 0d 0a fa 2c 20 20 c8 | 99 22 57 69 6d 70 5f 53 |%..., .|."Wimp_S|
|00001f50| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00001f60| 2c 77 68 61 6e 64 6c 65 | 31 25 2c 2d 31 0d 0b 04 |,whandle|1%,-1...|
|00001f70| 06 20 cd 0d 0b 0e 04 0d | 0b 18 11 20 c9 20 67 72 |. ......|... . gr|
|00001f80| 69 64 5f 73 69 7a 65 25 | 0d 0b 22 0d 20 e7 20 69 |id_size%|..". . i|
|00001f90| 63 3d 37 20 8c 0d 0b 2c | 17 20 20 f2 7a 32 28 32 |c=7 ...,|. .z2(2|
|00001fa0| 2c 67 72 69 64 5f 73 69 | 7a 65 25 29 0d 0b 36 6e |,grid_si|ze%)..6n|
|00001fb0| 20 20 e7 20 62 75 3c 3e | 31 20 62 6c 6f 63 6b 25 | . bu<>|1 block%|
|00001fc0| 21 30 3d 67 72 69 64 5f | 73 69 7a 65 25 3a c8 99 |!0=grid_|size%:..|
|00001fd0| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|00001fe0| 77 22 2c 2c 62 6c 6f 63 | 6b 25 3a 62 6c 6f 63 6b |w",,bloc|k%:block|
|00001ff0| 25 21 30 3d 6c 69 73 74 | 5f 77 69 6e 25 3a c8 99 |%!0=list|_win%:..|
|00002000| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|00002010| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 0b 40 31 20 20 |w",,bloc|k%..@1 |
|00002020| f2 6d 69 6e 69 5f 70 6f | 6c 6c 3a f2 69 72 65 61 |.mini_po|ll:.irea|
|00002030| 64 28 33 2c 67 72 69 64 | 5f 73 69 7a 65 25 29 3a |d(3,grid|_size%):|
|00002040| 52 4f 57 53 25 3d bb 28 | 61 24 29 0d 0b 4a 26 20 |ROWS%=.(|a$)..J& |
|00002050| 20 f2 69 72 65 61 64 28 | 34 2c 67 72 69 64 5f 73 | .iread(|4,grid_s|
|00002060| 69 7a 65 25 29 3a 43 4f | 4c 53 25 3d bb 28 61 24 |ize%):CO|LS%=.(a$|
|00002070| 29 0d 0b 54 24 20 20 e7 | 20 52 4f 57 53 25 3c 35 |)..T$ .| ROWS%<5|
|00002080| 20 84 20 43 4f 4c 53 25 | 3c 35 20 f2 74 6f 6f 5f | . COLS%|<5 .too_|
|00002090| 73 6d 61 6c 6c 0d 0b 5e | 24 20 20 e7 20 52 4f 57 |small..^|$ . ROW|
|000020a0| 53 25 3e 32 35 20 84 20 | 43 4f 4c 53 25 3e 32 35 |S%>25 . |COLS%>25|
|000020b0| 20 f2 74 6f 6f 5f 62 69 | 67 0d 0b 68 31 20 20 f2 | .too_bi|g..h1 .|
|000020c0| 63 72 65 61 74 65 5f 67 | 72 69 64 3a f2 69 72 65 |create_g|rid:.ire|
|000020d0| 61 64 28 36 2c 67 72 69 | 64 5f 73 69 7a 65 25 29 |ad(6,gri|d_size%)|
|000020e0| 3a 54 69 74 6c 65 24 3d | 61 24 0d 0b 72 1f 20 20 |:Title$=|a$..r. |
|000020f0| 73 61 76 65 64 5f 6f 6b | 3d a3 3a f2 73 74 79 6c |saved_ok|=.:.styl|
|00002100| 65 31 28 31 2c 30 2c 30 | 29 0d 0b 7c 31 20 20 c8 |e1(1,0,0|)..|1 .|
|00002110| 99 22 57 69 6d 70 5f 46 | 6f 72 63 65 52 65 64 72 |."Wimp_F|orceRedr|
|00002120| 61 77 22 2c 77 68 61 6e | 64 6c 65 31 25 2c 30 2c |aw",whan|dle1%,0,|
|00002130| 2d 38 37 32 2c 36 31 36 | 2c 30 0d 0b 86 06 20 cd |-872,616|,0.... .|
|00002140| 0d 0b 90 0d 20 e7 20 69 | 63 3d 39 20 8c 0d 0b 9a |.... . i|c=9 ....|
|00002150| 17 20 20 f2 7a 31 28 38 | 2c 67 72 69 64 5f 73 69 |. .z1(8|,grid_si|
|00002160| 7a 65 25 29 0d 0b a4 66 | 20 20 62 6c 6f 63 6b 25 |ze%)...f| block%|
|00002170| 21 30 3d 67 72 69 64 5f | 73 69 7a 65 25 3a c8 99 |!0=grid_|size%:..|
|00002180| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|00002190| 77 22 2c 2c 62 6c 6f 63 | 6b 25 3a 62 6c 6f 63 6b |w",,bloc|k%:block|
|000021a0| 25 21 30 3d 6c 69 73 74 | 5f 77 69 6e 25 3a c8 99 |%!0=list|_win%:..|
|000021b0| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|000021c0| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 0b ae 06 20 cd |w",,bloc|k%.... .|
|000021d0| 0d 0b b8 16 20 e7 20 69 | 63 3d 31 30 20 84 20 69 |.... . i|c=10 . i|
|000021e0| 63 3d 31 32 20 8c 0d 0b | c2 27 20 20 61 6c 6c 6f |c=12 ...|.' allo|
|000021f0| 77 5f 62 61 63 6b 77 61 | 72 64 73 3d ac 20 61 6c |w_backwa|rds=. al|
|00002200| 6c 6f 77 5f 62 61 63 6b | 77 61 72 64 73 0d 0b cc |low_back|wards...|
|00002210| 56 20 20 e7 20 61 6c 6c | 6f 77 5f 62 61 63 6b 77 |V . all|ow_backw|
|00002220| 61 72 64 73 3d b9 20 f2 | 69 73 65 74 28 31 30 2c |ards=. .|iset(10,|
|00002230| 22 6f 70 74 6f 6e 22 2c | 67 72 69 64 5f 73 69 7a |"opton",|grid_siz|
|00002240| 65 25 29 20 8b 20 f2 69 | 73 65 74 28 31 30 2c 22 |e%) . .i|set(10,"|
|00002250| 6f 70 74 6f 66 66 22 2c | 67 72 69 64 5f 73 69 7a |optoff",|grid_siz|
|00002260| 65 25 29 0d 0b d6 06 20 | cd 0d 0b e0 16 20 e7 20 |e%).... |..... . |
|00002270| 69 63 3d 31 31 20 84 20 | 69 63 3d 31 33 20 8c 0d |ic=11 . |ic=13 ..|
|00002280| 0b ea 25 20 20 61 6c 6c | 6f 77 5f 64 69 61 67 6f |..% all|ow_diago|
|00002290| 6e 61 6c 3d ac 20 61 6c | 6c 6f 77 5f 64 69 61 67 |nal=. al|low_diag|
|000022a0| 6f 6e 61 6c 0d 0b f4 55 | 20 20 e7 20 61 6c 6c 6f |onal...U| . allo|
|000022b0| 77 5f 64 69 61 67 6f 6e | 61 6c 3d b9 20 f2 69 73 |w_diagon|al=. .is|
|000022c0| 65 74 28 31 31 2c 22 6f | 70 74 6f 6e 22 2c 67 72 |et(11,"o|pton",gr|
|000022d0| 69 64 5f 73 69 7a 65 25 | 29 20 8b 20 f2 69 73 65 |id_size%|) . .ise|
|000022e0| 74 28 31 31 2c 22 6f 70 | 74 6f 66 66 22 2c 67 72 |t(11,"op|toff",gr|
|000022f0| 69 64 5f 73 69 7a 65 25 | 29 0d 0b fe 06 20 cd 0d |id_size%|).... ..|
|00002300| 0c 08 16 20 e7 20 69 63 | 3d 31 34 20 84 20 69 63 |... . ic|=14 . ic|
|00002310| 3d 31 35 20 8c 0d 0c 12 | 1d 20 20 67 72 69 64 5f |=15 ....|. grid_|
|00002320| 6c 69 6e 65 73 3d ac 20 | 67 72 69 64 5f 6c 69 6e |lines=. |grid_lin|
|00002330| 65 73 0d 0c 1c 51 20 20 | e7 20 67 72 69 64 5f 6c |es...Q |. grid_l|
|00002340| 69 6e 65 73 3d b9 20 f2 | 69 73 65 74 28 31 34 2c |ines=. .|iset(14,|
|00002350| 22 6f 70 74 6f 6e 22 2c | 67 72 69 64 5f 73 69 7a |"opton",|grid_siz|
|00002360| 65 25 29 20 8b 20 f2 69 | 73 65 74 28 31 34 2c 22 |e%) . .i|set(14,"|
|00002370| 6f 70 74 6f 66 66 22 2c | 67 72 69 64 5f 73 69 7a |optoff",|grid_siz|
|00002380| 65 25 29 0d 0c 26 06 20 | cd 0d 0c 30 16 20 e7 20 |e%)..&. |...0. . |
|00002390| 69 63 3d 31 36 20 84 20 | 69 63 3d 31 37 20 8c 0d |ic=16 . |ic=17 ..|
|000023a0| 0c 3a 16 20 6c 61 79 5f | 75 73 65 3d ac 20 6c 61 |.:. lay_|use=. la|
|000023b0| 79 5f 75 73 65 0d 0c 44 | 4d 20 e7 20 6c 61 79 5f |y_use..D|M . lay_|
|000023c0| 75 73 65 3d b9 20 f2 69 | 73 65 74 28 31 36 2c 22 |use=. .i|set(16,"|
|000023d0| 6f 70 74 6f 6e 22 2c 67 | 72 69 64 5f 73 69 7a 65 |opton",g|rid_size|
|000023e0| 25 29 20 8b 20 f2 69 73 | 65 74 28 31 36 2c 22 6f |%) . .is|et(16,"o|
|000023f0| 70 74 6f 66 66 22 2c 67 | 72 69 64 5f 73 69 7a 65 |ptoff",g|rid_size|
|00002400| 25 29 0d 0c 4e 06 20 cd | 0d 0c 58 04 0d 0c 62 20 |%)..N. .|..X...b |
|00002410| 20 c9 20 77 68 61 6e 64 | 6c 65 38 25 3a f2 63 6c | . whand|le8%:.cl|
|00002420| 69 63 6b 5f 64 72 61 67 | 73 61 76 65 0d 0c 6c 20 |ick_drag|save..l |
|00002430| 20 c9 20 77 68 61 6e 64 | 6c 65 31 31 25 3a f2 63 | . whand|le11%:.c|
|00002440| 6c 69 63 6b 5f 73 65 74 | 70 61 74 68 0d 0c 76 04 |lick_set|path..v.|
|00002450| 0d 0c 80 19 20 f4 20 70 | 72 69 6e 74 20 64 69 61 |.... . p|rint dia|
|00002460| 6c 6f 67 75 65 20 62 6f | 78 0d 0c 8a 26 20 c9 20 |logue bo|x...& . |
|00002470| 77 68 61 6e 64 6c 65 31 | 34 25 3a f2 63 6c 69 63 |whandle1|4%:.clic|
|00002480| 6b 5f 70 72 69 6e 74 64 | 69 61 6c 6f 67 75 65 0d |k_printd|ialogue.|
|00002490| 0c 94 04 0d 0c 9e 0f 20 | c9 20 6c 61 79 5f 77 69 |....... |. lay_wi|
|000024a0| 6e 25 0d 0c a8 0d 20 e7 | 20 69 63 3d 37 20 8c 0d |n%.... .| ic=7 ..|
|000024b0| 0c b2 30 20 20 f2 7a 31 | 28 31 2c 6c 61 79 5f 77 |..0 .z1|(1,lay_w|
|000024c0| 69 6e 25 29 3a f2 72 65 | 73 74 6f 72 65 66 75 6c |in%):.re|storeful|
|000024d0| 6c 6d 6f 75 73 65 72 65 | 63 74 61 6e 67 6c 65 0d |lmousere|ctangle.|
|000024e0| 0c bc 36 20 20 62 6c 6f | 63 6b 25 21 30 3d 6c 61 |..6 blo|ck%!0=la|
|000024f0| 79 5f 77 69 6e 25 3a c8 | 99 22 57 69 6d 70 5f 43 |y_win%:.|."Wimp_C|
|00002500| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |loseWind|ow",,blo|
|00002510| 63 6b 25 3a e1 0d 0c c6 | 06 20 cd 0d 0c d0 0d 20 |ck%:....|. ..... |
|00002520| e7 20 69 63 3d 34 20 8c | 0d 0c da 30 20 20 f2 7a |. ic=4 .|...0 .z|
|00002530| 32 28 33 2c 6c 61 79 5f | 77 69 6e 25 29 3a f2 72 |2(3,lay_|win%):.r|
|00002540| 65 73 74 6f 72 65 66 75 | 6c 6c 6d 6f 75 73 65 72 |estorefu|llmouser|
|00002550| 65 63 74 61 6e 67 6c 65 | 0d 0c e4 36 20 20 62 6c |ectangle|...6 bl|
|00002560| 6f 63 6b 25 21 30 3d 6c | 61 79 5f 77 69 6e 25 3a |ock%!0=l|ay_win%:|
|00002570| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |.."Wimp_|CloseWin|
|00002580| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 3a e1 0d 0c |dow",,bl|ock%:...|
|00002590| ee 06 20 cd 0d 0c f8 36 | 20 62 6c 6f 63 6b 25 21 |.. ....6| block%!|
|000025a0| 30 3d 6c 61 79 5f 77 69 | 6e 25 3a c8 99 22 57 69 |0=lay_wi|n%:.."Wi|
|000025b0| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|000025c0| 65 22 2c 2c 62 6c 6f 63 | 6b 25 0d 0d 02 1f 20 f2 |e",,bloc|k%.... .|
|000025d0| 67 65 74 6f 72 69 67 69 | 6e 28 62 6c 6f 63 6b 25 |getorigi|n(block%|
|000025e0| 2c 78 30 25 2c 79 30 25 | 29 0d 0d 0c 3c 20 43 43 |,x0%,y0%|)...< CC|
|000025f0| 3d 31 2b 28 a8 28 28 78 | 70 6f 73 2d 78 30 25 29 |=1+(.((x|pos-x0%)|
|00002600| 2f 32 30 29 29 3a 52 52 | 3d 31 2b 28 52 4f 57 53 |/20)):RR|=1+(ROWS|
|00002610| 25 2d 31 2d a8 28 28 79 | 30 25 2d 79 70 6f 73 29 |%-1-.((y|0%-ypos)|
|00002620| 2f 32 30 29 29 0d 0d 16 | 30 20 e7 20 28 43 43 3e |/20))...|0 . (CC>|
|00002630| 30 20 80 20 43 43 3c 3d | 43 4f 4c 53 25 29 20 80 |0 . CC<=|COLS%) .|
|00002640| 20 28 52 52 3e 30 20 80 | 20 52 52 3c 3d 52 4f 57 | (RR>0 .| RR<=ROW|
|00002650| 53 25 29 20 8c 0d 0d 20 | 42 20 20 e7 20 6c 61 79 |S%) ... |B . lay|
|00002660| 28 52 52 2c 43 43 29 3d | 30 20 6c 61 79 28 52 52 |(RR,CC)=|0 lay(RR|
|00002670| 2c 43 43 29 3d 31 3a 63 | 6f 6c 6f 75 72 3d 31 20 |,CC)=1:c|olour=1 |
|00002680| 8b 20 6c 61 79 28 52 52 | 2c 43 43 29 3d 30 3a 63 |. lay(RR|,CC)=0:c|
|00002690| 6f 6c 6f 75 72 3d 30 0d | 0d 2a 3e 20 20 c8 99 22 |olour=0.|.*> .."|
|000026a0| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 33 31 36 |OS_Sprit|eOp",316|
|000026b0| 2c 67 72 69 64 5f 73 70 | 61 63 65 2c 22 67 72 69 |,grid_sp|ace,"gri|
|000026c0| 64 22 2c 67 72 69 64 20 | b8 20 52 30 2c 52 31 2c |d",grid |. R0,R1,|
|000026d0| 52 32 2c 52 33 0d 0d 34 | 34 20 20 e6 20 30 2c 63 |R2,R3..4|4 . 0,c|
|000026e0| 6f 6c 6f 75 72 3a 61 25 | 3d b0 28 32 30 2a 43 43 |olour:a%|=.(20*CC|
|000026f0| 29 2d 31 30 2c 28 32 30 | 2a 52 52 29 2d 31 30 29 |)-10,(20|*RR)-10)|
|00002700| 3a e6 20 31 32 38 2b 61 | 25 0d 0d 3e 36 20 20 c8 |:. 128+a|%..>6 .|
|00002710| 90 20 28 32 30 2a 43 43 | 29 2d 31 30 2c 28 32 30 |. (20*CC|)-10,(20|
|00002720| 2a 52 52 29 2d 31 30 3a | 79 3d 2d 28 32 30 2a 52 |*RR)-10:|y=-(20*R|
|00002730| 4f 57 53 25 29 2b 28 52 | 52 2d 31 29 2a 32 30 0d |OWS%)+(R|R-1)*20.|
|00002740| 0d 48 3d 20 20 c8 99 22 | 57 69 6d 70 5f 46 6f 72 |.H= .."|Wimp_For|
|00002750| 63 65 52 65 64 72 61 77 | 22 2c 6c 61 79 5f 77 69 |ceRedraw|",lay_wi|
|00002760| 6e 25 2c 28 32 30 2a 43 | 43 29 2d 32 30 2c 79 2c |n%,(20*C|C)-20,y,|
|00002770| 28 32 30 2a 43 43 29 2c | 79 2b 32 30 0d 0d 52 21 |(20*CC),|y+20..R!|
|00002780| 20 20 c8 99 22 4f 53 5f | 53 70 72 69 74 65 4f 70 | .."OS_|SpriteOp|
|00002790| 22 2c 52 30 2c 52 31 2c | 52 32 2c 52 33 0d 0d 5c |",R0,R1,|R2,R3..\|
|000027a0| 06 20 cd 0d 0d 5d 04 0d | 0d 5e 10 20 c9 20 6c 69 |. ...]..|.^. . li|
|000027b0| 73 74 5f 77 69 6e 25 0d | 0d 5f 2d 20 20 e7 20 69 |st_win%.|._- . i|
|000027c0| 63 3e 32 33 20 80 20 69 | 63 3c 34 38 20 f2 63 61 |c>23 . i|c<48 .ca|
|000027d0| 72 65 74 28 69 63 2d 32 | 34 2c 6c 69 73 74 5f 77 |ret(ic-2|4,list_w|
|000027e0| 69 6e 25 29 0d 0d 66 06 | 20 cb 0d 0d 70 06 20 e1 |in%)..f.| ...p. .|
|000027f0| 0d 0d 7a 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..z. .--|--------|
|00002800| 0d 0d 84 14 20 dd f2 63 | 61 72 65 74 28 43 25 2c |.... ..c|aret(C%,|
|00002810| 77 68 25 29 0d 0d 8e 2c | 20 f2 69 72 65 61 64 28 |wh%)...,| .iread(|
|00002820| 43 25 2c 77 68 25 29 3a | e7 20 61 24 3d 22 22 20 |C%,wh%):|. a$="" |
|00002830| 77 77 68 3d 2d 31 20 8b | 20 77 77 68 3d a9 61 24 |wwh=-1 .| wwh=.a$|
|00002840| 0d 0d 98 2f 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |.../ .."|Wimp_Set|
|00002850| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 77 |CaretPos|ition",w|
|00002860| 68 25 2c 43 25 2c 30 2c | 2c 2d 31 2c 77 77 68 0d |h%,C%,0,|,-1,wwh.|
|00002870| 0d a2 06 20 e1 0d 0d ac | 10 20 f4 2d 2d 2d 2d 2d |... ....|. .-----|
|00002880| 2d 2d 2d 2d 2d 0d 0d b6 | 28 20 dd f2 70 69 63 74 |-----...|( ..pict|
|00002890| 75 72 65 28 58 53 49 5a | 45 2c 59 53 49 5a 45 2c |ure(XSIZ|E,YSIZE,|
|000028a0| 73 73 73 70 61 63 65 2c | 73 73 73 24 29 0d 0d c0 |ssspace,|sss$)...|
|000028b0| 08 20 ea 20 85 0d 0d ca | 25 20 ee 20 85 20 ea 3a |. . ....|% . . .:|
|000028c0| f7 20 85 3a ef 32 36 3a | db 3a f1 f6 24 3a f1 c3 |. .:.26:|.:..$:..|
|000028d0| 9e 3a 5a 24 3d be 3a fa | 3a e1 0d 0d d4 13 20 24 |.:Z$=.:.|:..... $|
|000028e0| 73 70 72 6e 61 6d 65 25 | 3d 73 73 73 24 0d 0d de |sprname%|=sss$...|
|000028f0| 10 20 e7 20 73 73 73 24 | 3d 22 22 20 8c 0d 0d e8 |. . sss$|="" ....|
|00002900| 37 20 20 c8 99 22 4f 53 | 5f 53 70 72 69 74 65 4f |7 .."OS|_SpriteO|
|00002910| 70 22 2c 32 36 39 2c 73 | 73 73 70 61 63 65 2c 73 |p",269,s|sspace,s|
|00002920| 70 72 6e 61 6d 65 25 2c | 31 33 2c 31 20 b8 20 2c |prname%,|13,1 . ,|
|00002930| 2c 2c 52 33 0d 0d f2 17 | 20 20 3f 28 73 70 72 6e |,,R3....| ?(sprn|
|00002940| 61 6d 65 25 2b 52 33 29 | 3d 31 33 0d 0d fc 06 20 |ame%+R3)|=13.... |
|00002950| cd 0d 0e 06 33 20 c8 99 | 22 4f 53 5f 53 70 72 69 |....3 ..|"OS_Spri|
|00002960| 74 65 4f 70 22 2c 32 38 | 30 2c 73 73 73 70 61 63 |teOp",28|0,ssspac|
|00002970| 65 2c 24 73 70 72 6e 61 | 6d 65 25 20 b8 20 2c 2c |e,$sprna|me% . ,,|
|00002980| 61 64 64 25 0d 0e 10 3a | 20 c8 99 22 4f 53 5f 53 |add%...:| .."OS_S|
|00002990| 70 72 69 74 65 4f 70 22 | 2c 35 35 32 2c 73 73 73 |priteOp"|,552,sss|
|000029a0| 70 61 63 65 2c 61 64 64 | 25 20 b8 20 2c 2c 2c 73 |pace,add|% . ,,,s|
|000029b0| 78 25 2c 73 79 25 2c 2c | 73 6d 6f 64 65 25 0d 0e |x%,sy%,,|smode%..|
|000029c0| 1a 24 20 65 25 3d 28 61 | 64 64 25 21 33 32 2d 34 |.$ e%=(a|dd%!32-4|
|000029d0| 34 29 2f 38 3a 70 61 6c | 25 3d 70 61 6c 62 75 66 |4)/8:pal|%=palbuf|
|000029e0| 66 25 0d 0e 24 0c 20 c8 | 8e 20 65 25 20 ca 0d 0e |f%..$. .|. e% ...|
|000029f0| 2e 09 20 20 c9 20 30 0d | 0e 38 2e 20 20 c8 99 22 |.. . 0.|.8. .."|
|00002a00| 4f 53 5f 52 65 61 64 4d | 6f 64 65 56 61 72 69 61 |OS_ReadM|odeVaria|
|00002a10| 62 6c 65 22 2c 73 6d 6f | 64 65 25 2c 39 20 b8 20 |ble",smo|de%,9 . |
|00002a20| 2c 2c 70 70 25 0d 0e 42 | 0e 20 20 c8 8e 20 70 70 |,,pp%..B|. .. pp|
|00002a30| 25 20 ca 0d 0e 4c 13 20 | 20 20 c9 20 30 3a 70 61 |% ...L. | . 0:pa|
|00002a40| 6c 25 3d 70 30 25 0d 0e | 56 13 20 20 20 c9 20 31 |l%=p0%..|V. . 1|
|00002a50| 3a 70 61 6c 25 3d 70 31 | 25 0d 0e 60 13 20 20 20 |:pal%=p1|%..`. |
|00002a60| c9 20 32 3a 70 61 6c 25 | 3d 70 32 25 0d 0e 6a 13 |. 2:pal%|=p2%..j.|
|00002a70| 20 20 20 c9 20 33 3a 70 | 61 6c 25 3d 70 33 25 0d | . 3:p|al%=p3%.|
|00002a80| 0e 74 06 20 cb 0d 0e 7e | 04 0d 0e 88 0d 20 c9 20 |.t. ...~|..... . |
|00002a90| 32 2c 34 2c 31 36 0d 0e | 92 13 20 20 e3 20 69 25 |2,4,16..|.. . i%|
|00002aa0| 3d 30 20 b8 20 65 25 2d | 31 0d 0e 9c 20 20 20 70 |=0 . e%-|1... p|
|00002ab0| 61 6c 25 21 28 69 25 2a | 34 29 3d 61 64 64 25 21 |al%!(i%*|4)=add%!|
|00002ac0| 28 34 34 2b 69 25 2a 38 | 29 0d 0e a6 0a 20 20 ed |(44+i%*8|).... .|
|00002ad0| 20 69 25 0d 0e b0 09 20 | c9 20 36 34 0d 0e ba 3e | i%.... |. 64...>|
|00002ae0| 20 20 e3 20 67 72 61 62 | 25 3d 30 20 b8 20 32 30 | . grab|%=0 . 20|
|00002af0| 34 38 2d 38 20 88 20 38 | 3a 70 61 6c 25 21 28 67 |48-8 . 8|:pal%!(g|
|00002b00| 72 61 62 25 3e 3e 31 29 | 3d 61 64 64 25 21 28 67 |rab%>>1)|=add%!(g|
|00002b10| 72 61 62 25 2b 34 34 29 | 3a ed 0d 0e c4 06 20 cb |rab%+44)|:..... .|
|00002b20| 0d 0e ce 12 20 e7 20 73 | 6d 6f 64 65 25 3d 2d 31 |.... . s|mode%=-1|
|00002b30| 20 e1 0d 0e d8 42 20 e7 | 20 65 25 3c 36 34 20 c8 | ....B .| e%<64 .|
|00002b40| 99 22 43 6f 6c 6f 75 72 | 54 72 61 6e 73 5f 53 65 |."Colour|Trans_Se|
|00002b50| 6c 65 63 74 54 61 62 6c | 65 22 2c 73 6d 6f 64 65 |lectTabl|e",smode|
|00002b60| 25 2c 70 61 6c 25 2c 2d | 31 2c 2d 31 2c 74 72 61 |%,pal%,-|1,-1,tra|
|00002b70| 6e 73 32 25 0d 0e e2 0e | 20 e7 20 65 25 3e 36 33 |ns2%....| . e%>63|
|00002b80| 20 8c 0d 0e ec 22 20 20 | e3 20 51 25 3d 30 20 b8 | ...." |. Q%=0 .|
|00002b90| 20 32 35 35 3a 74 72 61 | 6e 73 32 25 3f 51 25 3d | 255:tra|ns2%?Q%=|
|00002ba0| 51 25 3a ed 0d 0e f6 12 | 20 20 e3 20 51 25 3d 30 |Q%:.....| . Q%=0|
|00002bb0| 20 b8 20 32 35 35 0d 0f | 00 42 20 20 c8 99 22 43 | . 255..|.B .."C|
|00002bc0| 6f 6c 6f 75 72 54 72 61 | 6e 73 5f 52 65 74 75 72 |olourTra|ns_Retur|
|00002bd0| 6e 43 6f 6c 6f 75 72 4e | 75 6d 62 65 72 22 2c 70 |nColourN|umber",p|
|00002be0| 61 6c 25 21 28 51 25 3c | 3c 32 29 20 b8 20 74 72 |al%!(Q%<|<2) . tr|
|00002bf0| 61 6e 73 32 25 3f 51 25 | 0d 0f 0a 07 20 20 ed 0d |ans2%?Q%|.... ..|
|00002c00| 0f 14 3c 20 20 c8 99 22 | 43 6f 6c 6f 75 72 54 72 |..< .."|ColourTr|
|00002c10| 61 6e 73 5f 53 65 6c 65 | 63 74 54 61 62 6c 65 22 |ans_Sele|ctTable"|
|00002c20| 2c 73 6d 6f 64 65 25 2c | 70 61 6c 25 2c 4b 75 2c |,smode%,|pal%,Ku,|
|00002c30| 4b 75 70 2c 74 72 61 6e | 73 32 25 0d 0f 1e 06 20 |Kup,tran|s2%.... |
|00002c40| cd 0d 0f 28 04 0d 0f 32 | 2e 20 c8 99 22 4f 53 5f |...(...2|. .."OS_|
|00002c50| 52 65 61 64 4d 6f 64 65 | 56 61 72 69 61 62 6c 65 |ReadMode|Variable|
|00002c60| 22 2c 73 6d 6f 64 65 25 | 2c 34 20 b8 20 2c 2c 78 |",smode%|,4 . ,,x|
|00002c70| 6d 61 67 0d 0f 3c 2e 20 | c8 99 22 4f 53 5f 52 65 |mag..<. |.."OS_Re|
|00002c80| 61 64 4d 6f 64 65 56 61 | 72 69 61 62 6c 65 22 2c |adModeVa|riable",|
|00002c90| 73 6d 6f 64 65 25 2c 35 | 20 b8 20 2c 2c 79 6d 61 |smode%,5| . ,,yma|
|00002ca0| 67 0d 0f 46 24 20 73 78 | 25 3d 28 73 78 25 3c 3c |g..F$ sx|%=(sx%<<|
|00002cb0| 78 6d 61 67 29 3a 73 79 | 25 3d 28 73 79 25 3c 3c |xmag):sy|%=(sy%<<|
|00002cc0| 79 6d 61 67 29 0d 0f 50 | 2b 20 c8 99 22 4f 53 5f |ymag)..P|+ .."OS_|
|00002cd0| 52 65 61 64 4d 6f 64 65 | 56 61 72 69 61 62 6c 65 |ReadMode|Variable|
|00002ce0| 22 2c 2d 31 2c 35 20 b8 | 20 2c 2c 79 6d 61 67 32 |",-1,5 .| ,,ymag2|
|00002cf0| 0d 0f 5a 2b 20 c8 99 22 | 4f 53 5f 52 65 61 64 4d |..Z+ .."|OS_ReadM|
|00002d00| 6f 64 65 56 61 72 69 61 | 62 6c 65 22 2c 2d 31 2c |odeVaria|ble",-1,|
|00002d10| 34 20 b8 20 2c 2c 78 6d | 61 67 32 0d 0f 64 2e 20 |4 . ,,xm|ag2..d. |
|00002d20| e7 20 70 72 6e 74 5f 73 | 74 61 74 75 73 3d 31 20 |. prnt_s|tatus=1 |
|00002d30| 78 6d 61 67 32 3d 78 73 | 74 69 6e 74 3a 79 6d 61 |xmag2=xs|tint:yma|
|00002d40| 67 32 3d 79 73 74 69 6e | 74 0d 0f 6e 04 0d 0f 78 |g2=ystin|t..n...x|
|00002d50| 31 20 66 61 3d 28 32 5e | 79 6d 61 67 32 29 2f 28 |1 fa=(2^|ymag2)/(|
|00002d60| 32 5e 79 6d 61 67 29 3a | 66 61 32 3d 28 32 5e 78 |2^ymag):|fa2=(2^x|
|00002d70| 6d 61 67 32 29 2f 28 32 | 5e 78 6d 61 67 29 0d 0f |mag2)/(2|^xmag)..|
|00002d80| 82 26 20 72 61 74 69 6f | 78 3d 58 53 49 5a 45 2f |.& ratio|x=XSIZE/|
|00002d90| 73 78 25 3a 72 61 74 69 | 6f 79 3d 59 53 49 5a 45 |sx%:rati|oy=YSIZE|
|00002da0| 2f 73 79 25 0d 0f 8c 3e | 20 e7 20 72 61 74 69 6f |/sy%...>| . ratio|
|00002db0| 78 3c 72 61 74 69 6f 79 | 20 73 66 6e 25 3d 58 53 |x<ratioy| sfn%=XS|
|00002dc0| 49 5a 45 3a 73 66 64 25 | 3d 73 78 25 20 8b 20 73 |IZE:sfd%|=sx% . s|
|00002dd0| 66 6e 25 3d 59 53 49 5a | 45 3a 73 66 64 25 3d 73 |fn%=YSIZ|E:sfd%=s|
|00002de0| 79 25 0d 0f 96 3b 20 21 | 6d 61 67 25 3d 73 66 6e |y%...; !|mag%=sfn|
|00002df0| 25 3a 6d 61 67 25 21 34 | 3d 73 66 6e 25 3a 6d 61 |%:mag%!4|=sfn%:ma|
|00002e00| 67 25 21 38 3d 73 66 64 | 25 2a 66 61 32 3a 6d 61 |g%!8=sfd|%*fa2:ma|
|00002e10| 67 25 21 31 32 3d 73 66 | 64 25 2a 66 61 0d 0f a0 |g%!12=sf|d%*fa...|
|00002e20| 2c 20 73 78 25 3d 73 78 | 25 2a 28 73 66 6e 25 2f |, sx%=sx|%*(sfn%/|
|00002e30| 73 66 64 25 29 3a 73 79 | 25 3d 73 79 25 2a 28 73 |sfd%):sy|%=sy%*(s|
|00002e40| 66 6e 25 2f 73 66 64 25 | 29 0d 0f aa 1a 20 78 73 |fn%/sfd%|).... xs|
|00002e50| 69 7a 65 25 3d 73 78 25 | 3a 79 73 69 7a 65 25 3d |ize%=sx%|:ysize%=|
|00002e60| 73 79 25 0d 0f b4 08 20 | f7 20 85 0d 0f be 06 20 |sy%.... |. ..... |
|00002e70| e1 0d 0f c8 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|00002e80| 2d 0d 0f d2 15 20 dd f2 | 76 65 72 69 66 79 73 68 |-.... ..|verifysh|
|00002e90| 75 74 64 6f 77 6e 0d 0f | dc 13 20 e7 20 73 61 76 |utdown..|.. . sav|
|00002ea0| 65 64 5f 6f 6b 3d a3 20 | 8c 0d 0f e6 3a 20 20 f2 |ed_ok=. |....: .|
|00002eb0| 61 6c 65 72 74 32 28 22 | 59 6f 75 20 68 61 76 65 |alert2("|You have|
|00002ec0| 20 77 6f 72 6b 20 74 68 | 61 74 20 68 61 73 20 6e | work th|at has n|
|00002ed0| 6f 74 20 62 65 65 6e 20 | 73 61 76 65 64 20 79 65 |ot been |saved ye|
|00002ee0| 74 22 29 0d 0f f0 49 20 | 20 e7 20 61 6c 65 72 74 |t")...I | . alert|
|00002ef0| 3d 32 20 62 6c 6f 63 6b | 25 21 30 3d 77 68 61 6e |=2 block|%!0=whan|
|00002f00| 64 6c 65 31 25 3a c8 99 | 22 57 69 6d 70 5f 43 6c |dle1%:..|"Wimp_Cl|
|00002f10| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00002f20| 6b 25 3a 71 75 69 74 25 | 3d b9 3a e1 0d 0f fa 11 |k%:quit%|=.:.....|
|00002f30| 20 20 e7 20 61 6c 65 72 | 74 3d 33 20 8c 0d 10 04 | . aler|t=3 ....|
|00002f40| 38 20 20 20 62 6c 6f 63 | 6b 25 21 30 3d 77 68 61 |8 bloc|k%!0=wha|
|00002f50| 6e 64 6c 65 38 25 3a c8 | 99 22 57 69 6d 70 5f 47 |ndle8%:.|."Wimp_G|
|00002f60| 65 74 57 69 6e 64 6f 77 | 49 6e 66 6f 22 2c 2c 62 |etWindow|Info",,b|
|00002f70| 6c 6f 63 6b 25 0d 10 0e | 62 20 20 20 62 6c 6f 63 |lock%...|b bloc|
|00002f80| 6b 25 21 34 3d 28 74 6f | 70 5f 78 2d 31 32 33 29 |k%!4=(to|p_x-123)|
|00002f90| 2f 32 3a 62 6c 6f 63 6b | 25 21 38 3d 28 74 6f 70 |/2:block|%!8=(top|
|00002fa0| 5f 79 2d 31 33 34 29 2f | 32 3a 62 6c 6f 63 6b 25 |_y-134)/|2:block%|
|00002fb0| 21 31 32 3d 62 6c 6f 63 | 6b 25 21 34 2b 32 34 36 |!12=bloc|k%!4+246|
|00002fc0| 3a 62 6c 6f 63 6b 25 21 | 31 36 3d 62 6c 6f 63 6b |:block%!|16=block|
|00002fd0| 25 21 38 2b 31 36 38 0d | 10 18 22 20 20 20 c8 99 |%!8+168.|.." ..|
|00002fe0| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00002ff0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 10 22 27 20 20 20 |",,block|%.."' |
|00003000| 73 61 76 65 5f 64 69 61 | 3d 31 3a f2 63 61 72 65 |save_dia|=1:.care|
|00003010| 74 28 30 2c 77 68 61 6e | 64 6c 65 38 25 29 3a e1 |t(0,whan|dle8%):.|
|00003020| 0d 10 2c 07 20 20 cd 0d | 10 36 06 20 cc 0d 10 40 |..,. ..|.6. ...@|
|00003030| 3f 20 20 62 6c 6f 63 6b | 25 21 30 3d 77 68 61 6e |? block|%!0=whan|
|00003040| 64 6c 65 31 25 3a c8 99 | 22 57 69 6d 70 5f 43 6c |dle1%:..|"Wimp_Cl|
|00003050| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00003060| 6b 25 3a 71 75 69 74 25 | 3d b9 3a e1 0d 10 4a 06 |k%:quit%|=.:...J.|
|00003070| 20 cd 0d 10 54 06 20 e1 | 0d 10 5e 10 20 f4 2d 2d | ...T. .|..^. .--|
|00003080| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 10 68 13 20 dd f2 6f |--------|..h. ..o|
|00003090| 70 74 69 6f 6e 73 65 6c | 65 63 74 0d 10 72 34 20 |ptionsel|ect..r4 |
|000030a0| 63 68 6f 69 63 65 25 3d | 21 62 6c 6f 63 6b 25 3a |choice%=|!block%:|
|000030b0| 63 68 6f 69 63 65 32 25 | 3d 62 6c 6f 63 6b 25 21 |choice2%|=block%!|
|000030c0| 34 3a 63 72 65 61 74 65 | 5f 6d 65 6e 75 3d 30 0d |4:create|_menu=0.|
|000030d0| 10 7c 3a 20 e7 20 4d 55 | 24 3d 22 54 69 74 6c 65 |.|: . MU|$="Title|
|000030e0| 22 20 84 20 4d 55 24 3d | 22 54 65 78 74 22 20 84 |" . MU$=|"Text" .|
|000030f0| 20 4d 55 24 3d 22 47 72 | 69 64 22 20 84 20 4d 55 | MU$="Gr|id" . MU|
|00003100| 24 3d 22 54 72 79 22 20 | 8c 0d 10 86 32 20 20 c8 |$="Try" |....2 .|
|00003110| 99 22 57 69 6d 70 5f 44 | 65 63 6f 64 65 4d 65 6e |."Wimp_D|ecodeMen|
|00003120| 75 22 2c 2c 66 6f 6e 74 | 6d 65 6e 75 25 2c 62 6c |u",,font|menu%,bl|
|00003130| 6f 63 6b 25 2c 66 5f 61 | 6e 73 25 0d 10 90 06 20 |ock%,f_a|ns%.... |
|00003140| cd 0d 10 9a 24 20 c8 99 | 22 57 69 6d 70 5f 47 65 |....$ ..|"Wimp_Ge|
|00003150| 74 50 6f 69 6e 74 65 72 | 49 6e 66 6f 22 2c 2c 62 |tPointer|Info",,b|
|00003160| 6c 6f 63 6b 25 0d 10 a4 | 3a 20 78 70 6f 73 3d 21 |lock%...|: xpos=!|
|00003170| 62 6c 6f 63 6b 25 3a 79 | 70 6f 73 3d 62 6c 6f 63 |block%:y|pos=bloc|
|00003180| 6b 25 21 34 3a e7 20 62 | 6c 6f 63 6b 25 21 38 3d |k%!4:. b|lock%!8=|
|00003190| 31 20 63 72 65 61 74 65 | 5f 6d 65 6e 75 3d 31 0d |1 create|_menu=1.|
|000031a0| 10 ae 3b 20 e7 20 4d 55 | 24 3d 22 54 69 74 6c 65 |..; . MU|$="Title|
|000031b0| 22 20 84 20 4d 55 24 3d | 22 54 65 78 74 22 20 84 |" . MU$=|"Text" .|
|000031c0| 20 4d 55 24 3d 22 47 72 | 69 64 22 20 f2 6f 70 74 | MU$="Gr|id" .opt|
|000031d0| 69 6f 6e 5f 66 6f 6e 74 | 3a e1 0d 10 b8 25 20 e7 |ion_font|:....% .|
|000031e0| 20 4d 55 24 3d 22 62 6f | 72 64 65 72 22 20 f2 6f | MU$="bo|rder" .o|
|000031f0| 70 74 69 6f 6e 5f 62 6f | 72 64 65 72 32 3a e1 0d |ption_bo|rder2:..|
|00003200| 10 c2 28 20 e7 20 4d 55 | 24 3d 22 6d 61 69 6e 6d |..( . MU|$="mainm|
|00003210| 65 6e 75 22 20 f2 6f 70 | 74 69 6f 6e 5f 6d 61 69 |enu" .op|tion_mai|
|00003220| 6e 6d 65 6e 75 3a e1 0d | 10 cc 20 20 e7 20 63 68 |nmenu:..|.. . ch|
|00003230| 6f 69 63 65 25 3d 31 20 | f2 76 65 72 69 66 79 73 |oice%=1 |.verifys|
|00003240| 68 75 74 64 6f 77 6e 0d | 10 d6 06 20 e1 0d 10 e0 |hutdown.|... ....|
|00003250| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 10 ea |. .-----|-----...|
|00003260| 12 20 dd f2 6f 70 74 69 | 6f 6e 5f 66 6f 6e 74 0d |. ..opti|on_font.|
|00003270| 10 f4 11 20 c8 8e 20 63 | 68 6f 69 63 65 25 20 ca |... .. c|hoice% .|
|00003280| 0d 10 fe 08 20 c9 20 30 | 0d 11 08 15 20 20 e7 20 |.... . 0|.... . |
|00003290| 63 68 6f 69 63 65 32 25 | 3d 2d 31 20 e1 0d 11 12 |choice2%|=-1 ....|
|000032a0| 16 20 20 f2 63 6f 6c 5f | 72 61 6e 67 65 5f 63 68 |. .col_|range_ch|
|000032b0| 65 63 6b 0d 11 1c 2a 20 | 20 e7 20 4d 55 24 3d 22 |eck...* | . MU$="|
|000032c0| 54 69 74 6c 65 22 20 74 | 69 74 6c 65 5f 66 6f 6e |Title" t|itle_fon|
|000032d0| 74 63 6f 6c 3d 63 68 6f | 69 63 65 32 25 0d 11 26 |tcol=cho|ice2%..&|
|000032e0| 28 20 20 e7 20 4d 55 24 | 3d 22 47 72 69 64 22 20 |( . MU$|="Grid" |
|000032f0| 67 72 69 64 5f 66 6f 6e | 74 63 6f 6c 3d 63 68 6f |grid_fon|tcol=cho|
|00003300| 69 63 65 32 25 0d 11 30 | 28 20 20 e7 20 4d 55 24 |ice2%..0|( . MU$|
|00003310| 3d 22 54 65 78 74 22 20 | 74 65 78 74 5f 66 6f 6e |="Text" |text_fon|
|00003320| 74 63 6f 6c 3d 63 68 6f | 69 63 65 32 25 0d 11 44 |tcol=cho|ice2%..D|
|00003330| 17 20 20 e7 20 63 72 65 | 61 74 65 5f 6d 65 6e 75 |. . cre|ate_menu|
|00003340| 3d 30 20 e1 0d 11 4e 56 | 20 20 e7 20 4d 55 24 3d |=0 ...NV| . MU$=|
|00003350| 22 54 69 74 6c 65 22 20 | f2 63 6f 6c 6f 75 72 6d |"Title" |.colourm|
|00003360| 65 6e 75 28 63 6f 6c 6d | 65 6e 75 2c 74 69 74 6c |enu(colm|enu,titl|
|00003370| 65 5f 66 6f 6e 74 63 6f | 6c 29 3a f2 66 6f 6e 74 |e_fontco|l):.font|
|00003380| 6d 65 6e 75 28 66 6f 6e | 74 6d 65 6e 75 25 2c 74 |menu(fon|tmenu%,t|
|00003390| 69 74 6c 65 5f 66 6f 6e | 74 29 0d 11 58 53 20 20 |itle_fon|t)..XS |
|000033a0| e7 20 4d 55 24 3d 22 54 | 65 78 74 22 20 f2 63 6f |. MU$="T|ext" .co|
|000033b0| 6c 6f 75 72 6d 65 6e 75 | 28 63 6f 6c 6d 65 6e 75 |lourmenu|(colmenu|
|000033c0| 2c 74 65 78 74 5f 66 6f | 6e 74 63 6f 6c 29 3a f2 |,text_fo|ntcol):.|
|000033d0| 66 6f 6e 74 6d 65 6e 75 | 28 66 6f 6e 74 6d 65 6e |fontmenu|(fontmen|
|000033e0| 75 25 2c 74 65 78 74 5f | 66 6f 6e 74 29 0d 11 62 |u%,text_|font)..b|
|000033f0| 53 20 20 e7 20 4d 55 24 | 3d 22 47 72 69 64 22 20 |S . MU$|="Grid" |
|00003400| f2 63 6f 6c 6f 75 72 6d | 65 6e 75 28 63 6f 6c 6d |.colourm|enu(colm|
|00003410| 65 6e 75 2c 67 72 69 64 | 5f 66 6f 6e 74 63 6f 6c |enu,grid|_fontcol|
|00003420| 29 3a f2 66 6f 6e 74 6d | 65 6e 75 28 66 6f 6e 74 |):.fontm|enu(font|
|00003430| 6d 65 6e 75 25 2c 67 72 | 69 64 5f 66 6f 6e 74 29 |menu%,gr|id_font)|
|00003440| 0d 11 76 2f 20 20 c8 99 | 22 57 69 6d 70 5f 43 72 |..v/ ..|"Wimp_Cr|
|00003450| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 66 6f 6e 74 6d |eateMenu|",,fontm|
|00003460| 65 6e 75 25 2c 78 73 74 | 2d 35 31 2c 79 73 74 0d |enu%,xst|-51,yst.|
|00003470| 11 80 07 20 20 e1 0d 11 | 8a 06 20 cb 0d 11 94 04 |... ...|.. .....|
|00003480| 0d 11 9e 11 20 f2 63 68 | 6f 6f 73 65 5f 66 6f 6e |.... .ch|oose_fon|
|00003490| 74 0d 11 a8 2f 20 f2 72 | 6d 28 22 54 58 54 33 22 |t.../ .r|m("TXT3"|
|000034a0| 29 3a e7 20 4d 55 24 3d | 74 65 78 74 24 20 74 69 |):. MU$=|text$ ti|
|000034b0| 74 6c 65 5f 66 6f 6e 74 | 3d 63 68 6f 69 63 65 25 |tle_font|=choice%|
|000034c0| 0d 11 b2 2e 20 f2 72 6d | 28 22 54 58 54 34 22 29 |.... .rm|("TXT4")|
|000034d0| 3a e7 20 4d 55 24 3d 74 | 65 78 74 24 20 74 65 78 |:. MU$=t|ext$ tex|
|000034e0| 74 5f 66 6f 6e 74 3d 63 | 68 6f 69 63 65 25 0d 11 |t_font=c|hoice%..|
|000034f0| bc 2e 20 f2 72 6d 28 22 | 54 58 54 32 22 29 3a e7 |.. .rm("|TXT2"):.|
|00003500| 20 4d 55 24 3d 74 65 78 | 74 24 20 67 72 69 64 5f | MU$=tex|t$ grid_|
|00003510| 66 6f 6e 74 3d 63 68 6f | 69 63 65 25 0d 11 d0 2a |font=cho|ice%...*|
|00003520| 20 f2 69 73 65 74 28 30 | 2c 66 6f 6e 74 73 24 28 | .iset(0|,fonts$(|
|00003530| 74 69 74 6c 65 5f 66 6f | 6e 74 29 2c 66 6f 6e 74 |title_fo|nt),font|
|00003540| 5f 77 69 6e 25 29 0d 11 | da 29 20 f2 69 73 65 74 |_win%)..|.) .iset|
|00003550| 28 33 2c 66 6f 6e 74 73 | 24 28 74 65 78 74 5f 66 |(3,fonts|$(text_f|
|00003560| 6f 6e 74 29 2c 66 6f 6e | 74 5f 77 69 6e 25 29 0d |ont),fon|t_win%).|
|00003570| 11 e4 29 20 f2 69 73 65 | 74 28 34 2c 66 6f 6e 74 |..) .ise|t(4,font|
|00003580| 73 24 28 67 72 69 64 5f | 66 6f 6e 74 29 2c 66 6f |s$(grid_|font),fo|
|00003590| 6e 74 5f 77 69 6e 25 29 | 0d 11 ee 16 20 e7 20 63 |nt_win%)|.... . c|
|000035a0| 72 65 61 74 65 5f 6d 65 | 6e 75 3d 30 20 e1 0d 11 |reate_me|nu=0 ...|
|000035b0| f8 32 20 e7 20 4d 55 24 | 3d 22 54 69 74 6c 65 22 |.2 . MU$|="Title"|
|000035c0| 20 f2 66 6f 6e 74 6d 65 | 6e 75 28 66 6f 6e 74 6d | .fontme|nu(fontm|
|000035d0| 65 6e 75 25 2c 74 69 74 | 6c 65 5f 66 6f 6e 74 29 |enu%,tit|le_font)|
|000035e0| 0d 12 02 30 20 e7 20 4d | 55 24 3d 22 54 65 78 74 |...0 . M|U$="Text|
|000035f0| 22 20 f2 66 6f 6e 74 6d | 65 6e 75 28 66 6f 6e 74 |" .fontm|enu(font|
|00003600| 6d 65 6e 75 25 2c 74 65 | 78 74 5f 66 6f 6e 74 29 |menu%,te|xt_font)|
|00003610| 0d 12 0c 30 20 e7 20 4d | 55 24 3d 22 47 72 69 64 |...0 . M|U$="Grid|
|00003620| 22 20 f2 66 6f 6e 74 6d | 65 6e 75 28 66 6f 6e 74 |" .fontm|enu(font|
|00003630| 6d 65 6e 75 25 2c 67 72 | 69 64 5f 66 6f 6e 74 29 |menu%,gr|id_font)|
|00003640| 0d 12 20 2e 20 c8 99 22 | 57 69 6d 70 5f 43 72 65 |.. . .."|Wimp_Cre|
|00003650| 61 74 65 4d 65 6e 75 22 | 2c 2c 66 6f 6e 74 6d 65 |ateMenu"|,,fontme|
|00003660| 6e 75 25 2c 78 73 74 2d | 35 31 2c 79 73 74 0d 12 |nu%,xst-|51,yst..|
|00003670| 2a 06 20 e1 0d 12 34 10 | 20 f4 2d 2d 2d 2d 2d 2d |*. ...4.| .------|
|00003680| 2d 2d 2d 2d 0d 12 3e 15 | 20 dd f2 6f 70 74 69 6f |----..>.| ..optio|
|00003690| 6e 5f 62 6f 72 64 65 72 | 32 0d 12 48 20 20 f4 50 |n_border|2..H .P|
|000036a0| 52 4f 43 66 72 6f 6e 74 | 5f 69 74 3a 50 52 4f 43 |ROCfront|_it:PROC|
|000036b0| 6d 69 6e 69 5f 70 6f 6c | 6c 0d 12 52 12 20 e7 20 |mini_pol|l..R. . |
|000036c0| 63 68 6f 69 63 65 25 3d | 30 20 8c 0d 12 5c 1e 20 |choice%=|0 ...\. |
|000036d0| 20 62 6f 72 64 65 72 25 | 3d a3 3a f2 73 74 79 6c | border%|=.:.styl|
|000036e0| 65 31 28 31 2c 30 2c 30 | 29 0d 12 66 31 20 20 c8 |e1(1,0,0|)..f1 .|
|000036f0| 99 22 57 69 6d 70 5f 46 | 6f 72 63 65 52 65 64 72 |."Wimp_F|orceRedr|
|00003700| 61 77 22 2c 77 68 61 6e | 64 6c 65 31 25 2c 30 2c |aw",whan|dle1%,0,|
|00003710| 2d 39 30 30 2c 37 30 30 | 2c 30 0d 12 70 06 20 cc |-900,700|,0..p. .|
|00003720| 0d 12 7a 11 20 20 f2 72 | 6d 28 22 54 58 54 36 22 |..z. .r|m("TXT6"|
|00003730| 29 0d 12 84 22 20 20 e7 | 20 62 6f 72 64 65 72 73 |)..." .| borders|
|00003740| 24 28 63 68 6f 69 63 65 | 25 29 3c 3e 74 65 78 74 |$(choice|%)<>text|
|00003750| 24 20 8c 0d 12 8e 2d 20 | 20 20 44 4e 24 3d 62 6f |$ ....- | DN$=bo|
|00003760| 72 64 65 72 5f 70 61 74 | 68 24 2b 22 2e 22 2b 62 |rder_pat|h$+"."+b|
|00003770| 6f 72 64 65 72 73 24 28 | 63 68 6f 69 63 65 25 29 |orders$(|choice%)|
|00003780| 0d 12 98 34 20 20 20 69 | 6d 5f 74 79 70 65 24 3d |...4 i|m_type$=|
|00003790| 22 62 6f 72 64 65 72 22 | 3a f2 69 6d 70 6f 72 74 |"border"|:.import|
|000037a0| 5f 66 69 6c 65 3a f2 73 | 74 79 6c 65 31 28 31 2c |_file:.s|tyle1(1,|
|000037b0| 30 2c 30 29 0d 12 a2 32 | 20 20 20 c8 99 22 57 69 |0,0)...2| .."Wi|
|000037c0| 6d 70 5f 46 6f 72 63 65 | 52 65 64 72 61 77 22 2c |mp_Force|Redraw",|
|000037d0| 77 68 61 6e 64 6c 65 31 | 25 2c 30 2c 2d 39 30 30 |whandle1|%,0,-900|
|000037e0| 2c 37 30 30 2c 30 0d 12 | ac 07 20 20 cd 0d 12 b6 |,700,0..|.. ....|
|000037f0| 06 20 cd 0d 12 c0 16 20 | e7 20 63 72 65 61 74 65 |. ..... |. create|
|00003800| 5f 6d 65 6e 75 3d 30 20 | e1 0d 12 ca 20 20 f4 50 |_menu=0 |.... .P|
|00003810| 52 4f 43 66 72 6f 6e 74 | 5f 69 74 3a 50 52 4f 43 |ROCfront|_it:PROC|
|00003820| 6d 69 6e 69 5f 70 6f 6c | 6c 0d 12 d4 35 20 c8 99 |mini_pol|l...5 ..|
|00003830| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00003840| 22 2c 2c 62 6f 72 64 65 | 72 73 6d 65 6e 75 25 2c |",,borde|rsmenu%,|
|00003850| 78 6d 65 6e 75 2d 35 31 | 2c 79 6d 65 6e 75 0d 12 |xmenu-51|,ymenu..|
|00003860| de 06 20 e1 0d 12 e8 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|00003870| 2d 2d 2d 2d 0d 12 f2 16 | 20 dd f2 6f 70 74 69 6f |----....| ..optio|
|00003880| 6e 5f 6d 61 69 6e 6d 65 | 6e 75 0d 12 fc 12 20 e7 |n_mainme|nu.... .|
|00003890| 20 63 68 6f 69 63 65 25 | 3d 33 20 8c 0d 13 06 25 | choice%|=3 ....%|
|000038a0| 20 20 66 69 74 74 69 6e | 67 5f 72 65 70 6f 72 74 | fittin|g_report|
|000038b0| 3d ac 20 66 69 74 74 69 | 6e 67 5f 72 65 70 6f 72 |=. fitti|ng_repor|
|000038c0| 74 0d 13 10 61 20 20 e7 | 20 63 72 65 61 74 65 5f |t...a .| create_|
|000038d0| 6d 65 6e 75 3d 31 20 f2 | 6d 61 69 6e 6d 65 6e 75 |menu=1 .|mainmenu|
|000038e0| 28 6d 6d 65 6e 75 25 29 | 3a c8 99 22 57 69 6d 70 |(mmenu%)|:.."Wimp|
|000038f0| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 6d 6d |_CreateM|enu",,mm|
|00003900| 65 6e 75 25 2c 78 6d 65 | 6e 75 2d 35 31 2c 79 6d |enu%,xme|nu-51,ym|
|00003910| 65 6e 75 3a 4d 55 24 3d | 22 6d 61 69 6e 6d 65 6e |enu:MU$=|"mainmen|
|00003920| 75 22 0d 13 1a 07 20 20 | e1 0d 13 24 06 20 cd 0d |u".... |...$. ..|
|00003930| 13 2e 12 20 e7 20 63 68 | 6f 69 63 65 25 3d 32 20 |... . ch|oice%=2 |
|00003940| 8c 0d 13 38 13 20 20 f2 | 73 61 76 65 64 65 66 61 |...8. .|savedefa|
|00003950| 75 6c 74 73 0d 13 42 61 | 20 20 e7 20 63 72 65 61 |ults..Ba| . crea|
|00003960| 74 65 5f 6d 65 6e 75 3d | 31 20 f2 6d 61 69 6e 6d |te_menu=|1 .mainm|
|00003970| 65 6e 75 28 6d 6d 65 6e | 75 25 29 3a c8 99 22 57 |enu(mmen|u%):.."W|
|00003980| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00003990| 2c 6d 6d 65 6e 75 25 2c | 78 6d 65 6e 75 2d 35 31 |,mmenu%,|xmenu-51|
|000039a0| 2c 79 6d 65 6e 75 3a 4d | 55 24 3d 22 6d 61 69 6e |,ymenu:M|U$="main|
|000039b0| 6d 65 6e 75 22 0d 13 4c | 07 20 20 e1 0d 13 56 06 |menu"..L|. ...V.|
|000039c0| 20 cd 0d 13 60 13 20 e7 | 20 63 68 6f 69 63 65 25 | ...`. .| choice%|
|000039d0| 3c 3e 31 20 e1 0d 13 6a | 34 20 f2 72 6d 28 22 42 |<>1 ...j|4 .rm("B|
|000039e0| 55 54 37 22 29 3a 62 75 | 74 31 24 3d 74 65 78 74 |UT7"):bu|t1$=text|
|000039f0| 24 3a f2 72 6d 28 22 42 | 55 54 32 22 29 3a 62 75 |$:.rm("B|UT2"):bu|
|00003a00| 74 32 24 3d 74 65 78 74 | 24 0d 13 74 2a 20 f2 72 |t2$=text|$..t* .r|
|00003a10| 6d 28 22 41 4c 54 36 22 | 29 3a f2 61 6c 65 72 74 |m("ALT6"|):.alert|
|00003a20| 28 74 65 78 74 24 2c 62 | 75 74 31 24 2c 62 75 74 |(text$,b|ut1$,but|
|00003a30| 32 24 29 0d 13 7e 5d 20 | e7 20 61 6c 65 72 74 3d |2$)..~] |. alert=|
|00003a40| 30 20 80 20 63 72 65 61 | 74 65 5f 6d 65 6e 75 3d |0 . crea|te_menu=|
|00003a50| 31 20 f2 6d 61 69 6e 6d | 65 6e 75 28 6d 6d 65 6e |1 .mainm|enu(mmen|
|00003a60| 75 25 29 3a c8 99 22 57 | 69 6d 70 5f 43 72 65 61 |u%):.."W|imp_Crea|
|00003a70| 74 65 4d 65 6e 75 22 2c | 2c 6d 6d 65 6e 75 25 2d |teMenu",|,mmenu%-|
|00003a80| 35 31 2c 78 6d 65 6e 75 | 2c 79 6d 65 6e 75 3a e1 |51,xmenu|,ymenu:.|
|00003a90| 0d 13 88 10 20 e7 20 61 | 6c 65 72 74 3d 30 20 e1 |.... . a|lert=0 .|
|00003aa0| 0d 13 92 1c 20 62 6f 72 | 64 65 72 5f 70 61 74 68 |.... bor|der_path|
|00003ab0| 24 3d 64 65 66 61 75 6c | 74 5f 70 24 0d 13 9c 36 |$=defaul|t_p$...6|
|00003ac0| 20 f2 62 6f 72 64 65 72 | 73 28 62 6f 72 64 65 72 | .border|s(border|
|00003ad0| 5f 70 61 74 68 24 29 3a | f2 62 6f 72 64 65 72 73 |_path$):|.borders|
|00003ae0| 6d 65 6e 75 28 62 6f 72 | 64 65 72 73 6d 65 6e 75 |menu(bor|dersmenu|
|00003af0| 25 29 0d 13 a6 06 20 e1 | 0d 13 b0 10 20 f4 2d 2d |%).... .|.... .--|
|00003b00| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 13 ba 0f 20 dd a4 54 |--------|.... ..T|
|00003b10| 65 6d 70 28 54 24 29 0d | 13 c4 24 20 24 77 69 6e |emp(T$).|..$ $win|
|00003b20| 5f 69 64 65 6e 25 3d 54 | 24 3a ea 20 68 25 3a 77 |_iden%=T|$:. h%:w|
|00003b30| 64 61 25 3d 77 64 61 74 | 61 31 25 0d 13 ce 4b 20 |da%=wdat|a1%...K |
|00003b40| c8 99 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |.."Wimp_|LoadTemp|
|00003b50| 6c 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 2c 77 64 |late",,b|lock%,wd|
|00003b60| 61 74 61 31 25 2c 77 64 | 31 65 6e 64 25 2c 2d 31 |ata1%,wd|1end%,-1|
|00003b70| 2c 77 69 6e 5f 69 64 65 | 6e 25 20 b8 20 2c 2c 77 |,win_ide|n% . ,,w|
|00003b80| 64 61 74 61 31 25 0d 13 | d8 18 20 62 6c 6f 63 6b |data1%..|.. block|
|00003b90| 25 21 36 34 3d 69 63 6f | 6e 73 70 61 63 65 0d 13 |%!64=ico|nspace..|
|00003ba0| e2 32 20 e7 20 54 24 3d | 22 6d 61 69 6e 5f 70 22 |.2 . T$=|"main_p"|
|00003bb0| 20 6e 61 6d 65 25 3d 62 | 6c 6f 63 6b 25 21 37 32 | name%=b|lock%!72|
|00003bc0| 3a 62 6c 6f 63 6b 25 21 | 31 32 3d 74 6f 70 5f 79 |:block%!|12=top_y|
|00003bd0| 0d 13 ec 2e 20 e7 20 54 | 24 3d 22 53 41 56 45 22 |.... . T|$="SAVE"|
|00003be0| 20 62 6c 6f 63 6b 25 21 | 28 38 38 2b 32 2a 33 32 | block%!|(88+2*32|
|00003bf0| 2b 32 34 29 3d 69 63 6f | 6e 73 70 61 63 65 0d 13 |+24)=ico|nspace..|
|00003c00| f6 a2 20 e7 20 54 24 3d | 22 70 72 69 6e 74 22 20 |.. . T$=|"print" |
|00003c10| 62 6c 6f 63 6b 25 21 28 | 38 38 2b 39 2a 33 32 2b |block%!(|88+9*32+|
|00003c20| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 3a 62 6c |24)=icon|space:bl|
|00003c30| 6f 63 6b 25 21 28 38 38 | 2b 32 2a 33 32 2b 32 34 |ock%!(88|+2*32+24|
|00003c40| 29 3d 69 63 6f 6e 73 70 | 61 63 65 3a 62 6c 6f 63 |)=iconsp|ace:bloc|
|00003c50| 6b 25 21 28 38 38 2b 31 | 30 2a 33 32 2b 32 34 29 |k%!(88+1|0*32+24)|
|00003c60| 3d 69 63 6f 6e 73 70 61 | 63 65 3a 62 6c 6f 63 6b |=iconspa|ce:block|
|00003c70| 25 21 28 38 38 2b 37 2a | 33 32 2b 32 34 29 3d 69 |%!(88+7*|32+24)=i|
|00003c80| 63 6f 6e 73 70 61 63 65 | 3a 70 72 6e 5f 77 69 6e |conspace|:prn_win|
|00003c90| 5f 6e 61 6d 65 25 3d 62 | 6c 6f 63 6b 25 21 37 32 |_name%=b|lock%!72|
|00003ca0| 0d 14 00 8b 20 e7 20 54 | 24 3d 22 77 61 72 6e 69 |.... . T|$="warni|
|00003cb0| 6e 67 22 20 62 6c 6f 63 | 6b 25 21 28 38 38 2b 34 |ng" bloc|k%!(88+4|
|00003cc0| 2a 33 32 2b 32 34 29 3d | 69 63 6f 6e 73 70 61 63 |*32+24)=|iconspac|
|00003cd0| 65 3a 62 6c 6f 63 6b 25 | 21 28 38 38 2b 35 2a 33 |e:block%|!(88+5*3|
|00003ce0| 32 2b 32 34 29 3d 69 63 | 6f 6e 73 70 61 63 65 3a |2+24)=ic|onspace:|
|00003cf0| 62 6c 6f 63 6b 25 21 28 | 38 38 2b 37 2a 33 32 2b |block%!(|88+7*32+|
|00003d00| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 3a 62 6c |24)=icon|space:bl|
|00003d10| 6f 63 6b 25 21 28 38 38 | 2b 38 2a 33 32 2b 32 34 |ock%!(88|+8*32+24|
|00003d20| 29 3d 69 63 6f 6e 73 70 | 61 63 65 0d 14 0a 30 20 |)=iconsp|ace...0 |
|00003d30| e7 20 54 24 3d 22 65 72 | 72 62 6f 78 22 20 62 6c |. T$="er|rbox" bl|
|00003d40| 6f 63 6b 25 21 28 38 38 | 2b 34 2a 33 32 2b 32 34 |ock%!(88|+4*32+24|
|00003d50| 29 3d 69 63 6f 6e 73 70 | 61 63 65 0d 14 0c 2d 20 |)=iconsp|ace...- |
|00003d60| e7 20 54 24 3d 22 72 65 | 67 22 20 62 6c 6f 63 6b |. T$="re|g" block|
|00003d70| 25 21 28 38 38 2b 34 2a | 33 32 2b 32 34 29 3d 69 |%!(88+4*|32+24)=i|
|00003d80| 63 6f 6e 73 70 61 63 65 | 0d 14 14 4f 20 e7 20 54 |conspace|...O . T|
|00003d90| 24 3d 22 73 65 74 70 61 | 74 68 22 20 62 6c 6f 63 |$="setpa|th" bloc|
|00003da0| 6b 25 21 28 38 38 2b 34 | 2a 33 32 2b 32 34 29 3d |k%!(88+4|*32+24)=|
|00003db0| 69 63 6f 6e 73 70 61 63 | 65 3a 62 6c 6f 63 6b 25 |iconspac|e:block%|
|00003dc0| 21 28 38 38 2b 38 2a 33 | 32 2b 32 34 29 3d 69 63 |!(88+8*3|2+24)=ic|
|00003dd0| 6f 6e 73 70 61 63 65 0d | 14 1e 31 20 e7 20 54 24 |onspace.|..1 . T$|
|00003de0| 3d 22 66 69 74 74 69 6e | 67 22 20 62 6c 6f 63 6b |="fittin|g" block|
|00003df0| 25 21 28 38 38 2b 34 2a | 33 32 2b 32 34 29 3d 69 |%!(88+4*|32+24)=i|
|00003e00| 63 6f 6e 73 70 61 63 65 | 0d 14 28 22 20 e7 20 54 |conspace|..(" . T|
|00003e10| 24 3d 22 74 6f 6f 6c 73 | 22 20 f2 73 65 74 5f 74 |$="tools|" .set_t|
|00003e20| 6f 6f 6c 73 5f 69 63 6f | 6e 73 0d 14 32 25 20 e7 |ools_ico|ns..2% .|
|00003e30| 20 54 24 3d 22 67 72 69 | 64 73 69 7a 65 22 20 f2 | T$="gri|dsize" .|
|00003e40| 73 65 74 5f 67 73 69 7a | 65 5f 69 63 6f 6e 73 0d |set_gsiz|e_icons.|
|00003e50| 14 3c 24 20 e7 20 54 24 | 3d 22 70 69 63 6b 66 6f |.<$ . T$|="pickfo|
|00003e60| 6e 74 22 20 f2 73 65 74 | 5f 66 6f 6e 74 5f 69 63 |nt" .set|_font_ic|
|00003e70| 6f 6e 73 0d 14 46 27 20 | c8 99 22 57 69 6d 70 5f |ons..F' |.."Wimp_|
|00003e80| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |CreateWi|ndow",,b|
|00003e90| 6c 6f 63 6b 25 20 b8 20 | 68 25 0d 14 50 08 20 3d |lock% . |h%..P. =|
|00003ea0| 68 25 0d 14 5a 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d |h%..Z. .|--------|
|00003eb0| 2d 2d 0d 14 64 16 20 dd | f2 73 65 74 5f 74 6f 6f |--..d. .|.set_too|
|00003ec0| 6c 73 5f 69 63 6f 6e 73 | 0d 14 6e 35 20 e3 20 69 |ls_icons|..n5 . i|
|00003ed0| 63 5f 6e 3d 30 20 b8 20 | 31 35 3a 62 6c 6f 63 6b |c_n=0 . |15:block|
|00003ee0| 25 21 28 38 38 2b 69 63 | 5f 6e 2a 33 32 2b 32 34 |%!(88+ic|_n*32+24|
|00003ef0| 29 3d 69 63 6f 6e 73 70 | 61 63 65 3a ed 0d 14 78 |)=iconsp|ace:...x|
|00003f00| 06 20 e1 0d 14 82 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..... |.-------|
|00003f10| 2d 2d 2d 0d 14 8c 15 20 | dd f2 73 65 74 5f 66 6f |---.... |..set_fo|
|00003f20| 6e 74 5f 69 63 6f 6e 73 | 0d 14 96 34 20 e3 20 69 |nt_icons|...4 . i|
|00003f30| 63 5f 6e 3d 36 20 b8 20 | 39 3a 62 6c 6f 63 6b 25 |c_n=6 . |9:block%|
|00003f40| 21 28 38 38 2b 69 63 5f | 6e 2a 33 32 2b 32 34 29 |!(88+ic_|n*32+24)|
|00003f50| 3d 69 63 6f 6e 73 70 61 | 63 65 3a ed 0d 14 a0 42 |=iconspa|ce:....B|
|00003f60| 20 62 6c 6f 63 6b 25 21 | 28 38 38 2b 31 31 2a 33 | block%!|(88+11*3|
|00003f70| 32 2b 32 34 29 3d 69 63 | 6f 6e 73 70 61 63 65 3a |2+24)=ic|onspace:|
|00003f80| 62 6c 6f 63 6b 25 21 28 | 38 38 2b 31 33 2a 33 32 |block%!(|88+13*32|
|00003f90| 2b 32 34 29 3d 69 63 6f | 6e 73 70 61 63 65 0d 14 |+24)=ico|nspace..|
|00003fa0| aa 06 20 e1 0d 14 b4 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|00003fb0| 2d 2d 2d 2d 0d 14 be 16 | 20 dd f2 73 65 74 5f 67 |----....| ..set_g|
|00003fc0| 73 69 7a 65 5f 69 63 6f | 6e 73 0d 14 c8 40 20 62 |size_ico|ns...@ b|
|00003fd0| 6c 6f 63 6b 25 21 28 38 | 38 2b 32 2a 33 32 2b 32 |lock%!(8|8+2*32+2|
|00003fe0| 34 29 3d 69 63 6f 6e 73 | 70 61 63 65 3a 62 6c 6f |4)=icons|pace:blo|
|00003ff0| 63 6b 25 21 28 38 38 2b | 38 2a 33 32 2b 32 34 29 |ck%!(88+|8*32+24)|
|00004000| 3d 69 63 6f 6e 73 70 61 | 63 65 0d 14 d2 42 20 62 |=iconspa|ce...B b|
|00004010| 6c 6f 63 6b 25 21 28 38 | 38 2b 31 30 2a 33 32 2b |lock%!(8|8+10*32+|
|00004020| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 3a 62 6c |24)=icon|space:bl|
|00004030| 6f 63 6b 25 21 28 38 38 | 2b 31 31 2a 33 32 2b 32 |ock%!(88|+11*32+2|
|00004040| 34 29 3d 69 63 6f 6e 73 | 70 61 63 65 0d 14 dc 42 |4)=icons|pace...B|
|00004050| 20 62 6c 6f 63 6b 25 21 | 28 38 38 2b 31 34 2a 33 | block%!|(88+14*3|
|00004060| 32 2b 32 34 29 3d 69 63 | 6f 6e 73 70 61 63 65 3a |2+24)=ic|onspace:|
|00004070| 62 6c 6f 63 6b 25 21 28 | 38 38 2b 31 36 2a 33 32 |block%!(|88+16*32|
|00004080| 2b 32 34 29 3d 69 63 6f | 6e 73 70 61 63 65 0d 14 |+24)=ico|nspace..|
|00004090| e6 06 20 e1 0d 14 f0 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|000040a0| 2d 2d 2d 2d 0d 14 fa 0c | 20 dd f2 65 72 72 6f 72 |----....| ..error|
|000040b0| 0d 15 04 0e 20 21 62 6c | 6f 63 6b 25 3d 9f 0d 15 |.... !bl|ock%=...|
|000040c0| 0e 36 20 24 28 62 6c 6f | 63 6b 25 2b 34 29 3d f6 |.6 $(blo|ck%+4)=.|
|000040d0| 24 2b 22 20 28 69 6e 74 | 65 72 6e 61 6c 20 65 72 |$+" (int|ernal er|
|000040e0| 72 6f 72 20 63 6f 64 65 | 20 22 2b c3 9e 2b 22 29 |ror code| "+..+")|
|000040f0| 22 2b bd 30 0d 15 18 34 | 20 f2 72 6d 28 22 45 52 |"+.0...4| .rm("ER|
|00004100| 4d 31 22 29 3a c8 99 22 | 57 69 6d 70 5f 52 65 70 |M1"):.."|Wimp_Rep|
|00004110| 6f 72 74 45 72 72 6f 72 | 22 2c 62 6c 6f 63 6b 25 |ortError|",block%|
|00004120| 2c 31 2c 74 65 78 74 24 | 0d 15 22 06 20 e1 0d 15 |,1,text$|..". ...|
|00004130| 2c 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 15 |,. .----|------..|
|00004140| 36 10 20 dd a4 77 69 6d | 70 65 72 72 6f 72 0d 15 |6. ..wim|perror..|
|00004150| 40 0e 20 21 62 6c 6f 63 | 6b 25 3d 9f 0d 15 4a 0f |@. !bloc|k%=...J.|
|00004160| 20 e7 20 9f 3d 32 32 32 | 20 3d b9 0d 15 54 29 20 | . .=222| =...T) |
|00004170| 24 28 62 6c 6f 63 6b 25 | 2b 34 29 3d f6 24 2b 22 |$(block%|+4)=.$+"|
|00004180| 20 28 22 2b c3 9f 2b 22 | 29 22 2b 22 20 22 2b c3 | ("+..+"|)"+" "+.|
|00004190| 9e 2b bd 30 0d 15 5e 34 | 20 f2 72 6d 28 22 45 52 |.+.0..^4| .rm("ER|
|000041a0| 4d 31 22 29 3a c8 99 22 | 57 69 6d 70 5f 52 65 70 |M1"):.."|Wimp_Rep|
|000041b0| 6f 72 74 45 72 72 6f 72 | 22 2c 62 6c 6f 63 6b 25 |ortError|",block%|
|000041c0| 2c 31 2c 74 65 78 74 24 | 0d 15 68 07 20 3d b9 0d |,1,text$|..h. =..|
|000041d0| 15 72 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |.r. .---|-------.|
|000041e0| 15 7c 40 20 dd a4 69 63 | 6f 6e 64 65 66 28 77 68 |.|@ ..ic|ondef(wh|
|000041f0| 61 6e 64 6c 65 25 2c 69 | 78 25 2c 69 79 25 2c 69 |andle%,i|x%,iy%,i|
|00004200| 77 25 2c 69 68 25 2c 66 | 6c 61 67 25 2c 74 65 78 |w%,ih%,f|lag%,tex|
|00004210| 74 24 2c 64 31 25 2c 64 | 32 25 2c 64 33 25 29 0d |t$,d1%,d|2%,d3%).|
|00004220| 15 86 30 20 62 6c 6f 63 | 6b 25 21 30 3d 77 68 61 |..0 bloc|k%!0=wha|
|00004230| 6e 64 6c 65 25 3a 62 6c | 6f 63 6b 25 21 34 3d 69 |ndle%:bl|ock%!4=i|
|00004240| 78 25 3a 62 6c 6f 63 6b | 25 21 38 3d 69 79 25 0d |x%:block|%!8=iy%.|
|00004250| 15 90 28 20 62 6c 6f 63 | 6b 25 21 31 32 3d 69 78 |..( bloc|k%!12=ix|
|00004260| 25 2b 69 77 25 3a 62 6c | 6f 63 6b 25 21 31 36 3d |%+iw%:bl|ock%!16=|
|00004270| 69 79 25 2b 69 68 25 0d | 15 9a 14 20 62 6c 6f 63 |iy%+ih%.|... bloc|
|00004280| 6b 25 21 32 30 3d 66 6c | 61 67 25 0d 15 a4 0e 20 |k%!20=fl|ag%.... |
|00004290| e7 20 64 31 25 3d 30 20 | 8c 0d 15 ae 17 20 24 28 |. d1%=0 |..... $(|
|000042a0| 62 6c 6f 63 6b 25 2b 32 | 34 29 3d 74 65 78 74 24 |block%+2|4)=text$|
|000042b0| 0d 15 b8 06 20 cc 0d 15 | c2 20 20 62 6c 6f 63 6b |.... ...|. block|
|000042c0| 25 21 32 34 3d 64 31 25 | 3a 62 6c 6f 63 6b 25 21 |%!24=d1%|:block%!|
|000042d0| 32 38 3d 64 32 25 0d 15 | cc 12 20 62 6c 6f 63 6b |28=d2%..|.. block|
|000042e0| 25 21 33 32 3d 64 33 25 | 0d 15 d6 06 20 cd 0d 15 |%!32=d3%|.... ...|
|000042f0| e0 2c 20 c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |., .. "W|imp_Crea|
|00004300| 74 65 49 63 6f 6e 22 2c | 2c 62 6c 6f 63 6b 25 20 |teIcon",|,block% |
|00004310| b8 20 69 68 61 6e 64 6c | 65 25 0d 15 ea 0e 20 3d |. ihandl|e%.... =|
|00004320| 69 68 61 6e 64 6c 65 25 | 0d 15 f4 10 20 f4 2d 2d |ihandle%|.... .--|
|00004330| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 15 fe 16 20 dd f2 6f |--------|.... ..o|
|00004340| 70 65 6e 77 69 6e 64 6f | 77 32 28 47 25 29 0d 16 |penwindo|w2(G%)..|
|00004350| 08 5a 20 21 62 6c 6f 63 | 6b 25 3d 47 25 3a c8 99 |.Z !bloc|k%=G%:..|
|00004360| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 |"Wimp_Ge|tWindowS|
|00004370| 74 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 3a 62 6c |tate",,b|lock%:bl|
|00004380| 6f 63 6b 25 21 32 38 3d | 2d 31 3a c8 99 22 57 69 |ock%!28=|-1:.."Wi|
|00004390| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|000043a0| 62 6c 6f 63 6b 25 3a e1 | 0d 16 12 06 20 e1 0d 16 |block%:.|.... ...|
|000043b0| 1c 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 16 |.. .----|------..|
|000043c0| 26 15 20 dd f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |&. ..ope|nwindow(|
|000043d0| 47 25 29 0d 16 30 15 20 | e7 20 47 25 3d 77 68 61 |G%)..0. |. G%=wha|
|000043e0| 6e 64 6c 65 31 25 20 8c | 0d 16 3a 3c 20 20 62 6c |ndle1% .|..:< bl|
|000043f0| 6f 63 6b 25 21 31 32 38 | 3d 21 62 6c 6f 63 6b 25 |ock%!128|=!block%|
|00004400| 3a c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |:.."Wimp|_GetWind|
|00004410| 6f 77 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 25 |owState"|,,block%|
|00004420| 2b 31 32 38 0d 16 44 36 | 20 20 e7 20 62 6c 6f 63 |+128..D6| . bloc|
|00004430| 6b 25 21 31 36 30 20 80 | 20 31 3c 3c 32 31 20 c8 |k%!160 .| 1<<21 .|
|00004440| 99 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f |."Wimp_O|penWindo|
|00004450| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 16 4e 50 20 20 |w",,bloc|k%..NP |
|00004460| 62 6c 6f 63 6b 25 21 36 | 34 3d 74 6f 6f 6c 73 5f |block%!6|4=tools_|
|00004470| 77 69 6e 25 3a 62 6c 6f | 63 6b 25 21 37 36 3d 62 |win%:blo|ck%!76=b|
|00004480| 6c 6f 63 6b 25 21 34 2b | 74 6f 6f 6c 78 3a 62 6c |lock%!4+|toolx:bl|
|00004490| 6f 63 6b 25 21 36 38 3d | 62 6c 6f 63 6b 25 21 34 |ock%!68=|block%!4|
|000044a0| 2b 74 6f 6f 6c 78 2d 31 | 35 36 0d 16 58 3d 20 20 |+toolx-1|56..X= |
|000044b0| 62 6c 6f 63 6b 25 21 38 | 30 3d 62 6c 6f 63 6b 25 |block%!8|0=block%|
|000044c0| 21 31 36 2b 74 6f 6f 6c | 79 3a 62 6c 6f 63 6b 25 |!16+tool|y:block%|
|000044d0| 21 37 32 3d 62 6c 6f 63 | 6b 25 21 31 36 2b 74 6f |!72=bloc|k%!16+to|
|000044e0| 6f 6c 79 2d 37 37 32 0d | 16 62 31 20 20 62 6c 6f |oly-772.|.b1 blo|
|000044f0| 63 6b 25 21 38 34 3d 30 | 3a 62 6c 6f 63 6b 25 21 |ck%!84=0|:block%!|
|00004500| 38 38 3d 30 3a 62 6c 6f | 63 6b 25 21 39 32 3d 62 |88=0:blo|ck%!92=b|
|00004510| 6c 6f 63 6b 25 21 32 38 | 0d 16 6c 24 20 20 c8 99 |lock%!28|..l$ ..|
|00004520| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00004530| 22 2c 2c 62 6c 6f 63 6b | 25 2b 36 34 0d 16 76 38 |",,block|%+64..v8|
|00004540| 20 20 62 6c 6f 63 6b 25 | 21 32 38 3d 74 6f 6f 6c | block%|!28=tool|
|00004550| 73 5f 77 69 6e 25 3a c8 | 99 22 57 69 6d 70 5f 4f |s_win%:.|."Wimp_O|
|00004560| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |penWindo|w",,bloc|
|00004570| 6b 25 3a e1 0d 16 80 06 | 20 cd 0d 16 8a 16 20 e7 |k%:.....| ..... .|
|00004580| 20 47 25 3d 74 6f 6f 6c | 73 5f 77 69 6e 25 20 8c | G%=tool|s_win% .|
|00004590| 0d 16 94 21 20 20 c8 99 | 22 57 69 6d 70 5f 4f 70 |...! ..|"Wimp_Op|
|000045a0| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|000045b0| 25 0d 16 9e 52 20 20 62 | 6c 6f 63 6b 25 21 30 3d |%...R b|lock%!0=|
|000045c0| 77 68 61 6e 64 6c 65 31 | 25 3a c8 99 22 57 69 6d |whandle1|%:.."Wim|
|000045d0| 70 5f 47 65 74 57 69 6e | 64 6f 77 49 6e 66 6f 22 |p_GetWin|dowInfo"|
|000045e0| 2c 2c 62 6c 6f 63 6b 25 | 3a f2 67 65 74 6f 72 69 |,,block%|:.getori|
|000045f0| 67 69 6e 28 62 6c 6f 63 | 6b 25 2c 78 30 25 2c 79 |gin(bloc|k%,x0%,y|
|00004600| 30 25 29 0d 16 a8 6e 20 | 20 78 78 30 3d 62 6c 6f |0%)...n | xx0=blo|
|00004610| 63 6b 25 21 34 3a 79 79 | 30 3d 62 6c 6f 63 6b 25 |ck%!4:yy|0=block%|
|00004620| 21 31 36 3a 62 6c 6f 63 | 6b 25 21 30 3d 74 6f 6f |!16:bloc|k%!0=too|
|00004630| 6c 73 5f 77 69 6e 25 3a | c8 99 22 57 69 6d 70 5f |ls_win%:|.."Wimp_|
|00004640| 47 65 74 57 69 6e 64 6f | 77 49 6e 66 6f 22 2c 2c |GetWindo|wInfo",,|
|00004650| 62 6c 6f 63 6b 25 3a f2 | 67 65 74 6f 72 69 67 69 |block%:.|getorigi|
|00004660| 6e 28 62 6c 6f 63 6b 25 | 2c 78 30 25 2c 79 30 25 |n(block%|,x0%,y0%|
|00004670| 29 0d 16 b2 27 20 20 74 | 6f 6f 6c 78 3d 78 30 25 |)...' t|oolx=x0%|
|00004680| 2d 78 78 30 2b 31 35 36 | 3a 74 6f 6f 6c 79 3d 79 |-xx0+156|:tooly=y|
|00004690| 30 25 2d 79 79 30 3a e1 | 0d 16 bc 06 20 cd 0d 16 |0%-yy0:.|.... ...|
|000046a0| c6 16 20 e7 20 47 25 3d | 67 72 69 64 5f 73 69 7a |.. . G%=|grid_siz|
|000046b0| 65 25 20 8c 0d 16 d0 3c | 20 20 62 6c 6f 63 6b 25 |e% ....<| block%|
|000046c0| 21 31 32 38 3d 21 62 6c | 6f 63 6b 25 3a c8 99 22 |!128=!bl|ock%:.."|
|000046d0| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|000046e0| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 2b 31 32 38 |ate",,bl|ock%+128|
|000046f0| 0d 16 da 36 20 20 e7 20 | 62 6c 6f 63 6b 25 21 31 |...6 . |block%!1|
|00004700| 36 30 20 80 20 31 3c 3c | 32 31 20 c8 99 22 57 69 |60 . 1<<|21 .."Wi|
|00004710| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|00004720| 62 6c 6f 63 6b 25 0d 16 | e4 4b 20 20 62 6c 6f 63 |block%..|.K bloc|
|00004730| 6b 25 21 36 34 3d 6c 69 | 73 74 5f 77 69 6e 25 3a |k%!64=li|st_win%:|
|00004740| 62 6c 6f 63 6b 25 21 37 | 36 3d 62 6c 6f 63 6b 25 |block%!7|6=block%|
|00004750| 21 34 2b 35 32 30 2b 34 | 30 30 3a 62 6c 6f 63 6b |!4+520+4|00:block|
|00004760| 25 21 36 38 3d 62 6c 6f | 63 6b 25 21 34 2b 35 32 |%!68=blo|ck%!4+52|
|00004770| 30 0d 16 ee 39 20 20 62 | 6c 6f 63 6b 25 21 38 30 |0...9 b|lock%!80|
|00004780| 3d 62 6c 6f 63 6b 25 21 | 31 36 2d 31 30 30 3a 62 |=block%!|16-100:b|
|00004790| 6c 6f 63 6b 25 21 37 32 | 3d 62 6c 6f 63 6b 25 21 |lock%!72|=block%!|
|000047a0| 31 36 2d 31 30 30 2d 33 | 34 38 0d 16 f8 31 20 20 |16-100-3|48...1 |
|000047b0| 62 6c 6f 63 6b 25 21 38 | 34 3d 30 3a 62 6c 6f 63 |block%!8|4=0:bloc|
|000047c0| 6b 25 21 38 38 3d 30 3a | 62 6c 6f 63 6b 25 21 39 |k%!88=0:|block%!9|
|000047d0| 32 3d 62 6c 6f 63 6b 25 | 21 32 38 0d 17 02 24 20 |2=block%|!28...$ |
|000047e0| 20 c8 99 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e | .."Wimp|_OpenWin|
|000047f0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 2b 36 34 0d |dow",,bl|ock%+64.|
|00004800| 17 0c 37 20 20 62 6c 6f | 63 6b 25 21 32 38 3d 6c |..7 blo|ck%!28=l|
|00004810| 69 73 74 5f 77 69 6e 25 | 3a c8 99 22 57 69 6d 70 |ist_win%|:.."Wimp|
|00004820| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|00004830| 6f 63 6b 25 3a e1 0d 17 | 16 06 20 cd 0d 17 20 20 |ock%:...|.. ... |
|00004840| 20 c8 99 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e | .."Wimp|_OpenWin|
|00004850| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 0d 17 2a 06 |dow",,bl|ock%..*.|
|00004860| 20 e1 0d 17 34 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ...4. .|--------|
|00004870| 2d 2d 0d 17 3e 2a 20 dd | f2 64 72 61 77 6d 65 6e |--..>* .|.drawmen|
|00004880| 75 28 6d 25 2c 6d 65 6e | 75 24 2c 78 25 2c 79 25 |u(m%,men|u$,x%,y%|
|00004890| 2c 6f 6e 69 63 6f 6e 62 | 61 72 25 29 0d 17 48 4a |,oniconb|ar%)..HJ|
|000048a0| 20 6d 25 3f 31 32 3d 37 | 3a 6d 25 3f 31 33 3d 32 | m%?12=7|:m%?13=2|
|000048b0| 3a 6d 25 3f 31 34 3d 37 | 3a 6d 25 3f 31 35 3d 30 |:m%?14=7|:m%?15=0|
|000048c0| 3a 6d 25 21 31 36 3d 32 | 30 30 3a 6d 25 21 32 30 |:m%!16=2|00:m%!20|
|000048d0| 3d 34 34 3a 6d 25 21 32 | 34 3d 30 3a 70 74 72 25 |=44:m%!2|4=0:ptr%|
|000048e0| 3d 6d 25 2b 32 38 0d 17 | 52 1e 20 24 6d 25 3d c0 |=m%+28..|R. $m%=.|
|000048f0| 6d 65 6e 75 24 2c a7 6d | 65 6e 75 24 2c 22 2c 22 |menu$,.m|enu$,","|
|00004900| 29 2d 31 29 0d 17 5c 1a | 20 6d 65 6e 75 24 2b 3d |)-1)..\.| menu$+=|
|00004910| 22 2c 22 3a 65 6e 74 72 | 69 65 73 25 3d 30 0d 17 |",":entr|ies%=0..|
|00004920| 66 11 20 c8 95 20 6d 65 | 6e 75 24 3c 3e 22 22 0d |f. .. me|nu$<>"".|
|00004930| 17 70 20 20 6d 65 6e 75 | 24 3d c1 6d 65 6e 75 24 |.p menu|$=.menu$|
|00004940| 2c a7 6d 65 6e 75 24 2c | 22 2c 22 29 2b 31 29 0d |,.menu$,|",")+1).|
|00004950| 17 7a 12 20 e7 20 6d 65 | 6e 75 24 3c 3e 22 22 20 |.z. . me|nu$<>"" |
|00004960| 8c 0d 17 84 27 20 70 74 | 72 25 21 30 3d 30 3a 70 |....' pt|r%!0=0:p|
|00004970| 74 72 25 21 34 3d 2d 31 | 3a 70 74 72 25 21 38 3d |tr%!4=-1|:ptr%!8=|
|00004980| 26 37 30 30 30 30 32 31 | 0d 17 8e 3a 20 24 28 70 |&7000021|...: $(p|
|00004990| 74 72 25 2b 31 32 29 3d | c0 6d 65 6e 75 24 2c a7 |tr%+12)=|.menu$,.|
|000049a0| 6d 65 6e 75 24 2c 22 2c | 22 29 2d 31 29 3a 70 74 |menu$,",|")-1):pt|
|000049b0| 72 25 2b 3d 32 34 3a 65 | 6e 74 72 69 65 73 25 2b |r%+=24:e|ntries%+|
|000049c0| 3d 31 0d 17 98 06 20 cd | 0d 17 a2 06 20 ce 0d 17 |=1.... .|.... ...|
|000049d0| ac 1c 20 70 74 72 25 21 | 2d 32 34 3d 70 74 72 25 |.. ptr%!|-24=ptr%|
|000049e0| 21 2d 32 34 20 84 20 26 | 38 30 0d 17 b6 21 20 e7 |!-24 . &|80...! .|
|000049f0| 20 6f 6e 69 63 6f 6e 62 | 61 72 25 20 6d 25 21 33 | oniconb|ar% m%!3|
|00004a00| 32 3d 77 68 61 6e 64 6c | 65 32 25 0d 17 c0 36 20 |2=whandl|e2%...6 |
|00004a10| e7 20 6f 6e 69 63 6f 6e | 62 61 72 25 20 8c 20 79 |. onicon|bar% . y|
|00004a20| 70 6f 73 25 3d 39 36 2b | 65 6e 74 72 69 65 73 25 |pos%=96+|entries%|
|00004a30| 2a 34 34 20 8b 20 79 70 | 6f 73 25 3d 79 25 2b 32 |*44 . yp|os%=y%+2|
|00004a40| 30 0d 17 ca 29 20 c8 99 | 20 22 57 69 6d 70 5f 43 |0...) ..| "Wimp_C|
|00004a50| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 6d 25 2c 78 |reateMen|u",,m%,x|
|00004a60| 25 2d 36 34 2c 79 70 6f | 73 25 0d 17 d4 06 20 e1 |%-64,ypo|s%.... .|
|00004a70| 0d 17 de 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|00004a80| 0d 17 e8 24 20 dd f2 67 | 65 74 6f 72 69 67 69 6e |...$ ..g|etorigin|
|00004a90| 28 62 6c 6f 63 6b 25 2c | f8 20 78 30 25 2c f8 20 |(block%,|. x0%,. |
|00004aa0| 79 30 25 29 0d 17 f2 33 | 20 78 30 25 3d 62 6c 6f |y0%)...3| x0%=blo|
|00004ab0| 63 6b 25 21 34 2d 62 6c | 6f 63 6b 25 21 32 30 3a |ck%!4-bl|ock%!20:|
|00004ac0| 79 30 25 3d 62 6c 6f 63 | 6b 25 21 31 36 2d 62 6c |y0%=bloc|k%!16-bl|
|00004ad0| 6f 63 6b 25 21 32 34 0d | 17 fc 3e 20 6d 69 6e 78 |ock%!24.|..> minx|
|00004ae0| 3d 62 6c 6f 63 6b 25 21 | 34 3a 6d 69 6e 79 3d 62 |=block%!|4:miny=b|
|00004af0| 6c 6f 63 6b 25 21 38 3a | 6d 61 78 78 3d 62 6c 6f |lock%!8:|maxx=blo|
|00004b00| 63 6b 25 21 31 32 3a 6d | 61 78 79 3d 62 6c 6f 63 |ck%!12:m|axy=bloc|
|00004b10| 6b 25 21 31 36 0d 18 06 | 06 20 e1 0d 18 10 10 20 |k%!16...|. ..... |
|00004b20| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 18 1a 0c 20 |.-------|---.... |
|00004b30| dd f2 72 65 73 65 74 0d | 18 24 3d 20 73 61 76 65 |..reset.|.$= save|
|00004b40| 64 5f 6f 6b 3d b9 3a 24 | 6e 61 6d 65 25 3d 22 57 |d_ok=.:$|name%="W|
|00004b50| 6f 72 64 20 53 65 61 72 | 63 68 20 3c 75 6e 74 69 |ord Sear|ch <unti|
|00004b60| 74 6c 65 64 3e 22 3a f2 | 75 70 64 61 74 65 5f 74 |tled>":.|update_t|
|00004b70| 69 74 6c 65 0d 18 2e 26 | 20 e3 20 46 3d 31 20 b8 |itle...&| . F=1 .|
|00004b80| 20 32 34 3a 57 44 24 28 | 46 29 3d 22 22 3a 57 44 | 24:WD$(|F)="":WD|
|00004b90| 31 24 28 46 29 3d 22 22 | 3a ed 0d 18 38 3d 20 e3 |1$(F)=""|:...8= .|
|00004ba0| 20 46 3d 31 20 b8 20 32 | 34 3a 57 44 5f 53 58 28 | F=1 . 2|4:WD_SX(|
|00004bb0| 46 29 3d 30 3a 57 44 5f | 53 59 28 46 29 3d 30 3a |F)=0:WD_|SY(F)=0:|
|00004bc0| 57 44 5f 45 58 28 46 29 | 3d 30 3a 57 44 5f 45 59 |WD_EX(F)|=0:WD_EY|
|00004bd0| 28 46 29 3d 30 3a ed 0d | 18 42 39 20 e3 20 46 3d |(F)=0:..|.B9 . F=|
|00004be0| 31 20 b8 20 32 35 3a e3 | 20 47 3d 31 20 b8 20 32 |1 . 25:.| G=1 . 2|
|00004bf0| 35 3a 53 51 24 28 46 2c | 47 29 3d 22 2e 22 3a 53 |5:SQ$(F,|G)=".":S|
|00004c00| 51 31 24 28 46 2c 47 29 | 3d 22 2e 22 3a ed 3a ed |Q1$(F,G)|=".":.:.|
|00004c10| 0d 18 4c 27 20 e3 20 46 | 3d 30 20 b8 20 32 33 3a |..L' . F|=0 . 23:|
|00004c20| f2 69 73 65 74 28 46 2c | 22 22 2c 6c 69 73 74 5f |.iset(F,|"",list_|
|00004c30| 77 69 6e 25 29 3a ed 0d | 18 56 29 20 e3 20 46 3d |win%):..|.V) . F=|
|00004c40| 31 20 b8 20 32 35 3a e3 | 20 47 3d 31 20 b8 20 32 |1 . 25:.| G=1 . 2|
|00004c50| 35 3a 6c 61 79 28 46 2c | 47 29 3d 31 3a ed 3a ed |5:lay(F,|G)=1:.:.|
|00004c60| 0d 18 60 43 20 f2 69 73 | 65 74 28 30 2c 22 55 6e |..`C .is|et(0,"Un|
|00004c70| 74 69 74 6c 65 64 22 2c | 77 68 61 6e 64 6c 65 38 |titled",|whandle8|
|00004c80| 25 29 3a f2 69 73 65 74 | 28 36 2c 22 22 2c 67 72 |%):.iset|(6,"",gr|
|00004c90| 69 64 5f 73 69 7a 65 25 | 29 3a 54 69 74 6c 65 24 |id_size%|):Title$|
|00004ca0| 3d 22 22 0d 18 6a 06 20 | e1 0d 18 74 10 20 f4 2d |=""..j. |...t. .-|
|00004cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 18 7e 15 20 dd f2 |--------|-..~. ..|
|00004cc0| 69 73 65 74 28 78 25 2c | 61 24 2c 57 48 29 0d 18 |iset(x%,|a$,WH)..|
|00004cd0| 88 4a 20 62 6c 6f 63 6b | 25 21 30 3d 57 48 3a 62 |.J block|%!0=WH:b|
|00004ce0| 6c 6f 63 6b 25 21 34 3d | 78 25 3a c8 99 22 57 69 |lock%!4=|x%:.."Wi|
|00004cf0| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00004d00| 2c 2c 62 6c 6f 63 6b 25 | 3a 24 28 62 6c 6f 63 6b |,,block%|:$(block|
|00004d10| 25 21 32 38 29 3d 61 24 | 0d 18 92 3c 20 62 6c 6f |%!28)=a$|...< blo|
|00004d20| 63 6b 25 21 38 3d 30 3a | 62 6c 6f 63 6b 25 21 31 |ck%!8=0:|block%!1|
|00004d30| 32 3d 30 3a c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |2=0:.. "|Wimp_Set|
|00004d40| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|00004d50| 6b 25 3a e1 0d 18 9c 10 | 20 f4 2d 2d 2d 2d 2d 2d |k%:.....| .------|
|00004d60| 2d 2d 2d 2d 0d 18 a6 13 | 20 dd f2 69 72 65 61 64 |----....| ..iread|
|00004d70| 28 78 25 2c 57 48 29 0d | 18 b0 3b 20 62 6c 6f 63 |(x%,WH).|..; bloc|
|00004d80| 6b 25 21 30 3d 57 48 3a | 62 6c 6f 63 6b 25 21 34 |k%!0=WH:|block%!4|
|00004d90| 3d 78 25 3a c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |=x%:.. "|Wimp_Get|
|00004da0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|00004db0| 6b 25 0d 18 ba 16 20 61 | 24 3d 24 28 62 6c 6f 63 |k%.... a|$=$(bloc|
|00004dc0| 6b 25 21 32 38 29 3a e1 | 0d 18 c4 10 20 f4 2d 2d |k%!28):.|.... .--|
|00004dd0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 18 ce 13 20 dd f2 6d |--------|.... ..m|
|00004de0| 61 69 6e 6d 65 6e 75 28 | 6d 25 29 0d 18 d8 58 20 |ainmenu(|m%)...X |
|00004df0| 6d 25 3f 31 32 3d 37 3a | 6d 25 3f 31 33 3d 32 3a |m%?12=7:|m%?13=2:|
|00004e00| 6d 25 3f 31 34 3d 37 3a | 6d 25 3f 31 35 3d 30 3a |m%?14=7:|m%?15=0:|
|00004e10| 6d 25 21 31 36 3d 32 33 | 34 3a 6d 25 21 32 30 3d |m%!16=23|4:m%!20=|
|00004e20| 34 34 3a 6d 25 21 32 34 | 3d 30 3a 70 74 72 25 3d |44:m%!24|=0:ptr%=|
|00004e30| 6d 25 2b 32 38 3a 69 6e | 64 69 72 25 3d 6d 25 2b |m%+28:in|dir%=m%+|
|00004e40| 32 35 36 0d 18 e2 2b 20 | f2 72 6d 28 22 4d 55 41 |256...+ |.rm("MUA|
|00004e50| 31 22 29 3a 6d 6d 6c 3d | a7 74 65 78 74 24 2c 22 |1"):mml=|.text$,"|
|00004e60| 2c 22 29 3a 65 6e 74 72 | 69 65 73 25 3d 30 0d 18 |,"):entr|ies%=0..|
|00004e70| ec 31 20 24 6d 25 3d c0 | 74 65 78 74 24 2c 6d 6d |.1 $m%=.|text$,mm|
|00004e80| 6c 2d 31 29 3a 74 65 78 | 74 24 3d c2 74 65 78 74 |l-1):tex|t$=.text|
|00004e90| 24 2c a9 28 74 65 78 74 | 24 29 2d 6d 6d 6c 29 0d |$,.(text|$)-mml).|
|00004ea0| 18 f6 06 20 f5 0d 19 00 | 15 20 20 6d 6d 6c 3d a7 |... ....|. mml=.|
|00004eb0| 74 65 78 74 24 2c 22 2c | 22 29 0d 19 0a 19 20 20 |text$,",|").... |
|00004ec0| 6d 65 6e 75 24 3d c0 74 | 65 78 74 24 2c 6d 6d 6c |menu$=.t|ext$,mml|
|00004ed0| 2d 31 29 0d 19 14 15 20 | 20 20 e7 20 6d 65 6e 75 |-1).... | . menu|
|00004ee0| 24 3c 3e 22 2a 22 20 8c | 0d 19 1e 22 20 20 20 20 |$<>"*" .|..." |
|00004ef0| 74 65 78 74 24 3d c2 74 | 65 78 74 24 2c a9 28 74 |text$=.t|ext$,.(t|
|00004f00| 65 78 74 24 29 2d 6d 6d | 6c 29 0d 19 28 33 20 20 |ext$)-mm|l)..(3 |
|00004f10| 20 20 70 74 72 25 21 30 | 3d 30 3a e7 20 65 6e 74 | ptr%!0|=0:. ent|
|00004f20| 72 69 65 73 25 3d 30 20 | 84 20 65 6e 74 72 69 65 |ries%=0 |. entrie|
|00004f30| 73 25 3d 32 20 70 74 72 | 25 21 30 3d 32 0d 19 32 |s%=2 ptr|%!0=2..2|
|00004f40| 31 20 20 20 20 e7 20 65 | 6e 74 72 69 65 73 25 3d |1 . e|ntries%=|
|00004f50| 33 20 80 20 66 69 74 74 | 69 6e 67 5f 72 65 70 6f |3 . fitt|ing_repo|
|00004f60| 72 74 3d b9 20 70 74 72 | 25 21 30 2b 3d 31 0d 19 |rt=. ptr|%!0+=1..|
|00004f70| 3c 21 20 20 20 20 70 74 | 72 25 21 34 3d 2d 31 3a |<! pt|r%!4=-1:|
|00004f80| 70 74 72 25 21 38 3d 26 | 37 30 30 30 30 32 31 0d |ptr%!8=&|7000021.|
|00004f90| 19 46 16 20 20 20 20 e7 | 20 a9 6d 65 6e 75 24 3c |.F. .| .menu$<|
|00004fa0| 3d 31 32 20 8c 0d 19 50 | 2e 20 20 20 20 20 24 28 |=12 ...P|. $(|
|00004fb0| 70 74 72 25 2b 31 32 29 | 3d 6d 65 6e 75 24 3a 70 |ptr%+12)|=menu$:p|
|00004fc0| 74 72 25 2b 3d 32 34 3a | 65 6e 74 72 69 65 73 25 |tr%+=24:|entries%|
|00004fd0| 2b 3d 31 0d 19 5a 09 20 | 20 20 20 cc 0d 19 64 40 |+=1..Z. | ...d@|
|00004fe0| 20 20 20 20 20 70 74 72 | 25 21 31 32 3d 69 6e 64 | ptr|%!12=ind|
|00004ff0| 69 72 25 3a 70 74 72 25 | 21 31 36 3d 30 3a 70 74 |ir%:ptr%|!16=0:pt|
|00005000| 72 25 21 32 30 3d a9 6d | 65 6e 75 24 2b 31 3a 24 |r%!20=.m|enu$+1:$|
|00005010| 69 6e 64 69 72 25 3d 6d | 65 6e 75 24 0d 19 6e 47 |indir%=m|enu$..nG|
|00005020| 20 20 20 20 20 70 74 72 | 25 21 38 3d 28 70 74 72 | ptr|%!8=(ptr|
|00005030| 25 21 38 20 84 20 26 31 | 30 30 29 3a 70 74 72 25 |%!8 . &1|00):ptr%|
|00005040| 2b 3d 32 34 3a 65 6e 74 | 72 69 65 73 25 2b 3d 31 |+=24:ent|ries%+=1|
|00005050| 3a 69 6e 64 69 72 25 2b | 3d 28 a9 6d 65 6e 75 24 |:indir%+|=(.menu$|
|00005060| 2b 31 29 0d 19 78 09 20 | 20 20 20 cd 0d 19 82 32 |+1)..x. | ....2|
|00005070| 20 20 20 e7 20 36 34 2b | 28 a9 6d 65 6e 75 24 2a | . 64+|(.menu$*|
|00005080| 31 34 29 3e 6d 25 21 31 | 36 20 6d 25 21 31 36 3d |14)>m%!1|6 m%!16=|
|00005090| 36 34 2b 28 a9 6d 65 6e | 75 24 2a 31 34 29 0d 19 |64+(.men|u$*14)..|
|000050a0| 8c 07 20 20 cd 0d 19 96 | 56 20 20 e7 20 70 74 72 |.. ....|V . ptr|
|000050b0| 25 3e 6d 25 2b 32 35 36 | 20 85 20 31 2c 22 4e 4f |%>m%+256| . 1,"NO|
|000050c0| 20 52 4f 4f 4d 20 46 4f | 52 20 4d 45 4e 55 53 22 | ROOM FO|R MENUS"|
|000050d0| 20 8b 20 e7 20 69 6e 64 | 69 72 25 3e 6d 25 2b 34 | . . ind|ir%>m%+4|
|000050e0| 35 30 20 85 20 32 2c 22 | 4d 45 4e 55 20 49 54 45 |50 . 2,"|MENU ITE|
|000050f0| 4d 53 20 54 4f 4f 20 42 | 49 47 22 0d 19 a0 10 20 |MS TOO B|IG".... |
|00005100| fd 20 6d 65 6e 75 24 3d | 22 2a 22 0d 19 aa 2c 20 |. menu$=|"*"..., |
|00005110| 70 74 72 25 21 2d 32 34 | 3d 70 74 72 25 21 2d 32 |ptr%!-24|=ptr%!-2|
|00005120| 34 20 84 20 26 38 30 3a | 6d 25 21 33 32 3d 77 68 |4 . &80:|m%!32=wh|
|00005130| 61 6e 64 6c 65 38 25 0d | 19 b4 06 20 e1 0d 19 be |andle8%.|... ....|
|00005140| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 19 c8 |. .-----|-----...|
|00005150| 1b 20 dd f2 63 6f 6c 6f | 75 72 6d 65 6e 75 28 6d |. ..colo|urmenu(m|
|00005160| 25 2c 63 6f 6c 6f 25 29 | 0d 19 d2 4a 20 6d 25 3f |%,colo%)|...J m%?|
|00005170| 31 32 3d 37 3a 6d 25 3f | 31 33 3d 32 3a 6d 25 3f |12=7:m%?|13=2:m%?|
|00005180| 31 34 3d 37 3a 6d 25 3f | 31 35 3d 30 3a 6d 25 21 |14=7:m%?|15=0:m%!|
|00005190| 31 36 3d 31 30 30 3a 6d | 25 21 32 30 3d 34 34 3a |16=100:m|%!20=44:|
|000051a0| 6d 25 21 32 34 3d 30 3a | 70 74 72 25 3d 6d 25 2b |m%!24=0:|ptr%=m%+|
|000051b0| 32 38 0d 19 dc 1a 20 f2 | 72 6d 28 22 4d 55 41 34 |28.... .|rm("MUA4|
|000051c0| 22 29 3a 24 6d 25 3d 74 | 65 78 74 24 0d 19 e6 0b |"):$m%=t|ext$....|
|000051d0| 20 f7 20 8d 64 70 59 0d | 19 f0 b6 20 dc 20 31 31 | . .dpY.|... . 11|
|000051e0| 37 34 34 30 35 36 39 2c | 33 38 35 38 37 36 30 32 |7440569,|38587602|
|000051f0| 35 2c 36 35 34 33 31 31 | 34 38 31 2c 39 32 32 37 |5,654311|481,9227|
|00005200| 34 36 39 33 37 2c 31 31 | 39 31 31 38 32 33 39 33 |46937,11|91182393|
|00005210| 2c 31 34 35 39 36 31 37 | 38 34 39 2c 31 36 31 30 |,1459617|849,1610|
|00005220| 36 31 32 37 39 33 2c 31 | 38 37 39 30 34 38 32 34 |612793,1|87904824|
|00005230| 39 2c 2d 32 30 33 30 30 | 34 33 30 37 39 2c 2d 31 |9,-20300|43079,-1|
|00005240| 37 36 31 36 30 37 36 32 | 33 2c 2d 31 34 39 33 31 |76160762|3,-14931|
|00005250| 37 32 31 36 37 2c 2d 31 | 32 32 34 37 33 36 37 31 |72167,-1|22473671|
|00005260| 31 2c 2d 39 35 36 33 30 | 31 32 35 35 2c 2d 36 38 |1,-95630|1255,-68|
|00005270| 37 38 36 35 37 39 39 2c | 2d 34 31 39 34 33 30 33 |7865799,|-4194303|
|00005280| 34 33 2c 2d 31 35 30 39 | 39 34 38 38 37 0d 19 fa |43,-1509|94887...|
|00005290| 2d 20 e3 20 6c 6f 6f 70 | 3d 30 20 b8 20 31 35 3a |- . loop|=0 . 15:|
|000052a0| f3 20 64 6a 70 74 25 3a | 70 74 72 25 21 30 3d 30 |. djpt%:|ptr%!0=0|
|000052b0| 3a 70 74 72 25 21 34 3d | 2d 31 0d 1a 04 1a 20 e7 |:ptr%!4=|-1.... .|
|000052c0| 20 63 6f 6c 6f 25 3d 6c | 6f 6f 70 20 70 74 72 25 | colo%=l|oop ptr%|
|000052d0| 21 30 3d 31 0d 1a 0e 2d | 20 70 74 72 25 21 38 3d |!0=1...-| ptr%!8=|
|000052e0| 64 6a 70 74 25 3a 24 28 | 70 74 72 25 2b 31 32 29 |djpt%:$(|ptr%+12)|
|000052f0| 3d c3 28 6c 6f 6f 70 29 | 3a 70 74 72 25 2b 3d 32 |=.(loop)|:ptr%+=2|
|00005300| 34 0d 1a 18 06 20 ed 0d | 1a 22 1c 20 70 74 72 25 |4.... ..|.". ptr%|
|00005310| 21 2d 32 34 3d 70 74 72 | 25 21 2d 32 34 20 84 20 |!-24=ptr|%!-24 . |
|00005320| 26 38 30 0d 1a 2c 06 20 | e1 0d 1a 36 10 20 f4 2d |&80..,. |...6. .-|
|00005330| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 1a 40 10 20 dd f2 |--------|-..@. ..|
|00005340| 70 72 69 6e 74 63 74 72 | 6c 0d 1a 4a 1a 20 f2 6d |printctr|l..J. .m|
|00005350| 69 6e 69 5f 70 6f 6c 6c | 3a f2 6d 69 6e 69 5f 70 |ini_poll|:.mini_p|
|00005360| 6f 6c 6c 0d 1a 54 38 20 | f2 70 64 72 69 76 65 72 |oll..T8 |.pdriver|
|00005370| 3a f2 72 6d 28 22 45 52 | 52 42 22 29 3a e7 20 74 |:.rm("ER|RB"):. t|
|00005380| 79 70 24 3d 74 65 78 74 | 24 20 f2 6e 6f 64 72 69 |yp$=text|$ .nodri|
|00005390| 76 65 72 5f 65 72 72 6f | 72 3a e1 0d 1a 5e 2c 20 |ver_erro|r:...^, |
|000053a0| c8 99 22 4f 53 5f 52 65 | 61 64 4d 6f 64 65 56 61 |.."OS_Re|adModeVa|
|000053b0| 72 69 61 62 6c 65 22 2c | 2d 31 2c 35 20 b8 20 2c |riable",|-1,5 . ,|
|000053c0| 2c 79 73 74 69 6e 74 0d | 1a 68 2c 20 c8 99 22 4f |,ystint.|.h, .."O|
|000053d0| 53 5f 52 65 61 64 4d 6f | 64 65 56 61 72 69 61 62 |S_ReadMo|deVariab|
|000053e0| 6c 65 22 2c 2d 31 2c 34 | 20 b8 20 2c 2c 78 73 74 |le",-1,4| . ,,xst|
|000053f0| 69 6e 74 0d 1a 72 26 20 | 67 78 30 25 3d 30 3a 67 |int..r& |gx0%=0:g|
|00005400| 79 30 25 3d 30 3a 67 78 | 31 25 3d 31 38 35 30 3a |y0%=0:gx|1%=1850:|
|00005410| 67 79 31 25 3d 31 38 35 | 30 0d 1a 7c 08 20 ea 20 |gy1%=185|0..|. . |
|00005420| 85 0d 1a 86 1c 20 ee 20 | 85 20 ea 3a f7 20 85 3a |..... . |. .:. .:|
|00005430| f2 70 72 6e 5f 65 72 72 | 6f 72 31 3a e1 0d 1a 90 |.prn_err|or1:....|
|00005440| 3b 20 f2 69 72 65 61 64 | 28 34 2c 77 68 61 6e 64 |; .iread|(4,whand|
|00005450| 6c 65 31 34 25 29 3a 63 | 6f 70 69 65 73 25 3d bb |le14%):c|opies%=.|
|00005460| 28 61 24 29 3a 65 72 72 | 25 3d a3 3a 63 75 72 72 |(a$):err|%=.:curr|
|00005470| 5f 63 6f 70 79 25 3d 30 | 0d 1a 9a 08 20 f7 20 85 |_copy%=0|.... . .|
|00005480| 0d 1a a4 04 0d 1a ae 06 | 20 f5 0d 1a b8 3d 20 20 |........| ....= |
|00005490| 70 72 6e 74 5f 73 74 61 | 74 75 73 3d 31 3a f2 70 |prnt_sta|tus=1:.p|
|000054a0| 72 69 6e 74 3a 70 72 6e | 74 5f 73 74 61 74 75 73 |rint:prn|t_status|
|000054b0| 3d 30 3a e7 20 65 72 72 | 25 3d b9 20 f2 70 72 6e |=0:. err|%=. .prn|
|000054c0| 5f 65 72 72 6f 72 31 0d | 1a c2 24 20 20 c8 99 22 |_error1.|..$ .."|
|000054d0| 48 6f 75 72 67 6c 61 73 | 73 5f 53 6d 61 73 68 22 |Hourglas|s_Smash"|
|000054e0| 3a 63 6f 70 69 65 73 25 | 2d 3d 31 0d 1a cc 1f 20 |:copies%|-=1.... |
|000054f0| 20 e7 20 70 72 69 6e 74 | 5f 70 61 75 73 65 3d a3 | . print|_pause=.|
|00005500| 20 63 6f 70 69 65 73 25 | 3d 30 0d 1a d6 2c 20 20 | copies%|=0..., |
|00005510| e7 20 63 6f 70 69 65 73 | 25 3e 30 20 80 20 70 72 |. copies|%>0 . pr|
|00005520| 69 6e 74 5f 70 61 75 73 | 65 3d b9 20 f2 70 72 6e |int_paus|e=. .prn|
|00005530| 5f 70 61 75 73 65 0d 1a | e0 11 20 fd 20 63 6f 70 |_pause..|.. . cop|
|00005540| 69 65 73 25 3c 3d 30 0d | 1a ea 22 20 e7 20 28 70 |ies%<=0.|.." . (p|
|00005550| 72 69 6e 74 5f 61 6e 73 | 77 65 72 3d b9 20 80 20 |rint_ans|wer=. . |
|00005560| 65 72 72 25 3d a3 29 20 | 8c 0d 1a f4 20 20 20 e7 |err%=.) |.... .|
|00005570| 20 70 72 69 6e 74 5f 70 | 61 75 73 65 3d b9 20 f2 | print_p|ause=. .|
|00005580| 70 72 6e 5f 70 61 75 73 | 65 0d 1a fe 3b 20 20 e7 |prn_paus|e...; .|
|00005590| 20 65 72 72 25 3d a3 20 | 70 72 6e 74 5f 73 74 61 | err%=. |prnt_sta|
|000055a0| 74 75 73 3d 31 3a 63 6f | 70 69 65 73 25 3d 31 3a |tus=1:co|pies%=1:|
|000055b0| f2 70 72 69 6e 74 3a 70 | 72 6e 74 5f 73 74 61 74 |.print:p|rnt_stat|
|000055c0| 75 73 3d 30 0d 1b 08 06 | 20 cd 0d 1b 12 06 20 e1 |us=0....| ..... .|
|000055d0| 0d 1b 1c 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|000055e0| 0d 1b 26 10 20 dd f2 70 | 72 6e 5f 70 61 75 73 65 |..&. ..p|rn_pause|
|000055f0| 0d 1b 30 18 20 c8 99 22 | 48 6f 75 72 67 6c 61 73 |..0. .."|Hourglas|
|00005600| 73 5f 53 6d 61 73 68 22 | 0d 1b 3a 34 20 f2 72 6d |s_Smash"|..:4 .rm|
|00005610| 28 22 42 55 54 35 22 29 | 3a 62 75 74 31 24 3d 74 |("BUT5")|:but1$=t|
|00005620| 65 78 74 24 3a f2 72 6d | 28 22 42 55 54 32 22 29 |ext$:.rm|("BUT2")|
|00005630| 3a 62 75 74 32 24 3d 74 | 65 78 74 24 0d 1b 44 45 |:but2$=t|ext$..DE|
|00005640| 20 f2 72 6d 28 22 41 4c | 54 34 22 29 3a f2 61 6c | .rm("AL|T4"):.al|
|00005650| 65 72 74 28 74 65 78 74 | 24 2c 62 75 74 31 24 2c |ert(text|$,but1$,|
|00005660| 62 75 74 32 24 29 3a e7 | 20 61 6c 65 72 74 3d 30 |but2$):.| alert=0|
|00005670| 20 65 72 72 25 3d b9 3a | 63 6f 70 69 65 73 25 3d | err%=.:|copies%=|
|00005680| 30 0d 1b 4e 06 20 e1 0d | 1b 58 10 20 f4 2d 2d 2d |0..N. ..|.X. .---|
|00005690| 2d 2d 2d 2d 2d 2d 2d 0d | 1b 62 11 20 dd f2 70 72 |-------.|.b. ..pr|
|000056a0| 6e 5f 65 72 72 6f 72 31 | 0d 1b 6c 18 20 c8 99 22 |n_error1|..l. .."|
|000056b0| 48 6f 75 72 67 6c 61 73 | 73 5f 53 6d 61 73 68 22 |Hourglas|s_Smash"|
|000056c0| 0d 1b 76 26 20 74 65 78 | 74 24 3d 22 50 72 69 6e |..v& tex|t$="Prin|
|000056d0| 74 69 6e 67 20 41 62 6f | 72 74 65 64 20 28 22 2b |ting Abo|rted ("+|
|000056e0| f6 24 2b 22 29 22 0d 1b | 80 1d 20 f2 65 72 72 62 |.$+")"..|.. .errb|
|000056f0| 6f 78 28 74 65 78 74 24 | 29 3a 63 6f 70 69 65 73 |ox(text$|):copies|
|00005700| 25 3d 30 0d 1b 8a 06 20 | e1 0d 1b 94 10 20 f4 2d |%=0.... |..... .-|
|00005710| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 1b 9e 0c 20 dd f2 |--------|-.... ..|
|00005720| 70 72 69 6e 74 0d 1b a8 | 08 20 ea 20 85 0d 1b b2 |print...|. . ....|
|00005730| 1d 20 ee 20 85 20 ea 20 | f7 20 85 3a d9 23 70 66 |. . . . |. .:.#pf|
|00005740| 25 3a 65 72 72 25 3d b9 | 3a e1 0d 1b bc 42 20 ff |%:err%=.|:....B .|
|00005750| 28 22 52 4d 45 6e 73 75 | 72 65 20 50 44 72 69 76 |("RMEnsu|re PDriv|
|00005760| 65 72 20 30 20 45 52 52 | 4f 52 20 32 35 35 20 4e |er 0 ERR|OR 255 N|
|00005770| 6f 20 70 72 69 6e 74 65 | 72 20 64 72 69 76 65 72 |o printe|r driver|
|00005780| 20 69 6e 73 74 61 6c 6c | 65 64 22 29 0d 1b c6 15 | install|ed")....|
|00005790| 20 c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 6e | .."Hour|glass_On|
|000057a0| 22 0d 1b d0 1d 20 70 66 | 25 3d ae 28 22 70 72 69 |".... pf|%=.("pri|
|000057b0| 6e 74 65 72 3a 22 29 3a | 65 72 72 25 3d a3 0d 1b |nter:"):|err%=...|
|000057c0| da 2c 20 e7 20 70 66 25 | 3d 30 20 8c 20 85 20 32 |., . pf%|=0 . . 2|
|000057d0| 35 35 2c 22 50 72 69 6e | 74 65 72 20 6e 6f 74 20 |55,"Prin|ter not |
|000057e0| 61 76 61 69 6c 61 62 6c | 65 22 0d 1b e4 29 20 c8 |availabl|e"...) .|
|000057f0| 99 22 50 44 72 69 76 65 | 72 5f 53 65 6c 65 63 74 |."PDrive|r_Select|
|00005800| 4a 6f 62 22 2c 70 66 25 | 2c 22 57 53 20 50 52 49 |Job",pf%|,"WS PRI|
|00005810| 4e 54 22 0d 1b ee 30 20 | c8 99 22 50 44 72 69 76 |NT"...0 |.."PDriv|
|00005820| 65 72 5f 50 61 67 65 53 | 69 7a 65 22 20 b8 20 52 |er_PageS|ize" . R|
|00005830| 30 2c 52 31 2c 52 32 2c | 52 33 2c 52 34 2c 52 35 |0,R1,R2,|R3,R4,R5|
|00005840| 2c 52 36 0d 1b f8 18 20 | e7 20 52 34 3c 37 32 30 |,R6.... |. R4<720|
|00005850| 30 30 20 52 34 3d 37 32 | 30 30 30 0d 1c 02 18 20 |00 R4=72|000.... |
|00005860| e7 20 52 33 3c 33 36 30 | 30 30 20 52 33 3d 33 36 |. R3<360|00 R3=36|
|00005870| 30 30 30 0d 1c 0c 30 20 | 50 78 73 69 7a 65 3d a8 |000...0 |Pxsize=.|
|00005880| 28 28 52 35 2d 52 33 29 | 2f 34 30 30 29 3a 50 79 |((R5-R3)|/400):Py|
|00005890| 73 69 7a 65 3d a8 28 28 | 52 36 2d 52 34 29 2f 34 |size=.((|R6-R4)/4|
|000058a0| 30 30 29 0d 1c 16 04 0d | 1c 20 37 20 72 65 63 74 |00).....|. 7 rect|
|000058b0| 25 21 30 3d 30 3a 72 65 | 63 74 25 21 34 3d 30 3a |%!0=0:re|ct%!4=0:|
|000058c0| 72 65 63 74 25 21 38 3d | 50 78 73 69 7a 65 3a 72 |rect%!8=|Pxsize:r|
|000058d0| 65 63 74 25 21 31 32 3d | 50 79 73 69 7a 65 0d 1c |ect%!12=|Pysize..|
|000058e0| 2a 41 20 74 72 61 6e 73 | 25 21 30 3d 31 3c 3c 31 |*A trans|%!0=1<<1|
|000058f0| 36 3a 74 72 61 6e 73 25 | 21 34 3d 30 3c 3c 31 36 |6:trans%|!4=0<<16|
|00005900| 3a 74 72 61 6e 73 25 21 | 38 3d 30 3c 3c 31 36 3a |:trans%!|8=0<<16:|
|00005910| 74 72 61 6e 73 25 21 31 | 32 3d 31 3c 3c 31 36 0d |trans%!1|2=1<<16.|
|00005920| 1c 34 73 20 70 6c 6f 74 | 61 74 25 21 30 3d 52 33 |.4s plot|at%!0=R3|
|00005930| 3a 70 6c 6f 74 61 74 25 | 21 34 3d 52 34 3a 73 63 |:plotat%|!4=R4:sc|
|00005940| 61 6c 65 5f 79 3d 50 79 | 73 69 7a 65 2f 38 30 30 |ale_y=Py|size/800|
|00005950| 3a 73 63 61 6c 65 32 3d | 73 63 61 6c 65 5f 79 3a |:scale2=|scale_y:|
|00005960| 73 63 61 6c 65 5f 78 3d | 50 78 73 69 7a 65 2f 35 |scale_x=|Pxsize/5|
|00005970| 36 34 3a e7 20 73 63 61 | 6c 65 5f 78 3c 73 63 61 |64:. sca|le_x<sca|
|00005980| 6c 65 32 20 73 63 61 6c | 65 32 3d 73 63 61 6c 65 |le2 scal|e2=scale|
|00005990| 5f 78 0d 1c 3e 04 0d 1c | 48 3f 20 c8 99 22 50 44 |_x..>...|H? .."PD|
|000059a0| 72 69 76 65 72 5f 47 69 | 76 65 52 65 63 74 61 6e |river_Gi|veRectan|
|000059b0| 67 6c 65 22 2c 30 2c 72 | 65 63 74 25 2c 74 72 61 |gle",0,r|ect%,tra|
|000059c0| 6e 73 25 2c 70 6c 6f 74 | 61 74 25 2c 26 46 46 46 |ns%,plot|at%,&FFF|
|000059d0| 46 46 46 30 30 0d 1c 52 | 40 20 e7 20 70 72 69 6e |FFF00..R|@ . prin|
|000059e0| 74 5f 70 61 75 73 65 3d | b9 20 c8 99 22 50 44 72 |t_pause=|. .."PDr|
|000059f0| 69 76 65 72 5f 44 72 61 | 77 50 61 67 65 22 2c 31 |iver_Dra|wPage",1|
|00005a00| 2c 72 65 63 74 69 6e 25 | 2c 30 2c 30 20 b8 20 6d |,rectin%|,0,0 . m|
|00005a10| 6d 6f 72 65 25 0d 1c 53 | 46 20 e7 20 70 72 69 6e |more%..S|F . prin|
|00005a20| 74 5f 70 61 75 73 65 3d | a3 20 c8 99 22 50 44 72 |t_pause=|. .."PDr|
|00005a30| 69 76 65 72 5f 44 72 61 | 77 50 61 67 65 22 2c 63 |iver_Dra|wPage",c|
|00005a40| 6f 70 69 65 73 25 2c 72 | 65 63 74 69 6e 25 2c 30 |opies%,r|ectin%,0|
|00005a50| 2c 30 20 b8 20 6d 6d 6f | 72 65 25 0d 1c 5c 08 20 |,0 . mmo|re%..\. |
|00005a60| f7 20 85 0d 1c 66 04 0d | 1c 7a 08 20 ea 20 85 0d |. ...f..|.z. . ..|
|00005a70| 1c 84 36 20 ee 20 85 20 | ea 3a f7 20 85 3a c8 99 |..6 . . |.:. .:..|
|00005a80| 22 50 44 72 69 76 65 72 | 5f 41 62 6f 72 74 4a 6f |"PDriver|_AbortJo|
|00005a90| 62 22 2c 70 66 25 3a d9 | 23 70 66 25 3a 65 72 72 |b",pf%:.|#pf%:err|
|00005aa0| 25 3d b9 3a e1 0d 1c 8e | 0e 20 c8 95 20 6d 6d 6f |%=.:....|. .. mmo|
|00005ab0| 72 65 25 0d 1c 8f 27 20 | 20 c8 99 22 43 6f 6c 6f |re%...' | .."Colo|
|00005ac0| 75 72 54 72 61 6e 73 5f | 53 65 74 47 43 4f 4c 22 |urTrans_|SetGCOL"|
|00005ad0| 2c 26 30 30 30 30 30 30 | 30 30 0d 1c 90 33 20 20 |,&000000|00...3 |
|00005ae0| c8 99 22 43 6f 6c 6f 75 | 72 54 72 61 6e 73 5f 53 |.."Colou|rTrans_S|
|00005af0| 65 74 46 6f 6e 74 43 6f | 6c 6f 75 72 73 22 2c 2c |etFontCo|lours",,|
|00005b00| 26 46 46 46 46 46 46 30 | 30 2c 30 2c 36 0d 1c 98 |&FFFFFF0|0,0,6...|
|00005b10| 19 20 20 f2 73 74 79 6c | 65 31 28 73 63 61 6c 65 |. .styl|e1(scale|
|00005b20| 32 2c 30 2c 30 29 0d 1c | a2 38 20 20 c8 99 22 50 |2,0,0)..|.8 .."P|
|00005b30| 44 72 69 76 65 72 5f 47 | 65 74 52 65 63 74 61 6e |Driver_G|etRectan|
|00005b40| 67 6c 65 22 2c 2c 72 65 | 63 74 69 6e 25 20 b8 20 |gle",,re|ctin% . |
|00005b50| 6d 6d 6f 72 65 25 2c 2c | 72 65 63 69 64 25 0d 1c |mmore%,,|recid%..|
|00005b60| ac 06 20 ce 0d 1c b6 37 | 20 c8 99 22 50 44 72 69 |.. ....7| .."PDri|
|00005b70| 76 65 72 5f 45 6e 64 4a | 6f 62 22 2c 70 66 25 3a |ver_EndJ|ob",pf%:|
|00005b80| c8 99 22 48 6f 75 72 67 | 6c 61 73 73 5f 4f 66 66 |.."Hourg|lass_Off|
|00005b90| 22 3a f7 20 85 3a d9 23 | 70 66 25 0d 1c c0 06 20 |":. .:.#|pf%.... |
|00005ba0| e1 0d 1c ca 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|00005bb0| 2d 0d 1c d4 22 20 dd f2 | 73 74 79 6c 65 31 28 73 |-..." ..|style1(s|
|00005bc0| 63 61 6c 65 2c 74 78 70 | 6f 73 25 2c 74 79 70 6f |cale,txp|os%,typo|
|00005bd0| 73 25 29 0d 1c de 20 20 | f2 72 65 61 64 66 6f 6e |s%)... |.readfon|
|00005be0| 74 73 3a c8 99 22 48 6f | 75 72 67 6c 61 73 73 5f |ts:.."Ho|urglass_|
|00005bf0| 4f 6e 22 0d 1c e8 16 20 | e7 20 70 72 6e 74 5f 73 |On".... |. prnt_s|
|00005c00| 74 61 74 75 73 3d 30 20 | 8c 0d 1c f2 44 20 20 c8 |tatus=0 |....D .|
|00005c10| 99 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 33 |."OS_Spr|iteOp",3|
|00005c20| 31 36 2c 67 72 61 62 5f | 6d 65 6d 73 74 61 72 74 |16,grab_|memstart|
|00005c30| 2c 22 67 72 61 62 22 2c | 6d 69 6b 20 b8 20 52 52 |,"grab",|mik . RR|
|00005c40| 30 2c 52 52 31 2c 52 52 | 32 2c 52 52 33 0d 1c fc |0,RR1,RR|2,RR3...|
|00005c50| 58 20 20 ea 20 85 3a ee | 20 85 20 ea 3a c8 99 22 |X . .:.| . .:.."|
|00005c60| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 52 52 30 |OS_Sprit|eOp",RR0|
|00005c70| 2c 52 52 31 2c 52 52 32 | 2c 52 52 33 3a c8 99 22 |,RR1,RR2|,RR3:.."|
|00005c80| 48 6f 75 72 67 6c 61 73 | 73 5f 53 6d 61 73 68 22 |Hourglas|s_Smash"|
|00005c90| 3a ef 32 36 3a db 3a f1 | f6 24 3a f1 c3 9e 3a 5a |:.26:.:.|.$:...:Z|
|00005ca0| 24 3d be 3a fa 0d 1d 06 | 2c 20 20 c8 99 22 57 69 |$=.:....|, .."Wi|
|00005cb0| 6d 70 5f 53 65 74 43 6f | 6c 6f 75 72 22 2c 30 3a |mp_SetCo|lour",0:|
|00005cc0| c8 93 20 c8 90 20 30 2c | 30 2c 36 30 30 2c 39 30 |.. .. 0,|0,600,90|
|00005cd0| 30 0d 1d 10 06 20 cd 0d | 1d 1a 39 20 e7 20 62 6f |0.... ..|..9 . bo|
|00005ce0| 72 64 65 72 25 3d b9 20 | f2 62 6f 72 64 65 72 5f |rder%=. |.border_|
|00005cf0| 64 72 61 77 62 69 74 28 | 30 2c 30 2c 35 36 32 2a |drawbit(|0,0,562*|
|00005d00| 73 63 61 6c 65 2c 37 39 | 38 2a 73 63 61 6c 65 29 |scale,79|8*scale)|
|00005d10| 0d 1d 24 32 20 f2 64 69 | 73 70 6c 61 79 5f 67 72 |..$2 .di|splay_gr|
|00005d20| 69 64 28 36 37 2a 73 63 | 61 6c 65 2c 32 36 36 2a |id(67*sc|ale,266*|
|00005d30| 73 63 61 6c 65 2c 28 34 | 33 30 2a 73 63 61 6c 65 |scale,(4|30*scale|
|00005d40| 29 29 0d 1d 2e 28 20 f2 | 64 69 73 70 6c 61 79 5f |))...( .|display_|
|00005d50| 63 6c 75 65 73 32 28 36 | 37 2a 73 63 61 6c 65 2c |clues2(6|7*scale,|
|00005d60| 32 33 36 2a 73 63 61 6c | 65 29 0d 1d 38 13 20 f2 |236*scal|e)..8. .|
|00005d70| 64 69 73 70 6c 61 79 5f | 74 69 74 6c 65 0d 1d 42 |display_|title..B|
|00005d80| 4c 20 e7 20 70 72 6e 74 | 5f 73 74 61 74 75 73 3d |L . prnt|_status=|
|00005d90| 30 20 c8 99 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |0 .."OS_|SpriteOp|
|00005da0| 22 2c 52 52 30 2c 52 52 | 31 2c 52 52 32 2c 52 52 |",RR0,RR|1,RR2,RR|
|00005db0| 33 3a c8 99 22 48 6f 75 | 72 67 6c 61 73 73 5f 53 |3:.."Hou|rglass_S|
|00005dc0| 6d 61 73 68 22 3a f7 20 | 85 0d 1d 4c 06 20 e1 0d |mash":. |...L. ..|
|00005dd0| 1d 56 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |.V. .---|-------.|
|00005de0| 1d 60 0e 20 dd f2 70 61 | 6c 69 6e 69 74 0d 1d 6a |.`. ..pa|linit..j|
|00005df0| 1c 20 70 30 25 21 30 3d | 26 66 66 66 66 66 66 30 |. p0%!0=|&ffffff0|
|00005e00| 30 3a 70 30 25 21 34 3d | 30 0d 1d 74 3d 20 70 31 |0:p0%!4=|0..t= p1|
|00005e10| 25 21 30 3d 26 66 66 66 | 66 66 66 30 30 3a 70 31 |%!0=&fff|fff00:p1|
|00005e20| 25 21 34 3d 26 62 62 62 | 62 62 62 30 30 3a 70 31 |%!4=&bbb|bbb00:p1|
|00005e30| 25 21 38 3d 26 37 37 37 | 37 37 37 30 30 3a 70 31 |%!8=&777|77700:p1|
|00005e40| 25 21 31 32 3d 30 0d 1d | 7e 45 20 70 32 25 21 30 |%!12=0..|~E p2%!0|
|00005e50| 3d 26 66 66 66 66 66 66 | 30 30 3a 70 32 25 21 34 |=&ffffff|00:p2%!4|
|00005e60| 3d 26 64 64 64 64 64 64 | 30 30 3a 70 32 25 21 38 |=&dddddd|00:p2%!8|
|00005e70| 3d 26 62 62 62 62 62 62 | 30 30 3a 70 32 25 21 31 |=&bbbbbb|00:p2%!1|
|00005e80| 32 3d 26 39 39 39 39 39 | 39 30 30 0d 1d 88 40 20 |2=&99999|900...@ |
|00005e90| 70 32 25 21 31 36 3d 26 | 37 37 37 37 37 37 30 30 |p2%!16=&|77777700|
|00005ea0| 3a 70 32 25 21 32 30 3d | 26 35 35 35 35 35 35 30 |:p2%!20=|&5555550|
|00005eb0| 30 3a 70 32 25 21 32 34 | 3d 26 33 33 33 33 33 33 |0:p2%!24|=&333333|
|00005ec0| 30 30 3a 70 32 25 21 32 | 38 3d 30 0d 1d 92 48 20 |00:p2%!2|8=0...H |
|00005ed0| 70 32 25 21 33 32 3d 26 | 39 39 34 34 30 30 30 30 |p2%!32=&|99440000|
|00005ee0| 3a 70 32 25 21 33 36 3d | 26 30 30 65 65 65 65 30 |:p2%!36=|&00eeee0|
|00005ef0| 30 3a 70 32 25 21 34 30 | 3d 26 30 30 63 63 30 30 |0:p2%!40|=&00cc00|
|00005f00| 30 30 3a 70 32 25 21 34 | 34 3d 26 30 30 30 30 64 |00:p2%!4|4=&0000d|
|00005f10| 64 30 30 0d 1d 9c 48 20 | 70 32 25 21 34 38 3d 26 |d00...H |p2%!48=&|
|00005f20| 62 62 65 65 65 65 30 30 | 3a 70 32 25 21 35 32 3d |bbeeee00|:p2%!52=|
|00005f30| 26 30 30 38 38 35 35 30 | 30 3a 70 32 25 21 35 36 |&0088550|0:p2%!56|
|00005f40| 3d 26 30 30 62 62 66 66 | 30 30 3a 70 32 25 21 36 |=&00bbff|00:p2%!6|
|00005f50| 30 3d 26 66 66 62 62 30 | 30 30 30 0d 1d a6 45 20 |0=&ffbb0|000...E |
|00005f60| 70 33 25 21 30 3d 26 30 | 30 30 30 30 30 30 30 3a |p3%!0=&0|0000000:|
|00005f70| 70 33 25 21 34 3d 26 31 | 30 31 30 31 30 30 30 3a |p3%!4=&1|0101000:|
|00005f80| 70 33 25 21 38 3d 26 32 | 30 32 30 32 30 30 30 3a |p3%!8=&2|0202000:|
|00005f90| 70 33 25 21 31 32 3d 26 | 33 30 33 30 33 30 30 30 |p3%!12=&|30303000|
|00005fa0| 0d 1d b0 48 20 70 33 25 | 21 31 36 3d 26 30 30 30 |...H p3%|!16=&000|
|00005fb0| 30 34 30 30 30 3a 70 33 | 25 21 32 30 3d 26 31 30 |04000:p3|%!20=&10|
|00005fc0| 31 30 35 30 30 30 3a 70 | 33 25 21 32 34 3d 26 32 |105000:p|3%!24=&2|
|00005fd0| 30 32 30 36 30 30 30 3a | 70 33 25 21 32 38 3d 26 |0206000:|p3%!28=&|
|00005fe0| 33 30 33 30 37 30 30 30 | 0d 1d ba 48 20 70 33 25 |30307000|...H p3%|
|00005ff0| 21 33 32 3d 26 34 30 30 | 30 30 30 30 30 3a 70 33 |!32=&400|00000:p3|
|00006000| 25 21 33 36 3d 26 35 30 | 31 30 31 30 30 30 3a 70 |%!36=&50|101000:p|
|00006010| 33 25 21 34 30 3d 26 36 | 30 32 30 32 30 30 30 3a |3%!40=&6|0202000:|
|00006020| 70 33 25 21 34 34 3d 26 | 37 30 33 30 33 30 30 30 |p3%!44=&|70303000|
|00006030| 0d 1d c4 48 20 70 33 25 | 21 34 38 3d 26 34 30 30 |...H p3%|!48=&400|
|00006040| 30 34 30 30 30 3a 70 33 | 25 21 35 32 3d 26 35 30 |04000:p3|%!52=&50|
|00006050| 31 30 35 30 30 30 3a 70 | 33 25 21 35 36 3d 26 36 |105000:p|3%!56=&6|
|00006060| 30 32 30 36 30 30 30 3a | 70 33 25 21 36 30 3d 26 |0206000:|p3%!60=&|
|00006070| 37 30 33 30 37 30 30 30 | 0d 1d ce 06 20 e1 0d 1d |70307000|.... ...|
|00006080| d8 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 1d |.. .----|------..|
|00006090| e2 16 20 dd f2 62 6f 72 | 64 65 72 73 6d 65 6e 75 |.. ..bor|dersmenu|
|000060a0| 28 6d 25 29 0d 1d ec 4c | 20 6d 25 3f 31 32 3d 37 |(m%)...L| m%?12=7|
|000060b0| 3a 6d 25 3f 31 33 3d 32 | 3a 6d 25 3f 31 34 3d 37 |:m%?13=2|:m%?14=7|
|000060c0| 3a 6d 25 3f 31 35 3d 30 | 3a 6d 25 21 31 36 3d 31 |:m%?15=0|:m%!16=1|
|000060d0| 33 2a 31 36 3a 6d 25 21 | 32 30 3d 34 34 3a 6d 25 |3*16:m%!|20=44:m%|
|000060e0| 21 32 34 3d 30 3a 70 74 | 72 25 3d 6d 25 2b 32 38 |!24=0:pt|r%=m%+28|
|000060f0| 0d 1d f6 1a 20 f2 72 6d | 28 22 4d 55 41 33 22 29 |.... .rm|("MUA3")|
|00006100| 3a 24 6d 25 3d 74 65 78 | 74 24 0d 1e 00 55 20 6d |:$m%=tex|t$...U m|
|00006110| 65 6e 75 24 3d 22 57 69 | 70 65 20 62 6f 72 64 65 |enu$="Wi|pe borde|
|00006120| 72 22 3a 70 74 72 25 21 | 30 3d 32 3a 70 74 72 25 |r":ptr%!|0=2:ptr%|
|00006130| 21 34 3d 2d 31 3a 70 74 | 72 25 21 38 3d 26 37 30 |!4=-1:pt|r%!8=&70|
|00006140| 30 30 30 32 31 3a 24 28 | 70 74 72 25 2b 31 32 29 |00021:$(|ptr%+12)|
|00006150| 3d 6d 65 6e 75 24 3a 70 | 74 72 25 2b 3d 32 34 0d |=menu$:p|tr%+=24.|
|00006160| 1e 0a 1b 20 e3 20 72 72 | 3d 31 20 b8 20 62 6f 72 |... . rr|=1 . bor|
|00006170| 64 65 72 73 6e 75 6d 62 | 65 72 0d 1e 14 18 20 20 |dersnumb|er.... |
|00006180| 6d 65 6e 75 24 3d 62 6f | 72 64 65 72 73 24 28 72 |menu$=bo|rders$(r|
|00006190| 72 29 0d 1e 1e 42 20 20 | 70 74 72 25 21 30 3d 30 |r)...B |ptr%!0=0|
|000061a0| 3a 70 74 72 25 21 34 3d | 2d 31 3a 70 74 72 25 21 |:ptr%!4=|-1:ptr%!|
|000061b0| 38 3d 26 37 30 30 30 30 | 32 31 3a 24 28 70 74 72 |8=&70000|21:$(ptr|
|000061c0| 25 2b 31 32 29 3d 6d 65 | 6e 75 24 3a 70 74 72 25 |%+12)=me|nu$:ptr%|
|000061d0| 2b 3d 32 34 0d 1e 28 06 | 20 ed 0d 1e 32 1c 20 70 |+=24..(.| ...2. p|
|000061e0| 74 72 25 21 2d 32 34 3d | 70 74 72 25 21 2d 32 34 |tr%!-24=|ptr%!-24|
|000061f0| 20 84 20 26 38 30 0d 1e | 3c 06 20 e1 0d 1e 46 10 | . &80..|<. ...F.|
|00006200| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 1e 50 19 | .------|----..P.|
|00006210| 20 dd f2 66 6f 6e 74 6d | 65 6e 75 28 6d 25 2c 6d | ..fontm|enu(m%,m|
|00006220| 61 74 63 68 29 0d 1e 5a | 16 20 63 6f 66 24 3d 22 |atch)..Z|. cof$="|
|00006230| 22 3a 6d 61 74 63 68 24 | 3d 22 22 0d 1e 64 4a 20 |":match$|=""..dJ |
|00006240| 6d 25 3f 31 32 3d 37 3a | 6d 25 3f 31 33 3d 32 3a |m%?12=7:|m%?13=2:|
|00006250| 6d 25 3f 31 34 3d 37 3a | 6d 25 3f 31 35 3d 30 3a |m%?14=7:|m%?15=0:|
|00006260| 6d 25 21 31 36 3d 32 34 | 34 3a 6d 25 21 32 30 3d |m%!16=24|4:m%!20=|
|00006270| 34 34 3a 6d 25 21 32 34 | 3d 30 3a 70 74 72 25 3d |44:m%!24|=0:ptr%=|
|00006280| 6d 25 2b 32 38 0d 1e 6e | 20 20 f2 72 6d 28 22 54 |m%+28..n| .rm("T|
|00006290| 58 54 31 22 29 3a 24 6d | 25 3d 22 46 6f 6e 74 20 |XT1"):$m|%="Font |
|000062a0| 45 64 69 74 22 0d 1e 78 | 27 20 e7 20 4d 55 24 3d |Edit"..x|' . MU$=|
|000062b0| 22 47 72 69 64 22 20 f2 | 72 6d 28 22 54 58 54 32 |"Grid" .|rm("TXT2|
|000062c0| 22 29 3a 24 6d 25 3d 74 | 65 78 74 24 0d 1e 82 28 |"):$m%=t|ext$...(|
|000062d0| 20 e7 20 4d 55 24 3d 22 | 54 69 74 6c 65 22 20 f2 | . MU$="|Title" .|
|000062e0| 72 6d 28 22 54 58 54 33 | 22 29 3a 24 6d 25 3d 74 |rm("TXT3|"):$m%=t|
|000062f0| 65 78 74 24 0d 1e 8c 27 | 20 e7 20 4d 55 24 3d 22 |ext$...'| . MU$="|
|00006300| 54 65 78 74 22 20 f2 72 | 6d 28 22 54 58 54 34 22 |Text" .r|m("TXT4"|
|00006310| 29 3a 24 6d 25 3d 74 65 | 78 74 24 0d 1e 96 1a 20 |):$m%=te|xt$.... |
|00006320| e7 20 4d 55 24 3d 22 54 | 72 79 22 20 24 6d 25 3d |. MU$="T|ry" $m%=|
|00006330| 22 54 72 79 22 0d 1e a0 | 52 20 70 74 72 25 21 30 |"Try"...|R ptr%!0|
|00006340| 3d 32 3a 70 74 72 25 21 | 34 3d 63 6f 6c 6d 65 6e |=2:ptr%!|4=colmen|
|00006350| 75 3a 70 74 72 25 21 38 | 3d 26 37 30 30 30 30 32 |u:ptr%!8|=&700002|
|00006360| 31 3a f2 72 6d 28 22 54 | 58 54 35 22 29 3a 24 28 |1:.rm("T|XT5"):$(|
|00006370| 70 74 72 25 2b 31 32 29 | 3d 74 65 78 74 24 3a 70 |ptr%+12)|=text$:p|
|00006380| 74 72 25 2b 3d 32 34 0d | 1e aa 25 20 6f 66 66 73 |tr%+=24.|..% offs|
|00006390| 65 74 25 3d 6d 66 31 25 | 3a 6f 66 66 73 65 74 32 |et%=mf1%|:offset2|
|000063a0| 25 3d 66 6f 6e 74 6d 65 | 6e 75 32 25 0d 1e b4 1d |%=fontme|nu2%....|
|000063b0| 20 66 66 3d 31 3a 66 6c | 61 67 3d 30 3a 6d 61 74 | ff=1:fl|ag=0:mat|
|000063c0| 63 68 5f 66 6c 61 67 3d | 30 0d 1e be 06 20 f5 0d |ch_flag=|0.... ..|
|000063d0| 1e c8 17 20 6c 3d a7 66 | 6f 6e 74 73 24 28 66 66 |... l=.f|onts$(ff|
|000063e0| 29 2c 22 2e 22 29 0d 1e | d2 19 20 e7 20 6c 3d 30 |),".")..|.. . l=0|
|000063f0| 20 66 6f 24 3d 66 6f 6e | 74 73 24 28 66 66 29 0d | fo$=fon|ts$(ff).|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
