home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1993-07-25 | 10.1 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 20 | 57 69 6d 70 5f 4c 69 62 |..... > |Wimp_Lib|
|00000010| 0d 00 14 35 f4 20 3e 20 | 56 65 72 73 69 6f 6e 20 |...5. > |Version |
|00000020| 31 2e 30 35 20 2d 2d 2d | 20 28 43 29 20 41 43 45 |1.05 ---| (C) ACE|
|00000030| 2f 41 72 63 20 41 6e 67 | 65 6c 73 20 31 39 39 30 |/Arc Ang|els 1990|
|00000040| 2d 31 39 39 31 0d 00 1e | 04 0d 00 28 12 dd f2 69 |-1991...|...(...i|
|00000050| 6e 69 74 5f 6c 69 62 72 | 61 72 79 0d 00 32 48 c8 |nit_libr|ary..2H.|
|00000060| 99 20 22 57 69 6d 70 5f | 49 6e 69 74 69 61 6c 69 |. "Wimp_|Initiali|
|00000070| 73 65 22 2c 32 30 30 2c | 26 34 42 35 33 34 31 35 |se",200,|&4B53415|
|00000080| 34 2c 70 72 6f 67 6e 61 | 6d 65 24 20 b8 20 76 65 |4,progna|me$ . ve|
|00000090| 72 73 69 6f 6e 25 2c 74 | 61 73 6b 5f 68 61 6e 64 |rsion%,t|ask_hand|
|000000a0| 6c 65 25 0d 00 3c 16 de | 20 74 61 73 6b 5f 77 69 |le%..<..| task_wi|
|000000b0| 6e 64 6f 77 25 28 36 33 | 29 0d 00 46 14 de 20 74 |ndow%(63|)..F.. t|
|000000c0| 61 73 6b 5f 6e 61 6d 65 | 24 28 36 33 29 0d 00 50 |ask_name|$(63)..P|
|000000d0| 10 74 61 73 6b 5f 6e 75 | 6d 25 3d 36 34 0d 00 5a |.task_nu|m%=64..Z|
|000000e0| 32 de 20 62 6c 6f 63 6b | 25 20 35 31 32 20 20 20 |2. block|% 512 |
|000000f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000100| 20 20 20 20 20 20 20 3a | 20 f4 20 77 69 6d 70 0d | :| . wimp.|
|00000110| 00 64 37 de 20 6d 65 6e | 75 5f 73 74 61 72 74 25 |.d7. men|u_start%|
|00000120| 20 31 32 38 30 2c 6d 65 | 6e 75 5f 65 6e 64 25 20 | 1280,me|nu_end% |
|00000130| 2d 31 20 20 20 20 20 20 | 20 3a 20 f4 20 6d 65 6e |-1 | : . men|
|00000140| 75 20 64 61 74 61 0d 00 | 6e 37 de 20 62 75 66 66 |u data..|n7. buff|
|00000150| 65 72 5f 73 74 61 72 74 | 25 20 35 31 32 2c 62 75 |er_start|% 512,bu|
|00000160| 66 66 65 72 5f 65 6e 64 | 25 20 2d 31 20 20 20 20 |ffer_end|% -1 |
|00000170| 3a 20 f4 20 69 63 6f 6e | 20 64 61 74 61 0d 00 78 |: . icon| data..x|
|00000180| 0c 65 72 72 6f 72 25 3d | a3 0d 00 82 12 6d 65 6e |.error%=|.....men|
|00000190| 75 5f 68 61 6e 64 6c 65 | 25 3d 30 0d 00 8c 12 64 |u_handle|%=0....d|
|000001a0| 72 61 67 5f 68 61 6e 64 | 6c 65 25 3d 30 0d 00 96 |rag_hand|le%=0...|
|000001b0| 05 e1 0d 00 a0 04 0d 00 | aa 1f dd f2 61 64 64 5f |........|....add_|
|000001c0| 77 69 6e 64 6f 77 28 77 | 69 6e 64 6f 77 25 2c 74 |window(w|indow%,t|
|000001d0| 61 73 6b 24 29 0d 00 b4 | 1d ea 20 74 61 73 6b 5f |ask$)...|.. task_|
|000001e0| 69 6e 64 65 78 25 2c 74 | 61 73 6b 5f 66 6f 75 6e |index%,t|ask_foun|
|000001f0| 64 25 0d 00 be 11 74 61 | 73 6b 5f 66 6f 75 6e 64 |d%....ta|sk_found|
|00000200| 25 3d 30 0d 00 c8 21 e3 | 20 74 61 73 6b 5f 69 6e |%=0...!.| task_in|
|00000210| 64 65 78 25 3d 30 20 b8 | 20 74 61 73 6b 5f 6e 75 |dex%=0 .| task_nu|
|00000220| 6d 25 2d 31 0d 00 d2 4b | e7 20 74 61 73 6b 5f 77 |m%-1...K|. task_w|
|00000230| 69 6e 64 6f 77 25 28 74 | 61 73 6b 5f 69 6e 64 65 |indow%(t|ask_inde|
|00000240| 78 25 29 3d 30 20 80 20 | 74 61 73 6b 5f 66 6f 75 |x%)=0 . |task_fou|
|00000250| 6e 64 25 3d 30 20 8c 20 | 74 61 73 6b 5f 66 6f 75 |nd%=0 . |task_fou|
|00000260| 6e 64 25 3d 74 61 73 6b | 5f 69 6e 64 65 78 25 0d |nd%=task|_index%.|
|00000270| 00 dc 05 ed 0d 00 e6 48 | e7 20 74 61 73 6b 5f 66 |.......H|. task_f|
|00000280| 6f 75 6e 64 25 3d 30 20 | 8c 20 f2 65 72 72 6f 72 |ound%=0 |. .error|
|00000290| 28 22 43 61 6e 20 6f 6e | 6c 79 20 61 63 63 65 70 |("Can on|ly accep|
|000002a0| 74 20 22 2b c3 28 74 61 | 73 6b 5f 6e 75 6d 25 29 |t "+.(ta|sk_num%)|
|000002b0| 2b 22 20 77 69 6e 64 6f | 77 73 22 29 0d 00 f0 25 |+" windo|ws")...%|
|000002c0| 74 61 73 6b 5f 77 69 6e | 64 6f 77 25 28 74 61 73 |task_win|dow%(tas|
|000002d0| 6b 5f 66 6f 75 6e 64 25 | 29 3d 77 69 6e 64 6f 77 |k_found%|)=window|
|000002e0| 25 0d 00 fa 21 74 61 73 | 6b 5f 6e 61 6d 65 24 28 |%...!tas|k_name$(|
|000002f0| 74 61 73 6b 5f 66 6f 75 | 6e 64 25 29 3d 74 61 73 |task_fou|nd%)=tas|
|00000300| 6b 24 0d 01 04 05 e1 0d | 01 0e 04 0d 01 18 1a dd |k$......|........|
|00000310| f2 6b 69 6c 6c 5f 77 69 | 6e 64 6f 77 28 77 69 6e |.kill_wi|ndow(win|
|00000320| 64 6f 77 25 29 0d 01 22 | 1d ea 20 74 61 73 6b 5f |dow%).."|.. task_|
|00000330| 69 6e 64 65 78 25 2c 74 | 61 73 6b 5f 66 6f 75 6e |index%,t|ask_foun|
|00000340| 64 25 0d 01 2c 21 e3 20 | 74 61 73 6b 5f 69 6e 64 |d%..,!. |task_ind|
|00000350| 65 78 25 3d 30 20 b8 20 | 74 61 73 6b 5f 6e 75 6d |ex%=0 . |task_num|
|00000360| 25 2d 31 0d 01 36 45 e7 | 20 74 61 73 6b 5f 77 69 |%-1..6E.| task_wi|
|00000370| 6e 64 6f 77 25 28 74 61 | 73 6b 5f 69 6e 64 65 78 |ndow%(ta|sk_index|
|00000380| 25 29 3d 77 69 6e 64 6f | 77 25 20 8c 20 74 61 73 |%)=windo|w% . tas|
|00000390| 6b 5f 77 69 6e 64 6f 77 | 25 28 74 61 73 6b 5f 69 |k_window|%(task_i|
|000003a0| 6e 64 65 78 25 29 3d 30 | 0d 01 40 05 ed 0d 01 4a |ndex%)=0|..@....J|
|000003b0| 05 e1 0d 01 54 04 0d 01 | 5e 14 dd f2 69 6e 73 74 |....T...|^...inst|
|000003c0| 61 6c 6c 28 74 61 73 6b | 24 29 0d 01 68 22 f2 63 |all(task|$)..h".c|
|000003d0| 6f 6d 6d 61 6e 64 28 74 | 61 73 6b 24 2c 22 69 6e |ommand(t|ask$,"in|
|000003e0| 69 74 5f 70 72 6f 67 72 | 61 6d 22 29 0d 01 72 05 |it_progr|am")..r.|
|000003f0| e1 0d 01 7c 04 0d 01 86 | 1e dd f2 63 6f 6d 6d 61 |...|....|...comma|
|00000400| 6e 64 28 74 61 73 6b 24 | 2c 66 75 6e 63 74 69 6f |nd(task$|,functio|
|00000410| 6e 24 29 0d 01 90 25 76 | 6f 69 64 25 3d a0 28 22 |n$)...%v|oid%=.("|
|00000420| 46 4e 22 2b 74 61 73 6b | 24 2b 22 5f 22 2b 66 75 |FN"+task|$+"_"+fu|
|00000430| 6e 63 74 69 6f 6e 24 29 | 0d 01 9a 05 e1 0d 01 a4 |nction$)|........|
|00000440| 04 0d 01 ae 13 dd f2 65 | 72 72 6f 72 28 65 72 72 |.......e|rror(err|
|00000450| 6f 72 24 29 0d 01 b8 0e | 85 20 31 2c 65 72 72 6f |or$)....|. 1,erro|
|00000460| 72 24 0d 01 c2 05 e1 0d | 01 cc 04 0d 01 d6 1f dd |r$......|........|
|00000470| f2 70 72 65 5f 65 72 72 | 6f 72 28 65 72 72 25 2c |.pre_err|or(err%,|
|00000480| 65 72 72 24 2c 65 72 6c | 25 29 0d 01 e0 09 ee 20 |err$,erl|%)..... |
|00000490| 85 20 87 0d 01 ea 25 85 | 20 65 72 72 25 2c 65 72 |. ....%.| err%,er|
|000004a0| 72 24 2b 22 20 28 63 6f | 64 65 20 22 2b c3 28 65 |r$+" (co|de "+.(e|
|000004b0| 72 6c 25 29 2b 22 29 22 | 0d 01 f4 05 e1 0d 01 fe |rl%)+")"|........|
|000004c0| 04 0d 02 08 20 dd f2 65 | 78 69 74 5f 65 72 72 6f |.... ..e|xit_erro|
|000004d0| 72 28 65 72 72 25 2c 65 | 72 72 24 2c 65 72 6c 25 |r(err%,e|rr$,erl%|
|000004e0| 29 0d 02 12 09 ee 20 85 | 20 87 0d 02 1c 1c c8 99 |)..... .| .......|
|000004f0| 20 22 58 57 69 6d 70 5f | 43 6c 6f 73 65 54 65 6d | "XWimp_|CloseTem|
|00000500| 70 6c 61 74 65 22 0d 02 | 26 10 21 62 6c 6f 63 6b |plate"..|&.!block|
|00000510| 25 3d 65 72 72 25 0d 02 | 30 28 65 72 72 24 3d 65 |%=err%..|0(err$=e|
|00000520| 72 72 24 2b 22 20 28 63 | 6f 64 65 20 22 2b c3 28 |rr$+" (c|ode "+.(|
|00000530| 65 72 6c 25 29 2b 22 29 | 22 2b bd 28 30 29 0d 02 |erl%)+")|"+.(0)..|
|00000540| 3a 14 24 28 62 6c 6f 63 | 6b 25 2b 34 29 3d 65 72 |:.$(bloc|k%+4)=er|
|00000550| 72 24 0d 02 44 2c c8 99 | 20 22 57 69 6d 70 5f 52 |r$..D,..| "Wimp_R|
|00000560| 65 70 6f 72 74 45 72 72 | 6f 72 22 2c 62 6c 6f 63 |eportErr|or",bloc|
|00000570| 6b 25 2c 32 2c 70 72 6f | 67 6e 61 6d 65 24 0d 02 |k%,2,pro|gname$..|
|00000580| 4e 0b f2 66 69 6e 69 73 | 68 0d 02 58 05 e1 0d 02 |N..finis|h..X....|
|00000590| 62 04 0d 02 6c 0c dd f2 | 66 69 6e 69 73 68 0d 02 |b...l...|finish..|
|000005a0| 76 17 c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |v... "Wi|mp_Close|
|000005b0| 44 6f 77 6e 22 0d 02 80 | 05 e0 0d 02 8a 04 0d 02 |Down"...|........|
|000005c0| 94 23 dd f2 64 69 73 70 | 6c 61 79 5f 65 72 72 6f |.#..disp|lay_erro|
|000005d0| 72 28 65 72 72 25 2c 65 | 72 72 24 2c 65 72 6c 25 |r(err%,e|rr$,erl%|
|000005e0| 29 0d 02 9e 2c e7 20 65 | 72 72 6f 72 25 3d b9 20 |)...,. e|rror%=. |
|000005f0| 8c 20 f2 65 78 69 74 5f | 65 72 72 6f 72 28 65 72 |. .exit_|error(er|
|00000600| 72 25 2c 65 72 72 24 2c | 65 72 6c 25 29 0d 02 a8 |r%,err$,|erl%)...|
|00000610| 0c 65 72 72 6f 72 25 3d | b9 0d 02 b2 10 21 62 6c |.error%=|.....!bl|
|00000620| 6f 63 6b 25 3d 65 72 72 | 25 0d 02 bc 28 65 72 72 |ock%=err|%...(err|
|00000630| 24 3d 65 72 72 24 2b 22 | 20 28 6c 69 6e 65 20 22 |$=err$+"| (line "|
|00000640| 2b c3 28 65 72 6c 25 29 | 2b 22 29 22 2b bd 28 30 |+.(erl%)|+")"+.(0|
|00000650| 29 0d 02 c6 14 24 28 62 | 6c 6f 63 6b 25 2b 34 29 |)....$(b|lock%+4)|
|00000660| 3d 65 72 72 24 0d 02 d0 | 2c c8 99 20 22 57 69 6d |=err$...|,.. "Wim|
|00000670| 70 5f 52 65 70 6f 72 74 | 45 72 72 6f 72 22 2c 62 |p_Report|Error",b|
|00000680| 6c 6f 63 6b 25 2c 31 2c | 70 72 6f 67 6e 61 6d 65 |lock%,1,|progname|
|00000690| 24 0d 02 da 0c 65 72 72 | 6f 72 25 3d a3 0d 02 e4 |$....err|or%=....|
|000006a0| 05 e1 0d 02 ee 04 0d 02 | f8 11 dd f2 70 6f 6c 6c |........|....poll|
|000006b0| 28 6d 61 73 6b 25 29 0d | 03 02 0d ea 20 61 63 74 |(mask%).|.... act|
|000006c0| 69 6f 6e 25 0d 03 0c 29 | c8 99 20 22 57 69 6d 70 |ion%...)|.. "Wimp|
|000006d0| 5f 50 6f 6c 6c 22 2c 6d | 61 73 6b 25 2c 62 6c 6f |_Poll",m|ask%,blo|
|000006e0| 63 6b 25 20 b8 20 61 63 | 74 69 6f 6e 25 0d 03 16 |ck% . ac|tion%...|
|000006f0| 10 c8 8e 20 61 63 74 69 | 6f 6e 25 20 ca 0d 03 20 |... acti|on% ... |
|00000700| 31 c9 20 20 31 20 3a 20 | f2 70 65 72 66 6f 72 6d |1. 1 : |.perform|
|00000710| 5f 74 61 73 6b 28 21 62 | 6c 6f 63 6b 25 2c 22 72 |_task(!b|lock%,"r|
|00000720| 65 64 72 61 77 5f 77 69 | 6e 64 6f 77 22 29 0d 03 |edraw_wi|ndow")..|
|00000730| 2a 2f c9 20 20 32 20 3a | 20 f2 70 65 72 66 6f 72 |*/. 2 :| .perfor|
|00000740| 6d 5f 74 61 73 6b 28 21 | 62 6c 6f 63 6b 25 2c 22 |m_task(!|block%,"|
|00000750| 6f 70 65 6e 5f 77 69 6e | 64 6f 77 22 29 0d 03 34 |open_win|dow")..4|
|00000760| 30 c9 20 20 33 20 3a 20 | f2 70 65 72 66 6f 72 6d |0. 3 : |.perform|
|00000770| 5f 74 61 73 6b 28 21 62 | 6c 6f 63 6b 25 2c 22 63 |_task(!b|lock%,"c|
|00000780| 6c 6f 73 65 5f 77 69 6e | 64 6f 77 22 29 0d 03 3e |lose_win|dow")..>|
|00000790| 33 c9 20 20 34 20 3a 20 | f2 70 65 72 66 6f 72 6d |3. 4 : |.perform|
|000007a0| 5f 74 61 73 6b 28 21 62 | 6c 6f 63 6b 25 2c 22 70 |_task(!b|lock%,"p|
|000007b0| 6f 69 6e 74 65 72 20 6c | 65 61 76 69 6e 67 22 29 |ointer l|eaving")|
|000007c0| 0d 03 48 34 c9 20 20 35 | 20 3a 20 f2 70 65 72 66 |..H4. 5| : .perf|
|000007d0| 6f 72 6d 5f 74 61 73 6b | 28 21 62 6c 6f 63 6b 25 |orm_task|(!block%|
|000007e0| 2c 22 70 6f 69 6e 74 65 | 72 20 65 6e 74 65 72 69 |,"pointe|r enteri|
|000007f0| 6e 67 22 29 0d 03 52 31 | c9 20 20 36 20 3a 20 f2 |ng")..R1|. 6 : .|
|00000800| 70 65 72 66 6f 72 6d 5f | 74 61 73 6b 28 62 6c 6f |perform_|task(blo|
|00000810| 63 6b 25 21 31 32 2c 22 | 6d 6f 75 73 65 5f 63 6c |ck%!12,"|mouse_cl|
|00000820| 69 63 6b 22 29 0d 03 5c | 31 c9 20 20 37 20 3a 20 |ick")..\|1. 7 : |
|00000830| f2 70 65 72 66 6f 72 6d | 5f 74 61 73 6b 28 64 72 |.perform|_task(dr|
|00000840| 61 67 5f 68 61 6e 64 6c | 65 25 2c 22 64 72 61 67 |ag_handl|e%,"drag|
|00000850| 5f 62 6f 78 22 29 0d 03 | 66 2f c9 20 20 38 20 3a |_box")..|f/. 8 :|
|00000860| 20 f2 70 65 72 66 6f 72 | 6d 5f 74 61 73 6b 28 21 | .perfor|m_task(!|
|00000870| 62 6c 6f 63 6b 25 2c 22 | 6b 65 79 5f 70 72 65 73 |block%,"|key_pres|
|00000880| 73 65 64 22 29 0d 03 70 | 37 c9 20 20 39 20 3a 20 |sed")..p|7. 9 : |
|00000890| f2 70 65 72 66 6f 72 6d | 5f 74 61 73 6b 28 6d 65 |.perform|_task(me|
|000008a0| 6e 75 5f 68 61 6e 64 6c | 65 25 2c 22 6d 65 6e 75 |nu_handl|e%,"menu|
|000008b0| 5f 73 65 6c 65 63 74 69 | 6f 6e 22 29 0d 03 7a 32 |_selecti|on")..z2|
|000008c0| c9 20 31 30 20 3a 20 f2 | 70 65 72 66 6f 72 6d 5f |. 10 : .|perform_|
|000008d0| 74 61 73 6b 28 21 62 6c | 6f 63 6b 25 2c 22 73 63 |task(!bl|ock%,"sc|
|000008e0| 72 6f 6c 6c 5f 72 65 71 | 75 65 73 74 22 29 0d 03 |roll_req|uest")..|
|000008f0| 84 2e c9 20 31 31 20 3a | 20 f2 70 65 72 66 6f 72 |... 11 :| .perfor|
|00000900| 6d 5f 74 61 73 6b 28 21 | 62 6c 6f 63 6b 25 2c 22 |m_task(!|block%,"|
|00000910| 6c 6f 73 65 5f 63 61 72 | 65 74 22 29 0d 03 8e 2e |lose_car|et")....|
|00000920| c9 20 31 32 20 3a 20 f2 | 70 65 72 66 6f 72 6d 5f |. 12 : .|perform_|
|00000930| 74 61 73 6b 28 21 62 6c | 6f 63 6b 25 2c 22 67 61 |task(!bl|ock%,"ga|
|00000940| 69 6e 5f 63 61 72 65 74 | 22 29 0d 03 98 13 c9 20 |in_caret|")..... |
|00000950| 31 37 20 3a 20 f2 6d 65 | 73 73 61 67 65 0d 03 a2 |17 : .me|ssage...|
|00000960| 1c c9 20 31 38 20 3a 20 | f2 6d 65 73 73 61 67 65 |.. 18 : |.message|
|00000970| 5f 72 65 63 6f 72 64 65 | 64 0d 03 ac 1f c9 20 31 |_recorde|d..... 1|
|00000980| 39 20 3a 20 f2 6d 65 73 | 73 61 67 65 5f 61 63 6b |9 : .mes|sage_ack|
|00000990| 6e 6f 77 6c 65 64 67 65 | 0d 03 b6 05 cb 0d 03 c0 |nowledge|........|
|000009a0| 05 e1 0d 03 ca 04 0d 03 | d4 25 dd f2 70 65 72 66 |........|.%..perf|
|000009b0| 6f 72 6d 5f 74 61 73 6b | 28 77 69 6e 64 6f 77 25 |orm_task|(window%|
|000009c0| 2c 66 75 6e 63 74 69 6f | 6e 24 29 0d 03 de 1d ea |,functio|n$).....|
|000009d0| 20 74 61 73 6b 5f 69 6e | 64 65 78 25 2c 74 61 73 | task_in|dex%,tas|
|000009e0| 6b 5f 66 6f 75 6e 64 25 | 0d 03 e8 07 ea 20 85 0d |k_found%|..... ..|
|000009f0| 03 f2 4a ee 20 85 20 ea | 20 f7 20 85 3a e7 20 9f |..J. . .| . .:. .|
|00000a00| 3d 32 39 20 8c 20 f2 64 | 65 66 61 75 6c 74 5f 74 |=29 . .d|efault_t|
|00000a10| 61 73 6b 28 66 75 6e 63 | 74 69 6f 6e 24 29 3a e1 |ask(func|tion$):.|
|00000a20| 20 8b 20 f2 64 69 73 70 | 6c 61 79 5f 65 72 72 6f | . .disp|lay_erro|
|00000a30| 72 28 9f 2c f6 24 2c 9e | 29 0d 03 fc 21 e3 20 74 |r(.,.$,.|)...!. t|
|00000a40| 61 73 6b 5f 69 6e 64 65 | 78 25 3d 30 20 b8 20 74 |ask_inde|x%=0 . t|
|00000a50| 61 73 6b 5f 6e 75 6d 25 | 2d 31 0d 04 06 51 e7 20 |ask_num%|-1...Q. |
|00000a60| 74 61 73 6b 5f 77 69 6e | 64 6f 77 25 28 74 61 73 |task_win|dow%(tas|
|00000a70| 6b 5f 69 6e 64 65 78 25 | 29 3d 77 69 6e 64 6f 77 |k_index%|)=window|
|00000a80| 25 20 80 20 74 61 73 6b | 5f 66 6f 75 6e 64 25 3d |% . task|_found%=|
|00000a90| 30 20 8c 20 74 61 73 6b | 5f 66 6f 75 6e 64 25 3d |0 . task|_found%=|
|00000aa0| 74 61 73 6b 5f 69 6e 64 | 65 78 25 0d 04 10 05 ed |task_ind|ex%.....|
|00000ab0| 0d 04 1a 5a f4 20 49 46 | 20 74 61 73 6b 5f 66 6f |...Z. IF| task_fo|
|00000ac0| 75 6e 64 25 3d 30 20 54 | 48 45 4e 20 50 52 4f 43 |und%=0 T|HEN PROC|
|00000ad0| 65 72 72 6f 72 28 22 54 | 61 73 6b 20 68 6f 6c 64 |error("T|ask hold|
|00000ae0| 65 72 20 6f 66 20 77 69 | 6e 64 6f 77 20 22 2b 53 |er of wi|ndow "+S|
|00000af0| 54 52 24 28 77 69 6e 64 | 6f 77 25 29 2b 22 20 6e |TR$(wind|ow%)+" n|
|00000b00| 6f 74 20 66 6f 75 6e 64 | 22 29 0d 04 24 2f f2 63 |ot found|")..$/.c|
|00000b10| 6f 6d 6d 61 6e 64 28 74 | 61 73 6b 5f 6e 61 6d 65 |ommand(t|ask_name|
|00000b20| 24 28 74 61 73 6b 5f 66 | 6f 75 6e 64 25 29 2c 66 |$(task_f|ound%),f|
|00000b30| 75 6e 63 74 69 6f 6e 24 | 29 0d 04 2e 1c f2 64 65 |unction$|).....de|
|00000b40| 66 61 75 6c 74 5f 74 61 | 73 6b 28 66 75 6e 63 74 |fault_ta|sk(funct|
|00000b50| 69 6f 6e 24 29 0d 04 38 | 05 e1 0d 04 42 04 0d 04 |ion$)..8|....B...|
|00000b60| 4c 1d dd f2 64 65 66 61 | 75 6c 74 5f 74 61 73 6b |L...defa|ult_task|
|00000b70| 28 66 75 6e 63 74 69 6f | 6e 24 29 0d 04 56 12 c8 |(functio|n$)..V..|
|00000b80| 8e 20 66 75 6e 63 74 69 | 6f 6e 24 20 ca 0d 04 60 |. functi|on$ ...`|
|00000b90| 33 c9 20 22 6f 70 65 6e | 5f 77 69 6e 64 6f 77 22 |3. "open|_window"|
|00000ba0| 20 20 20 3a c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 | :.. "|Wimp_Ope|
|00000bb0| 6e 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |nWindow"|,,block%|
|00000bc0| 0d 04 6a 34 c9 20 22 63 | 6c 6f 73 65 5f 77 69 6e |..j4. "c|lose_win|
|00000bd0| 64 6f 77 22 20 20 3a c8 | 99 20 22 57 69 6d 70 5f |dow" :.|. "Wimp_|
|00000be0| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|00000bf0| 6f 63 6b 25 0d 04 74 35 | c9 20 22 6b 65 79 5f 70 |ock%..t5|. "key_p|
|00000c00| 72 65 73 73 65 64 22 20 | 20 20 3a c8 99 20 22 57 |ressed" | :.. "W|
|00000c10| 69 6d 70 5f 50 72 6f 63 | 65 73 73 4b 65 79 22 2c |imp_Proc|essKey",|
|00000c20| 62 6c 6f 63 6b 25 21 32 | 34 0d 04 7e 84 c9 20 22 |block%!2|4..~.. "|
|00000c30| 6d 65 6e 75 5f 73 65 6c | 65 63 74 69 6f 6e 22 3a |menu_sel|ection":|
|00000c40| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 50 6f 69 6e |.. "Wimp|_GetPoin|
|00000c50| 74 65 72 49 6e 66 6f 22 | 2c 2c 62 6c 6f 63 6b 25 |terInfo"|,,block%|
|00000c60| 3a e7 20 28 28 62 6c 6f | 63 6b 25 21 38 29 20 80 |:. ((blo|ck%!8) .|
|00000c70| 20 31 29 3d 31 20 8c 20 | f2 6f 70 65 6e 5f 6d 65 | 1)=1 . |.open_me|
|00000c80| 6e 75 28 6d 65 6e 75 5f | 68 61 6e 64 6c 65 25 29 |nu(menu_|handle%)|
|00000c90| 20 8b 20 f2 6b 69 6c 6c | 5f 77 69 6e 64 6f 77 28 | . .kill|_window(|
|00000ca0| 6d 65 6e 75 5f 68 61 6e | 64 6c 65 25 29 0d 04 88 |menu_han|dle%)...|
|00000cb0| 05 cb 0d 04 92 05 e1 0d | 04 9c 04 0d 04 a6 18 dd |........|........|
|00000cc0| f2 6f 70 65 6e 5f 6d 65 | 6e 75 28 77 69 6e 64 6f |.open_me|nu(windo|
|00000cd0| 77 25 29 0d 04 b0 24 c8 | 99 20 22 57 69 6d 70 5f |w%)...$.|. "Wimp_|
|00000ce0| 47 65 74 50 6f 69 6e 74 | 65 72 49 6e 66 6f 22 2c |GetPoint|erInfo",|
|00000cf0| 2c 62 6c 6f 63 6b 25 0d | 04 ba 14 6d 6f 75 73 65 |,block%.|...mouse|
|00000d00| 5f 78 25 3d 21 62 6c 6f | 63 6b 25 0d 04 c4 15 6d |_x%=!blo|ck%....m|
|00000d10| 6f 75 73 65 5f 79 25 3d | 62 6c 6f 63 6b 25 21 34 |ouse_y%=|block%!4|
|00000d20| 0d 04 ce 1a e7 20 77 69 | 6e 64 6f 77 25 3d 6d 5f |..... wi|ndow%=m_|
|00000d30| 69 63 6f 6e 62 61 72 25 | 20 8c 0d 04 d8 16 20 20 |iconbar%| ..... |
|00000d40| e7 20 6c 5f 69 63 6f 6e | 62 61 72 25 3c 30 20 8c |. l_icon|bar%<0 .|
|00000d50| 0d 04 e2 27 20 20 20 20 | 6d 6f 75 73 65 5f 79 25 |...' |mouse_y%|
|00000d60| 3d 94 28 6c 5f 69 63 6f | 6e 62 61 72 25 29 2a 34 |=.(l_ico|nbar%)*4|
|00000d70| 30 2b 39 36 2b 32 34 0d | 04 ec 07 20 20 cc 0d 04 |0+96+24.|... ...|
|00000d80| f6 21 20 20 20 20 6d 6f | 75 73 65 5f 79 25 3d 6c |.! mo|use_y%=l|
|00000d90| 5f 69 63 6f 6e 62 61 72 | 25 2a 34 30 2b 39 36 0d |_iconbar|%*40+96.|
|00000da0| 05 00 07 20 20 cd 0d 05 | 0a 05 cc 0d 05 14 12 20 |... ...|....... |
|00000db0| 20 6d 6f 75 73 65 5f 79 | 25 2b 3d 31 32 0d 05 1e | mouse_y|%+=12...|
|00000dc0| 05 cd 0d 05 28 45 c8 99 | 20 22 57 69 6d 70 5f 43 |....(E..| "Wimp_C|
|00000dd0| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 77 69 6e 64 |reateMen|u",,wind|
|00000de0| 6f 77 25 2c 6d 6f 75 73 | 65 5f 78 25 2d 28 77 69 |ow%,mous|e_x%-(wi|
|00000df0| 6e 64 6f 77 25 21 31 36 | 29 2f 32 2d 31 36 2c 6d |ndow%!16|)/2-16,m|
|00000e00| 6f 75 73 65 5f 79 25 0d | 05 32 18 6d 65 6e 75 5f |ouse_y%.|.2.menu_|
|00000e10| 68 61 6e 64 6c 65 25 3d | 77 69 6e 64 6f 77 25 0d |handle%=|window%.|
|00000e20| 05 3c 05 e1 0d 05 46 04 | 0d 05 50 1c dd f2 72 65 |.<....F.|..P...re|
|00000e30| 6f 70 65 6e 5f 77 69 6e | 64 6f 77 28 68 61 6e 64 |open_win|dow(hand|
|00000e40| 6c 65 25 29 0d 05 5a 13 | 21 62 6c 6f 63 6b 25 3d |le%)..Z.|!block%=|
|00000e50| 68 61 6e 64 6c 65 25 0d | 05 64 21 c8 99 20 22 57 |handle%.|.d!.. "W|
|00000e60| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00000e70| 2c 2c 62 6c 6f 63 6b 25 | 0d 05 6e 24 c8 99 20 22 |,,block%|..n$.. "|
|00000e80| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|00000e90| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 0d 05 78 20 |ate",,bl|ock%..x |
|00000ea0| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |.. "Wimp|_OpenWin|
|00000eb0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 0d 05 82 05 |dow",,bl|ock%....|
|00000ec0| e1 0d 05 8c 04 0d 05 96 | 32 dd f2 73 65 74 5f 69 |........|2..set_i|
|00000ed0| 63 6f 6e 74 65 78 74 28 | 77 69 6e 64 6f 77 25 2c |context(|window%,|
|00000ee0| 69 63 6f 6e 25 2c 6e 65 | 77 74 65 78 74 24 2c 72 |icon%,ne|wtext$,r|
|00000ef0| 65 64 72 61 77 25 29 0d | 05 a0 2b ea 20 69 6e 64 |edraw%).|..+. ind|
|00000f00| 69 72 65 63 74 25 2c 69 | 6e 64 69 72 65 63 74 6c |irect%,i|ndirectl|
|00000f10| 65 6e 25 2c 69 6e 64 69 | 72 65 63 74 73 74 61 72 |en%,indi|rectstar|
|00000f20| 74 25 0d 05 aa 2f e7 20 | a4 67 65 74 5f 69 63 6f |t%.../. |.get_ico|
|00000f30| 6e 74 65 78 74 28 77 69 | 6e 64 6f 77 25 2c 69 63 |ntext(wi|ndow%,ic|
|00000f40| 6f 6e 25 29 3d 6e 65 77 | 74 65 78 74 24 20 8c 20 |on%)=new|text$ . |
|00000f50| e1 0d 05 b4 13 21 62 6c | 6f 63 6b 25 3d 77 69 6e |.....!bl|ock%=win|
|00000f60| 64 6f 77 25 0d 05 be 12 | 62 6c 6f 63 6b 25 21 34 |dow%....|block%!4|
|00000f70| 3d 69 63 6f 6e 25 0d 05 | c8 22 c8 99 20 22 57 69 |=icon%..|.".. "Wi|
|00000f80| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00000f90| 2c 2c 62 6c 6f 63 6b 25 | 0d 05 d2 20 c8 99 20 22 |,,block%|... .. "|
|00000fa0| 57 69 6d 70 5f 44 65 6c | 65 74 65 49 63 6f 6e 22 |Wimp_Del|eteIcon"|
|00000fb0| 2c 2c 62 6c 6f 63 6b 25 | 0d 05 dc 14 62 6c 6f 63 |,,block%|....bloc|
|00000fc0| 6b 25 21 34 3d 77 69 6e | 64 6f 77 25 0d 05 e6 17 |k%!4=win|dow%....|
|00000fd0| 69 6e 64 69 72 65 63 74 | 25 3d 62 6c 6f 63 6b 25 |indirect|%=block%|
|00000fe0| 21 32 34 0d 05 f0 24 69 | 6e 64 69 72 65 63 74 25 |!24...$i|ndirect%|
|00000ff0| 3d 69 6e 64 69 72 65 63 | 74 25 20 80 20 25 31 30 |=indirec|t% . %10|
|00001000| 30 30 30 30 30 30 30 0d | 05 fa 11 e7 20 69 6e 64 |0000000.|.... ind|
|00001010| 69 72 65 63 74 25 20 8c | 0d 06 04 1c 20 20 69 6e |irect% .|.... in|
|00001020| 64 69 72 65 63 74 6c 65 | 6e 25 3d 62 6c 6f 63 6b |directle|n%=block|
|00001030| 25 21 33 36 0d 06 0e 1e | 20 20 69 6e 64 69 72 65 |%!36....| indire|
|00001040| 63 74 73 74 61 72 74 25 | 3d 62 6c 6f 63 6b 25 21 |ctstart%|=block%!|
|00001050| 32 38 0d 06 18 2f 20 20 | 24 69 6e 64 69 72 65 63 |28.../ |$indirec|
|00001060| 74 73 74 61 72 74 25 3d | c0 6e 65 77 74 65 78 74 |tstart%=|.newtext|
|00001070| 24 2c 69 6e 64 69 72 65 | 63 74 6c 65 6e 25 2d 31 |$,indire|ctlen%-1|
|00001080| 29 0d 06 22 05 cc 0d 06 | 2c 20 20 20 24 28 62 6c |).."....|, $(bl|
|00001090| 6f 63 6b 25 2b 32 38 29 | 3d c0 6e 65 77 74 65 78 |ock%+28)|=.newtex|
|000010a0| 74 24 2c 31 31 29 0d 06 | 36 05 cd 0d 06 40 22 c8 |t$,11)..|6....@".|
|000010b0| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 49 63 |. "Wimp_|CreateIc|
|000010c0| 6f 6e 22 2c 2c 62 6c 6f | 63 6b 25 2b 34 0d 06 4a |on",,blo|ck%+4..J|
|000010d0| 55 e7 20 72 65 64 72 61 | 77 25 20 8c 20 c8 99 20 |U. redra|w% . .. |
|000010e0| 22 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 |"Wimp_Fo|rceRedra|
|000010f0| 77 22 2c 62 6c 6f 63 6b | 25 21 34 2c 62 6c 6f 63 |w",block|%!4,bloc|
|00001100| 6b 25 21 38 2c 62 6c 6f | 63 6b 25 21 31 32 2c 62 |k%!8,blo|ck%!12,b|
|00001110| 6c 6f 63 6b 25 21 31 36 | 2c 62 6c 6f 63 6b 25 21 |lock%!16|,block%!|
|00001120| 32 30 0d 06 54 05 e1 0d | 06 5e 04 0d 06 68 21 dd |20..T...|.^...h!.|
|00001130| a4 67 65 74 5f 69 63 6f | 6e 74 65 78 74 28 77 69 |.get_ico|ntext(wi|
|00001140| 6e 64 6f 77 25 2c 69 63 | 6f 6e 25 29 0d 06 72 24 |ndow%,ic|on%)..r$|
|00001150| ea 20 69 6e 64 69 72 65 | 63 74 25 2c 69 6e 64 69 |. indire|ct%,indi|
|00001160| 72 65 63 74 73 74 61 72 | 74 25 2c 6e 61 6d 65 24 |rectstar|t%,name$|
|00001170| 0d 06 7c 13 21 62 6c 6f | 63 6b 25 3d 77 69 6e 64 |..|.!blo|ck%=wind|
|00001180| 6f 77 25 0d 06 86 12 62 | 6c 6f 63 6b 25 21 34 3d |ow%....b|lock%!4=|
|00001190| 69 63 6f 6e 25 0d 06 90 | 22 c8 99 20 22 57 69 6d |icon%...|".. "Wim|
|000011a0| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|000011b0| 2c 62 6c 6f 63 6b 25 0d | 06 9a 17 69 6e 64 69 72 |,block%.|...indir|
|000011c0| 65 63 74 25 3d 62 6c 6f | 63 6b 25 21 32 34 0d 06 |ect%=blo|ck%!24..|
|000011d0| a4 24 69 6e 64 69 72 65 | 63 74 25 3d 69 6e 64 69 |.$indire|ct%=indi|
|000011e0| 72 65 63 74 25 20 80 20 | 25 31 30 30 30 30 30 30 |rect% . |%1000000|
|000011f0| 30 30 0d 06 ae 11 e7 20 | 69 6e 64 69 72 65 63 74 |00..... |indirect|
|00001200| 25 20 8c 0d 06 b8 1e 20 | 20 69 6e 64 69 72 65 63 |% ..... | indirec|
|00001210| 74 73 74 61 72 74 25 3d | 62 6c 6f 63 6b 25 21 32 |tstart%=|block%!2|
|00001220| 38 0d 06 c2 1b 20 20 6e | 61 6d 65 24 3d 24 69 6e |8.... n|ame$=$in|
|00001230| 64 69 72 65 63 74 73 74 | 61 72 74 25 0d 06 cc 05 |directst|art%....|
|00001240| cc 0d 06 d6 18 20 20 6e | 61 6d 65 24 3d 24 28 62 |..... n|ame$=$(b|
|00001250| 6c 6f 63 6b 25 2b 32 38 | 29 0d 06 e0 05 cd 0d 06 |lock%+28|).......|
|00001260| ea 0a 3d 6e 61 6d 65 24 | 0d 06 f4 04 0d 06 fe 1e |..=name$|........|
|00001270| dd f2 73 65 74 5f 63 61 | 72 65 74 28 77 69 6e 64 |..set_ca|ret(wind|
|00001280| 6f 77 25 2c 69 63 6f 6e | 25 29 0d 07 08 35 c8 99 |ow%,icon|%)...5..|
|00001290| 20 22 57 69 6d 70 5f 53 | 65 74 43 61 72 65 74 50 | "Wimp_S|etCaretP|
|000012a0| 6f 73 69 74 69 6f 6e 22 | 2c 77 69 6e 64 6f 77 25 |osition"|,window%|
|000012b0| 2c 69 63 6f 6e 25 2c 30 | 2c 30 2c 2d 31 2c 30 0d |,icon%,0|,0,-1,0.|
|000012c0| 07 12 05 e1 0d 07 1c 04 | 0d 07 26 22 dd f2 67 65 |........|..&"..ge|
|000012d0| 74 5f 63 61 72 65 74 28 | f8 20 77 69 6e 64 6f 77 |t_caret(|. window|
|000012e0| 25 2c f8 20 69 63 6f 6e | 25 29 0d 07 30 26 c8 99 |%,. icon|%)..0&..|
|000012f0| 20 22 57 69 6d 70 5f 47 | 65 74 43 61 72 65 74 50 | "Wimp_G|etCaretP|
|00001300| 6f 73 69 74 69 6f 6e 22 | 2c 2c 62 6c 6f 63 6b 25 |osition"|,,block%|
|00001310| 0d 07 3a 13 77 69 6e 64 | 6f 77 25 3d 21 62 6c 6f |..:.wind|ow%=!blo|
|00001320| 63 6b 25 0d 07 44 12 69 | 63 6f 6e 25 3d 62 6c 6f |ck%..D.i|con%=blo|
|00001330| 63 6b 25 21 34 0d 07 4e | 05 e1 0d 07 58 04 0d 07 |ck%!4..N|....X...|
|00001340| 62 24 dd f2 67 65 74 5f | 70 6f 69 6e 74 65 72 28 |b$..get_|pointer(|
|00001350| f8 20 77 69 6e 64 6f 77 | 25 2c f8 20 69 63 6f 6e |. window|%,. icon|
|00001360| 25 29 0d 07 6c 24 c8 99 | 20 22 57 69 6d 70 5f 47 |%)..l$..| "Wimp_G|
|00001370| 65 74 50 6f 69 6e 74 65 | 72 49 6e 66 6f 22 2c 2c |etPointe|rInfo",,|
|00001380| 62 6c 6f 63 6b 25 0d 07 | 76 14 77 69 6e 64 6f 77 |block%..|v.window|
|00001390| 25 3d 62 6c 6f 63 6b 25 | 31 32 0d 07 80 13 69 63 |%=block%|12....ic|
|000013a0| 6f 6e 25 3d 62 6c 6f 63 | 6b 25 21 31 36 0d 07 8a |on%=bloc|k%!16...|
|000013b0| 05 e1 0d 07 94 04 0d 07 | 9e 1f dd a4 67 65 74 5f |........|....get_|
|000013c0| 77 69 6e 64 6f 77 28 77 | 69 6e 64 6f 77 24 2c 66 |window(w|indow$,f|
|000013d0| 6c 61 67 25 29 0d 07 a8 | 0d ea 20 68 61 6e 64 6c |lag%)...|.. handl|
|000013e0| 65 25 0d 07 b2 25 c8 99 | 20 22 57 69 6d 70 5f 4f |e%...%..| "Wimp_O|
|000013f0| 70 65 6e 54 65 6d 70 6c | 61 74 65 22 2c 2c 74 65 |penTempl|ate",,te|
|00001400| 6d 70 6c 61 74 65 24 0d | 07 bc 5b c8 99 20 22 57 |mplate$.|..[.. "W|
|00001410| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00001420| 22 2c 2c 62 6c 6f 63 6b | 25 2c 62 75 66 66 65 72 |",,block|%,buffer|
|00001430| 5f 73 74 61 72 74 25 2c | 62 75 66 66 65 72 5f 65 |_start%,|buffer_e|
|00001440| 6e 64 25 2c 2d 31 2c 77 | 69 6e 64 6f 77 24 2c 30 |nd%,-1,w|indow$,0|
|00001450| 20 b8 20 2c 2c 62 75 66 | 66 65 72 5f 73 74 61 72 | . ,,buf|fer_star|
|00001460| 74 25 0d 07 c6 36 e7 20 | 66 6c 61 67 25 20 8c 20 |t%...6. |flag% . |
|00001470| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |.. "Wimp|_CreateW|
|00001480| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 20 b8 |indow",,|block% .|
|00001490| 20 68 61 6e 64 6c 65 25 | 0d 07 d0 1b c8 99 20 22 | handle%|...... "|
|000014a0| 57 69 6d 70 5f 43 6c 6f | 73 65 54 65 6d 70 6c 61 |Wimp_Clo|seTempla|
|000014b0| 74 65 22 0d 07 da 0c 3d | 68 61 6e 64 6c 65 25 0d |te"....=|handle%.|
|000014c0| 07 e4 04 0d 07 ee 11 dd | a4 63 72 65 61 74 65 5f |........|.create_|
|000014d0| 6d 65 6e 75 0d 07 f8 39 | e7 20 6d 65 6e 75 5f 73 |menu...9|. menu_s|
|000014e0| 74 61 72 74 25 2b 32 38 | 3e 6d 65 6e 75 5f 65 6e |tart%+28|>menu_en|
|000014f0| 64 25 20 8c 20 f2 65 72 | 72 6f 72 28 22 4d 65 6e |d% . .er|ror("Men|
|00001500| 75 20 61 72 65 61 20 66 | 75 6c 6c 22 29 0d 08 02 |u area f|ull")...|
|00001510| 23 ea 20 6d 25 2c 69 25 | 2c 69 32 25 2c 63 74 72 |#. m%,i%|,i2%,ctr|
|00001520| 25 2c 6d 61 78 78 25 2c | 6d 65 6e 75 70 74 72 25 |%,maxx%,|menuptr%|
|00001530| 0d 08 0c 18 ea 20 6d 65 | 6e 75 24 2c 6d 65 6e 75 |..... me|nu$,menu|
|00001540| 31 24 2c 69 74 65 6d 24 | 0d 08 16 0b f3 20 6d 65 |1$,item$|..... me|
|00001550| 6e 75 24 0d 08 20 15 c8 | 95 20 c2 6d 65 6e 75 24 |nu$.. ..|. .menu$|
|00001560| 2c 32 29 3d 22 2b 2b 22 | 0d 08 2a 0e 20 20 f3 20 |,2)="++"|..*. . |
|00001570| 6d 65 6e 75 31 24 0d 08 | 34 25 20 20 6d 65 6e 75 |menu1$..|4% menu|
|00001580| 24 3d c0 6d 65 6e 75 24 | 2c a9 28 6d 65 6e 75 24 |$=.menu$|,.(menu$|
|00001590| 29 2d 32 29 2b 6d 65 6e | 75 31 24 0d 08 3e 05 ce |)-2)+men|u1$..>..|
|000015a0| 0d 08 48 28 e7 20 c0 6d | 65 6e 75 24 2c 31 29 3d |..H(. .m|enu$,1)=|
|000015b0| 22 3d 22 20 8c 20 6d 65 | 6e 75 24 3d a0 28 c1 6d |"=" . me|nu$=.(.m|
|000015c0| 65 6e 75 24 2c 32 29 29 | 0d 08 52 18 6d 65 6e 75 |enu$,2))|..R.menu|
|000015d0| 70 74 72 25 3d 6d 65 6e | 75 5f 73 74 61 72 74 25 |ptr%=men|u_start%|
|000015e0| 0d 08 5c 08 69 25 3d 30 | 0d 08 66 0a 63 74 72 25 |..\.i%=0|..f.ctr%|
|000015f0| 3d 30 0d 08 70 15 e7 20 | c0 6d 65 6e 75 24 2c 31 |=0..p.. |.menu$,1|
|00001600| 29 3d 22 23 22 20 8c 0d | 08 7a 0a 20 20 69 25 3d |)="#" ..|.z. i%=|
|00001610| 31 0d 08 84 1a 20 20 6d | 65 6e 75 74 69 74 6c 65 |1.... m|enutitle|
|00001620| 24 3d a4 70 61 72 28 22 | 2c 22 29 0d 08 8e 05 cc |$=.par("|,").....|
|00001630| 0d 08 98 13 20 20 6d 65 | 6e 75 74 69 74 6c 65 24 |.... me|nutitle$|
|00001640| 3d 22 22 0d 08 a2 05 cd | 0d 08 ac 18 69 32 25 3d |="".....|....i2%=|
|00001650| a7 6d 65 6e 75 74 69 74 | 6c 65 24 2c 22 3e 22 29 |.menutit|le$,">")|
|00001660| 0d 08 b6 0d e7 20 69 32 | 25 3e 30 20 8c 0d 08 c0 |..... i2|%>0 ....|
|00001670| 27 20 20 6d 65 6e 75 70 | 74 72 25 21 32 30 3d a0 |' menup|tr%!20=.|
|00001680| 28 c1 6d 65 6e 75 74 69 | 74 6c 65 24 2c 69 32 25 |(.menuti|tle$,i2%|
|00001690| 2b 31 29 29 0d 08 ca 23 | 20 20 6d 65 6e 75 74 69 |+1))...#| menuti|
|000016a0| 74 6c 65 24 3d c0 6d 65 | 6e 75 74 69 74 6c 65 24 |tle$=.me|nutitle$|
|000016b0| 2c 69 32 25 2d 31 29 0d | 08 d4 05 cc 0d 08 de 14 |,i2%-1).|........|
|000016c0| 20 20 6d 65 6e 75 70 74 | 72 25 21 32 30 3d 34 30 | menupt|r%!20=40|
|000016d0| 0d 08 e8 05 cd 0d 08 f2 | 18 24 6d 65 6e 75 70 74 |........|.$menupt|
|000016e0| 72 25 3d 6d 65 6e 75 74 | 69 74 6c 65 24 0d 08 fc |r%=menut|itle$...|
|000016f0| 11 6d 65 6e 75 70 74 72 | 25 3f 31 32 3d 37 0d 09 |.menuptr|%?12=7..|
|00001700| 06 11 6d 65 6e 75 70 74 | 72 25 3f 31 33 3d 32 0d |..menupt|r%?13=2.|
|00001710| 09 10 11 6d 65 6e 75 70 | 74 72 25 3f 31 34 3d 37 |...menup|tr%?14=7|
|00001720| 0d 09 1a 11 6d 65 6e 75 | 70 74 72 25 3f 31 35 3d |....menu|ptr%?15=|
|00001730| 30 0d 09 24 16 6d 65 6e | 75 70 74 72 25 21 31 36 |0..$.men|uptr%!16|
|00001740| 3d 31 39 36 2d 32 34 0d | 09 2e 11 6d 65 6e 75 70 |=196-24.|...menup|
|00001750| 74 72 25 21 32 34 3d 30 | 0d 09 38 10 6d 65 6e 75 |tr%!24=0|..8.menu|
|00001760| 70 74 72 25 2b 3d 32 38 | 0d 09 42 19 6d 61 78 78 |ptr%+=28|..B.maxx|
|00001770| 25 3d a9 28 6d 65 6e 75 | 74 69 74 6c 65 24 29 2d |%=.(menu|title$)-|
|00001780| 33 0d 09 4c 14 c8 95 20 | c2 6d 65 6e 75 24 2c 31 |3..L... |.menu$,1|
|00001790| 29 3d 22 7e 22 0d 09 56 | 1e 20 20 6d 65 6e 75 24 |)="~"..V|. menu$|
|000017a0| 3d c0 6d 65 6e 75 24 2c | a9 28 6d 65 6e 75 24 29 |=.menu$,|.(menu$)|
|000017b0| 2d 31 29 0d 09 60 07 20 | 20 f5 0d 09 6a 17 20 20 |-1)..`. | ...j. |
|000017c0| 20 20 69 74 65 6d 24 3d | a4 70 61 72 28 22 2c 22 | item$=|.par(","|
|000017d0| 29 0d 09 74 19 20 20 20 | 20 f2 6d 65 6e 75 5f 69 |)..t. | .menu_i|
|000017e0| 74 65 6d 28 69 74 65 6d | 24 29 0d 09 7e 10 20 20 |tem(item|$)..~. |
|000017f0| fd 20 69 74 65 6d 24 3d | 22 22 0d 09 88 0d 20 20 |. item$=|"".... |
|00001800| f3 20 6d 65 6e 75 24 0d | 09 92 05 ce 0d 09 9c 05 |. menu$.|........|
|00001810| f5 0d 09 a6 15 20 20 69 | 74 65 6d 24 3d a4 70 61 |..... i|tem$=.pa|
|00001820| 72 28 22 2c 22 29 0d 09 | b0 17 20 20 f2 6d 65 6e |r(",")..|.. .men|
|00001830| 75 5f 69 74 65 6d 28 69 | 74 65 6d 24 29 0d 09 ba |u_item(i|tem$)...|
|00001840| 0e fd 20 69 74 65 6d 24 | 3d 22 22 0d 09 c4 24 e7 |.. item$|=""...$.|
|00001850| 20 6d 65 6e 75 70 74 72 | 25 2d 6d 65 6e 75 5f 73 | menuptr|%-menu_s|
|00001860| 74 61 72 74 25 3c 3d 32 | 38 20 8c 20 3d 2d 31 0d |tart%<=2|8 . =-1.|
|00001870| 09 ce 24 6d 65 6e 75 70 | 74 72 25 21 2d 32 34 3d |..$menup|tr%!-24=|
|00001880| 28 6d 65 6e 75 70 74 72 | 25 21 2d 32 34 29 84 20 |(menuptr|%!-24). |
|00001890| 26 38 30 0d 09 d8 12 6d | 25 3d 6d 65 6e 75 5f 73 |&80....m|%=menu_s|
|000018a0| 74 61 72 74 25 0d 09 e2 | 15 6d 25 21 31 36 3d 6d |tart%...|.m%!16=m|
|000018b0| 61 78 78 25 2a 31 36 2b | 31 32 0d 09 ec 18 6d 65 |axx%*16+|12....me|
|000018c0| 6e 75 5f 73 74 61 72 74 | 25 3d 6d 65 6e 75 70 74 |nu_start|%=menupt|
|000018d0| 72 25 0d 09 f6 07 3d 6d | 25 0d 0a 00 04 0d 0a 0a |r%....=m|%.......|
|000018e0| 16 dd f2 6d 65 6e 75 5f | 69 74 65 6d 28 74 65 78 |...menu_|item(tex|
|000018f0| 74 24 29 0d 0a 14 18 ea | 20 69 25 2c 66 6c 67 25 |t$).....| i%,flg%|
|00001900| 2c 73 75 62 70 74 72 25 | 2c 6c 25 0d 0a 1e 12 e7 |,subptr%|,l%.....|
|00001910| 20 74 65 78 74 24 3d 22 | 22 20 8c 20 e1 0d 0a 28 | text$="|" . ...(|
|00001920| 36 e7 20 6d 65 6e 75 70 | 74 72 25 2b 32 34 3e 6d |6. menup|tr%+24>m|
|00001930| 65 6e 75 5f 65 6e 64 25 | 20 8c 20 f2 65 72 72 6f |enu_end%| . .erro|
|00001940| 72 28 22 4d 65 6e 75 20 | 61 72 65 61 20 66 75 6c |r("Menu |area ful|
|00001950| 6c 22 29 0d 0a 32 11 e7 | 20 74 65 78 74 24 3d 22 |l")..2..| text$="|
|00001960| 26 22 20 8c 0d 0a 3c 30 | 20 20 f2 65 72 72 6f 72 |&" ...<0| .error|
|00001970| 28 22 27 26 27 20 4e 6f | 74 20 73 75 70 70 6f 72 |("'&' No|t suppor|
|00001980| 74 20 69 6e 20 6d 65 6e | 75 20 74 72 65 65 20 79 |t in men|u tree y|
|00001990| 65 74 22 29 0d 0a 46 05 | cd 0d 0a 50 0c 66 6c 67 |et")..F.|...P.flg|
|000019a0| 25 3d 26 30 30 0d 0a 5a | 12 69 25 3d a7 74 65 78 |%=&00..Z|.i%=.tex|
|000019b0| 74 24 2c 22 3f 22 29 0d | 0a 64 27 e7 20 69 25 3c |t$,"?").|.d'. i%<|
|000019c0| 32 20 8c 20 69 25 3d a7 | 74 65 78 74 24 2c 22 3e |2 . i%=.|text$,">|
|000019d0| 22 29 20 8b 20 66 6c 67 | 25 2b 3d 26 30 38 0d 0a |") . flg|%+=&08..|
|000019e0| 6e 0c e7 20 69 25 3e 30 | 20 8c 0d 0a 78 1d 20 20 |n.. i%>0| ...x. |
|000019f0| 73 75 62 70 74 72 25 3d | a0 28 c1 74 65 78 74 24 |subptr%=|.(.text$|
|00001a00| 2c 69 25 2b 31 29 29 0d | 0a 82 18 20 20 74 65 78 |,i%+1)).|... tex|
|00001a10| 74 24 3d c0 74 65 78 74 | 24 2c 69 25 2d 31 29 0d |t$=.text|$,i%-1).|
|00001a20| 0a 8c 05 cc 0d 0a 96 10 | 20 20 73 75 62 70 74 72 |........| subptr|
|00001a30| 25 3d 2d 31 0d 0a a0 05 | cd 0d 0a aa 36 e7 20 c2 |%=-1....|....6. .|
|00001a40| 74 65 78 74 24 2c 31 29 | 3d 22 23 22 20 8c 20 74 |text$,1)|="#" . t|
|00001a50| 65 78 74 24 3d c0 74 65 | 78 74 24 2c a9 74 65 78 |ext$=.te|xt$,.tex|
|00001a60| 74 24 2d 31 29 3a 66 6c | 67 25 2b 3d 26 30 32 0d |t$-1):fl|g%+=&02.|
|00001a70| 0a b4 36 e7 20 c0 74 65 | 78 74 24 2c 31 29 3d 22 |..6. .te|xt$,1)="|
|00001a80| 21 22 20 8c 20 74 65 78 | 74 24 3d c2 74 65 78 74 |!" . tex|t$=.text|
|00001a90| 24 2c a9 74 65 78 74 24 | 2d 31 29 3a 66 6c 67 25 |$,.text$|-1):flg%|
|00001aa0| 2b 3d 26 30 31 0d 0a be | 13 6d 65 6e 75 70 74 72 |+=&01...|.menuptr|
|00001ab0| 25 21 30 3d 66 6c 67 25 | 0d 0a c8 16 6d 65 6e 75 |%!0=flg%|....menu|
|00001ac0| 70 74 72 25 21 34 3d 73 | 75 62 70 74 72 25 0d 0a |ptr%!4=s|ubptr%..|
|00001ad0| d2 18 6d 65 6e 75 70 74 | 72 25 21 38 3d 26 30 37 |..menupt|r%!8=&07|
|00001ae0| 30 30 30 30 32 31 0d 0a | dc 15 e7 20 c0 74 65 78 |000021..|... .tex|
|00001af0| 74 24 2c 31 29 3d 22 3f | 22 20 8c 0d 0a e6 1a 20 |t$,1)="?|" ..... |
|00001b00| 20 6d 65 6e 75 70 74 72 | 25 21 38 3d 26 30 37 30 | menuptr|%!8=&070|
|00001b10| 30 30 31 31 41 0d 0a f0 | 1e 20 20 69 33 25 3d a4 |0011A...|. i3%=.|
|00001b20| 77 6f 72 6b 73 70 61 63 | 65 28 a9 28 74 65 78 74 |workspac|e(.(text|
|00001b30| 24 29 29 0d 0a fa 14 20 | 20 24 69 33 25 3d c1 74 |$)).... | $i3%=.t|
|00001b40| 65 78 74 24 2c 32 29 0d | 0b 04 15 20 20 6d 65 6e |ext$,2).|... men|
|00001b50| 75 70 74 72 25 21 31 32 | 3d 69 33 25 0d 0b 0e 20 |uptr%!12|=i3%... |
|00001b60| 20 20 6d 65 6e 75 70 74 | 72 25 21 31 36 3d 73 79 | menupt|r%!16=sy|
|00001b70| 73 74 65 6d 73 70 72 69 | 74 65 73 25 0d 0b 18 18 |stemspri|tes%....|
|00001b80| 20 20 6d 65 6e 75 70 74 | 72 25 21 32 30 3d a9 74 | menupt|r%!20=.t|
|00001b90| 65 78 74 24 0d 0b 22 05 | cc 0d 0b 2c 17 20 20 e7 |ext$..".|...,. .|
|00001ba0| 20 c0 74 65 78 74 24 2c | 31 29 3d 22 24 22 20 8c | .text$,|1)="$" .|
|00001bb0| 0d 0b 36 16 20 20 20 20 | 21 6d 65 6e 75 70 74 72 |..6. |!menuptr|
|00001bc0| 25 2b 3d 26 30 34 0d 0b | 40 18 20 20 20 20 6d 65 |%+=&04..|@. me|
|00001bd0| 6e 75 70 74 72 25 21 38 | 2b 3d 26 31 30 30 0d 0b |nuptr%!8|+=&100..|
|00001be0| 4a 16 20 20 20 20 69 25 | 3d a7 74 65 78 74 24 2c |J. i%|=.text$,|
|00001bf0| 22 28 22 29 0d 0b 54 10 | 20 20 20 20 e7 20 69 25 |"(")..T.| . i%|
|00001c00| 3e 30 20 8c 0d 0b 5e 1c | 20 20 20 20 20 20 6c 25 |>0 ...^.| l%|
|00001c10| 3d bb 28 c1 74 65 78 74 | 24 2c 69 25 2b 31 29 29 |=.(.text|$,i%+1))|
|00001c20| 0d 0b 68 1c 20 20 20 20 | 20 20 74 65 78 74 24 3d |..h. | text$=|
|00001c30| c0 74 65 78 74 24 2c 69 | 25 2d 31 29 0d 0b 72 09 |.text$,i|%-1)..r.|
|00001c40| 20 20 20 20 cc 0d 0b 7c | 0f 20 20 20 20 20 20 6c | ...||. l|
|00001c50| 25 3d 31 32 0d 0b 86 09 | 20 20 20 20 cd 0d 0b 90 |%=12....| ....|
|00001c60| 20 20 20 20 20 6d 65 6e | 75 70 74 72 25 21 31 32 | men|uptr%!12|
|00001c70| 3d a0 28 c1 74 65 78 74 | 24 2c 32 29 29 0d 0b 9a |=.(.text|$,2))...|
|00001c80| 16 20 20 20 20 6d 65 6e | 75 70 74 72 25 21 31 36 |. men|uptr%!16|
|00001c90| 3d 2d 31 0d 0b a4 16 20 | 20 20 20 6d 65 6e 75 70 |=-1.... | menup|
|00001ca0| 74 72 25 21 32 30 3d 6c | 25 0d 0b ae 17 20 20 20 |tr%!20=l|%.... |
|00001cb0| 20 e7 20 6c 25 3e 31 35 | 20 8c 20 6c 25 3d 31 35 | . l%>15| . l%=15|
|00001cc0| 0d 0b b8 18 20 20 20 20 | 74 65 78 74 24 3d c4 6c |.... |text$=.l|
|00001cd0| 25 2d 31 2c 22 20 22 29 | 0d 0b c2 07 20 20 cc 0d |%-1," ")|.... ..|
|00001ce0| 0b cc 18 20 20 20 20 e7 | 20 a9 28 74 65 78 74 24 |... .| .(text$|
|00001cf0| 29 3c 3d 31 32 20 8c 0d | 0b d6 1e 20 20 20 20 20 |)<=12 ..|... |
|00001d00| 20 24 28 6d 65 6e 75 70 | 74 72 25 2b 31 32 29 3d | $(menup|tr%+12)=|
|00001d10| 74 65 78 74 24 0d 0b e0 | 09 20 20 20 20 cc 0d 0b |text$...|. ...|
|00001d20| ea 24 20 20 20 20 20 20 | 69 33 25 3d a4 77 6f 72 |.$ |i3%=.wor|
|00001d30| 6b 73 70 61 63 65 28 a9 | 28 74 65 78 74 24 29 2b |kspace(.|(text$)+|
|00001d40| 31 29 0d 0b f4 14 20 20 | 20 20 20 20 24 69 33 25 |1).... | $i3%|
|00001d50| 3d 74 65 78 74 24 0d 0b | fe 19 20 20 20 20 20 20 |=text$..|.. |
|00001d60| 6d 65 6e 75 70 74 72 25 | 21 31 32 3d 69 33 25 0d |menuptr%|!12=i3%.|
|00001d70| 0c 08 18 20 20 20 20 20 | 20 6d 65 6e 75 70 74 72 |... | menuptr|
|00001d80| 25 21 31 36 3d 2d 31 0d | 0c 12 20 20 20 20 20 20 |%!16=-1.|.. |
|00001d90| 20 6d 65 6e 75 70 74 72 | 25 21 32 30 3d a9 28 74 | menuptr|%!20=.(t|
|00001da0| 65 78 74 24 29 2b 31 0d | 0c 1c 26 20 20 20 20 20 |ext$)+1.|..& |
|00001db0| 20 6d 65 6e 75 70 74 72 | 25 21 38 3d 6d 65 6e 75 | menuptr|%!8=menu|
|00001dc0| 70 74 72 25 21 38 20 84 | 20 26 31 30 30 0d 0c 26 |ptr%!8 .| &100..&|
|00001dd0| 09 20 20 20 20 cd 0d 0c | 30 07 20 20 cd 0d 0c 3a |. ...|0. ...:|
|00001de0| 27 20 20 e7 20 a9 28 74 | 65 78 74 24 29 3e 6d 61 |' . .(t|ext$)>ma|
|00001df0| 78 78 25 20 8c 20 6d 61 | 78 78 25 3d a9 28 74 65 |xx% . ma|xx%=.(te|
|00001e00| 78 74 24 29 0d 0c 44 05 | cd 0d 0c 4e 10 6d 65 6e |xt$)..D.|...N.men|
|00001e10| 75 70 74 72 25 2b 3d 32 | 34 0d 0c 58 05 e1 0d 0c |uptr%+=2|4..X....|
|00001e20| 62 05 20 0d 0c 6c 17 dd | a4 77 6f 72 6b 73 70 61 |b. ..l..|.workspa|
|00001e30| 63 65 28 73 70 61 63 65 | 25 29 0d 0c 76 47 e7 20 |ce(space|%)..vG. |
|00001e40| 62 75 66 66 65 72 5f 73 | 74 61 72 74 25 2b 73 70 |buffer_s|tart%+sp|
|00001e50| 61 63 65 25 3e 62 75 66 | 66 65 72 5f 65 6e 64 25 |ace%>buf|fer_end%|
|00001e60| 20 8c 20 f2 65 72 72 6f | 72 28 22 4e 6f 20 6d 6f | . .erro|r("No mo|
|00001e70| 72 65 20 62 75 66 66 65 | 72 20 73 70 61 63 65 22 |re buffe|r space"|
|00001e80| 29 0d 0c 80 19 62 75 66 | 66 65 72 5f 73 74 61 72 |)....buf|fer_star|
|00001e90| 74 25 2b 3d 73 70 61 63 | 65 25 0d 0c 8a 19 3d 62 |t%+=spac|e%....=b|
|00001ea0| 75 66 66 65 72 5f 73 74 | 61 72 74 25 2d 73 70 61 |uffer_st|art%-spa|
|00001eb0| 63 65 25 0d 0c 94 04 0d | 0c 9e 0f dd a4 70 61 72 |ce%.....|.....par|
|00001ec0| 28 73 65 70 24 29 0d 0c | a8 0c 69 31 25 3d 69 25 |(sep$)..|..i1%=i%|
|00001ed0| 2b 31 0d 0c b2 1c 69 25 | 3d a7 6d 65 6e 75 24 2b |+1....i%|=.menu$+|
|00001ee0| 73 65 70 24 2c 73 65 70 | 24 2c 69 31 25 29 0d 0c |sep$,sep|$,i1%)..|
|00001ef0| bc 17 3d c1 6d 65 6e 75 | 24 2c 69 31 25 2c 69 25 |..=.menu|$,i1%,i%|
|00001f00| 2d 69 31 25 29 0d 0c c6 | 04 0d 0c d0 1c dd f2 73 |-i1%)...|.......s|
|00001f10| 65 74 5f 74 69 6b 28 6d | 65 6e 75 25 2c 6f 66 66 |et_tik(m|enu%,off|
|00001f20| 73 65 74 25 29 0d 0c da | 35 20 20 21 28 6d 65 6e |set%)...|5 !(men|
|00001f30| 75 25 2b 34 2b 6f 66 66 | 73 65 74 25 2a 32 34 29 |u%+4+off|set%*24)|
|00001f40| 3d 21 28 6d 65 6e 75 25 | 2b 34 2b 6f 66 66 73 65 |=!(menu%|+4+offse|
|00001f50| 74 25 2a 32 34 29 20 84 | 20 31 0d 0c e4 05 e1 0d |t%*24) .| 1......|
|00001f60| 0c ee 04 0d 0c f8 1e dd | f2 75 6e 73 65 74 5f 74 |........|.unset_t|
|00001f70| 69 6b 28 6d 65 6e 75 25 | 2c 6f 66 66 73 65 74 25 |ik(menu%|,offset%|
|00001f80| 29 0d 0d 02 37 20 20 21 | 28 6d 65 6e 75 25 2b 34 |)...7 !|(menu%+4|
|00001f90| 2b 6f 66 66 73 65 74 25 | 2a 32 34 29 3d 21 28 6d |+offset%|*24)=!(m|
|00001fa0| 65 6e 75 25 2b 34 2b 6f | 66 66 73 65 74 25 2a 32 |enu%+4+o|ffset%*2|
|00001fb0| 34 29 20 80 20 ac 20 31 | 0d 0d 0c 05 e1 0d 0d 16 |4) . . 1|........|
|00001fc0| 04 0d 0d 20 1c dd f2 65 | 6f 72 5f 74 69 6b 28 6d |... ...e|or_tik(m|
|00001fd0| 65 6e 75 25 2c 6f 66 66 | 73 65 74 25 29 0d 0d 2a |enu%,off|set%)..*|
|00001fe0| 35 20 20 21 28 6d 65 6e | 75 25 2b 34 2b 6f 66 66 |5 !(men|u%+4+off|
|00001ff0| 73 65 74 25 2a 32 34 29 | 3d 21 28 6d 65 6e 75 25 |set%*24)|=!(menu%|
|00002000| 2b 34 2b 6f 66 66 73 65 | 74 25 2a 32 34 29 20 82 |+4+offse|t%*24) .|
|00002010| 20 31 0d 0d 34 05 e1 0d | 0d 3e 04 0d 0d 48 1c dd | 1..4...|.>...H..|
|00002020| a4 74 69 6b 5f 73 65 74 | 28 6d 65 6e 75 25 2c 6f |.tik_set|(menu%,o|
|00002030| 66 66 73 65 74 25 29 0d | 0d 52 1e 3d 21 28 6d 65 |ffset%).|.R.=!(me|
|00002040| 6e 75 25 2b 34 2b 6f 66 | 66 73 65 74 25 2a 32 34 |nu%+4+of|fset%*24|
|00002050| 29 20 80 20 31 0d 0d 5c | 04 0d 0d 66 17 dd a4 6c |) . 1..\|...f...l|
|00002060| 65 6e 67 74 68 28 66 69 | 6c 65 6e 61 6d 65 24 29 |ength(fi|lename$)|
|00002070| 0d 0d 70 14 ea 20 6c 65 | 6e 67 74 68 25 2c 66 6c |..p.. le|ngth%,fl|
|00002080| 61 67 73 25 0d 0d 7a 32 | c8 99 20 22 4f 53 5f 46 |ags%..z2|.. "OS_F|
|00002090| 69 6c 65 22 2c 26 30 35 | 2c 66 69 6c 65 6e 61 6d |ile",&05|,filenam|
|000020a0| 65 24 20 b8 20 66 6c 61 | 67 73 25 2c 2c 2c 2c 6c |e$ . fla|gs%,,,,l|
|000020b0| 65 6e 67 74 68 25 0d 0d | 84 32 e7 20 66 6c 61 67 |ength%..|.2. flag|
|000020c0| 73 25 3c 3e 31 20 8c 20 | f2 65 72 72 6f 72 28 22 |s%<>1 . |.error("|
|000020d0| 43 61 6e 6e 6f 74 20 66 | 69 6e 64 20 22 2b 66 69 |Cannot f|ind "+fi|
|000020e0| 6c 65 6e 61 6d 65 24 29 | 0d 0d 8e 0c 3d 6c 65 6e |lename$)|....=len|
|000020f0| 67 74 68 25 0d 0d 98 04 | 0d 0d a2 0e dd f2 6c 6f |gth%....|......lo|
|00002100| 61 64 5f 61 63 6b 0d 0d | ac 16 62 6c 6f 63 6b 25 |ad_ack..|..block%|
|00002110| 21 31 32 3d 62 6c 6f 63 | 6b 25 21 38 0d 0d b6 0f |!12=bloc|k%!8....|
|00002120| 62 6c 6f 63 6b 25 21 31 | 36 3d 34 0d 0d c0 0e 21 |block%!1|6=4....!|
|00002130| 62 6c 6f 63 6b 25 3d 36 | 34 0d 0d ca 2c c8 99 20 |block%=6|4...,.. |
|00002140| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00002150| 65 22 2c 31 37 2c 62 6c | 6f 63 6b 25 2c 62 6c 6f |e",17,bl|ock%,blo|
|00002160| 63 6b 25 21 34 0d 0d d4 | 05 e1 0d 0d de 04 0d 0d |ck%!4...|........|
|00002170| e8 15 dd a4 72 65 61 64 | 7a 28 61 64 64 72 65 73 |....read|z(addres|
|00002180| 73 25 29 0d 0d f2 0b ea | 20 74 65 78 74 24 0d 0d |s%).....| text$..|
|00002190| fc 13 c8 95 20 3f 61 64 | 64 72 65 73 73 25 3c 3e |.... ?ad|dress%<>|
|000021a0| 30 0d 0e 06 17 74 65 78 | 74 24 2b 3d bd 28 3f 61 |0....tex|t$+=.(?a|
|000021b0| 64 64 72 65 73 73 25 29 | 0d 0e 10 0f 61 64 64 72 |ddress%)|....addr|
|000021c0| 65 73 73 25 2b 3d 31 0d | 0e 1a 05 ce 0d 0e 24 0a |ess%+=1.|......$.|
|000021d0| 3d 74 65 78 74 24 0d 0e | 2e 04 0d 0e 38 21 dd f2 |=text$..|....8!..|
|000021e0| 77 72 69 74 65 7a 28 61 | 64 64 72 65 73 73 25 2c |writez(a|ddress%,|
|000021f0| 74 65 78 74 24 2c 6c 65 | 6e 25 29 0d 0e 42 1a 74 |text$,le|n%)..B.t|
|00002200| 65 78 74 24 3d 4c 45 46 | 54 28 74 65 78 74 24 2c |ext$=LEF|T(text$,|
|00002210| 6c 65 6e 25 29 0d 0e 4c | 18 e3 20 6c 6f 6f 70 25 |len%)..L|.. loop%|
|00002220| 3d 31 20 b8 20 a9 28 74 | 65 78 74 24 29 0d 0e 56 |=1 . .(t|ext$)..V|
|00002230| 2a 3f 28 61 64 64 72 65 | 73 73 25 2b 6c 6f 6f 70 |*?(addre|ss%+loop|
|00002240| 25 2d 31 29 3d 97 28 c1 | 74 65 78 74 24 2c 6c 6f |%-1)=.(.|text$,lo|
|00002250| 6f 70 25 2c 31 29 29 0d | 0e 60 05 ed 0d 0e 6a 16 |op%,1)).|.`....j.|
|00002260| e7 20 a9 28 74 65 78 74 | 24 29 3c 3e 6c 65 6e 25 |. .(text|$)<>len%|
|00002270| 20 8c 0d 0e 74 1f 20 20 | e3 20 6c 6f 6f 70 25 3d | ...t. |. loop%=|
|00002280| a9 28 74 65 78 74 24 29 | 20 b8 20 6c 65 6e 25 2d |.(text$)| . len%-|
|00002290| 31 0d 0e 7e 19 20 20 3f | 28 61 64 64 72 65 73 73 |1..~. ?|(address|
|000022a0| 25 2b 6c 6f 6f 70 25 29 | 3d 30 0d 0e 88 07 20 20 |%+loop%)|=0.... |
|000022b0| ed 0d 0e 92 05 cd 0d 0e | 9c 05 e1 0d 0e a6 04 0d |........|........|
|000022c0| 0e b0 18 dd a4 77 61 72 | 6e 69 6e 67 5f 62 6f 78 |.....war|ning_box|
|000022d0| 28 74 65 78 74 24 29 0d | 0e ba 0d ea 20 72 65 74 |(text$).|.... ret|
|000022e0| 75 72 6e 25 0d 0e c4 10 | 62 6c 6f 63 6b 25 21 35 |urn%....|block%!5|
|000022f0| 31 32 3d 30 0d 0e ce 17 | 24 28 62 6c 6f 63 6b 25 |12=0....|$(block%|
|00002300| 2b 35 31 36 29 3d 74 65 | 78 74 24 0d 0e d8 51 c8 |+516)=te|xt$...Q.|
|00002310| 99 20 22 57 69 6d 70 5f | 52 65 70 6f 72 74 45 72 |. "Wimp_|ReportEr|
|00002320| 72 6f 72 22 2c 62 6c 6f | 63 6b 25 2b 32 35 36 2c |ror",blo|ck%+256,|
|00002330| 25 31 30 31 31 31 2c 22 | 4d 65 73 73 61 67 65 20 |%10111,"|Message |
|00002340| 66 72 6f 6d 3a 20 22 2b | 70 72 6f 67 6e 61 6d 65 |from: "+|progname|
|00002350| 24 20 b8 20 2c 72 65 74 | 75 72 6e 25 0d 0e e2 14 |$ . ,ret|urn%....|
|00002360| e7 20 72 65 74 75 72 6e | 25 3d 31 20 8c 20 3d b9 |. return|%=1 . =.|
|00002370| 0d 0e ec 06 3d a3 0d 0e | f6 04 0d 0f 00 1e dd a4 |....=...|........|
|00002380| 69 63 6f 6e 62 61 72 5f | 69 6e 73 74 61 6c 6c 28 |iconbar_|install(|
|00002390| 73 70 72 69 74 65 24 29 | 0d 0f 0a 0d ea 20 68 61 |sprite$)|..... ha|
|000023a0| 6e 64 6c 65 25 0d 0f 14 | 0e 21 62 6c 6f 63 6b 25 |ndle%...|.!block%|
|000023b0| 3d 2d 31 0d 0f 1e 0e 62 | 6c 6f 63 6b 25 21 34 3d |=-1....b|lock%!4=|
|000023c0| 30 0d 0f 28 0e 62 6c 6f | 63 6b 25 21 38 3d 30 0d |0..(.blo|ck%!8=0.|
|000023d0| 0f 32 10 62 6c 6f 63 6b | 25 21 31 32 3d 36 38 0d |.2.block|%!12=68.|
|000023e0| 0f 3c 10 62 6c 6f 63 6b | 25 21 31 36 3d 36 38 0d |.<.block|%!16=68.|
|000023f0| 0f 46 13 62 6c 6f 63 6b | 25 21 32 30 3d 26 33 30 |.F.block|%!20=&30|
|00002400| 30 32 0d 0f 50 18 24 28 | 62 6c 6f 63 6b 25 2b 32 |02..P.$(|block%+2|
|00002410| 34 29 3d 73 70 72 69 74 | 65 24 0d 0f 5a 2a c8 99 |4)=sprit|e$..Z*..|
|00002420| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 49 63 6f | "Wimp_C|reateIco|
|00002430| 6e 22 2c 2c 62 6c 6f 63 | 6b 25 20 b8 20 68 61 6e |n",,bloc|k% . han|
|00002440| 64 6c 65 25 0d 0f 64 0c | 3d 68 61 6e 64 6c 65 25 |dle%..d.|=handle%|
|00002450| 0d 0f 6e 04 0d 0f 78 19 | dd f2 6d 65 6d 6f 72 79 |..n...x.|..memory|
|00002460| 5f 62 61 63 6b 28 74 6f | 74 61 6c 25 29 0d 0f 82 |_back(to|tal%)...|
|00002470| 25 ea 20 70 61 67 65 5f | 73 69 7a 65 25 2c 66 72 |%. page_|size%,fr|
|00002480| 65 65 5f 6d 65 6d 25 2c | 73 6c 6f 74 5f 73 69 7a |ee_mem%,|slot_siz|
|00002490| 65 25 0d 0f 8c 27 c8 99 | 20 22 4f 53 5f 52 65 61 |e%...'..| "OS_Rea|
|000024a0| 64 4d 65 6d 4d 61 70 49 | 6e 66 6f 22 20 b8 20 70 |dMemMapI|nfo" . p|
|000024b0| 61 67 65 5f 73 69 7a 65 | 25 0d 0f 96 0f c8 95 20 |age_size|%...... |
|000024c0| 74 6f 74 61 6c 25 3e 30 | 0d 0f a0 29 c8 99 20 22 |total%>0|...).. "|
|000024d0| 57 69 6d 70 5f 53 6c 6f | 74 53 69 7a 65 22 2c 2d |Wimp_Slo|tSize",-|
|000024e0| 31 2c 2d 31 20 b8 20 73 | 6c 6f 74 5f 73 69 7a 65 |1,-1 . s|lot_size|
|000024f0| 25 0d 0f aa 2f c8 99 20 | 22 57 69 6d 70 5f 53 6c |%.../.. |"Wimp_Sl|
|00002500| 6f 74 53 69 7a 65 22 2c | 73 6c 6f 74 5f 73 69 7a |otSize",|slot_siz|
|00002510| 65 25 2d 70 61 67 65 5f | 73 69 7a 65 25 2c 2d 31 |e%-page_|size%,-1|
|00002520| 0d 0f b4 16 74 6f 74 61 | 6c 25 2d 3d 70 61 67 65 |....tota|l%-=page|
|00002530| 5f 73 69 7a 65 25 0d 0f | be 05 ce 0d 0f c8 05 e1 |_size%..|........|
|00002540| 0d 0f d2 04 0d 0f dc 25 | dd a4 61 64 64 5f 6d 65 |.......%|..add_me|
|00002550| 6d 6f 72 79 28 61 6d 6d | 6f 75 6e 74 25 2c f8 20 |mory(amm|ount%,. |
|00002560| 61 64 64 72 65 73 73 25 | 29 0d 0f e6 2c ea 20 70 |address%|)...,. p|
|00002570| 61 67 65 5f 73 69 7a 65 | 25 2c 66 72 65 65 5f 6d |age_size|%,free_m|
|00002580| 65 6d 25 2c 73 6c 6f 74 | 5f 73 69 7a 65 25 2c 74 |em%,slot|_size%,t|
|00002590| 6f 74 61 6c 25 0d 0f f0 | 27 c8 99 20 22 4f 53 5f |otal%...|'.. "OS_|
|000025a0| 52 65 61 64 4d 65 6d 4d | 61 70 49 6e 66 6f 22 20 |ReadMemM|apInfo" |
|000025b0| b8 20 70 61 67 65 5f 73 | 69 7a 65 25 0d 0f fa 29 |. page_s|ize%...)|
|000025c0| c8 99 20 22 4f 53 5f 43 | 68 61 6e 67 65 45 6e 76 |.. "OS_C|hangeEnv|
|000025d0| 69 72 6f 6e 6d 65 6e 74 | 22 20 b8 20 2c 61 64 64 |ironment|" . ,add|
|000025e0| 72 65 73 73 25 0d 10 04 | 11 c8 95 20 61 6d 6d 6f |ress%...|... ammo|
|000025f0| 75 6e 74 25 3e 30 0d 10 | 0e 34 c8 99 20 22 57 69 |unt%>0..|.4.. "Wi|
|00002600| 6d 70 5f 53 6c 6f 74 53 | 69 7a 65 22 2c 2d 31 2c |mp_SlotS|ize",-1,|
|00002610| 2d 31 20 b8 20 73 6c 6f | 74 5f 73 69 7a 65 25 2c |-1 . slo|t_size%,|
|00002620| 2c 66 72 65 65 5f 6d 65 | 6d 25 0d 10 18 95 e7 20 |,free_me|m%..... |
|00002630| 66 72 65 65 5f 6d 65 6d | 25 3d 30 20 8c 20 f2 6d |free_mem|%=0 . .m|
|00002640| 65 6d 6f 72 79 5f 62 61 | 63 6b 28 74 6f 74 61 6c |emory_ba|ck(total|
|00002650| 25 29 3a f2 65 72 72 6f | 72 28 22 54 68 65 72 65 |%):.erro|r("There|
|00002660| 20 61 72 65 20 70 72 6f | 62 6c 65 6d 73 20 77 69 | are pro|blems wi|
|00002670| 74 68 20 67 65 74 74 69 | 6e 67 20 6d 6f 72 65 20 |th getti|ng more |
|00002680| 6d 65 6d 6f 72 79 20 66 | 6f 72 20 22 2b 70 72 6f |memory f|or "+pro|
|00002690| 67 6e 61 6d 65 24 2b 22 | 20 49 20 77 61 6e 74 20 |gname$+"| I want |
|000026a0| 61 6e 6f 74 68 65 72 20 | 22 2b c3 28 61 6d 6d 6f |another |"+.(ammo|
|000026b0| 75 6e 74 25 2f 31 30 32 | 34 29 2b 22 4b 22 29 0d |unt%/102|4)+"K").|
|000026c0| 10 1d 7a f4 20 77 68 61 | 74 20 61 20 73 68 69 74 |..z. wha|t a shit|
|000026d0| 74 79 20 65 72 72 6f 72 | 2c 20 74 68 65 20 74 6f |ty error|, the to|
|000026e0| 74 61 6c 20 77 61 73 20 | 6e 65 76 65 72 20 72 65 |tal was |never re|
|000026f0| 74 75 72 6e 65 64 20 2c | 73 6f 20 74 68 65 20 74 |turned ,|so the t|
|00002700| 61 73 6b 20 77 69 6d 70 | 73 6c 6f 74 20 65 61 74 |ask wimp|slot eat|
|00002710| 73 20 75 70 20 6d 6f 72 | 65 20 61 6e 64 20 6d 6f |s up mor|e and mo|
|00002720| 72 65 20 72 61 6d 20 75 | 70 6f 6e 20 61 6e 20 65 |re ram u|pon an e|
|00002730| 72 72 6f 72 2c 4b 61 69 | 2e 0d 10 22 2f c8 99 20 |rror,Kai|..."/.. |
|00002740| 22 57 69 6d 70 5f 53 6c | 6f 74 53 69 7a 65 22 2c |"Wimp_Sl|otSize",|
|00002750| 73 6c 6f 74 5f 73 69 7a | 65 25 2b 70 61 67 65 5f |slot_siz|e%+page_|
|00002760| 73 69 7a 65 25 2c 2d 31 | 0d 10 2c 18 61 6d 6d 6f |size%,-1|..,.ammo|
|00002770| 75 6e 74 25 2d 3d 70 61 | 67 65 5f 73 69 7a 65 25 |unt%-=pa|ge_size%|
|00002780| 0d 10 36 16 74 6f 74 61 | 6c 25 2b 3d 70 61 67 65 |..6.tota|l%+=page|
|00002790| 5f 73 69 7a 65 25 0d 10 | 40 05 ce 0d 10 4a 0b 3d |_size%..|@....J.=|
|000027a0| 74 6f 74 61 6c 25 0d 10 | 54 04 0d 10 5e 1d dd a4 |total%..|T...^...|
|000027b0| 66 69 6c 65 5f 74 6f 5f | 6c 65 61 66 28 66 69 6c |file_to_|leaf(fil|
|000027c0| 65 6e 61 6d 65 24 29 0d | 10 68 0f ea 20 6c 65 61 |ename$).|.h.. lea|
|000027d0| 66 6e 61 6d 65 24 0d 10 | 72 2b c8 95 20 a9 28 66 |fname$..|r+.. .(f|
|000027e0| 69 6c 65 6e 61 6d 65 24 | 29 3c 3e 30 20 80 20 c2 |ilename$|)<>0 . .|
|000027f0| 66 69 6c 65 6e 61 6d 65 | 24 2c 31 29 3c 3e 22 2e |filename|$,1)<>".|
|00002800| 22 0d 10 7c 23 6c 65 61 | 66 6e 61 6d 65 24 3d c2 |"..|#lea|fname$=.|
|00002810| 66 69 6c 65 6e 61 6d 65 | 24 29 2b 6c 65 61 66 6e |filename|$)+leafn|
|00002820| 61 6d 65 24 0d 10 86 19 | 66 69 6c 65 6e 61 6d 65 |ame$....|filename|
|00002830| 24 3d c0 66 69 6c 65 6e | 61 6d 65 24 29 0d 10 90 |$=.filen|ame$)...|
|00002840| 05 ce 0d 10 9a 0e 3d 6c | 65 61 66 6e 61 6d 65 24 |......=l|eafname$|
|00002850| 0d ff | |.. | |
+--------+-------------------------+-------------------------+--------+--------+
