home *** CD-ROM | disk | FTP | other *** search
Unknown | 1997-01-04 | 42.4 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| file
| data
| default
| |
100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 17 f4 20 53 74 | 61 72 74 75 70 20 43 6f |..... St|artup Co|
|00000010| 6e 66 69 67 75 72 65 0d | 00 14 19 f4 20 42 79 20 |nfigure.|.... By |
|00000020| 4a 61 6d 65 73 20 41 6c | 6c 64 65 72 69 64 67 65 |James Al|lderidge|
|00000030| 0d 00 1e 12 f4 20 56 65 | 72 73 69 6f 6e 20 31 2e |..... Ve|rsion 1.|
|00000040| 30 31 0d 00 28 09 f2 69 | 6e 69 74 0d 00 32 12 f2 |01..(..i|nit..2..|
|00000050| 69 6e 69 74 5f 70 6f 73 | 74 77 69 6d 70 0d 00 3c |init_pos|twimp..<|
|00000060| 11 f2 6f 70 65 6e 5f 6d | 61 69 6e 77 69 6e 0d 00 |..open_m|ainwin..|
|00000070| 46 11 6d 61 69 6e 5f 66 | 69 6e 69 73 68 3d a3 0d |F.main_f|inish=..|
|00000080| 00 50 05 f5 0d 00 5a 28 | c8 99 20 22 57 69 6d 70 |.P....Z(|.. "Wimp|
|00000090| 5f 50 6f 6c 6c 22 2c 6d | 61 73 6b 25 2c 62 6c 6f |_Poll",m|ask%,blo|
|000000a0| 63 6b 25 20 b8 20 72 63 | 6f 64 65 25 0d 00 64 10 |ck% . rc|ode%..d.|
|000000b0| 20 c8 8e 20 72 63 6f 64 | 65 25 20 ca 0d 00 6e 09 | .. rcod|e% ...n.|
|000000c0| 20 20 c9 20 32 0d 00 78 | 13 20 20 20 c8 8e 20 21 | . 2..x|. .. !|
|000000d0| 62 6c 6f 63 6b 25 20 ca | 0d 00 82 13 20 20 20 20 |block% .|.... |
|000000e0| c9 20 62 61 73 65 77 69 | 6e 68 25 0d 00 8c 1d 20 |. basewi|nh%.... |
|000000f0| 20 20 20 20 62 6c 6f 63 | 6b 25 21 32 35 36 3d 6d | bloc|k%!256=m|
|00000100| 61 69 6e 77 69 6e 68 25 | 0d 00 96 2d 20 20 20 20 |ainwinh%|...- |
|00000110| 20 c8 99 20 22 57 69 6d | 70 5f 47 65 74 57 69 6e | .. "Wim|p_GetWin|
|00000120| 64 6f 77 53 74 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |dowState|",,block|
|00000130| 25 2b 32 35 36 0d 00 a0 | 32 20 20 20 20 20 62 6c |%+256...|2 bl|
|00000140| 6f 63 6b 25 21 32 36 38 | 3d 62 6c 6f 63 6b 25 21 |ock%!268|=block%!|
|00000150| 34 2b 62 6c 6f 63 6b 25 | 21 32 36 38 2d 62 6c 6f |4+block%|!268-blo|
|00000160| 63 6b 25 21 32 36 30 0d | 00 aa 36 20 20 20 20 20 |ck%!260.|..6 |
|00000170| 62 6c 6f 63 6b 25 21 32 | 37 32 3d 62 6c 6f 63 6b |block%!2|72=block|
|00000180| 25 21 38 2b 62 6c 6f 63 | 6b 25 21 32 37 32 2d 62 |%!8+bloc|k%!272-b|
|00000190| 6c 6f 63 6b 25 21 32 36 | 34 2b 31 30 38 0d 00 b4 |lock%!26|4+108...|
|000001a0| 1c 20 20 20 20 20 62 6c | 6f 63 6b 25 21 32 36 30 |. bl|ock%!260|
|000001b0| 3d 62 6c 6f 63 6b 25 21 | 34 0d 00 be 20 20 20 20 |=block%!|4... |
|000001c0| 20 20 62 6c 6f 63 6b 25 | 21 32 36 34 3d 62 6c 6f | block%|!264=blo|
|000001d0| 63 6b 25 21 38 2b 31 30 | 38 0d 00 c8 1d 20 20 20 |ck%!8+10|8.... |
|000001e0| 20 20 62 6c 6f 63 6b 25 | 21 32 38 34 3d 62 6c 6f | block%|!284=blo|
|000001f0| 63 6b 25 21 32 38 0d 00 | d2 29 20 20 20 20 20 c8 |ck%!28..|.) .|
|00000200| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |. "Wimp_|OpenWind|
|00000210| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 2b 32 35 36 0d |ow",,blo|ck%+256.|
|00000220| 00 dc 1c 20 20 20 20 20 | 62 6c 6f 63 6b 25 21 32 |... |block%!2|
|00000230| 38 3d 6d 61 69 6e 77 69 | 6e 68 25 0d 00 e6 25 20 |8=mainwi|nh%...% |
|00000240| 20 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 | .. "|Wimp_Ope|
|00000250| 6e 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |nWindow"|,,block%|
|00000260| 0d 00 f0 13 20 20 20 20 | c9 20 73 65 6c 62 77 69 |.... |. selbwi|
|00000270| 6e 68 25 0d 00 fa 25 20 | 20 20 20 20 c8 99 20 22 |nh%...% | .. "|
|00000280| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00000290| 2c 2c 62 6c 6f 63 6b 25 | 0d 01 04 1a 20 20 20 20 |,,block%|.... |
|000002a0| 20 21 62 6c 6f 63 6b 25 | 3d 73 65 6c 62 77 69 6e | !block%|=selbwin|
|000002b0| 68 25 0d 01 0e 1d 20 20 | 20 20 20 62 6c 6f 63 6b |h%.... | block|
|000002c0| 25 21 32 35 36 3d 73 65 | 6c 6c 77 69 6e 68 25 0d |%!256=se|llwinh%.|
|000002d0| 01 18 2d 20 20 20 20 20 | c8 99 20 22 57 69 6d 70 |..- |.. "Wimp|
|000002e0| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|000002f0| 2c 2c 62 6c 6f 63 6b 25 | 2b 32 35 36 0d 01 22 35 |,,block%|+256.."5|
|00000300| 20 20 20 20 20 62 6c 6f | 63 6b 25 21 32 36 38 3d | blo|ck%!268=|
|00000310| 62 6c 6f 63 6b 25 21 34 | 2b 62 6c 6f 63 6b 25 21 |block%!4|+block%!|
|00000320| 32 36 38 2d 62 6c 6f 63 | 6b 25 21 32 36 30 2b 31 |268-bloc|k%!260+1|
|00000330| 36 0d 01 2c 36 20 20 20 | 20 20 62 6c 6f 63 6b 25 |6..,6 | block%|
|00000340| 21 32 37 32 3d 62 6c 6f | 63 6b 25 21 38 2b 62 6c |!272=blo|ck%!8+bl|
|00000350| 6f 63 6b 25 21 32 37 32 | 2d 62 6c 6f 63 6b 25 21 |ock%!272|-block%!|
|00000360| 32 36 34 2b 31 39 32 0d | 01 36 1f 20 20 20 20 20 |264+192.|.6. |
|00000370| 62 6c 6f 63 6b 25 21 32 | 36 30 3d 62 6c 6f 63 6b |block%!2|60=block|
|00000380| 25 21 34 2b 31 36 0d 01 | 40 20 20 20 20 20 20 62 |%!4+16..|@ b|
|00000390| 6c 6f 63 6b 25 21 32 36 | 34 3d 62 6c 6f 63 6b 25 |lock%!26|4=block%|
|000003a0| 21 38 2b 31 39 32 0d 01 | 4a 1d 20 20 20 20 20 62 |!8+192..|J. b|
|000003b0| 6c 6f 63 6b 25 21 32 38 | 34 3d 62 6c 6f 63 6b 25 |lock%!28|4=block%|
|000003c0| 21 32 38 0d 01 54 29 20 | 20 20 20 20 c8 99 20 22 |!28..T) | .. "|
|000003d0| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|000003e0| 2c 2c 62 6c 6f 63 6b 25 | 2b 32 35 36 0d 01 5e 1c |,,block%|+256..^.|
|000003f0| 20 20 20 20 20 62 6c 6f | 63 6b 25 21 32 38 3d 73 | blo|ck%!28=s|
|00000400| 65 6c 6c 77 69 6e 68 25 | 0d 01 68 25 20 20 20 20 |ellwinh%|..h% |
|00000410| 20 c8 99 20 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 | .. "Wim|p_OpenWi|
|00000420| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 01 72 |ndow",,b|lock%..r|
|00000430| 09 20 20 20 20 7f 0d 01 | 7c 25 20 20 20 20 20 c8 |. ...||% .|
|00000440| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |. "Wimp_|OpenWind|
|00000450| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 01 86 08 20 |ow",,blo|ck%.... |
|00000460| 20 20 cb 0d 01 90 09 20 | 20 c9 20 33 0d 01 9a 24 | ..... | . 3...$|
|00000470| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 | .. "W|imp_Clos|
|00000480| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00000490| 0d 01 a4 14 20 20 20 6d | 61 69 6e 5f 66 69 6e 69 |.... m|ain_fini|
|000004a0| 73 68 3d b9 0d 01 ae 41 | 20 20 c9 20 36 20 20 3a |sh=....A| . 6 :|
|000004b0| f2 63 6c 69 63 6b 28 21 | 62 6c 6f 63 6b 25 2c 62 |.click(!|block%,b|
|000004c0| 6c 6f 63 6b 25 21 34 2c | 62 6c 6f 63 6b 25 21 38 |lock%!4,|block%!8|
|000004d0| 2c 62 6c 6f 63 6b 25 21 | 31 32 2c 62 6c 6f 63 6b |,block%!|12,block|
|000004e0| 25 21 31 36 29 0d 01 b8 | 3d 20 20 c9 20 37 20 20 |%!16)...|= . 7 |
|000004f0| 3a f2 62 6f 78 5f 64 72 | 61 67 67 65 64 28 21 62 |:.box_dr|agged(!b|
|00000500| 6c 6f 63 6b 25 2c 62 6c | 6f 63 6b 25 21 34 2c 62 |lock%,bl|ock%!4,b|
|00000510| 6c 6f 63 6b 25 21 38 2c | 62 6c 6f 63 6b 25 21 31 |lock%!8,|block%!1|
|00000520| 32 29 0d 01 c2 3d 20 20 | c9 20 38 20 20 3a f2 70 |2)...= |. 8 :.p|
|00000530| 72 6f 63 65 73 73 5f 6b | 65 79 28 21 62 6c 6f 63 |rocess_k|ey(!bloc|
|00000540| 6b 25 2c 62 6c 6f 63 6b | 25 21 34 2c 62 6c 6f 63 |k%,block|%!4,bloc|
|00000550| 6b 25 21 38 2c 62 6c 6f | 63 6b 25 21 32 34 29 0d |k%!8,blo|ck%!24).|
|00000560| 01 cc 1f 20 20 c9 20 39 | 20 20 3a f2 6d 65 6e 75 |... . 9| :.menu|
|00000570| 73 65 6c 65 63 74 28 62 | 6c 6f 63 6b 25 29 0d 01 |select(b|lock%)..|
|00000580| d6 7c 20 20 c9 20 31 31 | 20 3a e7 20 21 62 6c 6f |.| . 11| :. !blo|
|00000590| 63 6b 25 3c 3e 62 61 73 | 65 77 69 6e 68 25 20 80 |ck%<>bas|ewinh% .|
|000005a0| 20 21 62 6c 6f 63 6b 25 | 3c 3e 6d 61 69 6e 77 69 | !block%|<>mainwi|
|000005b0| 6e 68 25 20 80 20 21 62 | 6c 6f 63 6b 25 3c 3e 73 |nh% . !b|lock%<>s|
|000005c0| 65 74 77 69 6e 68 25 20 | 80 20 21 62 6c 6f 63 6b |etwinh% |. !block|
|000005d0| 25 3c 3e 73 65 6c 62 77 | 69 6e 68 25 20 80 20 21 |%<>selbw|inh% . !|
|000005e0| 62 6c 6f 63 6b 25 3c 3e | 73 70 72 73 77 69 6e 68 |block%<>|sprswinh|
|000005f0| 25 20 63 61 72 65 74 25 | 3d a3 0d 01 e0 50 20 20 |% caret%|=....P |
|00000600| c9 20 31 37 2c 31 38 20 | 3a f2 6d 65 73 73 61 67 |. 17,18 |:.messag|
|00000610| 65 28 21 62 6c 6f 63 6b | 25 2c 62 6c 6f 63 6b 25 |e(!block|%,block%|
|00000620| 21 34 2c 62 6c 6f 63 6b | 25 21 38 2c 62 6c 6f 63 |!4,block|%!8,bloc|
|00000630| 6b 25 21 31 32 2c 62 6c | 6f 63 6b 25 21 31 36 2c |k%!12,bl|ock%!16,|
|00000640| 62 6c 6f 63 6b 25 2b 32 | 30 29 0d 01 ea 06 20 cb |block%+2|0).... .|
|00000650| 0d 01 f4 11 fd 20 6d 61 | 69 6e 5f 66 69 6e 69 73 |..... ma|in_finis|
|00000660| 68 0d 01 fe 0e f2 63 6c | 6f 73 65 64 6f 77 6e 0d |h.....cl|osedown.|
|00000670| 02 08 05 e0 0d 02 12 04 | 0d 02 1c 3a f4 20 2a 2a |........|...:. **|
|00000680| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000690| 49 6e 69 74 69 61 6c 69 | 73 61 74 69 6f 6e 2a 2a |Initiali|sation**|
|000006a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000006b0| 2a 2a 0d 02 26 0b dd 20 | f2 69 6e 69 74 0d 02 30 |**..&.. |.init..0|
|000006c0| 2c ee 20 85 20 ee 20 85 | 20 87 3a f1 20 22 43 61 |,. . . .| .:. "Ca|
|000006d0| 6e 6e 6f 74 20 73 74 61 | 72 74 20 61 70 70 6c 69 |nnot sta|rt appli|
|000006e0| 63 61 74 69 6f 6e 22 3a | e0 0d 02 3a 15 6c 69 73 |cation":|...:.lis|
|000006f0| 74 61 72 65 61 6d 61 78 | 25 3d 34 30 39 36 0d 02 |tareamax|%=4096..|
|00000700| 44 10 6c 69 73 74 61 72 | 65 61 70 25 3d 30 0d 02 |D.listar|eap%=0..|
|00000710| 4e 12 73 63 72 61 70 62 | 6c 65 6e 25 3d 32 35 36 |N.scrapb|len%=256|
|00000720| 0d 02 58 0f 6f 75 74 6d | 61 78 25 3d 37 36 38 0d |..X.outm|ax%=768.|
|00000730| 02 62 14 69 6e 64 69 72 | 6d 64 73 69 7a 65 25 3d |.b.indir|mdsize%=|
|00000740| 32 35 36 0d 02 6c 14 6d | 65 6e 75 5f 62 73 69 7a |256..l.m|enu_bsiz|
|00000750| 65 25 3d 31 30 32 34 0d | 02 76 12 6c 69 73 74 5f |e%=1024.|.v.list_|
|00000760| 69 74 65 6d 70 25 3d 33 | 36 0d 02 80 16 6c 69 73 |itemp%=3|6....lis|
|00000770| 74 5f 69 74 65 6d 6d 61 | 78 25 3d 31 30 32 34 0d |t_itemma|x%=1024.|
|00000780| 02 8a 12 6c 69 73 74 5f | 69 74 65 6d 78 70 25 3d |...list_|itemxp%=|
|00000790| 30 0d 02 94 18 73 65 6c | 65 63 74 69 6f 6e 5f 63 |0....sel|ection_c|
|000007a0| 68 61 6e 67 65 64 25 3d | a3 0d 02 9e 14 62 61 63 |hanged%=|.....bac|
|000007b0| 6b 5f 73 65 6c 5f 67 72 | 65 79 25 3d a3 0d 02 a8 |k_sel_gr|ey%=....|
|000007c0| 14 73 70 72 5f 61 70 6c | 5f 74 72 61 6e 73 25 3d |.spr_apl|_trans%=|
|000007d0| a3 0d 02 b2 0c 63 61 72 | 65 74 25 3d a3 0d 02 bc |.....car|et%=....|
|000007e0| 15 73 70 72 69 74 65 73 | 65 6c 6e 61 6d 65 24 3d |.sprites|elname$=|
|000007f0| 22 22 0d 02 c6 17 66 69 | 6c 65 5f 74 72 61 6e 73 |""....fi|le_trans|
|00000800| 5f 6e 61 6d 65 24 3d 22 | 22 0d 02 d0 30 de 20 62 |_name$="|"...0. b|
|00000810| 6c 6f 63 6b 25 20 32 30 | 34 38 2c 6c 69 73 74 61 |lock% 20|48,lista|
|00000820| 72 65 61 25 20 34 30 39 | 36 2c 6c 69 73 74 5f 69 |rea% 409|6,list_i|
|00000830| 74 65 6d 25 20 31 30 32 | 34 0d 02 da 18 de 20 73 |tem% 102|4..... s|
|00000840| 63 72 61 70 62 25 20 73 | 63 72 61 70 62 6c 65 6e |crapb% s|crapblen|
|00000850| 25 0d 02 e4 34 de 20 6d | 65 6e 75 5f 62 75 66 66 |%...4. m|enu_buff|
|00000860| 25 20 6d 65 6e 75 5f 62 | 73 69 7a 65 25 2c 69 6e |% menu_b|size%,in|
|00000870| 6d 65 6e 75 64 61 74 25 | 20 69 6e 64 69 72 6d 64 |menudat%| indirmd|
|00000880| 73 69 7a 65 25 0d 02 ee | 12 de 20 6f 6c 64 63 61 |size%...|.. oldca|
|00000890| 72 65 74 25 20 32 34 0d | 02 f8 2c f2 6f 70 65 6e |ret% 24.|..,.open|
|000008a0| 5f 6d 65 73 73 61 67 65 | 28 22 3c 62 6f 6f 74 63 |_message|("<bootc|
|000008b0| 6f 6e 66 24 64 69 72 3e | 2e 4d 65 73 73 61 67 65 |onf$dir>|.Message|
|000008c0| 73 22 29 0d 03 02 17 f4 | 20 2a 2a 2a 76 61 72 69 |s").....| ***vari|
|000008d0| 61 62 6c 65 73 2a 2a 2a | 2a 2a 0d 03 0c 18 6d 61 |ables***|**....ma|
|000008e0| 73 6b 25 3d 25 31 30 30 | 30 30 30 30 31 31 30 30 |sk%=%100|00001100|
|000008f0| 30 31 0d 03 16 20 74 61 | 73 6b 6e 61 6d 65 24 3d |01... ta|skname$=|
|00000900| a4 67 65 74 5f 6d 73 67 | 28 22 54 61 73 6b 49 44 |.get_msg|("TaskID|
|00000910| 22 29 0d 03 20 4a c8 99 | 20 22 57 69 6d 70 5f 49 |").. J..| "Wimp_I|
|00000920| 6e 69 74 69 61 6c 69 73 | 65 22 2c 33 30 30 2c 26 |nitialis|e",300,&|
|00000930| 34 42 35 33 34 31 35 34 | 2c 74 61 73 6b 6e 61 6d |4B534154|,tasknam|
|00000940| 65 24 2c a4 6d 65 73 73 | 61 67 65 73 6f 6b 20 b8 |e$,.mess|agesok .|
|00000950| 20 2c 6d 79 5f 68 61 6e | 64 6c 65 25 0d 03 2a 2a | ,my_han|dle%..**|
|00000960| ee 20 85 20 f2 65 72 72 | 6f 72 28 a4 67 65 74 5f |. . .err|or(.get_|
|00000970| 6d 73 67 28 22 46 41 54 | 41 4c 45 52 52 22 29 2c |msg("FAT|ALERR"),|
|00000980| 9e 2c 9f 2c b9 29 0d 03 | 34 11 f2 6c 6f 61 64 5f |.,.,.)..|4..load_|
|00000990| 77 69 6e 64 6f 77 73 0d | 03 3e 14 f2 77 6d 65 73 |windows.|.>..wmes|
|000009a0| 73 5f 72 65 61 64 5f 6d | 6f 64 65 0d 03 48 0c f2 |s_read_m|ode..H..|
|000009b0| 64 72 61 67 5f 6f 6b 0d | 03 52 05 e1 0d 03 5c 04 |drag_ok.|.R....\.|
|000009c0| 0d 03 66 0e dd 20 a4 33 | 64 5f 6c 6f 6f 6b 0d 03 |..f.. .3|d_look..|
|000009d0| 70 0b ea 20 66 6c 61 67 | 25 0d 03 7a 17 c8 99 36 |p.. flag|%..z...6|
|000009e0| 2c 31 36 31 2c 31 34 30 | b8 2c 2c 66 6c 61 67 25 |,161,140|.,,flag%|
|000009f0| 0d 03 84 14 e7 20 66 6c | 61 67 25 20 80 20 31 3d |..... fl|ag% . 1=|
|00000a00| 31 20 3d b9 0d 03 8e 06 | 3d a3 0d 03 98 04 0d 03 |1 =.....|=.......|
|00000a10| a2 0e dd 20 f2 64 72 61 | 67 5f 6f 6b 0d 03 ac 0b |... .dra|g_ok....|
|00000a20| ea 20 66 6c 61 67 25 0d | 03 b6 32 c8 99 31 33 31 |. flag%.|..2..131|
|00000a30| 31 32 39 2c 2c 22 44 72 | 61 67 41 53 70 72 69 74 |129,,"Dr|agASprit|
|00000a40| 65 5f 53 74 61 72 74 22 | 20 b8 20 64 72 61 67 73 |e_Start"| . drags|
|00000a50| 74 25 20 3b 66 6c 61 67 | 25 0d 03 c0 19 e7 28 66 |t% ;flag|%.....(f|
|00000a60| 6c 61 67 25 80 31 29 20 | 64 72 61 67 73 74 25 3d |lag%.1) |dragst%=|
|00000a70| 2d 31 0d 03 ca 2f c8 99 | 31 33 31 31 32 39 2c 2c |-1.../..|131129,,|
|00000a80| 22 44 72 61 67 41 53 70 | 72 69 74 65 5f 53 74 6f |"DragASp|rite_Sto|
|00000a90| 70 22 b8 20 64 72 61 67 | 73 70 25 3b 66 6c 61 67 |p". drag|sp%;flag|
|00000aa0| 25 0d 03 d4 18 e7 28 66 | 6c 61 67 25 80 31 29 64 |%.....(f|lag%.1)d|
|00000ab0| 72 61 67 73 70 25 3d 2d | 31 0d 03 de 16 c8 99 36 |ragsp%=-|1......6|
|00000ac0| 2c 31 36 31 2c 32 38 b8 | 2c 2c 66 6c 61 67 25 0d |,161,28.|,,flag%.|
|00000ad0| 03 e8 26 e7 28 66 6c 61 | 67 25 80 32 29 3d 30 20 |..&.(fla|g%.2)=0 |
|00000ae0| 64 72 61 67 73 74 25 3d | 2d 31 3a 64 72 61 67 73 |dragst%=|-1:drags|
|00000af0| 70 25 3d 2d 31 0d 03 f2 | 05 e1 0d 03 fc 04 0d 04 |p%=-1...|........|
|00000b00| 06 40 f4 20 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.@. ****|********|
|00000b10| 2a 2a 2a 2a 2a 2a 2a 57 | 69 6d 70 20 52 65 73 70 |*******W|imp Resp|
|00000b20| 6f 6e 73 65 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |onse****|********|
|00000b30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0d 04 |********|******..|
|00000b40| 10 25 dd 20 f2 63 6c 69 | 63 6b 28 6d 78 25 2c 6d |.%. .cli|ck(mx%,m|
|00000b50| 79 25 2c 62 75 25 2c 77 | 68 61 6e 25 2c 69 68 61 |y%,bu%,w|han%,iha|
|00000b60| 6e 25 29 0d 04 1a 0c c8 | 8e 20 62 75 25 20 ca 0d |n%).....|. bu% ..|
|00000b70| 04 24 09 c9 20 31 2c 34 | 0d 04 2e 0f 20 c8 8e 20 |.$.. 1,4|.... .. |
|00000b80| 77 68 61 6e 25 20 ca 0d | 04 38 11 20 20 c9 20 6d |whan% ..|.8. . m|
|00000b90| 61 69 6e 77 69 6e 68 25 | 0d 04 42 10 20 20 c8 8e |ainwinh%|..B. ..|
|00000ba0| 20 69 68 61 6e 25 20 ca | 0d 04 4c 0a 20 20 20 c9 | ihan% .|..L. .|
|00000bb0| 20 34 0d 04 56 56 20 20 | 20 20 f2 63 72 65 61 74 | 4..VV | .creat|
|00000bc0| 65 5f 6d 65 6e 75 28 a4 | 64 69 72 5f 6d 65 6e 75 |e_menu(.|dir_menu|
|00000bd0| 28 22 20 42 6f 72 64 65 | 72 73 20 2c 44 65 66 61 |(" Borde|rs ,Defa|
|00000be0| 75 6c 74 22 2c 22 3c 42 | 6f 6f 74 24 44 69 72 3e |ult","<B|oot$Dir>|
|00000bf0| 2e 63 68 6f 69 63 65 73 | 2e 62 6f 72 64 65 72 73 |.choices|.borders|
|00000c00| 22 2c 26 66 66 39 29 29 | 0d 04 60 3d 20 20 20 20 |",&ff9))|..`= |
|00000c10| f2 67 65 74 5f 69 63 6f | 6e 73 63 6f 6f 72 64 73 |.get_ico|nscoords|
|00000c20| 28 6d 61 69 6e 77 69 6e | 68 25 2c 34 2c 69 6d 69 |(mainwin|h%,4,imi|
|00000c30| 78 25 2c 69 6d 69 79 25 | 2c 69 6d 61 78 25 2c 69 |x%,imiy%|,imax%,i|
|00000c40| 6d 61 79 25 29 0d 04 6a | 34 20 20 20 20 c8 99 20 |may%)..j|4 .. |
|00000c50| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00000c60| 22 2c 2c 6d 65 6e 75 5f | 62 75 66 66 25 2c 69 6d |",,menu_|buff%,im|
|00000c70| 61 78 25 2c 69 6d 61 79 | 25 0d 04 74 1b 20 20 20 |ax%,imay|%..t. |
|00000c80| 20 70 72 65 73 65 6e 74 | 6d 25 3d 6d 61 69 6e 77 | present|m%=mainw|
|00000c90| 69 6e 68 25 0d 04 7e 14 | 20 20 20 20 70 72 65 73 |inh%..~.| pres|
|00000ca0| 65 6e 74 6d 69 25 3d 34 | 0d 04 88 0a 20 20 20 c9 |entmi%=4|.... .|
|00000cb0| 20 35 0d 04 92 58 20 20 | 20 20 f2 63 72 65 61 74 | 5...X | .creat|
|00000cc0| 65 5f 6d 65 6e 75 28 a4 | 64 69 72 5f 6d 65 6e 75 |e_menu(.|dir_menu|
|00000cd0| 73 70 28 22 20 53 70 72 | 69 74 65 73 20 2c 44 65 |sp(" Spr|ites ,De|
|00000ce0| 66 61 75 6c 74 22 2c 22 | 3c 42 6f 6f 74 24 44 69 |fault","|<Boot$Di|
|00000cf0| 72 3e 2e 63 68 6f 69 63 | 65 73 2e 73 70 72 69 74 |r>.choic|es.sprit|
|00000d00| 65 73 22 2c 26 66 66 39 | 29 29 0d 04 9c 3d 20 20 |es",&ff9|))...= |
|00000d10| 20 20 f2 67 65 74 5f 69 | 63 6f 6e 73 63 6f 6f 72 | .get_i|conscoor|
|00000d20| 64 73 28 6d 61 69 6e 77 | 69 6e 68 25 2c 35 2c 69 |ds(mainw|inh%,5,i|
|00000d30| 6d 69 78 25 2c 69 6d 69 | 79 25 2c 69 6d 61 78 25 |mix%,imi|y%,imax%|
|00000d40| 2c 69 6d 61 79 25 29 0d | 04 a6 34 20 20 20 20 c8 |,imay%).|..4 .|
|00000d50| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 4d 65 |. "Wimp_|CreateMe|
|00000d60| 6e 75 22 2c 2c 6d 65 6e | 75 5f 62 75 66 66 25 2c |nu",,men|u_buff%,|
|00000d70| 69 6d 61 78 25 2c 69 6d | 61 79 25 0d 04 b0 1b 20 |imax%,im|ay%.... |
|00000d80| 20 20 20 70 72 65 73 65 | 6e 74 6d 25 3d 6d 61 69 | prese|ntm%=mai|
|00000d90| 6e 77 69 6e 68 25 0d 04 | ba 14 20 20 20 20 70 72 |nwinh%..|.. pr|
|00000da0| 65 73 65 6e 74 6d 69 25 | 3d 35 0d 04 c4 0a 20 20 |esentmi%|=5.... |
|00000db0| 20 c9 20 36 0d 04 ce 5a | 20 20 20 20 f2 63 72 65 | . 6...Z| .cre|
|00000dc0| 61 74 65 5f 6d 65 6e 75 | 28 a4 64 69 72 5f 6d 65 |ate_menu|(.dir_me|
|00000dd0| 6e 75 28 22 20 42 61 63 | 6b 67 72 6f 75 6e 64 73 |nu(" Bac|kgrounds|
|00000de0| 20 2c 4e 6f 6e 65 22 2c | 22 3c 42 6f 6f 74 24 44 | ,None",|"<Boot$D|
|00000df0| 69 72 3e 2e 63 68 6f 69 | 63 65 73 2e 62 61 63 6b |ir>.choi|ces.back|
|00000e00| 67 72 6f 75 6e 64 22 2c | 26 66 66 39 29 29 0d 04 |ground",|&ff9))..|
|00000e10| d8 3d 20 20 20 20 f2 67 | 65 74 5f 69 63 6f 6e 73 |.= .g|et_icons|
|00000e20| 63 6f 6f 72 64 73 28 6d | 61 69 6e 77 69 6e 68 25 |coords(m|ainwinh%|
|00000e30| 2c 36 2c 69 6d 69 78 25 | 2c 69 6d 69 79 25 2c 69 |,6,imix%|,imiy%,i|
|00000e40| 6d 61 78 25 2c 69 6d 61 | 79 25 29 0d 04 e2 34 20 |max%,ima|y%)...4 |
|00000e50| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 | .. "W|imp_Crea|
|00000e60| 74 65 4d 65 6e 75 22 2c | 2c 6d 65 6e 75 5f 62 75 |teMenu",|,menu_bu|
|00000e70| 66 66 25 2c 69 6d 61 78 | 25 2c 69 6d 61 79 25 0d |ff%,imax|%,imay%.|
|00000e80| 04 ec 1b 20 20 20 20 70 | 72 65 73 65 6e 74 6d 25 |... p|resentm%|
|00000e90| 3d 6d 61 69 6e 77 69 6e | 68 25 0d 04 f6 14 20 20 |=mainwin|h%.... |
|00000ea0| 20 20 70 72 65 73 65 6e | 74 6d 69 25 3d 36 0d 05 | presen|tmi%=6..|
|00000eb0| 00 1f 20 20 20 c9 20 31 | 32 3a f2 61 70 70 6c 79 |.. . 1|2:.apply|
|00000ec0| 5f 64 65 73 6b 74 6f 70 | 5f 6c 6f 6f 6b 0d 05 0a |_desktop|_look...|
|00000ed0| 5b 20 20 20 c9 20 31 35 | 3a f2 73 65 74 5f 69 63 |[ . 15|:.set_ic|
|00000ee0| 6f 6e 5f 73 74 61 74 65 | 28 6d 61 69 6e 77 69 6e |on_state|(mainwin|
|00000ef0| 68 25 2c 31 36 2c 28 ac | a4 67 65 74 5f 69 63 6f |h%,16,(.|.get_ico|
|00000f00| 6e 5f 73 74 61 74 65 28 | 6d 61 69 6e 77 69 6e 68 |n_state(|mainwinh|
|00000f10| 25 2c 31 35 29 80 28 31 | 3c 3c 32 31 29 29 3c 3c |%,15).(1|<<21))<<|
|00000f20| 31 2c 31 3c 3c 32 32 29 | 0d 05 14 18 20 20 20 c9 |1,1<<22)|.... .|
|00000f30| 20 31 36 3a f2 6f 70 65 | 6e 5f 73 65 6c 77 69 6e | 16:.ope|n_selwin|
|00000f40| 0d 05 1e 37 20 20 20 c9 | 20 31 37 3a f2 6f 70 65 |...7 .| 17:.ope|
|00000f50| 6e 5f 64 69 72 73 28 22 | 3c 42 6f 6f 74 24 44 69 |n_dirs("|<Boot$Di|
|00000f60| 72 3e 2e 63 68 6f 69 63 | 65 73 2e 62 6f 6f 74 2e |r>.choic|es.boot.|
|00000f70| 74 61 73 6b 73 22 29 0d | 05 28 39 20 20 20 c9 20 |tasks").|.(9 . |
|00000f80| 31 38 3a f2 6f 70 65 6e | 5f 64 69 72 73 28 22 3c |18:.open|_dirs("<|
|00000f90| 42 6f 6f 74 24 44 69 72 | 3e 2e 63 68 6f 69 63 65 |Boot$Dir|>.choice|
|00000fa0| 73 2e 62 6f 6f 74 2e 70 | 72 65 64 65 73 6b 22 29 |s.boot.p|redesk")|
|00000fb0| 0d 05 32 11 20 20 20 c9 | 20 32 33 2c 32 34 2c 32 |..2. .| 23,24,2|
|00000fc0| 35 0d 05 3c 1c 20 20 20 | 20 e7 20 ac 20 62 61 63 |5..<. | . . bac|
|00000fd0| 6b 5f 73 65 6c 5f 67 72 | 65 79 25 20 8c 0d 05 46 |k_sel_gr|ey% ...F|
|00000fe0| 3a 20 20 20 20 f2 73 65 | 74 5f 69 63 6f 6e 5f 73 |: .se|t_icon_s|
|00000ff0| 74 61 74 65 28 6d 61 69 | 6e 77 69 6e 68 25 2c 37 |tate(mai|nwinh%,7|
|00001000| 2c 94 28 69 68 61 6e 25 | 3d 32 33 29 3c 3c 32 31 |,.(ihan%|=23)<<21|
|00001010| 2c 31 3c 3c 32 31 29 0d | 05 50 3a 20 20 20 20 f2 |,1<<21).|.P: .|
|00001020| 73 65 74 5f 69 63 6f 6e | 5f 73 74 61 74 65 28 6d |set_icon|_state(m|
|00001030| 61 69 6e 77 69 6e 68 25 | 2c 38 2c 94 28 69 68 61 |ainwinh%|,8,.(iha|
|00001040| 6e 25 3d 32 34 29 3c 3c | 32 31 2c 31 3c 3c 32 31 |n%=24)<<|21,1<<21|
|00001050| 29 0d 05 5a 3a 20 20 20 | 20 f2 73 65 74 5f 69 63 |)..Z: | .set_ic|
|00001060| 6f 6e 5f 73 74 61 74 65 | 28 6d 61 69 6e 77 69 6e |on_state|(mainwin|
|00001070| 68 25 2c 39 2c 94 28 69 | 68 61 6e 25 3d 32 35 29 |h%,9,.(i|han%=25)|
|00001080| 3c 3c 32 31 2c 31 3c 3c | 32 31 29 0d 05 64 09 20 |<<21,1<<|21)..d. |
|00001090| 20 20 20 cd 0d 05 6e 0b | 20 20 20 c9 20 33 35 0d | ...n.| . 35.|
|000010a0| 05 78 3e 20 20 20 20 f2 | 67 65 74 5f 69 63 6f 6e |.x> .|get_icon|
|000010b0| 73 63 6f 6f 72 64 73 28 | 6d 61 69 6e 77 69 6e 68 |scoords(|mainwinh|
|000010c0| 25 2c 33 35 2c 69 6d 69 | 78 25 2c 69 6d 69 79 25 |%,35,imi|x%,imiy%|
|000010d0| 2c 69 6d 61 78 25 2c 69 | 6d 61 79 25 29 0d 05 82 |,imax%,i|may%)...|
|000010e0| 41 20 20 20 20 f2 63 68 | 61 6e 67 65 69 63 6f 6e |A .ch|angeicon|
|000010f0| 6e 61 6d 65 28 73 65 74 | 77 69 6e 68 25 2c 31 2c |name(set|winh%,1,|
|00001100| a4 67 65 74 5f 69 63 6f | 6e 5f 76 61 6c 75 65 28 |.get_ico|n_value(|
|00001110| 6d 61 69 6e 77 69 6e 68 | 25 2c 33 34 29 29 0d 05 |mainwinh|%,34))..|
|00001120| 8c 32 20 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 43 |.2 ..| "Wimp_C|
|00001130| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 73 65 74 77 |reateMen|u",,setw|
|00001140| 69 6e 68 25 2c 69 6d 61 | 78 25 2c 69 6d 61 79 25 |inh%,ima|x%,imay%|
|00001150| 0d 05 96 1b 20 20 20 20 | 70 72 65 73 65 6e 74 6d |.... |presentm|
|00001160| 25 3d 6d 61 69 6e 77 69 | 6e 68 25 0d 05 a0 15 20 |%=mainwi|nh%.... |
|00001170| 20 20 20 70 72 65 73 65 | 6e 74 6d 69 25 3d 33 35 | prese|ntmi%=35|
|00001180| 0d 05 aa 07 20 20 cb 0d | 05 b4 11 20 20 c9 20 62 |.... ..|... . b|
|00001190| 61 73 65 77 69 6e 68 25 | 0d 05 be 10 20 20 c8 8e |asewinh%|.... ..|
|000011a0| 20 69 68 61 6e 25 20 ca | 0d 05 c8 0a 20 20 20 c9 | ihan% .|.... .|
|000011b0| 20 30 0d 05 d2 3a 20 20 | 20 c8 99 22 58 4f 53 5f | 0...: | .."XOS_|
|000011c0| 52 65 61 64 56 61 72 56 | 61 6c 22 2c 22 48 65 6c |ReadVarV|al","Hel|
|000011d0| 70 24 44 69 72 22 2c 62 | 6c 6f 63 6b 25 2c 32 35 |p$Dir",b|lock%,25|
|000011e0| 36 2c 30 2c 33 20 b8 20 | 3b 6f 6b 25 0d 05 dc 18 |6,0,3 . |;ok%....|
|000011f0| 20 20 20 c8 99 20 22 48 | 6f 75 72 67 6c 61 73 73 | .. "H|ourglass|
|00001200| 5f 4f 6e 22 0d 05 e6 52 | 20 20 20 e7 20 6f 6b 25 |_On"...R| . ok%|
|00001210| 3d 37 20 8c 20 ff 28 22 | 46 69 6c 65 72 5f 52 75 |=7 . .("|Filer_Ru|
|00001220| 6e 20 52 65 73 6f 75 72 | 63 65 73 3a 24 2e 41 70 |n Resour|ces:$.Ap|
|00001230| 70 73 2e 21 48 65 6c 70 | 22 29 20 8b 20 c8 99 20 |ps.!Help|") . .. |
|00001240| 22 57 69 6d 70 5f 50 72 | 6f 63 65 73 73 4b 65 79 |"Wimp_Pr|ocessKey|
|00001250| 22 2c 26 31 38 31 0d 05 | f0 19 20 20 20 c8 99 20 |",&181..|.. .. |
|00001260| 22 48 6f 75 72 67 6c 61 | 73 73 5f 4f 66 66 22 0d |"Hourgla|ss_Off".|
|00001270| 05 fa 1b 20 20 20 c9 20 | 31 3a f2 64 65 66 61 75 |... . |1:.defau|
|00001280| 6c 74 5f 6f 70 74 69 6f | 6e 73 0d 06 04 42 20 20 |lt_optio|ns...B |
|00001290| 20 c9 20 32 3a e7 20 62 | 75 25 3d 34 20 6d 61 69 | . 2:. b|u%=4 mai|
|000012a0| 6e 5f 66 69 6e 69 73 68 | 3d b9 20 8b 20 f2 67 65 |n_finish|=. . .ge|
|000012b0| 74 5f 73 65 74 74 69 6e | 67 73 3a f2 63 61 6e 63 |t_settin|gs:.canc|
|000012c0| 65 6c 5f 73 65 6c 65 63 | 74 69 6f 6e 0d 06 0e 2d |el_selec|tion...-|
|000012d0| 20 20 20 c9 20 33 3a f2 | 73 65 74 5f 6f 70 74 69 | . 3:.|set_opti|
|000012e0| 6f 6e 73 3a e7 20 62 75 | 25 3d 34 20 6d 61 69 6e |ons:. bu|%=4 main|
|000012f0| 5f 66 69 6e 69 73 68 3d | b9 0d 06 18 07 20 20 cb |_finish=|..... .|
|00001300| 0d 06 22 11 20 20 c9 20 | 73 65 6c 62 77 69 6e 68 |..". . |selbwinh|
|00001310| 25 0d 06 2c 10 20 20 c8 | 8e 20 69 68 61 6e 25 20 |%..,. .|. ihan% |
|00001320| ca 0d 06 36 1c 20 20 20 | c9 20 30 3a f2 72 65 6d |...6. |. 0:.rem|
|00001330| 6f 76 65 5f 73 65 6c 65 | 63 74 69 6f 6e 0d 06 40 |ove_sele|ction..@|
|00001340| 1a 20 20 20 c9 20 31 3a | f2 64 6f 6e 65 5f 73 65 |. . 1:|.done_se|
|00001350| 6c 65 63 74 69 6f 6e 0d | 06 4a 1c 20 20 20 c9 20 |lection.|.J. . |
|00001360| 32 3a f2 63 61 6e 63 65 | 6c 5f 73 65 6c 65 63 74 |2:.cance|l_select|
|00001370| 69 6f 6e 0d 06 54 07 20 | 20 cb 0d 06 5e 11 20 20 |ion..T. | ...^. |
|00001380| c9 20 73 65 6c 6c 77 69 | 6e 68 25 0d 06 68 18 20 |. sellwi|nh%..h. |
|00001390| 20 20 f2 72 65 6d 6f 76 | 65 5f 73 65 6c 65 63 74 | .remov|e_select|
|000013a0| 69 6f 6e 0d 06 72 11 20 | 20 c9 20 73 70 72 73 77 |ion..r. | . sprsw|
|000013b0| 69 6e 68 25 0d 06 7c 10 | 20 20 c8 8e 20 69 68 61 |inh%..|.| .. iha|
|000013c0| 6e 25 20 ca 0d 06 86 1d | 20 20 20 c9 20 36 3a f2 |n% .....| . 6:.|
|000013d0| 72 65 6d 6f 76 65 5f 61 | 64 64 73 70 72 69 74 65 |remove_a|ddsprite|
|000013e0| 73 0d 06 90 20 20 20 20 | c9 20 37 3a f2 6c 6f 61 |s... |. 7:.loa|
|000013f0| 64 5f 61 64 64 65 64 73 | 70 72 69 74 65 28 2d 31 |d_addeds|prite(-1|
|00001400| 29 0d 06 9a 07 20 20 cb | 0d 06 a4 10 20 20 c9 20 |).... .|.... . |
|00001410| 73 65 74 77 69 6e 68 25 | 0d 06 ae 10 20 20 c8 8e |setwinh%|.... ..|
|00001420| 20 69 68 61 6e 25 20 ca | 0d 06 b8 09 20 20 c9 20 | ihan% .|.... . |
|00001430| 30 0d 06 c2 1f 20 20 20 | c8 99 20 22 57 69 6d 70 |0.... |.. "Wimp|
|00001440| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 2d 31 |_CreateM|enu",,-1|
|00001450| 0d 06 cc b4 20 20 20 e7 | 20 a4 63 68 65 63 6b 5f |.... .| .check_|
|00001460| 66 6f 72 5f 64 69 72 65 | 63 74 6f 72 79 28 a4 67 |for_dire|ctory(.g|
|00001470| 65 74 5f 69 63 6f 6e 5f | 76 61 6c 75 65 28 73 65 |et_icon_|value(se|
|00001480| 74 77 69 6e 68 25 2c 31 | 29 29 3a f2 63 68 61 6e |twinh%,1|)):.chan|
|00001490| 67 65 69 63 6f 6e 6e 61 | 6d 65 28 6d 61 69 6e 77 |geiconna|me(mainw|
|000014a0| 69 6e 68 25 2c 33 34 2c | a4 63 6f 6e 76 65 72 74 |inh%,34,|.convert|
|000014b0| 5f 70 61 74 68 5f 74 6f | 5f 63 61 6e 6f 6e 69 63 |_path_to|_canonic|
|000014c0| 61 6c 28 a4 67 65 74 5f | 69 63 6f 6e 5f 76 61 6c |al(.get_|icon_val|
|000014d0| 75 65 28 73 65 74 77 69 | 6e 68 25 2c 31 29 29 29 |ue(setwi|nh%,1)))|
|000014e0| 20 8b 20 f2 65 72 72 6f | 72 28 a4 67 65 74 5f 6d | . .erro|r(.get_m|
|000014f0| 73 67 28 22 42 41 44 50 | 41 54 48 22 29 2c 30 2c |sg("BADP|ATH"),0,|
|00001500| 30 2c 30 29 0d 06 d6 23 | 20 20 20 c9 20 33 3a c8 |0,0)...#| . 3:.|
|00001510| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 4d 65 |. "Wimp_|CreateMe|
|00001520| 6e 75 22 2c 2c 2d 31 0d | 06 e0 06 20 cb 0d 06 ea |nu",,-1.|... ....|
|00001530| 06 20 cb 0d 06 f4 08 20 | c9 20 32 0d 06 fe 0f 20 |. ..... |. 2.... |
|00001540| c8 8e 20 77 68 61 6e 25 | 20 ca 0d 07 08 11 20 20 |.. whan%| ..... |
|00001550| c9 20 6d 61 69 6e 77 69 | 6e 68 25 0d 07 12 11 20 |. mainwi|nh%.... |
|00001560| 20 20 c8 8e 20 69 68 61 | 6e 25 20 ca 0d 07 1c 0d | .. iha|n% .....|
|00001570| 20 20 20 c9 20 34 2c 31 | 39 0d 07 26 56 20 20 20 | . 4,1|9..&V |
|00001580| 20 f2 63 72 65 61 74 65 | 5f 6d 65 6e 75 28 a4 64 | .create|_menu(.d|
|00001590| 69 72 5f 6d 65 6e 75 28 | 22 20 42 6f 72 64 65 72 |ir_menu(|" Border|
|000015a0| 73 20 2c 44 65 66 61 75 | 6c 74 22 2c 22 3c 42 6f |s ,Defau|lt","<Bo|
|000015b0| 6f 74 24 44 69 72 3e 2e | 63 68 6f 69 63 65 73 2e |ot$Dir>.|choices.|
|000015c0| 62 6f 72 64 65 72 73 22 | 2c 26 66 66 39 29 29 0d |borders"|,&ff9)).|
|000015d0| 07 30 3d 20 20 20 20 f2 | 67 65 74 5f 69 63 6f 6e |.0= .|get_icon|
|000015e0| 73 63 6f 6f 72 64 73 28 | 6d 61 69 6e 77 69 6e 68 |scoords(|mainwinh|
|000015f0| 25 2c 34 2c 69 6d 69 78 | 25 2c 69 6d 69 79 25 2c |%,4,imix|%,imiy%,|
|00001600| 69 6d 61 78 25 2c 69 6d | 61 79 25 29 0d 07 3a 6c |imax%,im|ay%)..:l|
|00001610| 20 20 20 20 e7 20 69 68 | 61 6e 25 3d 34 20 c8 99 | . ih|an%=4 ..|
|00001620| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00001630| 75 22 2c 2c 6d 65 6e 75 | 5f 62 75 66 66 25 2c 69 |u",,menu|_buff%,i|
|00001640| 6d 61 78 25 2c 69 6d 61 | 79 25 20 8b 20 c8 99 20 |max%,ima|y% . .. |
|00001650| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00001660| 22 2c 2c 6d 65 6e 75 5f | 62 75 66 66 25 2c 6d 78 |",,menu_|buff%,mx|
|00001670| 25 2d 36 34 2c 6d 79 25 | 0d 07 44 1b 20 20 20 20 |%-64,my%|..D. |
|00001680| 70 72 65 73 65 6e 74 6d | 25 3d 6d 61 69 6e 77 69 |presentm|%=mainwi|
|00001690| 6e 68 25 0d 07 4e 14 20 | 20 20 20 70 72 65 73 65 |nh%..N. | prese|
|000016a0| 6e 74 6d 69 25 3d 34 0d | 07 58 0d 20 20 20 c9 20 |ntmi%=4.|.X. . |
|000016b0| 35 2c 32 30 0d 07 62 56 | 20 20 20 20 f2 63 72 65 |5,20..bV| .cre|
|000016c0| 61 74 65 5f 6d 65 6e 75 | 28 a4 64 69 72 5f 6d 65 |ate_menu|(.dir_me|
|000016d0| 6e 75 28 22 20 53 70 72 | 69 74 65 73 20 2c 44 65 |nu(" Spr|ites ,De|
|000016e0| 66 61 75 6c 74 22 2c 22 | 3c 42 6f 6f 74 24 44 69 |fault","|<Boot$Di|
|000016f0| 72 3e 2e 63 68 6f 69 63 | 65 73 2e 73 70 72 69 74 |r>.choic|es.sprit|
|00001700| 65 73 22 2c 26 66 66 39 | 29 29 0d 07 6c 3d 20 20 |es",&ff9|))..l= |
|00001710| 20 20 f2 67 65 74 5f 69 | 63 6f 6e 73 63 6f 6f 72 | .get_i|conscoor|
|00001720| 64 73 28 6d 61 69 6e 77 | 69 6e 68 25 2c 35 2c 69 |ds(mainw|inh%,5,i|
|00001730| 6d 69 78 25 2c 69 6d 69 | 79 25 2c 69 6d 61 78 25 |mix%,imi|y%,imax%|
|00001740| 2c 69 6d 61 79 25 29 0d | 07 76 6c 20 20 20 20 e7 |,imay%).|.vl .|
|00001750| 20 69 68 61 6e 25 3d 35 | 20 c8 99 20 22 57 69 6d | ihan%=5| .. "Wim|
|00001760| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 6d |p_Create|Menu",,m|
|00001770| 65 6e 75 5f 62 75 66 66 | 25 2c 69 6d 61 78 25 2c |enu_buff|%,imax%,|
|00001780| 69 6d 61 79 25 20 8b 20 | c8 99 20 22 57 69 6d 70 |imay% . |.. "Wimp|
|00001790| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 6d 65 |_CreateM|enu",,me|
|000017a0| 6e 75 5f 62 75 66 66 25 | 2c 6d 78 25 2d 36 34 2c |nu_buff%|,mx%-64,|
|000017b0| 6d 79 25 0d 07 80 1b 20 | 20 20 20 70 72 65 73 65 |my%.... | prese|
|000017c0| 6e 74 6d 25 3d 6d 61 69 | 6e 77 69 6e 68 25 0d 07 |ntm%=mai|nwinh%..|
|000017d0| 8a 14 20 20 20 20 70 72 | 65 73 65 6e 74 6d 69 25 |.. pr|esentmi%|
|000017e0| 3d 35 0d 07 94 0d 20 20 | 20 c9 20 36 2c 32 31 0d |=5.... | . 6,21.|
|000017f0| 07 9e 5a 20 20 20 20 f2 | 63 72 65 61 74 65 5f 6d |..Z .|create_m|
|00001800| 65 6e 75 28 a4 64 69 72 | 5f 6d 65 6e 75 28 22 20 |enu(.dir|_menu(" |
|00001810| 42 61 63 6b 67 72 6f 75 | 6e 64 73 20 2c 4e 6f 6e |Backgrou|nds ,Non|
|00001820| 65 22 2c 22 3c 42 6f 6f | 74 24 44 69 72 3e 2e 63 |e","<Boo|t$Dir>.c|
|00001830| 68 6f 69 63 65 73 2e 62 | 61 63 6b 67 72 6f 75 6e |hoices.b|ackgroun|
|00001840| 64 22 2c 26 66 66 39 29 | 29 0d 07 a8 3d 20 20 20 |d",&ff9)|)...= |
|00001850| 20 f2 67 65 74 5f 69 63 | 6f 6e 73 63 6f 6f 72 64 | .get_ic|onscoord|
|00001860| 73 28 6d 61 69 6e 77 69 | 6e 68 25 2c 36 2c 69 6d |s(mainwi|nh%,6,im|
|00001870| 69 78 25 2c 69 6d 69 79 | 25 2c 69 6d 61 78 25 2c |ix%,imiy|%,imax%,|
|00001880| 69 6d 61 79 25 29 0d 07 | b2 6c 20 20 20 20 e7 20 |imay%)..|.l . |
|00001890| 69 68 61 6e 25 3d 36 20 | c8 99 20 22 57 69 6d 70 |ihan%=6 |.. "Wimp|
|000018a0| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 6d 65 |_CreateM|enu",,me|
|000018b0| 6e 75 5f 62 75 66 66 25 | 2c 69 6d 61 78 25 2c 69 |nu_buff%|,imax%,i|
|000018c0| 6d 61 79 25 20 8b 20 c8 | 99 20 22 57 69 6d 70 5f |may% . .|. "Wimp_|
|000018d0| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 6d 65 6e |CreateMe|nu",,men|
|000018e0| 75 5f 62 75 66 66 25 2c | 6d 78 25 2d 36 34 2c 6d |u_buff%,|mx%-64,m|
|000018f0| 79 25 0d 07 bc 1b 20 20 | 20 20 70 72 65 73 65 6e |y%.... | presen|
|00001900| 74 6d 25 3d 6d 61 69 6e | 77 69 6e 68 25 0d 07 c6 |tm%=main|winh%...|
|00001910| 14 20 20 20 20 70 72 65 | 73 65 6e 74 6d 69 25 3d |. pre|sentmi%=|
|00001920| 36 0d 07 d0 0e 20 20 20 | c9 20 33 34 2c 33 35 0d |6.... |. 34,35.|
|00001930| 07 da 3e 20 20 20 20 f2 | 67 65 74 5f 69 63 6f 6e |..> .|get_icon|
|00001940| 73 63 6f 6f 72 64 73 28 | 6d 61 69 6e 77 69 6e 68 |scoords(|mainwinh|
|00001950| 25 2c 33 35 2c 69 6d 69 | 78 25 2c 69 6d 69 79 25 |%,35,imi|x%,imiy%|
|00001960| 2c 69 6d 61 78 25 2c 69 | 6d 61 79 25 29 0d 07 e4 |,imax%,i|may%)...|
|00001970| 41 20 20 20 20 f2 63 68 | 61 6e 67 65 69 63 6f 6e |A .ch|angeicon|
|00001980| 6e 61 6d 65 28 73 65 74 | 77 69 6e 68 25 2c 31 2c |name(set|winh%,1,|
|00001990| a4 67 65 74 5f 69 63 6f | 6e 5f 76 61 6c 75 65 28 |.get_ico|n_value(|
|000019a0| 6d 61 69 6e 77 69 6e 68 | 25 2c 33 34 29 29 0d 07 |mainwinh|%,34))..|
|000019b0| ee 69 20 20 20 20 e7 20 | 69 68 61 6e 25 3d 33 35 |.i . |ihan%=35|
|000019c0| 20 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 | .. "Wim|p_Create|
|000019d0| 4d 65 6e 75 22 2c 2c 73 | 65 74 77 69 6e 68 25 2c |Menu",,s|etwinh%,|
|000019e0| 69 6d 61 78 25 2c 69 6d | 61 79 25 20 8b 20 c8 99 |imax%,im|ay% . ..|
|000019f0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00001a00| 75 22 2c 2c 73 65 74 77 | 69 6e 68 25 2c 6d 78 25 |u",,setw|inh%,mx%|
|00001a10| 2d 36 34 2c 6d 79 25 0d | 07 f8 1b 20 20 20 20 70 |-64,my%.|... p|
|00001a20| 72 65 73 65 6e 74 6d 25 | 3d 6d 61 69 6e 77 69 6e |resentm%|=mainwin|
|00001a30| 68 25 0d 08 02 15 20 20 | 20 20 70 72 65 73 65 6e |h%.... | presen|
|00001a40| 74 6d 69 25 3d 33 35 0d | 08 0c 08 20 20 20 cb 0d |tmi%=35.|... ..|
|00001a50| 08 16 07 20 20 cb 0d 08 | 20 55 20 c9 20 36 34 3a |... ...| U . 64:|
|00001a60| e7 20 77 68 61 6e 25 3d | 73 65 74 77 69 6e 68 25 |. whan%=|setwinh%|
|00001a70| 20 80 20 69 68 61 6e 25 | 3d 32 3a f2 64 72 61 67 | . ihan%|=2:.drag|
|00001a80| 5f 62 6f 78 28 77 68 61 | 6e 25 2c 69 68 61 6e 25 |_box(wha|n%,ihan%|
|00001a90| 2c b9 2c 22 64 69 72 65 | 63 74 6f 72 79 22 29 3a |,.,"dire|ctory"):|
|00001aa0| 64 72 61 67 74 79 70 65 | 25 3d 30 0d 08 2a 05 cb |dragtype|%=0..*..|
|00001ab0| 0d 08 34 05 e1 0d 08 3e | 04 0d 08 48 2b dd 20 f2 |..4....>|...H+. .|
|00001ac0| 62 6f 78 5f 64 72 61 67 | 67 65 64 28 6d 69 6e 78 |box_drag|ged(minx|
|00001ad0| 25 2c 6d 69 6e 79 25 2c | 6d 61 78 78 25 2c 6d 61 |%,miny%,|maxx%,ma|
|00001ae0| 78 79 25 29 0d 08 52 13 | ea 20 77 68 61 6e 25 2c |xy%)..R.|. whan%,|
|00001af0| 68 61 6e 64 6c 65 25 0d | 08 5c 34 e7 20 64 72 61 |handle%.|.\4. dra|
|00001b00| 67 73 70 72 69 74 65 25 | 20 c8 99 20 64 72 61 67 |gsprite%| .. drag|
|00001b10| 73 70 25 20 8b 20 c8 99 | 20 22 57 69 6d 70 5f 44 |sp% . ..| "Wimp_D|
|00001b20| 72 61 67 42 6f 78 22 2c | 2c 2d 31 0d 08 66 24 c8 |ragBox",|,-1..f$.|
|00001b30| 99 20 22 57 69 6d 70 5f | 47 65 74 50 6f 69 6e 74 |. "Wimp_|GetPoint|
|00001b40| 65 72 49 6e 66 6f 22 2c | 2c 62 6c 6f 63 6b 25 0d |erInfo",|,block%.|
|00001b50| 08 70 12 c8 8e 20 64 72 | 61 67 74 79 70 65 25 20 |.p... dr|agtype% |
|00001b60| ca 0d 08 7a 07 c9 20 30 | 0d 08 84 45 20 f2 64 72 |...z.. 0|...E .dr|
|00001b70| 61 67 65 64 5f 73 61 76 | 65 62 6f 78 28 62 6c 6f |aged_sav|ebox(blo|
|00001b80| 63 6b 25 21 31 32 2c 62 | 6c 6f 63 6b 25 21 31 36 |ck%!12,b|lock%!16|
|00001b90| 2c 21 62 6c 6f 63 6b 25 | 2c 62 6c 6f 63 6b 25 21 |,!block%|,block%!|
|00001ba0| 34 2c 30 2c 30 2c 22 6e | 75 6c 6c 22 29 0d 08 8e |4,0,0,"n|ull")...|
|00001bb0| 05 cb 0d 08 98 05 e1 0d | 08 a2 04 0d 08 ac 2a dd |........|......*.|
|00001bc0| 20 f2 70 72 6f 63 65 73 | 73 5f 6b 65 79 28 77 68 | .proces|s_key(wh|
|00001bd0| 61 6e 25 2c 69 68 61 6e | 25 2c 78 6f 66 66 25 2c |an%,ihan|%,xoff%,|
|00001be0| 6b 65 79 25 29 0d 08 b6 | 0c ea 20 66 6e 61 6d 65 |key%)...|.. fname|
|00001bf0| 24 0d 08 c0 65 e7 20 6b | 65 79 25 3d 26 44 20 80 |$...e. k|ey%=&D .|
|00001c00| 20 77 68 61 6e 25 3d 62 | 61 73 65 77 69 6e 68 25 | whan%=b|asewinh%|
|00001c10| 20 f2 73 65 74 5f 69 63 | 6f 6e 5f 73 74 61 74 65 | .set_ic|on_state|
|00001c20| 28 62 61 73 65 77 69 6e | 68 25 2c 33 2c 31 3c 3c |(basewin|h%,3,1<<|
|00001c30| 32 31 2c 31 3c 3c 32 31 | 29 3a f2 73 65 74 5f 6f |21,1<<21|):.set_o|
|00001c40| 70 74 69 6f 6e 73 3a 6d | 61 69 6e 5f 66 69 6e 69 |ptions:m|ain_fini|
|00001c50| 73 68 3d b9 3a e1 0d 08 | ca 21 e7 20 6b 65 79 25 |sh=.:...|.!. key%|
|00001c60| 3d 26 44 20 80 20 77 68 | 61 6e 25 3d 6d 61 69 6e |=&D . wh|an%=main|
|00001c70| 77 69 6e 68 25 20 8c 0d | 08 d4 de 20 e7 20 a4 63 |winh% ..|... . .c|
|00001c80| 68 65 63 6b 5f 66 6f 72 | 5f 64 69 72 65 63 74 6f |heck_for|_directo|
|00001c90| 72 79 28 a4 67 65 74 5f | 69 63 6f 6e 5f 76 61 6c |ry(.get_|icon_val|
|00001ca0| 75 65 28 6d 61 69 6e 77 | 69 6e 68 25 2c 33 34 29 |ue(mainw|inh%,34)|
|00001cb0| 29 20 f2 63 68 61 6e 67 | 65 69 63 6f 6e 6e 61 6d |) .chang|eiconnam|
|00001cc0| 65 28 6d 61 69 6e 77 69 | 6e 68 25 2c 33 34 2c a4 |e(mainwi|nh%,34,.|
|00001cd0| 63 6f 6e 76 65 72 74 5f | 70 61 74 68 5f 74 6f 5f |convert_|path_to_|
|00001ce0| 63 61 6e 6f 6e 69 63 61 | 6c 28 a4 67 65 74 5f 69 |canonica|l(.get_i|
|00001cf0| 63 6f 6e 5f 76 61 6c 75 | 65 28 6d 61 69 6e 77 69 |con_valu|e(mainwi|
|00001d00| 6e 68 25 2c 33 34 29 29 | 29 3a c8 99 20 22 57 69 |nh%,34))|):.. "Wi|
|00001d10| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|00001d20| 69 6f 6e 22 2c 62 61 73 | 65 77 69 6e 68 25 2c 2d |ion",bas|ewinh%,-|
|00001d30| 31 20 8b 20 f2 65 72 72 | 6f 72 28 a4 67 65 74 5f |1 . .err|or(.get_|
|00001d40| 6d 73 67 28 22 42 41 44 | 50 41 54 48 22 29 2c 30 |msg("BAD|PATH"),0|
|00001d50| 2c 30 2c 30 29 0d 08 de | 05 cd 0d 08 e8 5a e7 20 |,0,0)...|.....Z. |
|00001d60| 6b 65 79 25 3d 26 44 20 | 80 20 77 68 61 6e 25 3d |key%=&D |. whan%=|
|00001d70| 73 65 6c 62 77 69 6e 68 | 25 20 f2 73 65 74 5f 69 |selbwinh|% .set_i|
|00001d80| 63 6f 6e 5f 73 74 61 74 | 65 28 73 65 6c 62 77 69 |con_stat|e(selbwi|
|00001d90| 6e 68 25 2c 31 2c 31 3c | 3c 32 31 2c 31 3c 3c 32 |nh%,1,1<|<21,1<<2|
|00001da0| 31 29 3a f2 64 6f 6e 65 | 5f 73 65 6c 65 63 74 69 |1):.done|_selecti|
|00001db0| 6f 6e 3a e1 0d 08 f2 20 | e7 20 6b 65 79 25 3d 26 |on:.... |. key%=&|
|00001dc0| 44 20 80 20 77 68 61 6e | 25 3d 73 65 74 77 69 6e |D . whan|%=setwin|
|00001dd0| 68 25 20 8c 0d 08 fc 1d | 20 c8 99 20 22 57 69 6d |h% .....| .. "Wim|
|00001de0| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 2d |p_Create|Menu",,-|
|00001df0| 31 0d 09 06 b2 20 e7 20 | a4 63 68 65 63 6b 5f 66 |1.... . |.check_f|
|00001e00| 6f 72 5f 64 69 72 65 63 | 74 6f 72 79 28 a4 67 65 |or_direc|tory(.ge|
|00001e10| 74 5f 69 63 6f 6e 5f 76 | 61 6c 75 65 28 73 65 74 |t_icon_v|alue(set|
|00001e20| 77 69 6e 68 25 2c 31 29 | 29 3a f2 63 68 61 6e 67 |winh%,1)|):.chang|
|00001e30| 65 69 63 6f 6e 6e 61 6d | 65 28 6d 61 69 6e 77 69 |eiconnam|e(mainwi|
|00001e40| 6e 68 25 2c 33 34 2c a4 | 63 6f 6e 76 65 72 74 5f |nh%,34,.|convert_|
|00001e50| 70 61 74 68 5f 74 6f 5f | 63 61 6e 6f 6e 69 63 61 |path_to_|canonica|
|00001e60| 6c 28 a4 67 65 74 5f 69 | 63 6f 6e 5f 76 61 6c 75 |l(.get_i|con_valu|
|00001e70| 65 28 73 65 74 77 69 6e | 68 25 2c 31 29 29 29 20 |e(setwin|h%,1))) |
|00001e80| 8b 20 f2 65 72 72 6f 72 | 28 a4 67 65 74 5f 6d 73 |. .error|(.get_ms|
|00001e90| 67 28 22 42 41 44 50 41 | 54 48 22 29 2c 30 2c 30 |g("BADPA|TH"),0,0|
|00001ea0| 2c 30 29 0d 09 10 05 cd | 0d 09 1a 5d e7 20 6b 65 |,0).....|...]. ke|
|00001eb0| 79 25 3d 26 31 62 20 80 | 20 77 68 61 6e 25 3d 73 |y%=&1b .| whan%=s|
|00001ec0| 65 6c 62 77 69 6e 68 25 | 20 f2 73 65 74 5f 69 63 |elbwinh%| .set_ic|
|00001ed0| 6f 6e 5f 73 74 61 74 65 | 28 73 65 6c 62 77 69 6e |on_state|(selbwin|
|00001ee0| 68 25 2c 32 2c 31 3c 3c | 32 31 2c 31 3c 3c 32 31 |h%,2,1<<|21,1<<21|
|00001ef0| 29 3a f2 63 61 6e 63 65 | 6c 5f 73 65 6c 65 63 74 |):.cance|l_select|
|00001f00| 69 6f 6e 3a e1 0d 09 24 | 5c e7 20 6b 65 79 25 3d |ion:...$|\. key%=|
|00001f10| 26 44 20 80 20 77 68 61 | 6e 25 3d 73 70 72 73 77 |&D . wha|n%=sprsw|
|00001f20| 69 6e 68 25 20 f2 73 65 | 74 5f 69 63 6f 6e 5f 73 |inh% .se|t_icon_s|
|00001f30| 74 61 74 65 28 73 70 72 | 73 77 69 6e 68 25 2c 37 |tate(spr|swinh%,7|
|00001f40| 2c 31 3c 3c 32 31 2c 31 | 3c 3c 32 31 29 3a f2 6c |,1<<21,1|<<21):.l|
|00001f50| 6f 61 64 5f 61 64 64 65 | 64 73 70 72 69 74 65 3a |oad_adde|dsprite:|
|00001f60| e1 0d 09 2e 5e e7 20 6b | 65 79 25 3d 26 31 62 20 |....^. k|ey%=&1b |
|00001f70| 80 20 77 68 61 6e 25 3d | 73 70 72 73 77 69 6e 68 |. whan%=|sprswinh|
|00001f80| 25 20 f2 73 65 74 5f 69 | 63 6f 6e 5f 73 74 61 74 |% .set_i|con_stat|
|00001f90| 65 28 73 70 72 73 77 69 | 6e 68 25 2c 36 2c 31 3c |e(sprswi|nh%,6,1<|
|00001fa0| 3c 32 31 2c 31 3c 3c 32 | 31 29 3a f2 72 65 6d 6f |<21,1<<2|1):.remo|
|00001fb0| 76 65 5f 61 64 64 73 70 | 72 69 74 65 73 3a e1 0d |ve_addsp|rites:..|
|00001fc0| 09 38 11 e7 20 6b 65 79 | 25 3d 26 31 38 31 20 8c |.8.. key|%=&181 .|
|00001fd0| 0d 09 42 16 20 c8 99 20 | 22 48 6f 75 72 67 6c 61 |..B. .. |"Hourgla|
|00001fe0| 73 73 5f 4f 6e 22 0d 09 | 4c 44 20 ff 22 49 66 20 |ss_On"..|LD ."If |
|00001ff0| 22 22 3c 48 65 6c 70 24 | 44 69 72 3e 22 22 3d 22 |""<Help$|Dir>""="|
|00002000| 22 22 22 20 54 68 65 6e | 20 46 69 6c 65 72 5f 52 |""" Then| Filer_R|
|00002010| 75 6e 20 52 65 73 6f 75 | 72 63 65 73 3a 24 2e 41 |un Resou|rces:$.A|
|00002020| 70 70 73 2e 21 48 65 6c | 70 22 0d 09 56 17 20 c8 |pps.!Hel|p"..V. .|
|00002030| 99 20 22 48 6f 75 72 67 | 6c 61 73 73 5f 4f 66 66 |. "Hourg|lass_Off|
|00002040| 22 0d 09 60 05 cd 0d 09 | 6a 1d c8 99 20 22 57 69 |"..`....|j... "Wi|
|00002050| 6d 70 5f 50 72 6f 63 65 | 73 73 4b 65 79 22 2c 6b |mp_Proce|ssKey",k|
|00002060| 65 79 25 0d 09 74 05 e1 | 0d 09 7e 04 0d 09 88 19 |ey%..t..|..~.....|
|00002070| dd 20 f2 6d 65 6e 75 73 | 65 6c 65 63 74 28 62 6c |. .menus|elect(bl|
|00002080| 6f 63 6b 25 29 0d 09 92 | 1f ea 20 6d 61 69 6e 77 |ock%)...|.. mainw|
|00002090| 69 6e 25 2c 6d 77 69 6e | 6e 75 6d 25 2c 73 74 72 |in%,mwin|num%,str|
|000020a0| 69 6e 67 24 0d 09 9c 1b | e7 20 70 72 65 73 65 6e |ing$....|. presen|
|000020b0| 74 6d 25 3d 6d 61 69 6e | 77 69 6e 68 25 20 8c 0d |tm%=main|winh% ..|
|000020c0| 09 a6 36 c8 99 20 22 57 | 69 6d 70 5f 44 65 63 6f |..6.. "W|imp_Deco|
|000020d0| 64 65 4d 65 6e 75 22 2c | 2c 6d 65 6e 75 5f 62 75 |deMenu",|,menu_bu|
|000020e0| 66 66 25 2c 62 6c 6f 63 | 6b 25 2c 62 6c 6f 63 6b |ff%,bloc|k%,block|
|000020f0| 25 2b 32 35 36 0d 09 b0 | 13 c8 8e 20 70 72 65 73 |%+256...|... pres|
|00002100| 65 6e 74 6d 69 25 20 ca | 0d 09 ba 08 20 c9 20 34 |entmi% .|.... . 4|
|00002110| 0d 09 c4 31 20 20 f2 63 | 68 61 6e 67 65 69 63 6f |...1 .c|hangeico|
|00002120| 6e 6e 61 6d 65 28 6d 61 | 69 6e 77 69 6e 68 25 2c |nname(ma|inwinh%,|
|00002130| 31 39 2c 24 28 62 6c 6f | 63 6b 25 2b 32 35 36 29 |19,$(blo|ck%+256)|
|00002140| 29 0d 09 ce 08 20 c9 20 | 35 0d 09 d8 31 20 20 f2 |).... . |5...1 .|
|00002150| 63 68 61 6e 67 65 69 63 | 6f 6e 6e 61 6d 65 28 6d |changeic|onname(m|
|00002160| 61 69 6e 77 69 6e 68 25 | 2c 32 30 2c 24 28 62 6c |ainwinh%|,20,$(bl|
|00002170| 6f 63 6b 25 2b 32 35 36 | 29 29 0d 09 e2 08 20 c9 |ock%+256|)).... .|
|00002180| 20 36 0d 09 ec 1b 20 20 | 73 74 72 69 6e 67 24 3d | 6.... |string$=|
|00002190| 24 28 62 6c 6f 63 6b 25 | 2b 32 35 36 29 0d 09 f6 |$(block%|+256)...|
|000021a0| 39 20 20 e7 20 73 74 72 | 69 6e 67 24 3d 22 4e 6f |9 . str|ing$="No|
|000021b0| 6e 65 22 20 f2 67 72 65 | 79 5f 62 61 63 6b 74 79 |ne" .gre|y_backty|
|000021c0| 70 65 20 8b 20 f2 72 65 | 73 74 6f 72 65 5f 62 61 |pe . .re|store_ba|
|000021d0| 63 6b 74 79 70 65 0d 0a | 00 2b 20 20 f2 63 68 61 |cktype..|.+ .cha|
|000021e0| 6e 67 65 69 63 6f 6e 6e | 61 6d 65 28 6d 61 69 6e |ngeiconn|ame(main|
|000021f0| 77 69 6e 68 25 2c 32 31 | 2c 73 74 72 69 6e 67 24 |winh%,21|,string$|
|00002200| 29 0d 0a 0a 05 cb 0d 0a | 14 05 e1 0d 0a 1e 04 0d |).......|........|
|00002210| 0a 28 42 f4 20 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.(B. ***|********|
|00002220| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 4d 65 73 |********|*****Mes|
|00002230| 73 61 67 65 20 41 63 63 | 74 69 6f 6e 73 2a 2a 2a |sage Acc|tions***|
|00002240| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002250| 2a 0d 0a 32 11 dd 20 a4 | 6d 65 73 73 61 67 65 73 |*..2.. .|messages|
|00002260| 6f 6b 0d 0a 3c 0b 70 6f | 73 73 25 3d 30 0d 0a 46 |ok..<.po|ss%=0..F|
|00002270| 1b 62 6c 6f 63 6b 25 21 | 70 6f 73 73 25 3d 31 3a |.block%!|poss%=1:|
|00002280| 70 6f 73 73 25 2b 3d 34 | 0d 0a 50 1b 62 6c 6f 63 |poss%+=4|..P.bloc|
|00002290| 6b 25 21 70 6f 73 73 25 | 3d 32 3a 70 6f 73 73 25 |k%!poss%|=2:poss%|
|000022a0| 2b 3d 34 0d 0a 5a 1b 62 | 6c 6f 63 6b 25 21 70 6f |+=4..Z.b|lock%!po|
|000022b0| 73 73 25 3d 33 3a 70 6f | 73 73 25 2b 3d 34 0d 0a |ss%=3:po|ss%+=4..|
|000022c0| 64 1e 62 6c 6f 63 6b 25 | 21 70 6f 73 73 25 3d 26 |d.block%|!poss%=&|
|000022d0| 35 30 32 3a 70 6f 73 73 | 25 2b 3d 34 0d 0a 6e 20 |502:poss|%+=4..n |
|000022e0| 62 6c 6f 63 6b 25 21 70 | 6f 73 73 25 3d 26 34 30 |block%!p|oss%=&40|
|000022f0| 30 63 31 3a 70 6f 73 73 | 25 2b 3d 34 0d 0a 78 12 |0c1:poss|%+=4..x.|
|00002300| 62 6c 6f 63 6b 25 21 70 | 6f 73 73 25 3d 30 0d 0a |block%!p|oss%=0..|
|00002310| 82 0b 3d 62 6c 6f 63 6b | 25 0d 0a 8c 04 0d 0a 96 |..=block|%.......|
|00002320| 45 dd 20 f2 6d 65 73 73 | 61 67 65 28 73 69 7a 65 |E. .mess|age(size|
|00002330| 25 2c 74 68 61 6e 64 6d | 25 2c 6d 79 5f 72 65 66 |%,thandm|%,my_ref|
|00002340| 25 2c 79 6f 75 72 5f 72 | 65 66 6c 61 67 25 2c 6d |%,your_r|eflag%,m|
|00002350| 65 73 73 61 67 65 74 25 | 2c 6d 65 73 73 61 67 65 |essaget%|,message|
|00002360| 25 29 0d 0a a0 12 c8 8e | 20 6d 65 73 73 61 67 65 |%)......| message|
|00002370| 74 25 20 ca 0d 0a aa 17 | 20 c9 20 30 20 3a 6d 61 |t% .....| . 0 :ma|
|00002380| 69 6e 5f 66 69 6e 69 73 | 68 3d b9 0d 0a b4 49 20 |in_finis|h=....I |
|00002390| c9 20 31 20 3a f2 61 70 | 70 6c 66 69 6c 65 5f 64 |. 1 :.ap|plfile_d|
|000023a0| 72 61 67 67 65 64 28 a4 | 67 65 74 5f 6e 75 6c 6c |ragged(.|get_null|
|000023b0| 28 6d 65 73 73 61 67 65 | 25 2b 32 34 29 2c 21 6d |(message|%+24),!m|
|000023c0| 65 73 73 61 67 65 25 2c | 6d 65 73 73 61 67 65 25 |essage%,|message%|
|000023d0| 21 32 30 29 0d 0a be 43 | 20 c9 20 32 20 3a f2 64 |!20)...C| . 2 :.d|
|000023e0| 61 74 61 73 61 76 65 5f | 61 63 74 28 a4 67 65 74 |atasave_|act(.get|
|000023f0| 5f 6e 75 6c 6c 28 6d 65 | 73 73 61 67 65 25 2b 32 |_null(me|ssage%+2|
|00002400| 34 29 2c 6d 65 73 73 61 | 67 65 25 21 31 36 2c 6d |4),messa|ge%!16,m|
|00002410| 79 5f 72 65 66 25 29 0d | 0a c8 45 20 c9 20 33 20 |y_ref%).|..E . 3 |
|00002420| 3a f2 6c 6f 61 64 5f 64 | 72 61 67 67 65 64 28 a4 |:.load_d|ragged(.|
|00002430| 67 65 74 5f 6e 75 6c 6c | 28 6d 65 73 73 61 67 65 |get_null|(message|
|00002440| 25 2b 32 34 29 2c 21 6d | 65 73 73 61 67 65 25 2c |%+24),!m|essage%,|
|00002450| 6d 65 73 73 61 67 65 25 | 21 32 30 29 0d 0a d2 4b |message%|!20)...K|
|00002460| 20 c9 20 26 35 30 32 20 | 3a f2 68 65 6c 70 72 65 | . &502 |:.helpre|
|00002470| 70 6c 79 28 a4 68 65 6c | 70 74 65 78 74 28 6d 65 |ply(.hel|ptext(me|
|00002480| 73 73 61 67 65 25 21 31 | 32 2c 6d 65 73 73 61 67 |ssage%!1|2,messag|
|00002490| 65 25 21 31 36 29 2c 6d | 79 5f 72 65 66 25 2c 74 |e%!16),m|y_ref%,t|
|000024a0| 68 61 6e 64 6d 25 29 0d | 0a dc 20 20 c9 20 26 34 |handm%).|.. . &4|
|000024b0| 30 30 43 31 20 20 3a f2 | 77 6d 65 73 73 5f 72 65 |00C1 :.|wmess_re|
|000024c0| 61 64 5f 6d 6f 64 65 0d | 0a e6 05 cb 0d 0a f0 05 |ad_mode.|........|
|000024d0| e1 0d 0a fa 04 0d 0b 04 | 22 dd 20 f2 68 65 6c 70 |........|". .help|
|000024e0| 72 65 70 6c 79 28 68 65 | 6c 70 24 2c 72 65 66 25 |reply(he|lp$,ref%|
|000024f0| 2c 74 61 73 6b 25 29 0d | 0b 0e 11 e7 20 a9 28 68 |,task%).|.... .(h|
|00002500| 65 6c 70 24 29 3e 30 8c | 0d 0b 18 1d 62 6c 6f 63 |elp$)>0.|....bloc|
|00002510| 6b 25 21 30 3d 28 32 35 | 2b a9 28 68 65 6c 70 24 |k%!0=(25|+.(help$|
|00002520| 29 29 80 ac 33 0d 0b 22 | 12 62 6c 6f 63 6b 25 21 |))..3.."|.block%!|
|00002530| 31 32 3d 72 65 66 25 0d | 0b 2c 12 62 6c 6f 63 6b |12=ref%.|.,.block|
|00002540| 25 21 31 36 3d 26 35 30 | 33 0d 0b 36 16 24 28 62 |%!16=&50|3..6.$(b|
|00002550| 6c 6f 63 6b 25 2b 32 30 | 29 3d 68 65 6c 70 24 0d |lock%+20|)=help$.|
|00002560| 0b 40 1b 3f 28 62 6c 6f | 63 6b 25 2b 32 30 2b a9 |.@.?(blo|ck%+20+.|
|00002570| 28 68 65 6c 70 24 29 29 | 3d 30 0d 0b 4a 28 c8 99 |(help$))|=0..J(..|
|00002580| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00002590| 65 22 2c 31 37 2c 62 6c | 6f 63 6b 25 2c 74 61 73 |e",17,bl|ock%,tas|
|000025a0| 6b 25 0d 0b 54 05 cd 0d | 0b 5e 05 e1 0d 0b 68 04 |k%..T...|.^....h.|
|000025b0| 0d 0b 72 1c dd 20 a4 68 | 65 6c 70 74 65 78 74 28 |..r.. .h|elptext(|
|000025c0| 77 68 61 6e 25 2c 69 68 | 61 6e 25 29 0d 0b 7c 12 |whan%,ih|an%)..|.|
|000025d0| ea 20 74 65 78 74 24 2c | 74 6f 6b 65 6e 24 0d 0b |. text$,|token$..|
|000025e0| 86 0e c8 8e 20 77 68 61 | 6e 25 20 ca 0d 0b 90 22 |.... wha|n% ...."|
|000025f0| 20 c9 20 6d 61 69 6e 77 | 69 6e 68 25 20 20 3a 74 | . mainw|inh% :t|
|00002600| 6f 6b 65 6e 24 3d 22 48 | 57 4d 41 49 4e 22 0d 0b |oken$="H|WMAIN"..|
|00002610| 9a 22 20 c9 20 62 61 73 | 65 77 69 6e 68 25 20 20 |." . bas|ewinh% |
|00002620| 3a 74 6f 6b 65 6e 24 3d | 22 48 57 42 41 53 45 22 |:token$=|"HWBASE"|
|00002630| 0d 0b a4 22 20 c9 20 73 | 65 6c 6c 77 69 6e 68 25 |..." . s|ellwinh%|
|00002640| 20 20 3a 74 6f 6b 65 6e | 24 3d 22 48 57 4c 49 53 | :token|$="HWLIS|
|00002650| 54 22 0d 0b ae 23 20 c9 | 20 73 65 6c 62 77 69 6e |T"...# .| selbwin|
|00002660| 68 25 20 20 3a 74 6f 6b | 65 6e 24 3d 22 48 57 42 |h% :tok|en$="HWB|
|00002670| 4c 49 53 54 22 0d 0b b8 | 21 20 c9 20 73 65 74 77 |LIST"...|! . setw|
|00002680| 69 6e 68 25 20 20 20 3a | 74 6f 6b 65 6e 24 3d 22 |inh% :|token$="|
|00002690| 48 57 53 45 54 22 0d 0b | c2 05 7f 0d 0b cc 35 20 |HWSET"..|......5 |
|000026a0| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 4d 65 6e 75 |.. "Wimp|_GetMenu|
|000026b0| 53 74 61 74 65 22 2c 31 | 2c 62 6c 6f 63 6b 25 2b |State",1|,block%+|
|000026c0| 31 30 32 34 2c 77 68 61 | 6e 25 2c 69 68 61 6e 25 |1024,wha|n%,ihan%|
|000026d0| 0d 0b d6 18 20 e7 20 62 | 6c 6f 63 6b 25 21 31 30 |.... . b|lock%!10|
|000026e0| 32 34 3c 3e 2d 31 20 8c | 0d 0b e0 15 20 20 c8 8e |24<>-1 .|.... ..|
|000026f0| 20 70 72 65 73 65 6e 74 | 6d 69 25 20 ca 0d 0b ea | present|mi% ....|
|00002700| 20 20 20 20 c9 20 34 20 | 3a 3d a4 67 65 74 5f 6d | . 4 |:=.get_m|
|00002710| 73 67 28 22 48 4d 54 4f | 4f 4c 53 22 29 0d 0b f4 |sg("HMTO|OLS")...|
|00002720| 22 20 20 20 c9 20 35 20 | 3a 3d a4 67 65 74 5f 6d |" . 5 |:=.get_m|
|00002730| 73 67 28 22 48 4d 53 50 | 52 49 54 45 53 22 29 0d |sg("HMSP|RITES").|
|00002740| 0b fe 20 20 20 20 c9 20 | 36 20 3a 3d a4 67 65 74 |.. . |6 :=.get|
|00002750| 5f 6d 73 67 28 22 48 4d | 42 41 43 4b 53 22 29 0d |_msg("HM|BACKS").|
|00002760| 0c 08 1d 20 20 20 7f 20 | 3a 3d a4 67 65 74 5f 6d |... . |:=.get_m|
|00002770| 73 67 28 22 4e 4f 48 45 | 4c 50 22 29 0d 0c 12 07 |sg("NOHE|LP")....|
|00002780| 20 20 cb 0d 0c 1c 07 20 | 20 cd 0d 0c 26 05 cb 0d | ..... | ...&...|
|00002790| 0c 30 1d 3d a4 67 65 74 | 5f 6d 73 67 28 74 6f 6b |.0.=.get|_msg(tok|
|000027a0| 65 6e 24 2b c3 20 69 68 | 61 6e 25 29 0d 0c 3a 04 |en$+. ih|an%)..:.|
|000027b0| 0d 0c 44 16 dd 20 f2 77 | 6d 65 73 73 5f 72 65 61 |..D.. .w|mess_rea|
|000027c0| 64 5f 6d 6f 64 65 0d 0c | 4e 0f 21 62 6c 6f 63 6b |d_mode..|N.!block|
|000027d0| 25 3d 31 32 38 0d 0c 58 | 10 62 6c 6f 63 6b 25 21 |%=128..X|.block%!|
|000027e0| 34 3d 31 32 39 0d 0c 62 | 10 62 6c 6f 63 6b 25 21 |4=129..b|.block%!|
|000027f0| 38 3d 31 33 30 0d 0c 6c | 11 62 6c 6f 63 6b 25 21 |8=130..l|.block%!|
|00002800| 31 32 3d 31 33 31 0d 0c | 76 10 62 6c 6f 63 6b 25 |12=131..|v.block%|
|00002810| 21 31 36 3d 2d 31 0d 0c | 80 2a c8 99 20 22 4f 53 |!16=-1..|.*.. "OS|
|00002820| 5f 52 65 61 64 56 64 75 | 56 61 72 69 61 62 6c 65 |_ReadVdu|Variable|
|00002830| 73 22 2c 62 6c 6f 63 6b | 25 2c 62 6c 6f 63 6b 25 |s",block|%,block%|
|00002840| 0d 0c 8a 2b c8 99 20 22 | 4f 53 5f 52 65 61 64 4d |...+.. "|OS_ReadM|
|00002850| 6f 64 65 56 61 72 69 61 | 62 6c 65 22 2c 2d 31 2c |odeVaria|ble",-1,|
|00002860| 34 20 20 b8 20 2c 2c 78 | 70 73 25 0d 0c 94 2a c8 |4 . ,,x|ps%...*.|
|00002870| 99 20 22 4f 53 5f 52 65 | 61 64 4d 6f 64 65 56 61 |. "OS_Re|adModeVa|
|00002880| 72 69 61 62 6c 65 22 2c | 2d 31 2c 35 20 b8 20 2c |riable",|-1,5 . ,|
|00002890| 2c 79 70 73 25 0d 0c 9e | 20 73 63 72 65 65 6e 5f |,yps%...| screen_|
|000028a0| 78 6d 69 6e 25 3d 28 21 | 62 6c 6f 63 6b 25 29 3c |xmin%=(!|block%)<|
|000028b0| 3c 78 70 73 25 0d 0c a8 | 21 73 63 72 65 65 6e 5f |<xps%...|!screen_|
|000028c0| 79 6d 69 6e 25 3d 28 62 | 6c 6f 63 6b 25 21 34 29 |ymin%=(b|lock%!4)|
|000028d0| 3c 3c 79 70 73 25 0d 0c | b2 23 73 63 72 65 65 6e |<<yps%..|.#screen|
|000028e0| 5f 78 6d 61 78 25 3d 28 | 62 6c 6f 63 6b 25 21 38 |_xmax%=(|block%!8|
|000028f0| 2b 31 29 3c 3c 78 70 73 | 25 0d 0c bc 24 73 63 72 |+1)<<xps|%...$scr|
|00002900| 65 65 6e 5f 79 6d 61 78 | 25 3d 28 62 6c 6f 63 6b |een_ymax|%=(block|
|00002910| 25 21 31 32 2b 31 29 3c | 3c 79 70 73 25 0d 0c c6 |%!12+1)<|<yps%...|
|00002920| 10 78 70 73 25 3d 31 3c | 3c 78 70 73 25 0d 0c d0 |.xps%=1<|<xps%...|
|00002930| 10 79 70 73 25 3d 31 3c | 3c 79 70 73 25 0d 0c da |.yps%=1<|<yps%...|
|00002940| 05 e1 0d 0c e4 04 0d 0c | ee 2e dd 20 f2 61 70 70 |........|... .app|
|00002950| 6c 66 69 6c 65 5f 64 72 | 61 67 67 65 64 28 6e 61 |lfile_dr|agged(na|
|00002960| 6d 65 24 2c 77 68 61 6e | 25 2c 66 69 6c 65 74 79 |me$,whan|%,filety|
|00002970| 70 65 25 29 0d 0c f8 86 | e7 20 28 77 68 61 6e 25 |pe%)....|. (whan%|
|00002980| 3d 6d 61 69 6e 77 69 6e | 68 25 20 84 20 77 68 61 |=mainwin|h% . wha|
|00002990| 6e 25 3d 62 61 73 65 77 | 69 6e 68 25 29 20 80 20 |n%=basew|inh%) . |
|000029a0| 28 66 69 6c 65 74 79 70 | 65 25 3d 26 66 65 61 20 |(filetyp|e%=&fea |
|000029b0| 84 20 66 69 6c 65 74 79 | 70 65 25 3d 26 66 66 39 |. filety|pe%=&ff9|
|000029c0| 20 84 20 28 66 69 6c 65 | 74 79 70 65 25 3d 26 66 | . (file|type%=&f|
|000029d0| 65 62 20 80 20 c0 a4 6c | 6f 77 65 72 5f 63 61 73 |eb . ..l|ower_cas|
|000029e0| 65 28 6e 61 6d 65 24 29 | 2c 38 29 3d 22 70 69 6e |e(name$)|,8)="pin|
|000029f0| 62 6f 61 72 64 22 29 29 | 20 8c 0d 0d 02 17 20 62 |board"))| ..... b|
|00002a00| 6c 6f 63 6b 25 21 31 32 | 3d 62 6c 6f 63 6b 25 21 |lock%!12|=block%!|
|00002a10| 38 0d 0d 0c 11 20 62 6c | 6f 63 6b 25 21 33 36 3d |8.... bl|ock%!36=|
|00002a20| 2d 31 0d 0d 16 1b 20 66 | 69 6c 65 5f 74 72 61 6e |-1.... f|ile_tran|
|00002a30| 73 5f 6e 61 6d 65 24 3d | 6e 61 6d 65 24 0d 0d 20 |s_name$=|name$.. |
|00002a40| 44 20 c8 99 22 58 4f 53 | 5f 52 65 61 64 56 61 72 |D .."XOS|_ReadVar|
|00002a50| 56 61 6c 22 2c 22 57 69 | 6d 70 24 53 63 72 61 70 |Val","Wi|mp$Scrap|
|00002a60| 22 2c 62 6c 6f 63 6b 25 | 2b 32 35 36 2c 32 35 36 |",block%|+256,256|
|00002a70| 2c 30 2c 33 20 b8 20 2c | 2c 65 6e 64 25 3b 6f 6b |,0,3 . ,|,end%;ok|
|00002a80| 25 0d 0d 2a 31 20 e7 20 | 6f 6b 25 3d 37 20 f2 65 |%..*1 . |ok%=7 .e|
|00002a90| 72 72 6f 72 28 a4 67 65 | 74 5f 6d 73 67 28 22 4e |rror(.ge|t_msg("N|
|00002aa0| 4f 57 49 4e 53 43 50 22 | 29 2c 30 2c 30 2c a3 29 |OWINSCP"|),0,0,.)|
|00002ab0| 3a e1 0d 0d 34 20 20 24 | 28 62 6c 6f 63 6b 25 2b |:...4 $|(block%+|
|00002ac0| 34 34 29 3d 22 3c 57 69 | 6d 70 24 53 63 72 61 70 |44)="<Wi|mp$Scrap|
|00002ad0| 3e 22 0d 0d 3e 64 20 e7 | 20 28 a9 28 24 28 62 6c |>"..>d .| (.($(bl|
|00002ae0| 6f 63 6b 25 2b 34 34 29 | 29 2b 31 29 83 34 3c 3e |ock%+44)|)+1).4<>|
|00002af0| 30 20 21 62 6c 6f 63 6b | 25 3d 28 28 34 34 2b a9 |0 !block|%=((44+.|
|00002b00| 28 24 28 62 6c 6f 63 6b | 25 2b 34 34 29 29 2b 31 |($(block|%+44))+1|
|00002b10| 29 80 ac 33 29 2b 34 20 | 8b 20 21 62 6c 6f 63 6b |)..3)+4 |. !block|
|00002b20| 25 3d 34 34 2b a9 28 24 | 28 62 6c 6f 63 6b 25 2b |%=44+.($|(block%+|
|00002b30| 34 34 29 29 2b 31 0d 0d | 48 22 20 62 6c 6f 63 6b |44))+1..|H" block|
|00002b40| 25 3f 28 34 34 2b a9 28 | 24 28 62 6c 6f 63 6b 25 |%?(44+.(|$(block%|
|00002b50| 2b 34 34 29 29 29 3d 30 | 0d 0d 52 10 20 62 6c 6f |+44)))=0|..R. blo|
|00002b60| 63 6b 25 21 31 36 3d 32 | 0d 0d 5c 2d 20 c8 99 20 |ck%!16=2|..\- .. |
|00002b70| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00002b80| 65 22 2c 31 37 2c 62 6c | 6f 63 6b 25 2c 62 6c 6f |e",17,bl|ock%,blo|
|00002b90| 63 6b 25 21 34 0d 0d 66 | 05 cd 0d 0d 70 05 e1 0d |ck%!4..f|....p...|
|00002ba0| 0d 7a 04 0d 0d 84 2a dd | 20 f2 6c 6f 61 64 5f 64 |.z....*.| .load_d|
|00002bb0| 72 61 67 67 65 64 28 6e | 61 6d 65 24 2c 77 68 61 |ragged(n|ame$,wha|
|00002bc0| 6e 25 2c 66 69 6c 65 74 | 79 70 65 25 29 0d 0d 8e |n%,filet|ype%)...|
|00002bd0| 3c e7 20 28 77 68 61 6e | 25 3d 6d 61 69 6e 77 69 |<. (whan|%=mainwi|
|00002be0| 6e 68 25 20 84 20 77 68 | 61 6e 25 3d 62 61 73 65 |nh% . wh|an%=base|
|00002bf0| 77 69 6e 68 25 29 20 80 | 20 66 69 6c 65 74 79 70 |winh%) .| filetyp|
|00002c00| 65 25 3d 26 66 66 39 20 | 8c 0d 0d 98 81 20 e7 20 |e%=&ff9 |..... . |
|00002c10| a4 6c 6f 77 65 72 5f 63 | 61 73 65 28 6e 61 6d 65 |.lower_c|ase(name|
|00002c20| 24 29 3d 22 3c 77 69 6d | 70 24 73 63 72 61 70 3e |$)="<wim|p$scrap>|
|00002c30| 22 20 73 70 72 69 74 65 | 73 65 6c 6e 61 6d 65 24 |" sprite|selname$|
|00002c40| 3d 66 69 6c 65 5f 74 72 | 61 6e 73 5f 6e 61 6d 65 |=file_tr|ans_name|
|00002c50| 24 3a 73 70 72 5f 61 70 | 6c 5f 74 72 61 6e 73 25 |$:spr_ap|l_trans%|
|00002c60| 3d b9 20 8b 20 73 70 72 | 69 74 65 73 65 6c 6e 61 |=. . spr|iteselna|
|00002c70| 6d 65 24 3d 6e 61 6d 65 | 24 3a 73 70 72 5f 61 70 |me$=name|$:spr_ap|
|00002c80| 6c 5f 74 72 61 6e 73 25 | 3d a3 0d 0d a2 1b 20 73 |l_trans%|=..... s|
|00002c90| 70 72 5f 61 70 6c 5f 74 | 61 73 6b 25 3d 62 6c 6f |pr_apl_t|ask%=blo|
|00002ca0| 63 6b 25 21 34 0d 0d ac | 1b 20 73 70 72 5f 61 70 |ck%!4...|. spr_ap|
|00002cb0| 6c 5f 6d 72 65 66 25 3d | 62 6c 6f 63 6b 25 21 38 |l_mref%=|block%!8|
|00002cc0| 0d 0d b6 18 20 73 70 72 | 5f 61 70 6c 5f 6e 61 6d |.... spr|_apl_nam|
|00002cd0| 65 24 3d 6e 61 6d 65 24 | 0d 0d c0 1c 20 73 70 72 |e$=name$|.... spr|
|00002ce0| 5f 61 70 6c 5f 74 79 70 | 65 25 3d 66 69 6c 65 74 |_apl_typ|e%=filet|
|00002cf0| 79 70 65 25 0d 0d ca 13 | 20 c8 8e 20 62 6c 6f 63 |ype%....| .. bloc|
|00002d00| 6b 25 21 32 34 20 ca 0d | 0d d4 09 20 c9 20 31 39 |k%!24 ..|... . 19|
|00002d10| 0d 0d de 1a 20 20 f2 6c | 6f 61 64 5f 61 64 64 65 |.... .l|oad_adde|
|00002d20| 64 73 70 72 69 74 65 28 | 30 29 0d 0d e8 09 20 c9 |dsprite(|0).... .|
|00002d30| 20 32 30 0d 0d f2 1a 20 | 20 f2 6c 6f 61 64 5f 61 | 20.... | .load_a|
|00002d40| 64 64 65 64 73 70 72 69 | 74 65 28 31 29 0d 0d fc |ddedspri|te(1)...|
|00002d50| 09 20 c9 20 32 31 0d 0e | 06 1a 20 20 f2 6c 6f 61 |. . 21..|.. .loa|
|00002d60| 64 5f 61 64 64 65 64 73 | 70 72 69 74 65 28 32 29 |d_addeds|prite(2)|
|00002d70| 0d 0e 10 06 20 7f 0d 0e | 1a 16 20 20 f2 6f 70 65 |.... ...|.. .ope|
|00002d80| 6e 5f 73 70 72 69 74 65 | 5f 73 65 6c 0d 0e 24 06 |n_sprite|_sel..$.|
|00002d90| 20 cb 0d 0e 2e 05 cd 0d | 0e 38 04 0d 0e 42 6a e7 | .......|.8...Bj.|
|00002da0| 20 28 77 68 61 6e 25 3d | 6d 61 69 6e 77 69 6e 68 | (whan%=|mainwinh|
|00002db0| 25 20 84 20 77 68 61 6e | 25 3d 62 61 73 65 77 69 |% . whan|%=basewi|
|00002dc0| 6e 68 25 29 20 80 20 66 | 69 6c 65 74 79 70 65 25 |nh%) . f|iletype%|
|00002dd0| 3d 26 66 65 62 20 f2 74 | 72 61 6e 73 66 65 72 5f |=&feb .t|ransfer_|
|00002de0| 70 69 6e 62 6f 61 72 64 | 5f 66 69 6c 65 28 6e 61 |pinboard|_file(na|
|00002df0| 6d 65 24 2c 66 69 6c 65 | 5f 74 72 61 6e 73 5f 6e |me$,file|_trans_n|
|00002e00| 61 6d 65 24 29 0d 0e 4c | 04 0d 0e 56 3c e7 20 28 |ame$)..L|...V<. (|
|00002e10| 77 68 61 6e 25 3d 6d 61 | 69 6e 77 69 6e 68 25 20 |whan%=ma|inwinh% |
|00002e20| 84 20 77 68 61 6e 25 3d | 62 61 73 65 77 69 6e 68 |. whan%=|basewinh|
|00002e30| 25 29 20 80 20 66 69 6c | 65 74 79 70 65 25 3d 26 |%) . fil|etype%=&|
|00002e40| 66 65 61 20 8c 0d 0e 60 | 6d 20 f2 64 65 73 6b 74 |fea ...`|m .deskt|
|00002e50| 6f 70 5f 66 69 6c 74 65 | 72 28 6e 61 6d 65 24 2c |op_filte|r(name$,|
|00002e60| 22 3c 42 6f 6f 74 24 44 | 69 72 3e 2e 63 68 6f 69 |"<Boot$D|ir>.choi|
|00002e70| 63 65 73 2e 62 6f 6f 74 | 2e 74 61 73 6b 73 2e 53 |ces.boot|.tasks.S|
|00002e80| 65 74 74 69 6e 67 73 22 | 2c 22 3c 42 6f 6f 74 24 |ettings"|,"<Boot$|
|00002e90| 44 69 72 3e 2e 63 68 6f | 69 63 65 73 2e 62 6f 6f |Dir>.cho|ices.boo|
|00002ea0| 74 2e 74 61 73 6b 73 2e | 70 69 6e 62 6f 61 72 64 |t.tasks.|pinboard|
|00002eb0| 22 29 0d 0e 6a 43 20 c8 | 99 20 22 58 4f 53 5f 46 |")..jC .|. "XOS_F|
|00002ec0| 69 6c 65 22 2c 31 38 2c | 22 3c 42 6f 6f 74 24 44 |ile",18,|"<Boot$D|
|00002ed0| 69 72 3e 2e 63 68 6f 69 | 63 65 73 2e 62 6f 6f 74 |ir>.choi|ces.boot|
|00002ee0| 2e 74 61 73 6b 73 2e 53 | 65 74 74 69 6e 67 73 22 |.tasks.S|ettings"|
|00002ef0| 2c 26 66 65 61 0d 0e 74 | 43 20 c8 99 20 22 58 4f |,&fea..t|C .. "XO|
|00002f00| 53 5f 46 69 6c 65 22 2c | 31 38 2c 22 3c 42 6f 6f |S_File",|18,"<Boo|
|00002f10| 74 24 44 69 72 3e 2e 63 | 68 6f 69 63 65 73 2e 62 |t$Dir>.c|hoices.b|
|00002f20| 6f 6f 74 2e 74 61 73 6b | 73 2e 70 69 6e 62 6f 61 |oot.task|s.pinboa|
|00002f30| 72 64 22 2c 26 66 65 62 | 0d 0e 7e 3e 20 e7 20 a4 |rd",&feb|..~> . .|
|00002f40| 6c 6f 77 65 72 5f 63 61 | 73 65 28 6e 61 6d 65 24 |lower_ca|se(name$|
|00002f50| 29 3d 22 3c 77 69 6d 70 | 24 73 63 72 61 70 3e 22 |)="<wimp|$scrap>"|
|00002f60| 20 c8 99 20 22 58 4f 53 | 5f 46 69 6c 65 22 2c 36 | .. "XOS|_File",6|
|00002f70| 2c 6e 61 6d 65 24 0d 0e | 88 17 20 62 6c 6f 63 6b |,name$..|.. block|
|00002f80| 25 21 31 32 3d 62 6c 6f | 63 6b 25 21 38 0d 0e 92 |%!12=blo|ck%!8...|
|00002f90| 10 20 62 6c 6f 63 6b 25 | 21 31 36 3d 34 0d 0e 9c |. block%|!16=4...|
|00002fa0| 2d 20 c8 99 20 22 57 69 | 6d 70 5f 53 65 6e 64 4d |- .. "Wi|mp_SendM|
|00002fb0| 65 73 73 61 67 65 22 2c | 31 37 2c 62 6c 6f 63 6b |essage",|17,block|
|00002fc0| 25 2c 62 6c 6f 63 6b 25 | 21 34 0d 0e a6 05 cd 0d |%,block%|!4......|
|00002fd0| 0e b0 04 0d 0e ba 3d e7 | 20 28 77 68 61 6e 25 3d |......=.| (whan%=|
|00002fe0| 73 65 6c 6c 77 69 6e 68 | 25 20 84 20 77 68 61 6e |sellwinh|% . whan|
|00002ff0| 25 3d 73 65 6c 62 77 69 | 6e 68 25 29 20 80 20 66 |%=selbwi|nh%) . f|
|00003000| 69 6c 65 74 79 70 65 25 | 3d 26 32 30 30 30 20 8c |iletype%|=&2000 .|
|00003010| 0d 0e c4 17 20 62 6c 6f | 63 6b 25 21 31 32 3d 62 |.... blo|ck%!12=b|
|00003020| 6c 6f 63 6b 25 21 38 0d | 0e ce 10 20 62 6c 6f 63 |lock%!8.|... bloc|
|00003030| 6b 25 21 31 36 3d 34 0d | 0e d8 2d 20 c8 99 20 22 |k%!16=4.|..- .. "|
|00003040| 57 69 6d 70 5f 53 65 6e | 64 4d 65 73 73 61 67 65 |Wimp_Sen|dMessage|
|00003050| 22 2c 31 37 2c 62 6c 6f | 63 6b 25 2c 62 6c 6f 63 |",17,blo|ck%,bloc|
|00003060| 6b 25 21 34 0d 0e e2 2f | 20 e7 20 a4 69 74 65 6d |k%!4.../| . .item|
|00003070| 5f 6e 6f 74 5f 69 6e 5f | 6c 69 73 74 28 a4 73 74 |_not_in_|list(.st|
|00003080| 72 69 70 5f 66 6e 61 6d | 65 28 6e 61 6d 65 24 29 |rip_fnam|e(name$)|
|00003090| 29 20 8c 0d 0e ec 3c 20 | f2 75 70 64 61 74 65 5f |) ....< |.update_|
|000030a0| 69 63 6f 6e 28 77 68 61 | 6e 25 2c a4 61 64 64 5f |icon(wha|n%,.add_|
|000030b0| 6c 69 73 74 5f 69 74 65 | 6d 28 a4 73 74 72 69 70 |list_ite|m(.strip|
|000030c0| 5f 66 6e 61 6d 65 28 6e | 61 6d 65 24 29 29 29 0d |_fname(n|ame$))).|
|000030d0| 0e f6 20 20 f2 61 64 64 | 5f 69 74 65 6d 5f 74 6f |.. .add|_item_to|
|000030e0| 5f 6d 65 6d 6c 69 73 74 | 28 6e 61 6d 65 24 29 0d |_memlist|(name$).|
|000030f0| 0f 00 05 cd 0d 0f 0a 05 | cd 0d 0f 14 04 0d 0f 1e |........|........|
|00003100| 3d e7 20 28 77 68 61 6e | 25 3d 6d 61 69 6e 77 69 |=. (whan|%=mainwi|
|00003110| 6e 68 25 20 84 20 77 68 | 61 6e 25 3d 62 61 73 65 |nh% . wh|an%=base|
|00003120| 77 69 6e 68 25 29 20 80 | 20 66 69 6c 65 74 79 70 |winh%) .| filetyp|
|00003130| 65 25 3d 26 32 30 30 30 | 20 8c 0d 0f 28 17 20 62 |e%=&2000| ...(. b|
|00003140| 6c 6f 63 6b 25 21 31 32 | 3d 62 6c 6f 63 6b 25 21 |lock%!12|=block%!|
|00003150| 38 0d 0f 32 10 20 62 6c | 6f 63 6b 25 21 31 36 3d |8..2. bl|ock%!16=|
|00003160| 34 0d 0f 3c 2d 20 c8 99 | 20 22 57 69 6d 70 5f 53 |4..<- ..| "Wimp_S|
|00003170| 65 6e 64 4d 65 73 73 61 | 67 65 22 2c 31 37 2c 62 |endMessa|ge",17,b|
|00003180| 6c 6f 63 6b 25 2c 62 6c | 6f 63 6b 25 21 34 0d 0f |lock%,bl|ock%!4..|
|00003190| 46 2a 20 c8 8e 20 a4 6c | 6f 77 65 72 5f 63 61 73 |F* .. .l|ower_cas|
|000031a0| 65 28 a4 73 74 72 69 70 | 5f 66 6e 61 6d 65 28 6e |e(.strip|_fname(n|
|000031b0| 61 6d 65 24 29 29 20 ca | 0d 0f 50 3c 20 c9 20 22 |ame$)) .|..P< . "|
|000031c0| 21 73 79 73 74 65 6d 22 | 20 3a f2 75 70 64 61 74 |!system"| :.updat|
|000031d0| 65 5f 63 6f 70 79 28 6e | 61 6d 65 24 2c 22 3c 42 |e_copy(n|ame$,"<B|
|000031e0| 6f 6f 74 24 44 69 72 3e | 2e 72 65 73 6f 75 72 63 |oot$Dir>|.resourc|
|000031f0| 65 73 22 29 0d 0f 5a 3b | 20 c9 20 22 21 73 63 72 |es")..Z;| . "!scr|
|00003200| 61 70 22 20 3a f2 75 70 | 64 61 74 65 5f 63 6f 70 |ap" :.up|date_cop|
|00003210| 79 28 6e 61 6d 65 24 2c | 22 3c 42 6f 6f 74 24 44 |y(name$,|"<Boot$D|
|00003220| 69 72 3e 2e 72 65 73 6f | 75 72 63 65 73 22 29 0d |ir>.reso|urces").|
|00003230| 0f 64 3b 20 c9 20 22 21 | 66 6f 6e 74 73 22 20 3a |.d; . "!|fonts" :|
|00003240| f2 75 70 64 61 74 65 5f | 63 6f 70 79 28 6e 61 6d |.update_|copy(nam|
|00003250| 65 24 2c 22 3c 42 6f 6f | 74 24 44 69 72 3e 2e 72 |e$,"<Boo|t$Dir>.r|
|00003260| 65 73 6f 75 72 63 65 73 | 22 29 0d 0f 6e 06 20 cb |esources|")..n. .|
|00003270| 0d 0f 78 05 cd 0d 0f 82 | 05 cd 0d 0f 8c 05 e1 0d |..x.....|........|
|00003280| 0f 96 04 0d 0f a0 2b dd | 20 f2 64 61 74 61 73 61 |......+.| .datasa|
|00003290| 76 65 5f 61 63 74 28 66 | 6e 61 6d 65 24 2c 73 69 |ve_act(f|name$,si|
|000032a0| 7a 65 25 2c 62 6c 6f 63 | 6b 25 21 31 32 29 0d 0f |ze%,bloc|k%!12)..|
|000032b0| aa 12 c8 8e 20 64 72 61 | 67 74 79 70 65 25 20 ca |.... dra|gtype% .|
|000032c0| 0d 0f b4 07 c9 20 30 0d | 0f be b4 20 e7 20 a4 6c |..... 0.|... . .l|
|000032d0| 6f 77 65 72 5f 63 61 73 | 65 28 66 6e 61 6d 65 24 |ower_cas|e(fname$|
|000032e0| 29 3c 3e 22 3c 77 69 6d | 70 24 73 63 72 61 70 3e |)<>"<wim|p$scrap>|
|000032f0| 22 20 80 20 a4 63 68 65 | 63 6b 5f 66 6f 72 5f 64 |" . .che|ck_for_d|
|00003300| 69 72 65 63 74 6f 72 79 | 28 a4 67 65 74 5f 66 69 |irectory|(.get_fi|
|00003310| 6c 65 5f 70 61 74 68 28 | 66 6e 61 6d 65 24 29 29 |le_path(|fname$))|
|00003320| 20 8c 20 f2 63 68 61 6e | 67 65 69 63 6f 6e 6e 61 | . .chan|geiconna|
|00003330| 6d 65 28 6d 61 69 6e 77 | 69 6e 68 25 2c 33 34 2c |me(mainw|inh%,34,|
|00003340| a4 67 65 74 5f 66 69 6c | 65 5f 70 61 74 68 28 66 |.get_fil|e_path(f|
|00003350| 6e 61 6d 65 24 29 29 20 | 8b 20 f2 65 72 72 6f 72 |name$)) |. .error|
|00003360| 28 a4 67 65 74 5f 6d 73 | 67 28 22 42 41 44 50 41 |(.get_ms|g("BADPA|
|00003370| 54 48 22 29 2c 30 2c 30 | 2c 30 29 0d 0f c8 1d 20 |TH"),0,0|,0).... |
|00003380| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 4d |.. "Wimp|_CreateM|
|00003390| 65 6e 75 22 2c 2c 2d 31 | 0d 0f d2 11 20 64 72 61 |enu",,-1|.... dra|
|000033a0| 67 74 79 70 65 25 3d 2d | 31 0d 0f dc 05 cb 0d 0f |gtype%=-|1.......|
|000033b0| e6 05 e1 0d 0f f0 04 0d | 0f fa 3f f4 20 2a 2a 2a |........|..?. ***|
|000033c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000033d0| 2a 2a 2a 4d 65 6e 75 20 | 43 6f 6e 74 72 6f 6c 2a |***Menu |Control*|
|000033e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000033f0| 2a 2a 2a 2a 2a 2a 0d 10 | 04 04 0d 10 0e 19 dd 20 |******..|....... |
|00003400| f2 63 72 65 61 74 65 5f | 6d 65 6e 75 28 6d 65 6e |.create_|menu(men|
|00003410| 75 24 29 0d 10 18 14 ea | 20 73 74 70 6f 73 73 25 |u$).....| stposs%|
|00003420| 2c 70 6c 61 63 65 25 0d | 10 22 0d 73 74 70 6f 73 |,place%.|.".stpos|
|00003430| 73 25 3d 31 0d 10 2c 53 | 70 6c 61 63 65 25 3d a4 |s%=1..,S|place%=.|
|00003440| 73 74 61 72 74 6d 65 6e | 75 28 30 2c 6d 65 6e 75 |startmen|u(0,menu|
|00003450| 5f 62 75 66 66 25 2c a4 | 67 65 74 5f 73 74 72 69 |_buff%,.|get_stri|
|00003460| 6e 67 28 22 2c 22 2c 6d | 65 6e 75 24 2c 73 74 70 |ng(",",m|enu$,stp|
|00003470| 6f 73 73 25 29 2c 37 2c | 32 2c 37 2c 30 2c 31 30 |oss%),7,|2,7,0,10|
|00003480| 30 2c 34 30 2c 30 29 0d | 10 36 05 f5 0d 10 40 55 |0,40,0).|.6....@U|
|00003490| 70 6c 61 63 65 25 3d a4 | 6d 65 6e 75 69 74 65 6d |place%=.|menuitem|
|000034a0| 28 70 6c 61 63 65 25 2c | 6d 65 6e 75 5f 62 75 66 |(place%,|menu_buf|
|000034b0| 66 25 2c 30 2c 30 2c a4 | 69 63 6f 6e 5f 6e 6f 72 |f%,0,0,.|icon_nor|
|000034c0| 6d 2c a4 67 65 74 5f 73 | 74 72 69 6e 67 28 22 2c |m,.get_s|tring(",|
|000034d0| 22 2c 6d 65 6e 75 24 2c | 73 74 70 6f 73 73 25 29 |",menu$,|stposs%)|
|000034e0| 29 0d 10 4a 29 fd 20 73 | 74 70 6f 73 73 25 3d 31 |)..J). s|tposs%=1|
|000034f0| 20 84 20 28 70 6c 61 63 | 65 25 3e 6d 65 6e 75 5f | . (plac|e%>menu_|
|00003500| 62 73 69 7a 65 25 2d 33 | 32 29 0d 10 54 38 6d 65 |bsize%-3|2)..T8me|
|00003510| 6e 75 5f 62 75 66 66 25 | 21 28 70 6c 61 63 65 25 |nu_buff%|!(place%|
|00003520| 2d 32 34 29 3d 6d 65 6e | 75 5f 62 75 66 66 25 21 |-24)=men|u_buff%!|
|00003530| 28 70 6c 61 63 65 25 2d | 32 34 29 20 84 20 31 3c |(place%-|24) . 1<|
|00003540| 3c 37 0d 10 5e 05 e1 0d | 10 68 04 0d 10 72 10 dd |<7..^...|.h...r..|
|00003550| 20 a4 69 63 6f 6e 5f 6e | 6f 72 6d 0d 10 7c 0e 3d | .icon_n|orm..|.=|
|00003560| 26 30 37 30 39 30 30 31 | 31 0d 10 86 04 0d 10 90 |&0709001|1.......|
|00003570| 2b dd 20 a4 67 65 74 5f | 73 74 72 69 6e 67 28 65 |+. .get_|string(e|
|00003580| 6e 64 73 74 24 2c 73 74 | 72 69 6e 67 24 2c f8 20 |ndst$,st|ring$,. |
|00003590| 73 74 70 6f 73 73 25 29 | 0d 10 9a 0c ea 20 74 70 |stposs%)|..... tp|
|000035a0| 6f 73 73 25 0d 10 a4 12 | 74 70 6f 73 73 25 3d 73 |oss%....|tposs%=s|
|000035b0| 74 70 6f 73 73 25 0d 10 | ae 26 73 74 70 6f 73 73 |tposs%..|.&stposs|
|000035c0| 25 3d a7 73 74 72 69 6e | 67 24 2c 65 6e 64 73 74 |%=.strin|g$,endst|
|000035d0| 24 2c 73 74 70 6f 73 73 | 25 29 2b 31 0d 10 b8 34 |$,stposs|%)+1...4|
|000035e0| 3d c1 73 74 72 69 6e 67 | 24 2c 74 70 6f 73 73 25 |=.string|$,tposs%|
|000035f0| 2c a7 73 74 72 69 6e 67 | 24 2c 65 6e 64 73 74 24 |,.string|$,endst$|
|00003600| 2c 74 70 6f 73 73 25 29 | 2d 74 70 6f 73 73 25 29 |,tposs%)|-tposs%)|
|00003610| 0d 10 c2 04 0d 10 cc 54 | dd 20 a4 73 74 61 72 74 |.......T|. .start|
|00003620| 6d 65 6e 75 28 62 70 6c | 25 2c 62 75 66 66 6c 61 |menu(bpl|%,buffla|
|00003630| 67 25 2c 74 69 74 6c 65 | 24 2c 66 63 6f 6c 25 2c |g%,title|$,fcol%,|
|00003640| 62 63 6f 6c 25 2c 6d 66 | 63 6f 6c 25 2c 6d 62 63 |bcol%,mf|col%,mbc|
|00003650| 6f 6c 25 2c 77 69 64 74 | 68 25 2c 68 65 69 67 68 |ol%,widt|h%,heigh|
|00003660| 74 25 2c 67 61 70 25 29 | 0d 10 d6 1b 24 28 62 75 |t%,gap%)|....$(bu|
|00003670| 66 66 6c 61 67 25 2b 62 | 70 6c 25 29 3d 74 69 74 |fflag%+b|pl%)=tit|
|00003680| 6c 65 24 0d 10 e0 1c 62 | 75 66 66 6c 61 67 25 3f |le$....b|ufflag%?|
|00003690| 28 31 32 2b 62 70 6c 25 | 29 3d 66 63 6f 6c 25 0d |(12+bpl%|)=fcol%.|
|000036a0| 10 ea 1c 62 75 66 66 6c | 61 67 25 3f 28 31 33 2b |...buffl|ag%?(13+|
|000036b0| 62 70 6c 25 29 3d 62 63 | 6f 6c 25 0d 10 f4 1d 62 |bpl%)=bc|ol%....b|
|000036c0| 75 66 66 6c 61 67 25 3f | 28 31 34 2b 62 70 6c 25 |ufflag%?|(14+bpl%|
|000036d0| 29 3d 6d 66 63 6f 6c 25 | 0d 10 fe 1d 62 75 66 66 |)=mfcol%|....buff|
|000036e0| 6c 61 67 25 3f 28 31 35 | 2b 62 70 6c 25 29 3d 6d |lag%?(15|+bpl%)=m|
|000036f0| 62 63 6f 6c 25 0d 11 08 | 1d 62 75 66 66 6c 61 67 |bcol%...|.bufflag|
|00003700| 25 21 28 31 36 2b 62 70 | 6c 25 29 3d 77 69 64 74 |%!(16+bp|l%)=widt|
|00003710| 68 25 0d 11 12 1e 62 75 | 66 66 6c 61 67 25 21 28 |h%....bu|fflag%!(|
|00003720| 32 30 2b 62 70 6c 25 29 | 3d 68 65 69 67 68 74 25 |20+bpl%)|=height%|
|00003730| 0d 11 1c 1b 62 75 66 66 | 6c 61 67 25 21 28 32 34 |....buff|lag%!(24|
|00003740| 2b 62 70 6c 25 29 3d 67 | 61 70 25 0d 11 26 0c 3d |+bpl%)=g|ap%..&.=|
|00003750| 62 70 6c 25 2b 32 38 0d | 11 30 04 0d 11 3a 37 dd |bpl%+28.|.0...:7.|
|00003760| 20 a4 6d 65 6e 75 69 74 | 65 6d 28 62 70 6c 25 2c | .menuit|em(bpl%,|
|00003770| 62 75 66 66 6c 61 67 25 | 2c 66 6c 61 67 25 2c 69 |bufflag%|,flag%,i|
|00003780| 68 61 6e 25 2c 69 64 61 | 74 61 25 2c 6e 61 6d 65 |han%,ida|ta%,name|
|00003790| 24 29 0d 11 44 0b ea 20 | 70 6f 73 73 25 0d 11 4e |$)..D.. |poss%..N|
|000037a0| 3b e7 20 31 36 2a 28 a9 | 20 6e 61 6d 65 24 2b 31 |;. 16*(.| name$+1|
|000037b0| 29 3e 62 75 66 66 6c 61 | 67 25 21 31 36 20 62 75 |)>buffla|g%!16 bu|
|000037c0| 66 66 6c 61 67 25 21 31 | 36 3d 31 36 2a 28 a9 20 |fflag%!1|6=16*(. |
|000037d0| 6e 61 6d 65 24 2b 31 29 | 0d 11 58 12 62 75 66 66 |name$+1)|..X.buff|
|000037e0| 6c 61 67 25 2b 3d 62 70 | 6c 25 0d 11 62 13 21 62 |lag%+=bp|l%..b.!b|
|000037f0| 75 66 66 6c 61 67 25 3d | 66 6c 61 67 25 0d 11 6c |ufflag%=|flag%..l|
|00003800| 14 62 75 66 66 6c 61 67 | 25 21 34 3d 69 68 61 6e |.bufflag|%!4=ihan|
|00003810| 25 0d 11 76 24 e7 20 a9 | 20 6e 61 6d 65 24 3c 31 |%..v$. .| name$<1|
|00003820| 32 20 80 20 28 69 64 61 | 74 61 25 80 31 3c 3c 38 |2 . (ida|ta%.1<<8|
|00003830| 29 3d 30 20 8c 0d 11 80 | 19 20 24 28 62 75 66 66 |)=0 ....|. $(buff|
|00003840| 6c 61 67 25 2b 31 32 29 | 3d 6e 61 6d 65 24 0d 11 |lag%+12)|=name$..|
|00003850| 8a 05 cc 0d 11 94 1c 20 | e7 20 6d 64 61 74 70 25 |....... |. mdatp%|
|00003860| 3c 69 6e 64 69 72 6d 64 | 73 69 7a 65 25 20 8c 0d |<indirmd|size% ..|
|00003870| 11 9e 17 20 69 64 61 74 | 61 25 3d 69 64 61 74 61 |... idat|a%=idata|
|00003880| 25 84 31 3c 3c 38 0d 11 | a8 22 20 62 75 66 66 6c |%.1<<8..|." buffl|
|00003890| 61 67 25 21 31 32 3d 69 | 6e 6d 65 6e 75 64 61 74 |ag%!12=i|nmenudat|
|000038a0| 25 2b 6d 64 61 74 70 25 | 0d 11 b2 12 20 62 75 66 |%+mdatp%|.... buf|
|000038b0| 66 6c 61 67 25 21 31 36 | 3d 30 0d 11 bc 1a 20 62 |flag%!16|=0.... b|
|000038c0| 75 66 66 6c 61 67 25 21 | 32 30 3d 31 2b a9 20 6e |ufflag%!|20=1+. n|
|000038d0| 61 6d 65 24 0d 11 c6 18 | 20 e3 20 70 6f 73 73 25 |ame$....| . poss%|
|000038e0| 3d 31 20 b8 20 a9 20 6e | 61 6d 65 24 0d 11 d0 33 |=1 . . n|ame$...3|
|000038f0| 20 69 6e 6d 65 6e 75 64 | 61 74 25 21 28 70 6f 73 | inmenud|at%!(pos|
|00003900| 73 25 2b 6d 64 61 74 70 | 25 2d 31 29 3d 97 28 c1 |s%+mdatp|%-1)=.(.|
|00003910| 6e 61 6d 65 24 2c 70 6f | 73 73 25 2c 31 29 29 0d |name$,po|ss%,1)).|
|00003920| 11 da 06 20 ed 0d 11 e4 | 20 20 69 6e 6d 65 6e 75 |... ....| inmenu|
|00003930| 64 61 74 25 21 28 70 6f | 73 73 25 2b 6d 64 61 74 |dat%!(po|ss%+mdat|
|00003940| 70 25 29 3d 30 0d 11 ee | 16 20 6d 64 61 74 70 25 |p%)=0...|. mdatp%|
|00003950| 2b 3d 32 2b a9 20 6e 61 | 6d 65 24 0d 11 f8 06 20 |+=2+. na|me$.... |
|00003960| cd 0d 12 02 05 cd 0d 12 | 0c 15 62 75 66 66 6c 61 |........|..buffla|
|00003970| 67 25 21 38 3d 69 64 61 | 74 61 25 0d 12 16 0c 62 |g%!8=ida|ta%....b|
|00003980| 70 6c 25 2b 3d 32 34 0d | 12 20 09 3d 62 70 6c 25 |pl%+=24.|. .=bpl%|
|00003990| 0d 12 2a 04 0d 12 34 22 | dd 20 a4 64 69 72 5f 6d |..*...4"|. .dir_m|
|000039a0| 65 6e 75 28 66 69 6c 65 | 73 24 2c 64 69 72 24 2c |enu(file|s$,dir$,|
|000039b0| 74 79 70 65 25 29 0d 12 | 3e 0b ea 20 69 74 65 6d |type%)..|>.. item|
|000039c0| 25 0d 12 48 0b 69 74 65 | 6d 25 3d 30 0d 12 52 3a |%..H.ite|m%=0..R:|
|000039d0| c8 99 20 22 4f 53 5f 47 | 42 50 42 22 2c 31 32 2c |.. "OS_G|BPB",12,|
|000039e0| 64 69 72 24 2c 73 63 72 | 61 70 62 25 2c 31 2c 69 |dir$,scr|apb%,1,i|
|000039f0| 74 65 6d 25 2c 32 35 36 | 2c 30 20 b8 20 2c 2c 2c |tem%,256|,0 . ,,,|
|00003a00| 2c 69 74 65 6d 25 0d 12 | 5c 10 c8 95 20 69 74 65 |,item%..|\... ite|
|00003a10| 6d 25 3c 3e 2d 31 0d 12 | 66 55 20 20 e7 20 28 73 |m%<>-1..|fU . (s|
|00003a20| 63 72 61 70 62 25 21 31 | 36 3d 31 29 20 80 20 28 |crapb%!1|6=1) . (|
|00003a30| 73 63 72 61 70 62 25 21 | 32 30 3d 74 79 70 65 25 |scrapb%!|20=type%|
|00003a40| 29 20 8c 20 66 69 6c 65 | 73 24 2b 3d 22 2c 22 2b |) . file|s$+=","+|
|00003a50| a4 67 65 74 5f 74 65 72 | 6d 69 6e 61 74 6f 72 28 |.get_ter|minator(|
|00003a60| 73 63 72 61 70 62 25 2b | 32 34 29 0d 12 70 05 cd |scrapb%+|24)..p..|
|00003a70| 0d 12 7a 3a c8 99 20 22 | 4f 53 5f 47 42 50 42 22 |..z:.. "|OS_GBPB"|
|00003a80| 2c 31 32 2c 64 69 72 24 | 2c 73 63 72 61 70 62 25 |,12,dir$|,scrapb%|
|00003a90| 2c 31 2c 69 74 65 6d 25 | 2c 32 35 36 2c 30 20 b8 |,1,item%|,256,0 .|
|00003aa0| 20 2c 2c 2c 2c 69 74 65 | 6d 25 0d 12 84 05 ce 0d | ,,,,ite|m%......|
|00003ab0| 12 8e 0b 3d 66 69 6c 65 | 73 24 0d 12 98 04 0d 12 |...=file|s$......|
|00003ac0| a2 24 dd 20 a4 64 69 72 | 5f 6d 65 6e 75 73 70 28 |.$. .dir|_menusp(|
|00003ad0| 66 69 6c 65 73 24 2c 64 | 69 72 24 2c 74 79 70 65 |files$,d|ir$,type|
|00003ae0| 25 29 0d 12 ac 15 ea 20 | 69 74 65 6d 25 2c 66 69 |%)..... |item%,fi|
|00003af0| 6c 65 6e 61 6d 65 24 0d | 12 b6 0b 69 74 65 6d 25 |lename$.|...item%|
|00003b00| 3d 30 0d 12 c0 3a c8 99 | 20 22 4f 53 5f 47 42 50 |=0...:..| "OS_GBP|
|00003b10| 42 22 2c 31 32 2c 64 69 | 72 24 2c 73 63 72 61 70 |B",12,di|r$,scrap|
|00003b20| 62 25 2c 31 2c 69 74 65 | 6d 25 2c 32 35 36 2c 30 |b%,1,ite|m%,256,0|
|00003b30| 20 b8 20 2c 2c 2c 2c 69 | 74 65 6d 25 0d 12 ca 10 | . ,,,,i|tem%....|
|00003b40| c8 95 20 69 74 65 6d 25 | 3c 3e 2d 31 0d 12 d4 2d |.. item%|<>-1...-|
|00003b50| 20 20 e7 20 28 73 63 72 | 61 70 62 25 21 31 36 3d | . (scr|apb%!16=|
|00003b60| 31 29 20 80 20 28 73 63 | 72 61 70 62 25 21 32 30 |1) . (sc|rapb%!20|
|00003b70| 3d 74 79 70 65 25 29 20 | 8c 0d 12 de 2b 20 20 66 |=type%) |....+ f|
|00003b80| 69 6c 65 6e 61 6d 65 24 | 3d a4 67 65 74 5f 74 65 |ilename$|=.get_te|
|00003b90| 72 6d 69 6e 61 74 6f 72 | 28 73 63 72 61 70 62 25 |rminator|(scrapb%|
|00003ba0| 2b 32 34 29 0d 12 e8 5c | 20 20 e7 20 ac 20 a4 69 |+24)...\| . . .i|
|00003bb0| 73 5f 69 6e 5f 6c 69 73 | 74 28 a4 72 65 6d 6f 76 |s_in_lis|t(.remov|
|00003bc0| 65 5f 6d 6f 64 65 6e 75 | 6d 73 28 a4 6c 6f 77 65 |e_modenu|ms(.lowe|
|00003bd0| 72 5f 63 61 73 65 28 66 | 69 6c 65 6e 61 6d 65 24 |r_case(f|ilename$|
|00003be0| 29 29 2c 66 69 6c 65 73 | 24 29 20 66 69 6c 65 73 |)),files|$) files|
|00003bf0| 24 2b 3d 22 2c 22 2b 66 | 69 6c 65 6e 61 6d 65 24 |$+=","+f|ilename$|
|00003c00| 0d 12 f2 05 cd 0d 12 fc | 3a c8 99 20 22 4f 53 5f |........|:.. "OS_|
|00003c10| 47 42 50 42 22 2c 31 32 | 2c 64 69 72 24 2c 73 63 |GBPB",12|,dir$,sc|
|00003c20| 72 61 70 62 25 2c 31 2c | 69 74 65 6d 25 2c 32 35 |rapb%,1,|item%,25|
|00003c30| 36 2c 30 20 b8 20 2c 2c | 2c 2c 69 74 65 6d 25 0d |6,0 . ,,|,,item%.|
|00003c40| 13 06 05 ce 0d 13 10 0b | 3d 66 69 6c 65 73 24 0d |........|=files$.|
|00003c50| 13 1a 04 0d 13 24 1e dd | 20 a4 69 73 5f 69 6e 5f |.....$..| .is_in_|
|00003c60| 6c 69 73 74 28 6e 61 6d | 65 24 2c 6c 69 73 74 24 |list(nam|e$,list$|
|00003c70| 29 0d 13 2e 12 ea 20 70 | 6f 73 73 25 2c 6e 70 6f |)..... p|oss%,npo|
|00003c80| 73 73 25 0d 13 38 0c 6e | 70 6f 73 73 25 3d 30 0d |ss%..8.n|poss%=0.|
|00003c90| 13 42 0b 70 6f 73 73 25 | 3d 31 0d 13 4c 05 f5 0d |.B.poss%|=1..L...|
|00003ca0| 13 56 1c 6e 70 6f 73 73 | 25 3d a7 6c 69 73 74 24 |.V.nposs|%=.list$|
|00003cb0| 2c 22 2c 22 2c 70 6f 73 | 73 25 29 0d 13 60 2d f1 |,",",pos|s%)..`-.|
|00003cc0| 20 70 6f 73 73 25 2c 6e | 70 6f 73 73 25 2c c1 6c | poss%,n|poss%,.l|
|00003cd0| 69 73 74 24 2c 70 6f 73 | 73 25 2c 6e 70 6f 73 73 |ist$,pos|s%,nposs|
|00003ce0| 25 2d 70 6f 73 73 25 29 | 0d 13 6a 36 e7 20 a4 6c |%-poss%)|..j6. .l|
|00003cf0| 6f 77 65 72 5f 63 61 73 | 65 28 c1 6c 69 73 74 24 |ower_cas|e(.list$|
|00003d00| 2c 70 6f 73 73 25 2c 6e | 70 6f 73 73 25 2d 70 6f |,poss%,n|poss%-po|
|00003d10| 73 73 25 29 29 3d 6e 61 | 6d 65 24 20 3d b9 0d 13 |ss%))=na|me$ =...|
|00003d20| 74 12 70 6f 73 73 25 3d | 6e 70 6f 73 73 25 2b 31 |t.poss%=|nposs%+1|
|00003d30| 0d 13 7e 0e fd 20 6e 70 | 6f 73 73 25 3d 30 0d 13 |..~.. np|oss%=0..|
|00003d40| 88 06 3d a3 0d 13 92 04 | 0d 13 9c 1f dd 20 a4 72 |..=.....|..... .r|
|00003d50| 65 6d 6f 76 65 5f 6d 6f | 64 65 6e 75 6d 73 28 73 |emove_mo|denums(s|
|00003d60| 70 72 69 74 65 24 29 0d | 13 a6 88 e7 20 c2 73 70 |prite$).|.... .sp|
|00003d70| 72 69 74 65 24 2c 31 29 | 3e 3d 22 31 22 20 80 20 |rite$,1)|>="1" . |
|00003d80| c2 73 70 72 69 74 65 24 | 2c 31 29 3c 3d 22 39 22 |.sprite$|,1)<="9"|
|00003d90| 20 80 20 c1 73 70 72 69 | 74 65 24 2c a9 28 73 70 | . .spri|te$,.(sp|
|00003da0| 72 69 74 65 24 29 2d 31 | 2c 31 29 3e 3d 22 31 22 |rite$)-1|,1)>="1"|
|00003db0| 20 80 20 c1 73 70 72 69 | 74 65 24 2c a9 28 73 70 | . .spri|te$,.(sp|
|00003dc0| 72 69 74 65 24 29 2d 31 | 2c 31 29 3c 3d 22 39 22 |rite$)-1|,1)<="9"|
|00003dd0| 20 73 70 72 69 74 65 24 | 3d c0 73 70 72 69 74 65 | sprite$|=.sprite|
|00003de0| 24 2c a9 28 73 70 72 69 | 74 65 24 29 2d 32 29 0d |$,.(spri|te$)-2).|
|00003df0| 13 b0 0c 3d 73 70 72 69 | 74 65 24 0d 13 ba 04 0d |...=spri|te$.....|
|00003e00| 13 c4 42 f4 20 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..B. ***|********|
|00003e10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 53 75 70 70 6f 72 74 |********|*Support|
|00003e20| 20 50 72 6f 63 65 64 75 | 72 65 73 2a 2a 2a 2a 2a | Procedu|res*****|
|00003e30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003e40| 2a 0d 13 ce 26 f4 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |*...&. *|********|
|00003e50| 2a 2a 2a 2a 2a 49 63 6f | 6e 73 2a 2a 2a 2a 2a 2a |*****Ico|ns******|
|00003e60| 2a 2a 2a 2a 2a 2a 2a 0d | 13 d8 2a dd 20 f2 63 68 |*******.|..*. .ch|
|00003e70| 61 6e 67 65 69 63 6f 6e | 6e 61 6d 65 28 68 61 6e |angeicon|name(han|
|00003e80| 64 6c 65 25 2c 69 63 6f | 6e 25 2c 6e 61 6d 65 24 |dle%,ico|n%,name$|
|00003e90| 29 0d 13 e2 19 ea 20 69 | 6e 64 69 72 25 2c 69 66 |)..... i|ndir%,if|
|00003ea0| 6c 61 67 73 25 2c 77 62 | 6c 25 0d 13 ec 13 77 62 |lags%,wb|l%....wb|
|00003eb0| 6c 25 3d 62 6c 6f 63 6b | 25 2b 32 35 36 0d 13 f6 |l%=block|%+256...|
|00003ec0| 11 21 77 62 6c 25 3d 68 | 61 6e 64 6c 65 25 0d 14 |.!wbl%=h|andle%..|
|00003ed0| 00 10 77 62 6c 25 21 34 | 3d 69 63 6f 6e 25 0d 14 |..wbl%!4|=icon%..|
|00003ee0| 0a 20 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |. .. "Wi|mp_GetIc|
|00003ef0| 6f 6e 53 74 61 74 65 22 | 2c 2c 77 62 6c 25 0d 14 |onState"|,,wbl%..|
|00003f00| 14 13 69 66 6c 61 67 73 | 25 3d 77 62 6c 25 21 32 |..iflags|%=wbl%!2|
|00003f10| 34 0d 14 1e 27 e7 20 69 | 66 6c 61 67 73 25 20 80 |4...'. i|flags% .|
|00003f20| 20 28 31 3c 3c 38 20 84 | 20 31 29 3d 28 31 3c 3c | (1<<8 .| 1)=(1<<|
|00003f30| 38 20 84 20 31 29 20 8c | 0d 14 28 13 20 69 6e 64 |8 . 1) .|..(. ind|
|00003f40| 69 72 25 3d 77 62 6c 25 | 21 32 38 0d 14 32 3d 20 |ir%=wbl%|!28..2= |
|00003f50| e7 20 69 6e 64 69 72 25 | 3e 26 38 30 30 30 20 80 |. indir%|>&8000 .|
|00003f60| 20 69 6e 64 69 72 25 3c | 26 38 30 30 30 2b 31 36 | indir%<|&8000+16|
|00003f70| 2a 31 30 32 34 2a 31 30 | 32 34 20 24 69 6e 64 69 |*1024*10|24 $indi|
|00003f80| 72 25 3d 6e 61 6d 65 24 | 0d 14 3c 20 20 f2 75 70 |r%=name$|..< .up|
|00003f90| 64 61 74 65 5f 69 63 6f | 6e 28 68 61 6e 64 6c 65 |date_ico|n(handle|
|00003fa0| 25 2c 69 63 6f 6e 25 29 | 0d 14 46 05 cd 0d 14 50 |%,icon%)|..F....P|
|00003fb0| 05 e1 0d 14 5a 04 0d 14 | 64 2b dd 20 f2 63 68 61 |....Z...|d+. .cha|
|00003fc0| 6e 67 65 69 63 6f 6e 76 | 61 6c 69 64 28 68 61 6e |ngeiconv|alid(han|
|00003fd0| 64 6c 65 25 2c 69 63 6f | 6e 25 2c 6e 61 6d 65 24 |dle%,ico|n%,name$|
|00003fe0| 29 0d 14 6e 19 ea 20 69 | 6e 64 69 72 25 2c 69 66 |)..n.. i|ndir%,if|
|00003ff0| 6c 61 67 73 25 2c 77 62 | 6c 25 0d 14 78 13 77 62 |lags%,wb|l%..x.wb|
|00004000| 6c 25 3d 62 6c 6f 63 6b | 25 2b 32 35 36 0d 14 82 |l%=block|%+256...|
|00004010| 11 21 77 62 6c 25 3d 68 | 61 6e 64 6c 65 25 0d 14 |.!wbl%=h|andle%..|
|00004020| 8c 10 77 62 6c 25 21 34 | 3d 69 63 6f 6e 25 0d 14 |..wbl%!4|=icon%..|
|00004030| 96 20 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |. .. "Wi|mp_GetIc|
|00004040| 6f 6e 53 74 61 74 65 22 | 2c 2c 77 62 6c 25 0d 14 |onState"|,,wbl%..|
|00004050| a0 13 69 66 6c 61 67 73 | 25 3d 77 62 6c 25 21 32 |..iflags|%=wbl%!2|
|00004060| 34 0d 14 aa 27 e7 20 69 | 66 6c 61 67 73 25 20 80 |4...'. i|flags% .|
|00004070| 20 28 31 3c 3c 38 20 84 | 20 31 29 3d 28 31 3c 3c | (1<<8 .| 1)=(1<<|
|00004080| 38 20 84 20 31 29 20 8c | 0d 14 b4 13 20 76 61 6c |8 . 1) .|.... val|
|00004090| 69 64 25 3d 77 62 6c 25 | 21 33 32 0d 14 be 2f 20 |id%=wbl%|!32.../ |
|000040a0| e7 20 76 61 6c 69 64 25 | 3e 26 38 30 30 30 20 80 |. valid%|>&8000 .|
|000040b0| 20 76 61 6c 69 64 25 3c | 26 38 30 30 30 2b 31 36 | valid%<|&8000+16|
|000040c0| 2a 31 30 32 34 2a 31 30 | 32 34 0d 14 c8 12 20 24 |*1024*10|24.... $|
|000040d0| 76 61 6c 69 64 25 3d 6e | 61 6d 65 24 0d 14 d2 05 |valid%=n|ame$....|
|000040e0| cd 0d 14 dc 05 e1 0d 14 | e6 04 0d 14 f0 43 dd 20 |........|.....C. |
|000040f0| f2 67 65 74 5f 69 63 6f | 6e 73 63 6f 6f 72 64 73 |.get_ico|nscoords|
|00004100| 28 77 68 61 6e 25 2c 69 | 68 61 6e 25 2c f8 20 69 |(whan%,i|han%,. i|
|00004110| 6d 69 78 25 2c f8 20 69 | 6d 69 79 25 2c f8 20 69 |mix%,. i|miy%,. i|
|00004120| 6d 61 78 25 2c f8 20 69 | 6d 61 79 25 29 0d 14 fa |max%,. i|may%)...|
|00004130| 11 21 62 6c 6f 63 6b 25 | 3d 77 68 61 6e 25 0d 15 |.!block%|=whan%..|
|00004140| 04 12 62 6c 6f 63 6b 25 | 21 34 3d 69 68 61 6e 25 |..block%|!4=ihan%|
|00004150| 0d 15 0e 23 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |...#.. "|Wimp_Get|
|00004160| 57 69 6e 64 6f 77 49 6e | 66 6f 22 2c 2c 62 6c 6f |WindowIn|fo",,blo|
|00004170| 63 6b 25 0d 15 18 12 77 | 69 6e 78 25 3d 62 6c 6f |ck%....w|inx%=blo|
|00004180| 63 6b 25 21 34 0d 15 22 | 13 77 69 6e 79 25 3d 62 |ck%!4.."|.winy%=b|
|00004190| 6c 6f 63 6b 25 21 31 36 | 0d 15 2c 1c 77 61 78 25 |lock%!16|..,.wax%|
|000041a0| 3d 62 6c 6f 63 6b 25 21 | 34 34 2b 62 6c 6f 63 6b |=block%!|44+block|
|000041b0| 25 21 32 30 0d 15 36 1c | 77 61 79 25 3d 62 6c 6f |%!20..6.|way%=blo|
|000041c0| 63 6b 25 21 35 36 2b 62 | 6c 6f 63 6b 25 21 32 34 |ck%!56+b|lock%!24|
|000041d0| 0d 15 40 12 62 6c 6f 63 | 6b 25 21 34 3d 69 68 61 |..@.bloc|k%!4=iha|
|000041e0| 6e 25 0d 15 4a 22 c8 99 | 20 22 57 69 6d 70 5f 47 |n%..J"..| "Wimp_G|
|000041f0| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 62 6c |etIconSt|ate",,bl|
|00004200| 6f 63 6b 25 0d 15 54 1f | 69 6d 69 78 25 3d 28 62 |ock%..T.|imix%=(b|
|00004210| 6c 6f 63 6b 25 21 38 2b | 77 69 6e 78 25 2d 77 61 |lock%!8+|winx%-wa|
|00004220| 78 25 29 0d 15 5e 20 69 | 6d 69 79 25 3d 28 62 6c |x%)..^ i|miy%=(bl|
|00004230| 6f 63 6b 25 21 31 32 2b | 77 69 6e 79 25 2d 77 61 |ock%!12+|winy%-wa|
|00004240| 79 25 29 0d 15 68 20 69 | 6d 61 78 25 3d 28 62 6c |y%)..h i|max%=(bl|
|00004250| 6f 63 6b 25 21 31 36 2b | 77 69 6e 78 25 2d 77 61 |ock%!16+|winx%-wa|
|00004260| 78 25 29 0d 15 72 20 69 | 6d 61 79 25 3d 28 62 6c |x%)..r i|may%=(bl|
|00004270| 6f 63 6b 25 21 32 30 2b | 77 69 6e 79 25 2d 77 61 |ock%!20+|winy%-wa|
|00004280| 79 25 29 0d 15 7c 05 e1 | 0d 15 86 04 0d 15 90 21 |y%)..|..|.......!|
|00004290| dd 20 f2 75 70 64 61 74 | 65 5f 69 63 6f 6e 28 68 |. .updat|e_icon(h|
|000042a0| 61 6e 64 6c 65 25 2c 69 | 63 6f 6e 25 29 0d 15 9a |andle%,i|con%)...|
|000042b0| 0a ea 20 77 62 6c 25 0d | 15 a4 13 77 62 6c 25 3d |.. wbl%.|...wbl%=|
|000042c0| 62 6c 6f 63 6b 25 2b 32 | 35 36 0d 15 ae 11 21 77 |block%+2|56....!w|
|000042d0| 62 6c 25 3d 68 61 6e 64 | 6c 65 25 0d 15 b8 10 77 |bl%=hand|le%....w|
|000042e0| 62 6c 25 21 34 3d 69 63 | 6f 6e 25 0d 15 c2 0c 77 |bl%!4=ic|on%....w|
|000042f0| 62 6c 25 21 38 3d 30 0d | 15 cc 0d 77 62 6c 25 21 |bl%!8=0.|...wbl%!|
|00004300| 31 32 3d 30 0d 15 d6 20 | c8 99 20 22 57 69 6d 70 |12=0... |.. "Wimp|
|00004310| 5f 53 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_SetIcon|State",,|
|00004320| 77 62 6c 25 0d 15 e0 05 | e1 0d 15 ea 04 0d 15 f4 |wbl%....|........|
|00004330| 24 dd 20 a4 67 65 74 5f | 69 63 6f 6e 5f 76 61 6c |$. .get_|icon_val|
|00004340| 75 65 28 68 61 6e 64 6c | 65 25 2c 69 63 6f 6e 25 |ue(handl|e%,icon%|
|00004350| 29 0d 15 fe 0a ea 20 77 | 62 6c 25 0d 16 08 13 77 |)..... w|bl%....w|
|00004360| 62 6c 25 3d 62 6c 6f 63 | 6b 25 2b 32 35 36 0d 16 |bl%=bloc|k%+256..|
|00004370| 12 11 21 77 62 6c 25 3d | 68 61 6e 64 6c 65 25 0d |..!wbl%=|handle%.|
|00004380| 16 1c 10 77 62 6c 25 21 | 34 3d 69 63 6f 6e 25 0d |...wbl%!|4=icon%.|
|00004390| 16 26 20 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 49 |.& .. "W|imp_GetI|
|000043a0| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 77 62 6c 25 0d |conState|",,wbl%.|
|000043b0| 16 30 0f 3d 24 28 77 62 | 6c 25 21 32 38 29 0d 16 |.0.=$(wb|l%!28)..|
|000043c0| 3a 04 0d 16 44 24 dd 20 | a4 67 65 74 5f 69 63 6f |:...D$. |.get_ico|
|000043d0| 6e 5f 73 74 61 74 65 28 | 68 61 6e 64 6c 65 25 2c |n_state(|handle%,|
|000043e0| 69 63 6f 6e 25 29 0d 16 | 4e 0a ea 20 77 62 6c 25 |icon%)..|N.. wbl%|
|000043f0| 0d 16 58 13 77 62 6c 25 | 3d 62 6c 6f 63 6b 25 2b |..X.wbl%|=block%+|
|00004400| 32 35 36 0d 16 62 11 21 | 77 62 6c 25 3d 68 61 6e |256..b.!|wbl%=han|
|00004410| 64 6c 65 25 0d 16 6c 10 | 77 62 6c 25 21 34 3d 69 |dle%..l.|wbl%!4=i|
|00004420| 63 6f 6e 25 0d 16 76 20 | c8 99 20 22 57 69 6d 70 |con%..v |.. "Wimp|
|00004430| 5f 47 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_GetIcon|State",,|
|00004440| 77 62 6c 25 0d 16 80 0c | 3d 77 62 6c 25 21 32 34 |wbl%....|=wbl%!24|
|00004450| 0d 16 8a 04 0d 16 94 30 | dd 20 f2 73 65 74 5f 69 |.......0|. .set_i|
|00004460| 63 6f 6e 5f 73 74 61 74 | 65 28 68 61 6e 64 6c 65 |con_stat|e(handle|
|00004470| 25 2c 69 63 6f 6e 25 2c | 65 6f 72 25 2c 63 6c 65 |%,icon%,|eor%,cle|
|00004480| 61 72 25 29 0d 16 9e 0a | ea 20 77 62 6c 25 0d 16 |ar%)....|. wbl%..|
|00004490| a8 13 77 62 6c 25 3d 62 | 6c 6f 63 6b 25 2b 32 35 |..wbl%=b|lock%+25|
|000044a0| 36 0d 16 b2 11 21 77 62 | 6c 25 3d 68 61 6e 64 6c |6....!wb|l%=handl|
|000044b0| 65 25 0d 16 bc 10 77 62 | 6c 25 21 34 3d 69 63 6f |e%....wb|l%!4=ico|
|000044c0| 6e 25 0d 16 c6 0f 77 62 | 6c 25 21 38 3d 65 6f 72 |n%....wb|l%!8=eor|
|000044d0| 25 0d 16 d0 12 77 62 6c | 25 21 31 32 3d 63 6c 65 |%....wbl|%!12=cle|
|000044e0| 61 72 25 0d 16 da 20 c8 | 99 20 22 57 69 6d 70 5f |ar%... .|. "Wimp_|
|000044f0| 53 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 77 |SetIconS|tate",,w|
|00004500| 62 6c 25 0d 16 e4 05 e1 | 0d 16 ee 04 0d 16 f8 2b |bl%.....|.......+|
|00004510| dd 20 f2 64 72 61 67 5f | 62 6f 78 28 77 68 61 6e |. .drag_|box(whan|
|00004520| 25 2c 69 68 61 6e 25 2c | 73 70 72 69 74 65 25 2c |%,ihan%,|sprite%,|
|00004530| 73 6e 61 6d 65 24 29 0d | 17 02 48 f2 67 65 74 5f |sname$).|..H.get_|
|00004540| 69 63 6f 6e 73 63 6f 6f | 72 64 73 28 77 68 61 6e |iconscoo|rds(whan|
|00004550| 25 2c 69 68 61 6e 25 2c | 62 6c 6f 63 6b 25 21 38 |%,ihan%,|block%!8|
|00004560| 2c 62 6c 6f 63 6b 25 21 | 31 32 2c 62 6c 6f 63 6b |,block%!|12,block|
|00004570| 25 21 31 36 2c 62 6c 6f | 63 6b 25 21 32 30 29 0d |%!16,blo|ck%!20).|
|00004580| 17 0c 0e 62 6c 6f 63 6b | 25 21 34 3d 35 0d 17 16 |...block|%!4=5...|
|00004590| 1a 62 6c 6f 63 6b 25 21 | 32 34 3d 73 63 72 65 65 |.block%!|24=scree|
|000045a0| 6e 5f 78 6d 69 6e 25 0d | 17 20 1a 62 6c 6f 63 6b |n_xmin%.|. .block|
|000045b0| 25 21 32 38 3d 73 63 72 | 65 65 6e 5f 79 6d 69 6e |%!28=scr|een_ymin|
|000045c0| 25 0d 17 2a 1a 62 6c 6f | 63 6b 25 21 33 32 3d 73 |%..*.blo|ck%!32=s|
|000045d0| 63 72 65 65 6e 5f 78 6d | 61 78 25 0d 17 34 1a 62 |creen_xm|ax%..4.b|
|000045e0| 6c 6f 63 6b 25 21 33 36 | 3d 73 63 72 65 65 6e 5f |lock%!36|=screen_|
|000045f0| 79 6d 61 78 25 0d 17 3e | 7e e7 20 73 70 72 69 74 |ymax%..>|~. sprit|
|00004600| 65 25 20 80 20 64 72 61 | 67 73 74 25 3c 3e 2d 31 |e% . dra|gst%<>-1|
|00004610| 20 c8 99 20 64 72 61 67 | 73 74 25 2c 31 39 37 2c | .. drag|st%,197,|
|00004620| 31 2c 73 6e 61 6d 65 24 | 2c 62 6c 6f 63 6b 25 2b |1,sname$|,block%+|
|00004630| 38 2c 62 6c 6f 63 6b 25 | 2b 32 34 3a 64 72 61 67 |8,block%|+24:drag|
|00004640| 73 70 72 69 74 65 25 3d | b9 20 8b 20 c8 99 20 22 |sprite%=|. . .. "|
|00004650| 57 69 6d 70 5f 44 72 61 | 67 42 6f 78 22 2c 2c 62 |Wimp_Dra|gBox",,b|
|00004660| 6c 6f 63 6b 25 3a 64 72 | 61 67 73 70 72 69 74 65 |lock%:dr|agsprite|
|00004670| 25 3d a3 0d 17 48 05 e1 | 0d 17 52 04 0d 17 5c 29 |%=...H..|..R...\)|
|00004680| f4 20 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 57 69 6e 64 |. *****|****Wind|
|00004690| 6f 77 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |ow******|********|
|000046a0| 2a 2a 2a 2a 2a 0d 17 66 | 31 dd 20 a4 6f 70 65 6e |*****..f|1. .open|
|000046b0| 5f 77 69 6e 64 6f 77 74 | 65 6d 70 28 69 62 6c 6f |_windowt|emp(iblo|
|000046c0| 63 6b 25 2c 69 6c 65 6e | 25 2c 66 6f 6e 74 25 2c |ck%,ilen|%,font%,|
|000046d0| 6e 61 6d 65 24 29 0d 17 | 70 0d ea 20 77 69 6e 68 |name$)..|p.. winh|
|000046e0| 61 6e 25 0d 17 7a 53 c8 | 99 20 22 57 69 6d 70 5f |an%..zS.|. "Wimp_|
|000046f0| 4c 6f 61 64 54 65 6d 70 | 6c 61 74 65 22 2c 2c 6c |LoadTemp|late",,l|
|00004700| 69 73 74 61 72 65 61 25 | 2c 69 62 6c 6f 63 6b 25 |istarea%|,iblock%|
|00004710| 2c 69 62 6c 6f 63 6b 25 | 2b 69 6c 65 6e 25 2c 66 |,iblock%|+ilen%,f|
|00004720| 6f 6e 74 25 2c 6e 61 6d | 65 24 20 b8 20 2c 2c 2c |ont%,nam|e$ . ,,,|
|00004730| 2c 2c 2c 6f 6b 25 0d 17 | 84 2b e7 20 6f 6b 25 3d |,,,ok%..|.+. ok%=|
|00004740| 30 20 f2 65 72 72 6f 72 | 28 a4 67 65 74 5f 6d 73 |0 .error|(.get_ms|
|00004750| 67 28 22 77 69 6e 6e 66 | 22 29 2c 30 2c 30 2c 30 |g("winnf|"),0,0,0|
|00004760| 29 0d 17 8e 2f c8 99 20 | 22 57 69 6d 70 5f 43 72 |).../.. |"Wimp_Cr|
|00004770| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 6c 69 73 |eateWind|ow",,lis|
|00004780| 74 61 72 65 61 25 20 b8 | 20 77 69 6e 68 61 6e 25 |tarea% .| winhan%|
|00004790| 0d 17 98 0c 3d 77 69 6e | 68 61 6e 25 0d 17 a2 04 |....=win|han%....|
|000047a0| 0d 17 ac 37 dd 20 f2 6c | 6f 61 64 5f 77 69 6e 64 |...7. .l|oad_wind|
|000047b0| 6f 77 74 65 6d 70 28 61 | 64 64 72 25 2c 69 62 6c |owtemp(a|ddr%,ibl|
|000047c0| 6f 63 6b 25 2c 69 6c 65 | 6e 25 2c 66 6f 6e 74 25 |ock%,ile|n%,font%|
|000047d0| 2c 6e 61 6d 65 24 29 0d | 17 b6 43 c8 99 20 22 57 |,name$).|..C.. "W|
|000047e0| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|000047f0| 22 2c 2c 61 64 64 72 25 | 2c 69 62 6c 6f 63 6b 25 |",,addr%|,iblock%|
|00004800| 2c 69 62 6c 6f 63 6b 25 | 2b 69 6c 65 6e 25 2c 66 |,iblock%|+ilen%,f|
|00004810| 6f 6e 74 25 2c 6e 61 6d | 65 24 0d 17 c0 05 e1 0d |ont%,nam|e$......|
|00004820| 17 ca 04 0d 17 d4 20 dd | 20 f2 63 65 6e 74 72 65 |...... .| .centre|
|00004830| 5f 77 69 6e 5f 63 6f 6f | 72 64 73 28 62 6c 6f 63 |_win_coo|rds(bloc|
|00004840| 6b 25 29 0d 17 de 11 ea | 20 78 77 69 64 25 2c 79 |k%).....| xwid%,y|
|00004850| 77 69 64 25 0d 17 e8 1c | 78 77 69 64 25 3d 62 6c |wid%....|xwid%=bl|
|00004860| 6f 63 6b 25 21 31 32 2d | 62 6c 6f 63 6b 25 21 34 |ock%!12-|block%!4|
|00004870| 0d 17 f2 1c 79 77 69 64 | 25 3d 62 6c 6f 63 6b 25 |....ywid|%=block%|
|00004880| 21 31 36 2d 62 6c 6f 63 | 6b 25 21 38 0d 17 fc 30 |!16-bloc|k%!8...0|
|00004890| 62 6c 6f 63 6b 25 21 34 | 3d 28 73 63 72 65 65 6e |block%!4|=(screen|
|000048a0| 5f 78 6d 61 78 25 2d 73 | 63 72 65 65 6e 5f 78 6d |_xmax%-s|creen_xm|
|000048b0| 69 6e 25 2d 78 77 69 64 | 25 29 2f 32 0d 18 06 30 |in%-xwid|%)/2...0|
|000048c0| 62 6c 6f 63 6b 25 21 38 | 3d 28 73 63 72 65 65 6e |block%!8|=(screen|
|000048d0| 5f 79 6d 61 78 25 2d 73 | 63 72 65 65 6e 5f 79 6d |_ymax%-s|creen_ym|
|000048e0| 69 6e 25 2d 79 77 69 64 | 25 29 2f 32 0d 18 10 1c |in%-ywid|%)/2....|
|000048f0| 62 6c 6f 63 6b 25 21 31 | 32 3d 62 6c 6f 63 6b 25 |block%!1|2=block%|
|00004900| 21 34 2b 78 77 69 64 25 | 0d 18 1a 1c 62 6c 6f 63 |!4+xwid%|....bloc|
|00004910| 6b 25 21 31 36 3d 62 6c | 6f 63 6b 25 21 38 2b 79 |k%!16=bl|ock%!8+y|
|00004920| 77 69 64 25 0d 18 24 05 | e1 0d 18 2e 04 0d 18 38 |wid%..$.|.......8|
|00004930| 36 f4 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |6. *****|********|
|00004940| 2a 2a 2a 2a 2a 2a 2a 2a | 47 65 6e 65 72 61 6c 2a |********|General*|
|00004950| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004960| 2a 2a 2a 0d 18 42 5f dd | 20 f2 64 72 61 67 65 64 |***..B_.| .draged|
|00004970| 5f 73 61 76 65 62 6f 78 | 28 62 6c 6f 63 6b 25 21 |_savebox|(block%!|
|00004980| 32 30 2c 62 6c 6f 63 6b | 25 21 32 34 2c 62 6c 6f |20,block|%!24,blo|
|00004990| 63 6b 25 21 32 38 2c 62 | 6c 6f 63 6b 25 21 33 32 |ck%!28,b|lock%!32|
|000049a0| 2c 62 6c 6f 63 6b 25 21 | 33 36 2c 62 6c 6f 63 6b |,block%!|36,block|
|000049b0| 25 21 34 30 2c 24 28 62 | 6c 6f 63 6b 25 2b 34 34 |%!40,$(b|lock%+44|
|000049c0| 29 29 0d 18 4c 0a ea 20 | 6c 65 6e 25 0d 18 56 2b |))..L.. |len%..V+|
|000049d0| 24 28 62 6c 6f 63 6b 25 | 2b 34 34 29 3d a4 73 74 |$(block%|+44)=.st|
|000049e0| 72 69 70 5f 66 6e 61 6d | 65 28 24 28 62 6c 6f 63 |rip_fnam|e($(bloc|
|000049f0| 6b 25 2b 34 34 29 29 0d | 18 60 35 e7 20 24 28 62 |k%+44)).|.`5. $(b|
|00004a00| 6c 6f 63 6b 25 2b 34 34 | 29 3d 22 22 20 f2 65 72 |lock%+44|)="" .er|
|00004a10| 72 6f 72 28 a4 67 65 74 | 5f 6d 73 67 28 22 42 46 |ror(.get|_msg("BF|
|00004a20| 4e 22 29 2c 30 2c 30 2c | 30 29 3a e1 0d 18 6a 18 |N"),0,0,|0):...j.|
|00004a30| 6c 65 6e 25 3d a9 28 24 | 28 62 6c 6f 63 6b 25 2b |len%=.($|(block%+|
|00004a40| 34 34 29 29 0d 18 74 43 | e7 20 28 34 34 2b 6c 65 |44))..tC|. (44+le|
|00004a50| 6e 25 2b 31 29 83 34 3c | 3e 30 20 21 62 6c 6f 63 |n%+1).4<|>0 !bloc|
|00004a60| 6b 25 3d 28 28 34 38 2b | 6c 65 6e 25 2b 31 29 80 |k%=((48+|len%+1).|
|00004a70| ac 33 29 20 8b 20 21 62 | 6c 6f 63 6b 25 3d 34 38 |.3) . !b|lock%=48|
|00004a80| 2b 6c 65 6e 25 2b 31 0d | 18 7e 16 62 6c 6f 63 6b |+len%+1.|.~.block|
|00004a90| 25 3f 28 34 34 2b 6c 65 | 6e 25 29 3d 30 0d 18 88 |%?(44+le|n%)=0...|
|00004aa0| 0f 62 6c 6f 63 6b 25 21 | 31 32 3d 30 0d 18 92 0f |.block%!|12=0....|
|00004ab0| 62 6c 6f 63 6b 25 21 31 | 36 3d 31 0d 18 9c 37 c8 |block%!1|6=1...7.|
|00004ac0| 99 20 22 57 69 6d 70 5f | 53 65 6e 64 4d 65 73 73 |. "Wimp_|SendMess|
|00004ad0| 61 67 65 22 2c 31 37 2c | 62 6c 6f 63 6b 25 2c 62 |age",17,|block%,b|
|00004ae0| 6c 6f 63 6b 25 21 32 30 | 2c 62 6c 6f 63 6b 25 21 |lock%!20|,block%!|
|00004af0| 32 34 0d 18 a6 05 e1 0d | 18 b0 04 0d 18 ba 1c dd |24......|........|
|00004b00| 20 a4 67 65 74 5f 66 69 | 6c 65 5f 70 61 74 68 28 | .get_fi|le_path(|
|00004b10| 66 6e 61 6d 65 24 29 0d | 18 c4 12 ea 20 6e 6c 6f |fname$).|.... nlo|
|00004b20| 6f 70 25 2c 6c 6f 6f 70 | 25 0d 18 ce 2e e7 20 a4 |op%,loop|%..... .|
|00004b30| 6c 6f 77 65 72 5f 63 61 | 73 65 28 66 6e 61 6d 65 |lower_ca|se(fname|
|00004b40| 24 29 3d 22 3c 77 69 6d | 70 24 73 63 72 61 70 3e |$)="<wim|p$scrap>|
|00004b50| 22 20 8c 20 3d 22 22 0d | 18 d8 0c 6e 6c 6f 6f 70 |" . ="".|...nloop|
|00004b60| 25 3d 30 0d 18 e2 05 f5 | 0d 18 ec 10 6c 6f 6f 70 |%=0.....|....loop|
|00004b70| 25 3d 6e 6c 6f 6f 70 25 | 0d 18 f6 1f 6e 6c 6f 6f |%=nloop%|....nloo|
|00004b80| 70 25 3d a7 66 6e 61 6d | 65 24 2c 22 2e 22 2c 6c |p%=.fnam|e$,".",l|
|00004b90| 6f 6f 70 25 2b 31 29 0d | 19 00 0e fd 20 6e 6c 6f |oop%+1).|.... nlo|
|00004ba0| 6f 70 25 3d 30 0d 19 0a | 15 3d c0 66 6e 61 6d 65 |op%=0...|.=.fname|
|00004bb0| 24 2c 6c 6f 6f 70 25 2d | 31 29 0d 19 14 04 0d 19 |$,loop%-|1)......|
|00004bc0| 1e 1a dd 20 a4 73 74 72 | 69 70 5f 66 6e 61 6d 65 |... .str|ip_fname|
|00004bd0| 28 66 6e 61 6d 65 24 29 | 0d 19 28 0c 6e 6c 6f 6f |(fname$)|..(.nloo|
|00004be0| 70 25 3d 30 0d 19 32 05 | f5 0d 19 3c 10 6c 6f 6f |p%=0..2.|...<.loo|
|00004bf0| 70 25 3d 6e 6c 6f 6f 70 | 25 0d 19 46 1f 6e 6c 6f |p%=nloop|%..F.nlo|
|00004c00| 6f 70 25 3d a7 66 6e 61 | 6d 65 24 2c 22 2e 22 2c |op%=.fna|me$,".",|
|00004c10| 6c 6f 6f 70 25 2b 31 29 | 0d 19 50 0e fd 20 6e 6c |loop%+1)|..P.. nl|
|00004c20| 6f 6f 70 25 3d 30 0d 19 | 5a 1d 3d c2 66 6e 61 6d |oop%=0..|Z.=.fnam|
|00004c30| 65 24 2c a9 28 66 6e 61 | 6d 65 24 29 2d 6c 6f 6f |e$,.(fna|me$)-loo|
|00004c40| 70 25 29 0d 19 64 04 0d | 19 6e 1a dd 20 a4 73 74 |p%)..d..|.n.. .st|
|00004c50| 72 69 70 5f 63 6f 6d 6d | 61 6e 64 28 73 74 72 24 |rip_comm|and(str$|
|00004c60| 29 0d 19 78 0b ea 20 6c | 6f 6f 70 25 0d 19 82 0b |)..x.. l|oop%....|
|00004c70| 6c 6f 6f 70 25 3d 31 0d | 19 8c 19 c8 95 20 c1 73 |loop%=1.|..... .s|
|00004c80| 74 72 24 2c 6c 6f 6f 70 | 25 2c 31 29 3d 22 20 22 |tr$,loop|%,1)=" "|
|00004c90| 0d 19 96 0c 6c 6f 6f 70 | 25 2b 3d 31 0d 19 a0 05 |....loop|%+=1....|
|00004ca0| ce 0d 19 aa 28 3d c1 73 | 74 72 24 2c 6c 6f 6f 70 |....(=.s|tr$,loop|
|00004cb0| 25 2c a7 73 74 72 24 2c | 22 20 22 2c 6c 6f 6f 70 |%,.str$,|" ",loop|
|00004cc0| 25 29 2d 6c 6f 6f 70 25 | 29 0d 19 b4 04 0d 19 be |%)-loop%|).......|
|00004cd0| 1c dd 20 a4 67 65 74 5f | 66 69 6c 65 5f 72 6f 6f |.. .get_|file_roo|
|00004ce0| 74 28 66 6e 61 6d 65 24 | 29 0d 19 c8 1c 3d c0 66 |t(fname$|)....=.f|
|00004cf0| 6e 61 6d 65 24 2c a7 66 | 6e 61 6d 65 24 2c 22 24 |name$,.f|name$,"$|
|00004d00| 22 2c 30 29 29 0d 19 d2 | 04 0d 19 dc 27 dd 20 a4 |",0))...|....'. .|
|00004d10| 63 6f 6e 76 65 72 74 5f | 70 61 74 68 5f 74 6f 5f |convert_|path_to_|
|00004d20| 63 61 6e 6f 6e 69 63 61 | 6c 28 70 61 74 68 24 29 |canonica|l(path$)|
|00004d30| 0d 19 e6 09 ea 20 6f 6b | 25 0d 19 f0 33 c8 99 20 |..... ok|%...3.. |
|00004d40| 22 58 4f 53 5f 46 53 43 | 6f 6e 74 72 6f 6c 22 2c |"XOS_FSC|ontrol",|
|00004d50| 33 37 2c 70 61 74 68 24 | 2c 62 6c 6f 63 6b 25 2c |37,path$|,block%,|
|00004d60| 2c 2c 32 35 36 20 b8 20 | 3b 6f 6b 25 0d 19 fa 0f |,,256 . |;ok%....|
|00004d70| e7 20 6f 6b 25 3d 37 20 | 3d 22 22 0d 1a 04 0c 3d |. ok%=7 |=""....=|
|00004d80| 24 62 6c 6f 63 6b 25 0d | 1a 0e 04 0d 1a 18 21 dd |$block%.|......!.|
|00004d90| 20 a4 63 68 65 63 6b 5f | 66 6f 72 5f 64 69 72 65 | .check_|for_dire|
|00004da0| 63 74 6f 72 79 28 70 61 | 74 68 24 29 0d 1a 22 0b |ctory(pa|th$)..".|
|00004db0| ea 20 74 79 70 65 25 0d | 1a 2c 11 e7 20 70 61 74 |. type%.|.,.. pat|
|00004dc0| 68 24 3d 22 22 20 3d a3 | 0d 1a 36 21 c8 99 20 22 |h$="" =.|..6!.. "|
|00004dd0| 58 4f 53 5f 46 69 6c 65 | 22 2c 35 2c 70 61 74 68 |XOS_File|",5,path|
|00004de0| 24 20 b8 20 74 79 70 65 | 25 0d 1a 40 10 e7 20 74 |$ . type|%..@.. t|
|00004df0| 79 70 65 25 3c 32 20 3d | a3 0d 1a 4a 06 3d b9 0d |ype%<2 =|...J.=..|
|00004e00| 1a 54 04 0d 1a 5e 21 dd | 20 f2 75 70 64 61 74 65 |.T...^!.| .update|
|00004e10| 5f 63 6f 70 79 28 6f 66 | 69 6c 65 24 2c 74 66 69 |_copy(of|ile$,tfi|
|00004e20| 6c 65 24 29 0d 1a 68 0c | ea 20 6d 65 73 73 62 25 |le$)..h.|. messb%|
|00004e30| 0d 1a 72 34 c8 99 20 22 | 57 69 6d 70 5f 53 74 61 |..r4.. "|Wimp_Sta|
|00004e40| 72 74 54 61 73 6b 22 2c | 22 46 69 6c 65 72 5f 41 |rtTask",|"Filer_A|
|00004e50| 63 74 69 6f 6e 22 20 b8 | 20 66 69 6c 65 61 63 74 |ction" .| fileact|
|00004e60| 68 61 6e 25 0d 1a 7c 15 | e7 20 66 69 6c 65 61 63 |han%..|.|. fileac|
|00004e70| 74 68 61 6e 25 3d 30 20 | e1 0d 1a 86 15 6d 65 73 |than%=0 |.....mes|
|00004e80| 73 62 25 3d 62 6c 6f 63 | 6b 25 2b 32 35 36 0d 1a |sb%=bloc|k%+256..|
|00004e90| 90 34 6d 65 73 73 62 25 | 21 34 3d 30 3a 6d 65 73 |.4messb%|!4=0:mes|
|00004ea0| 73 62 25 21 38 3d 30 3a | 6d 65 73 73 62 25 21 31 |sb%!8=0:|messb%!1|
|00004eb0| 32 3d 30 3a 6d 65 73 73 | 62 25 21 31 36 3d 26 34 |2=0:mess|b%!16=&4|
|00004ec0| 30 33 0d 1a 9a 27 24 28 | 6d 65 73 73 62 25 2b 32 |03...'$(|messb%+2|
|00004ed0| 30 29 3d a4 67 65 74 5f | 66 69 6c 65 5f 70 61 74 |0)=.get_|file_pat|
|00004ee0| 68 28 6f 66 69 6c 65 24 | 29 0d 1a a4 29 21 6d 65 |h(ofile$|)...)!me|
|00004ef0| 73 73 62 25 3d 28 28 32 | 30 2b a9 28 24 28 6d 65 |ssb%=((2|0+.($(me|
|00004f00| 73 73 62 25 2b 32 30 29 | 29 2b 31 29 80 ac 33 29 |ssb%+20)|)+1)..3)|
|00004f10| 2b 34 0d 1a ae 21 6d 65 | 73 73 62 25 3f 28 32 30 |+4...!me|ssb%?(20|
|00004f20| 2b a9 28 24 28 6d 65 73 | 73 62 25 2b 32 30 29 29 |+.($(mes|sb%+20))|
|00004f30| 29 3d 30 0d 1a b8 2f c8 | 99 20 22 57 69 6d 70 5f |)=0.../.|. "Wimp_|
|00004f40| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 2c 31 37 2c |SendMess|age",17,|
|00004f50| 6d 65 73 73 62 25 2c 66 | 69 6c 65 61 63 74 68 61 |messb%,f|ileactha|
|00004f60| 6e 25 0d 1a c2 34 6d 65 | 73 73 62 25 21 34 3d 30 |n%...4me|ssb%!4=0|
|00004f70| 3a 6d 65 73 73 62 25 21 | 38 3d 30 3a 6d 65 73 73 |:messb%!|8=0:mess|
|00004f80| 62 25 21 31 32 3d 30 3a | 6d 65 73 73 62 25 21 31 |b%!12=0:|messb%!1|
|00004f90| 36 3d 26 34 30 34 0d 1a | cc 25 24 28 6d 65 73 73 |6=&404..|.%$(mess|
|00004fa0| 62 25 2b 32 30 29 3d a4 | 73 74 72 69 70 5f 66 6e |b%+20)=.|strip_fn|
|00004fb0| 61 6d 65 28 6f 66 69 6c | 65 24 29 0d 1a d6 29 21 |ame(ofil|e$)...)!|
|00004fc0| 6d 65 73 73 62 25 3d 28 | 28 32 30 2b a9 28 24 28 |messb%=(|(20+.($(|
|00004fd0| 6d 65 73 73 62 25 2b 32 | 30 29 29 2b 31 29 80 ac |messb%+2|0))+1)..|
|00004fe0| 33 29 2b 34 0d 1a e0 21 | 6d 65 73 73 62 25 3f 28 |3)+4...!|messb%?(|
|00004ff0| 32 30 2b a9 28 24 28 6d | 65 73 73 62 25 2b 32 30 |20+.($(m|essb%+20|
|00005000| 29 29 29 3d 30 0d 1a ea | 2f c8 99 20 22 57 69 6d |)))=0...|/.. "Wim|
|00005010| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 31 |p_SendMe|ssage",1|
|00005020| 37 2c 6d 65 73 73 62 25 | 2c 66 69 6c 65 61 63 74 |7,messb%|,fileact|
|00005030| 68 61 6e 25 0d 1a f4 34 | 6d 65 73 73 62 25 21 34 |han%...4|messb%!4|
|00005040| 3d 30 3a 6d 65 73 73 62 | 25 21 38 3d 30 3a 6d 65 |=0:messb|%!8=0:me|
|00005050| 73 73 62 25 21 31 32 3d | 30 3a 6d 65 73 73 62 25 |ssb%!12=|0:messb%|
|00005060| 21 31 36 3d 26 34 30 35 | 0d 1a fe 0f 6d 65 73 73 |!16=&405|....mess|
|00005070| 62 25 21 32 30 3d 30 0d | 1b 08 13 6d 65 73 73 62 |b%!20=0.|...messb|
|00005080| 25 21 32 34 3d 25 31 31 | 30 31 0d 1b 12 17 24 28 |%!24=%11|01....$(|
|00005090| 6d 65 73 73 62 25 2b 32 | 38 29 3d 74 66 69 6c 65 |messb%+2|8)=tfile|
|000050a0| 24 0d 1b 1c 29 21 6d 65 | 73 73 62 25 3d 28 28 32 |$...)!me|ssb%=((2|
|000050b0| 38 2b a9 28 24 28 6d 65 | 73 73 62 25 2b 32 38 29 |8+.($(me|ssb%+28)|
|000050c0| 29 2b 31 29 80 ac 33 29 | 2b 34 0d 1b 26 21 6d 65 |)+1)..3)|+4..&!me|
|000050d0| 73 73 62 25 3f 28 32 38 | 2b a9 28 24 28 6d 65 73 |ssb%?(28|+.($(mes|
|000050e0| 73 62 25 2b 32 38 29 29 | 29 3d 30 0d 1b 30 2f c8 |sb%+28))|)=0..0/.|
|000050f0| 99 20 22 57 69 6d 70 5f | 53 65 6e 64 4d 65 73 73 |. "Wimp_|SendMess|
|00005100| 61 67 65 22 2c 31 37 2c | 6d 65 73 73 62 25 2c 66 |age",17,|messb%,f|
|00005110| 69 6c 65 61 63 74 68 61 | 6e 25 0d 1b 3a 05 e1 0d |ileactha|n%..:...|
|00005120| 1b 44 04 0d 1b 4e 22 dd | 20 f2 75 70 64 61 74 65 |.D...N".| .update|
|00005130| 5f 63 6f 70 79 32 28 6f | 66 69 6c 65 24 2c 74 66 |_copy2(o|file$,tf|
|00005140| 69 6c 65 24 29 0d 1b 58 | 3f c8 99 22 58 4f 53 5f |ile$)..X|?.."XOS_|
|00005150| 46 53 43 6f 6e 74 72 6f | 6c 22 2c 32 36 2c 6f 66 |FSContro|l",26,of|
|00005160| 69 6c 65 24 2c 74 66 69 | 6c 65 24 2c 25 31 30 31 |ile$,tfi|le$,%101|
|00005170| 30 30 31 30 30 30 30 30 | 30 30 31 31 20 b8 20 3b |00100000|0011 . ;|
|00005180| 72 65 67 25 0d 1b 62 34 | e7 20 28 72 65 67 25 80 |reg%..b4|. (reg%.|
|00005190| 20 31 29 3d 31 20 8c 20 | f2 65 72 72 6f 72 28 a4 | 1)=1 . |.error(.|
|000051a0| 67 65 74 5f 6d 73 67 28 | 22 55 50 46 41 49 4c 22 |get_msg(|"UPFAIL"|
|000051b0| 29 2c 30 2c 30 2c 30 29 | 0d 1b 6c 05 e1 0d 1b 76 |),0,0,0)|..l....v|
|000051c0| 04 0d 1b 80 16 dd 20 a4 | 67 65 74 5f 6e 75 6c 6c |...... .|get_null|
|000051d0| 28 61 64 64 72 25 29 0d | 1b 8a 13 ea 20 70 6f 73 |(addr%).|.... pos|
|000051e0| 73 25 2c 73 74 72 69 6e | 67 24 0d 1b 94 16 70 6f |s%,strin|g$....po|
|000051f0| 73 73 25 3d 30 3a 73 74 | 72 69 6e 67 24 3d 22 22 |ss%=0:st|ring$=""|
|00005200| 0d 1b 9e 15 c8 95 20 61 | 64 64 72 25 3f 70 6f 73 |...... a|ddr%?pos|
|00005210| 73 25 3c 3e 30 0d 1b a8 | 22 73 74 72 69 6e 67 24 |s%<>0...|"string$|
|00005220| 3d 73 74 72 69 6e 67 24 | 2b bd 28 61 64 64 72 25 |=string$|+.(addr%|
|00005230| 3f 70 6f 73 73 25 29 0d | 1b b2 0c 70 6f 73 73 25 |?poss%).|...poss%|
|00005240| 2b 3d 31 0d 1b bc 05 ce | 0d 1b c6 0c 3d 73 74 72 |+=1.....|....=str|
|00005250| 69 6e 67 24 0d 1b d0 04 | 0d 1b da 1c dd 20 a4 67 |ing$....|..... .g|
|00005260| 65 74 5f 74 65 72 6d 69 | 6e 61 74 6f 72 28 61 64 |et_termi|nator(ad|
|00005270| 64 72 25 29 0d 1b e4 11 | ea 20 6e 61 6d 65 24 2c |dr%)....|. name$,|
|00005280| 70 6f 73 73 25 0d 1b ee | 0b 70 6f 73 73 25 3d 30 |poss%...|.poss%=0|
|00005290| 0d 1b f8 05 f5 0d 1c 02 | 19 6e 61 6d 65 24 2b 3d |........|.name$+=|
|000052a0| bd 28 61 64 64 72 25 3f | 70 6f 73 73 25 29 0d 1c |.(addr%?|poss%)..|
|000052b0| 0c 0c 70 6f 73 73 25 2b | 3d 31 0d 1c 16 37 fd 20 |..poss%+|=1...7. |
|000052c0| 61 64 64 72 25 3f 70 6f | 73 73 25 3d 30 20 84 20 |addr%?po|ss%=0 . |
|000052d0| 61 64 64 72 25 3f 70 6f | 73 73 25 3d 26 30 44 20 |addr%?po|ss%=&0D |
|000052e0| 84 20 61 64 64 72 25 3f | 70 6f 73 73 25 3d 26 30 |. addr%?|poss%=&0|
|000052f0| 41 0d 1c 20 0a 3d 6e 61 | 6d 65 24 0d 1c 2a 04 0d |A.. .=na|me$..*..|
|00005300| 1c 34 1a dd 20 a4 6c 6f | 77 65 72 5f 63 61 73 65 |.4.. .lo|wer_case|
|00005310| 28 73 74 72 69 6e 67 24 | 29 0d 1c 3e 14 ea 20 6c |(string$|)..>.. l|
|00005320| 63 61 73 65 73 74 24 2c | 6c 6f 6f 70 25 0d 1c 48 |casest$,|loop%..H|
|00005330| 0b 6c 6f 6f 70 25 3d 31 | 0d 1c 52 05 f5 0d 1c 5c |.loop%=1|..R....\|
|00005340| 43 e7 20 97 28 c1 73 74 | 72 69 6e 67 24 2c 6c 6f |C. .(.st|ring$,lo|
|00005350| 6f 70 25 2c 31 29 29 3e | 3d 97 28 22 41 22 29 20 |op%,1))>|=.("A") |
|00005360| 80 20 97 28 c1 73 74 72 | 69 6e 67 24 2c 6c 6f 6f |. .(.str|ing$,loo|
|00005370| 70 25 2c 31 29 29 3c 3d | 97 28 22 5a 22 29 20 8c |p%,1))<=|.("Z") .|
|00005380| 0d 1c 66 39 6c 63 61 73 | 65 73 74 24 3d 6c 63 61 |..f9lcas|est$=lca|
|00005390| 73 65 73 74 24 2b bd 28 | 97 28 c1 73 74 72 69 6e |sest$+.(|.(.strin|
|000053a0| 67 24 2c 6c 6f 6f 70 25 | 2c 31 29 29 2d 28 97 22 |g$,loop%|,1))-(."|
|000053b0| 41 22 2d 97 22 61 22 29 | 29 0d 1c 70 05 cc 0d 1c |A"-."a")|)..p....|
|000053c0| 7a 27 6c 63 61 73 65 73 | 74 24 3d 6c 63 61 73 65 |z'lcases|t$=lcase|
|000053d0| 73 74 24 2b c1 73 74 72 | 69 6e 67 24 2c 6c 6f 6f |st$+.str|ing$,loo|
|000053e0| 70 25 2c 31 29 0d 1c 84 | 05 cd 0d 1c 8e 0c 6c 6f |p%,1)...|......lo|
|000053f0| 6f 70 25 2b 3d 31 0d 1c | 98 19 fd 20 6c 6f 6f 70 |op%+=1..|... loop|
|00005400| 25 3e 3d a9 28 73 74 72 | 69 6e 67 24 29 2b 31 0d |%>=.(str|ing$)+1.|
|00005410| 1c a2 0d 3d 6c 63 61 73 | 65 73 74 24 0d 1c ac 04 |...=lcas|est$....|
|00005420| 0d 1c b6 21 dd 20 a4 69 | 73 5f 66 69 6c 65 5f 74 |...!. .i|s_file_t|
|00005430| 68 65 72 65 28 66 69 6c | 65 24 2c 74 79 70 65 25 |here(fil|e$,type%|
|00005440| 29 0d 1c c0 30 c8 99 20 | 22 4f 53 5f 46 69 6c 65 |)...0.. |"OS_File|
|00005450| 22 2c 32 30 2c 66 69 6c | 65 24 20 b8 20 6f 62 6a |",20,fil|e$ . obj|
|00005460| 74 79 70 65 25 2c 2c 2c | 2c 2c 2c 66 74 79 70 65 |type%,,,|,,,ftype|
|00005470| 25 0d 1c ca 3a 3d 28 6f | 62 6a 74 79 70 65 25 3c |%...:=(o|bjtype%<|
|00005480| 3e 30 20 80 20 74 79 70 | 65 25 3d 2d 31 29 20 84 |>0 . typ|e%=-1) .|
|00005490| 20 28 74 79 70 65 25 3c | 3e 2d 31 20 80 20 74 79 | (type%<|>-1 . ty|
|000054a0| 70 65 25 3d 66 74 79 70 | 65 25 29 0d 1c d4 04 0d |pe%=ftyp|e%).....|
|000054b0| 1c de 19 dd 20 a4 66 69 | 6c 65 5f 6c 6f 63 6b 65 |.... .fi|le_locke|
|000054c0| 64 28 66 69 6c 65 24 29 | 0d 1c e8 0e ea 20 61 74 |d(file$)|..... at|
|000054d0| 74 72 69 62 73 25 0d 1c | f2 29 c8 99 20 22 58 4f |tribs%..|.).. "XO|
|000054e0| 53 5f 46 69 6c 65 22 2c | 35 2c 66 69 6c 65 24 20 |S_File",|5,file$ |
|000054f0| b8 20 2c 2c 2c 2c 2c 61 | 74 74 72 69 62 73 25 0d |. ,,,,,a|ttribs%.|
|00005500| 1c fc 1b e7 20 28 61 74 | 74 72 69 62 73 25 20 80 |.... (at|tribs% .|
|00005510| 20 38 29 20 3d 20 38 20 | 3d b9 0d 1d 06 06 3d a3 | 8) = 8 |=.....=.|
|00005520| 0d 1d 10 04 0d 1d 1a 24 | dd 20 f2 65 72 72 6f 72 |.......$|. .error|
|00005530| 28 72 65 70 24 2c 65 72 | 6c 2c 65 72 72 2c 74 65 |(rep$,er|l,err,te|
|00005540| 72 6d 69 6e 61 6c 25 29 | 0d 1d 24 09 ee 20 85 20 |rminal%)|..$.. . |
|00005550| 87 0d 1d 2e 2a c8 99 20 | 22 57 69 6d 70 5f 53 70 |....*.. |"Wimp_Sp|
|00005560| 72 69 74 65 4f 70 22 2c | 33 36 2c 2c 22 70 74 72 |riteOp",|36,,"ptr|
|00005570| 5f 64 65 66 61 75 6c 74 | 22 2c 31 0d 1d 38 31 c8 |_default|",1..81.|
|00005580| 99 20 22 57 69 6d 70 5f | 52 65 70 6f 72 74 45 72 |. "Wimp_|ReportEr|
|00005590| 72 6f 72 22 2c 22 2a 2a | 2a 2a 22 2b 72 65 70 24 |ror","**|**"+rep$|
|000055a0| 2c 39 2c 74 61 73 6b 6e | 61 6d 65 24 0d 1d 42 1a |,9,taskn|ame$..B.|
|000055b0| e7 20 74 65 72 6d 69 6e | 61 6c 25 20 f2 63 6c 6f |. termin|al% .clo|
|000055c0| 73 65 64 6f 77 6e 0d 1d | 4c 05 e1 0d 1d 56 04 0d |sedown..|L....V..|
|000055d0| 1d 60 10 dd 20 f2 63 6c | 6f 73 65 64 6f 77 6e 0d |.`.. .cl|osedown.|
|000055e0| 1d 6a 12 f2 63 6c 6f 73 | 65 5f 6d 65 73 73 61 67 |.j..clos|e_messag|
|000055f0| 65 0d 1d 74 73 e7 20 63 | 61 72 65 74 25 20 c8 99 |e..ts. c|aret% ..|
|00005600| 20 22 58 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 | "XWimp_|SetCaret|
|00005610| 50 6f 73 69 74 69 6f 6e | 22 2c 21 6f 6c 64 63 61 |Position|",!oldca|
|00005620| 72 65 74 25 2c 6f 6c 64 | 63 61 72 65 74 25 21 34 |ret%,old|caret%!4|
|00005630| 2c 6f 6c 64 63 61 72 65 | 74 25 21 38 2c 6f 6c 64 |,oldcare|t%!8,old|
|00005640| 63 61 72 65 74 25 21 31 | 32 2c 6f 6c 64 63 61 72 |caret%!1|2,oldcar|
|00005650| 65 74 25 21 31 36 2c 6f | 6c 64 63 61 72 65 74 25 |et%!16,o|ldcaret%|
|00005660| 2c 21 32 30 0d 1d 7e 32 | e7 20 73 70 72 5f 61 70 |,!20..~2|. spr_ap|
|00005670| 6c 5f 74 72 61 6e 73 25 | 20 c8 99 20 22 58 4f 53 |l_trans%| .. "XOS|
|00005680| 5f 46 69 6c 65 22 2c 36 | 2c 73 70 72 5f 61 70 6c |_File",6|,spr_apl|
|00005690| 5f 6e 61 6d 65 24 0d 1d | 88 14 73 70 72 5f 61 70 |_name$..|..spr_ap|
|000056a0| 6c 5f 74 72 61 6e 73 25 | 3d a3 0d 1d 92 2c c8 99 |l_trans%|=....,..|
|000056b0| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e | "Wimp_C|loseDown|
|000056c0| 22 2c 6d 79 5f 68 61 6e | 64 6c 65 25 2c 26 34 42 |",my_han|dle%,&4B|
|000056d0| 35 33 34 31 35 34 0d 1d | 9c 05 e0 0d 1d a6 04 0d |534154..|........|
|000056e0| 1d b0 42 f4 20 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..B. ***|********|
|000056f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 6d 65 73 73 |********|****mess|
|00005700| 61 67 65 73 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |ages****|********|
|00005710| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005720| 2a 0d 1d ba 16 dd 20 a4 | 67 65 74 5f 6d 73 67 28 |*..... .|get_msg(|
|00005730| 6d 65 73 73 74 24 29 0d | 1d c4 17 ea 20 61 64 64 |messt$).|.... add|
|00005740| 72 25 2c 70 6f 73 73 25 | 2c 6c 6f 6f 6b 24 0d 1d |r%,poss%|,look$..|
|00005750| ce 40 c8 99 20 22 58 4d | 65 73 73 61 67 65 54 72 |.@.. "XM|essageTr|
|00005760| 61 6e 73 5f 4c 6f 6f 6b | 75 70 22 2c 6d 65 73 73 |ans_Look|up",mess|
|00005770| 62 75 66 66 25 2c 6d 65 | 73 73 74 24 2c 20 30 20 |buff%,me|sst$, 0 |
|00005780| b8 20 2c 2c 6c 6f 6f 6b | 24 20 3b 6f 6b 25 0d 1d |. ,,look|$ ;ok%..|
|00005790| d8 0f e7 20 6f 6b 25 3d | 39 20 3d 22 22 0d 1d e2 |... ok%=|9 =""...|
|000057a0| 0a 3d 6c 6f 6f 6b 24 0d | 1d ec 04 0d 1d f6 1b dd |.=look$.|........|
|000057b0| 20 f2 6f 70 65 6e 5f 6d | 65 73 73 61 67 65 28 66 | .open_m|essage(f|
|000057c0| 69 6c 65 6e 24 29 0d 1e | 00 12 ea 20 66 6c 61 67 |ilen$)..|... flag|
|000057d0| 73 25 2c 73 69 7a 65 25 | 0d 1e 0a 11 e7 20 66 69 |s%,size%|..... fi|
|000057e0| 6c 65 6e 24 3d 22 22 20 | e1 0d 1e 14 36 c8 99 20 |len$="" |....6.. |
|000057f0| 22 4d 65 73 73 61 67 65 | 54 72 61 6e 73 5f 46 69 |"Message|Trans_Fi|
|00005800| 6c 65 49 6e 66 6f 22 2c | 2c 66 69 6c 65 6e 24 20 |leInfo",|,filen$ |
|00005810| b8 20 66 6c 61 67 73 25 | 2c 2c 73 69 7a 65 25 0d |. flags%|,,size%.|
|00005820| 1e 1e 17 de 20 6d 73 67 | 66 69 6c 65 62 75 66 25 |.... msg|filebuf%|
|00005830| 20 73 69 7a 65 25 0d 1e | 28 1b de 20 6d 65 73 73 | size%..|(.. mess|
|00005840| 62 75 66 66 25 20 31 37 | 2b a9 20 66 69 6c 65 6e |buff% 17|+. filen|
|00005850| 24 0d 1e 32 1a 24 28 6d | 65 73 73 62 75 66 66 25 |$..2.$(m|essbuff%|
|00005860| 2b 31 36 29 3d 66 69 6c | 65 6e 24 0d 1e 3c 40 c8 |+16)=fil|en$..<@.|
|00005870| 99 22 4d 65 73 73 61 67 | 65 54 72 61 6e 73 5f 4f |."Messag|eTrans_O|
|00005880| 70 65 6e 46 69 6c 65 22 | 2c 6d 65 73 73 62 75 66 |penFile"|,messbuf|
|00005890| 66 25 2c 6d 65 73 73 62 | 75 66 66 25 2b 31 36 2c |f%,messb|uff%+16,|
|000058a0| 6d 73 67 66 69 6c 65 62 | 75 66 25 0d 1e 46 05 e1 |msgfileb|uf%..F..|
|000058b0| 0d 1e 50 04 0d 1e 5a 14 | dd 20 f2 63 6c 6f 73 65 |..P...Z.|. .close|
|000058c0| 5f 6d 65 73 73 61 67 65 | 0d 1e 64 11 e7 20 6d 65 |_message|..d.. me|
|000058d0| 73 73 62 75 66 66 25 20 | 8c 0d 1e 6e 28 c8 99 22 |ssbuff% |...n(.."|
|000058e0| 4d 65 73 73 61 67 65 54 | 72 61 6e 73 5f 43 6c 6f |MessageT|rans_Clo|
|000058f0| 73 65 46 69 6c 65 22 2c | 6d 65 73 73 62 75 66 66 |seFile",|messbuff|
|00005900| 25 0d 1e 78 05 cd 0d 1e | 82 05 e1 0d 1e 8c 04 0d |%..x....|........|
|00005910| 1e 96 2e f4 20 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.... ***|********|
|00005920| 2a 2a 69 6e 69 74 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |**init**|********|
|00005930| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0d 1e a0 |********|*****...|
|00005940| 04 0d 1e aa 14 dd 20 f2 | 69 6e 69 74 5f 70 6f 73 |...... .|init_pos|
|00005950| 74 77 69 6d 70 0d 1e b4 | 0b ea 20 66 6c 61 67 25 |twimp...|.. flag%|
|00005960| 0d 1e be 3e c8 99 22 58 | 4f 53 5f 52 65 61 64 56 |...>.."X|OS_ReadV|
|00005970| 61 72 56 61 6c 22 2c 22 | 42 6f 6f 74 24 64 69 72 |arVal","|Boot$dir|
|00005980| 22 2c 62 6c 6f 63 6b 25 | 2c 32 35 36 2c 30 2c 33 |",block%|,256,0,3|
|00005990| 20 b8 20 2c 2c 65 6e 64 | 25 20 3b 6f 6b 25 0d 1e | . ,,end|% ;ok%..|
|000059a0| c8 29 e7 20 6f 6b 25 3d | 37 20 f2 65 72 72 6f 72 |.). ok%=|7 .error|
|000059b0| 28 a4 67 65 74 5f 6d 73 | 67 28 22 42 4e 46 22 29 |(.get_ms|g("BNF")|
|000059c0| 2c 30 2c 30 2c b9 29 0d | 1e d2 19 f4 20 67 65 74 |,0,0,.).|.... get|
|000059d0| 20 69 63 6f 6e 20 62 6f | 75 6e 64 65 72 69 65 73 | icon bo|underies|
|000059e0| 0d 1e dc 14 f2 63 68 65 | 63 6b 5f 66 6f 72 5f 66 |.....che|ck_for_f|
|000059f0| 69 6c 65 73 0d 1e e6 11 | f2 67 65 74 5f 73 65 74 |iles....|.get_set|
|00005a00| 74 69 6e 67 73 0d 1e f0 | 14 f2 73 65 6c 65 63 74 |tings...|..select|
|00005a10| 69 6f 6e 5f 73 74 61 72 | 74 0d 1e fa 05 e1 0d 1f |ion_star|t.......|
|00005a20| 04 04 0d 1f 0e 13 dd 20 | f2 67 65 74 5f 73 65 74 |....... |.get_set|
|00005a30| 74 69 6e 67 73 0d 1f 18 | 13 f2 67 65 74 5f 61 70 |tings...|..get_ap|
|00005a40| 70 65 61 72 61 6e 63 65 | 0d 1f 22 17 c8 99 36 2c |pearance|.."...6,|
|00005a50| 31 36 31 2c 31 34 30 b8 | 2c 2c 66 6c 61 67 25 0d |161,140.|,,flag%.|
|00005a60| 1f 2c 0f e7 20 28 66 6c | 61 67 25 80 31 29 0d 1f |.,.. (fl|ag%.1)..|
|00005a70| 36 35 f2 73 65 74 5f 69 | 63 6f 6e 5f 73 74 61 74 |65.set_i|con_stat|
|00005a80| 65 28 6d 61 69 6e 77 69 | 6e 68 25 2c 31 30 2c 28 |e(mainwi|nh%,10,(|
|00005a90| 66 6c 61 67 25 80 31 29 | 3c 3c 32 31 2c 31 3c 3c |flag%.1)|<<21,1<<|
|00005aa0| 32 31 29 0d 1f 40 16 c8 | 99 36 2c 31 36 31 2c 32 |21)..@..|.6,161,2|
|00005ab0| 38 b8 2c 2c 66 6c 61 67 | 25 0d 1f 4a 35 f2 73 65 |8.,,flag|%..J5.se|
|00005ac0| 74 5f 69 63 6f 6e 5f 73 | 74 61 74 65 28 6d 61 69 |t_icon_s|tate(mai|
|00005ad0| 6e 77 69 6e 68 25 2c 31 | 31 2c 28 66 6c 61 67 25 |nwinh%,1|1,(flag%|
|00005ae0| 80 32 29 3c 3c 32 30 2c | 31 3c 3c 32 31 29 0d 1f |.2)<<20,|1<<21)..|
|00005af0| 54 0b f4 20 66 69 6c 65 | 73 0d 1f 5e 6b f2 73 65 |T.. file|s..^k.se|
|00005b00| 74 5f 69 63 6f 6e 5f 73 | 74 61 74 65 28 6d 61 69 |t_icon_s|tate(mai|
|00005b10| 6e 77 69 6e 68 25 2c 31 | 33 2c 94 20 a4 69 73 5f |nwinh%,1|3,. .is_|
|00005b20| 66 69 6c 65 5f 74 68 65 | 72 65 28 22 3c 42 6f 6f |file_the|re("<Boo|
|00005b30| 74 24 44 69 72 3e 2e 63 | 68 6f 69 63 65 73 2e 62 |t$Dir>.c|hoices.b|
|00005b40| 6f 6f 74 2e 74 61 73 6b | 73 2e 42 6f 6f 74 61 70 |oot.task|s.Bootap|
|00005b50| 70 73 22 2c 26 66 65 62 | 29 3c 3c 32 31 2c 31 3c |ps",&feb|)<<21,1<|
|00005b60| 3c 32 31 29 0d 1f 68 47 | e7 20 a4 69 73 5f 66 69 |<21)..hG|. .is_fi|
|00005b70| 6c 65 5f 74 68 65 72 65 | 28 22 3c 42 6f 6f 74 24 |le_there|("<Boot$|
|00005b80| 44 69 72 3e 2e 63 68 6f | 69 63 65 73 2e 62 6f 6f |Dir>.cho|ices.boo|
|00005b90| 74 2e 74 61 73 6b 73 2e | 61 6c 6c 73 6f 6d 65 61 |t.tasks.|allsomea|
|00005ba0| 70 73 22 2c 26 66 65 62 | 29 20 8c 0d 1f 72 2e 20 |ps",&feb|) ...r. |
|00005bb0| f2 73 65 74 5f 69 63 6f | 6e 5f 73 74 61 74 65 28 |.set_ico|n_state(|
|00005bc0| 6d 61 69 6e 77 69 6e 68 | 25 2c 31 34 2c 31 3c 3c |mainwinh|%,14,1<<|
|00005bd0| 32 31 2c 31 3c 3c 32 31 | 29 0d 1f 7c 2e 20 f2 73 |21,1<<21|)..|. .s|
|00005be0| 65 74 5f 69 63 6f 6e 5f | 73 74 61 74 65 28 6d 61 |et_icon_|state(ma|
|00005bf0| 69 6e 77 69 6e 68 25 2c | 31 35 2c 31 3c 3c 32 31 |inwinh%,|15,1<<21|
|00005c00| 2c 31 3c 3c 32 31 29 0d | 1f 86 05 cc 0d 1f 90 6e |,1<<21).|.......n|
|00005c10| 20 f2 73 65 74 5f 69 63 | 6f 6e 5f 73 74 61 74 65 | .set_ic|on_state|
|00005c20| 28 6d 61 69 6e 77 69 6e | 68 25 2c 31 34 2c 94 20 |(mainwin|h%,14,. |
|00005c30| a4 69 73 5f 66 69 6c 65 | 5f 74 68 65 72 65 28 22 |.is_file|_there("|
|00005c40| 3c 42 6f 6f 74 24 44 69 | 72 3e 2e 63 68 6f 69 63 |<Boot$Di|r>.choic|
|00005c50| 65 73 2e 62 6f 6f 74 2e | 74 61 73 6b 73 2e 61 64 |es.boot.|tasks.ad|
|00005c60| 64 61 6c 6c 61 70 70 73 | 22 2c 26 66 65 62 29 3c |dallapps|",&feb)<|
|00005c70| 3c 32 31 2c 31 3c 3c 32 | 31 29 0d 1f 9a 6e 20 f2 |<21,1<<2|1)...n .|
|00005c80| 73 65 74 5f 69 63 6f 6e | 5f 73 74 61 74 65 28 6d |set_icon|_state(m|
|00005c90| 61 69 6e 77 69 6e 68 25 | 2c 31 35 2c 94 20 a4 69 |ainwinh%|,15,. .i|
|00005ca0| 73 5f 66 69 6c 65 5f 74 | 68 65 72 65 28 22 3c 42 |s_file_t|here("<B|
|00005cb0| 6f 6f 74 24 44 69 72 3e | 2e 63 68 6f 69 63 65 73 |oot$Dir>|.choices|
|00005cc0| 2e 62 6f 6f 74 2e 74 61 | 73 6b 73 2e 61 64 64 73 |.boot.ta|sks.adds|
|00005cd0| 6f 6d 65 61 70 73 22 2c | 26 66 65 62 29 3c 3c 32 |omeaps",|&feb)<<2|
|00005ce0| 31 2c 31 3c 3c 32 31 29 | 0d 1f a4 05 cd 0d 1f ae |1,1<<21)|........|
|00005cf0| 53 f2 73 65 74 5f 69 63 | 6f 6e 5f 73 74 61 74 65 |S.set_ic|on_state|
|00005d00| 28 6d 61 69 6e 77 69 6e | 68 25 2c 31 36 2c 28 ac |(mainwin|h%,16,(.|
|00005d10| a4 67 65 74 5f 69 63 6f | 6e 5f 73 74 61 74 65 28 |.get_ico|n_state(|
|00005d20| 6d 61 69 6e 77 69 6e 68 | 25 2c 31 35 29 80 28 31 |mainwinh|%,15).(1|
|00005d30| 3c 3c 32 31 29 29 3c 3c | 31 2c 31 3c 3c 32 32 29 |<<21))<<|1,1<<22)|
|00005d40| 0d 1f b8 42 c8 99 22 58 | 4f 53 5f 52 65 61 64 56 |...B.."X|OS_ReadV|
|00005d50| 61 72 56 61 6c 22 2c 22 | 4d 61 69 6e 41 70 70 73 |arVal","|MainApps|
|00005d60| 24 64 69 72 22 2c 62 6c | 6f 63 6b 25 2c 32 35 36 |$dir",bl|ock%,256|
|00005d70| 2c 30 2c 33 20 b8 20 2c | 2c 65 6e 64 25 20 3b 6f |,0,3 . ,|,end% ;o|
|00005d80| 6b 25 0d 1f c2 44 e7 20 | 6f 6b 25 3d 37 20 c8 99 |k%...D. |ok%=7 ..|
|00005d90| 22 4f 53 5f 52 65 61 64 | 56 61 72 56 61 6c 22 2c |"OS_Read|VarVal",|
|00005da0| 22 62 6f 6f 74 63 6f 6e | 66 24 64 69 72 22 2c 62 |"bootcon|f$dir",b|
|00005db0| 6c 6f 63 6b 25 2c 32 35 | 36 2c 30 2c 33 20 b8 20 |lock%,25|6,0,3 . |
|00005dc0| 2c 2c 65 6e 64 25 0d 1f | cc 13 62 6c 6f 63 6b 25 |,,end%..|..block%|
|00005dd0| 3f 65 6e 64 25 3d 26 30 | 64 0d 1f d6 6c e7 20 6f |?end%=&0|d...l. o|
|00005de0| 6b 25 3c 3e 37 20 f2 63 | 68 61 6e 67 65 69 63 6f |k%<>7 .c|hangeico|
|00005df0| 6e 6e 61 6d 65 28 6d 61 | 69 6e 77 69 6e 68 25 2c |nname(ma|inwinh%,|
|00005e00| 33 34 2c 24 62 6c 6f 63 | 6b 25 29 20 8b 20 f2 63 |34,$bloc|k%) . .c|
|00005e10| 68 61 6e 67 65 69 63 6f | 6e 6e 61 6d 65 28 6d 61 |hangeico|nname(ma|
|00005e20| 69 6e 77 69 6e 68 25 2c | 33 34 2c c0 24 62 6c 6f |inwinh%,|34,.$blo|
|00005e30| 63 6b 25 2c a7 24 62 6c | 6f 63 6b 25 2c 22 24 22 |ck%,.$bl|ock%,"$"|
|00005e40| 2c 30 29 29 29 0d 1f e0 | 05 e1 0d 1f ea 04 0d 1f |,0)))...|........|
|00005e50| f4 13 dd 20 f2 6c 6f 61 | 64 5f 77 69 6e 64 6f 77 |... .loa|d_window|
|00005e60| 73 0d 1f fe 26 de 20 6d | 61 69 6e 5f 69 63 6f 6e |s...&. m|ain_icon|
|00005e70| 73 25 20 32 30 34 38 2c | 62 61 73 65 5f 69 63 6f |s% 2048,|base_ico|
|00005e80| 6e 73 25 20 31 32 38 0d | 20 08 25 de 20 73 65 6c |ns% 128.| .%. sel|
|00005e90| 62 5f 69 63 6f 6e 73 25 | 20 32 35 36 2c 73 70 72 |b_icons%| 256,spr|
|00005ea0| 73 5f 69 63 6f 6e 73 25 | 20 32 30 30 0d 20 12 14 |s_icons%| 200. ..|
|00005eb0| de 20 73 65 74 5f 69 63 | 6f 6e 73 25 20 32 35 36 |. set_ic|ons% 256|
|00005ec0| 0d 20 1c 04 0d 20 26 10 | e7 20 a4 33 64 5f 6c 6f |. ... &.|. .3d_lo|
|00005ed0| 6f 6b 20 8c 0d 20 30 37 | 20 c8 99 20 22 57 69 6d |ok .. 07| .. "Wim|
|00005ee0| 70 5f 4f 70 65 6e 54 65 | 6d 70 6c 61 74 65 22 2c |p_OpenTe|mplate",|
|00005ef0| 2c 22 3c 62 6f 6f 74 63 | 6f 6e 66 24 64 69 72 3e |,"<bootc|onf$dir>|
|00005f00| 2e 54 65 6d 70 6c 61 74 | 65 73 22 0d 20 3a 05 cc |.Templat|es". :..|
|00005f10| 0d 20 44 38 20 c8 99 20 | 22 57 69 6d 70 5f 4f 70 |. D8 .. |"Wimp_Op|
|00005f20| 65 6e 54 65 6d 70 6c 61 | 74 65 22 2c 2c 22 3c 62 |enTempla|te",,"<b|
|00005f30| 6f 6f 74 63 6f 6e 66 24 | 64 69 72 3e 2e 54 65 6d |ootconf$|dir>.Tem|
|00005f40| 70 6c 61 74 65 73 32 22 | 0d 20 4e 05 cd 0d 20 58 |plates2"|. N... X|
|00005f50| 3a 6d 61 69 6e 77 69 6e | 68 25 3d a4 6f 70 65 6e |:mainwin|h%=.open|
|00005f60| 5f 77 69 6e 64 6f 77 74 | 65 6d 70 28 6d 61 69 6e |_windowt|emp(main|
|00005f70| 5f 69 63 6f 6e 73 25 2c | 32 30 34 38 2c 2d 31 2c |_icons%,|2048,-1,|
|00005f80| 22 6d 61 69 6e 22 29 0d | 20 62 39 62 61 73 65 77 |"main").| b9basew|
|00005f90| 69 6e 68 25 3d a4 6f 70 | 65 6e 5f 77 69 6e 64 6f |inh%=.op|en_windo|
|00005fa0| 77 74 65 6d 70 28 62 61 | 73 65 5f 69 63 6f 6e 73 |wtemp(ba|se_icons|
|00005fb0| 25 2c 31 32 38 2c 2d 31 | 2c 22 62 61 73 65 22 29 |%,128,-1|,"base")|
|00005fc0| 0d 20 6c 3c 73 65 6c 62 | 77 69 6e 68 25 3d a4 6f |. l<selb|winh%=.o|
|00005fd0| 70 65 6e 5f 77 69 6e 64 | 6f 77 74 65 6d 70 28 73 |pen_wind|owtemp(s|
|00005fe0| 65 6c 62 5f 69 63 6f 6e | 73 25 2c 32 35 36 2c 2d |elb_icon|s%,256,-|
|00005ff0| 31 2c 22 73 65 6c 62 61 | 73 65 22 29 0d 20 76 5e |1,"selba|se"). v^|
|00006000| 73 65 6c 6c 77 69 6e 68 | 25 3d a4 6f 70 65 6e 5f |sellwinh|%=.open_|
|00006010| 77 69 6e 64 6f 77 74 65 | 6d 70 28 6c 69 73 74 5f |windowte|mp(list_|
|00006020| 69 74 65 6d 25 2b 6c 69 | 73 74 5f 69 74 65 6d 70 |item%+li|st_itemp|
|00006030| 25 2c 6c 69 73 74 5f 69 | 74 65 6d 6d 61 78 25 2d |%,list_i|temmax%-|
|00006040| 6c 69 73 74 5f 69 74 65 | 6d 70 25 2c 2d 31 2c 22 |list_ite|mp%,-1,"|
|00006050| 73 65 6c 69 74 65 6d 73 | 22 29 0d 20 80 36 73 65 |selitems|"). .6se|
|00006060| 74 77 69 6e 68 25 3d a4 | 6f 70 65 6e 5f 77 69 6e |twinh%=.|open_win|
|00006070| 64 6f 77 74 65 6d 70 28 | 73 65 74 5f 69 63 6f 6e |dowtemp(|set_icon|
|00006080| 73 25 2c 32 35 36 2c 2d | 31 2c 22 73 65 74 22 29 |s%,256,-|1,"set")|
|00006090| 0d 20 8a 3f 73 70 72 73 | 77 69 6e 68 25 3d a4 6f |. .?sprs|winh%=.o|
|000060a0| 70 65 6e 5f 77 69 6e 64 | 6f 77 74 65 6d 70 28 73 |pen_wind|owtemp(s|
|000060b0| 70 72 73 5f 69 63 6f 6e | 73 25 2c 32 30 30 2c 2d |prs_icon|s%,200,-|
|000060c0| 31 2c 22 61 64 64 73 70 | 72 69 74 65 73 22 29 0d |1,"addsp|rites").|
|000060d0| 20 94 1b c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 | .... "W|imp_Clos|
|000060e0| 65 54 65 6d 70 6c 61 74 | 65 22 0d 20 9e 05 e1 0d |eTemplat|e". ....|
|000060f0| 20 a8 04 0d 20 b2 41 2a | 2a 2a 2a 2a 2a 2a 2a 2a | ... .A*|********|
|00006100| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00006110| 2a 6d 61 69 6e 20 70 72 | 6f 63 65 64 75 72 65 73 |*main pr|ocedures|
|00006120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00006130| 2a 2a 2a 2a 0d 20 bc 12 | dd 20 f2 73 65 74 5f 6f |****. ..|. .set_o|
|00006140| 70 74 69 6f 6e 73 0d 20 | c6 16 f2 73 65 74 5f 63 |ptions. |...set_c|
|00006150| 6f 6e 66 69 67 5f 61 70 | 70 65 61 72 0d 20 d0 18 |onfig_ap|pear. ..|
|00006160| f2 64 65 73 6b 74 6f 70 | 62 6f 6f 74 5f 6f 70 74 |.desktop|boot_opt|
|00006170| 69 6f 6e 73 0d 20 da 11 | f2 61 70 70 73 5f 6f 70 |ions. ..|.apps_op|
|00006180| 74 69 6f 6e 73 0d 20 e4 | 13 f2 73 65 6c 65 63 74 |tions. .|..select|
|00006190| 69 6f 6e 5f 73 61 76 65 | 0d 20 ee 10 f2 73 65 74 |ion_save|. ...set|
|000061a0| 74 75 70 5f 62 6f 6f 74 | 0d 20 f8 05 e1 0d 21 02 |tup_boot|. ....!.|
|000061b0| 04 0d 21 0c 13 dd 20 f2 | 6f 70 65 6e 5f 6d 61 69 |..!... .|open_mai|
|000061c0| 6e 77 69 6e 0d 21 16 15 | 21 62 6c 6f 63 6b 25 3d |nwin.!..|!block%=|
|000061d0| 62 61 73 65 77 69 6e 68 | 25 0d 21 20 24 c8 99 20 |basewinh|%.! $.. |
|000061e0| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 |"Wimp_Ge|tWindowS|
|000061f0| 74 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 0d 21 2a |tate",,b|lock%.!*|
|00006200| 1e f2 63 65 6e 74 72 65 | 5f 77 69 6e 5f 63 6f 6f |..centre|_win_coo|
|00006210| 72 64 73 28 62 6c 6f 63 | 6b 25 29 0d 21 34 10 62 |rds(bloc|k%).!4.b|
|00006220| 6c 6f 63 6b 25 21 32 38 | 3d 2d 31 0d 21 3e 20 c8 |lock%!28|=-1.!> .|
|00006230| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |. "Wimp_|OpenWind|
|00006240| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 21 48 15 21 |ow",,blo|ck%.!H.!|
|00006250| 62 6c 6f 63 6b 25 3d 6d | 61 69 6e 77 69 6e 68 25 |block%=m|ainwinh%|
|00006260| 0d 21 52 28 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |.!R(.. "|Wimp_Get|
|00006270| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 2c 62 6c |WindowSt|ate",,bl|
|00006280| 6f 63 6b 25 2b 32 35 36 | 0d 21 5c 2d 62 6c 6f 63 |ock%+256|.!\-bloc|
|00006290| 6b 25 21 32 36 38 3d 62 | 6c 6f 63 6b 25 21 34 2b |k%!268=b|lock%!4+|
|000062a0| 62 6c 6f 63 6b 25 21 32 | 36 38 2d 62 6c 6f 63 6b |block%!2|68-block|
|000062b0| 25 21 32 36 30 0d 21 66 | 31 62 6c 6f 63 6b 25 21 |%!260.!f|1block%!|
|000062c0| 32 37 32 3d 62 6c 6f 63 | 6b 25 21 38 2b 62 6c 6f |272=bloc|k%!8+blo|
|000062d0| 63 6b 25 21 32 37 32 2d | 62 6c 6f 63 6b 25 21 32 |ck%!272-|block%!2|
|000062e0| 36 34 2b 31 30 38 0d 21 | 70 17 62 6c 6f 63 6b 25 |64+108.!|p.block%|
|000062f0| 21 32 36 30 3d 62 6c 6f | 63 6b 25 21 34 0d 21 7a |!260=blo|ck%!4.!z|
|00006300| 1b 62 6c 6f 63 6b 25 21 | 32 36 34 3d 62 6c 6f 63 |.block%!|264=bloc|
|00006310| 6b 25 21 38 2b 31 30 38 | 0d 21 84 24 c8 99 20 22 |k%!8+108|.!.$.. "|
|00006320| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00006330| 2c 2c 62 6c 6f 63 6b 25 | 2b 32 35 36 0d 21 8e 29 |,,block%|+256.!.)|
|00006340| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 43 61 72 65 |.. "Wimp|_GetCare|
|00006350| 74 50 6f 73 69 74 69 6f | 6e 22 2c 2c 6f 6c 64 63 |tPositio|n",,oldc|
|00006360| 61 72 65 74 25 0d 21 98 | 2b c8 99 20 22 57 69 6d |aret%.!.|+.. "Wim|
|00006370| 70 5f 53 65 74 43 61 72 | 65 74 50 6f 73 69 74 69 |p_SetCar|etPositi|
|00006380| 6f 6e 22 2c 62 61 73 65 | 77 69 6e 68 25 2c 2d 31 |on",base|winh%,-1|
|00006390| 0d 21 a2 0c 63 61 72 65 | 74 25 3d b9 0d 21 ac 05 |.!..care|t%=..!..|
|000063a0| e1 0d 21 b6 04 0d 21 c0 | 42 f4 20 2a 2a 2a 2a 2a |..!...!.|B. *****|
|000063b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 61 |********|*******a|
|000063c0| 70 70 6c 69 63 61 74 69 | 6f 6e 73 20 6f 70 74 69 |pplicati|ons opti|
|000063d0| 6f 6e 73 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |ons*****|********|
|000063e0| 2a 2a 2a 2a 2a 2a 2a 0d | 21 ca 04 0d 21 d4 13 dd |*******.|!...!...|
|000063f0| 20 f2 61 70 70 73 5f 6f | 70 74 69 6f 6e 73 0d 21 | .apps_o|ptions.!|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.