home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1991-04-27 | 12.3 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 10%
| dexvert
| Truevision Targa Graphic (image/tga)
| magic
| Supported |
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 20 f4 20 3e 20 | 3c 43 43 6f 6d 70 69 6c |... . > |<CCompil|
|00000010| 65 24 44 69 72 3e 2e 21 | 52 75 6e 49 6d 61 67 65 |e$Dir>.!|RunImage|
|00000020| 0d 00 14 2b f4 20 44 65 | 73 6b 74 6f 70 20 46 72 |...+. De|sktop Fr|
|00000030| 6f 6e 74 2d 45 6e 64 20 | 66 6f 72 20 41 4e 53 49 |ont-End |for ANSI|
|00000040| 20 43 20 43 6f 6d 70 69 | 6c 65 72 0d 00 1e 1e f4 | C Compi|ler.....|
|00000050| 20 28 43 29 20 57 61 6c | 74 68 65 72 20 53 63 68 | (C) Wal|ther Sch|
|00000060| 6f 6f 6e 65 6e 62 65 72 | 67 0d 00 28 05 3a 0d 00 |oonenber|g..(.:..|
|00000070| 32 35 70 72 6f 67 72 61 | 6d 24 3d 22 43 43 6f 6d |25progra|m$="CCom|
|00000080| 70 69 6c 65 22 3a 76 65 | 72 73 69 6f 6e 24 3d 22 |pile":ve|rsion$="|
|00000090| 31 2e 32 30 20 28 32 37 | 2d 41 70 72 2d 31 39 39 |1.20 (27|-Apr-199|
|000000a0| 31 29 22 0d 00 3c 05 3a | 0d 00 46 09 f2 69 6e 69 |1)"..<.:|..F..ini|
|000000b0| 74 0d 00 50 1e 6d 61 73 | 6b 25 3d 28 31 3c 3c 35 |t..P.mas|k%=(1<<5|
|000000c0| 29 2b 28 31 3c 3c 34 29 | 2b 28 31 3c 3c 30 29 0d |)+(1<<4)|+(1<<0).|
|000000d0| 00 5a 0b 71 75 69 74 25 | 3d a3 0d 00 64 05 f5 0d |.Z.quit%|=...d...|
|000000e0| 00 6e 2f 20 20 c8 99 20 | 22 57 69 6d 70 5f 50 6f |.n/ .. |"Wimp_Po|
|000000f0| 6c 6c 22 2c 6d 61 73 6b | 25 2c 71 25 20 b8 20 72 |ll",mask|%,q% . r|
|00000100| 65 61 73 6f 6e 25 2c 6f | 66 66 73 65 74 25 0d 00 |eason%,o|ffset%..|
|00000110| 78 12 20 20 c8 8e 20 72 | 65 61 73 6f 6e 25 20 ca |x. .. r|eason% .|
|00000120| 0d 00 82 44 20 20 c9 20 | 32 3a 20 f2 6f 70 65 6e |...D . |2: .open|
|00000130| 5f 77 69 6e 64 6f 77 28 | 21 71 25 2c 71 25 21 34 |_window(|!q%,q%!4|
|00000140| 2c 71 25 21 38 2c 71 25 | 21 31 32 2c 71 25 21 31 |,q%!8,q%|!12,q%!1|
|00000150| 36 2c 71 25 21 32 30 2c | 71 25 21 32 34 2c 71 25 |6,q%!20,|q%!24,q%|
|00000160| 21 32 38 29 0d 00 8c 1d | 20 20 c9 20 33 3a 20 f2 |!28)....| . 3: .|
|00000170| 63 6c 6f 73 65 5f 77 69 | 6e 64 6f 77 28 21 71 25 |close_wi|ndow(!q%|
|00000180| 29 0d 00 96 38 20 20 c9 | 20 36 3a 20 f2 6d 6f 75 |)...8 .| 6: .mou|
|00000190| 73 65 5f 63 6c 69 63 6b | 28 21 71 25 2c 71 25 21 |se_click|(!q%,q%!|
|000001a0| 34 2c 71 25 21 38 2c 71 | 25 21 31 32 2c 71 25 21 |4,q%!8,q|%!12,q%!|
|000001b0| 31 36 2c 71 25 21 32 30 | 29 0d 00 a0 25 20 20 c9 |16,q%!20|)...% .|
|000001c0| 20 38 3a 20 f2 6b 65 79 | 5f 70 72 65 73 73 28 21 | 8: .key|_press(!|
|000001d0| 71 25 2c 71 25 21 34 2c | 71 25 21 32 34 29 0d 00 |q%,q%!4,|q%!24)..|
|000001e0| aa 17 20 20 c9 20 39 3a | 20 f2 6d 65 6e 75 5f 73 |.. . 9:| .menu_s|
|000001f0| 65 6c 65 63 74 0d 00 b4 | 24 20 20 c9 20 31 37 2c |elect...|$ . 17,|
|00000200| 31 38 3a 20 f2 72 65 63 | 65 69 76 65 28 71 25 21 |18: .rec|eive(q%!|
|00000210| 31 32 2c 71 25 21 31 36 | 29 0d 00 be 05 cb 0d 00 |12,q%!16|).......|
|00000220| c8 0b fd 20 71 75 69 74 | 25 0d 00 d2 17 c8 99 20 |... quit|%...... |
|00000230| 22 57 69 6d 70 5f 43 6c | 6f 73 65 44 6f 77 6e 22 |"Wimp_Cl|oseDown"|
|00000240| 0d 00 dc 05 e0 0d 00 e6 | 05 3a 0d 00 f0 13 dd 20 |........|.:..... |
|00000250| f2 6c 6f 61 64 5f 6f 70 | 74 69 6f 6e 73 0d 00 fa |.load_op|tions...|
|00000260| 09 ea 20 69 64 25 0d 01 | 04 23 69 64 25 3d 8e 28 |.. id%..|.#id%=.(|
|00000270| 22 3c 43 43 6f 6d 70 69 | 6c 65 24 44 69 72 3e 2e |"<CCompi|le$Dir>.|
|00000280| 4f 70 74 69 6f 6e 73 22 | 29 0d 01 0e 0d e7 20 69 |Options"|)..... i|
|00000290| 64 25 3d 30 20 e1 0d 01 | 18 29 e8 23 69 64 25 2c |d%=0 ...|.).#id%,|
|000002a0| 72 65 63 6f 72 64 24 3a | 24 63 6f 6d 70 69 6c 65 |record$:|$compile|
|000002b0| 72 5f 69 63 6f 6e 25 3d | 72 65 63 6f 72 64 24 0d |r_icon%=|record$.|
|000002c0| 01 22 29 e8 23 69 64 25 | 2c 72 65 63 6f 72 64 24 |.").#id%|,record$|
|000002d0| 3a 24 63 4c 69 62 72 6f | 6f 74 5f 69 63 6f 6e 25 |:$cLibro|ot_icon%|
|000002e0| 3d 72 65 63 6f 72 64 24 | 0d 01 2c 28 e8 23 69 64 |=record$|..,(.#id|
|000002f0| 25 2c 72 65 63 6f 72 64 | 24 3a 24 69 6e 63 6c 75 |%,record|$:$inclu|
|00000300| 64 65 5f 69 63 6f 6e 25 | 3d 72 65 63 6f 72 64 24 |de_icon%|=record$|
|00000310| 0d 01 36 26 e8 23 69 64 | 25 2c 72 65 63 6f 72 64 |..6&.#id|%,record|
|00000320| 24 3a 24 69 6d 61 67 65 | 5f 69 63 6f 6e 25 3d 72 |$:$image|_icon%=r|
|00000330| 65 63 6f 72 64 24 0d 01 | 40 27 e8 23 69 64 25 2c |ecord$..|@'.#id%,|
|00000340| 72 65 63 6f 72 64 24 3a | 24 65 72 72 6f 72 73 5f |record$:|$errors_|
|00000350| 69 63 6f 6e 25 3d 72 65 | 63 6f 72 64 24 0d 01 4a |icon%=re|cord$..J|
|00000360| 28 e8 23 69 64 25 2c 72 | 65 63 6f 72 64 24 3a 24 |(.#id%,r|ecord$:$|
|00000370| 6c 69 62 72 61 72 79 5f | 69 63 6f 6e 25 3d 72 65 |library_|icon%=re|
|00000380| 63 6f 72 64 24 0d 01 54 | 24 e8 23 69 64 25 2c 72 |cord$..T|$.#id%,r|
|00000390| 65 63 6f 72 64 24 3a 24 | 76 69 61 5f 69 63 6f 6e |ecord$:$|via_icon|
|000003a0| 25 3d 72 65 63 6f 72 64 | 24 0d 01 5e 55 e8 23 69 |%=record|$..^U.#i|
|000003b0| 64 25 2c 72 65 63 6f 72 | 64 24 3a e7 20 72 65 63 |d%,recor|d$:. rec|
|000003c0| 6f 72 64 24 3d 22 30 22 | 20 f2 63 6c 65 61 72 5f |ord$="0"| .clear_|
|000003d0| 62 75 74 74 6f 6e 28 6f | 70 74 69 6f 6e 73 25 2c |button(o|ptions%,|
|000003e0| 20 34 29 20 8b 20 f2 73 | 65 74 5f 62 75 74 74 6f | 4) . .s|et_butto|
|000003f0| 6e 28 6f 70 74 69 6f 6e | 73 25 2c 20 34 29 0d 01 |n(option|s%, 4)..|
|00000400| 68 55 e8 23 69 64 25 2c | 72 65 63 6f 72 64 24 3a |hU.#id%,|record$:|
|00000410| e7 20 72 65 63 6f 72 64 | 24 3d 22 30 22 20 f2 63 |. record|$="0" .c|
|00000420| 6c 65 61 72 5f 62 75 74 | 74 6f 6e 28 6f 70 74 69 |lear_but|ton(opti|
|00000430| 6f 6e 73 25 2c 20 38 29 | 20 8b 20 f2 73 65 74 5f |ons%, 8)| . .set_|
|00000440| 62 75 74 74 6f 6e 28 6f | 70 74 69 6f 6e 73 25 2c |button(o|ptions%,|
|00000450| 20 38 29 0d 01 72 55 e8 | 23 69 64 25 2c 72 65 63 | 8)..rU.|#id%,rec|
|00000460| 6f 72 64 24 3a e7 20 72 | 65 63 6f 72 64 24 3d 22 |ord$:. r|ecord$="|
|00000470| 30 22 20 f2 63 6c 65 61 | 72 5f 62 75 74 74 6f 6e |0" .clea|r_button|
|00000480| 28 6f 70 74 69 6f 6e 73 | 25 2c 20 39 29 20 8b 20 |(options|%, 9) . |
|00000490| f2 73 65 74 5f 62 75 74 | 74 6f 6e 28 6f 70 74 69 |.set_but|ton(opti|
|000004a0| 6f 6e 73 25 2c 20 39 29 | 0d 01 7c 55 e8 23 69 64 |ons%, 9)|..|U.#id|
|000004b0| 25 2c 72 65 63 6f 72 64 | 24 3a e7 20 72 65 63 6f |%,record|$:. reco|
|000004c0| 72 64 24 3d 22 30 22 20 | f2 63 6c 65 61 72 5f 62 |rd$="0" |.clear_b|
|000004d0| 75 74 74 6f 6e 28 6f 70 | 74 69 6f 6e 73 25 2c 31 |utton(op|tions%,1|
|000004e0| 30 29 20 8b 20 f2 73 65 | 74 5f 62 75 74 74 6f 6e |0) . .se|t_button|
|000004f0| 28 6f 70 74 69 6f 6e 73 | 25 2c 31 30 29 0d 01 86 |(options|%,10)...|
|00000500| 55 e8 23 69 64 25 2c 72 | 65 63 6f 72 64 24 3a e7 |U.#id%,r|ecord$:.|
|00000510| 20 72 65 63 6f 72 64 24 | 3d 22 30 22 20 f2 63 6c | record$|="0" .cl|
|00000520| 65 61 72 5f 62 75 74 74 | 6f 6e 28 6f 70 74 69 6f |ear_butt|on(optio|
|00000530| 6e 73 25 2c 32 34 29 20 | 8b 20 f2 73 65 74 5f 62 |ns%,24) |. .set_b|
|00000540| 75 74 74 6f 6e 28 6f 70 | 74 69 6f 6e 73 25 2c 32 |utton(op|tions%,2|
|00000550| 34 29 0d 01 90 55 e8 23 | 69 64 25 2c 72 65 63 6f |4)...U.#|id%,reco|
|00000560| 72 64 24 3a e7 20 72 65 | 63 6f 72 64 24 3d 22 30 |rd$:. re|cord$="0|
|00000570| 22 20 f2 63 6c 65 61 72 | 5f 62 75 74 74 6f 6e 28 |" .clear|_button(|
|00000580| 6f 70 74 69 6f 6e 73 25 | 2c 32 35 29 20 8b 20 f2 |options%|,25) . .|
|00000590| 73 65 74 5f 62 75 74 74 | 6f 6e 28 6f 70 74 69 6f |set_butt|on(optio|
|000005a0| 6e 73 25 2c 32 35 29 0d | 01 9a 09 d9 23 69 64 25 |ns%,25).|....#id%|
|000005b0| 0d 01 a4 05 e1 0d 01 ae | 05 3a 0d 01 b8 13 dd 20 |........|.:..... |
|000005c0| f2 73 61 76 65 5f 6f 70 | 74 69 6f 6e 73 0d 01 c2 |.save_op|tions...|
|000005d0| 09 ea 20 69 64 25 0d 01 | cc 23 69 64 25 3d ae 28 |.. id%..|.#id%=.(|
|000005e0| 22 3c 43 43 6f 6d 70 69 | 6c 65 24 44 69 72 3e 2e |"<CCompi|le$Dir>.|
|000005f0| 4f 70 74 69 6f 6e 73 22 | 29 0d 01 d6 19 f1 23 69 |Options"|).....#i|
|00000600| 64 25 2c 24 63 6f 6d 70 | 69 6c 65 72 5f 69 63 6f |d%,$comp|iler_ico|
|00000610| 6e 25 0d 01 e0 19 f1 23 | 69 64 25 2c 24 63 4c 69 |n%.....#|id%,$cLi|
|00000620| 62 72 6f 6f 74 5f 69 63 | 6f 6e 25 0d 01 ea 18 f1 |broot_ic|on%.....|
|00000630| 23 69 64 25 2c 24 69 6e | 63 6c 75 64 65 5f 69 63 |#id%,$in|clude_ic|
|00000640| 6f 6e 25 0d 01 f4 16 f1 | 23 69 64 25 2c 24 69 6d |on%.....|#id%,$im|
|00000650| 61 67 65 5f 69 63 6f 6e | 25 0d 01 fe 17 f1 23 69 |age_icon|%.....#i|
|00000660| 64 25 2c 24 65 72 72 6f | 72 73 5f 69 63 6f 6e 25 |d%,$erro|rs_icon%|
|00000670| 0d 02 08 18 f1 23 69 64 | 25 2c 24 6c 69 62 72 61 |.....#id|%,$libra|
|00000680| 72 79 5f 69 63 6f 6e 25 | 0d 02 12 14 f1 23 69 64 |ry_icon%|.....#id|
|00000690| 25 2c 24 76 69 61 5f 69 | 63 6f 6e 25 0d 02 1c 34 |%,$via_i|con%...4|
|000006a0| e7 20 a4 67 65 74 5f 62 | 75 74 74 6f 6e 28 6f 70 |. .get_b|utton(op|
|000006b0| 74 69 6f 6e 73 25 2c 20 | 34 29 20 f1 23 69 64 25 |tions%, |4) .#id%|
|000006c0| 2c 22 31 22 20 8b 20 f1 | 23 69 64 25 2c 22 30 22 |,"1" . .|#id%,"0"|
|000006d0| 0d 02 26 34 e7 20 a4 67 | 65 74 5f 62 75 74 74 6f |..&4. .g|et_butto|
|000006e0| 6e 28 6f 70 74 69 6f 6e | 73 25 2c 20 38 29 20 f1 |n(option|s%, 8) .|
|000006f0| 23 69 64 25 2c 22 31 22 | 20 8b 20 f1 23 69 64 25 |#id%,"1"| . .#id%|
|00000700| 2c 22 30 22 0d 02 30 34 | e7 20 a4 67 65 74 5f 62 |,"0"..04|. .get_b|
|00000710| 75 74 74 6f 6e 28 6f 70 | 74 69 6f 6e 73 25 2c 20 |utton(op|tions%, |
|00000720| 39 29 20 f1 23 69 64 25 | 2c 22 31 22 20 8b 20 f1 |9) .#id%|,"1" . .|
|00000730| 23 69 64 25 2c 22 30 22 | 0d 02 3a 34 e7 20 a4 67 |#id%,"0"|..:4. .g|
|00000740| 65 74 5f 62 75 74 74 6f | 6e 28 6f 70 74 69 6f 6e |et_butto|n(option|
|00000750| 73 25 2c 31 30 29 20 f1 | 23 69 64 25 2c 22 31 22 |s%,10) .|#id%,"1"|
|00000760| 20 8b 20 f1 23 69 64 25 | 2c 22 30 22 0d 02 44 34 | . .#id%|,"0"..D4|
|00000770| e7 20 a4 67 65 74 5f 62 | 75 74 74 6f 6e 28 6f 70 |. .get_b|utton(op|
|00000780| 74 69 6f 6e 73 25 2c 32 | 34 29 20 f1 23 69 64 25 |tions%,2|4) .#id%|
|00000790| 2c 22 31 22 20 8b 20 f1 | 23 69 64 25 2c 22 30 22 |,"1" . .|#id%,"0"|
|000007a0| 0d 02 4e 34 e7 20 a4 67 | 65 74 5f 62 75 74 74 6f |..N4. .g|et_butto|
|000007b0| 6e 28 6f 70 74 69 6f 6e | 73 25 2c 32 35 29 20 f1 |n(option|s%,25) .|
|000007c0| 23 69 64 25 2c 22 31 22 | 20 8b 20 f1 23 69 64 25 |#id%,"1"| . .#id%|
|000007d0| 2c 22 30 22 0d 02 58 09 | d9 23 69 64 25 0d 02 62 |,"0"..X.|.#id%..b|
|000007e0| 05 e1 0d 02 6c 05 3a 0d | 02 76 0b dd 20 f2 69 6e |....l.:.|.v.. .in|
|000007f0| 69 74 0d 02 80 1e de 20 | 74 61 73 6b 69 64 25 34 |it..... |taskid%4|
|00000800| 3a 24 74 61 73 6b 69 64 | 25 3d 22 54 41 53 4b 22 |:$taskid|%="TASK"|
|00000810| 0d 02 8a 41 c8 99 20 22 | 57 69 6d 70 5f 49 6e 69 |...A.. "|Wimp_Ini|
|00000820| 74 69 61 6c 69 73 65 22 | 2c 32 30 30 2c 21 74 61 |tialise"|,200,!ta|
|00000830| 73 6b 69 64 25 2c 22 43 | 43 6f 6d 70 69 6c 65 22 |skid%,"C|Compile"|
|00000840| 20 b8 20 76 65 72 73 69 | 6f 6e 25 2c 74 61 73 6b | . versi|on%,task|
|00000850| 25 0d 02 94 18 de 20 62 | 6c 6f 63 6b 25 20 32 30 |%..... b|lock% 20|
|00000860| 34 38 2c 71 25 20 32 35 | 35 0d 02 9e 2f 6d 61 78 |48,q% 25|5.../max|
|00000870| 77 73 25 3d 26 31 30 30 | 30 3a de 20 77 73 25 20 |ws%=&100|0:. ws% |
|00000880| 6d 61 78 77 73 25 3a 77 | 73 65 6e 64 25 3d 77 73 |maxws%:w|send%=ws|
|00000890| 25 2b 6d 61 78 77 73 25 | 0d 02 a8 2f f4 20 77 6f |%+maxws%|.../. wo|
|000008a0| 72 6b 73 70 61 63 65 20 | 66 6f 72 20 69 6e 64 69 |rkspace |for indi|
|000008b0| 72 65 63 74 65 64 20 69 | 63 6f 6e 73 20 69 6e 20 |rected i|cons in |
|000008c0| 77 69 6e 64 6f 77 73 0d | 02 b2 36 c8 99 20 22 57 |windows.|..6.. "W|
|000008d0| 69 6d 70 5f 4f 70 65 6e | 54 65 6d 70 6c 61 74 65 |imp_Open|Template|
|000008e0| 22 2c 2c 22 3c 43 43 6f | 6d 70 69 6c 65 24 44 69 |",,"<CCo|mpile$Di|
|000008f0| 72 3e 2e 54 65 6d 70 6c | 61 74 65 73 22 0d 02 bc |r>.Templ|ates"...|
|00000900| 2b ee 20 85 20 c8 99 20 | 22 57 69 6d 70 5f 43 6c |+. . .. |"Wimp_Cl|
|00000910| 6f 73 65 54 65 6d 70 6c | 61 74 65 22 3a f2 65 72 |oseTempl|ate":.er|
|00000920| 72 6f 72 62 6f 78 3a e0 | 0d 02 c6 41 c8 99 20 22 |rorbox:.|...A.. "|
|00000930| 57 69 6d 70 5f 4c 6f 61 | 64 54 65 6d 70 6c 61 74 |Wimp_Loa|dTemplat|
|00000940| 65 22 2c 2c 62 6c 6f 63 | 6b 25 2c 77 73 25 2c 77 |e",,bloc|k%,ws%,w|
|00000950| 73 65 6e 64 25 2c 2d 31 | 2c 22 69 6e 66 6f 22 2c |send%,-1|,"info",|
|00000960| 30 20 b8 20 2c 2c 77 73 | 25 0d 02 d0 2a c8 99 20 |0 . ,,ws|%...*.. |
|00000970| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 57 69 6e 64 |"Wimp_Cr|eateWind|
|00000980| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 20 b8 20 69 6e |ow",,blo|ck% . in|
|00000990| 66 6f 25 0d 02 da 3c 76 | 65 72 73 69 6f 6e 5f 69 |fo%...<v|ersion_i|
|000009a0| 63 6f 6e 25 3d a4 69 63 | 6f 6e 61 64 64 72 28 69 |con%=.ic|onaddr(i|
|000009b0| 6e 66 6f 25 2c 34 29 3a | 24 76 65 72 73 69 6f 6e |nfo%,4):|$version|
|000009c0| 5f 69 63 6f 6e 25 3d 76 | 65 72 73 69 6f 6e 24 0d |_icon%=v|ersion$.|
|000009d0| 02 e4 44 c8 99 20 22 57 | 69 6d 70 5f 4c 6f 61 64 |..D.. "W|imp_Load|
|000009e0| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |Template|",,block|
|000009f0| 25 2c 77 73 25 2c 77 73 | 65 6e 64 25 2c 2d 31 2c |%,ws%,ws|end%,-1,|
|00000a00| 22 6f 70 74 69 6f 6e 73 | 22 2c 30 20 b8 20 2c 2c |"options|",0 . ,,|
|00000a10| 77 73 25 0d 02 ee 2d c8 | 99 20 22 57 69 6d 70 5f |ws%...-.|. "Wimp_|
|00000a20| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |CreateWi|ndow",,b|
|00000a30| 6c 6f 63 6b 25 20 b8 20 | 6f 70 74 69 6f 6e 73 25 |lock% . |options%|
|00000a40| 0d 02 f8 29 63 6f 6d 70 | 69 6c 65 72 5f 69 63 6f |...)comp|iler_ico|
|00000a50| 6e 25 3d a4 69 63 6f 6e | 61 64 64 72 28 6f 70 74 |n%=.icon|addr(opt|
|00000a60| 69 6f 6e 73 25 2c 31 38 | 29 0d 03 02 28 69 6e 63 |ions%,18|)...(inc|
|00000a70| 6c 75 64 65 5f 69 63 6f | 6e 25 3d a4 69 63 6f 6e |lude_ico|n%=.icon|
|00000a80| 61 64 64 72 28 6f 70 74 | 69 6f 6e 73 25 2c 32 33 |addr(opt|ions%,23|
|00000a90| 29 0d 03 0c 29 63 4c 69 | 62 72 6f 6f 74 5f 69 63 |)...)cLi|broot_ic|
|00000aa0| 6f 6e 25 3d a4 69 63 6f | 6e 61 64 64 72 28 6f 70 |on%=.ico|naddr(op|
|00000ab0| 74 69 6f 6e 73 25 2c 32 | 31 29 0d 03 16 25 69 6d |tions%,2|1)...%im|
|00000ac0| 61 67 65 5f 69 63 6f 6e | 25 3d a4 69 63 6f 6e 61 |age_icon|%=.icona|
|00000ad0| 64 64 72 28 6f 70 74 69 | 6f 6e 73 25 2c 36 29 0d |ddr(opti|ons%,6).|
|00000ae0| 03 20 26 65 72 72 6f 72 | 73 5f 69 63 6f 6e 25 3d |. &error|s_icon%=|
|00000af0| a4 69 63 6f 6e 61 64 64 | 72 28 6f 70 74 69 6f 6e |.iconadd|r(option|
|00000b00| 73 25 2c 32 29 0d 03 2a | 28 6c 69 62 72 61 72 79 |s%,2)..*|(library|
|00000b10| 5f 69 63 6f 6e 25 3d a4 | 69 63 6f 6e 61 64 64 72 |_icon%=.|iconaddr|
|00000b20| 28 6f 70 74 69 6f 6e 73 | 25 2c 31 32 29 0d 03 34 |(options|%,12)..4|
|00000b30| 24 76 69 61 5f 69 63 6f | 6e 25 3d a4 69 63 6f 6e |$via_ico|n%=.icon|
|00000b40| 61 64 64 72 28 6f 70 74 | 69 6f 6e 73 25 2c 31 33 |addr(opt|ions%,13|
|00000b50| 29 0d 03 3e 44 c8 99 20 | 22 57 69 6d 70 5f 4c 6f |)..>D.. |"Wimp_Lo|
|00000b60| 61 64 54 65 6d 70 6c 61 | 74 65 22 2c 2c 62 6c 6f |adTempla|te",,blo|
|00000b70| 63 6b 25 2c 77 73 25 2c | 77 73 65 6e 64 25 2c 2d |ck%,ws%,|wsend%,-|
|00000b80| 31 2c 22 6d 65 73 73 61 | 67 65 22 2c 30 20 b8 20 |1,"messa|ge",0 . |
|00000b90| 2c 2c 77 73 25 0d 03 48 | 2d c8 99 20 22 57 69 6d |,,ws%..H|-.. "Wim|
|00000ba0| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00000bb0| 2c 62 6c 6f 63 6b 25 20 | b8 20 6d 65 73 73 61 67 |,block% |. messag|
|00000bc0| 65 25 0d 03 52 27 6d 65 | 73 73 61 67 65 5f 69 63 |e%..R'me|ssage_ic|
|00000bd0| 6f 6e 25 3d a4 69 63 6f | 6e 61 64 64 72 28 6d 65 |on%=.ico|naddr(me|
|00000be0| 73 73 61 67 65 25 2c 30 | 29 0d 03 5c 1b c8 99 20 |ssage%,0|)..\... |
|00000bf0| 22 57 69 6d 70 5f 43 6c | 6f 73 65 54 65 6d 70 6c |"Wimp_Cl|oseTempl|
|00000c00| 61 74 65 22 0d 03 66 13 | ee 20 85 20 f2 65 72 72 |ate"..f.|. . .err|
|00000c10| 6f 72 62 6f 78 3a e0 0d | 03 70 11 f2 6c 6f 61 64 |orbox:..|.p..load|
|00000c20| 5f 6f 70 74 69 6f 6e 73 | 0d 03 7a 41 77 62 63 6f |_options|..zAwbco|
|00000c30| 6c 3d 30 3a 74 62 63 6f | 6c 3d 32 3a 73 63 6f 3d |l=0:tbco|l=2:sco=|
|00000c40| 33 3a 6d 62 63 6f 6c 3d | 32 3a 77 66 63 6f 6c 3d |3:mbcol=|2:wfcol=|
|00000c50| 37 3a 74 66 63 6f 6c 3d | 37 3a 73 63 69 3d 31 3a |7:tfcol=|7:sci=1:|
|00000c60| 74 62 63 6f 6c 32 3d 31 | 32 0d 03 84 16 6d 65 6e |tbcol2=1|2....men|
|00000c70| 75 62 6c 6f 63 6b 73 69 | 7a 65 25 3d 32 36 38 0d |ublocksi|ze%=268.|
|00000c80| 03 8e 0c 6e 6d 65 6e 75 | 25 3d 35 0d 03 98 1e de |...nmenu|%=5.....|
|00000c90| 20 69 63 6f 6e 6d 65 6e | 75 25 20 6d 65 6e 75 62 | iconmen|u% menub|
|00000ca0| 6c 6f 63 6b 73 69 7a 65 | 25 0d 03 a2 2c de 20 73 |locksize|%...,. s|
|00000cb0| 75 62 25 28 32 29 3a 73 | 75 62 25 28 31 29 3d 69 |ub%(2):s|ub%(1)=i|
|00000cc0| 6e 66 6f 25 3a 73 75 62 | 25 28 32 29 3d 6f 70 74 |nfo%:sub|%(2)=opt|
|00000cd0| 69 6f 6e 73 25 0d 03 ac | 5b f2 63 72 65 61 74 65 |ions%...|[.create|
|00000ce0| 5f 6d 65 6e 75 28 69 63 | 6f 6e 6d 65 6e 75 25 2c |_menu(ic|onmenu%,|
|00000cf0| 32 31 30 2c 70 72 6f 67 | 72 61 6d 24 2b 22 2c 21 |210,prog|ram$+",!|
|00000d00| 31 49 6e 66 6f 2c 21 32 | 4f 70 74 69 6f 6e 73 2c |1Info,!2|Options,|
|00000d10| 4c 6f 61 64 20 6f 70 74 | 69 6f 6e 73 2c 53 61 76 |Load opt|ions,Sav|
|00000d20| 65 20 6f 70 74 69 6f 6e | 73 2c 51 75 69 74 22 29 |e option|s,Quit")|
|00000d30| 0d 03 b6 12 69 63 6f 6e | 25 3d a4 69 63 6f 6e 62 |....icon|%=.iconb|
|00000d40| 61 72 0d 03 c0 05 e1 0d | 03 ca 05 3a 0d 03 d4 0e |ar......|...:....|
|00000d50| dd 20 a4 69 63 6f 6e 62 | 61 72 0d 03 de 4b 21 71 |. .iconb|ar...K!q|
|00000d60| 25 3d 2d 31 3a 71 25 21 | 34 3d 30 3a 71 25 21 38 |%=-1:q%!|4=0:q%!8|
|00000d70| 3d 30 3a 71 25 21 31 32 | 3d 36 39 3a 71 25 21 31 |=0:q%!12|=69:q%!1|
|00000d80| 36 3d 36 38 3a 71 25 21 | 32 30 3d 26 33 30 30 32 |6=68:q%!|20=&3002|
|00000d90| 3a 24 28 71 25 2b 32 34 | 29 3d 22 21 63 63 6f 6d |:$(q%+24|)="!ccom|
|00000da0| 70 69 6c 65 22 0d 03 e8 | 26 c8 99 20 22 57 69 6d |pile"...|&.. "Wim|
|00000db0| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 71 |p_Create|Icon",,q|
|00000dc0| 25 20 b8 20 68 61 6e 64 | 6c 65 25 0d 03 f2 0c 3d |% . hand|le%....=|
|00000dd0| 68 61 6e 64 6c 65 25 0d | 03 fc 05 3a 0d 04 06 16 |handle%.|...:....|
|00000de0| dd 20 a4 69 63 6f 6e 61 | 64 64 72 28 68 25 2c 69 |. .icona|ddr(h%,i|
|00000df0| 25 29 0d 04 10 2d 21 71 | 25 3d 68 25 3a 71 25 21 |%)...-!q|%=h%:q%!|
|00000e00| 34 3d 69 25 3a c8 99 20 | 22 57 69 6d 70 5f 47 65 |4=i%:.. |"Wimp_Ge|
|00000e10| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 71 25 0d |tIconSta|te",,q%.|
|00000e20| 04 1a 33 e7 20 28 71 25 | 21 32 34 20 80 20 26 31 |..3. (q%|!24 . &1|
|00000e30| 30 30 29 3d 30 20 85 20 | 30 2c 22 49 63 6f 6e 20 |00)=0 . |0,"Icon |
|00000e40| 69 73 20 6e 6f 74 20 69 | 6e 64 69 72 65 63 74 65 |is not i|ndirecte|
|00000e50| 64 22 0d 04 24 0a 3d 71 | 25 21 32 38 0d 04 2e 05 |d"..$.=q|%!28....|
|00000e60| 3a 0d 04 38 16 dd 20 f2 | 64 6f 5f 6d 65 6e 75 28 |:..8.. .|do_menu(|
|00000e70| 62 6c 6f 63 6b 25 29 0d | 04 42 10 6d 65 6e 75 25 |block%).|.B.menu%|
|00000e80| 3d 62 6c 6f 63 6b 25 0d | 04 4c 4c e7 20 6d 65 6e |=block%.|.LL. men|
|00000e90| 75 25 3d 69 63 6f 6e 6d | 65 6e 75 25 20 c8 99 20 |u%=iconm|enu% .. |
|00000ea0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00000eb0| 22 2c 2c 62 6c 6f 63 6b | 25 2c 6d 6f 75 73 65 78 |",,block|%,mousex|
|00000ec0| 25 2d 36 34 2c 39 36 2b | 6e 6d 65 6e 75 25 2a 34 |%-64,96+|nmenu%*4|
|00000ed0| 34 3a e1 0d 04 56 36 c8 | 99 20 22 57 69 6d 70 5f |4:...V6.|. "Wimp_|
|00000ee0| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 62 6c 6f |CreateMe|nu",,blo|
|00000ef0| 63 6b 25 2c 6d 6f 75 73 | 65 78 25 2d 33 32 2c 6d |ck%,mous|ex%-32,m|
|00000f00| 6f 75 73 65 79 25 2b 31 | 36 0d 04 60 05 e1 0d 04 |ousey%+1|6..`....|
|00000f10| 6a 05 3a 0d 04 74 12 dd | 20 f2 6d 65 6e 75 5f 73 |j.:..t..| .menu_s|
|00000f20| 65 6c 65 63 74 0d 04 7e | 13 ea 20 6d 65 6e 75 24 |elect..~|.. menu$|
|00000f30| 2c 61 64 6a 75 73 74 25 | 0d 04 88 3b c8 99 20 22 |,adjust%|...;.. "|
|00000f40| 57 69 6d 70 5f 47 65 74 | 50 6f 69 6e 74 65 72 49 |Wimp_Get|PointerI|
|00000f50| 6e 66 6f 22 2c 2c 62 6c | 6f 63 6b 25 3a 61 64 6a |nfo",,bl|ock%:adj|
|00000f60| 75 73 74 25 3d 28 62 6c | 6f 63 6b 25 21 38 20 80 |ust%=(bl|ock%!8 .|
|00000f70| 20 31 29 0d 04 92 35 c8 | 99 20 22 57 69 6d 70 5f | 1)...5.|. "Wimp_|
|00000f80| 44 65 63 6f 64 65 4d 65 | 6e 75 22 2c 2c 6d 65 6e |DecodeMe|nu",,men|
|00000f90| 75 25 2c 71 25 2c c4 32 | 30 30 2c 22 20 22 29 b8 |u%,q%,.2|00," ").|
|00000fa0| 2c 2c 2c 6d 65 6e 75 24 | 0d 04 9c 2a f2 6d 65 6e |,,,menu$|...*.men|
|00000fb0| 75 28 6d 65 6e 75 24 29 | 3a e7 20 61 64 6a 75 73 |u(menu$)|:. adjus|
|00000fc0| 74 25 20 f2 64 6f 5f 6d | 65 6e 75 28 6d 65 6e 75 |t% .do_m|enu(menu|
|00000fd0| 25 29 0d 04 a6 05 e1 0d | 04 b0 05 3a 0d 04 ba 2c |%)......|...:...,|
|00000fe0| dd 20 a4 63 72 65 61 74 | 65 5f 6d 65 6e 75 5f 6c |. .creat|e_menu_l|
|00000ff0| 65 76 65 6c 28 6d 65 6e | 75 25 2c 77 69 64 74 68 |evel(men|u%,width|
|00001000| 25 2c 74 65 78 74 24 29 | 0d 04 c4 3c ea 20 6e 65 |%,text$)|...<. ne|
|00001010| 77 74 65 78 74 24 2c 74 | 69 74 6c 65 24 2c 70 74 |wtext$,t|itle$,pt|
|00001020| 72 25 2c 73 68 61 64 65 | 25 2c 74 69 63 6b 25 2c |r%,shade|%,tick%,|
|00001030| 64 6f 74 74 65 64 25 2c | 73 75 62 6d 65 6e 75 25 |dotted%,|submenu%|
|00001040| 2c 6d 62 25 0d 04 ce 0d | 6c 65 76 65 6c 25 2b 3d |,mb%....|level%+=|
|00001050| 31 0d 04 d8 27 6d 62 25 | 3d 6d 65 6e 75 25 2b 28 |1...'mb%|=menu%+(|
|00001060| 6c 65 76 65 6c 25 2d 31 | 29 2a 6d 65 6e 75 62 6c |level%-1|)*menubl|
|00001070| 6f 63 6b 73 69 7a 65 25 | 0d 04 e2 20 74 69 74 6c |ocksize%|... titl|
|00001080| 65 24 3d c0 74 65 78 74 | 24 2c a7 74 65 78 74 24 |e$=.text|$,.text$|
|00001090| 2c 22 2c 22 29 2d 31 29 | 0d 04 ec 1f 74 65 78 74 |,",")-1)|....text|
|000010a0| 24 3d c1 74 65 78 74 24 | 2c a7 74 65 78 74 24 2c |$=.text$|,.text$,|
|000010b0| 22 2c 22 29 2b 31 29 0d | 04 f6 22 24 6d 62 25 3d |",")+1).|.."$mb%=|
|000010c0| c0 74 69 74 6c 65 24 2c | 31 31 29 3a 20 f4 20 6d |.title$,|11): . m|
|000010d0| 65 6e 75 20 74 69 74 6c | 65 0d 05 00 3e 6d 62 25 |enu titl|e...>mb%|
|000010e0| 3f 31 32 3d 74 66 63 6f | 6c 3a 6d 62 25 3f 31 33 |?12=tfco|l:mb%?13|
|000010f0| 3d 32 3a 6d 62 25 3f 31 | 34 3d 77 66 63 6f 6c 3a |=2:mb%?1|4=wfcol:|
|00001100| 6d 62 25 3f 31 35 3d 77 | 62 63 6f 6c 3a 20 f4 20 |mb%?15=w|bcol: . |
|00001110| 63 6f 6c 6f 75 72 73 0d | 05 0a 28 6d 62 25 21 31 |colours.|..(mb%!1|
|00001120| 36 3d 77 69 64 74 68 25 | 3a 20 f4 20 77 69 64 74 |6=width%|: . widt|
|00001130| 68 20 6f 66 20 6d 65 6e | 75 20 69 74 65 6d 73 0d |h of men|u items.|
|00001140| 05 14 25 6d 62 25 21 32 | 30 3d 34 34 3a 20 f4 20 |..%mb%!2|0=44: . |
|00001150| 68 65 69 67 68 74 20 6f | 66 20 6d 65 6e 75 20 69 |height o|f menu i|
|00001160| 74 65 6d 73 0d 05 1e 27 | 6d 62 25 21 32 34 3d 30 |tems...'|mb%!24=0|
|00001170| 3a 20 f4 20 76 65 72 74 | 2e 20 67 61 70 20 62 65 |: . vert|. gap be|
|00001180| 74 77 65 65 6e 20 69 74 | 65 6d 73 0d 05 28 1f e7 |tween it|ems..(..|
|00001190| 20 c2 74 65 78 74 24 2c | 31 29 3c 3e 22 2c 22 20 | .text$,|1)<>"," |
|000011a0| 74 65 78 74 24 2b 3d 22 | 2c 22 0d 05 32 29 70 74 |text$+="|,"..2)pt|
|000011b0| 72 25 3d 6d 62 25 2b 32 | 38 3a 20 f4 20 73 74 61 |r%=mb%+2|8: . sta|
|000011c0| 72 74 20 6d 65 6e 75 20 | 69 74 65 6d 73 20 62 6c |rt menu |items bl|
|000011d0| 6f 63 6b 0d 05 3c 05 f5 | 0d 05 46 0e 20 20 73 68 |ock..<..|..F. sh|
|000011e0| 61 64 65 25 3d 30 0d 05 | 50 0d 20 20 74 69 63 6b |ade%=0..|P. tick|
|000011f0| 25 3d 30 0d 05 5a 0f 20 | 20 64 6f 74 74 65 64 25 |%=0..Z. | dotted%|
|00001200| 3d 30 0d 05 64 11 20 20 | 73 75 62 6d 65 6e 75 25 |=0..d. |submenu%|
|00001210| 3d 2d 31 0d 05 6e 34 20 | 20 e7 20 c0 74 65 78 74 |=-1..n4 | . .text|
|00001220| 24 2c 31 29 3d 22 3c 22 | 20 73 68 61 64 65 25 3d |$,1)="<"| shade%=|
|00001230| 26 34 30 30 30 30 30 3a | 74 65 78 74 24 3d c1 74 |&400000:|text$=.t|
|00001240| 65 78 74 24 2c 32 29 0d | 05 78 2d 20 20 e7 20 c0 |ext$,2).|.x- . .|
|00001250| 74 65 78 74 24 2c 31 29 | 3d 22 3e 22 20 74 69 63 |text$,1)|=">" tic|
|00001260| 6b 25 3d 31 3a 74 65 78 | 74 24 3d c1 74 65 78 74 |k%=1:tex|t$=.text|
|00001270| 24 2c 32 29 0d 05 82 2f | 20 20 e7 20 c0 74 65 78 |$,2).../| . .tex|
|00001280| 74 24 2c 31 29 3d 22 3a | 22 20 64 6f 74 74 65 64 |t$,1)=":|" dotted|
|00001290| 25 3d 32 3a 74 65 78 74 | 24 3d c1 74 65 78 74 24 |%=2:text|$=.text$|
|000012a0| 2c 32 29 0d 05 8c 17 20 | 20 e7 20 c0 74 65 78 74 |,2).... | . .text|
|000012b0| 24 2c 31 29 3d 22 21 22 | 20 8c 0d 05 96 25 20 20 |$,1)="!"| ....% |
|000012c0| 20 20 73 75 62 6d 65 6e | 75 25 3d 73 75 62 25 28 | submen|u%=sub%(|
|000012d0| bb 28 c1 74 65 78 74 24 | 2c 32 2c 31 29 29 29 0d |.(.text$|,2,1))).|
|000012e0| 05 a0 17 20 20 20 20 74 | 65 78 74 24 3d c1 74 65 |... t|ext$=.te|
|000012f0| 78 74 24 2c 33 29 0d 05 | aa 07 20 20 cd 0d 05 b4 |xt$,3)..|.. ....|
|00001300| 17 20 20 e7 20 c0 74 65 | 78 74 24 2c 31 29 3d 22 |. . .te|xt$,1)="|
|00001310| 28 22 20 8c 0d 05 be 17 | 20 20 20 20 74 65 78 74 |(" .....| text|
|00001320| 24 3d c1 74 65 78 74 24 | 2c 32 29 0d 05 c8 30 20 |$=.text$|,2)...0 |
|00001330| 20 20 20 6e 65 77 74 65 | 78 74 24 3d 6d 65 6e 75 | newte|xt$=menu|
|00001340| 24 28 bb 28 c0 74 65 78 | 74 24 2c a7 74 65 78 74 |$(.(.tex|t$,.text|
|00001350| 24 2c 22 29 22 29 2d 31 | 29 29 29 0d 05 d2 23 20 |$,")")-1|)))...# |
|00001360| 20 20 20 74 65 78 74 24 | 3d c1 74 65 78 74 24 2c | text$|=.text$,|
|00001370| a7 74 65 78 74 24 2c 22 | 29 22 29 2b 31 29 0d 05 |.text$,"|)")+1)..|
|00001380| dc 3a 20 20 20 20 73 75 | 62 6d 65 6e 75 25 3d a4 |.: su|bmenu%=.|
|00001390| 63 72 65 61 74 65 5f 6d | 65 6e 75 5f 6c 65 76 65 |create_m|enu_leve|
|000013a0| 6c 28 6d 65 6e 75 25 2c | 77 69 64 74 68 25 2c 6e |l(menu%,|width%,n|
|000013b0| 65 77 74 65 78 74 24 29 | 0d 05 e6 07 20 20 cd 0d |ewtext$)|.... ..|
|000013c0| 05 f0 2b 20 20 24 28 70 | 74 72 25 2b 31 32 29 3d |..+ $(p|tr%+12)=|
|000013d0| c0 c0 74 65 78 74 24 2c | a7 74 65 78 74 24 2c 22 |..text$,|.text$,"|
|000013e0| 2c 22 29 2d 31 29 2c 31 | 32 29 0d 05 fa 21 20 20 |,")-1),1|2)...! |
|000013f0| 74 65 78 74 24 3d c1 74 | 65 78 74 24 2c a7 74 65 |text$=.t|ext$,.te|
|00001400| 78 74 24 2c 22 2c 22 29 | 2b 31 29 0d 06 04 31 20 |xt$,",")|+1)...1 |
|00001410| 20 70 74 72 25 21 30 3d | 74 69 63 6b 25 20 84 20 | ptr%!0=|tick% . |
|00001420| 64 6f 74 74 65 64 25 20 | 84 20 28 26 38 30 20 80 |dotted% |. (&80 .|
|00001430| 20 28 74 65 78 74 24 3d | 22 22 29 29 0d 06 0e 15 | (text$=|""))....|
|00001440| 20 20 70 74 72 25 21 34 | 3d 73 75 62 6d 65 6e 75 | ptr%!4|=submenu|
|00001450| 25 0d 06 18 4a 20 20 e7 | 20 73 68 61 64 65 25 20 |%...J .| shade% |
|00001460| 70 74 72 25 21 38 3d 26 | 34 30 30 30 30 30 20 84 |ptr%!8=&|400000 .|
|00001470| 20 26 30 31 30 30 32 31 | 20 84 20 37 3c 3c 32 38 | &010021| . 7<<28|
|00001480| 20 84 20 30 3c 3c 32 34 | 20 8b 20 70 74 72 25 21 | . 0<<24| . ptr%!|
|00001490| 38 3d 26 30 37 30 30 30 | 30 32 31 0d 06 22 0e 20 |8=&07000|021..". |
|000014a0| 20 70 74 72 25 2b 3d 32 | 34 0d 06 2c 0e fd 20 74 | ptr%+=2|4..,.. t|
|000014b0| 65 78 74 24 3d 22 22 0d | 06 36 08 3d 6d 62 25 0d |ext$="".|.6.=mb%.|
|000014c0| 06 40 05 3a 0d 06 4a 26 | dd 20 f2 63 72 65 61 74 |.@.:..J&|. .creat|
|000014d0| 65 5f 6d 65 6e 75 28 6d | 65 6e 75 25 2c 77 69 64 |e_menu(m|enu%,wid|
|000014e0| 74 68 25 2c 74 65 78 74 | 24 29 0d 06 54 0b ea 20 |th%,text|$)..T.. |
|000014f0| 63 72 61 70 25 0d 06 5e | 0c 6c 65 76 65 6c 25 3d |crap%..^|.level%=|
|00001500| 30 0d 06 68 30 63 72 61 | 70 25 3d a4 63 72 65 61 |0..h0cra|p%=.crea|
|00001510| 74 65 5f 6d 65 6e 75 5f | 6c 65 76 65 6c 28 6d 65 |te_menu_|level(me|
|00001520| 6e 75 25 2c 77 69 64 74 | 68 25 2c 74 65 78 74 24 |nu%,widt|h%,text$|
|00001530| 29 0d 06 72 45 e7 20 63 | 72 61 70 25 3c 3e 6d 65 |)..rE. c|rap%<>me|
|00001540| 6e 75 25 20 85 20 30 2c | 22 49 6e 74 65 72 6e 61 |nu% . 0,|"Interna|
|00001550| 6c 20 65 72 72 6f 72 3a | 20 6d 65 6e 75 20 62 6c |l error:| menu bl|
|00001560| 6f 63 6b 20 61 64 64 72 | 65 73 73 20 65 78 63 65 |ock addr|ess exce|
|00001570| 70 74 69 6f 6e 22 0d 06 | 7c 05 e1 0d 06 86 05 3a |ption"..||......:|
|00001580| 0d 06 90 23 dd 20 f2 70 | 72 65 76 69 6f 75 73 66 |...#. .p|reviousf|
|00001590| 69 65 6c 64 28 68 61 6e | 64 6c 65 25 2c 69 63 6f |ield(han|dle%,ico|
|000015a0| 6e 25 29 0d 06 9a 0e c8 | 8e 20 69 63 6f 6e 25 20 |n%).....|. icon% |
|000015b0| ca 0d 06 a4 51 c9 20 32 | 33 3a c8 99 20 22 57 69 |....Q. 2|3:.. "Wi|
|000015c0| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|000015d0| 69 6f 6e 22 2c 68 61 6e | 64 6c 65 25 2c 31 38 2c |ion",han|dle%,18,|
|000015e0| 2c 2c 2d 31 2c a9 28 24 | a4 69 63 6f 6e 61 64 64 |,,-1,.($|.iconadd|
|000015f0| 72 28 68 61 6e 64 6c 65 | 25 2c 31 38 29 29 20 81 |r(handle|%,18)) .|
|00001600| 20 32 0d 06 ae 51 c9 20 | 32 31 3a c8 99 20 22 57 | 2...Q. |21:.. "W|
|00001610| 69 6d 70 5f 53 65 74 43 | 61 72 65 74 50 6f 73 69 |imp_SetC|aretPosi|
|00001620| 74 69 6f 6e 22 2c 68 61 | 6e 64 6c 65 25 2c 32 33 |tion",ha|ndle%,23|
|00001630| 2c 2c 2c 2d 31 2c a9 28 | 24 a4 69 63 6f 6e 61 64 |,,,-1,.(|$.iconad|
|00001640| 64 72 28 68 61 6e 64 6c | 65 25 2c 32 33 29 29 20 |dr(handl|e%,23)) |
|00001650| 81 20 32 0d 06 b8 51 c9 | 20 20 36 3a c8 99 20 22 |. 2...Q.| 6:.. "|
|00001660| 57 69 6d 70 5f 53 65 74 | 43 61 72 65 74 50 6f 73 |Wimp_Set|CaretPos|
|00001670| 69 74 69 6f 6e 22 2c 68 | 61 6e 64 6c 65 25 2c 32 |ition",h|andle%,2|
|00001680| 31 2c 2c 2c 2d 31 2c a9 | 28 24 a4 69 63 6f 6e 61 |1,,,-1,.|($.icona|
|00001690| 64 64 72 28 68 61 6e 64 | 6c 65 25 2c 32 31 29 29 |ddr(hand|le%,21))|
|000016a0| 20 81 20 32 0d 06 c2 51 | c9 20 20 32 3a c8 99 20 | . 2...Q|. 2:.. |
|000016b0| 22 57 69 6d 70 5f 53 65 | 74 43 61 72 65 74 50 6f |"Wimp_Se|tCaretPo|
|000016c0| 73 69 74 69 6f 6e 22 2c | 68 61 6e 64 6c 65 25 2c |sition",|handle%,|
|000016d0| 20 36 2c 2c 2c 2d 31 2c | a9 28 24 a4 69 63 6f 6e | 6,,,-1,|.($.icon|
|000016e0| 61 64 64 72 28 68 61 6e | 64 6c 65 25 2c 20 36 29 |addr(han|dle%, 6)|
|000016f0| 29 20 81 20 32 0d 06 cc | 51 c9 20 31 32 3a c8 99 |) . 2...|Q. 12:..|
|00001700| 20 22 57 69 6d 70 5f 53 | 65 74 43 61 72 65 74 50 | "Wimp_S|etCaretP|
|00001710| 6f 73 69 74 69 6f 6e 22 | 2c 68 61 6e 64 6c 65 25 |osition"|,handle%|
|00001720| 2c 20 32 2c 2c 2c 2d 31 | 2c a9 28 24 a4 69 63 6f |, 2,,,-1|,.($.ico|
|00001730| 6e 61 64 64 72 28 68 61 | 6e 64 6c 65 25 2c 20 32 |naddr(ha|ndle%, 2|
|00001740| 29 29 20 81 20 32 0d 06 | d6 51 c9 20 31 33 3a c8 |)) . 2..|.Q. 13:.|
|00001750| 99 20 22 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 |. "Wimp_|SetCaret|
|00001760| 50 6f 73 69 74 69 6f 6e | 22 2c 68 61 6e 64 6c 65 |Position|",handle|
|00001770| 25 2c 31 32 2c 2c 2c 2d | 31 2c a9 28 24 a4 69 63 |%,12,,,-|1,.($.ic|
|00001780| 6f 6e 61 64 64 72 28 68 | 61 6e 64 6c 65 25 2c 31 |onaddr(h|andle%,1|
|00001790| 32 29 29 20 81 20 32 0d | 06 e0 05 cb 0d 06 ea 05 |2)) . 2.|........|
|000017a0| e1 0d 06 f4 05 3a 0d 06 | fe 1f dd 20 f2 6e 65 78 |.....:..|... .nex|
|000017b0| 74 66 69 65 6c 64 28 68 | 61 6e 64 6c 65 25 2c 69 |tfield(h|andle%,i|
|000017c0| 63 6f 6e 25 29 0d 07 08 | 0e c8 8e 20 69 63 6f 6e |con%)...|... icon|
|000017d0| 25 20 ca 0d 07 12 51 c9 | 20 31 38 3a c8 99 20 22 |% ....Q.| 18:.. "|
|000017e0| 57 69 6d 70 5f 53 65 74 | 43 61 72 65 74 50 6f 73 |Wimp_Set|CaretPos|
|000017f0| 69 74 69 6f 6e 22 2c 68 | 61 6e 64 6c 65 25 2c 32 |ition",h|andle%,2|
|00001800| 33 2c 2c 2c 2d 31 2c a9 | 28 24 a4 69 63 6f 6e 61 |3,,,-1,.|($.icona|
|00001810| 64 64 72 28 68 61 6e 64 | 6c 65 25 2c 32 33 29 29 |ddr(hand|le%,23))|
|00001820| 20 81 20 32 0d 07 1c 51 | c9 20 32 33 3a c8 99 20 | . 2...Q|. 23:.. |
|00001830| 22 57 69 6d 70 5f 53 65 | 74 43 61 72 65 74 50 6f |"Wimp_Se|tCaretPo|
|00001840| 73 69 74 69 6f 6e 22 2c | 68 61 6e 64 6c 65 25 2c |sition",|handle%,|
|00001850| 32 31 2c 2c 2c 2d 31 2c | a9 28 24 a4 69 63 6f 6e |21,,,-1,|.($.icon|
|00001860| 61 64 64 72 28 68 61 6e | 64 6c 65 25 2c 32 31 29 |addr(han|dle%,21)|
|00001870| 29 20 81 20 32 0d 07 26 | 51 c9 20 32 31 3a c8 99 |) . 2..&|Q. 21:..|
|00001880| 20 22 57 69 6d 70 5f 53 | 65 74 43 61 72 65 74 50 | "Wimp_S|etCaretP|
|00001890| 6f 73 69 74 69 6f 6e 22 | 2c 68 61 6e 64 6c 65 25 |osition"|,handle%|
|000018a0| 2c 20 36 2c 2c 2c 2d 31 | 2c a9 28 24 a4 69 63 6f |, 6,,,-1|,.($.ico|
|000018b0| 6e 61 64 64 72 28 68 61 | 6e 64 6c 65 25 2c 20 36 |naddr(ha|ndle%, 6|
|000018c0| 29 29 20 81 20 32 0d 07 | 30 51 c9 20 20 36 3a c8 |)) . 2..|0Q. 6:.|
|000018d0| 99 20 22 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 |. "Wimp_|SetCaret|
|000018e0| 50 6f 73 69 74 69 6f 6e | 22 2c 68 61 6e 64 6c 65 |Position|",handle|
|000018f0| 25 2c 20 32 2c 2c 2c 2d | 31 2c a9 28 24 a4 69 63 |%, 2,,,-|1,.($.ic|
|00001900| 6f 6e 61 64 64 72 28 68 | 61 6e 64 6c 65 25 2c 20 |onaddr(h|andle%, |
|00001910| 32 29 29 20 81 20 32 0d | 07 3a 51 c9 20 20 32 3a |2)) . 2.|.:Q. 2:|
|00001920| c8 99 20 22 57 69 6d 70 | 5f 53 65 74 43 61 72 65 |.. "Wimp|_SetCare|
|00001930| 74 50 6f 73 69 74 69 6f | 6e 22 2c 68 61 6e 64 6c |tPositio|n",handl|
|00001940| 65 25 2c 31 32 2c 2c 2c | 2d 31 2c a9 28 24 a4 69 |e%,12,,,|-1,.($.i|
|00001950| 63 6f 6e 61 64 64 72 28 | 68 61 6e 64 6c 65 25 2c |conaddr(|handle%,|
|00001960| 31 32 29 29 20 81 20 32 | 0d 07 44 51 c9 20 31 32 |12)) . 2|..DQ. 12|
|00001970| 3a c8 99 20 22 57 69 6d | 70 5f 53 65 74 43 61 72 |:.. "Wim|p_SetCar|
|00001980| 65 74 50 6f 73 69 74 69 | 6f 6e 22 2c 68 61 6e 64 |etPositi|on",hand|
|00001990| 6c 65 25 2c 31 33 2c 2c | 2c 2d 31 2c a9 28 24 a4 |le%,13,,|,-1,.($.|
|000019a0| 69 63 6f 6e 61 64 64 72 | 28 68 61 6e 64 6c 65 25 |iconaddr|(handle%|
|000019b0| 2c 31 33 29 29 20 81 20 | 32 0d 07 4e 05 cb 0d 07 |,13)) . |2..N....|
|000019c0| 58 05 e1 0d 07 62 05 3a | 0d 07 6c 24 dd 20 f2 6b |X....b.:|..l$. .k|
|000019d0| 65 79 5f 70 72 65 73 73 | 28 68 61 6e 64 6c 65 25 |ey_press|(handle%|
|000019e0| 2c 69 63 6f 6e 25 2c 6b | 65 79 25 29 0d 07 76 10 |,icon%,k|ey%)..v.|
|000019f0| ea 20 70 72 6f 63 65 73 | 73 65 64 25 0d 07 80 10 |. proces|sed%....|
|00001a00| 70 72 6f 63 65 73 73 65 | 64 25 3d a3 0d 07 8a 18 |processe|d%=.....|
|00001a10| e7 20 68 61 6e 64 6c 65 | 25 3d 6f 70 74 69 6f 6e |. handle|%=option|
|00001a20| 73 25 20 8c 0d 07 94 2f | 20 20 e7 20 6b 65 79 25 |s% ..../| . key%|
|00001a30| 3d 26 31 38 46 20 f2 70 | 72 65 76 69 6f 75 73 66 |=&18F .p|reviousf|
|00001a40| 69 65 6c 64 28 68 61 6e | 64 6c 65 25 2c 69 63 6f |ield(han|dle%,ico|
|00001a50| 6e 25 29 0d 07 9e 35 20 | 20 e7 20 6b 65 79 25 3d |n%)...5 | . key%=|
|00001a60| 31 33 20 84 20 6b 65 79 | 25 3d 26 31 38 45 20 f2 |13 . key|%=&18E .|
|00001a70| 6e 65 78 74 66 69 65 6c | 64 28 68 61 6e 64 6c 65 |nextfiel|d(handle|
|00001a80| 25 2c 69 63 6f 6e 25 29 | 0d 07 a8 12 20 20 70 72 |%,icon%)|.... pr|
|00001a90| 6f 63 65 73 73 65 64 25 | 3d b9 0d 07 b2 05 cd 0d |ocessed%|=.......|
|00001aa0| 07 bc 2c e7 20 ac 20 70 | 72 6f 63 65 73 73 65 64 |..,. . p|rocessed|
|00001ab0| 25 20 c8 99 20 22 57 69 | 6d 70 5f 50 72 6f 63 65 |% .. "Wi|mp_Proce|
|00001ac0| 73 73 4b 65 79 22 2c 6b | 65 79 25 0d 07 c6 05 e1 |ssKey",k|ey%.....|
|00001ad0| 0d 07 d0 05 3a 0d 07 da | 2e dd 20 f2 6d 6f 75 73 |....:...|.. .mous|
|00001ae0| 65 5f 63 6c 69 63 6b 28 | 78 25 2c 79 25 2c 62 25 |e_click(|x%,y%,b%|
|00001af0| 2c 68 61 6e 64 6c 65 25 | 2c 69 63 6f 6e 25 2c 6f |,handle%|,icon%,o|
|00001b00| 62 25 29 0d 07 e4 19 6d | 6f 75 73 65 78 25 3d 78 |b%)....m|ousex%=x|
|00001b10| 25 3a 6d 6f 75 73 65 79 | 25 3d 79 25 0d 07 ee 0e |%:mousey|%=y%....|
|00001b20| 63 6c 69 63 6b 65 64 25 | 3d a3 0d 07 f8 0b c8 8e |clicked%|=.......|
|00001b30| 20 62 25 20 ca 0d 08 02 | 2c c9 20 31 2c 34 3a 20 | b% ....|,. 1,4: |
|00001b40| f4 20 73 65 6c 65 63 74 | 2d 20 6f 72 20 61 6c 74 |. select|- or alt|
|00001b50| 65 72 2d 62 75 74 74 6f | 6e 20 63 6c 69 63 6b 65 |er-butto|n clicke|
|00001b60| 64 0d 08 0c 12 20 20 c8 | 8e 20 68 61 6e 64 6c 65 |d.... .|. handle|
|00001b70| 25 20 ca 0d 08 16 10 20 | 20 c9 20 6d 65 73 73 61 |% ..... | . messa|
|00001b80| 67 65 25 0d 08 20 29 20 | 20 20 20 e7 20 69 63 6f |ge%.. ) | . ico|
|00001b90| 6e 25 3d 31 20 f2 63 6c | 6f 73 65 5f 77 69 6e 64 |n%=1 .cl|ose_wind|
|00001ba0| 6f 77 28 6d 65 73 73 61 | 67 65 25 29 0d 08 2a 54 |ow(messa|ge%)..*T|
|00001bb0| 20 20 c9 20 2d 32 3a 20 | f2 6d 65 73 73 61 67 65 | . -2: |.message|
|00001bc0| 62 6f 78 28 22 44 72 61 | 67 20 61 20 63 20 73 6f |box("Dra|g a c so|
|00001bd0| 75 72 63 65 20 66 69 6c | 65 20 74 6f 20 74 68 65 |urce fil|e to the|
|00001be0| 20 43 43 6f 6d 70 69 6c | 65 20 69 63 6f 6e 20 6f | CCompil|e icon o|
|00001bf0| 6e 20 74 68 65 20 69 63 | 6f 6e 20 62 61 72 22 29 |n the ic|on bar")|
|00001c00| 0d 08 34 07 20 20 cb 0d | 08 3e 1e c9 20 32 3a 20 |..4. ..|.>.. 2: |
|00001c10| f4 20 6d 65 6e 75 2d 62 | 75 74 74 6f 6e 20 63 6c |. menu-b|utton cl|
|00001c20| 69 63 6b 65 64 0d 08 48 | 12 20 20 c8 8e 20 68 61 |icked..H|. .. ha|
|00001c30| 6e 64 6c 65 25 20 ca 0d | 08 52 1f 20 20 c9 20 2d |ndle% ..|.R. . -|
|00001c40| 32 3a 20 f2 64 6f 5f 6d | 65 6e 75 28 69 63 6f 6e |2: .do_m|enu(icon|
|00001c50| 6d 65 6e 75 25 29 0d 08 | 5c 07 20 20 cb 0d 08 66 |menu%)..|\. ...f|
|00001c60| 05 cb 0d 08 70 05 e1 0d | 08 7a 05 3a 0d 08 84 12 |....p...|.z.:....|
|00001c70| dd 20 f2 6d 65 6e 75 28 | 6d 65 6e 75 24 29 0d 08 |. .menu(|menu$)..|
|00001c80| 8e 18 e7 20 6d 65 6e 75 | 25 3c 3e 69 63 6f 6e 6d |... menu|%<>iconm|
|00001c90| 65 6e 75 25 20 e1 0d 08 | 98 0e c8 8e 20 6d 65 6e |enu% ...|.... men|
|00001ca0| 75 24 20 ca 0d 08 a2 23 | c9 20 22 4c 6f 61 64 20 |u$ ....#|. "Load |
|00001cb0| 6f 70 74 69 6f 6e 73 22 | 3a 20 f2 6c 6f 61 64 5f |options"|: .load_|
|00001cc0| 6f 70 74 69 6f 6e 73 0d | 08 ac 23 c9 20 22 53 61 |options.|..#. "Sa|
|00001cd0| 76 65 20 6f 70 74 69 6f | 6e 73 22 3a 20 f2 73 61 |ve optio|ns": .sa|
|00001ce0| 76 65 5f 6f 70 74 69 6f | 6e 73 0d 08 b6 15 c9 20 |ve_optio|ns..... |
|00001cf0| 22 51 75 69 74 22 3a 20 | 71 75 69 74 25 3d b9 0d |"Quit": |quit%=..|
|00001d00| 08 c0 05 cb 0d 08 ca 05 | e1 0d 08 d4 05 3a 0d 08 |........|.....:..|
|00001d10| de 1d dd 20 f2 72 65 63 | 65 69 76 65 28 72 65 66 |... .rec|eive(ref|
|00001d20| 25 2c 6d 65 73 73 61 67 | 65 25 29 0d 08 e8 11 c8 |%,messag|e%).....|
|00001d30| 8e 20 6d 65 73 73 61 67 | 65 25 20 ca 0d 08 f2 10 |. messag|e% .....|
|00001d40| c9 20 30 3a 20 71 75 69 | 74 25 3d b9 0d 08 fc 3a |. 0: qui|t%=....:|
|00001d50| c9 20 31 3a 20 f4 20 66 | 69 6c 65 20 64 72 6f 70 |. 1: . f|ile drop|
|00001d60| 70 65 64 20 66 72 6f 6d | 20 61 70 70 6c 69 63 61 |ped from| applica|
|00001d70| 74 69 6f 6e 20 2d 20 72 | 65 74 75 72 6e 20 66 69 |tion - r|eturn fi|
|00001d80| 6c 65 6e 61 6d 65 0d 09 | 06 32 20 20 20 20 20 20 |lename..|.2 |
|00001d90| 20 20 21 71 25 3d 28 34 | 38 2b 32 30 29 80 ac 33 | !q%=(4|8+20)..3|
|00001da0| 3a f4 20 61 64 6a 75 73 | 74 20 73 69 7a 65 20 6f |:. adjus|t size o|
|00001db0| 66 20 70 61 63 6b 65 74 | 0d 09 10 23 20 20 20 20 |f packet|...# |
|00001dc0| 20 20 20 20 71 25 21 31 | 32 3d 71 25 21 38 3a f4 | q%!1|2=q%!8:.|
|00001dd0| 20 63 6f 70 79 20 6d 79 | 72 65 66 0d 09 1a 28 20 | copy my|ref...( |
|00001de0| 20 20 20 20 20 20 20 71 | 25 21 31 36 3d 32 3a f4 | q|%!16=2:.|
|00001df0| 20 73 65 74 20 74 6f 20 | 44 61 74 61 4c 6f 61 64 | set to |DataLoad|
|00001e00| 41 63 6b 0d 09 24 23 20 | 20 20 20 20 20 20 20 71 |Ack..$# | q|
|00001e10| 25 21 33 36 3d 2d 31 3a | f4 20 75 6e 73 61 66 65 |%!36=-1:|. unsafe|
|00001e20| 20 66 69 6c 65 21 0d 09 | 2e 2b 20 20 20 20 20 20 | file!..|.+ |
|00001e30| 20 20 24 28 71 25 2b 34 | 34 29 3d 22 3c 43 43 6f | $(q%+4|4)="<CCo|
|00001e40| 6d 70 69 6c 65 24 44 69 | 72 3e 2e 5e 2e 63 2e 3f |mpile$Di|r>.^.c.?|
|00001e50| 22 0d 09 38 19 20 20 20 | 20 20 20 20 20 3f 28 71 |"..8. | ?(q|
|00001e60| 25 2b 34 34 2b 32 30 29 | 3d 30 0d 09 42 28 20 20 |%+44+20)|=0..B( |
|00001e70| 20 20 20 20 20 20 ff 28 | 22 43 44 69 72 20 3c 43 | .(|"CDir <C|
|00001e80| 43 6f 6d 70 69 6c 65 24 | 44 69 72 3e 2e 5e 2e 63 |Compile$|Dir>.^.c|
|00001e90| 22 29 0d 09 4c 2b 20 20 | 20 20 20 20 20 20 c8 99 |")..L+ | ..|
|00001ea0| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00001eb0| 65 22 2c 31 37 2c 71 25 | 2c 71 25 21 34 0d 09 56 |e",17,q%|,q%!4..V|
|00001ec0| 3a c9 20 33 3a 20 f4 20 | 66 69 6c 65 20 64 72 6f |:. 3: . |file dro|
|00001ed0| 70 70 65 64 20 66 72 6f | 6d 20 46 69 6c 65 72 20 |pped fro|m Filer |
|00001ee0| 2d 20 74 72 61 6e 73 66 | 65 72 20 74 6f 20 64 61 |- transf|er to da|
|00001ef0| 74 61 20 66 69 6c 65 0d | 09 60 11 20 20 20 20 20 |ta file.|.`. |
|00001f00| 20 20 20 f2 6c 6f 61 64 | 0d 09 6a 05 cb 0d 09 74 | .load|..j....t|
|00001f10| 05 e1 0d 09 7e 05 3a 0d | 09 88 0f dd 20 a4 72 74 |....~.:.|.... .rt|
|00001f20| 6f 7a 28 70 25 29 0d 09 | 92 08 ea 20 71 24 0d 09 |oz(p%)..|... q$..|
|00001f30| 9c 1e c8 95 20 3f 70 25 | 3c 3e 30 20 71 24 2b 3d |.... ?p%|<>0 q$+=|
|00001f40| bd 3f 70 25 3a 70 25 2b | 3d 31 3a ce 0d 09 a6 07 |.?p%:p%+|=1:.....|
|00001f50| 3d 71 24 0d 09 b0 05 3a | 0d 09 ba 11 dd 20 f2 63 |=q$....:|..... .c|
|00001f60| 68 65 63 6b 5f 74 79 70 | 65 0d 09 c4 0f 74 79 70 |heck_typ|e....typ|
|00001f70| 65 25 3d 71 25 21 34 30 | 0d 09 ce 39 e7 20 74 79 |e%=q%!40|...9. ty|
|00001f80| 70 65 25 3d 26 31 30 30 | 30 20 f2 77 61 72 6e 69 |pe%=&100|0 .warni|
|00001f90| 6e 67 62 6f 78 28 22 43 | 61 6e 27 74 20 6c 6f 61 |ngbox("C|an't loa|
|00001fa0| 64 20 61 20 64 69 72 65 | 63 74 6f 72 79 22 29 3a |d a dire|ctory"):|
|00001fb0| e1 0d 09 d8 3c e7 20 74 | 79 70 65 25 3d 26 32 30 |....<. t|ype%=&20|
|00001fc0| 30 30 20 f2 77 61 72 6e | 69 6e 67 62 6f 78 28 22 |00 .warn|ingbox("|
|00001fd0| 43 61 6e 27 74 20 6c 6f | 61 64 20 61 6e 20 61 70 |Can't lo|ad an ap|
|00001fe0| 70 6c 69 63 61 74 69 6f | 6e 22 29 3a e1 0d 09 e2 |plicatio|n"):....|
|00001ff0| 34 e7 20 74 79 70 65 25 | 3c 3e 26 46 46 46 20 f2 |4. type%|<>&FFF .|
|00002000| 77 61 72 6e 69 6e 67 62 | 6f 78 28 22 4d 75 73 74 |warningb|ox("Must|
|00002010| 20 62 65 20 61 20 74 65 | 78 74 20 66 69 6c 65 22 | be a te|xt file"|
|00002020| 29 0d 09 ec 05 e1 0d 09 | f6 05 3a 0d 0a 00 14 dd |).......|..:.....|
|00002030| 20 a4 6c 6f 77 65 72 63 | 61 73 65 28 73 24 29 0d | .lowerc|ase(s$).|
|00002040| 0a 0a 12 ea 20 4b 25 2c | 63 25 2c 6c 6f 77 65 72 |.... K%,|c%,lower|
|00002050| 24 0d 0a 14 0d 6c 6f 77 | 65 72 24 3d 22 22 0d 0a |$....low|er$=""..|
|00002060| 1e 12 e3 20 4b 25 3d 31 | 20 b8 20 a9 28 73 24 29 |... K%=1| . .(s$)|
|00002070| 0d 0a 28 15 20 20 63 25 | 3d 97 28 c1 73 24 2c 4b |..(. c%|=.(.s$,K|
|00002080| 25 2c 31 29 29 0d 0a 32 | 21 20 20 e7 20 63 25 3e |%,1))..2|! . c%>|
|00002090| 3d 97 28 22 41 22 29 20 | 80 20 63 25 3c 3d 97 28 |=.("A") |. c%<=.(|
|000020a0| 22 5a 22 29 20 8c 0d 0a | 3c 23 20 20 20 20 6c 6f |"Z") ...|<# lo|
|000020b0| 77 65 72 24 2b 3d bd 28 | 63 25 2d 97 28 22 41 22 |wer$+=.(|c%-.("A"|
|000020c0| 29 2b 97 28 22 61 22 29 | 29 0d 0a 46 07 20 20 cc |)+.("a")|)..F. .|
|000020d0| 0d 0a 50 15 20 20 20 20 | 6c 6f 77 65 72 24 2b 3d |..P. |lower$+=|
|000020e0| bd 28 63 25 29 0d 0a 5a | 07 20 20 cd 0d 0a 64 05 |.(c%)..Z|. ...d.|
|000020f0| ed 0d 0a 6e 0b 3d 6c 6f | 77 65 72 24 0d 0a 78 05 |...n.=lo|wer$..x.|
|00002100| 3a 0d 0a 82 18 dd 20 a4 | 67 65 74 5f 62 75 74 74 |:..... .|get_butt|
|00002110| 6f 6e 28 68 25 2c 69 25 | 29 0d 0a 8c 38 21 62 6c |on(h%,i%|)...8!bl|
|00002120| 6f 63 6b 25 3d 68 25 3a | 62 6c 6f 63 6b 25 21 34 |ock%=h%:|block%!4|
|00002130| 3d 69 25 3a c8 99 22 57 | 69 6d 70 5f 47 65 74 49 |=i%:.."W|imp_GetI|
|00002140| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |conState|",,block|
|00002150| 25 0d 0a 96 1d 3d 28 28 | 62 6c 6f 63 6b 25 21 32 |%....=((|block%!2|
|00002160| 34 20 80 20 31 3c 3c 32 | 31 29 3c 3e 30 29 0d 0a |4 . 1<<2|1)<>0)..|
|00002170| a0 05 3a 0d 0a aa 18 dd | 20 f2 73 65 74 5f 62 75 |..:.....| .set_bu|
|00002180| 74 74 6f 6e 28 68 25 2c | 69 25 29 0d 0a b4 29 21 |tton(h%,|i%)...)!|
|00002190| 71 25 3d 68 25 3a 71 25 | 21 34 3d 69 25 3a 71 25 |q%=h%:q%|!4=i%:q%|
|000021a0| 21 38 3d 31 3c 3c 32 31 | 3a 71 25 21 31 32 3d 31 |!8=1<<21|:q%!12=1|
|000021b0| 3c 3c 32 31 0d 0a be 1e | c8 99 20 22 57 69 6d 70 |<<21....|.. "Wimp|
|000021c0| 5f 53 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_SetIcon|State",,|
|000021d0| 71 25 0d 0a c8 05 e1 0d | 0a d2 05 3a 0d 0a dc 1a |q%......|...:....|
|000021e0| dd 20 f2 63 6c 65 61 72 | 5f 62 75 74 74 6f 6e 28 |. .clear|_button(|
|000021f0| 68 25 2c 69 25 29 0d 0a | e6 29 21 71 25 3d 68 25 |h%,i%)..|.)!q%=h%|
|00002200| 3a 71 25 21 34 3d 69 25 | 3a 71 25 21 38 3d 30 3c |:q%!4=i%|:q%!8=0<|
|00002210| 3c 32 31 3a 71 25 21 31 | 32 3d 31 3c 3c 32 31 0d |<21:q%!1|2=1<<21.|
|00002220| 0a f0 1e c8 99 20 22 57 | 69 6d 70 5f 53 65 74 49 |..... "W|imp_SetI|
|00002230| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 71 25 0d 0a fa |conState|",,q%...|
|00002240| 05 e1 0d 0b 04 05 3a 0d | 0b 0e 1d dd 20 a4 72 65 |......:.|.... .re|
|00002250| 61 64 5f 73 79 73 74 65 | 6d 5f 76 61 72 28 6e 61 |ad_syste|m_var(na|
|00002260| 6d 65 24 29 0d 0b 18 0e | ea 20 4b 25 2c 73 25 2c |me$)....|. K%,s%,|
|00002270| 74 25 0d 0b 22 33 c8 99 | 20 22 58 4f 53 5f 52 65 |t%.."3..| "XOS_Re|
|00002280| 61 64 56 61 72 56 61 6c | 22 2c 6e 61 6d 65 24 2c |adVarVal|",name$,|
|00002290| 71 25 2c 32 35 35 2c 30 | 2c 33 20 b8 20 2c 2c 73 |q%,255,0|,3 . ,,s|
|000022a0| 25 2c 2c 74 25 0d 0b 2c | 0c e7 20 73 25 3d 30 20 |%,,t%..,|.. s%=0 |
|000022b0| 8c 0d 0b 36 0e 20 20 6e | 61 6d 65 24 3d 22 22 0d |...6. n|ame$="".|
|000022c0| 0b 40 05 cc 0d 0b 4a 0e | 20 20 6e 61 6d 65 24 3d |.@....J.| name$=|
|000022d0| 22 22 0d 0b 54 13 20 20 | e3 20 4b 25 3d 30 20 b8 |""..T. |. K%=0 .|
|000022e0| 20 73 25 2d 31 0d 0b 5e | 17 20 20 20 20 6e 61 6d | s%-1..^|. nam|
|000022f0| 65 24 2b 3d bd 28 71 25 | 3f 4b 25 29 0d 0b 68 07 |e$+=.(q%|?K%)..h.|
|00002300| 20 20 ed 0d 0b 72 05 cd | 0d 0b 7c 0a 3d 6e 61 6d | ...r..|..|.=nam|
|00002310| 65 24 0d 0b 86 05 3a 0d | 0b 90 2b dd 20 f2 77 72 |e$....:.|..+. .wr|
|00002320| 69 74 65 5f 76 61 72 69 | 61 62 6c 65 28 6e 61 6d |ite_vari|able(nam|
|00002330| 65 24 2c 63 6f 6e 74 65 | 6e 74 24 2c 74 79 70 65 |e$,conte|nt$,type|
|00002340| 25 29 0d 0b 9a 10 e7 20 | 74 79 70 65 25 3d 2d 31 |%)..... |type%=-1|
|00002350| 20 8c 0d 0b a4 17 20 20 | ff 28 22 55 6e 53 65 74 | ..... |.("UnSet|
|00002360| 20 22 2b 6e 61 6d 65 24 | 29 0d 0b ae 05 cc 0d 0b | "+name$|).......|
|00002370| b8 3a 20 20 c8 99 20 22 | 4f 53 5f 53 65 74 56 61 |.: .. "|OS_SetVa|
|00002380| 72 56 61 6c 22 2c 6e 61 | 6d 65 24 2c 63 6f 6e 74 |rVal",na|me$,cont|
|00002390| 65 6e 74 24 2c a9 28 63 | 6f 6e 74 65 6e 74 24 29 |ent$,.(c|ontent$)|
|000023a0| 2c 30 2c 74 79 70 65 25 | 0d 0b c2 05 cd 0d 0b cc |,0,type%|........|
|000023b0| 05 e1 0d 0b d6 05 3a 0d | 0b e0 0b dd 20 f2 6c 6f |......:.|.... .lo|
|000023c0| 61 64 0d 0b ea 5a ea 20 | 64 6f 74 25 2c 6c 61 73 |ad...Z. |dot%,las|
|000023d0| 74 64 6f 74 25 2c 70 72 | 65 76 64 6f 74 25 2c 69 |tdot%,pr|evdot%,i|
|000023e0| 64 25 2c 6c 65 6e 25 2c | 70 72 65 66 69 78 24 2c |d%,len%,|prefix$,|
|000023f0| 64 69 72 24 2c 66 69 6c | 65 24 2c 69 6d 61 67 65 |dir$,fil|e$,image|
|00002400| 24 2c 72 65 70 6f 72 74 | 24 2c 63 63 24 2c 6c 69 |$,report|$,cc$,li|
|00002410| 6e 6b 24 2c 73 71 75 65 | 65 7a 65 24 0d 0b f4 1f |nk$,sque|eze$....|
|00002420| f2 63 68 65 63 6b 5f 74 | 79 70 65 3a e7 20 74 79 |.check_t|ype:. ty|
|00002430| 70 65 25 3c 3e 26 46 46 | 46 20 e1 0d 0b fe 16 6e |pe%<>&FF|F .....n|
|00002440| 61 6d 65 24 3d a4 72 74 | 6f 7a 28 71 25 2b 34 34 |ame$=.rt|oz(q%+44|
|00002450| 29 0d 0c 08 19 64 6f 74 | 25 3d a7 6e 61 6d 65 24 |)....dot|%=.name$|
|00002460| 2c 22 2e 22 2c 64 6f 74 | 25 29 0d 0c 12 0d c8 95 |,".",dot|%)......|
|00002470| 20 64 6f 74 25 3e 30 0d | 0c 1c 3d 20 20 70 72 65 | dot%>0.|..= pre|
|00002480| 76 64 6f 74 25 3d 6c 61 | 73 74 64 6f 74 25 3a 6c |vdot%=la|stdot%:l|
|00002490| 61 73 74 64 6f 74 25 3d | 64 6f 74 25 3a 64 6f 74 |astdot%=|dot%:dot|
|000024a0| 25 3d a7 6e 61 6d 65 24 | 2c 22 2e 22 2c 64 6f 74 |%=.name$|,".",dot|
|000024b0| 25 2b 31 29 0d 0c 26 05 | ce 0d 0c 30 12 e7 20 70 |%+1)..&.|...0.. p|
|000024c0| 72 65 76 64 6f 74 25 3d | 30 20 8c 0d 0c 3a 3e 20 |revdot%=|0 ...:> |
|000024d0| 20 f2 77 61 72 6e 69 6e | 67 62 6f 78 28 22 4e 61 | .warnin|gbox("Na|
|000024e0| 6d 65 20 27 22 2b 6e 61 | 6d 65 24 2b 22 27 20 6e |me '"+na|me$+"' n|
|000024f0| 6f 74 20 61 63 63 65 70 | 74 65 64 20 62 79 20 43 |ot accep|ted by C|
|00002500| 43 6f 6d 70 69 6c 65 22 | 29 0d 0c 44 07 20 20 e1 |Compile"|)..D. .|
|00002510| 0d 0c 4e 05 cd 0d 0c 58 | 1e 70 72 65 66 69 78 24 |..N....X|.prefix$|
|00002520| 3d c0 6e 61 6d 65 24 2c | 70 72 65 76 64 6f 74 25 |=.name$,|prevdot%|
|00002530| 2d 31 29 0d 0c 62 2f 64 | 69 72 24 3d c1 6e 61 6d |-1)..b/d|ir$=.nam|
|00002540| 65 24 2c 70 72 65 76 64 | 6f 74 25 2b 31 2c 6c 61 |e$,prevd|ot%+1,la|
|00002550| 73 74 64 6f 74 25 2d 70 | 72 65 76 64 6f 74 25 2d |stdot%-p|revdot%-|
|00002560| 31 29 0d 0c 6c 1c 66 69 | 6c 65 24 3d c1 6e 61 6d |1)..l.fi|le$=.nam|
|00002570| 65 24 2c 6c 61 73 74 64 | 6f 74 25 2b 31 29 0d 0c |e$,lastd|ot%+1)..|
|00002580| 76 1d e7 20 a4 6c 6f 77 | 65 72 63 61 73 65 28 64 |v.. .low|ercase(d|
|00002590| 69 72 24 29 3c 3e 22 63 | 22 20 8c 0d 0c 80 3f 20 |ir$)<>"c|" ....? |
|000025a0| 20 f2 77 61 72 6e 69 6e | 67 62 6f 78 28 22 46 69 | .warnin|gbox("Fi|
|000025b0| 6c 65 20 27 22 2b 66 69 | 6c 65 24 2b 22 27 20 6e |le '"+fi|le$+"' n|
|000025c0| 6f 74 20 69 6e 20 63 20 | 73 6f 75 72 63 65 20 64 |ot in c |source d|
|000025d0| 69 72 65 63 74 6f 72 79 | 22 29 0d 0c 8a 07 20 20 |irectory|").... |
|000025e0| e1 0d 0c 94 05 cd 0d 0c | 9e 21 63 6f 6d 70 69 6c |........|.!compil|
|000025f0| 65 72 5f 64 69 72 24 3d | 24 63 6f 6d 70 69 6c 65 |er_dir$=|$compile|
|00002600| 72 5f 69 63 6f 6e 25 0d | 0c a8 1b 69 6e 63 6c 75 |r_icon%.|...inclu|
|00002610| 64 65 24 3d 24 69 6e 63 | 6c 75 64 65 5f 69 63 6f |de$=$inc|lude_ico|
|00002620| 6e 25 0d 0c b2 1d 63 4c | 69 62 72 6f 6f 74 24 3d |n%....cL|ibroot$=|
|00002630| 24 63 4c 69 62 72 6f 6f | 74 5f 69 63 6f 6e 25 0d |$cLibroo|t_icon%.|
|00002640| 0c bc 17 69 6d 61 67 65 | 24 3d 24 69 6d 61 67 65 |...image|$=$image|
|00002650| 5f 69 63 6f 6e 25 0d 0c | c6 1e e7 20 69 6d 61 67 |_icon%..|... imag|
|00002660| 65 24 3d 22 22 20 69 6d | 61 67 65 24 3d 22 6e 75 |e$="" im|age$="nu|
|00002670| 6c 6c 3a 22 0d 0c d0 19 | 72 65 70 6f 72 74 24 3d |ll:"....|report$=|
|00002680| 24 65 72 72 6f 72 73 5f | 69 63 6f 6e 25 0d 0c da |$errors_|icon%...|
|00002690| 1b 6c 69 62 72 61 72 79 | 24 3d 24 6c 69 62 72 61 |.library|$=$libra|
|000026a0| 72 79 5f 69 63 6f 6e 25 | 0d 0c e4 13 76 69 61 24 |ry_icon%|....via$|
|000026b0| 3d 24 76 69 61 5f 69 63 | 6f 6e 25 0d 0c ee 0a 63 |=$via_ic|on%....c|
|000026c0| 63 24 3d 22 22 0d 0c f8 | 2e e7 20 63 6f 6d 70 69 |c$=""...|.. compi|
|000026d0| 6c 65 72 5f 64 69 72 24 | 3c 3e 22 22 20 63 63 24 |ler_dir$|<>"" cc$|
|000026e0| 2b 3d 63 6f 6d 70 69 6c | 65 72 5f 64 69 72 24 2b |+=compil|er_dir$+|
|000026f0| 22 2e 22 0d 0d 02 28 63 | 63 24 2b 3d 22 43 43 20 |"."...(c|c$+="CC |
|00002700| 22 2b 70 72 65 66 69 78 | 24 2b 22 2e 63 2e 22 2b |"+prefix|$+".c."+|
|00002710| 66 69 6c 65 24 2b 22 20 | 2d 63 22 0d 0d 0c 47 e7 |file$+" |-c"...G.|
|00002720| 20 63 4c 69 62 72 6f 6f | 74 24 3d 22 22 20 ff 28 | cLibroo|t$="" .(|
|00002730| 22 55 6e 53 65 74 20 43 | 24 4c 69 62 72 6f 6f 74 |"UnSet C|$Libroot|
|00002740| 22 29 20 8b 20 ff 28 22 | 53 65 74 20 43 24 4c 69 |") . .("|Set C$Li|
|00002750| 62 72 6f 6f 74 20 22 2b | 63 4c 69 62 72 6f 6f 74 |broot "+|cLibroot|
|00002760| 24 29 0d 0d 16 27 e7 20 | 69 6e 63 6c 75 64 65 24 |$)...'. |include$|
|00002770| 3c 3e 22 22 20 63 63 24 | 2b 3d 22 20 2d 69 20 22 |<>"" cc$|+=" -i "|
|00002780| 2b 69 6e 63 6c 75 64 65 | 24 0d 0d 20 2b e7 20 a4 |+include|$.. +. .|
|00002790| 67 65 74 5f 62 75 74 74 | 6f 6e 28 6f 70 74 69 6f |get_butt|on(optio|
|000027a0| 6e 73 25 2c 39 29 20 63 | 63 24 2b 3d 22 20 2d 6c |ns%,9) c|c$+=" -l|
|000027b0| 69 73 74 22 0d 0d 2a 46 | e7 20 a4 67 65 74 5f 62 |ist"..*F|. .get_b|
|000027c0| 75 74 74 6f 6e 28 6f 70 | 74 69 6f 6e 73 25 2c 32 |utton(op|tions%,2|
|000027d0| 35 29 20 80 20 72 65 70 | 6f 72 74 24 3c 3e 22 22 |5) . rep|ort$<>""|
|000027e0| 20 63 63 24 2b 3d 22 20 | 7b 20 3e 20 22 2b 72 65 | cc$+=" |{ > "+re|
|000027f0| 70 6f 72 74 24 2b 22 20 | 7d 22 0d 0d 34 0c 6c 69 |port$+" |}"..4.li|
|00002800| 6e 6b 24 3d 22 22 0d 0d | 3e 30 e7 20 63 6f 6d 70 |nk$=""..|>0. comp|
|00002810| 69 6c 65 72 5f 64 69 72 | 24 3c 3e 22 22 20 6c 69 |iler_dir|$<>"" li|
|00002820| 6e 6b 24 2b 3d 63 6f 6d | 70 69 6c 65 72 5f 64 69 |nk$+=com|piler_di|
|00002830| 72 24 2b 22 2e 22 0d 0d | 48 34 6c 69 6e 6b 24 2b |r$+"."..|H4link$+|
|00002840| 3d 22 4c 49 4e 4b 20 2d | 6f 20 22 2b 69 6d 61 67 |="LINK -|o "+imag|
|00002850| 65 24 2b 22 20 22 2b 70 | 72 65 66 69 78 24 2b 22 |e$+" "+p|refix$+"|
|00002860| 2e 6f 2e 22 2b 66 69 6c | 65 24 0d 0d 52 26 e7 20 |.o."+fil|e$..R&. |
|00002870| 6c 69 62 72 61 72 79 24 | 3c 3e 22 22 20 6c 69 6e |library$|<>"" lin|
|00002880| 6b 24 2b 3d 22 20 22 2b | 6c 69 62 72 61 72 79 24 |k$+=" "+|library$|
|00002890| 0d 0d 5c 23 e7 20 76 69 | 61 24 3c 3e 22 22 20 6c |..\#. vi|a$<>"" l|
|000028a0| 69 6e 6b 24 2b 3d 22 20 | 2d 76 69 61 20 22 2b 76 |ink$+=" |-via "+v|
|000028b0| 69 61 24 0d 0d 66 31 e7 | 20 a4 67 65 74 5f 62 75 |ia$..f1.| .get_bu|
|000028c0| 74 74 6f 6e 28 6f 70 74 | 69 6f 6e 73 25 2c 32 34 |tton(opt|ions%,24|
|000028d0| 29 20 6c 69 6e 6b 24 2b | 3d 22 20 2d 76 65 72 62 |) link$+|=" -verb|
|000028e0| 6f 73 65 22 0d 0d 70 0f | 73 71 75 65 65 7a 65 24 |ose"..p.|squeeze$|
|000028f0| 3d 22 22 0d 0d 7a 33 e7 | 20 63 6f 6d 70 69 6c 65 |=""..z3.| compile|
|00002900| 72 5f 64 69 72 24 3c 3e | 22 22 20 73 71 75 65 65 |r_dir$<>|"" squee|
|00002910| 7a 65 24 2b 3d 63 6f 6d | 70 69 6c 65 72 5f 64 69 |ze$+=com|piler_di|
|00002920| 72 24 2b 22 2e 22 0d 0d | 84 1f 73 71 75 65 65 7a |r$+"."..|..squeez|
|00002930| 65 24 2b 3d 22 53 51 55 | 45 45 5a 45 20 22 2b 69 |e$+="SQU|EEZE "+i|
|00002940| 6d 61 67 65 24 0d 0d 8e | 38 ff 28 22 44 69 72 20 |mage$...|8.("Dir |
|00002950| 22 2b 70 72 65 66 69 78 | 24 29 3a 20 f4 20 6f 6e |"+prefix|$): . on|
|00002960| 6c 79 20 75 73 65 64 20 | 62 79 20 43 43 20 74 6f |ly used |by CC to|
|00002970| 20 77 72 69 74 65 20 6f | 75 74 70 75 74 0d 0d 98 | write o|utput...|
|00002980| 32 ff 28 22 43 44 69 72 | 20 22 2b 70 72 65 66 69 |2.("CDir| "+prefi|
|00002990| 78 24 2b 22 2e 6f 22 29 | 3a 20 f4 20 6f 20 64 69 |x$+".o")|: . o di|
|000029a0| 72 65 63 74 6f 72 79 20 | 63 72 65 61 74 65 64 0d |rectory |created.|
|000029b0| 0d a2 4c e7 20 a4 67 65 | 74 5f 62 75 74 74 6f 6e |..L. .ge|t_button|
|000029c0| 28 6f 70 74 69 6f 6e 73 | 25 2c 39 29 20 ff 28 22 |(options|%,9) .("|
|000029d0| 43 44 69 72 20 22 2b 70 | 72 65 66 69 78 24 2b 22 |CDir "+p|refix$+"|
|000029e0| 2e 6c 22 29 3a 20 f4 20 | 6c 20 64 69 72 65 63 74 |.l"): . |l direct|
|000029f0| 6f 72 79 20 63 72 65 61 | 74 65 64 0d 0d ac 2b c8 |ory crea|ted...+.|
|00002a00| 99 20 22 57 69 6d 70 5f | 53 6c 6f 74 53 69 7a 65 |. "Wimp_|SlotSize|
|00002a10| 22 2c 2d 31 2c 2d 31 20 | b8 20 2c 6e 65 78 74 25 |",-1,-1 |. ,next%|
|00002a20| 2c 66 72 65 65 25 0d 0d | b6 16 e7 20 66 72 65 65 |,free%..|... free|
|00002a30| 25 3c 34 30 30 2a 31 30 | 32 34 20 8c 0d 0d c0 34 |%<400*10|24 ....4|
|00002a40| 20 20 f2 77 61 72 6e 69 | 6e 67 62 6f 78 28 22 43 | .warni|ngbox("C|
|00002a50| 61 6e 27 74 20 63 6c 61 | 69 6d 20 65 6e 6f 75 67 |an't cla|im enoug|
|00002a60| 68 20 66 72 65 65 20 6d | 65 6d 6f 72 79 2e 22 29 |h free m|emory.")|
|00002a70| 0d 0d ca 07 20 20 e1 0d | 0d d4 05 cd 0d 0d de 15 |.... ..|........|
|00002a80| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 6e |.. "Hour|glass_On|
|00002a90| 22 0d 0d e8 1f c8 99 20 | 22 57 69 6d 70 5f 53 6c |"...... |"Wimp_Sl|
|00002aa0| 6f 74 53 69 7a 65 22 2c | 2d 31 2c 66 72 65 65 25 |otSize",|-1,free%|
|00002ab0| 0d 0d f2 1b c8 99 20 22 | 57 69 6d 70 5f 53 74 61 |...... "|Wimp_Sta|
|00002ac0| 72 74 54 61 73 6b 22 2c | 63 63 24 0d 0d fc 2e e7 |rtTask",|cc$.....|
|00002ad0| 20 a4 67 65 74 5f 62 75 | 74 74 6f 6e 28 6f 70 74 | .get_bu|tton(opt|
|00002ae0| 69 6f 6e 73 25 2c 32 35 | 29 20 80 20 72 65 70 6f |ions%,25|) . repo|
|00002af0| 72 74 24 3c 3e 22 22 20 | 8c 0d 0e 06 23 20 20 ff |rt$<>"" |....# .|
|00002b00| 28 22 53 65 74 54 79 70 | 65 20 22 2b 72 65 70 6f |("SetTyp|e "+repo|
|00002b10| 72 74 24 2b 22 20 54 65 | 78 74 22 29 0d 0e 10 25 |rt$+" Te|xt")...%|
|00002b20| 20 20 69 64 25 3d 8e 28 | 72 65 70 6f 72 74 24 29 | id%=.(|report$)|
|00002b30| 3a 6c 65 6e 25 3d a2 23 | 69 64 25 3a d9 23 69 64 |:len%=.#|id%:.#id|
|00002b40| 25 0d 0e 1a 24 20 20 e7 | 20 6c 65 6e 25 3d 34 37 |%...$ .| len%=47|
|00002b50| 20 ff 28 22 52 65 6d 6f | 76 65 20 22 2b 72 65 70 | .("Remo|ve "+rep|
|00002b60| 6f 72 74 24 29 0d 0e 24 | 05 cd 0d 0e 2e 48 e7 20 |ort$)..$|.....H. |
|00002b70| a4 67 65 74 5f 62 75 74 | 74 6f 6e 28 6f 70 74 69 |.get_but|ton(opti|
|00002b80| 6f 6e 73 25 2c 34 29 20 | 80 20 a4 72 65 61 64 5f |ons%,4) |. .read_|
|00002b90| 73 79 73 74 65 6d 5f 76 | 61 72 28 22 53 79 73 24 |system_v|ar("Sys$|
|00002ba0| 52 65 74 75 72 6e 43 6f | 64 65 22 29 3d 22 30 22 |ReturnCo|de")="0"|
|00002bb0| 20 8c 0d 0e 38 1f 20 20 | c8 99 20 22 57 69 6d 70 | ...8. |.. "Wimp|
|00002bc0| 5f 53 74 61 72 74 54 61 | 73 6b 22 2c 6c 69 6e 6b |_StartTa|sk",link|
|00002bd0| 24 0d 0e 42 30 20 20 e7 | 20 a4 72 65 61 64 5f 73 |$..B0 .| .read_s|
|00002be0| 79 73 74 65 6d 5f 76 61 | 72 28 22 53 79 73 24 52 |ystem_va|r("Sys$R|
|00002bf0| 65 74 75 72 6e 43 6f 64 | 65 22 29 3d 22 30 22 20 |eturnCod|e")="0" |
|00002c00| 8c 0d 0e 4c 37 20 20 20 | 20 e7 20 a4 67 65 74 5f |...L7 | . .get_|
|00002c10| 62 75 74 74 6f 6e 28 6f | 70 74 69 6f 6e 73 25 2c |button(o|ptions%,|
|00002c20| 31 30 29 20 ff 28 22 52 | 65 6d 6f 76 65 20 6f 2e |10) .("R|emove o.|
|00002c30| 22 2b 66 69 6c 65 24 29 | 0d 0e 56 3e 20 20 20 20 |"+file$)|..V> |
|00002c40| e7 20 a4 67 65 74 5f 62 | 75 74 74 6f 6e 28 6f 70 |. .get_b|utton(op|
|00002c50| 74 69 6f 6e 73 25 2c 38 | 29 20 c8 99 20 22 57 69 |tions%,8|) .. "Wi|
|00002c60| 6d 70 5f 53 74 61 72 74 | 54 61 73 6b 22 2c 73 71 |mp_Start|Task",sq|
|00002c70| 75 65 65 7a 65 24 0d 0e | 60 07 20 20 cd 0d 0e 6a |ueeze$..|`. ...j|
|00002c80| 05 cd 0d 0e 74 1f c8 99 | 20 22 57 69 6d 70 5f 53 |....t...| "Wimp_S|
|00002c90| 6c 6f 74 53 69 7a 65 22 | 2c 2d 31 2c 6e 65 78 74 |lotSize"|,-1,next|
|00002ca0| 25 0d 0e 7e 16 c8 99 20 | 22 48 6f 75 72 67 6c 61 |%..~... |"Hourgla|
|00002cb0| 73 73 5f 4f 66 66 22 0d | 0e 88 05 e1 0d 0e 92 05 |ss_Off".|........|
|00002cc0| 3a 0d 0e 9c 3e dd 20 f2 | 6f 70 65 6e 5f 77 69 6e |:...>. .|open_win|
|00002cd0| 64 6f 77 28 68 61 6e 64 | 6c 65 25 2c 78 30 25 2c |dow(hand|le%,x0%,|
|00002ce0| 79 30 25 2c 78 31 25 2c | 79 31 25 2c 73 63 78 25 |y0%,x1%,|y1%,scx%|
|00002cf0| 2c 73 63 79 25 2c 62 68 | 61 6e 64 6c 65 25 29 0d |,scy%,bh|andle%).|
|00002d00| 0e a6 27 62 6c 6f 63 6b | 25 21 30 3d 68 61 6e 64 |..'block|%!0=hand|
|00002d10| 6c 65 25 3a 62 6c 6f 63 | 6b 25 21 32 38 3d 62 68 |le%:bloc|k%!28=bh|
|00002d20| 61 6e 64 6c 65 25 0d 0e | b0 39 62 6c 6f 63 6b 25 |andle%..|.9block%|
|00002d30| 21 34 3d 78 30 25 3a 62 | 6c 6f 63 6b 25 21 38 3d |!4=x0%:b|lock%!8=|
|00002d40| 79 30 25 3a 62 6c 6f 63 | 6b 25 21 31 32 3d 78 31 |y0%:bloc|k%!12=x1|
|00002d50| 25 3a 62 6c 6f 63 6b 25 | 21 31 36 3d 79 31 25 0d |%:block%|!16=y1%.|
|00002d60| 0e ba 21 62 6c 6f 63 6b | 25 21 32 30 3d 73 63 78 |..!block|%!20=scx|
|00002d70| 25 3a 62 6c 6f 63 6b 25 | 21 32 34 3d 73 63 79 25 |%:block%|!24=scy%|
|00002d80| 0d 0e c4 20 c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 |... .. "|Wimp_Ope|
|00002d90| 6e 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |nWindow"|,,block%|
|00002da0| 0d 0e ce 05 e1 0d 0e d8 | 05 3a 0d 0e e2 15 dd 20 |........|.:..... |
|00002db0| f2 6f 72 69 67 69 6e 28 | 62 6c 6f 63 6b 25 29 0d |.origin(|block%).|
|00002dc0| 0e ec 39 78 30 25 3d 62 | 6c 6f 63 6b 25 21 34 3a |..9x0%=b|lock%!4:|
|00002dd0| 79 30 25 3d 62 6c 6f 63 | 6b 25 21 38 3a 78 31 25 |y0%=bloc|k%!8:x1%|
|00002de0| 3d 62 6c 6f 63 6b 25 21 | 31 32 3a 79 31 25 3d 62 |=block%!|12:y1%=b|
|00002df0| 6c 6f 63 6b 25 21 31 36 | 0d 0e f6 21 73 63 78 25 |lock%!16|...!scx%|
|00002e00| 3d 62 6c 6f 63 6b 25 21 | 32 30 3a 73 63 79 25 3d |=block%!|20:scy%=|
|00002e10| 62 6c 6f 63 6b 25 21 32 | 34 0d 0f 00 1d 62 78 25 |block%!2|4....bx%|
|00002e20| 3d 78 30 25 2d 73 63 78 | 25 3a 62 79 25 3d 79 31 |=x0%-scx|%:by%=y1|
|00002e30| 25 2d 73 63 79 25 0d 0f | 0a 05 e1 0d 0f 14 05 3a |%-scy%..|.......:|
|00002e40| 0d 0f 1e 14 dd 20 f2 67 | 65 74 77 28 68 61 6e 64 |..... .g|etw(hand|
|00002e50| 6c 65 25 29 0d 0f 28 34 | 21 62 6c 6f 63 6b 25 3d |le%)..(4|!block%=|
|00002e60| 68 61 6e 64 6c 65 25 3a | c8 99 20 22 57 69 6d 70 |handle%:|.. "Wimp|
|00002e70| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00002e80| 2c 2c 62 6c 6f 63 6b 25 | 0d 0f 32 37 f2 6f 72 69 |,,block%|..27.ori|
|00002e90| 67 69 6e 28 62 6c 6f 63 | 6b 25 29 3a 62 68 61 6e |gin(bloc|k%):bhan|
|00002ea0| 64 6c 65 25 3d 62 6c 6f | 63 6b 25 21 32 38 3a 66 |dle%=blo|ck%!28:f|
|00002eb0| 6c 61 67 73 25 3d 62 6c | 6f 63 6b 25 21 33 32 0d |lags%=bl|ock%!32.|
|00002ec0| 0f 3c 05 e1 0d 0f 46 05 | 3a 0d 0f 50 15 dd 20 f2 |.<....F.|:..P.. .|
|00002ed0| 66 72 6f 6e 74 28 68 61 | 6e 64 6c 65 25 29 0d 0f |front(ha|ndle%)..|
|00002ee0| 5a 12 f2 67 65 74 77 28 | 68 61 6e 64 6c 65 25 29 |Z..getw(|handle%)|
|00002ef0| 0d 0f 64 36 f2 6f 70 65 | 6e 5f 77 69 6e 64 6f 77 |..d6.ope|n_window|
|00002f00| 28 68 61 6e 64 6c 65 25 | 2c 78 30 25 2c 79 30 25 |(handle%|,x0%,y0%|
|00002f10| 2c 78 31 25 2c 79 31 25 | 2c 73 63 78 25 2c 73 63 |,x1%,y1%|,scx%,sc|
|00002f20| 79 25 2c 2d 31 29 0d 0f | 6e 05 e1 0d 0f 78 05 3a |y%,-1)..|n....x.:|
|00002f30| 0d 0f 82 1c dd 20 f2 63 | 6c 6f 73 65 5f 77 69 6e |..... .c|lose_win|
|00002f40| 64 6f 77 28 68 61 6e 64 | 6c 65 25 29 0d 0f 8c 12 |dow(hand|le%)....|
|00002f50| f2 67 65 74 77 28 68 61 | 6e 64 6c 65 25 29 0d 0f |.getw(ha|ndle%)..|
|00002f60| 96 31 21 62 6c 6f 63 6b | 25 3d 68 61 6e 64 6c 65 |.1!block|%=handle|
|00002f70| 25 3a c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |%:.. "Wi|mp_Close|
|00002f80| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00002f90| 0f a0 05 e1 0d 0f aa 05 | 3a 0d 0f b4 1b dd 20 f2 |........|:..... .|
|00002fa0| 6d 65 73 73 61 67 65 62 | 6f 78 28 6d 65 73 73 61 |messageb|ox(messa|
|00002fb0| 67 65 24 29 0d 0f be 1b | 24 6d 65 73 73 61 67 65 |ge$)....|$message|
|00002fc0| 5f 69 63 6f 6e 25 3d 6d | 65 73 73 61 67 65 24 0d |_icon%=m|essage$.|
|00002fd0| 0f c8 14 f2 66 72 6f 6e | 74 28 6d 65 73 73 61 67 |....fron|t(messag|
|00002fe0| 65 25 29 0d 0f d2 05 e1 | 0d 0f dc 05 3a 0d 0f e6 |e%).....|....:...|
|00002ff0| 1b dd 20 f2 77 61 72 6e | 69 6e 67 62 6f 78 28 77 |.. .warn|ingbox(w|
|00003000| 61 72 6e 69 6e 67 24 29 | 0d 0f f0 1d 21 71 25 3d |arning$)|....!q%=|
|00003010| 30 3a 24 28 71 25 2b 34 | 29 3d 77 61 72 6e 69 6e |0:$(q%+4|)=warnin|
|00003020| 67 24 2b bd 30 0d 0f fa | 27 c8 99 20 22 57 69 6d |g$+.0...|'.. "Wim|
|00003030| 70 5f 52 65 70 6f 72 74 | 45 72 72 6f 72 22 2c 71 |p_Report|Error",q|
|00003040| 25 2c 31 2c 70 72 6f 67 | 72 61 6d 24 0d 10 04 05 |%,1,prog|ram$....|
|00003050| e1 0d 10 0e 05 3a 0d 10 | 18 0f dd 20 f2 65 72 72 |.....:..|... .err|
|00003060| 6f 72 62 6f 78 0d 10 22 | 07 ea 20 85 0d 10 2c 1f |orbox.."|.. ...,.|
|00003070| ee 20 85 20 ea 20 c8 99 | 20 22 57 69 6d 70 5f 43 |. . . ..| "Wimp_C|
|00003080| 6c 6f 73 65 44 6f 77 6e | 22 3a e0 0d 10 36 18 c8 |loseDown|":...6..|
|00003090| 99 20 22 48 6f 75 72 67 | 6c 61 73 73 5f 53 6d 61 |. "Hourg|lass_Sma|
|000030a0| 73 68 22 0d 10 40 2a 21 | 71 25 3d 9f 3a 24 28 71 |sh"..@*!|q%=.:$(q|
|000030b0| 25 2b 34 29 3d f6 24 2b | 22 20 61 74 20 6c 69 6e |%+4)=.$+|" at lin|
|000030c0| 65 20 22 2b c3 28 9e 29 | 2b bd 28 30 29 0d 10 4a |e "+.(.)|+.(0)..J|
|000030d0| 27 c8 99 20 22 57 69 6d | 70 5f 52 65 70 6f 72 74 |'.. "Wim|p_Report|
|000030e0| 45 72 72 6f 72 22 2c 71 | 25 2c 31 2c 70 72 6f 67 |Error",q|%,1,prog|
|000030f0| 72 61 6d 24 0d 10 54 17 | c8 99 20 22 57 69 6d 70 |ram$..T.|.. "Wimp|
|00003100| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 0d 10 5e 05 e1 |_CloseDo|wn"..^..|
|00003110| 0d ff | |.. | |
+--------+-------------------------+-------------------------+--------+--------+
