home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1992-07-01 | 10.2 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 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 39 20 2d 2d 2d | 20 28 43 29 20 41 43 45 |1.09 ---| (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 34 dd f2 69 |-1991...|...(4..i|
|00000050| 6e 69 74 5f 6c 69 62 72 | 61 72 79 28 62 6c 6f 63 |nit_libr|ary(bloc|
|00000060| 6b 5f 6c 65 6e 25 2c 6d | 65 6e 75 5f 6c 65 6e 25 |k_len%,m|enu_len%|
|00000070| 2c 62 75 66 66 65 72 5f | 6c 65 6e 25 29 0d 00 32 |,buffer_|len%)..2|
|00000080| 48 c8 99 20 22 57 69 6d | 70 5f 49 6e 69 74 69 61 |H.. "Wim|p_Initia|
|00000090| 6c 69 73 65 22 2c 32 30 | 30 2c 26 34 42 35 33 34 |lise",20|0,&4B534|
|000000a0| 31 35 34 2c 70 72 6f 67 | 6e 61 6d 65 24 20 b8 20 |154,prog|name$ . |
|000000b0| 76 65 72 73 69 6f 6e 25 | 2c 74 61 73 6b 5f 68 61 |version%|,task_ha|
|000000c0| 6e 64 6c 65 25 0d 00 3c | 16 de 20 74 61 73 6b 5f |ndle%..<|.. task_|
|000000d0| 77 69 6e 64 6f 77 25 28 | 36 33 29 0d 00 46 14 de |window%(|63)..F..|
|000000e0| 20 74 61 73 6b 5f 6e 61 | 6d 65 24 28 36 33 29 0d | task_na|me$(63).|
|000000f0| 00 50 10 74 61 73 6b 5f | 6e 75 6d 25 3d 36 34 0d |.P.task_|num%=64.|
|00000100| 00 5a 37 de 20 62 6c 6f | 63 6b 25 20 62 6c 6f 63 |.Z7. blo|ck% bloc|
|00000110| 6b 5f 6c 65 6e 25 20 20 | 20 20 20 20 20 20 20 20 |k_len% | |
|00000120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a 20 | | : |
|00000130| f4 20 77 69 6d 70 0d 00 | 64 3c de 20 6d 65 6e 75 |. wimp..|d<. menu|
|00000140| 5f 73 74 61 72 74 25 20 | 6d 65 6e 75 5f 6c 65 6e |_start% |menu_len|
|00000150| 25 2c 6d 65 6e 75 5f 65 | 6e 64 25 20 2d 31 20 20 |%,menu_e|nd% -1 |
|00000160| 20 20 20 20 20 3a 20 f4 | 20 6d 65 6e 75 20 64 61 | : .| menu da|
|00000170| 74 61 0d 00 6e 47 de 20 | 62 75 66 66 65 72 5f 73 |ta..nG. |buffer_s|
|00000180| 74 61 72 74 25 20 62 75 | 66 66 65 72 5f 6c 65 6e |tart% bu|ffer_len|
|00000190| 25 2c 62 75 66 66 65 72 | 5f 65 6e 64 25 20 2d 31 |%,buffer|_end% -1|
|000001a0| 20 3a 20 f4 20 69 6e 64 | 69 72 65 63 74 65 64 20 | : . ind|irected |
|000001b0| 69 63 6f 6e 20 64 61 74 | 61 0d 00 78 0c 65 72 72 |icon dat|a..x.err|
|000001c0| 6f 72 25 3d a3 0d 00 82 | 12 6d 65 6e 75 5f 68 61 |or%=....|.menu_ha|
|000001d0| 6e 64 6c 65 25 3d 30 0d | 00 8c 12 64 72 61 67 5f |ndle%=0.|...drag_|
|000001e0| 68 61 6e 64 6c 65 25 3d | 30 0d 00 96 05 e1 0d 00 |handle%=|0.......|
|000001f0| a0 04 0d 00 aa 1f dd f2 | 61 64 64 5f 77 69 6e 64 |........|add_wind|
|00000200| 6f 77 28 77 69 6e 64 6f | 77 25 2c 74 61 73 6b 24 |ow(windo|w%,task$|
|00000210| 29 0d 00 b4 1d ea 20 74 | 61 73 6b 5f 69 6e 64 65 |)..... t|ask_inde|
|00000220| 78 25 2c 74 61 73 6b 5f | 66 6f 75 6e 64 25 0d 00 |x%,task_|found%..|
|00000230| be 11 74 61 73 6b 5f 66 | 6f 75 6e 64 25 3d 30 0d |..task_f|ound%=0.|
|00000240| 00 c8 21 e3 20 74 61 73 | 6b 5f 69 6e 64 65 78 25 |..!. tas|k_index%|
|00000250| 3d 30 20 b8 20 74 61 73 | 6b 5f 6e 75 6d 25 2d 31 |=0 . tas|k_num%-1|
|00000260| 0d 00 d2 4b e7 20 74 61 | 73 6b 5f 77 69 6e 64 6f |...K. ta|sk_windo|
|00000270| 77 25 28 74 61 73 6b 5f | 69 6e 64 65 78 25 29 3d |w%(task_|index%)=|
|00000280| 30 20 80 20 74 61 73 6b | 5f 66 6f 75 6e 64 25 3d |0 . task|_found%=|
|00000290| 30 20 8c 20 74 61 73 6b | 5f 66 6f 75 6e 64 25 3d |0 . task|_found%=|
|000002a0| 74 61 73 6b 5f 69 6e 64 | 65 78 25 0d 00 dc 05 ed |task_ind|ex%.....|
|000002b0| 0d 00 e6 48 e7 20 74 61 | 73 6b 5f 66 6f 75 6e 64 |...H. ta|sk_found|
|000002c0| 25 3d 30 20 8c 20 f2 65 | 72 72 6f 72 28 22 43 61 |%=0 . .e|rror("Ca|
|000002d0| 6e 20 6f 6e 6c 79 20 61 | 63 63 65 70 74 20 22 2b |n only a|ccept "+|
|000002e0| c3 28 74 61 73 6b 5f 6e | 75 6d 25 29 2b 22 20 77 |.(task_n|um%)+" w|
|000002f0| 69 6e 64 6f 77 73 22 29 | 0d 00 f0 25 74 61 73 6b |indows")|...%task|
|00000300| 5f 77 69 6e 64 6f 77 25 | 28 74 61 73 6b 5f 66 6f |_window%|(task_fo|
|00000310| 75 6e 64 25 29 3d 77 69 | 6e 64 6f 77 25 0d 00 fa |und%)=wi|ndow%...|
|00000320| 21 74 61 73 6b 5f 6e 61 | 6d 65 24 28 74 61 73 6b |!task_na|me$(task|
|00000330| 5f 66 6f 75 6e 64 25 29 | 3d 74 61 73 6b 24 0d 01 |_found%)|=task$..|
|00000340| 04 05 e1 0d 01 0e 04 0d | 01 18 1a dd f2 6b 69 6c |........|.....kil|
|00000350| 6c 5f 77 69 6e 64 6f 77 | 28 77 69 6e 64 6f 77 25 |l_window|(window%|
|00000360| 29 0d 01 22 1d ea 20 74 | 61 73 6b 5f 69 6e 64 65 |)..".. t|ask_inde|
|00000370| 78 25 2c 74 61 73 6b 5f | 66 6f 75 6e 64 25 0d 01 |x%,task_|found%..|
|00000380| 2c 21 e3 20 74 61 73 6b | 5f 69 6e 64 65 78 25 3d |,!. task|_index%=|
|00000390| 30 20 b8 20 74 61 73 6b | 5f 6e 75 6d 25 2d 31 0d |0 . task|_num%-1.|
|000003a0| 01 36 45 e7 20 74 61 73 | 6b 5f 77 69 6e 64 6f 77 |.6E. tas|k_window|
|000003b0| 25 28 74 61 73 6b 5f 69 | 6e 64 65 78 25 29 3d 77 |%(task_i|ndex%)=w|
|000003c0| 69 6e 64 6f 77 25 20 8c | 20 74 61 73 6b 5f 77 69 |indow% .| task_wi|
|000003d0| 6e 64 6f 77 25 28 74 61 | 73 6b 5f 69 6e 64 65 78 |ndow%(ta|sk_index|
|000003e0| 25 29 3d 30 0d 01 40 05 | ed 0d 01 4a 05 e1 0d 01 |%)=0..@.|...J....|
|000003f0| 54 04 0d 01 5e 14 dd f2 | 69 6e 73 74 61 6c 6c 28 |T...^...|install(|
|00000400| 74 61 73 6b 24 29 0d 01 | 68 22 f2 63 6f 6d 6d 61 |task$)..|h".comma|
|00000410| 6e 64 28 74 61 73 6b 24 | 2c 22 69 6e 69 74 5f 70 |nd(task$|,"init_p|
|00000420| 72 6f 67 72 61 6d 22 29 | 0d 01 72 05 e1 0d 01 7c |rogram")|..r....||
|00000430| 04 0d 01 86 1e dd f2 63 | 6f 6d 6d 61 6e 64 28 74 |.......c|ommand(t|
|00000440| 61 73 6b 24 2c 66 75 6e | 63 74 69 6f 6e 24 29 0d |ask$,fun|ction$).|
|00000450| 01 90 25 76 6f 69 64 25 | 3d a0 28 22 46 4e 22 2b |..%void%|=.("FN"+|
|00000460| 74 61 73 6b 24 2b 22 5f | 22 2b 66 75 6e 63 74 69 |task$+"_|"+functi|
|00000470| 6f 6e 24 29 0d 01 9a 05 | e1 0d 01 a4 04 0d 01 ae |on$)....|........|
|00000480| 13 dd f2 65 72 72 6f 72 | 28 65 72 72 6f 72 24 29 |...error|(error$)|
|00000490| 0d 01 b8 0e 85 20 31 2c | 65 72 72 6f 72 24 0d 01 |..... 1,|error$..|
|000004a0| c2 05 e1 0d 01 cc 04 0d | 01 d6 1f dd f2 70 72 65 |........|.....pre|
|000004b0| 5f 65 72 72 6f 72 28 65 | 72 72 25 2c 65 72 72 24 |_error(e|rr%,err$|
|000004c0| 2c 65 72 6c 25 29 0d 01 | e0 09 ee 20 85 20 87 0d |,erl%)..|... . ..|
|000004d0| 01 ea 25 85 20 65 72 72 | 25 2c 65 72 72 24 2b 22 |..%. err|%,err$+"|
|000004e0| 20 28 63 6f 64 65 20 22 | 2b c3 28 65 72 6c 25 29 | (code "|+.(erl%)|
|000004f0| 2b 22 29 22 0d 01 f4 05 | e1 0d 01 fe 04 0d 02 08 |+")"....|........|
|00000500| 20 dd f2 65 78 69 74 5f | 65 72 72 6f 72 28 65 72 | ..exit_|error(er|
|00000510| 72 25 2c 65 72 72 24 2c | 65 72 6c 25 29 0d 02 12 |r%,err$,|erl%)...|
|00000520| 09 ee 20 85 20 87 0d 02 | 1c 1c c8 99 20 22 58 57 |.. . ...|.... "XW|
|00000530| 69 6d 70 5f 43 6c 6f 73 | 65 54 65 6d 70 6c 61 74 |imp_Clos|eTemplat|
|00000540| 65 22 0d 02 26 10 21 62 | 6c 6f 63 6b 25 3d 65 72 |e"..&.!b|lock%=er|
|00000550| 72 25 0d 02 30 28 65 72 | 72 24 3d 65 72 72 24 2b |r%..0(er|r$=err$+|
|00000560| 22 20 28 63 6f 64 65 20 | 22 2b c3 28 65 72 6c 25 |" (code |"+.(erl%|
|00000570| 29 2b 22 29 22 2b bd 28 | 30 29 0d 02 3a 14 24 28 |)+")"+.(|0)..:.$(|
|00000580| 62 6c 6f 63 6b 25 2b 34 | 29 3d 65 72 72 24 0d 02 |block%+4|)=err$..|
|00000590| 44 2c c8 99 20 22 57 69 | 6d 70 5f 52 65 70 6f 72 |D,.. "Wi|mp_Repor|
|000005a0| 74 45 72 72 6f 72 22 2c | 62 6c 6f 63 6b 25 2c 32 |tError",|block%,2|
|000005b0| 2c 70 72 6f 67 6e 61 6d | 65 24 0d 02 4e 0b f2 66 |,prognam|e$..N..f|
|000005c0| 69 6e 69 73 68 0d 02 58 | 05 e1 0d 02 62 04 0d 02 |inish..X|....b...|
|000005d0| 6c 0c dd f2 66 69 6e 69 | 73 68 0d 02 76 17 c8 99 |l...fini|sh..v...|
|000005e0| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e | "Wimp_C|loseDown|
|000005f0| 22 0d 02 80 05 e0 0d 02 | 8a 04 0d 02 94 23 dd f2 |".......|.....#..|
|00000600| 64 69 73 70 6c 61 79 5f | 65 72 72 6f 72 28 65 72 |display_|error(er|
|00000610| 72 25 2c 65 72 72 24 2c | 65 72 6c 25 29 0d 02 9e |r%,err$,|erl%)...|
|00000620| 2c e7 20 65 72 72 6f 72 | 25 3d b9 20 8c 20 f2 65 |,. error|%=. . .e|
|00000630| 78 69 74 5f 65 72 72 6f | 72 28 65 72 72 25 2c 65 |xit_erro|r(err%,e|
|00000640| 72 72 24 2c 65 72 6c 25 | 29 0d 02 a8 0c 65 72 72 |rr$,erl%|)....err|
|00000650| 6f 72 25 3d b9 0d 02 b2 | 10 21 62 6c 6f 63 6b 25 |or%=....|.!block%|
|00000660| 3d 65 72 72 25 0d 02 bc | 28 65 72 72 24 3d 65 72 |=err%...|(err$=er|
|00000670| 72 24 2b 22 20 28 6c 69 | 6e 65 20 22 2b c3 28 65 |r$+" (li|ne "+.(e|
|00000680| 72 6c 25 29 2b 22 29 22 | 2b bd 28 30 29 0d 02 c6 |rl%)+")"|+.(0)...|
|00000690| 14 24 28 62 6c 6f 63 6b | 25 2b 34 29 3d 65 72 72 |.$(block|%+4)=err|
|000006a0| 24 0d 02 d0 2c c8 99 20 | 22 57 69 6d 70 5f 52 65 |$...,.. |"Wimp_Re|
|000006b0| 70 6f 72 74 45 72 72 6f | 72 22 2c 62 6c 6f 63 6b |portErro|r",block|
|000006c0| 25 2c 31 2c 70 72 6f 67 | 6e 61 6d 65 24 0d 02 da |%,1,prog|name$...|
|000006d0| 0c 65 72 72 6f 72 25 3d | a3 0d 02 e4 05 e1 0d 02 |.error%=|........|
|000006e0| ee 04 0d 02 f8 11 dd a4 | 70 6f 6c 6c 28 6d 61 73 |........|poll(mas|
|000006f0| 6b 25 29 0d 03 02 29 c8 | 99 20 22 57 69 6d 70 5f |k%)...).|. "Wimp_|
|00000700| 50 6f 6c 6c 22 2c 6d 61 | 73 6b 25 2c 62 6c 6f 63 |Poll",ma|sk%,bloc|
|00000710| 6b 25 20 b8 20 61 63 74 | 69 6f 6e 25 0d 03 0c 10 |k% . act|ion%....|
|00000720| c8 8e 20 61 63 74 69 6f | 6e 25 20 ca 0d 03 16 31 |.. actio|n% ....1|
|00000730| c9 20 20 31 20 3a 20 f2 | 70 65 72 66 6f 72 6d 5f |. 1 : .|perform_|
|00000740| 74 61 73 6b 28 21 62 6c | 6f 63 6b 25 2c 22 72 65 |task(!bl|ock%,"re|
|00000750| 64 72 61 77 5f 77 69 6e | 64 6f 77 22 29 0d 03 20 |draw_win|dow").. |
|00000760| 2f c9 20 20 32 20 3a 20 | f2 70 65 72 66 6f 72 6d |/. 2 : |.perform|
|00000770| 5f 74 61 73 6b 28 21 62 | 6c 6f 63 6b 25 2c 22 6f |_task(!b|lock%,"o|
|00000780| 70 65 6e 5f 77 69 6e 64 | 6f 77 22 29 0d 03 2a 30 |pen_wind|ow")..*0|
|00000790| c9 20 20 33 20 3a 20 f2 | 70 65 72 66 6f 72 6d 5f |. 3 : .|perform_|
|000007a0| 74 61 73 6b 28 21 62 6c | 6f 63 6b 25 2c 22 63 6c |task(!bl|ock%,"cl|
|000007b0| 6f 73 65 5f 77 69 6e 64 | 6f 77 22 29 0d 03 34 33 |ose_wind|ow")..43|
|000007c0| c9 20 20 34 20 3a 20 f2 | 70 65 72 66 6f 72 6d 5f |. 4 : .|perform_|
|000007d0| 74 61 73 6b 28 21 62 6c | 6f 63 6b 25 2c 22 70 6f |task(!bl|ock%,"po|
|000007e0| 69 6e 74 65 72 20 6c 65 | 61 76 69 6e 67 22 29 0d |inter le|aving").|
|000007f0| 03 3e 34 c9 20 20 35 20 | 3a 20 f2 70 65 72 66 6f |.>4. 5 |: .perfo|
|00000800| 72 6d 5f 74 61 73 6b 28 | 21 62 6c 6f 63 6b 25 2c |rm_task(|!block%,|
|00000810| 22 70 6f 69 6e 74 65 72 | 20 65 6e 74 65 72 69 6e |"pointer| enterin|
|00000820| 67 22 29 0d 03 48 31 c9 | 20 20 36 20 3a 20 f2 70 |g")..H1.| 6 : .p|
|00000830| 65 72 66 6f 72 6d 5f 74 | 61 73 6b 28 62 6c 6f 63 |erform_t|ask(bloc|
|00000840| 6b 25 21 31 32 2c 22 6d | 6f 75 73 65 5f 63 6c 69 |k%!12,"m|ouse_cli|
|00000850| 63 6b 22 29 0d 03 52 31 | c9 20 20 37 20 3a 20 f2 |ck")..R1|. 7 : .|
|00000860| 70 65 72 66 6f 72 6d 5f | 74 61 73 6b 28 64 72 61 |perform_|task(dra|
|00000870| 67 5f 68 61 6e 64 6c 65 | 25 2c 22 64 72 61 67 5f |g_handle|%,"drag_|
|00000880| 62 6f 78 22 29 0d 03 5c | 2f c9 20 20 38 20 3a 20 |box")..\|/. 8 : |
|00000890| f2 70 65 72 66 6f 72 6d | 5f 74 61 73 6b 28 21 62 |.perform|_task(!b|
|000008a0| 6c 6f 63 6b 25 2c 22 6b | 65 79 5f 70 72 65 73 73 |lock%,"k|ey_press|
|000008b0| 65 64 22 29 0d 03 66 37 | c9 20 20 39 20 3a 20 f2 |ed")..f7|. 9 : .|
|000008c0| 70 65 72 66 6f 72 6d 5f | 74 61 73 6b 28 6d 65 6e |perform_|task(men|
|000008d0| 75 5f 68 61 6e 64 6c 65 | 25 2c 22 6d 65 6e 75 5f |u_handle|%,"menu_|
|000008e0| 73 65 6c 65 63 74 69 6f | 6e 22 29 0d 03 70 32 c9 |selectio|n")..p2.|
|000008f0| 20 31 30 20 3a 20 f2 70 | 65 72 66 6f 72 6d 5f 74 | 10 : .p|erform_t|
|00000900| 61 73 6b 28 21 62 6c 6f | 63 6b 25 2c 22 73 63 72 |ask(!blo|ck%,"scr|
|00000910| 6f 6c 6c 5f 72 65 71 75 | 65 73 74 22 29 0d 03 7a |oll_requ|est")..z|
|00000920| 2e c9 20 31 31 20 3a 20 | f2 70 65 72 66 6f 72 6d |.. 11 : |.perform|
|00000930| 5f 74 61 73 6b 28 21 62 | 6c 6f 63 6b 25 2c 22 6c |_task(!b|lock%,"l|
|00000940| 6f 73 65 5f 63 61 72 65 | 74 22 29 0d 03 84 2e c9 |ose_care|t").....|
|00000950| 20 31 32 20 3a 20 f2 70 | 65 72 66 6f 72 6d 5f 74 | 12 : .p|erform_t|
|00000960| 61 73 6b 28 21 62 6c 6f | 63 6b 25 2c 22 67 61 69 |ask(!blo|ck%,"gai|
|00000970| 6e 5f 63 61 72 65 74 22 | 29 0d 03 8e 13 c9 20 31 |n_caret"|)..... 1|
|00000980| 37 20 3a 20 f2 6d 65 73 | 73 61 67 65 0d 03 98 1c |7 : .mes|sage....|
|00000990| c9 20 31 38 20 3a 20 f2 | 6d 65 73 73 61 67 65 5f |. 18 : .|message_|
|000009a0| 72 65 63 6f 72 64 65 64 | 0d 03 a2 1f c9 20 31 39 |recorded|..... 19|
|000009b0| 20 3a 20 f2 6d 65 73 73 | 61 67 65 5f 61 63 6b 6e | : .mess|age_ackn|
|000009c0| 6f 77 6c 65 64 67 65 0d | 03 ac 05 cb 0d 03 b6 0c |owledge.|........|
|000009d0| 3d 61 63 74 69 6f 6e 25 | 0d 03 c0 04 0d 03 ca 11 |=action%|........|
|000009e0| dd f2 70 6f 6c 6c 28 6d | 61 73 6b 25 29 0d 03 d4 |..poll(m|ask%)...|
|000009f0| 0d ea 20 61 63 74 69 6f | 6e 25 0d 03 de 18 61 63 |.. actio|n%....ac|
|00000a00| 74 69 6f 6e 25 3d a4 70 | 6f 6c 6c 28 6d 61 73 6b |tion%=.p|oll(mask|
|00000a10| 25 29 0d 03 e8 05 e1 0d | 03 f2 04 0d 03 fc 25 dd |%)......|......%.|
|00000a20| f2 70 65 72 66 6f 72 6d | 5f 74 61 73 6b 28 77 69 |.perform|_task(wi|
|00000a30| 6e 64 6f 77 25 2c 66 75 | 6e 63 74 69 6f 6e 24 29 |ndow%,fu|nction$)|
|00000a40| 0d 04 06 1d ea 20 74 61 | 73 6b 5f 69 6e 64 65 78 |..... ta|sk_index|
|00000a50| 25 2c 74 61 73 6b 5f 66 | 6f 75 6e 64 25 0d 04 10 |%,task_f|ound%...|
|00000a60| 07 ea 20 85 0d 04 1a 4a | ee 20 85 20 ea 20 f7 20 |.. ....J|. . . . |
|00000a70| 85 3a e7 20 9f 3d 32 39 | 20 8c 20 f2 64 65 66 61 |.:. .=29| . .defa|
|00000a80| 75 6c 74 5f 74 61 73 6b | 28 66 75 6e 63 74 69 6f |ult_task|(functio|
|00000a90| 6e 24 29 3a e1 20 8b 20 | f2 64 69 73 70 6c 61 79 |n$):. . |.display|
|00000aa0| 5f 65 72 72 6f 72 28 9f | 2c f6 24 2c 9e 29 0d 04 |_error(.|,.$,.)..|
|00000ab0| 24 21 e3 20 74 61 73 6b | 5f 69 6e 64 65 78 25 3d |$!. task|_index%=|
|00000ac0| 30 20 b8 20 74 61 73 6b | 5f 6e 75 6d 25 2d 31 0d |0 . task|_num%-1.|
|00000ad0| 04 2e 51 e7 20 74 61 73 | 6b 5f 77 69 6e 64 6f 77 |..Q. tas|k_window|
|00000ae0| 25 28 74 61 73 6b 5f 69 | 6e 64 65 78 25 29 3d 77 |%(task_i|ndex%)=w|
|00000af0| 69 6e 64 6f 77 25 20 80 | 20 74 61 73 6b 5f 66 6f |indow% .| task_fo|
|00000b00| 75 6e 64 25 3d 30 20 8c | 20 74 61 73 6b 5f 66 6f |und%=0 .| task_fo|
|00000b10| 75 6e 64 25 3d 74 61 73 | 6b 5f 69 6e 64 65 78 25 |und%=tas|k_index%|
|00000b20| 0d 04 38 05 ed 0d 04 42 | 5a f4 20 49 46 20 74 61 |..8....B|Z. IF ta|
|00000b30| 73 6b 5f 66 6f 75 6e 64 | 25 3d 30 20 54 48 45 4e |sk_found|%=0 THEN|
|00000b40| 20 50 52 4f 43 65 72 72 | 6f 72 28 22 54 61 73 6b | PROCerr|or("Task|
|00000b50| 20 68 6f 6c 64 65 72 20 | 6f 66 20 77 69 6e 64 6f | holder |of windo|
|00000b60| 77 20 22 2b 53 54 52 24 | 28 77 69 6e 64 6f 77 25 |w "+STR$|(window%|
|00000b70| 29 2b 22 20 6e 6f 74 20 | 66 6f 75 6e 64 22 29 0d |)+" not |found").|
|00000b80| 04 4c 2f f2 63 6f 6d 6d | 61 6e 64 28 74 61 73 6b |.L/.comm|and(task|
|00000b90| 5f 6e 61 6d 65 24 28 74 | 61 73 6b 5f 66 6f 75 6e |_name$(t|ask_foun|
|00000ba0| 64 25 29 2c 66 75 6e 63 | 74 69 6f 6e 24 29 0d 04 |d%),func|tion$)..|
|00000bb0| 56 1c f2 64 65 66 61 75 | 6c 74 5f 74 61 73 6b 28 |V..defau|lt_task(|
|00000bc0| 66 75 6e 63 74 69 6f 6e | 24 29 0d 04 60 05 e1 0d |function|$)..`...|
|00000bd0| 04 6a 04 0d 04 74 1d dd | f2 64 65 66 61 75 6c 74 |.j...t..|.default|
|00000be0| 5f 74 61 73 6b 28 66 75 | 6e 63 74 69 6f 6e 24 29 |_task(fu|nction$)|
|00000bf0| 0d 04 7e 12 c8 8e 20 66 | 75 6e 63 74 69 6f 6e 24 |..~... f|unction$|
|00000c00| 20 ca 0d 04 88 33 c9 20 | 22 6f 70 65 6e 5f 77 69 | ....3. |"open_wi|
|00000c10| 6e 64 6f 77 22 20 20 20 | 3a c8 99 20 22 57 69 6d |ndow" |:.. "Wim|
|00000c20| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|00000c30| 6c 6f 63 6b 25 0d 04 92 | 34 c9 20 22 63 6c 6f 73 |lock%...|4. "clos|
|00000c40| 65 5f 77 69 6e 64 6f 77 | 22 20 20 3a c8 99 20 22 |e_window|" :.. "|
|00000c50| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00000c60| 22 2c 2c 62 6c 6f 63 6b | 25 0d 04 9c 35 c9 20 22 |",,block|%...5. "|
|00000c70| 6b 65 79 5f 70 72 65 73 | 73 65 64 22 20 20 20 3a |key_pres|sed" :|
|00000c80| c8 99 20 22 57 69 6d 70 | 5f 50 72 6f 63 65 73 73 |.. "Wimp|_Process|
|00000c90| 4b 65 79 22 2c 62 6c 6f | 63 6b 25 21 32 34 0d 04 |Key",blo|ck%!24..|
|00000ca0| a6 84 c9 20 22 6d 65 6e | 75 5f 73 65 6c 65 63 74 |... "men|u_select|
|00000cb0| 69 6f 6e 22 3a c8 99 20 | 22 57 69 6d 70 5f 47 65 |ion":.. |"Wimp_Ge|
|00000cc0| 74 50 6f 69 6e 74 65 72 | 49 6e 66 6f 22 2c 2c 62 |tPointer|Info",,b|
|00000cd0| 6c 6f 63 6b 25 3a e7 20 | 28 28 62 6c 6f 63 6b 25 |lock%:. |((block%|
|00000ce0| 21 38 29 20 80 20 31 29 | 3d 31 20 8c 20 f2 6f 70 |!8) . 1)|=1 . .op|
|00000cf0| 65 6e 5f 6d 65 6e 75 28 | 6d 65 6e 75 5f 68 61 6e |en_menu(|menu_han|
|00000d00| 64 6c 65 25 29 20 8b 20 | f2 6b 69 6c 6c 5f 77 69 |dle%) . |.kill_wi|
|00000d10| 6e 64 6f 77 28 6d 65 6e | 75 5f 68 61 6e 64 6c 65 |ndow(men|u_handle|
|00000d20| 25 29 0d 04 b0 05 cb 0d | 04 ba 05 e1 0d 04 c4 04 |%)......|........|
|00000d30| 0d 04 ce 18 dd f2 6f 70 | 65 6e 5f 6d 65 6e 75 28 |......op|en_menu(|
|00000d40| 77 69 6e 64 6f 77 25 29 | 0d 04 d8 24 c8 99 20 22 |window%)|...$.. "|
|00000d50| 57 69 6d 70 5f 47 65 74 | 50 6f 69 6e 74 65 72 49 |Wimp_Get|PointerI|
|00000d60| 6e 66 6f 22 2c 2c 62 6c | 6f 63 6b 25 0d 04 e2 14 |nfo",,bl|ock%....|
|00000d70| 6d 6f 75 73 65 5f 78 25 | 3d 21 62 6c 6f 63 6b 25 |mouse_x%|=!block%|
|00000d80| 0d 04 ec 15 6d 6f 75 73 | 65 5f 79 25 3d 62 6c 6f |....mous|e_y%=blo|
|00000d90| 63 6b 25 21 34 0d 04 f6 | 1a e7 20 77 69 6e 64 6f |ck%!4...|.. windo|
|00000da0| 77 25 3d 6d 5f 69 63 6f | 6e 62 61 72 25 20 8c 0d |w%=m_ico|nbar% ..|
|00000db0| 05 00 16 20 20 e7 20 6c | 5f 69 63 6f 6e 62 61 72 |... . l|_iconbar|
|00000dc0| 25 3c 30 20 8c 0d 05 0a | 27 20 20 20 20 6d 6f 75 |%<0 ....|' mou|
|00000dd0| 73 65 5f 79 25 3d 94 28 | 6c 5f 69 63 6f 6e 62 61 |se_y%=.(|l_iconba|
|00000de0| 72 25 29 2a 34 30 2b 39 | 36 2b 32 34 0d 05 14 07 |r%)*40+9|6+24....|
|00000df0| 20 20 cc 0d 05 1e 21 20 | 20 20 20 6d 6f 75 73 65 | ....! | mouse|
|00000e00| 5f 79 25 3d 6c 5f 69 63 | 6f 6e 62 61 72 25 2a 34 |_y%=l_ic|onbar%*4|
|00000e10| 30 2b 39 36 0d 05 28 07 | 20 20 cd 0d 05 32 05 cc |0+96..(.| ...2..|
|00000e20| 0d 05 3c 12 20 20 6d 6f | 75 73 65 5f 79 25 2b 3d |..<. mo|use_y%+=|
|00000e30| 31 32 0d 05 46 05 cd 0d | 05 50 45 c8 99 20 22 57 |12..F...|.PE.. "W|
|00000e40| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00000e50| 2c 77 69 6e 64 6f 77 25 | 2c 6d 6f 75 73 65 5f 78 |,window%|,mouse_x|
|00000e60| 25 2d 28 77 69 6e 64 6f | 77 25 21 31 36 29 2f 32 |%-(windo|w%!16)/2|
|00000e70| 2d 31 36 2c 6d 6f 75 73 | 65 5f 79 25 0d 05 5a 18 |-16,mous|e_y%..Z.|
|00000e80| 6d 65 6e 75 5f 68 61 6e | 64 6c 65 25 3d 77 69 6e |menu_han|dle%=win|
|00000e90| 64 6f 77 25 0d 05 64 05 | e1 0d 05 6e 04 0d 05 78 |dow%..d.|...n...x|
|00000ea0| 1c dd f2 72 65 6f 70 65 | 6e 5f 77 69 6e 64 6f 77 |...reope|n_window|
|00000eb0| 28 68 61 6e 64 6c 65 25 | 29 0d 05 82 13 21 62 6c |(handle%|)....!bl|
|00000ec0| 6f 63 6b 25 3d 68 61 6e | 64 6c 65 25 0d 05 8c 21 |ock%=han|dle%...!|
|00000ed0| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |.. "Wimp|_CloseWi|
|00000ee0| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 05 96 |ndow",,b|lock%...|
|00000ef0| 24 c8 99 20 22 57 69 6d | 70 5f 47 65 74 57 69 6e |$.. "Wim|p_GetWin|
|00000f00| 64 6f 77 53 74 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |dowState|",,block|
|00000f10| 25 0d 05 a0 20 c8 99 20 | 22 57 69 6d 70 5f 4f 70 |%... .. |"Wimp_Op|
|00000f20| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|00000f30| 25 0d 05 aa 05 e1 0d 05 | b4 04 0d 05 be 1b dd f2 |%.......|........|
|00000f40| 63 6c 6f 73 65 5f 77 69 | 6e 64 6f 77 28 68 61 6e |close_wi|ndow(han|
|00000f50| 64 6c 65 25 29 0d 05 c8 | 13 21 62 6c 6f 63 6b 25 |dle%)...|.!block%|
|00000f60| 3d 68 61 6e 64 6c 65 25 | 0d 05 d2 21 c8 99 20 22 |=handle%|...!.. "|
|00000f70| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00000f80| 22 2c 2c 62 6c 6f 63 6b | 25 0d 05 dc 05 e1 0d 05 |",,block|%.......|
|00000f90| e6 04 0d 05 f0 32 dd f2 | 73 65 74 5f 69 63 6f 6e |.....2..|set_icon|
|00000fa0| 74 65 78 74 28 77 69 6e | 64 6f 77 25 2c 69 63 6f |text(win|dow%,ico|
|00000fb0| 6e 25 2c 6e 65 77 74 65 | 78 74 24 2c 72 65 64 72 |n%,newte|xt$,redr|
|00000fc0| 61 77 25 29 0d 05 fa 2b | ea 20 69 6e 64 69 72 65 |aw%)...+|. indire|
|00000fd0| 63 74 25 2c 69 6e 64 69 | 72 65 63 74 6c 65 6e 25 |ct%,indi|rectlen%|
|00000fe0| 2c 69 6e 64 69 72 65 63 | 74 73 74 61 72 74 25 0d |,indirec|tstart%.|
|00000ff0| 06 04 2f e7 20 a4 67 65 | 74 5f 69 63 6f 6e 74 65 |../. .ge|t_iconte|
|00001000| 78 74 28 77 69 6e 64 6f | 77 25 2c 69 63 6f 6e 25 |xt(windo|w%,icon%|
|00001010| 29 3d 6e 65 77 74 65 78 | 74 24 20 8c 20 e1 0d 06 |)=newtex|t$ . ...|
|00001020| 0e 13 21 62 6c 6f 63 6b | 25 3d 77 69 6e 64 6f 77 |..!block|%=window|
|00001030| 25 0d 06 18 12 62 6c 6f | 63 6b 25 21 34 3d 69 63 |%....blo|ck%!4=ic|
|00001040| 6f 6e 25 0d 06 22 22 c8 | 99 20 22 57 69 6d 70 5f |on%.."".|. "Wimp_|
|00001050| 47 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 62 |GetIconS|tate",,b|
|00001060| 6c 6f 63 6b 25 0d 06 2c | 20 c8 99 20 22 57 69 6d |lock%..,| .. "Wim|
|00001070| 70 5f 44 65 6c 65 74 65 | 49 63 6f 6e 22 2c 2c 62 |p_Delete|Icon",,b|
|00001080| 6c 6f 63 6b 25 0d 06 36 | 14 62 6c 6f 63 6b 25 21 |lock%..6|.block%!|
|00001090| 34 3d 77 69 6e 64 6f 77 | 25 0d 06 40 17 69 6e 64 |4=window|%..@.ind|
|000010a0| 69 72 65 63 74 25 3d 62 | 6c 6f 63 6b 25 21 32 34 |irect%=b|lock%!24|
|000010b0| 0d 06 4a 24 69 6e 64 69 | 72 65 63 74 25 3d 69 6e |..J$indi|rect%=in|
|000010c0| 64 69 72 65 63 74 25 20 | 80 20 25 31 30 30 30 30 |direct% |. %10000|
|000010d0| 30 30 30 30 0d 06 54 11 | e7 20 69 6e 64 69 72 65 |0000..T.|. indire|
|000010e0| 63 74 25 20 8c 0d 06 5e | 1c 20 20 69 6e 64 69 72 |ct% ...^|. indir|
|000010f0| 65 63 74 6c 65 6e 25 3d | 62 6c 6f 63 6b 25 21 33 |ectlen%=|block%!3|
|00001100| 36 0d 06 68 1e 20 20 69 | 6e 64 69 72 65 63 74 73 |6..h. i|ndirects|
|00001110| 74 61 72 74 25 3d 62 6c | 6f 63 6b 25 21 32 38 0d |tart%=bl|ock%!28.|
|00001120| 06 72 2f 20 20 24 69 6e | 64 69 72 65 63 74 73 74 |.r/ $in|directst|
|00001130| 61 72 74 25 3d c0 6e 65 | 77 74 65 78 74 24 2c 69 |art%=.ne|wtext$,i|
|00001140| 6e 64 69 72 65 63 74 6c | 65 6e 25 2d 31 29 0d 06 |ndirectl|en%-1)..|
|00001150| 7c 05 cc 0d 06 86 20 20 | 20 24 28 62 6c 6f 63 6b ||..... | $(block|
|00001160| 25 2b 32 38 29 3d c0 6e | 65 77 74 65 78 74 24 2c |%+28)=.n|ewtext$,|
|00001170| 31 31 29 0d 06 90 05 cd | 0d 06 9a 22 c8 99 20 22 |11).....|...".. "|
|00001180| 57 69 6d 70 5f 43 72 65 | 61 74 65 49 63 6f 6e 22 |Wimp_Cre|ateIcon"|
|00001190| 2c 2c 62 6c 6f 63 6b 25 | 2b 34 0d 06 a4 55 e7 20 |,,block%|+4...U. |
|000011a0| 72 65 64 72 61 77 25 20 | 8c 20 c8 99 20 22 57 69 |redraw% |. .. "Wi|
|000011b0| 6d 70 5f 46 6f 72 63 65 | 52 65 64 72 61 77 22 2c |mp_Force|Redraw",|
|000011c0| 62 6c 6f 63 6b 25 21 34 | 2c 62 6c 6f 63 6b 25 21 |block%!4|,block%!|
|000011d0| 38 2c 62 6c 6f 63 6b 25 | 21 31 32 2c 62 6c 6f 63 |8,block%|!12,bloc|
|000011e0| 6b 25 21 31 36 2c 62 6c | 6f 63 6b 25 21 32 30 0d |k%!16,bl|ock%!20.|
|000011f0| 06 ae 05 e1 0d 06 b8 04 | 0d 06 c2 21 dd a4 67 65 |........|...!..ge|
|00001200| 74 5f 69 63 6f 6e 74 65 | 78 74 28 77 69 6e 64 6f |t_iconte|xt(windo|
|00001210| 77 25 2c 69 63 6f 6e 25 | 29 0d 06 cc 24 ea 20 69 |w%,icon%|)...$. i|
|00001220| 6e 64 69 72 65 63 74 25 | 2c 69 6e 64 69 72 65 63 |ndirect%|,indirec|
|00001230| 74 73 74 61 72 74 25 2c | 6e 61 6d 65 24 0d 06 d6 |tstart%,|name$...|
|00001240| 13 21 62 6c 6f 63 6b 25 | 3d 77 69 6e 64 6f 77 25 |.!block%|=window%|
|00001250| 0d 06 e0 12 62 6c 6f 63 | 6b 25 21 34 3d 69 63 6f |....bloc|k%!4=ico|
|00001260| 6e 25 0d 06 ea 22 c8 99 | 20 22 57 69 6d 70 5f 47 |n%..."..| "Wimp_G|
|00001270| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 62 6c |etIconSt|ate",,bl|
|00001280| 6f 63 6b 25 0d 06 f4 17 | 69 6e 64 69 72 65 63 74 |ock%....|indirect|
|00001290| 25 3d 62 6c 6f 63 6b 25 | 21 32 34 0d 06 fe 24 69 |%=block%|!24...$i|
|000012a0| 6e 64 69 72 65 63 74 25 | 3d 69 6e 64 69 72 65 63 |ndirect%|=indirec|
|000012b0| 74 25 20 80 20 25 31 30 | 30 30 30 30 30 30 30 0d |t% . %10|0000000.|
|000012c0| 07 08 11 e7 20 69 6e 64 | 69 72 65 63 74 25 20 8c |.... ind|irect% .|
|000012d0| 0d 07 12 1e 20 20 69 6e | 64 69 72 65 63 74 73 74 |.... in|directst|
|000012e0| 61 72 74 25 3d 62 6c 6f | 63 6b 25 21 32 38 0d 07 |art%=blo|ck%!28..|
|000012f0| 1c 1b 20 20 6e 61 6d 65 | 24 3d 24 69 6e 64 69 72 |.. name|$=$indir|
|00001300| 65 63 74 73 74 61 72 74 | 25 0d 07 26 05 cc 0d 07 |ectstart|%..&....|
|00001310| 30 18 20 20 6e 61 6d 65 | 24 3d 24 28 62 6c 6f 63 |0. name|$=$(bloc|
|00001320| 6b 25 2b 32 38 29 0d 07 | 3a 05 cd 0d 07 44 0a 3d |k%+28)..|:....D.=|
|00001330| 6e 61 6d 65 24 0d 07 4e | 04 0d 07 58 1e dd f2 73 |name$..N|...X...s|
|00001340| 65 74 5f 63 61 72 65 74 | 28 77 69 6e 64 6f 77 25 |et_caret|(window%|
|00001350| 2c 69 63 6f 6e 25 29 0d | 07 62 35 c8 99 20 22 57 |,icon%).|.b5.. "W|
|00001360| 69 6d 70 5f 53 65 74 43 | 61 72 65 74 50 6f 73 69 |imp_SetC|aretPosi|
|00001370| 74 69 6f 6e 22 2c 77 69 | 6e 64 6f 77 25 2c 69 63 |tion",wi|ndow%,ic|
|00001380| 6f 6e 25 2c 30 2c 30 2c | 2d 31 2c 30 0d 07 6c 05 |on%,0,0,|-1,0..l.|
|00001390| e1 0d 07 76 04 0d 07 80 | 22 dd f2 67 65 74 5f 63 |...v....|"..get_c|
|000013a0| 61 72 65 74 28 f8 20 77 | 69 6e 64 6f 77 25 2c f8 |aret(. w|indow%,.|
|000013b0| 20 69 63 6f 6e 25 29 0d | 07 8a 26 c8 99 20 22 57 | icon%).|..&.. "W|
|000013c0| 69 6d 70 5f 47 65 74 43 | 61 72 65 74 50 6f 73 69 |imp_GetC|aretPosi|
|000013d0| 74 69 6f 6e 22 2c 2c 62 | 6c 6f 63 6b 25 0d 07 94 |tion",,b|lock%...|
|000013e0| 13 77 69 6e 64 6f 77 25 | 3d 21 62 6c 6f 63 6b 25 |.window%|=!block%|
|000013f0| 0d 07 9e 12 69 63 6f 6e | 25 3d 62 6c 6f 63 6b 25 |....icon|%=block%|
|00001400| 21 34 0d 07 a8 05 e1 0d | 07 b2 04 0d 07 bc 24 dd |!4......|......$.|
|00001410| f2 67 65 74 5f 70 6f 69 | 6e 74 65 72 28 f8 20 77 |.get_poi|nter(. w|
|00001420| 69 6e 64 6f 77 25 2c f8 | 20 69 63 6f 6e 25 29 0d |indow%,.| icon%).|
|00001430| 07 c6 24 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 50 |..$.. "W|imp_GetP|
|00001440| 6f 69 6e 74 65 72 49 6e | 66 6f 22 2c 2c 62 6c 6f |ointerIn|fo",,blo|
|00001450| 63 6b 25 0d 07 d0 14 77 | 69 6e 64 6f 77 25 3d 62 |ck%....w|indow%=b|
|00001460| 6c 6f 63 6b 25 31 32 0d | 07 da 13 69 63 6f 6e 25 |lock%12.|...icon%|
|00001470| 3d 62 6c 6f 63 6b 25 21 | 31 36 0d 07 e4 05 e1 0d |=block%!|16......|
|00001480| 07 ee 04 0d 07 f8 1f dd | a4 67 65 74 5f 77 69 6e |........|.get_win|
|00001490| 64 6f 77 28 77 69 6e 64 | 6f 77 24 2c 66 6c 61 67 |dow(wind|ow$,flag|
|000014a0| 25 29 0d 08 02 0d ea 20 | 68 61 6e 64 6c 65 25 0d |%)..... |handle%.|
|000014b0| 08 0c 25 c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |..%.. "W|imp_Open|
|000014c0| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 74 65 6d 70 6c |Template|",,templ|
|000014d0| 61 74 65 24 0d 08 16 5b | c8 99 20 22 57 69 6d 70 |ate$...[|.. "Wimp|
|000014e0| 5f 4c 6f 61 64 54 65 6d | 70 6c 61 74 65 22 2c 2c |_LoadTem|plate",,|
|000014f0| 62 6c 6f 63 6b 25 2c 62 | 75 66 66 65 72 5f 73 74 |block%,b|uffer_st|
|00001500| 61 72 74 25 2c 62 75 66 | 66 65 72 5f 65 6e 64 25 |art%,buf|fer_end%|
|00001510| 2c 2d 31 2c 77 69 6e 64 | 6f 77 24 2c 30 20 b8 20 |,-1,wind|ow$,0 . |
|00001520| 2c 2c 62 75 66 66 65 72 | 5f 73 74 61 72 74 25 0d |,,buffer|_start%.|
|00001530| 08 20 36 e7 20 66 6c 61 | 67 25 20 8c 20 c8 99 20 |. 6. fla|g% . .. |
|00001540| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 57 69 6e 64 |"Wimp_Cr|eateWind|
|00001550| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 20 b8 20 68 61 |ow",,blo|ck% . ha|
|00001560| 6e 64 6c 65 25 0d 08 2a | 1b c8 99 20 22 57 69 6d |ndle%..*|... "Wim|
|00001570| 70 5f 43 6c 6f 73 65 54 | 65 6d 70 6c 61 74 65 22 |p_CloseT|emplate"|
|00001580| 0d 08 34 0c 3d 68 61 6e | 64 6c 65 25 0d 08 3e 04 |..4.=han|dle%..>.|
|00001590| 0d 08 48 11 dd a4 63 72 | 65 61 74 65 5f 6d 65 6e |..H...cr|eate_men|
|000015a0| 75 0d 08 52 39 e7 20 6d | 65 6e 75 5f 73 74 61 72 |u..R9. m|enu_star|
|000015b0| 74 25 2b 32 38 3e 6d 65 | 6e 75 5f 65 6e 64 25 20 |t%+28>me|nu_end% |
|000015c0| 8c 20 f2 65 72 72 6f 72 | 28 22 4d 65 6e 75 20 61 |. .error|("Menu a|
|000015d0| 72 65 61 20 66 75 6c 6c | 22 29 0d 08 5c 23 ea 20 |rea full|")..\#. |
|000015e0| 6d 25 2c 69 25 2c 69 32 | 25 2c 63 74 72 25 2c 6d |m%,i%,i2|%,ctr%,m|
|000015f0| 61 78 78 25 2c 6d 65 6e | 75 70 74 72 25 0d 08 66 |axx%,men|uptr%..f|
|00001600| 18 ea 20 6d 65 6e 75 24 | 2c 6d 65 6e 75 31 24 2c |.. menu$|,menu1$,|
|00001610| 69 74 65 6d 24 0d 08 70 | 0b f3 20 6d 65 6e 75 24 |item$..p|.. menu$|
|00001620| 0d 08 7a 15 c8 95 20 c2 | 6d 65 6e 75 24 2c 32 29 |..z... .|menu$,2)|
|00001630| 3d 22 2b 2b 22 0d 08 84 | 0e 20 20 f3 20 6d 65 6e |="++"...|. . men|
|00001640| 75 31 24 0d 08 8e 25 20 | 20 6d 65 6e 75 24 3d c0 |u1$...% | menu$=.|
|00001650| 6d 65 6e 75 24 2c a9 28 | 6d 65 6e 75 24 29 2d 32 |menu$,.(|menu$)-2|
|00001660| 29 2b 6d 65 6e 75 31 24 | 0d 08 98 05 ce 0d 08 a2 |)+menu1$|........|
|00001670| 28 e7 20 c0 6d 65 6e 75 | 24 2c 31 29 3d 22 3d 22 |(. .menu|$,1)="="|
|00001680| 20 8c 20 6d 65 6e 75 24 | 3d a0 28 c1 6d 65 6e 75 | . menu$|=.(.menu|
|00001690| 24 2c 32 29 29 0d 08 ac | 18 6d 65 6e 75 70 74 72 |$,2))...|.menuptr|
|000016a0| 25 3d 6d 65 6e 75 5f 73 | 74 61 72 74 25 0d 08 b6 |%=menu_s|tart%...|
|000016b0| 08 69 25 3d 30 0d 08 c0 | 0a 63 74 72 25 3d 30 0d |.i%=0...|.ctr%=0.|
|000016c0| 08 ca 15 e7 20 c0 6d 65 | 6e 75 24 2c 31 29 3d 22 |.... .me|nu$,1)="|
|000016d0| 23 22 20 8c 0d 08 d4 0a | 20 20 69 25 3d 31 0d 08 |#" .....| i%=1..|
|000016e0| de 1a 20 20 6d 65 6e 75 | 74 69 74 6c 65 24 3d a4 |.. menu|title$=.|
|000016f0| 70 61 72 28 22 2c 22 29 | 0d 08 e8 05 cc 0d 08 f2 |par(",")|........|
|00001700| 13 20 20 6d 65 6e 75 74 | 69 74 6c 65 24 3d 22 22 |. menut|itle$=""|
|00001710| 0d 08 fc 05 cd 0d 09 06 | 18 69 32 25 3d a7 6d 65 |........|.i2%=.me|
|00001720| 6e 75 74 69 74 6c 65 24 | 2c 22 3e 22 29 0d 09 10 |nutitle$|,">")...|
|00001730| 0d e7 20 69 32 25 3e 30 | 20 8c 0d 09 1a 27 20 20 |.. i2%>0| ....' |
|00001740| 6d 65 6e 75 70 74 72 25 | 21 32 30 3d a0 28 c1 6d |menuptr%|!20=.(.m|
|00001750| 65 6e 75 74 69 74 6c 65 | 24 2c 69 32 25 2b 31 29 |enutitle|$,i2%+1)|
|00001760| 29 0d 09 24 23 20 20 6d | 65 6e 75 74 69 74 6c 65 |)..$# m|enutitle|
|00001770| 24 3d c0 6d 65 6e 75 74 | 69 74 6c 65 24 2c 69 32 |$=.menut|itle$,i2|
|00001780| 25 2d 31 29 0d 09 2e 05 | cc 0d 09 38 14 20 20 6d |%-1)....|...8. m|
|00001790| 65 6e 75 70 74 72 25 21 | 32 30 3d 34 30 0d 09 42 |enuptr%!|20=40..B|
|000017a0| 05 cd 0d 09 4c 18 24 6d | 65 6e 75 70 74 72 25 3d |....L.$m|enuptr%=|
|000017b0| 6d 65 6e 75 74 69 74 6c | 65 24 0d 09 56 11 6d 65 |menutitl|e$..V.me|
|000017c0| 6e 75 70 74 72 25 3f 31 | 32 3d 37 0d 09 60 11 6d |nuptr%?1|2=7..`.m|
|000017d0| 65 6e 75 70 74 72 25 3f | 31 33 3d 32 0d 09 6a 11 |enuptr%?|13=2..j.|
|000017e0| 6d 65 6e 75 70 74 72 25 | 3f 31 34 3d 37 0d 09 74 |menuptr%|?14=7..t|
|000017f0| 11 6d 65 6e 75 70 74 72 | 25 3f 31 35 3d 30 0d 09 |.menuptr|%?15=0..|
|00001800| 7e 16 6d 65 6e 75 70 74 | 72 25 21 31 36 3d 31 39 |~.menupt|r%!16=19|
|00001810| 36 2d 32 34 0d 09 88 11 | 6d 65 6e 75 70 74 72 25 |6-24....|menuptr%|
|00001820| 21 32 34 3d 30 0d 09 92 | 10 6d 65 6e 75 70 74 72 |!24=0...|.menuptr|
|00001830| 25 2b 3d 32 38 0d 09 9c | 19 6d 61 78 78 25 3d a9 |%+=28...|.maxx%=.|
|00001840| 28 6d 65 6e 75 74 69 74 | 6c 65 24 29 2d 33 0d 09 |(menutit|le$)-3..|
|00001850| a6 14 c8 95 20 c2 6d 65 | 6e 75 24 2c 31 29 3d 22 |.... .me|nu$,1)="|
|00001860| 7e 22 0d 09 b0 1e 20 20 | 6d 65 6e 75 24 3d c0 6d |~".... |menu$=.m|
|00001870| 65 6e 75 24 2c a9 28 6d | 65 6e 75 24 29 2d 31 29 |enu$,.(m|enu$)-1)|
|00001880| 0d 09 ba 07 20 20 f5 0d | 09 c4 17 20 20 20 20 69 |.... ..|... i|
|00001890| 74 65 6d 24 3d a4 70 61 | 72 28 22 2c 22 29 0d 09 |tem$=.pa|r(",")..|
|000018a0| ce 19 20 20 20 20 f2 6d | 65 6e 75 5f 69 74 65 6d |.. .m|enu_item|
|000018b0| 28 69 74 65 6d 24 29 0d | 09 d8 10 20 20 fd 20 69 |(item$).|... . i|
|000018c0| 74 65 6d 24 3d 22 22 0d | 09 e2 0d 20 20 f3 20 6d |tem$="".|... . m|
|000018d0| 65 6e 75 24 0d 09 ec 05 | ce 0d 09 f6 05 f5 0d 0a |enu$....|........|
|000018e0| 00 15 20 20 69 74 65 6d | 24 3d a4 70 61 72 28 22 |.. item|$=.par("|
|000018f0| 2c 22 29 0d 0a 0a 17 20 | 20 f2 6d 65 6e 75 5f 69 |,").... | .menu_i|
|00001900| 74 65 6d 28 69 74 65 6d | 24 29 0d 0a 14 0e fd 20 |tem(item|$)..... |
|00001910| 69 74 65 6d 24 3d 22 22 | 0d 0a 1e 24 e7 20 6d 65 |item$=""|...$. me|
|00001920| 6e 75 70 74 72 25 2d 6d | 65 6e 75 5f 73 74 61 72 |nuptr%-m|enu_star|
|00001930| 74 25 3c 3d 32 38 20 8c | 20 3d 2d 31 0d 0a 28 24 |t%<=28 .| =-1..($|
|00001940| 6d 65 6e 75 70 74 72 25 | 21 2d 32 34 3d 28 6d 65 |menuptr%|!-24=(me|
|00001950| 6e 75 70 74 72 25 21 2d | 32 34 29 84 20 26 38 30 |nuptr%!-|24). &80|
|00001960| 0d 0a 32 12 6d 25 3d 6d | 65 6e 75 5f 73 74 61 72 |..2.m%=m|enu_star|
|00001970| 74 25 0d 0a 3c 15 6d 25 | 21 31 36 3d 6d 61 78 78 |t%..<.m%|!16=maxx|
|00001980| 25 2a 31 36 2b 31 32 0d | 0a 46 18 6d 65 6e 75 5f |%*16+12.|.F.menu_|
|00001990| 73 74 61 72 74 25 3d 6d | 65 6e 75 70 74 72 25 0d |start%=m|enuptr%.|
|000019a0| 0a 50 07 3d 6d 25 0d 0a | 5a 04 0d 0a 64 16 dd f2 |.P.=m%..|Z...d...|
|000019b0| 6d 65 6e 75 5f 69 74 65 | 6d 28 74 65 78 74 24 29 |menu_ite|m(text$)|
|000019c0| 0d 0a 6e 18 ea 20 69 25 | 2c 66 6c 67 25 2c 73 75 |..n.. i%|,flg%,su|
|000019d0| 62 70 74 72 25 2c 6c 25 | 0d 0a 78 12 e7 20 74 65 |bptr%,l%|..x.. te|
|000019e0| 78 74 24 3d 22 22 20 8c | 20 e1 0d 0a 82 36 e7 20 |xt$="" .| ....6. |
|000019f0| 6d 65 6e 75 70 74 72 25 | 2b 32 34 3e 6d 65 6e 75 |menuptr%|+24>menu|
|00001a00| 5f 65 6e 64 25 20 8c 20 | f2 65 72 72 6f 72 28 22 |_end% . |.error("|
|00001a10| 4d 65 6e 75 20 61 72 65 | 61 20 66 75 6c 6c 22 29 |Menu are|a full")|
|00001a20| 0d 0a 8c 11 e7 20 74 65 | 78 74 24 3d 22 26 22 20 |..... te|xt$="&" |
|00001a30| 8c 0d 0a 96 30 20 20 f2 | 65 72 72 6f 72 28 22 27 |....0 .|error("'|
|00001a40| 26 27 20 4e 6f 74 20 73 | 75 70 70 6f 72 74 20 69 |&' Not s|upport i|
|00001a50| 6e 20 6d 65 6e 75 20 74 | 72 65 65 20 79 65 74 22 |n menu t|ree yet"|
|00001a60| 29 0d 0a a0 05 cd 0d 0a | aa 0c 66 6c 67 25 3d 26 |).......|..flg%=&|
|00001a70| 30 30 0d 0a b4 12 69 25 | 3d a7 74 65 78 74 24 2c |00....i%|=.text$,|
|00001a80| 22 3f 22 29 0d 0a be 27 | e7 20 69 25 3c 32 20 8c |"?")...'|. i%<2 .|
|00001a90| 20 69 25 3d a7 74 65 78 | 74 24 2c 22 3e 22 29 20 | i%=.tex|t$,">") |
|00001aa0| 8b 20 66 6c 67 25 2b 3d | 26 30 38 0d 0a c8 0c e7 |. flg%+=|&08.....|
|00001ab0| 20 69 25 3e 30 20 8c 0d | 0a d2 1d 20 20 73 75 62 | i%>0 ..|... sub|
|00001ac0| 70 74 72 25 3d a0 28 c1 | 74 65 78 74 24 2c 69 25 |ptr%=.(.|text$,i%|
|00001ad0| 2b 31 29 29 0d 0a dc 18 | 20 20 74 65 78 74 24 3d |+1))....| text$=|
|00001ae0| c0 74 65 78 74 24 2c 69 | 25 2d 31 29 0d 0a e6 05 |.text$,i|%-1)....|
|00001af0| cc 0d 0a f0 10 20 20 73 | 75 62 70 74 72 25 3d 2d |..... s|ubptr%=-|
|00001b00| 31 0d 0a fa 05 cd 0d 0b | 04 36 e7 20 c2 74 65 78 |1.......|.6. .tex|
|00001b10| 74 24 2c 31 29 3d 22 23 | 22 20 8c 20 74 65 78 74 |t$,1)="#|" . text|
|00001b20| 24 3d c0 74 65 78 74 24 | 2c a9 74 65 78 74 24 2d |$=.text$|,.text$-|
|00001b30| 31 29 3a 66 6c 67 25 2b | 3d 26 30 32 0d 0b 0e 36 |1):flg%+|=&02...6|
|00001b40| e7 20 c0 74 65 78 74 24 | 2c 31 29 3d 22 21 22 20 |. .text$|,1)="!" |
|00001b50| 8c 20 74 65 78 74 24 3d | c2 74 65 78 74 24 2c a9 |. text$=|.text$,.|
|00001b60| 74 65 78 74 24 2d 31 29 | 3a 66 6c 67 25 2b 3d 26 |text$-1)|:flg%+=&|
|00001b70| 30 31 0d 0b 18 13 6d 65 | 6e 75 70 74 72 25 21 30 |01....me|nuptr%!0|
|00001b80| 3d 66 6c 67 25 0d 0b 22 | 16 6d 65 6e 75 70 74 72 |=flg%.."|.menuptr|
|00001b90| 25 21 34 3d 73 75 62 70 | 74 72 25 0d 0b 2c 18 6d |%!4=subp|tr%..,.m|
|00001ba0| 65 6e 75 70 74 72 25 21 | 38 3d 26 30 37 30 30 30 |enuptr%!|8=&07000|
|00001bb0| 30 32 31 0d 0b 36 15 e7 | 20 c0 74 65 78 74 24 2c |021..6..| .text$,|
|00001bc0| 31 29 3d 22 3f 22 20 8c | 0d 0b 40 1a 20 20 6d 65 |1)="?" .|..@. me|
|00001bd0| 6e 75 70 74 72 25 21 38 | 3d 26 30 37 30 30 30 31 |nuptr%!8|=&070001|
|00001be0| 31 41 0d 0b 4a 1e 20 20 | 69 33 25 3d a4 77 6f 72 |1A..J. |i3%=.wor|
|00001bf0| 6b 73 70 61 63 65 28 a9 | 28 74 65 78 74 24 29 29 |kspace(.|(text$))|
|00001c00| 0d 0b 54 14 20 20 24 69 | 33 25 3d c1 74 65 78 74 |..T. $i|3%=.text|
|00001c10| 24 2c 32 29 0d 0b 5e 15 | 20 20 6d 65 6e 75 70 74 |$,2)..^.| menupt|
|00001c20| 72 25 21 31 32 3d 69 33 | 25 0d 0b 68 20 20 20 6d |r%!12=i3|%..h m|
|00001c30| 65 6e 75 70 74 72 25 21 | 31 36 3d 73 79 73 74 65 |enuptr%!|16=syste|
|00001c40| 6d 73 70 72 69 74 65 73 | 25 0d 0b 72 18 20 20 6d |msprites|%..r. m|
|00001c50| 65 6e 75 70 74 72 25 21 | 32 30 3d a9 74 65 78 74 |enuptr%!|20=.text|
|00001c60| 24 0d 0b 7c 05 cc 0d 0b | 86 17 20 20 e7 20 c0 74 |$..|....|.. . .t|
|00001c70| 65 78 74 24 2c 31 29 3d | 22 24 22 20 8c 0d 0b 90 |ext$,1)=|"$" ....|
|00001c80| 16 20 20 20 20 21 6d 65 | 6e 75 70 74 72 25 2b 3d |. !me|nuptr%+=|
|00001c90| 26 30 34 0d 0b 9a 18 20 | 20 20 20 6d 65 6e 75 70 |&04.... | menup|
|00001ca0| 74 72 25 21 38 2b 3d 26 | 31 30 30 0d 0b a4 16 20 |tr%!8+=&|100.... |
|00001cb0| 20 20 20 69 25 3d a7 74 | 65 78 74 24 2c 22 28 22 | i%=.t|ext$,"("|
|00001cc0| 29 0d 0b ae 10 20 20 20 | 20 e7 20 69 25 3e 30 20 |).... | . i%>0 |
|00001cd0| 8c 0d 0b b8 1c 20 20 20 | 20 20 20 6c 25 3d bb 28 |..... | l%=.(|
|00001ce0| c1 74 65 78 74 24 2c 69 | 25 2b 31 29 29 0d 0b c2 |.text$,i|%+1))...|
|00001cf0| 1c 20 20 20 20 20 20 74 | 65 78 74 24 3d c0 74 65 |. t|ext$=.te|
|00001d00| 78 74 24 2c 69 25 2d 31 | 29 0d 0b cc 09 20 20 20 |xt$,i%-1|).... |
|00001d10| 20 cc 0d 0b d6 0f 20 20 | 20 20 20 20 6c 25 3d 31 | ..... | l%=1|
|00001d20| 32 0d 0b e0 09 20 20 20 | 20 cd 0d 0b ea 20 20 20 |2.... | .... |
|00001d30| 20 20 6d 65 6e 75 70 74 | 72 25 21 31 32 3d a0 28 | menupt|r%!12=.(|
|00001d40| c1 74 65 78 74 24 2c 32 | 29 29 0d 0b f4 16 20 20 |.text$,2|)).... |
|00001d50| 20 20 6d 65 6e 75 70 74 | 72 25 21 31 36 3d 2d 31 | menupt|r%!16=-1|
|00001d60| 0d 0b fe 16 20 20 20 20 | 6d 65 6e 75 70 74 72 25 |.... |menuptr%|
|00001d70| 21 32 30 3d 6c 25 0d 0c | 08 17 20 20 20 20 e7 20 |!20=l%..|.. . |
|00001d80| 6c 25 3e 31 35 20 8c 20 | 6c 25 3d 31 35 0d 0c 12 |l%>15 . |l%=15...|
|00001d90| 18 20 20 20 20 74 65 78 | 74 24 3d c4 6c 25 2d 31 |. tex|t$=.l%-1|
|00001da0| 2c 22 20 22 29 0d 0c 1c | 07 20 20 cc 0d 0c 26 18 |," ")...|. ...&.|
|00001db0| 20 20 20 20 e7 20 a9 28 | 74 65 78 74 24 29 3c 3d | . .(|text$)<=|
|00001dc0| 31 32 20 8c 0d 0c 30 1e | 20 20 20 20 20 20 24 28 |12 ...0.| $(|
|00001dd0| 6d 65 6e 75 70 74 72 25 | 2b 31 32 29 3d 74 65 78 |menuptr%|+12)=tex|
|00001de0| 74 24 0d 0c 3a 09 20 20 | 20 20 cc 0d 0c 44 24 20 |t$..:. | ...D$ |
|00001df0| 20 20 20 20 20 69 33 25 | 3d a4 77 6f 72 6b 73 70 | i3%|=.worksp|
|00001e00| 61 63 65 28 a9 28 74 65 | 78 74 24 29 2b 31 29 0d |ace(.(te|xt$)+1).|
|00001e10| 0c 4e 14 20 20 20 20 20 | 20 24 69 33 25 3d 74 65 |.N. | $i3%=te|
|00001e20| 78 74 24 0d 0c 58 19 20 | 20 20 20 20 20 6d 65 6e |xt$..X. | men|
|00001e30| 75 70 74 72 25 21 31 32 | 3d 69 33 25 0d 0c 62 18 |uptr%!12|=i3%..b.|
|00001e40| 20 20 20 20 20 20 6d 65 | 6e 75 70 74 72 25 21 31 | me|nuptr%!1|
|00001e50| 36 3d 2d 31 0d 0c 6c 20 | 20 20 20 20 20 20 6d 65 |6=-1..l | me|
|00001e60| 6e 75 70 74 72 25 21 32 | 30 3d a9 28 74 65 78 74 |nuptr%!2|0=.(text|
|00001e70| 24 29 2b 31 0d 0c 76 26 | 20 20 20 20 20 20 6d 65 |$)+1..v&| me|
|00001e80| 6e 75 70 74 72 25 21 38 | 3d 6d 65 6e 75 70 74 72 |nuptr%!8|=menuptr|
|00001e90| 25 21 38 20 84 20 26 31 | 30 30 0d 0c 80 09 20 20 |%!8 . &1|00.... |
|00001ea0| 20 20 cd 0d 0c 8a 07 20 | 20 cd 0d 0c 94 27 20 20 | ..... | ....' |
|00001eb0| e7 20 a9 28 74 65 78 74 | 24 29 3e 6d 61 78 78 25 |. .(text|$)>maxx%|
|00001ec0| 20 8c 20 6d 61 78 78 25 | 3d a9 28 74 65 78 74 24 | . maxx%|=.(text$|
|00001ed0| 29 0d 0c 9e 05 cd 0d 0c | a8 10 6d 65 6e 75 70 74 |).......|..menupt|
|00001ee0| 72 25 2b 3d 32 34 0d 0c | b2 05 e1 0d 0c bc 05 20 |r%+=24..|....... |
|00001ef0| 0d 0c c6 17 dd a4 77 6f | 72 6b 73 70 61 63 65 28 |......wo|rkspace(|
|00001f00| 73 70 61 63 65 25 29 0d | 0c d0 0e ea 20 61 64 64 |space%).|.... add|
|00001f10| 72 65 73 73 25 0d 0c da | 2a c8 99 20 22 4f 53 5f |ress%...|*.. "OS_|
|00001f20| 4d 6f 64 75 6c 65 22 2c | 36 2c 2c 2c 73 70 61 63 |Module",|6,,,spac|
|00001f30| 65 25 20 b8 20 2c 2c 61 | 64 64 72 65 73 73 25 0d |e% . ,,a|ddress%.|
|00001f40| 0c e4 0d 3d 61 64 64 72 | 65 73 73 25 0d 0c ee 04 |...=addr|ess%....|
|00001f50| 0d 0c f8 0f dd a4 70 61 | 72 28 73 65 70 24 29 0d |......pa|r(sep$).|
|00001f60| 0d 02 0c 69 31 25 3d 69 | 25 2b 31 0d 0d 0c 1c 69 |...i1%=i|%+1....i|
|00001f70| 25 3d a7 6d 65 6e 75 24 | 2b 73 65 70 24 2c 73 65 |%=.menu$|+sep$,se|
|00001f80| 70 24 2c 69 31 25 29 0d | 0d 16 17 3d c1 6d 65 6e |p$,i1%).|...=.men|
|00001f90| 75 24 2c 69 31 25 2c 69 | 25 2d 69 31 25 29 0d 0d |u$,i1%,i|%-i1%)..|
|00001fa0| 20 04 0d 0d 2a 1c dd f2 | 73 65 74 5f 74 69 6b 28 | ...*...|set_tik(|
|00001fb0| 6d 65 6e 75 25 2c 6f 66 | 66 73 65 74 25 29 0d 0d |menu%,of|fset%)..|
|00001fc0| 34 35 20 20 21 28 6d 65 | 6e 75 25 2b 34 2b 6f 66 |45 !(me|nu%+4+of|
|00001fd0| 66 73 65 74 25 2a 32 34 | 29 3d 21 28 6d 65 6e 75 |fset%*24|)=!(menu|
|00001fe0| 25 2b 34 2b 6f 66 66 73 | 65 74 25 2a 32 34 29 20 |%+4+offs|et%*24) |
|00001ff0| 84 20 31 0d 0d 3e 05 e1 | 0d 0d 48 04 0d 0d 52 1e |. 1..>..|..H...R.|
|00002000| dd f2 75 6e 73 65 74 5f | 74 69 6b 28 6d 65 6e 75 |..unset_|tik(menu|
|00002010| 25 2c 6f 66 66 73 65 74 | 25 29 0d 0d 5c 37 20 20 |%,offset|%)..\7 |
|00002020| 21 28 6d 65 6e 75 25 2b | 34 2b 6f 66 66 73 65 74 |!(menu%+|4+offset|
|00002030| 25 2a 32 34 29 3d 21 28 | 6d 65 6e 75 25 2b 34 2b |%*24)=!(|menu%+4+|
|00002040| 6f 66 66 73 65 74 25 2a | 32 34 29 20 80 20 ac 20 |offset%*|24) . . |
|00002050| 31 0d 0d 66 05 e1 0d 0d | 70 04 0d 0d 7a 1c dd f2 |1..f....|p...z...|
|00002060| 65 6f 72 5f 74 69 6b 28 | 6d 65 6e 75 25 2c 6f 66 |eor_tik(|menu%,of|
|00002070| 66 73 65 74 25 29 0d 0d | 84 35 20 20 21 28 6d 65 |fset%)..|.5 !(me|
|00002080| 6e 75 25 2b 34 2b 6f 66 | 66 73 65 74 25 2a 32 34 |nu%+4+of|fset%*24|
|00002090| 29 3d 21 28 6d 65 6e 75 | 25 2b 34 2b 6f 66 66 73 |)=!(menu|%+4+offs|
|000020a0| 65 74 25 2a 32 34 29 20 | 82 20 31 0d 0d 8e 05 e1 |et%*24) |. 1.....|
|000020b0| 0d 0d 98 04 0d 0d a2 1c | dd a4 74 69 6b 5f 73 65 |........|..tik_se|
|000020c0| 74 28 6d 65 6e 75 25 2c | 6f 66 66 73 65 74 25 29 |t(menu%,|offset%)|
|000020d0| 0d 0d ac 1e 3d 21 28 6d | 65 6e 75 25 2b 34 2b 6f |....=!(m|enu%+4+o|
|000020e0| 66 66 73 65 74 25 2a 32 | 34 29 20 80 20 31 0d 0d |ffset%*2|4) . 1..|
|000020f0| b6 04 0d 0d c0 1a dd f2 | 73 68 61 64 65 28 6d 65 |........|shade(me|
|00002100| 6e 75 25 2c 6f 66 66 73 | 65 74 25 29 0d 0d ca 3b |nu%,offs|et%)...;|
|00002110| 21 28 6d 65 6e 75 25 2b | 31 32 2b 6f 66 66 73 65 |!(menu%+|12+offse|
|00002120| 74 25 2a 32 34 29 3d 21 | 28 6d 65 6e 75 25 2b 31 |t%*24)=!|(menu%+1|
|00002130| 32 2b 6f 66 66 73 65 74 | 25 2a 32 34 29 20 84 20 |2+offset|%*24) . |
|00002140| 26 34 30 30 30 30 30 0d | 0d d4 05 e1 0d 0d de 04 |&400000.|........|
|00002150| 0d 0d e8 1c dd f2 75 6e | 73 68 61 64 65 28 6d 65 |......un|shade(me|
|00002160| 6e 75 25 2c 6f 66 66 73 | 65 74 25 29 0d 0d f2 3d |nu%,offs|et%)...=|
|00002170| 21 28 6d 65 6e 75 25 2b | 31 32 2b 6f 66 66 73 65 |!(menu%+|12+offse|
|00002180| 74 25 2a 32 34 29 3d 21 | 28 6d 65 6e 75 25 2b 31 |t%*24)=!|(menu%+1|
|00002190| 32 2b 6f 66 66 73 65 74 | 25 2a 32 34 29 20 80 20 |2+offset|%*24) . |
|000021a0| ac 20 26 34 30 30 30 30 | 30 0d 0d fc 05 e1 0d 0e |. &40000|0.......|
|000021b0| 06 04 0d 0e 10 17 dd a4 | 6c 65 6e 67 74 68 28 66 |........|length(f|
|000021c0| 69 6c 65 6e 61 6d 65 24 | 29 0d 0e 1a 14 ea 20 6c |ilename$|)..... l|
|000021d0| 65 6e 67 74 68 25 2c 66 | 6c 61 67 73 25 0d 0e 24 |ength%,f|lags%..$|
|000021e0| 32 c8 99 20 22 4f 53 5f | 46 69 6c 65 22 2c 26 30 |2.. "OS_|File",&0|
|000021f0| 35 2c 66 69 6c 65 6e 61 | 6d 65 24 20 b8 20 66 6c |5,filena|me$ . fl|
|00002200| 61 67 73 25 2c 2c 2c 2c | 6c 65 6e 67 74 68 25 0d |ags%,,,,|length%.|
|00002210| 0e 2e 32 e7 20 66 6c 61 | 67 73 25 3c 3e 31 20 8c |..2. fla|gs%<>1 .|
|00002220| 20 f2 65 72 72 6f 72 28 | 22 43 61 6e 6e 6f 74 20 | .error(|"Cannot |
|00002230| 66 69 6e 64 20 22 2b 66 | 69 6c 65 6e 61 6d 65 24 |find "+f|ilename$|
|00002240| 29 0d 0e 38 0c 3d 6c 65 | 6e 67 74 68 25 0d 0e 42 |)..8.=le|ngth%..B|
|00002250| 04 0d 0e 4c 0e dd f2 6c | 6f 61 64 5f 61 63 6b 0d |...L...l|oad_ack.|
|00002260| 0e 56 16 62 6c 6f 63 6b | 25 21 31 32 3d 62 6c 6f |.V.block|%!12=blo|
|00002270| 63 6b 25 21 38 0d 0e 60 | 0f 62 6c 6f 63 6b 25 21 |ck%!8..`|.block%!|
|00002280| 31 36 3d 34 0d 0e 6a 2c | c8 99 20 22 57 69 6d 70 |16=4..j,|.. "Wimp|
|00002290| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 31 37 |_SendMes|sage",17|
|000022a0| 2c 62 6c 6f 63 6b 25 2c | 62 6c 6f 63 6b 25 21 34 |,block%,|block%!4|
|000022b0| 0d 0e 74 05 e1 0d 0e 7e | 04 0d 0e 88 15 dd a4 72 |..t....~|.......r|
|000022c0| 65 61 64 7a 28 61 64 64 | 72 65 73 73 25 29 0d 0e |eadz(add|ress%)..|
|000022d0| 92 0b ea 20 74 65 78 74 | 24 0d 0e 9c 13 c8 95 20 |... text|$...... |
|000022e0| 3f 61 64 64 72 65 73 73 | 25 3c 3e 30 0d 0e a6 17 |?address|%<>0....|
|000022f0| 74 65 78 74 24 2b 3d bd | 28 3f 61 64 64 72 65 73 |text$+=.|(?addres|
|00002300| 73 25 29 0d 0e b0 0f 61 | 64 64 72 65 73 73 25 2b |s%)....a|ddress%+|
|00002310| 3d 31 0d 0e ba 05 ce 0d | 0e c4 0a 3d 74 65 78 74 |=1......|...=text|
|00002320| 24 0d 0e ce 04 0d 0e d8 | 21 dd f2 77 72 69 74 65 |$.......|!..write|
|00002330| 7a 28 61 64 64 72 65 73 | 73 25 2c 74 65 78 74 24 |z(addres|s%,text$|
|00002340| 2c 6c 65 6e 25 29 0d 0e | e2 1a 74 65 78 74 24 3d |,len%)..|..text$=|
|00002350| 4c 45 46 54 28 74 65 78 | 74 24 2c 6c 65 6e 25 29 |LEFT(tex|t$,len%)|
|00002360| 0d 0e ec 18 e3 20 6c 6f | 6f 70 25 3d 31 20 b8 20 |..... lo|op%=1 . |
|00002370| a9 28 74 65 78 74 24 29 | 0d 0e f6 2a 3f 28 61 64 |.(text$)|...*?(ad|
|00002380| 64 72 65 73 73 25 2b 6c | 6f 6f 70 25 2d 31 29 3d |dress%+l|oop%-1)=|
|00002390| 97 28 c1 74 65 78 74 24 | 2c 6c 6f 6f 70 25 2c 31 |.(.text$|,loop%,1|
|000023a0| 29 29 0d 0f 00 05 ed 0d | 0f 0a 16 e7 20 a9 28 74 |))......|.... .(t|
|000023b0| 65 78 74 24 29 3c 3e 6c | 65 6e 25 20 8c 0d 0f 14 |ext$)<>l|en% ....|
|000023c0| 1f 20 20 e3 20 6c 6f 6f | 70 25 3d a9 28 74 65 78 |. . loo|p%=.(tex|
|000023d0| 74 24 29 20 b8 20 6c 65 | 6e 25 2d 31 0d 0f 1e 19 |t$) . le|n%-1....|
|000023e0| 20 20 3f 28 61 64 64 72 | 65 73 73 25 2b 6c 6f 6f | ?(addr|ess%+loo|
|000023f0| 70 25 29 3d 30 0d 0f 28 | 07 20 20 ed 0d 0f 32 05 |p%)=0..(|. ...2.|
|00002400| cd 0d 0f 3c 05 e1 0d 0f | 46 04 0d 0f 50 18 dd a4 |...<....|F...P...|
|00002410| 77 61 72 6e 69 6e 67 5f | 62 6f 78 28 74 65 78 74 |warning_|box(text|
|00002420| 24 29 0d 0f 5a 0d ea 20 | 72 65 74 75 72 6e 25 0d |$)..Z.. |return%.|
|00002430| 0f 64 10 62 6c 6f 63 6b | 25 21 35 31 32 3d 30 0d |.d.block|%!512=0.|
|00002440| 0f 6e 17 24 28 62 6c 6f | 63 6b 25 2b 35 31 36 29 |.n.$(blo|ck%+516)|
|00002450| 3d 74 65 78 74 24 0d 0f | 78 51 c8 99 20 22 57 69 |=text$..|xQ.. "Wi|
|00002460| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|00002470| 62 6c 6f 63 6b 25 2b 32 | 35 36 2c 25 31 30 31 31 |block%+2|56,%1011|
|00002480| 31 2c 22 4d 65 73 73 61 | 67 65 20 66 72 6f 6d 3a |1,"Messa|ge from:|
|00002490| 20 22 2b 70 72 6f 67 6e | 61 6d 65 24 20 b8 20 2c | "+progn|ame$ . ,|
|000024a0| 72 65 74 75 72 6e 25 0d | 0f 82 14 e7 20 72 65 74 |return%.|.... ret|
|000024b0| 75 72 6e 25 3d 31 20 8c | 20 3d b9 0d 0f 8c 06 3d |urn%=1 .| =.....=|
|000024c0| a3 0d 0f 96 04 0d 0f a0 | 1e dd a4 69 63 6f 6e 62 |........|...iconb|
|000024d0| 61 72 5f 69 6e 73 74 61 | 6c 6c 28 73 70 72 69 74 |ar_insta|ll(sprit|
|000024e0| 65 24 29 0d 0f aa 0d ea | 20 68 61 6e 64 6c 65 25 |e$).....| handle%|
|000024f0| 0d 0f b4 0e 21 62 6c 6f | 63 6b 25 3d 2d 31 0d 0f |....!blo|ck%=-1..|
|00002500| be 0e 62 6c 6f 63 6b 25 | 21 34 3d 30 0d 0f c8 0e |..block%|!4=0....|
|00002510| 62 6c 6f 63 6b 25 21 38 | 3d 30 0d 0f d2 10 62 6c |block%!8|=0....bl|
|00002520| 6f 63 6b 25 21 31 32 3d | 36 38 0d 0f dc 10 62 6c |ock%!12=|68....bl|
|00002530| 6f 63 6b 25 21 31 36 3d | 36 38 0d 0f e6 13 62 6c |ock%!16=|68....bl|
|00002540| 6f 63 6b 25 21 32 30 3d | 26 33 30 30 32 0d 0f f0 |ock%!20=|&3002...|
|00002550| 18 24 28 62 6c 6f 63 6b | 25 2b 32 34 29 3d 73 70 |.$(block|%+24)=sp|
|00002560| 72 69 74 65 24 0d 0f fa | 2a c8 99 20 22 57 69 6d |rite$...|*.. "Wim|
|00002570| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 62 |p_Create|Icon",,b|
|00002580| 6c 6f 63 6b 25 20 b8 20 | 68 61 6e 64 6c 65 25 0d |lock% . |handle%.|
|00002590| 10 04 0c 3d 68 61 6e 64 | 6c 65 25 0d 10 0e 04 0d |...=hand|le%.....|
|000025a0| 10 18 19 dd f2 6d 65 6d | 6f 72 79 5f 62 61 63 6b |.....mem|ory_back|
|000025b0| 28 74 6f 74 61 6c 25 29 | 0d 10 22 25 ea 20 70 61 |(total%)|.."%. pa|
|000025c0| 67 65 5f 73 69 7a 65 25 | 2c 66 72 65 65 5f 6d 65 |ge_size%|,free_me|
|000025d0| 6d 25 2c 73 6c 6f 74 5f | 73 69 7a 65 25 0d 10 2c |m%,slot_|size%..,|
|000025e0| 27 c8 99 20 22 4f 53 5f | 52 65 61 64 4d 65 6d 4d |'.. "OS_|ReadMemM|
|000025f0| 61 70 49 6e 66 6f 22 20 | b8 20 70 61 67 65 5f 73 |apInfo" |. page_s|
|00002600| 69 7a 65 25 0d 10 36 0f | c8 95 20 74 6f 74 61 6c |ize%..6.|.. total|
|00002610| 25 3e 30 0d 10 40 29 c8 | 99 20 22 57 69 6d 70 5f |%>0..@).|. "Wimp_|
|00002620| 53 6c 6f 74 53 69 7a 65 | 22 2c 2d 31 2c 2d 31 20 |SlotSize|",-1,-1 |
|00002630| b8 20 73 6c 6f 74 5f 73 | 69 7a 65 25 0d 10 4a 2f |. slot_s|ize%..J/|
|00002640| c8 99 20 22 57 69 6d 70 | 5f 53 6c 6f 74 53 69 7a |.. "Wimp|_SlotSiz|
|00002650| 65 22 2c 73 6c 6f 74 5f | 73 69 7a 65 25 2d 70 61 |e",slot_|size%-pa|
|00002660| 67 65 5f 73 69 7a 65 25 | 2c 2d 31 0d 10 54 16 74 |ge_size%|,-1..T.t|
|00002670| 6f 74 61 6c 25 2d 3d 70 | 61 67 65 5f 73 69 7a 65 |otal%-=p|age_size|
|00002680| 25 0d 10 5e 05 ce 0d 10 | 68 05 e1 0d 10 72 04 0d |%..^....|h....r..|
|00002690| 10 7c 25 dd a4 61 64 64 | 5f 6d 65 6d 6f 72 79 28 |.|%..add|_memory(|
|000026a0| 61 6d 6d 6f 75 6e 74 25 | 2c f8 20 61 64 64 72 65 |ammount%|,. addre|
|000026b0| 73 73 25 29 0d 10 86 2c | ea 20 70 61 67 65 5f 73 |ss%)...,|. page_s|
|000026c0| 69 7a 65 25 2c 66 72 65 | 65 5f 6d 65 6d 25 2c 73 |ize%,fre|e_mem%,s|
|000026d0| 6c 6f 74 5f 73 69 7a 65 | 25 2c 74 6f 74 61 6c 25 |lot_size|%,total%|
|000026e0| 0d 10 90 27 c8 99 20 22 | 4f 53 5f 52 65 61 64 4d |...'.. "|OS_ReadM|
|000026f0| 65 6d 4d 61 70 49 6e 66 | 6f 22 20 b8 20 70 61 67 |emMapInf|o" . pag|
|00002700| 65 5f 73 69 7a 65 25 0d | 10 9a 29 c8 99 20 22 4f |e_size%.|..).. "O|
|00002710| 53 5f 43 68 61 6e 67 65 | 45 6e 76 69 72 6f 6e 6d |S_Change|Environm|
|00002720| 65 6e 74 22 20 b8 20 2c | 61 64 64 72 65 73 73 25 |ent" . ,|address%|
|00002730| 0d 10 a4 11 c8 95 20 61 | 6d 6d 6f 75 6e 74 25 3e |...... a|mmount%>|
|00002740| 30 0d 10 ae 34 c8 99 20 | 22 57 69 6d 70 5f 53 6c |0...4.. |"Wimp_Sl|
|00002750| 6f 74 53 69 7a 65 22 2c | 2d 31 2c 2d 31 20 b8 20 |otSize",|-1,-1 . |
|00002760| 73 6c 6f 74 5f 73 69 7a | 65 25 2c 2c 66 72 65 65 |slot_siz|e%,,free|
|00002770| 5f 6d 65 6d 25 0d 10 b8 | 58 e7 20 66 72 65 65 5f |_mem%...|X. free_|
|00002780| 6d 65 6d 25 3d 30 20 8c | 20 f2 65 72 72 6f 72 28 |mem%=0 .| .error(|
|00002790| 22 54 68 65 72 65 20 61 | 72 65 20 70 72 6f 62 6c |"There a|re probl|
|000027a0| 65 6d 73 20 77 69 74 68 | 20 67 65 74 74 69 6e 67 |ems with| getting|
|000027b0| 20 6d 6f 72 65 20 6d 65 | 6d 6f 72 79 20 66 6f 72 | more me|mory for|
|000027c0| 20 22 2b 70 72 6f 67 6e | 61 6d 65 24 29 0d 10 c2 | "+progn|ame$)...|
|000027d0| 2f c8 99 20 22 57 69 6d | 70 5f 53 6c 6f 74 53 69 |/.. "Wim|p_SlotSi|
|000027e0| 7a 65 22 2c 73 6c 6f 74 | 5f 73 69 7a 65 25 2b 70 |ze",slot|_size%+p|
|000027f0| 61 67 65 5f 73 69 7a 65 | 25 2c 2d 31 0d 10 cc 18 |age_size|%,-1....|
|00002800| 61 6d 6d 6f 75 6e 74 25 | 2d 3d 70 61 67 65 5f 73 |ammount%|-=page_s|
|00002810| 69 7a 65 25 0d 10 d6 16 | 74 6f 74 61 6c 25 2b 3d |ize%....|total%+=|
|00002820| 70 61 67 65 5f 73 69 7a | 65 25 0d 10 e0 05 ce 0d |page_siz|e%......|
|00002830| 10 ea 0b 3d 74 6f 74 61 | 6c 25 0d 10 f4 04 0d 10 |...=tota|l%......|
|00002840| fe 1d dd a4 66 69 6c 65 | 5f 74 6f 5f 6c 65 61 66 |....file|_to_leaf|
|00002850| 28 66 69 6c 65 6e 61 6d | 65 24 29 0d 11 08 0f ea |(filenam|e$).....|
|00002860| 20 6c 65 61 66 6e 61 6d | 65 24 0d 11 12 2b c8 95 | leafnam|e$...+..|
|00002870| 20 a9 28 66 69 6c 65 6e | 61 6d 65 24 29 3c 3e 30 | .(filen|ame$)<>0|
|00002880| 20 80 20 c2 66 69 6c 65 | 6e 61 6d 65 24 2c 31 29 | . .file|name$,1)|
|00002890| 3c 3e 22 2e 22 0d 11 1c | 23 6c 65 61 66 6e 61 6d |<>"."...|#leafnam|
|000028a0| 65 24 3d c2 66 69 6c 65 | 6e 61 6d 65 24 29 2b 6c |e$=.file|name$)+l|
|000028b0| 65 61 66 6e 61 6d 65 24 | 0d 11 26 19 66 69 6c 65 |eafname$|..&.file|
|000028c0| 6e 61 6d 65 24 3d c0 66 | 69 6c 65 6e 61 6d 65 24 |name$=.f|ilename$|
|000028d0| 29 0d 11 30 05 ce 0d 11 | 3a 0e 3d 6c 65 61 66 6e |)..0....|:.=leafn|
|000028e0| 61 6d 65 24 0d ff | |ame$.. | |
+--------+-------------------------+-------------------------+--------+--------+
