/ The Datafile PD-CD 3 / PDCD_3.iso / utilities / utilsd / drwimp / Examples / !FontRun / DrWimp

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0c f4 3e 44 72 | 57 69 6d 70 0d 00 14 18 |.....>Dr|Wimp....|
|00000010| f4 20 a9 20 41 6e 64 72 | 65 77 20 41 79 72 65 20 |. . Andr|ew Ayre |
|00000020| 31 39 39 35 0d 00 1e 1e | f4 20 76 65 72 73 69 6f |1995....|. versio|
|00000030| 6e 20 31 2e 30 31 20 28 | 30 31 2d 41 70 72 2d 39 |n 1.01 (|01-Apr-9|
|00000040| 35 29 0d 00 28 05 3a 0d | 00 32 1f f4 20 2a 2a 2a |5)..(.:.|.2.. ***|
|00000050| 20 43 4f 4e 44 49 54 49 | 4f 4e 53 20 4f 46 20 55 | CONDITI|ONS OF U|
|00000060| 53 45 20 2a 2a 2a 0d 00 | 3c 4a f4 20 2d 2d 2d 2d |SE ***..|<J. ----|
|00000070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000b0| 0d 00 46 4a f4 20 44 72 | 57 69 6d 70 20 6d 61 79 |..FJ. Dr|Wimp may|
|000000c0| 20 62 65 20 64 69 73 74 | 72 69 62 75 74 65 64 20 | be dist|ributed |
|000000d0| 66 6f 72 20 66 72 65 65 | 20 61 6e 64 20 77 69 74 |for free| and wit|
|000000e0| 68 6f 75 74 20 74 68 65 | 20 64 6f 63 75 6d 65 6e |hout the| documen|
|000000f0| 74 61 74 69 6f 6e 20 61 | 6e 64 0d 00 50 47 f4 20 |tation a|nd..PG. |
|00000100| 65 78 61 6d 70 6c 65 73 | 20 69 66 20 69 74 20 69 |examples| if it i|
|00000110| 73 20 62 65 69 6e 67 20 | 75 73 65 64 20 69 6e 20 |s being |used in |
|00000120| 61 20 50 75 62 6c 69 63 | 20 44 6f 6d 61 69 6e 2c |a Public| Domain,|
|00000130| 20 53 68 61 72 65 77 61 | 72 65 2c 20 43 6f 76 65 | Sharewa|re, Cove|
|00000140| 72 0d 00 5a 48 f4 20 44 | 69 73 63 20 6f 72 20 44 |r..ZH. D|isc or D|
|00000150| 69 73 63 20 4d 61 67 61 | 7a 69 6e 65 20 70 72 6f |isc Maga|zine pro|
|00000160| 67 72 61 6d 2e 20 49 66 | 20 79 6f 75 20 77 69 73 |gram. If| you wis|
|00000170| 68 20 74 6f 20 64 69 73 | 74 72 69 62 75 74 65 20 |h to dis|tribute |
|00000180| 69 74 20 77 69 74 68 20 | 61 0d 00 64 49 f4 20 63 |it with |a..dI. c|
|00000190| 6f 6d 6d 65 72 69 63 61 | 6c 20 70 72 6f 67 72 61 |ommerica|l progra|
|000001a0| 6d 20 74 68 65 6e 20 63 | 6f 6e 74 61 63 74 20 74 |m then c|ontact t|
|000001b0| 68 65 20 61 75 74 68 6f | 72 20 74 6f 20 6f 62 74 |he autho|r to obt|
|000001c0| 61 69 6e 20 70 65 72 6d | 69 73 73 69 6f 6e 20 61 |ain perm|ission a|
|000001d0| 6e 64 0d 00 6e 1a f4 20 | 6e 65 67 6f 74 69 61 74 |nd..n.. |negotiat|
|000001e0| 65 20 72 6f 79 61 6c 74 | 69 65 73 2e 0d 00 78 46 |e royalt|ies...xF|
|000001f0| f4 20 50 75 62 6c 69 63 | 20 44 6f 6d 61 69 6e 20 |. Public| Domain |
|00000200| 6c 69 62 72 61 72 69 65 | 73 20 6d 61 79 20 63 68 |librarie|s may ch|
|00000210| 61 72 67 65 20 66 6f 72 | 20 6d 61 74 65 72 69 61 |arge for| materia|
|00000220| 6c 73 2c 20 68 61 6e 64 | 6c 69 6e 67 2c 20 65 74 |ls, hand|ling, et|
|00000230| 63 2e 0d 00 82 34 f4 20 | 61 73 20 6c 6f 6e 67 20 |c....4. |as long |
|00000240| 61 73 20 74 68 69 73 20 | 64 6f 65 73 20 6e 6f 20 |as this |does no |
|00000250| 65 78 63 65 65 64 20 a3 | 32 2e 30 30 20 28 55 4b |exceed .|2.00 (UK|
|00000260| 29 20 6e 65 74 2e 0d 00 | 8c 48 f4 20 54 68 69 73 |) net...|.H. This|
|00000270| 20 66 69 6c 65 20 6d 61 | 79 20 6e 6f 74 20 62 65 | file ma|y not be|
|00000280| 20 72 65 70 72 6f 64 75 | 63 65 64 20 69 6e 20 70 | reprodu|ced in p|
|00000290| 61 72 74 2e 20 49 74 20 | 6d 61 79 20 6f 6e 6c 79 |art. It |may only|
|000002a0| 20 62 65 20 72 65 70 72 | 6f 64 75 63 65 64 0d 00 | be repr|oduced..|
|000002b0| 96 45 f4 20 69 6e 20 77 | 68 6f 6c 65 2e 20 49 20 |.E. in w|hole. I |
|000002c0| 72 65 63 6f 6d 6d 65 6e | 64 20 75 73 69 6e 67 20 |recommen|d using |
|000002d0| 21 4d 61 6b 65 41 70 70 | 32 20 61 6e 64 20 21 43 |!MakeApp|2 and !C|
|000002e0| 72 75 6e 63 68 20 66 6f | 72 20 73 65 63 75 72 69 |runch fo|r securi|
|000002f0| 74 79 2e 0d 00 a0 3a f4 | 20 54 68 65 20 61 75 74 |ty....:.| The aut|
|00000300| 68 6f 72 20 72 65 74 61 | 69 6e 73 20 63 6f 70 79 |hor reta|ins copy|
|00000310| 72 69 67 68 74 20 6f 66 | 20 44 72 57 69 6d 70 20 |right of| DrWimp |
|00000320| 61 74 20 61 6c 6c 20 74 | 69 6d 65 73 2e 0d 00 aa |at all t|imes....|
|00000330| 49 f4 20 50 6c 65 61 73 | 65 20 72 65 73 70 65 63 |I. Pleas|e respec|
|00000340| 74 20 74 68 65 73 65 20 | 63 6f 6e 64 69 74 69 6f |t these |conditio|
|00000350| 6e 73 20 6f 66 20 75 73 | 65 2e 20 41 66 74 65 72 |ns of us|e. After|
|00000360| 20 61 6c 6c 2c 20 49 20 | 64 69 64 6e 27 74 20 68 | all, I |didn't h|
|00000370| 61 76 65 20 74 6f 0d 00 | b4 2e f4 20 72 65 6c 65 |ave to..|... rele|
|00000380| 61 73 65 20 44 72 57 69 | 6d 70 20 69 6e 74 6f 20 |ase DrWi|mp into |
|00000390| 74 68 65 20 50 75 62 6c | 69 63 20 44 6f 6d 61 69 |the Publ|ic Domai|
|000003a0| 6e 2e 2e 2e 0d 00 be 46 | f4 20 44 6f 63 75 6d 65 |n......F|. Docume|
|000003b0| 6e 74 61 74 69 6f 6e 20 | 61 6e 64 20 75 74 69 6c |ntation |and util|
|000003c0| 69 74 69 65 73 20 63 61 | 6e 20 62 65 20 6f 62 74 |ities ca|n be obt|
|000003d0| 61 69 6e 65 64 20 66 72 | 6f 6d 20 74 68 65 20 44 |ained fr|om the D|
|000003e0| 61 74 61 66 69 6c 65 20 | 50 44 0d 00 c8 2b f4 20 |atafile |PD...+. |
|000003f0| 6c 69 62 72 61 72 79 20 | 6f 72 20 64 69 72 65 63 |library |or direc|
|00000400| 74 20 66 72 6f 6d 20 74 | 68 65 20 61 75 74 68 6f |t from t|he autho|
|00000410| 72 20 61 74 3a 0d 00 d2 | 27 f4 20 45 2d 6d 61 69 |r at:...|'. E-mai|
|00000420| 6c 3a 20 41 2e 4a 2e 41 | 79 72 65 40 65 2d 65 6e |l: A.J.A|yre@e-en|
|00000430| 67 2e 68 75 6c 6c 2e 61 | 63 2e 75 6b 0d 00 dc 46 |g.hull.a|c.uk...F|
|00000440| f4 20 48 65 6c 70 20 6f | 6e 20 61 6e 79 20 61 73 |. Help o|n any as|
|00000450| 70 65 63 74 20 6f 66 20 | 44 72 57 69 6d 70 20 63 |pect of |DrWimp c|
|00000460| 61 6e 20 62 65 20 6f 62 | 74 61 69 6e 65 64 20 66 |an be ob|tained f|
|00000470| 72 6f 6d 20 74 68 65 20 | 61 75 74 68 6f 72 20 61 |rom the |author a|
|00000480| 74 3a 0d 00 e6 48 f4 20 | 41 6e 64 72 65 77 20 41 |t:...H. |Andrew A|
|00000490| 79 72 65 2c 20 32 34 20 | 53 6b 69 72 62 65 63 6b |yre, 24 |Skirbeck|
|000004a0| 20 52 64 2c 20 47 69 6c | 6c 73 68 69 6c 6c 20 52 | Rd, Gil|lshill R|
|000004b0| 64 2c 20 48 75 6c 6c 2c | 20 45 2e 20 59 6f 72 6b |d, Hull,| E. York|
|000004c0| 73 2e 20 48 55 38 20 30 | 48 52 0d 00 f0 4a f4 20 |s. HU8 0|HR...J. |
|000004d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000500| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000510| 2d 2d 2d 2d 0d 00 fa 05 | 3a 0d 01 04 17 77 69 6d |----....|:....wim|
|00000520| 70 76 65 72 25 3d 28 31 | 2e 30 31 29 2a 31 30 30 |pver%=(1|.01)*100|
|00000530| 0d 01 0e 05 3a 0d 01 18 | 35 dd 20 a4 77 69 6d 70 |....:...|5. .wimp|
|00000540| 5f 69 6e 69 74 69 61 6c | 69 73 65 28 6e 24 2c 77 |_initial|ise(n$,w|
|00000550| 69 6d 70 6d 65 6d 25 2c | 69 63 6f 6e 6d 65 6d 25 |impmem%,|iconmem%|
|00000560| 2c 6d 65 6e 75 6d 65 6d | 25 29 0d 01 22 32 c8 99 |,menumem|%).."2..|
|00000570| 22 57 69 6d 70 5f 49 6e | 69 74 69 61 6c 69 73 65 |"Wimp_In|itialise|
|00000580| 22 2c 32 30 30 2c 26 34 | 42 35 33 34 31 35 34 2c |",200,&4|B534154,|
|00000590| 6e 24 20 b8 20 2c 77 74 | 61 73 6b 25 0d 01 2c 1f |n$ . ,wt|ask%..,.|
|000005a0| e7 20 77 69 6d 70 6d 65 | 6d 25 3c 32 35 36 20 77 |. wimpme|m%<256 w|
|000005b0| 69 6d 70 6d 65 6d 25 3d | 32 35 36 0d 01 36 14 de |impmem%=|256..6..|
|000005c0| 20 77 69 6d 70 25 20 77 | 69 6d 70 6d 65 6d 25 0d | wimp% w|impmem%.|
|000005d0| 01 40 18 de 20 77 6d 65 | 6e 75 62 75 66 25 20 6d |.@.. wme|nubuf% m|
|000005e0| 65 6e 75 6d 65 6d 25 0d | 01 4a 16 de 20 77 69 63 |enumem%.|.J.. wic|
|000005f0| 6f 6e 73 25 20 69 63 6f | 6e 6d 65 6d 25 0d 01 54 |ons% ico|nmem%..T|
|00000600| 1e 77 69 63 6f 6e 6d 61 | 78 25 3d 77 69 63 6f 6e |.wiconma|x%=wicon|
|00000610| 73 25 2b 69 63 6f 6e 6d | 65 6d 25 0d 01 5e 0d 77 |s%+iconm|em%..^.w|
|00000620| 42 41 4e 4e 45 52 3d a3 | 0d 01 68 0a 4e 55 4c 4c |BANNER=.|..h.NULL|
|00000630| 3d a3 0d 01 72 0b 3d 77 | 74 61 73 6b 25 0d 01 7c |=...r.=w|task%..||
|00000640| 05 3a 0d 01 86 10 dd 20 | f2 77 69 6d 70 5f 70 6f |.:..... |.wimp_po|
|00000650| 6c 6c 0d 01 90 0d ea 20 | 72 65 61 73 6f 6e 25 0d |ll..... |reason%.|
|00000660| 01 9a 0f 66 69 6e 69 73 | 68 65 64 25 3d a3 0d 01 |...finis|hed%=...|
|00000670| a4 05 f5 0d 01 ae 29 c8 | 99 22 57 69 6d 70 5f 50 |......).|."Wimp_P|
|00000680| 6f 6c 6c 22 2c 30 2c 77 | 69 6d 70 25 20 b8 20 72 |oll",0,w|imp% . r|
|00000690| 65 61 73 6f 6e 25 2c 77 | 69 6d 70 25 0d 01 b8 10 |eason%,w|imp%....|
|000006a0| c8 8e 20 72 65 61 73 6f | 6e 25 20 ca 0d 01 c2 18 |.. reaso|n% .....|
|000006b0| c9 20 30 20 3a 20 f2 77 | 69 6d 70 5f 70 6f 6c 6c |. 0 : .w|imp_poll|
|000006c0| 6e 75 6c 6c 0d 01 cc 20 | c9 20 31 20 3a 20 f2 77 |null... |. 1 : .w|
|000006d0| 69 6d 70 5f 70 6f 6c 6c | 72 65 64 72 61 77 77 69 |imp_poll|redrawwi|
|000006e0| 6e 64 6f 77 0d 01 d6 1e | c9 20 32 20 3a 20 f2 77 |ndow....|. 2 : .w|
|000006f0| 69 6d 70 5f 70 6f 6c 6c | 6f 70 65 6e 77 69 6e 64 |imp_poll|openwind|
|00000700| 6f 77 0d 01 e0 1f c9 20 | 33 20 3a 20 f2 77 69 6d |ow..... |3 : .wim|
|00000710| 70 5f 70 6f 6c 6c 63 6c | 6f 73 65 77 69 6e 64 6f |p_pollcl|osewindo|
|00000720| 77 0d 01 ea 26 c9 20 34 | 20 3a 20 f2 75 73 65 72 |w...&. 4| : .user|
|00000730| 5f 6c 65 61 76 69 6e 67 | 77 69 6e 64 6f 77 28 77 |_leaving|window(w|
|00000740| 69 6d 70 25 21 30 29 0d | 01 f4 27 c9 20 35 20 3a |imp%!0).|..'. 5 :|
|00000750| 20 f2 75 73 65 72 5f 65 | 6e 74 65 72 69 6e 67 77 | .user_e|nteringw|
|00000760| 69 6e 64 6f 77 28 77 69 | 6d 70 25 21 30 29 0d 01 |indow(wi|mp%!0)..|
|00000770| fe 1e c9 20 36 20 3a 20 | f2 77 69 6d 70 5f 70 6f |... 6 : |.wimp_po|
|00000780| 6c 6c 6d 6f 75 73 65 63 | 6c 69 63 6b 0d 02 08 1f |llmousec|lick....|
|00000790| c9 20 37 20 3a 20 f2 77 | 69 6d 70 5f 70 6f 6c 6c |. 7 : .w|imp_poll|
|000007a0| 73 61 76 65 6d 65 73 73 | 61 67 65 0d 02 12 1c c9 |savemess|age.....|
|000007b0| 20 38 20 3a 20 f2 77 69 | 6d 70 5f 70 6f 6c 6c 6b | 8 : .wi|mp_pollk|
|000007c0| 65 79 70 72 65 73 73 0d | 02 1c 21 c9 20 39 20 3a |eypress.|..!. 9 :|
|000007d0| 20 f2 77 69 6d 70 5f 70 | 6f 6c 6c 6d 65 6e 75 73 | .wimp_p|ollmenus|
|000007e0| 65 6c 65 63 74 69 6f 6e | 0d 02 26 0a c9 20 31 30 |election|..&.. 10|
|000007f0| 20 3a 0d 02 30 0a c9 20 | 31 31 20 3a 0d 02 3a 0a | :..0.. |11 :..:.|
|00000800| c9 20 31 32 20 3a 0d 02 | 44 0a c9 20 31 33 20 3a |. 12 :..|D.. 13 :|
|00000810| 0d 02 4e 0a c9 20 31 34 | 20 3a 0d 02 58 0a c9 20 |..N.. 14| :..X.. |
|00000820| 31 35 20 3a 0d 02 62 0a | c9 20 31 36 20 3a 0d 02 |15 :..b.|. 16 :..|
|00000830| 6c 1f c9 20 31 37 2c 31 | 38 20 3a 20 f2 77 69 6d |l.. 17,1|8 : .wim|
|00000840| 70 5f 70 6f 6c 6c 6d 65 | 73 73 61 67 65 0d 02 76 |p_pollme|ssage..v|
|00000850| 0a c9 20 31 39 20 3a 0d | 02 80 05 cb 0d 02 8a 0f |.. 19 :.|........|
|00000860| fd 20 66 69 6e 69 73 68 | 65 64 25 0d 02 94 16 c8 |. finish|ed%.....|
|00000870| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e |."Wimp_C|loseDown|
|00000880| 22 0d 02 9e 05 e1 0d 02 | a8 05 3a 0d 02 b2 1c dd |".......|..:.....|
|00000890| 20 f2 77 69 6d 70 5f 70 | 6f 6c 6c 72 65 64 72 61 | .wimp_p|ollredra|
|000008a0| 77 77 69 6e 64 6f 77 0d | 02 bc 0a ea 20 66 6c 61 |wwindow.|.... fla|
|000008b0| 67 0d 02 c6 27 c8 99 22 | 57 69 6d 70 5f 52 65 64 |g...'.."|Wimp_Red|
|000008c0| 72 61 77 57 69 6e 64 6f | 77 22 2c 2c 77 69 6d 70 |rawWindo|w",,wimp|
|000008d0| 25 20 b8 20 66 6c 61 67 | 0d 02 d0 0b c8 95 20 66 |% . flag|...... f|
|000008e0| 6c 61 67 0d 02 da 3d f2 | 75 73 65 72 5f 72 65 64 |lag...=.|user_red|
|000008f0| 72 61 77 28 77 69 6d 70 | 25 21 30 2c 77 69 6d 70 |raw(wimp|%!0,wimp|
|00000900| 25 21 32 38 2c 77 69 6d | 70 25 21 33 32 2c 77 69 |%!28,wim|p%!32,wi|
|00000910| 6d 70 25 21 33 36 2c 77 | 69 6d 70 25 21 34 30 29 |mp%!36,w|imp%!40)|
|00000920| 0d 02 e4 27 c8 99 22 57 | 69 6d 70 5f 47 65 74 52 |...'.."W|imp_GetR|
|00000930| 65 63 74 61 6e 67 6c 65 | 22 2c 2c 77 69 6d 70 25 |ectangle|",,wimp%|
|00000940| 20 b8 20 66 6c 61 67 0d | 02 ee 05 ce 0d 02 f8 05 | . flag.|........|
|00000950| e1 0d 03 02 05 3a 0d 03 | 0c 1a dd 20 f2 77 69 6d |.....:..|... .wim|
|00000960| 70 5f 70 6f 6c 6c 6f 70 | 65 6e 77 69 6e 64 6f 77 |p_pollop|enwindow|
|00000970| 0d 03 16 1d ea 20 61 25 | 2c 73 74 61 63 6b 25 2c |..... a%|,stack%,|
|00000980| 68 65 69 67 68 74 25 2c | 78 25 2c 79 25 0d 03 20 |height%,|x%,y%.. |
|00000990| 1a 61 25 3d a4 75 73 65 | 72 5f 70 61 6e 65 28 77 |.a%=.use|r_pane(w|
|000009a0| 69 6d 70 25 21 30 29 0d | 03 2a 13 73 74 61 63 6b |imp%!0).|.*.stack|
|000009b0| 25 3d 77 69 6d 70 25 21 | 32 38 0d 03 34 31 e7 20 |%=wimp%!|28..41. |
|000009c0| 61 25 3c 3e 2d 31 20 80 | 20 77 69 6d 70 25 21 32 |a%<>-1 .| wimp%!2|
|000009d0| 38 3d 2d 32 20 f2 77 69 | 6d 70 5f 77 69 6e 61 6e |8=-2 .wi|mp_winan|
|000009e0| 64 70 61 6e 65 62 61 63 | 6b 3a e1 0d 03 3e 18 e7 |dpanebac|k:...>..|
|000009f0| 20 61 25 3c 3e 2d 31 20 | 77 69 6d 70 25 21 32 38 | a%<>-1 |wimp%!28|
|00000a00| 3d 61 25 0d 03 48 1e c8 | 99 22 57 69 6d 70 5f 4f |=a%..H..|."Wimp_O|
|00000a10| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 77 69 6d 70 |penWindo|w",,wimp|
|00000a20| 25 0d 03 52 1c 68 65 69 | 67 68 74 25 3d 77 69 6d |%..R.hei|ght%=wim|
|00000a30| 70 25 21 31 36 2d 77 69 | 6d 70 25 21 38 0d 03 5c |p%!16-wi|mp%!8..\|
|00000a40| 16 79 25 3d 77 69 6d 70 | 25 21 38 2b 68 65 69 67 |.y%=wimp|%!8+heig|
|00000a50| 68 74 25 0d 03 66 0e 78 | 25 3d 77 69 6d 70 25 21 |ht%..f.x|%=wimp%!|
|00000a60| 34 0d 03 70 2a f2 75 73 | 65 72 5f 6f 70 65 6e 77 |4..p*.us|er_openw|
|00000a70| 69 6e 64 6f 77 28 77 69 | 6d 70 25 21 30 2c 78 25 |indow(wi|mp%!0,x%|
|00000a80| 2c 79 25 2c 73 74 61 63 | 6b 25 29 0d 03 7a 05 e1 |,y%,stac|k%)..z..|
|00000a90| 0d 03 84 05 3a 0d 03 8e | 1a dd 20 f2 77 69 6d 70 |....:...|.. .wimp|
|00000aa0| 5f 77 69 6e 61 6e 64 70 | 61 6e 65 62 61 63 6b 0d |_winandp|aneback.|
|00000ab0| 03 98 36 ea 20 77 68 61 | 6e 25 2c 6d 69 6e 78 25 |..6. wha|n%,minx%|
|00000ac0| 2c 6d 69 6e 79 25 2c 6d | 61 78 78 25 2c 6d 61 78 |,miny%,m|axx%,max|
|00000ad0| 79 25 2c 73 63 72 78 25 | 2c 73 63 72 79 25 2c 73 |y%,scrx%|,scry%,s|
|00000ae0| 74 61 63 6b 25 0d 03 a2 | 11 77 68 61 6e 25 3d 77 |tack%...|.whan%=w|
|00000af0| 69 6d 70 25 21 30 0d 03 | ac 3d 6d 69 6e 78 25 3d |imp%!0..|.=minx%=|
|00000b00| 77 69 6d 70 25 21 34 3a | 6d 69 6e 79 25 3d 77 69 |wimp%!4:|miny%=wi|
|00000b10| 6d 70 25 21 38 3a 6d 61 | 78 78 25 3d 77 69 6d 70 |mp%!8:ma|xx%=wimp|
|00000b20| 25 21 31 32 3a 6d 61 78 | 79 25 3d 77 69 6d 70 25 |%!12:max|y%=wimp%|
|00000b30| 21 31 36 0d 03 b6 31 73 | 63 72 78 25 3d 77 69 6d |!16...1s|crx%=wim|
|00000b40| 70 25 21 32 30 3a 73 63 | 72 79 25 3d 77 69 6d 70 |p%!20:sc|ry%=wimp|
|00000b50| 25 21 32 34 3a 73 74 61 | 63 6b 25 3d 77 69 6d 70 |%!24:sta|ck%=wimp|
|00000b60| 25 21 32 38 0d 03 c0 0e | 77 69 6d 70 25 21 30 3d |%!28....|wimp%!0=|
|00000b70| 61 25 0d 03 ca 22 c8 99 | 22 57 69 6d 70 5f 47 65 |a%..."..|"Wimp_Ge|
|00000b80| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 2c 77 |tWindowS|tate",,w|
|00000b90| 69 6d 70 25 0d 03 d4 13 | 77 69 6d 70 25 21 32 38 |imp%....|wimp%!28|
|00000ba0| 3d 73 74 61 63 6b 25 0d | 03 de 1e c8 99 22 57 69 |=stack%.|....."Wi|
|00000bb0| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|00000bc0| 77 69 6d 70 25 0d 03 e8 | 4b 77 69 6d 70 25 21 30 |wimp%...|Kwimp%!0|
|00000bd0| 3d 77 68 61 6e 25 3a 77 | 69 6d 70 25 21 34 3d 6d |=whan%:w|imp%!4=m|
|00000be0| 69 6e 78 25 3a 77 69 6d | 70 25 21 38 3d 6d 69 6e |inx%:wim|p%!8=min|
|00000bf0| 79 25 3a 77 69 6d 70 25 | 21 31 32 3d 6d 61 78 78 |y%:wimp%|!12=maxx|
|00000c00| 25 3a 77 69 6d 70 25 21 | 31 36 3d 6d 61 78 79 25 |%:wimp%!|16=maxy%|
|00000c10| 0d 03 f2 31 77 69 6d 70 | 25 21 32 30 3d 73 63 72 |...1wimp|%!20=scr|
|00000c20| 78 25 3a 77 69 6d 70 25 | 21 32 34 3d 73 63 72 79 |x%:wimp%|!24=scry|
|00000c30| 25 3a 77 69 6d 70 25 21 | 32 38 3d 73 74 61 63 6b |%:wimp%!|28=stack|
|00000c40| 25 0d 03 fc 1e c8 99 22 | 57 69 6d 70 5f 4f 70 65 |%......"|Wimp_Ope|
|00000c50| 6e 57 69 6e 64 6f 77 22 | 2c 2c 77 69 6d 70 25 0d |nWindow"|,,wimp%.|
|00000c60| 04 06 05 e1 0d 04 10 05 | 3a 0d 04 1a 2c dd 20 f2 |........|:...,. .|
|00000c70| 77 69 6d 70 5f 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |wimp_ope|nwindow(|
|00000c80| 77 68 61 6e 25 2c 63 65 | 6e 74 72 65 25 2c 73 74 |whan%,ce|ntre%,st|
|00000c90| 61 63 6b 25 29 0d 04 24 | 13 ea 20 68 65 69 67 68 |ack%)..$|.. heigh|
|00000ca0| 74 25 2c 78 25 2c 79 25 | 0d 04 2e 11 77 69 6d 70 |t%,x%,y%|....wimp|
|00000cb0| 25 21 30 3d 77 68 61 6e | 25 0d 04 38 21 c8 99 22 |%!0=whan|%..8!.."|
|00000cc0| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 49 6e |Wimp_Get|WindowIn|
|00000cd0| 66 6f 22 2c 2c 77 69 6d | 70 25 0d 04 42 22 e7 20 |fo",,wim|p%..B". |
|00000ce0| 63 65 6e 74 72 65 25 3d | 31 20 f2 77 69 6d 70 5f |centre%=|1 .wimp_|
|00000cf0| 63 65 6e 74 72 65 77 69 | 6e 64 6f 77 0d 04 4c 13 |centrewi|ndow..L.|
|00000d00| 77 69 6d 70 25 21 32 38 | 3d 73 74 61 63 6b 25 0d |wimp%!28|=stack%.|
|00000d10| 04 56 1e c8 99 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |.V..."Wi|mp_OpenW|
|00000d20| 69 6e 64 6f 77 22 2c 2c | 77 69 6d 70 25 0d 04 60 |indow",,|wimp%..`|
|00000d30| 22 c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |".."Wimp|_GetWind|
|00000d40| 6f 77 53 74 61 74 65 22 | 2c 2c 77 69 6d 70 25 0d |owState"|,,wimp%.|
|00000d50| 04 6a 1c 68 65 69 67 68 | 74 25 3d 77 69 6d 70 25 |.j.heigh|t%=wimp%|
|00000d60| 21 31 36 2d 77 69 6d 70 | 25 21 38 0d 04 74 16 79 |!16-wimp|%!8..t.y|
|00000d70| 25 3d 77 69 6d 70 25 21 | 38 2b 68 65 69 67 68 74 |%=wimp%!|8+height|
|00000d80| 25 0d 04 7e 0e 78 25 3d | 77 69 6d 70 25 21 34 0d |%..~.x%=|wimp%!4.|
|00000d90| 04 88 28 f2 75 73 65 72 | 5f 6f 70 65 6e 77 69 6e |..(.user|_openwin|
|00000da0| 64 6f 77 28 77 68 61 6e | 25 2c 78 25 2c 79 25 2c |dow(whan|%,x%,y%,|
|00000db0| 73 74 61 63 6b 25 29 0d | 04 92 05 e1 0d 04 9c 05 |stack%).|........|
|00000dc0| 3a 0d 04 a6 2c dd 20 f2 | 77 69 6d 70 5f 6f 70 65 |:...,. .|wimp_ope|
|00000dd0| 6e 77 69 6e 64 6f 77 61 | 74 28 77 68 61 6e 25 2c |nwindowa|t(whan%,|
|00000de0| 78 25 2c 79 25 2c 73 74 | 61 63 6b 25 29 0d 04 b0 |x%,y%,st|ack%)...|
|00000df0| 14 ea 20 77 69 64 74 68 | 25 2c 68 65 69 67 68 74 |.. width|%,height|
|00000e00| 25 0d 04 ba 11 77 69 6d | 70 25 21 30 3d 77 68 61 |%....wim|p%!0=wha|
|00000e10| 6e 25 0d 04 c4 22 c8 99 | 22 57 69 6d 70 5f 47 65 |n%..."..|"Wimp_Ge|
|00000e20| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 2c 77 |tWindowS|tate",,w|
|00000e30| 69 6d 70 25 0d 04 ce 1b | 77 69 64 74 68 25 3d 77 |imp%....|width%=w|
|00000e40| 69 6d 70 25 21 31 32 2d | 77 69 6d 70 25 21 34 0d |imp%!12-|wimp%!4.|
|00000e50| 04 d8 1c 68 65 69 67 68 | 74 25 3d 77 69 6d 70 25 |...heigh|t%=wimp%|
|00000e60| 21 31 36 2d 77 69 6d 70 | 25 21 38 0d 04 e2 11 77 |!16-wimp|%!8....w|
|00000e70| 69 6d 70 25 21 30 3d 77 | 68 61 6e 25 0d 04 ec 0e |imp%!0=w|han%....|
|00000e80| 77 69 6d 70 25 21 34 3d | 78 25 0d 04 f6 16 77 69 |wimp%!4=|x%....wi|
|00000e90| 6d 70 25 21 38 3d 79 25 | 2d 68 65 69 67 68 74 25 |mp%!8=y%|-height%|
|00000ea0| 0d 05 00 16 77 69 6d 70 | 25 21 31 32 3d 78 25 2b |....wimp|%!12=x%+|
|00000eb0| 77 69 64 74 68 25 0d 05 | 0a 0f 77 69 6d 70 25 21 |width%..|..wimp%!|
|00000ec0| 31 36 3d 79 25 0d 05 14 | 13 77 69 6d 70 25 21 32 |16=y%...|.wimp%!2|
|00000ed0| 38 3d 73 74 61 63 6b 25 | 0d 05 1e 1e c8 99 22 57 |8=stack%|......"W|
|00000ee0| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|00000ef0| 2c 77 69 6d 70 25 0d 05 | 28 28 f2 75 73 65 72 5f |,wimp%..|((.user_|
|00000f00| 6f 70 65 6e 77 69 6e 64 | 6f 77 28 77 68 61 6e 25 |openwind|ow(whan%|
|00000f10| 2c 78 25 2c 79 25 2c 73 | 74 61 63 6b 25 29 0d 05 |,x%,y%,s|tack%)..|
|00000f20| 32 05 e1 0d 05 3c 05 3a | 0d 05 46 1b dd 20 f2 77 |2....<.:|..F.. .w|
|00000f30| 69 6d 70 5f 70 6f 6c 6c | 63 6c 6f 73 65 77 69 6e |imp_poll|closewin|
|00000f40| 64 6f 77 0d 05 50 1f c8 | 99 22 57 69 6d 70 5f 43 |dow..P..|."Wimp_C|
|00000f50| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 77 69 6d |loseWind|ow",,wim|
|00000f60| 70 25 0d 05 5a 1e f2 75 | 73 65 72 5f 63 6c 6f 73 |p%..Z..u|ser_clos|
|00000f70| 65 77 69 6e 64 6f 77 28 | 77 69 6d 70 25 21 30 29 |ewindow(|wimp%!0)|
|00000f80| 0d 05 64 05 e1 0d 05 6e | 05 3a 0d 05 78 20 dd 20 |..d....n|.:..x . |
|00000f90| f2 77 69 6d 70 5f 63 6c | 6f 73 65 77 69 6e 64 6f |.wimp_cl|osewindo|
|00000fa0| 77 28 77 69 6e 64 6f 77 | 25 29 0d 05 82 13 77 69 |w(window|%)....wi|
|00000fb0| 6d 70 25 21 30 3d 77 69 | 6e 64 6f 77 25 0d 05 8c |mp%!0=wi|ndow%...|
|00000fc0| 1f c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |..."Wimp|_CloseWi|
|00000fd0| 6e 64 6f 77 22 2c 2c 77 | 69 6d 70 25 0d 05 96 05 |ndow",,w|imp%....|
|00000fe0| e1 0d 05 a0 05 3a 0d 05 | aa 1a dd 20 f2 77 69 6d |.....:..|... .wim|
|00000ff0| 70 5f 70 6f 6c 6c 6d 6f | 75 73 65 63 6c 69 63 6b |p_pollmo|useclick|
|00001000| 0d 05 b4 0d ea 20 6d 68 | 61 6e 25 2c 79 0d 05 be |..... mh|an%,y...|
|00001010| 2a e7 20 77 69 6d 70 25 | 21 38 3d 36 34 20 f2 77 |*. wimp%|!8=64 .w|
|00001020| 69 6d 70 5f 73 74 61 72 | 74 64 72 61 67 28 77 69 |imp_star|tdrag(wi|
|00001030| 6d 70 25 21 31 32 29 0d | 05 c8 5c e7 20 77 69 6d |mp%!12).|..\. wim|
|00001040| 70 25 21 38 3c 3e 32 20 | 80 20 a4 75 73 65 72 5f |p%!8<>2 |. .user_|
|00001050| 73 61 76 65 66 69 6c 65 | 74 79 70 65 28 77 69 6d |savefile|type(wim|
|00001060| 70 25 21 31 32 29 3c 3e | 22 22 20 80 20 77 69 6d |p%!12)<>|"" . wim|
|00001070| 70 25 21 31 36 3d 32 20 | f2 77 69 6d 70 5f 71 75 |p%!16=2 |.wimp_qu|
|00001080| 69 63 6b 73 61 76 65 28 | 77 69 6d 70 25 21 31 32 |icksave(|wimp%!12|
|00001090| 29 3a e1 0d 05 d2 3e e7 | 20 77 69 6d 70 25 21 38 |):....>.| wimp%!8|
|000010a0| 3c 3e 32 20 f2 75 73 65 | 72 5f 6d 6f 75 73 65 63 |<>2 .use|r_mousec|
|000010b0| 6c 69 63 6b 28 77 69 6d | 70 25 21 31 32 2c 77 69 |lick(wim|p%!12,wi|
|000010c0| 6d 70 25 21 31 36 2c 77 | 69 6d 70 25 21 38 29 3a |mp%!16,w|imp%!8):|
|000010d0| e1 0d 05 dc 14 77 69 6e | 64 6f 77 25 3d 77 69 6d |.....win|dow%=wim|
|000010e0| 70 25 21 31 32 0d 05 e6 | 27 6d 68 61 6e 25 3d a4 |p%!12...|'mhan%=.|
|000010f0| 75 73 65 72 5f 6d 65 6e | 75 28 77 69 6d 70 25 21 |user_men|u(wimp%!|
|00001100| 31 32 2c 77 69 6d 70 25 | 21 31 36 29 0d 05 f0 0f |12,wimp%|!16)....|
|00001110| e7 20 6d 68 61 6e 25 3d | 30 20 e1 0d 05 fa 22 c8 |. mhan%=|0 ....".|
|00001120| 99 22 57 69 6d 70 5f 47 | 65 74 50 6f 69 6e 74 65 |."Wimp_G|etPointe|
|00001130| 72 49 6e 66 6f 22 2c 2c | 77 69 6d 70 25 0d 06 04 |rInfo",,|wimp%...|
|00001140| 25 79 3d 28 28 a4 77 69 | 6d 70 5f 6d 65 6e 75 73 |%y=((.wi|mp_menus|
|00001150| 69 7a 65 28 6d 68 61 6e | 25 29 29 2a 34 34 29 2b |ize(mhan|%))*44)+|
|00001160| 39 36 0d 06 0e 10 c8 8e | 20 77 69 6e 64 6f 77 25 |96......| window%|
|00001170| 20 ca 0d 06 18 34 c9 20 | 2d 32 20 20 20 3a 20 c8 | ....4. |-2   : .|
|00001180| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e |."Wimp_C|reateMen|
|00001190| 75 22 2c 2c 6d 68 61 6e | 25 2c 77 69 6d 70 25 21 |u",,mhan|%,wimp%!|
|000011a0| 30 2d 36 34 2c 79 0d 06 | 22 38 7f 20 3a 20 c8 99 |0-64,y..|"8. : ..|
|000011b0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|000011c0| 22 2c 2c 6d 68 61 6e 25 | 2c 77 69 6d 70 25 21 30 |",,mhan%|,wimp%!0|
|000011d0| 2d 36 34 2c 77 69 6d 70 | 25 21 34 2b 32 30 0d 06 |-64,wimp|%!4+20..|
|000011e0| 2c 05 cb 0d 06 36 14 77 | 6c 61 73 74 6d 65 6e 75 |,....6.w|lastmenu|
|000011f0| 25 3d 6d 68 61 6e 25 0d | 06 40 05 e1 0d 06 4a 05 |%=mhan%.|.@....J.|
|00001200| 3a 0d 06 54 27 dd 20 f2 | 77 69 6d 70 5f 6d 65 6e |:..T'. .|wimp_men|
|00001210| 75 70 6f 70 75 70 28 6d | 68 61 6e 25 2c 62 61 72 |upopup(m|han%,bar|
|00001220| 25 2c 78 25 2c 79 25 29 | 0d 06 5e 0d c8 8e 20 62 |%,x%,y%)|..^... b|
|00001230| 61 72 25 20 ca 0d 06 68 | 30 c9 20 31 20 20 20 20 |ar% ...h|0. 1    |
|00001240| 3a 20 c8 99 22 57 69 6d | 70 5f 43 72 65 61 74 65 |: .."Wim|p_Create|
|00001250| 4d 65 6e 75 22 2c 2c 6d | 68 61 6e 25 2c 78 25 2b |Menu",,m|han%,x%+|
|00001260| 36 34 2c 39 36 0d 06 72 | 2e 7f 20 3a 20 c8 99 22 |64,96..r|.. : .."|
|00001270| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|00001280| 2c 2c 6d 68 61 6e 25 2c | 78 25 2b 36 34 2c 79 25 |,,mhan%,|x%+64,y%|
|00001290| 2b 32 30 0d 06 7c 05 cb | 0d 06 86 14 77 6c 61 73 |+20..|..|....wlas|
|000012a0| 74 6d 65 6e 75 25 3d 6d | 68 61 6e 25 0d 06 90 05 |tmenu%=m|han%....|
|000012b0| e1 0d 06 9a 05 3a 0d 06 | a4 27 dd 20 a4 77 69 6d |.....:..|.'. .wim|
|000012c0| 70 5f 69 63 6f 6e 62 61 | 72 28 73 70 72 69 74 65 |p_iconba|r(sprite|
|000012d0| 24 2c 74 65 78 74 24 2c | 70 6f 73 25 29 0d 06 ae |$,text$,|pos%)...|
|000012e0| 0b ea 20 69 68 61 6e 25 | 0d 06 b8 0b 70 6f 73 25 |.. ihan%|....pos%|
|000012f0| 2d 3d 32 0d 06 c2 2d e7 | 20 74 65 78 74 24 3d 22 |-=2...-.| text$="|
|00001300| 22 20 3d a4 77 69 6d 70 | 5f 69 63 6f 6e 62 61 72 |" =.wimp|_iconbar|
|00001310| 73 70 28 73 70 72 69 74 | 65 24 2c 70 6f 73 25 29 |sp(sprit|e$,pos%)|
|00001320| 0d 06 cc 21 de 20 77 69 | 73 70 72 69 74 65 32 25 |...!. wi|sprite2%|
|00001330| 20 32 30 2c 77 69 73 70 | 72 5f 74 78 74 25 20 31 | 20,wisp|r_txt% 1|
|00001340| 32 0d 06 d6 1b 24 77 69 | 73 70 72 69 74 65 32 25 |2....$wi|sprite2%|
|00001350| 3d 22 73 22 2b 73 70 72 | 69 74 65 24 0d 06 e0 1a |="s"+spr|ite$....|
|00001360| 24 77 69 73 70 72 5f 74 | 78 74 25 3d c0 74 65 78 |$wispr_t|xt%=.tex|
|00001370| 74 24 2c 31 32 29 0d 06 | ea 10 77 69 6d 70 25 21 |t$,12)..|..wimp%!|
|00001380| 30 3d 70 6f 73 25 0d 06 | f4 0d 77 69 6d 70 25 21 |0=pos%..|..wimp%!|
|00001390| 34 3d 30 0d 06 fe 0f 77 | 69 6d 70 25 21 38 3d 2d |4=0....w|imp%!8=-|
|000013a0| 31 36 0d 07 08 10 77 69 | 6d 70 25 21 31 32 3d 31 |16....wi|mp%!12=1|
|000013b0| 32 38 0d 07 12 0f 77 69 | 6d 70 25 21 31 36 3d 38 |28....wi|mp%!16=8|
|000013c0| 38 0d 07 1c 16 77 69 6d | 70 25 21 32 30 3d 26 31 |8....wim|p%!20=&1|
|000013d0| 37 30 30 33 31 30 42 0d | 07 26 17 77 69 6d 70 25 |700310B.|.&.wimp%|
|000013e0| 21 32 34 3d 77 69 73 70 | 72 5f 74 78 74 25 0d 07 |!24=wisp|r_txt%..|
|000013f0| 30 17 77 69 6d 70 25 21 | 32 38 3d 77 69 73 70 72 |0.wimp%!|28=wispr|
|00001400| 69 74 65 32 25 0d 07 3a | 0f 77 69 6d 70 25 21 33 |ite2%..:|.wimp%!3|
|00001410| 32 3d 31 31 0d 07 44 0e | 77 42 41 52 54 45 58 54 |2=11..D.|wBARTEXT|
|00001420| 3d b9 0d 07 4e 27 c8 99 | 20 22 57 69 6d 70 5f 43 |=...N'..| "Wimp_C|
|00001430| 72 65 61 74 65 49 63 6f | 6e 22 2c 2c 77 69 6d 70 |reateIco|n",,wimp|
|00001440| 25 20 b8 20 69 68 61 6e | 25 0d 07 58 07 3d 2d 32 |% . ihan|%..X.=-2|
|00001450| 0d 07 62 05 3a 0d 07 6c | 23 dd 20 a4 77 69 6d 70 |..b.:..l|#. .wimp|
|00001460| 5f 69 63 6f 6e 62 61 72 | 73 70 28 73 70 72 69 74 |_iconbar|sp(sprit|
|00001470| 65 24 2c 70 6f 73 25 29 | 0d 07 76 0b ea 20 69 68 |e$,pos%)|..v.. ih|
|00001480| 61 6e 25 0d 07 80 10 77 | 69 6d 70 25 21 30 3d 70 |an%....w|imp%!0=p|
|00001490| 6f 73 25 0d 07 8a 0d 77 | 69 6d 70 25 21 34 3d 30 |os%....w|imp%!4=0|
|000014a0| 0d 07 94 0d 77 69 6d 70 | 25 21 38 3d 30 0d 07 9e |....wimp|%!8=0...|
|000014b0| 0f 77 69 6d 70 25 21 31 | 32 3d 36 38 0d 07 a8 0f |.wimp%!1|2=68....|
|000014c0| 77 69 6d 70 25 21 31 36 | 3d 36 30 0d 07 b2 12 77 |wimp%!16|=60....w|
|000014d0| 69 6d 70 25 21 32 30 3d | 26 33 30 30 32 0d 07 bc |imp%!20=|&3002...|
|000014e0| 17 24 28 77 69 6d 70 25 | 2b 32 34 29 3d 73 70 72 |.$(wimp%|+24)=spr|
|000014f0| 69 74 65 24 0d 07 c6 0e | 77 42 41 52 54 45 58 54 |ite$....|wBARTEXT|
|00001500| 3d a3 0d 07 d0 26 c8 99 | 22 57 69 6d 70 5f 43 72 |=....&..|"Wimp_Cr|
|00001510| 65 61 74 65 49 63 6f 6e | 22 2c 2c 77 69 6d 70 25 |eateIcon|",,wimp%|
|00001520| 20 b8 20 69 68 61 6e 25 | 0d 07 da 07 3d 2d 32 0d | . ihan%|....=-2.|
|00001530| 07 e4 05 3a 0d 07 ee 18 | dd 20 f2 77 69 6d 70 5f |...:....|. .wimp_|
|00001540| 63 65 6e 74 72 65 77 69 | 6e 64 6f 77 0d 07 f8 3f |centrewi|ndow...?|
|00001550| ea 20 78 30 2c 79 30 2c | 78 31 2c 79 31 2c 77 77 |. x0,y0,|x1,y1,ww|
|00001560| 69 64 74 68 2c 77 68 65 | 69 67 68 74 2c 58 45 69 |idth,whe|ight,XEi|
|00001570| 67 2c 59 45 69 67 2c 73 | 78 2c 73 79 2c 73 77 69 |g,YEig,s|x,sy,swi|
|00001580| 64 74 68 2c 73 68 65 69 | 67 68 74 0d 08 02 19 78 |dth,shei|ght....x|
|00001590| 30 3d 77 69 6d 70 25 21 | 34 3a 79 30 3d 77 69 6d |0=wimp%!|4:y0=wim|
|000015a0| 70 25 21 38 0d 08 0c 1b | 78 31 3d 77 69 6d 70 25 |p%!8....|x1=wimp%|
|000015b0| 21 31 32 3a 79 31 3d 77 | 69 6d 70 25 21 31 36 0d |!12:y1=w|imp%!16.|
|000015c0| 08 16 1e 77 77 69 64 74 | 68 3d 78 31 2d 78 30 3a |...wwidt|h=x1-x0:|
|000015d0| 77 68 65 69 67 68 74 3d | 79 31 2d 79 30 0d 08 20 |wheight=|y1-y0.. |
|000015e0| 29 c8 99 22 4f 53 5f 52 | 65 61 64 4d 6f 64 65 56 |).."OS_R|eadModeV|
|000015f0| 61 72 69 61 62 6c 65 22 | 2c 2d 31 2c 34 20 b8 20 |ariable"|,-1,4 . |
|00001600| 2c 2c 58 45 69 67 0d 08 | 2a 29 c8 99 22 4f 53 5f |,,XEig..|*).."OS_|
|00001610| 52 65 61 64 4d 6f 64 65 | 56 61 72 69 61 62 6c 65 |ReadMode|Variable|
|00001620| 22 2c 2d 31 2c 35 20 b8 | 20 2c 2c 59 45 69 67 0d |",-1,5 .| ,,YEig.|
|00001630| 08 34 28 c8 99 22 4f 53 | 5f 52 65 61 64 4d 6f 64 |.4(.."OS|_ReadMod|
|00001640| 65 56 61 72 69 61 62 6c | 65 22 2c 2d 31 2c 31 31 |eVariabl|e",-1,11|
|00001650| 20 b8 20 2c 2c 73 78 0d | 08 3e 28 c8 99 22 4f 53 | . ,,sx.|.>(.."OS|
|00001660| 5f 52 65 61 64 4d 6f 64 | 65 56 61 72 69 61 62 6c |_ReadMod|eVariabl|
|00001670| 65 22 2c 2d 31 2c 31 32 | 20 b8 20 2c 2c 73 79 0d |e",-1,12| . ,,sy.|
|00001680| 08 48 13 73 77 69 64 74 | 68 3d 73 78 3c 3c 58 45 |.H.swidt|h=sx<<XE|
|00001690| 69 67 0d 08 52 14 73 68 | 65 69 67 68 74 3d 73 79 |ig..R.sh|eight=sy|
|000016a0| 3c 3c 59 45 69 67 0d 08 | 5c 18 78 30 3d 28 73 77 |<<YEig..|\.x0=(sw|
|000016b0| 69 64 74 68 2d 77 77 69 | 64 74 68 29 2f 32 0d 08 |idth-wwi|dth)/2..|
|000016c0| 66 1a 79 30 3d 28 73 68 | 65 69 67 68 74 2d 77 68 |f.y0=(sh|eight-wh|
|000016d0| 65 69 67 68 74 29 2f 32 | 0d 08 70 19 77 69 6d 70 |eight)/2|..p.wimp|
|000016e0| 25 21 34 3d 78 30 3a 77 | 69 6d 70 25 21 38 3d 79 |%!4=x0:w|imp%!8=y|
|000016f0| 30 0d 08 7a 1e 78 31 3d | 78 30 2b 77 77 69 64 74 |0..z.x1=|x0+wwidt|
|00001700| 68 3a 79 31 3d 79 30 2b | 77 68 65 69 67 68 74 0d |h:y1=y0+|wheight.|
|00001710| 08 84 1b 77 69 6d 70 25 | 21 31 32 3d 78 31 3a 77 |...wimp%|!12=x1:w|
|00001720| 69 6d 70 25 21 31 36 3d | 79 31 0d 08 8e 05 e1 0d |imp%!16=|y1......|
|00001730| 08 98 05 3a 0d 08 a2 1d | dd 20 a4 77 69 6d 70 5f |...:....|. .wimp_|
|00001740| 6d 65 73 73 6c 6f 6f 6b | 30 28 74 6f 6b 65 6e 24 |messlook|0(token$|
|00001750| 29 0d 08 ac 0c ea 20 76 | 61 6c 75 65 24 0d 08 b6 |)..... v|alue$...|
|00001760| 4a c8 99 22 4d 65 73 73 | 61 67 65 54 72 61 6e 73 |J.."Mess|ageTrans|
|00001770| 5f 4c 6f 6f 6b 75 70 22 | 2c 77 6d 73 67 73 25 2c |_Lookup"|,wmsgs%,|
|00001780| 74 6f 6b 65 6e 24 2c 77 | 6d 73 67 5f 6f 75 74 25 |token$,w|msg_out%|
|00001790| 2c 32 35 36 2c 30 2c 30 | 2c 30 2c 30 20 b8 20 2c |,256,0,0|,0,0 . ,|
|000017a0| 2c 76 61 6c 75 65 24 0d | 08 c0 0b 3d 76 61 6c 75 |,value$.|...=valu|
|000017b0| 65 24 0d 08 ca 05 3a 0d | 08 d4 21 dd 20 a4 77 69 |e$....:.|..!. .wi|
|000017c0| 6d 70 5f 6d 65 73 73 6c | 6f 6f 6b 31 28 74 6f 6b |mp_messl|ook1(tok|
|000017d0| 65 6e 24 2c 70 31 24 29 | 0d 08 de 0c ea 20 76 61 |en$,p1$)|..... va|
|000017e0| 6c 75 65 24 0d 08 e8 4c | c8 99 22 4d 65 73 73 61 |lue$...L|.."Messa|
|000017f0| 67 65 54 72 61 6e 73 5f | 4c 6f 6f 6b 75 70 22 2c |geTrans_|Lookup",|
|00001800| 77 6d 73 67 73 25 2c 74 | 6f 6b 65 6e 24 2c 77 6d |wmsgs%,t|oken$,wm|
|00001810| 73 67 5f 6f 75 74 25 2c | 32 35 36 2c 70 31 24 2c |sg_out%,|256,p1$,|
|00001820| 30 2c 30 2c 30 20 b8 20 | 2c 2c 76 61 6c 75 65 24 |0,0,0 . |,,value$|
|00001830| 0d 08 f2 0b 3d 76 61 6c | 75 65 24 0d 08 fc 05 3a |....=val|ue$....:|
|00001840| 0d 09 06 25 dd 20 a4 77 | 69 6d 70 5f 6d 65 73 73 |...%. .w|imp_mess|
|00001850| 6c 6f 6f 6b 32 28 74 6f | 6b 65 6e 24 2c 70 31 24 |look2(to|ken$,p1$|
|00001860| 2c 70 32 24 29 0d 09 10 | 0c ea 20 76 61 6c 75 65 |,p2$)...|.. value|
|00001870| 24 0d 09 1a 4e c8 99 22 | 4d 65 73 73 61 67 65 54 |$...N.."|MessageT|
|00001880| 72 61 6e 73 5f 4c 6f 6f | 6b 75 70 22 2c 77 6d 73 |rans_Loo|kup",wms|
|00001890| 67 73 25 2c 74 6f 6b 65 | 6e 24 2c 77 6d 73 67 5f |gs%,toke|n$,wmsg_|
|000018a0| 6f 75 74 25 2c 32 35 36 | 2c 70 31 24 2c 70 32 24 |out%,256|,p1$,p2$|
|000018b0| 2c 30 2c 30 20 b8 20 2c | 2c 76 61 6c 75 65 24 0d |,0,0 . ,|,value$.|
|000018c0| 09 24 0b 3d 76 61 6c 75 | 65 24 0d 09 2e 05 3a 0d |.$.=valu|e$....:.|
|000018d0| 09 38 1f dd 20 f2 77 69 | 6d 70 5f 69 6e 69 74 6d |.8.. .wi|mp_initm|
|000018e0| 65 73 73 61 67 65 73 28 | 66 69 6c 65 24 29 0d 09 |essages(|file$)..|
|000018f0| 42 0b ea 20 73 69 7a 65 | 25 0d 09 4c 2e c8 99 22 |B.. size|%..L..."|
|00001900| 4d 65 73 73 61 67 65 54 | 72 61 6e 73 5f 46 69 6c |MessageT|rans_Fil|
|00001910| 65 49 6e 66 6f 22 2c 2c | 66 69 6c 65 24 20 b8 20 |eInfo",,|file$ . |
|00001920| 2c 2c 73 69 7a 65 25 0d | 09 56 18 de 20 77 6d 73 |,,size%.|.V.. wms|
|00001930| 67 5f 62 75 66 66 65 72 | 25 20 73 69 7a 65 25 0d |g_buffer|% size%.|
|00001940| 09 60 10 de 20 77 6d 73 | 67 73 25 20 32 35 36 0d |.`.. wms|gs% 256.|
|00001950| 09 6a 16 24 28 77 6d 73 | 67 73 25 2b 31 36 29 3d |.j.$(wms|gs%+16)=|
|00001960| 66 69 6c 65 24 0d 09 74 | 3b c8 99 22 4d 65 73 73 |file$..t|;.."Mess|
|00001970| 61 67 65 54 72 61 6e 73 | 5f 4f 70 65 6e 46 69 6c |ageTrans|_OpenFil|
|00001980| 65 22 2c 77 6d 73 67 73 | 25 2c 77 6d 73 67 73 25 |e",wmsgs|%,wmsgs%|
|00001990| 2b 31 36 2c 77 6d 73 67 | 5f 62 75 66 66 65 72 25 |+16,wmsg|_buffer%|
|000019a0| 0d 09 7e 13 de 20 77 6d | 73 67 5f 6f 75 74 25 20 |..~.. wm|sg_out% |
|000019b0| 32 35 36 0d 09 88 05 e1 | 0d 09 92 05 3a 0d 09 9c |256.....|....:...|
|000019c0| 24 dd 20 a4 77 69 6d 70 | 5f 67 65 74 69 63 6f 6e |$. .wimp|_geticon|
|000019d0| 74 65 78 74 28 77 68 61 | 6e 25 2c 69 63 6f 6e 25 |text(wha|n%,icon%|
|000019e0| 29 0d 09 a6 11 77 69 6d | 70 25 21 30 3d 77 68 61 |)....wim|p%!0=wha|
|000019f0| 6e 25 0d 09 b0 11 77 69 | 6d 70 25 21 34 3d 69 63 |n%....wi|mp%!4=ic|
|00001a00| 6f 6e 25 0d 09 ba 20 c8 | 99 22 57 69 6d 70 5f 47 |on%... .|."Wimp_G|
|00001a10| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 77 69 |etIconSt|ate",,wi|
|00001a20| 6d 70 25 0d 09 c4 10 3d | 24 28 77 69 6d 70 25 21 |mp%....=|$(wimp%!|
|00001a30| 32 38 29 0d 09 ce 05 3a | 0d 09 d8 2a dd 20 f2 77 |28)....:|...*. .w|
|00001a40| 69 6d 70 5f 70 75 74 69 | 63 6f 6e 74 65 78 74 28 |imp_puti|context(|
|00001a50| 77 68 61 6e 25 2c 69 63 | 6f 6e 25 2c 74 65 78 74 |whan%,ic|on%,text|
|00001a60| 24 29 0d 09 e2 0b ea 20 | 66 6c 61 67 25 0d 09 ec |$)..... |flag%...|
|00001a70| 10 e7 20 77 68 61 6e 25 | 3d 2d 32 20 e1 0d 09 f6 |.. whan%|=-2 ....|
|00001a80| 11 77 69 6d 70 25 21 30 | 3d 77 68 61 6e 25 0d 0a |.wimp%!0|=whan%..|
|00001a90| 00 11 77 69 6d 70 25 21 | 34 3d 69 63 6f 6e 25 0d |..wimp%!|4=icon%.|
|00001aa0| 0a 0a 20 c8 99 22 57 69 | 6d 70 5f 47 65 74 49 63 |.. .."Wi|mp_GetIc|
|00001ab0| 6f 6e 53 74 61 74 65 22 | 2c 2c 77 69 6d 70 25 0d |onState"|,,wimp%.|
|00001ac0| 0a 14 12 66 6c 61 67 25 | 3d 77 69 6d 70 25 21 32 |...flag%|=wimp%!2|
|00001ad0| 34 0d 0a 1e 14 66 6c 61 | 67 25 3d 28 66 6c 61 67 |4....fla|g%=(flag|
|00001ae0| 25 3e 3e 38 29 0d 0a 28 | 54 e7 20 28 66 6c 61 67 |%>>8)..(|T. (flag|
|00001af0| 25 20 80 20 31 29 20 3d | 30 20 f2 77 69 6d 70 5f |% . 1) =|0 .wimp_|
|00001b00| 65 72 72 6f 72 28 22 44 | 72 57 69 6d 70 22 2c 22 |error("D|rWimp","|
|00001b10| 49 63 6f 6e 20 22 2b c3 | 69 63 6f 6e 25 2b 22 20 |Icon "+.|icon%+" |
|00001b20| 69 73 20 6e 6f 74 20 69 | 6e 64 69 72 65 63 74 65 |is not i|ndirecte|
|00001b30| 64 22 2c 31 2c 31 29 3a | e1 0d 0a 32 0d 77 69 6d |d",1,1):|...2.wim|
|00001b40| 70 25 21 38 3d 30 0d 0a | 3c 0e 77 69 6d 70 25 21 |p%!8=0..|<.wimp%!|
|00001b50| 31 32 3d 30 0d 0a 46 12 | 24 28 77 69 6d 70 25 21 |12=0..F.|$(wimp%!|
|00001b60| 32 38 29 3d 22 22 0d 0a | 50 20 c8 99 22 57 69 6d |28)=""..|P .."Wim|
|00001b70| 70 5f 53 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_SetIco|nState",|
|00001b80| 2c 77 69 6d 70 25 0d 0a | 5a 0d 77 69 6d 70 25 21 |,wimp%..|Z.wimp%!|
|00001b90| 38 3d 30 0d 0a 64 0e 77 | 69 6d 70 25 21 31 32 3d |8=0..d.w|imp%!12=|
|00001ba0| 30 0d 0a 6e 15 24 28 77 | 69 6d 70 25 21 32 38 29 |0..n.$(w|imp%!28)|
|00001bb0| 3d 74 65 78 74 24 0d 0a | 78 20 c8 99 22 57 69 6d |=text$..|x .."Wim|
|00001bc0| 70 5f 53 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_SetIco|nState",|
|00001bd0| 2c 77 69 6d 70 25 0d 0a | 82 05 e1 0d 0a 8c 05 3a |,wimp%..|.......:|
|00001be0| 0d 0a 96 1b dd 20 f2 77 | 69 6d 70 5f 70 6f 6c 6c |..... .w|imp_poll|
|00001bf0| 73 61 76 65 6d 65 73 73 | 61 67 65 0d 0a a0 15 ea |savemess|age.....|
|00001c00| 20 77 69 6e 25 2c 69 63 | 6f 25 2c 78 25 2c 79 25 | win%,ic|o%,x%,y%|
|00001c10| 0d 0a aa 22 c8 99 22 57 | 69 6d 70 5f 47 65 74 50 |...".."W|imp_GetP|
|00001c20| 6f 69 6e 74 65 72 49 6e | 66 6f 22 2c 2c 77 69 6d |ointerIn|fo",,wim|
|00001c30| 70 25 0d 0a b4 11 77 69 | 6e 25 3d 77 69 6d 70 25 |p%....wi|n%=wimp%|
|00001c40| 21 31 32 0d 0a be 11 69 | 63 6f 25 3d 77 69 6d 70 |!12....i|co%=wimp|
|00001c50| 25 21 31 36 0d 0a c8 0d | 78 25 3d 21 77 69 6d 70 |%!16....|x%=!wimp|
|00001c60| 25 0d 0a d2 0e 79 25 3d | 77 69 6d 70 25 21 34 0d |%....y%=|wimp%!4.|
|00001c70| 0a dc 3f 24 28 77 69 6d | 70 25 2b 34 34 29 3d a4 |..?$(wim|p%+44)=.|
|00001c80| 77 69 6d 70 5f 67 65 74 | 6c 65 61 66 6e 61 6d 65 |wimp_get|leafname|
|00001c90| 28 a4 77 69 6d 70 5f 67 | 65 74 69 63 6f 6e 74 65 |(.wimp_g|eticonte|
|00001ca0| 78 74 28 77 73 61 76 65 | 77 25 2c 31 29 29 0d 0a |xt(wsave|w%,1))..|
|00001cb0| e6 11 77 69 6d 70 25 21 | 32 30 3d 77 69 6e 25 0d |..wimp%!|20=win%.|
|00001cc0| 0a f0 11 77 69 6d 70 25 | 21 32 34 3d 69 63 6f 25 |...wimp%|!24=ico%|
|00001cd0| 0d 0a fa 0f 77 69 6d 70 | 25 21 32 38 3d 78 25 0d |....wimp|%!28=x%.|
|00001ce0| 0b 04 0f 77 69 6d 70 25 | 21 33 32 3d 79 25 0d 0b |...wimp%|!32=y%..|
|00001cf0| 0e 11 77 69 6d 70 25 21 | 33 36 3d 31 30 32 34 0d |..wimp%!|36=1024.|
|00001d00| 0b 18 0d 21 77 69 6d 70 | 25 3d 36 34 0d 0b 22 0e |...!wimp|%=64..".|
|00001d10| 77 69 6d 70 25 21 31 32 | 3d 30 0d 0b 2c 0e 77 69 |wimp%!12|=0..,.wi|
|00001d20| 6d 70 25 21 31 36 3d 31 | 0d 0b 36 11 77 69 6d 70 |mp%!16=1|..6.wimp|
|00001d30| 25 21 34 30 3d 26 46 46 | 44 0d 0b 40 33 c8 99 22 |%!40=&FF|D..@3.."|
|00001d40| 57 69 6d 70 5f 53 65 6e | 64 4d 65 73 73 61 67 65 |Wimp_Sen|dMessage|
|00001d50| 22 2c 31 38 2c 77 69 6d | 70 25 2c 77 69 6d 70 25 |",18,wim|p%,wimp%|
|00001d60| 21 32 30 2c 77 69 6d 70 | 25 21 32 34 0d 0b 4a 05 |!20,wimp|%!24..J.|
|00001d70| e1 0d 0b 54 05 3a 0d 0b | 5e 18 dd 20 f2 77 69 6d |...T.:..|^.. .wim|
|00001d80| 70 5f 70 6f 6c 6c 6b 65 | 79 70 72 65 73 73 0d 0b |p_pollke|ypress..|
|00001d90| 68 0a ea 20 64 6f 6e 65 | 0d 0b 72 5a e7 20 a4 75 |h.. done|..rZ. .u|
|00001da0| 73 65 72 5f 73 61 76 65 | 66 69 6c 65 74 79 70 65 |ser_save|filetype|
|00001db0| 28 77 69 6d 70 25 21 30 | 29 3c 3e 22 22 20 80 20 |(wimp%!0|)<>"" . |
|00001dc0| 77 69 6d 70 25 21 34 3d | 31 20 80 20 77 69 6d 70 |wimp%!4=|1 . wimp|
|00001dd0| 25 21 32 34 3d 31 33 20 | f2 77 69 6d 70 5f 71 75 |%!24=13 |.wimp_qu|
|00001de0| 69 63 6b 73 61 76 65 28 | 77 69 6d 70 25 21 30 29 |icksave(|wimp%!0)|
|00001df0| 3a e1 0d 0b 7c 31 64 6f | 6e 65 3d a4 75 73 65 72 |:...|1do|ne=.user|
|00001e00| 5f 6b 65 79 70 72 65 73 | 73 28 77 69 6d 70 25 21 |_keypres|s(wimp%!|
|00001e10| 30 2c 77 69 6d 70 25 21 | 34 2c 77 69 6d 70 25 21 |0,wimp%!|4,wimp%!|
|00001e20| 32 34 29 0d 0b 86 29 e7 | 20 64 6f 6e 65 3d 30 20 |24)...).| done=0 |
|00001e30| c8 99 22 57 69 6d 70 5f | 50 72 6f 63 65 73 73 4b |.."Wimp_|ProcessK|
|00001e40| 65 79 22 2c 77 69 6d 70 | 25 21 32 34 0d 0b 90 05 |ey",wimp|%!24....|
|00001e50| e1 0d 0b 9a 05 3a 0d 0b | a4 1d dd 20 f2 77 69 6d |.....:..|... .wim|
|00001e60| 70 5f 70 6f 6c 6c 6d 65 | 6e 75 73 65 6c 65 63 74 |p_pollme|nuselect|
|00001e70| 69 6f 6e 0d 0b ae 33 c8 | 99 22 57 69 6d 70 5f 44 |ion...3.|."Wimp_D|
|00001e80| 65 63 6f 64 65 4d 65 6e | 75 22 2c 2c 77 6c 61 73 |ecodeMen|u",,wlas|
|00001e90| 74 6d 65 6e 75 25 2c 77 | 69 6d 70 25 2c 77 6d 65 |tmenu%,w|imp%,wme|
|00001ea0| 6e 75 62 75 66 25 0d 0b | b8 2e f2 77 69 6d 70 5f |nubuf%..|...wimp_|
|00001eb0| 67 65 74 6d 65 6e 75 61 | 6e 64 69 74 65 6d 28 77 |getmenua|nditem(w|
|00001ec0| 6c 61 73 74 6d 65 6e 75 | 25 2c 77 6d 65 6e 75 62 |lastmenu|%,wmenub|
|00001ed0| 75 66 25 29 0d 0b c2 26 | f2 75 73 65 72 5f 6d 65 |uf%)...&|.user_me|
|00001ee0| 6e 75 73 65 6c 65 63 74 | 69 6f 6e 28 77 6d 65 6e |nuselect|ion(wmen|
|00001ef0| 75 25 2c 77 69 74 65 6d | 25 29 0d 0b cc 22 c8 99 |u%,witem|%)..."..|
|00001f00| 22 57 69 6d 70 5f 47 65 | 74 50 6f 69 6e 74 65 72 |"Wimp_Ge|tPointer|
|00001f10| 49 6e 66 6f 22 2c 2c 77 | 69 6d 70 25 0d 0b d6 12 |Info",,w|imp%....|
|00001f20| e7 20 77 69 6d 70 25 21 | 38 3c 3e 31 20 e1 0d 0b |. wimp%!|8<>1 ...|
|00001f30| e0 39 c8 99 22 57 69 6d | 70 5f 43 72 65 61 74 65 |.9.."Wim|p_Create|
|00001f40| 4d 65 6e 75 22 2c 2c 77 | 6c 61 73 74 6d 65 6e 75 |Menu",,w|lastmenu|
|00001f50| 25 2c 77 69 6d 70 25 21 | 30 2d 36 34 2c 77 69 6d |%,wimp%!|0-64,wim|
|00001f60| 70 25 21 34 2b 32 30 0d | 0b ea 05 e1 0d 0b f4 05 |p%!4+20.|........|
|00001f70| 3a 0d 0b fe 17 dd 20 f2 | 77 69 6d 70 5f 70 6f 6c |:..... .|wimp_pol|
|00001f80| 6c 6d 65 73 73 61 67 65 | 0d 0c 08 11 c8 8e 20 77 |lmessage|...... w|
|00001f90| 69 6d 70 25 21 31 36 20 | ca 0d 0c 12 18 c9 20 30 |imp%!16 |...... 0|
|00001fa0| 20 20 20 20 3a 20 66 69 | 6e 69 73 68 65 64 25 3d |    : fi|nished%=|
|00001fb0| b9 0d 0c 1c 1e c9 20 31 | 20 20 20 20 3a 20 f2 77 |...... 1|    : .w|
|00001fc0| 69 6d 70 5f 64 61 74 61 | 6c 6f 61 64 61 70 70 0d |imp_data|loadapp.|
|00001fd0| 0c 26 1b c9 20 32 20 20 | 20 20 3a 20 f2 77 69 6d |.&.. 2  |  : .wim|
|00001fe0| 70 5f 64 61 74 61 73 61 | 76 65 0d 0c 30 1b c9 20 |p_datasa|ve..0.. |
|00001ff0| 33 20 20 20 20 3a 20 f2 | 77 69 6d 70 5f 64 61 74 |3    : .|wimp_dat|
|00002000| 61 6c 6f 61 64 0d 0c 3a | 17 c9 20 26 35 30 32 20 |aload..:|.. &502 |
|00002010| 3a 20 f2 77 69 6d 70 5f | 68 65 6c 70 0d 0c 44 05 |: .wimp_|help..D.|
|00002020| cb 0d 0c 4e 05 e1 0d 0c | 58 05 3a 0d 0c 62 2c dd |...N....|X.:..b,.|
|00002030| 20 f2 77 69 6d 70 5f 65 | 72 72 6f 72 28 74 69 74 | .wimp_e|rror(tit|
|00002040| 6c 65 24 2c 65 72 72 6f | 72 24 2c 62 75 74 74 6f |le$,erro|r$,butto|
|00002050| 6e 2c 66 72 6f 6d 29 0d | 0c 6c 1b ea 20 70 72 65 |n,from).|.l.. pre|
|00002060| 24 2c 66 6c 61 67 73 25 | 2c 6f 6b 2c 63 61 6e 63 |$,flags%|,ok,canc|
|00002070| 65 6c 0d 0c 76 0b 70 72 | 65 24 3d 22 22 0d 0c 80 |el..v.pr|e$=""...|
|00002080| 28 e7 20 66 72 6f 6d 3d | 32 20 66 72 6f 6d 3d 30 |(. from=|2 from=0|
|00002090| 3a 70 72 65 24 3d 22 4d | 65 73 73 61 67 65 20 66 |:pre$="M|essage f|
|000020a0| 72 6f 6d 20 22 0d 0c 8a | 12 66 72 6f 6d 3d 94 28 |rom "...|.from=.(|
|000020b0| 31 2d 66 72 6f 6d 29 0d | 0c 94 1c e7 20 62 75 74 |1-from).|.... but|
|000020c0| 74 6f 6e 3d 31 20 6f 6b | 3d 31 3a 63 61 6e 63 65 |ton=1 ok|=1:cance|
|000020d0| 6c 3d 30 0d 0c 9e 1c e7 | 20 62 75 74 74 6f 6e 3d |l=0.....| button=|
|000020e0| 32 20 6f 6b 3d 30 3a 63 | 61 6e 63 65 6c 3d 31 0d |2 ok=0:c|ancel=1.|
|000020f0| 0c a8 31 66 6c 61 67 73 | 25 3d 6f 6b 2b 28 63 61 |..1flags|%=ok+(ca|
|00002100| 6e 63 65 6c 3c 3c 31 29 | 2b 28 30 3c 3c 32 29 2b |ncel<<1)|+(0<<2)+|
|00002110| 28 30 3c 3c 33 29 2b 28 | 66 72 6f 6d 3c 3c 34 29 |(0<<3)+(|from<<4)|
|00002120| 0d 0c b2 0d 77 69 6d 70 | 25 21 30 3d 30 0d 0c bc |....wimp|%!0=0...|
|00002130| 15 24 28 77 69 6d 70 25 | 2b 34 29 3d 65 72 72 6f |.$(wimp%|+4)=erro|
|00002140| 72 24 0d 0c c6 31 c8 99 | 22 57 69 6d 70 5f 52 65 |r$...1..|"Wimp_Re|
|00002150| 70 6f 72 74 45 72 72 6f | 72 22 2c 77 69 6d 70 25 |portErro|r",wimp%|
|00002160| 2c 66 6c 61 67 73 25 2c | 70 72 65 24 2b 74 69 74 |,flags%,|pre$+tit|
|00002170| 6c 65 24 0d 0c d0 05 e1 | 0d 0c da 05 3a 0d 0c e4 |le$.....|....:...|
|00002180| 2b dd 20 a4 77 69 6d 70 | 5f 65 72 72 6f 72 63 68 |+. .wimp|_errorch|
|00002190| 6f 69 63 65 28 74 69 74 | 6c 65 24 2c 65 72 72 6f |oice(tit|le$,erro|
|000021a0| 72 24 2c 66 72 6f 6d 29 | 0d 0c ee 1a ea 20 70 72 |r$,from)|..... pr|
|000021b0| 65 24 2c 66 6c 61 67 73 | 25 2c 72 65 73 70 6f 6e |e$,flags|%,respon|
|000021c0| 73 65 0d 0c f8 0b 70 72 | 65 24 3d 22 22 0d 0d 02 |se....pr|e$=""...|
|000021d0| 28 e7 20 66 72 6f 6d 3d | 32 20 66 72 6f 6d 3d 30 |(. from=|2 from=0|
|000021e0| 3a 70 72 65 24 3d 22 4d | 65 73 73 61 67 65 20 66 |:pre$="M|essage f|
|000021f0| 72 6f 6d 20 22 0d 0d 0c | 12 66 72 6f 6d 3d 94 28 |rom "...|.from=.(|
|00002200| 31 2d 66 72 6f 6d 29 0d | 0d 16 2b 66 6c 61 67 73 |1-from).|..+flags|
|00002210| 25 3d 31 2b 28 31 3c 3c | 31 29 2b 28 30 3c 3c 32 |%=1+(1<<|1)+(0<<2|
|00002220| 29 2b 28 30 3c 3c 33 29 | 2b 28 66 72 6f 6d 3c 3c |)+(0<<3)|+(from<<|
|00002230| 34 29 0d 0d 20 0d 77 69 | 6d 70 25 21 30 3d 30 0d |4).. .wi|mp%!0=0.|
|00002240| 0d 2a 15 24 28 77 69 6d | 70 25 21 34 29 3d 65 72 |.*.$(wim|p%!4)=er|
|00002250| 72 6f 72 24 0d 0d 34 3c | c8 99 22 57 69 6d 70 5f |ror$..4<|.."Wimp_|
|00002260| 52 65 70 6f 72 74 45 72 | 72 6f 72 22 2c 77 69 6d |ReportEr|ror",wim|
|00002270| 70 25 2c 66 6c 61 67 73 | 25 2c 70 72 65 24 2b 74 |p%,flags|%,pre$+t|
|00002280| 69 74 6c 65 24 20 b8 20 | 72 65 73 70 6f 6e 73 65 |itle$ . |response|
|00002290| 0d 0d 3e 13 e7 20 72 65 | 73 6f 6e 73 65 3d 31 20 |..>.. re|sonse=1 |
|000022a0| 3d 2d 31 0d 0d 48 06 3d | 30 0d 0d 52 05 3a 0d 0d |=-1..H.=|0..R.:..|
|000022b0| 5c 23 dd 20 a4 77 69 6d | 70 5f 63 72 65 61 74 65 |\#. .wim|p_create|
|000022c0| 6d 65 6e 75 28 6d 65 6e | 75 24 2c 73 69 7a 65 25 |menu(men|u$,size%|
|000022d0| 29 0d 0d 66 34 ea 20 77 | 6d 65 6e 75 25 2c 6e 75 |)..f4. w|menu%,nu|
|000022e0| 6d 2c 71 2c 4c 2c 6d 66 | 6c 61 67 73 25 2c 61 25 |m,q,L,mf|lags%,a%|
|000022f0| 2c 77 69 64 74 68 25 2c | 65 78 74 72 61 25 2c 74 |,width%,|extra%,t|
|00002300| 69 74 6c 65 24 0d 0d 70 | 24 6e 75 6d 3d a4 77 69 |itle$..p|$num=.wi|
|00002310| 6d 70 5f 6e 75 6d 62 65 | 72 6f 66 65 6e 74 72 69 |mp_numbe|rofentri|
|00002320| 65 73 28 6d 65 6e 75 24 | 29 0d 0d 7a 0a 6e 75 6d |es(menu$|)..z.num|
|00002330| 2d 3d 31 0d 0d 84 18 e7 | 20 73 69 7a 65 25 3c 3d |-=1.....| size%<=|
|00002340| 6e 75 6d 20 73 69 7a 65 | 25 3d 30 0d 0d 8e 22 e7 |num size|%=0...".|
|00002350| 20 73 69 7a 65 25 3d 30 | 20 de 20 77 6d 65 6e 75 | size%=0| . wmenu|
|00002360| 25 20 28 6e 75 6d 2a 32 | 34 29 2b 32 38 0d 0d 98 |% (num*2|4)+28...|
|00002370| 3f e7 20 73 69 7a 65 25 | 3e 30 20 65 78 74 72 61 |?. size%|>0 extra|
|00002380| 25 3d 73 69 7a 65 25 2d | 6e 75 6d 3a de 20 77 6d |%=size%-|num:. wm|
|00002390| 65 6e 75 25 20 28 6e 75 | 6d 2a 32 34 29 2b 32 38 |enu% (nu|m*24)+28|
|000023a0| 2b 28 65 78 74 72 61 25 | 2a 32 34 29 0d 0d a2 11 |+(extra%|*24)....|
|000023b0| 71 3d a7 6d 65 6e 75 24 | 2c 22 2f 22 29 0d 0d ac |q=.menu$|,"/")...|
|000023c0| 16 74 69 74 6c 65 24 3d | c0 6d 65 6e 75 24 2c 71 |.title$=|.menu$,q|
|000023d0| 2d 31 29 0d 0d b6 25 e7 | 20 a9 28 74 69 74 6c 65 |-1)...%.| .(title|
|000023e0| 24 29 3e 31 31 20 74 69 | 74 6c 65 24 3d c0 74 69 |$)>11 ti|tle$=.ti|
|000023f0| 74 6c 65 24 2c 31 31 29 | 0d 0d c0 12 24 77 6d 65 |tle$,11)|....$wme|
|00002400| 6e 75 25 3d 74 69 74 6c | 65 24 0d 0d ca 1c 6d 65 |nu%=titl|e$....me|
|00002410| 6e 75 24 3d c2 6d 65 6e | 75 24 2c a9 28 6d 65 6e |nu$=.men|u$,.(men|
|00002420| 75 24 29 2d 71 29 0d 0d | d4 20 77 69 64 74 68 25 |u$)-q)..|. width%|
|00002430| 3d 28 a9 28 c0 6d 65 6e | 75 24 2c 71 2d 31 29 29 |=(.(.men|u$,q-1))|
|00002440| 2d 31 29 2a 31 36 0d 0d | de 17 77 6d 65 6e 75 25 |-1)*16..|..wmenu%|
|00002450| 21 31 32 3d 26 30 30 30 | 37 30 32 30 37 0d 0d e8 |!12=&000|70207...|
|00002460| 10 77 6d 65 6e 75 25 21 | 32 30 3d 34 34 0d 0d f2 |.wmenu%!|20=44...|
|00002470| 0f 77 6d 65 6e 75 25 21 | 32 34 3d 30 0d 0d fc 13 |.wmenu%!|24=0....|
|00002480| 77 70 74 72 25 3d 77 6d | 65 6e 75 25 2b 32 38 0d |wptr%=wm|enu%+28.|
|00002490| 0e 06 0f e3 20 4c 3d 31 | 20 b8 20 6e 75 6d 0d 0e |.... L=1| . num..|
|000024a0| 10 22 f2 77 69 6d 70 5f | 64 65 63 6f 64 65 6d 65 |.".wimp_|decodeme|
|000024b0| 6e 75 65 6e 74 72 79 28 | 6d 65 6e 75 24 2c 4c 29 |nuentry(|menu$,L)|
|000024c0| 0d 0e 1a 23 e7 20 4c 3d | 6e 75 6d 20 6d 66 6c 61 |...#. L=|num mfla|
|000024d0| 67 73 25 3d 26 38 30 20 | 8b 20 6d 66 6c 61 67 73 |gs%=&80 |. mflags|
|000024e0| 25 3d 30 0d 0e 24 12 21 | 77 70 74 72 25 3d 6d 66 |%=0..$.!|wptr%=mf|
|000024f0| 6c 61 67 73 25 0d 0e 2e | 14 77 70 74 72 25 21 34 |lags%...|.wptr%!4|
|00002500| 3d 77 73 75 62 70 74 72 | 25 0d 0e 38 14 77 70 74 |=wsubptr|%..8.wpt|
|00002510| 72 25 21 38 3d 26 37 30 | 30 30 30 32 31 0d 0e 42 |r%!8=&70|00021..B|
|00002520| 62 e7 20 a9 28 69 74 65 | 6d 24 29 3e 31 31 20 de |b. .(ite|m$)>11 .|
|00002530| 20 74 77 65 6c 76 65 25 | 20 a9 28 69 74 65 6d 24 | twelve%| .(item$|
|00002540| 29 3a 24 28 74 77 65 6c | 76 65 25 29 3d 69 74 65 |):$(twel|ve%)=ite|
|00002550| 6d 24 3a 77 70 74 72 25 | 21 38 3d 26 37 30 30 30 |m$:wptr%|!8=&7000|
|00002560| 31 32 31 3a 77 70 74 72 | 25 21 31 32 3d 74 77 65 |121:wptr|%!12=twe|
|00002570| 6c 76 65 25 3a 77 70 74 | 72 25 21 31 36 3d 30 0d |lve%:wpt|r%!16=0.|
|00002580| 0e 4c 23 e7 20 a9 28 69 | 74 65 6d 24 29 3c 31 32 |.L#. .(i|tem$)<12|
|00002590| 20 24 28 77 70 74 72 25 | 2b 31 32 29 3d 69 74 65 | $(wptr%|+12)=ite|
|000025a0| 6d 24 0d 0e 56 16 61 25 | 3d 28 a9 28 69 74 65 6d |m$..V.a%|=(.(item|
|000025b0| 24 29 2b 31 29 2a 31 36 | 0d 0e 60 19 e7 20 61 25 |$)+1)*16|..`.. a%|
|000025c0| 3e 77 69 64 74 68 25 20 | 77 69 64 74 68 25 3d 61 |>width% |width%=a|
|000025d0| 25 0d 0e 6a 0d 77 70 74 | 72 25 2b 3d 32 34 0d 0e |%..j.wpt|r%+=24..|
|000025e0| 74 07 ed 20 4c 0d 0e 7e | 14 77 6d 65 6e 75 25 21 |t.. L..~|.wmenu%!|
|000025f0| 31 36 3d 77 69 64 74 68 | 25 0d 0e 88 0b 3d 77 6d |16=width|%....=wm|
|00002600| 65 6e 75 25 0d 0e 92 05 | 3a 0d 0e 9c 1c dd 20 f2 |enu%....|:..... .|
|00002610| 77 69 6d 70 5f 6c 61 72 | 67 65 69 74 65 6d 28 62 |wimp_lar|geitem(b|
|00002620| 75 66 66 25 29 0d 0e a6 | 14 77 70 74 72 25 21 38 |uff%)...|.wptr%!8|
|00002630| 3d 26 37 30 30 30 31 32 | 31 0d 0e b0 12 77 70 74 |=&700012|1....wpt|
|00002640| 72 25 21 31 32 3d 62 75 | 66 66 25 0d 0e ba 0e 77 |r%!12=bu|ff%....w|
|00002650| 70 74 72 25 21 31 36 3d | 30 0d 0e c4 05 e1 0d 0e |ptr%!16=|0.......|
|00002660| ce 05 3a 0d 0e d8 22 dd | 20 a4 77 69 6d 70 5f 6e |..:...".| .wimp_n|
|00002670| 75 6d 62 65 72 6f 66 65 | 6e 74 72 69 65 73 28 6d |umberofe|ntries(m|
|00002680| 65 6e 75 24 29 0d 0e e2 | 0d ea 20 74 6f 74 61 6c |enu$)...|.. total|
|00002690| 2c 4c 0d 0e ec 0b 74 6f | 74 61 6c 3d 31 0d 0e f6 |,L....to|tal=1...|
|000026a0| 14 e3 20 4c 3d 31 20 b8 | 20 a9 28 6d 65 6e 75 24 |.. L=1 .| .(menu$|
|000026b0| 29 0d 0f 00 1e e7 20 c1 | 6d 65 6e 75 24 2c 4c 2c |)..... .|menu$,L,|
|000026c0| 31 29 3d 22 2f 22 20 74 | 6f 74 61 6c 2b 3d 31 0d |1)="/" t|otal+=1.|
|000026d0| 0f 0a 07 ed 20 4c 0d 0f | 14 0a 3d 74 6f 74 61 6c |.... L..|..=total|
|000026e0| 0d 0f 1e 05 3a 0d 0f 28 | 24 dd 20 f2 77 69 6d 70 |....:..(|$. .wimp|
|000026f0| 5f 64 65 63 6f 64 65 6d | 65 6e 75 65 6e 74 72 79 |_decodem|enuentry|
|00002700| 28 6d 65 6e 75 24 2c 6e | 29 0d 0f 32 10 ea 20 4d |(menu$,n|)..2.. M|
|00002710| 2c 70 2c 6f 6d 65 6e 75 | 24 0d 0f 3c 07 4d 3d 30 |,p,omenu|$..<.M=0|
|00002720| 0d 0f 46 07 70 3d 31 0d | 0f 50 05 f5 0d 0f 5a 1a |..F.p=1.|.P....Z.|
|00002730| e7 20 c1 6d 65 6e 75 24 | 2c 4d 2c 31 29 3d 22 2f |. .menu$|,M,1)="/|
|00002740| 22 20 70 2b 3d 31 0d 0f | 64 08 4d 2b 3d 31 0d 0f |" p+=1..|d.M+=1..|
|00002750| 6e 09 fd 20 70 3d 6e 0d | 0f 78 10 6f 6d 65 6e 75 |n.. p=n.|.x.omenu|
|00002760| 24 3d 6d 65 6e 75 24 0d | 0f 82 23 6f 6d 65 6e 75 |$=menu$.|..#omenu|
|00002770| 24 3d c2 6f 6d 65 6e 75 | 24 2c a9 28 6f 6d 65 6e |$=.omenu|$,.(omen|
|00002780| 75 24 29 2d 28 4d 2d 31 | 29 29 0d 0f 8c 12 70 3d |u$)-(M-1|))....p=|
|00002790| a7 6f 6d 65 6e 75 24 2c | 22 2f 22 29 0d 0f 96 09 |.omenu$,|"/")....|
|000027a0| e7 20 70 3e 30 0d 0f a0 | 17 6f 6d 65 6e 75 24 3d |. p>0...|.omenu$=|
|000027b0| c0 6f 6d 65 6e 75 24 2c | 70 2d 31 29 0d 0f aa 05 |.omenu$,|p-1)....|
|000027c0| cd 0d 0f b4 12 70 3d a7 | 6f 6d 65 6e 75 24 2c 22 |.....p=.|omenu$,"|
|000027d0| 3e 22 29 0d 0f be 24 e7 | 20 70 3d 30 20 69 74 65 |>")...$.| p=0 ite|
|000027e0| 6d 24 3d 6f 6d 65 6e 75 | 24 3a 77 73 75 62 70 74 |m$=omenu|$:wsubpt|
|000027f0| 72 25 3d 2d 31 3a e1 0d | 0f c8 16 69 74 65 6d 24 |r%=-1:..|...item$|
|00002800| 3d c0 6f 6d 65 6e 75 24 | 2c 70 2d 31 29 0d 0f d2 |=.omenu$|,p-1)...|
|00002810| 24 77 73 75 62 70 74 72 | 25 3d a0 28 c2 6f 6d 65 |$wsubptr|%=.(.ome|
|00002820| 6e 75 24 2c a9 28 6f 6d | 65 6e 75 24 29 2d 70 29 |nu$,.(om|enu$)-p)|
|00002830| 29 0d 0f dc 05 e1 0d 0f | e6 05 3a 0d 0f f0 1b dd |).......|..:.....|
|00002840| 20 a4 77 69 6d 70 5f 6d | 65 6e 75 73 69 7a 65 28 | .wimp_m|enusize(|
|00002850| 6d 68 61 6e 25 29 0d 0f | fa 15 ea 20 77 70 74 72 |mhan%)..|... wptr|
|00002860| 25 2c 65 2c 6c 2c 66 6c | 61 67 25 0d 10 04 07 65 |%,e,l,fl|ag%....e|
|00002870| 3d a3 0d 10 0e 11 77 70 | 74 72 25 3d 6d 68 61 6e |=.....wp|tr%=mhan|
|00002880| 25 2b 34 0d 10 18 07 6c | 3d 30 0d 10 22 05 f5 0d |%+4....l|=0.."...|
|00002890| 10 2c 0d 77 70 74 72 25 | 2b 3d 32 34 0d 10 36 08 |.,.wptr%|+=24..6.|
|000028a0| 6c 2b 3d 31 0d 10 40 11 | 66 6c 61 67 25 3d 77 70 |l+=1..@.|flag%=wp|
|000028b0| 74 72 25 21 30 0d 10 4a | 12 66 6c 61 67 25 3d 66 |tr%!0..J|.flag%=f|
|000028c0| 6c 61 67 25 3e 3e 37 0d | 10 54 17 e7 20 28 66 6c |lag%>>7.|.T.. (fl|
|000028d0| 61 67 25 20 80 20 31 29 | 3d 31 20 65 3d b9 0d 10 |ag% . 1)|=1 e=...|
|000028e0| 5e 09 fd 20 65 3d b9 0d | 10 68 06 3d 6c 0d 10 72 |^.. e=..|.h.=l..r|
|000028f0| 05 3a 0d 10 7c 30 dd 20 | f2 77 69 6d 70 5f 67 65 |.:..|0. |.wimp_ge|
|00002900| 74 6d 65 6e 75 61 6e 64 | 69 74 65 6d 28 77 6c 61 |tmenuand|item(wla|
|00002910| 73 74 6d 65 6e 75 25 2c | 77 6d 65 6e 75 62 75 66 |stmenu%,|wmenubuf|
|00002920| 25 29 0d 10 86 0e ea 20 | 70 2c 71 2c 4c 2c 61 24 |%)..... |p,q,L,a$|
|00002930| 0d 10 90 14 6d 65 6e 75 | 24 3d 24 77 6d 65 6e 75 |....menu|$=$wmenu|
|00002940| 62 75 66 25 0d 10 9a 11 | 70 3d a7 6d 65 6e 75 24 |buf%....|p=.menu$|
|00002950| 2c 22 2e 22 29 0d 10 a4 | 3a e7 20 70 3d 30 20 77 |,".")...|:. p=0 w|
|00002960| 6d 65 6e 75 25 3d 77 6c | 61 73 74 6d 65 6e 75 25 |menu%=wl|astmenu%|
|00002970| 3a f2 77 69 6d 70 5f 66 | 69 6e 64 69 74 65 6d 28 |:.wimp_f|inditem(|
|00002980| 77 6d 65 6e 75 25 2c 6d | 65 6e 75 24 29 3a e1 0d |wmenu%,m|enu$):..|
|00002990| 10 ae 07 71 3d 30 0d 10 | b8 14 e3 20 4c 3d 31 20 |...q=0..|... L=1 |
|000029a0| b8 20 a9 28 6d 65 6e 75 | 24 29 0d 10 c2 1a e7 20 |. .(menu|$)..... |
|000029b0| c1 6d 65 6e 75 24 2c 4c | 2c 31 29 3d 22 2e 22 20 |.menu$,L|,1)="." |
|000029c0| 71 2b 3d 31 0d 10 cc 07 | ed 20 4c 0d 10 d6 15 77 |q+=1....|. L....w|
|000029d0| 6d 65 6e 75 25 3d 77 6c | 61 73 74 6d 65 6e 75 25 |menu%=wl|astmenu%|
|000029e0| 0d 10 e0 0d e3 20 4c 3d | 31 20 b8 20 71 0d 10 ea |..... L=|1 . q...|
|000029f0| 11 70 3d a7 6d 65 6e 75 | 24 2c 22 2e 22 29 0d 10 |.p=.menu|$,".")..|
|00002a00| f4 12 61 24 3d c0 6d 65 | 6e 75 24 2c 70 2d 31 29 |..a$=.me|nu$,p-1)|
|00002a10| 0d 10 fe 2a 77 6d 65 6e | 75 25 3d a4 77 69 6d 70 |...*wmen|u%=.wimp|
|00002a20| 5f 66 69 6e 64 73 75 62 | 6d 65 6e 75 70 74 72 28 |_findsub|menuptr(|
|00002a30| 77 6d 65 6e 75 25 2c 61 | 24 29 0d 11 08 1c 6d 65 |wmenu%,a|$)....me|
|00002a40| 6e 75 24 3d c2 6d 65 6e | 75 24 2c a9 28 6d 65 6e |nu$=.men|u$,.(men|
|00002a50| 75 24 29 2d 70 29 0d 11 | 12 07 ed 20 4c 0d 11 1c |u$)-p)..|... L...|
|00002a60| 20 f2 77 69 6d 70 5f 66 | 69 6e 64 69 74 65 6d 28 | .wimp_f|inditem(|
|00002a70| 77 6d 65 6e 75 25 2c 6d | 65 6e 75 24 29 0d 11 26 |wmenu%,m|enu$)..&|
|00002a80| 05 e1 0d 11 30 05 3a 0d | 11 3a 22 dd 20 f2 77 69 |....0.:.|.:". .wi|
|00002a90| 6d 70 5f 66 69 6e 64 69 | 74 65 6d 28 77 6d 65 6e |mp_findi|tem(wmen|
|00002aa0| 75 25 2c 6d 65 6e 75 24 | 29 0d 11 44 19 ea 20 70 |u%,menu$|)..D.. p|
|00002ab0| 2c 4c 2c 6e 75 6d 2c 66 | 6c 61 67 25 2c 74 25 2c |,L,num,f|lag%,t%,|
|00002ac0| 69 24 0d 11 4e 13 77 70 | 74 72 25 3d 77 6d 65 6e |i$..N.wp|tr%=wmen|
|00002ad0| 75 25 2b 32 38 0d 11 58 | 07 70 3d 30 0d 11 62 1e |u%+28..X|.p=0..b.|
|00002ae0| 6e 75 6d 3d a4 77 69 6d | 70 5f 6d 65 6e 75 73 69 |num=.wim|p_menusi|
|00002af0| 7a 65 28 77 6d 65 6e 75 | 25 29 0d 11 6c 0f e3 20 |ze(wmenu|%)..l.. |
|00002b00| 4c 3d 31 20 b8 20 6e 75 | 6d 0d 11 76 11 66 6c 61 |L=1 . nu|m..v.fla|
|00002b10| 67 25 3d 77 70 74 72 25 | 21 38 0d 11 80 14 66 6c |g%=wptr%|!8....fl|
|00002b20| 61 67 25 3d 28 66 6c 61 | 67 25 3e 3e 38 29 0d 11 |ag%=(fla|g%>>8)..|
|00002b30| 8a 29 e7 20 28 66 6c 61 | 67 25 20 80 20 31 29 20 |.). (fla|g% . 1) |
|00002b40| 3d 31 20 74 25 3d 77 70 | 74 72 25 21 31 32 3a 69 |=1 t%=wp|tr%!12:i|
|00002b50| 24 3d 24 28 74 25 29 0d | 11 94 23 e7 20 28 66 6c |$=$(t%).|..#. (fl|
|00002b60| 61 67 25 20 80 20 31 29 | 20 3d 30 20 69 24 3d 24 |ag% . 1)| =0 i$=$|
|00002b70| 28 77 70 74 72 25 2b 31 | 32 29 0d 11 9e 12 e7 20 |(wptr%+1|2)..... |
|00002b80| 69 24 3d 6d 65 6e 75 24 | 20 70 3d 4c 0d 11 a8 0d |i$=menu$| p=L....|
|00002b90| 77 70 74 72 25 2b 3d 32 | 34 0d 11 b2 07 ed 20 4c |wptr%+=2|4..... L|
|00002ba0| 0d 11 bc 0c 77 69 74 65 | 6d 25 3d 70 0d 11 c6 05 |....wite|m%=p....|
|00002bb0| e1 0d 11 d0 05 3a 0d 11 | da 25 dd 20 a4 77 69 6d |.....:..|.%. .wim|
|00002bc0| 70 5f 66 69 6e 64 73 75 | 62 6d 65 6e 75 70 74 72 |p_findsu|bmenuptr|
|00002bd0| 28 77 6d 65 6e 75 25 2c | 61 24 29 0d 11 e4 16 ea |(wmenu%,|a$).....|
|00002be0| 20 72 2c 4d 2c 66 6c 61 | 67 25 2c 69 24 2c 6e 75 | r,M,fla|g%,i$,nu|
|00002bf0| 6d 0d 11 ee 13 77 70 74 | 72 25 3d 77 6d 65 6e 75 |m....wpt|r%=wmenu|
|00002c00| 25 2b 32 38 0d 11 f8 07 | 72 3d 30 0d 12 02 1e 6e |%+28....|r=0....n|
|00002c10| 75 6d 3d a4 77 69 6d 70 | 5f 6d 65 6e 75 73 69 7a |um=.wimp|_menusiz|
|00002c20| 65 28 77 6d 65 6e 75 25 | 29 0d 12 0c 0f e3 20 4d |e(wmenu%|)..... M|
|00002c30| 3d 31 20 b8 20 6e 75 6d | 0d 12 16 11 66 6c 61 67 |=1 . num|....flag|
|00002c40| 25 3d 77 70 74 72 25 21 | 38 0d 12 20 14 66 6c 61 |%=wptr%!|8.. .fla|
|00002c50| 67 25 3d 28 66 6c 61 67 | 25 3e 3e 38 29 0d 12 2a |g%=(flag|%>>8)..*|
|00002c60| 33 e7 20 28 66 6c 61 67 | 25 20 80 20 31 29 20 3d |3. (flag|% . 1) =|
|00002c70| 31 20 74 77 65 6c 76 65 | 25 3d 77 70 74 72 25 21 |1 twelve|%=wptr%!|
|00002c80| 31 32 3a 69 24 3d 24 28 | 74 77 65 6c 76 65 25 29 |12:i$=$(|twelve%)|
|00002c90| 0d 12 34 23 e7 20 28 66 | 6c 61 67 25 20 80 20 31 |..4#. (f|lag% . 1|
|00002ca0| 29 20 3d 30 20 69 24 3d | 24 28 77 70 74 72 25 2b |) =0 i$=|$(wptr%+|
|00002cb0| 31 32 29 0d 12 3e 15 e7 | 20 69 24 3d 61 24 20 72 |12)..>..| i$=a$ r|
|00002cc0| 3d 77 70 74 72 25 21 34 | 0d 12 48 0d 77 70 74 72 |=wptr%!4|..H.wptr|
|00002cd0| 25 2b 3d 32 34 0d 12 52 | 07 ed 20 4d 0d 12 5c 06 |%+=24..R|.. M..\.|
|00002ce0| 3d 72 0d 12 66 05 3a 0d | 12 70 23 dd 20 f2 77 69 |=r..f.:.|.p#. .wi|
|00002cf0| 6d 70 5f 6d 65 6e 75 74 | 69 63 6b 28 77 6d 65 6e |mp_menut|ick(wmen|
|00002d00| 75 25 2c 77 69 74 65 6d | 25 29 0d 12 7a 25 77 70 |u%,witem|%)..z%wp|
|00002d10| 74 72 25 3d 28 77 6d 65 | 6e 75 25 2b 32 38 29 2b |tr%=(wme|nu%+28)+|
|00002d20| 28 32 34 2a 28 77 69 74 | 65 6d 25 2d 31 29 29 0d |(24*(wit|em%-1)).|
|00002d30| 12 84 15 21 77 70 74 72 | 25 3d 21 77 70 74 72 25 |...!wptr|%=!wptr%|
|00002d40| 20 82 20 31 0d 12 8e 05 | e1 0d 12 98 05 3a 0d 12 | . 1....|.....:..|
|00002d50| a2 26 dd 20 f2 77 69 6d | 70 5f 6d 65 6e 75 64 69 |.&. .wim|p_menudi|
|00002d60| 73 61 62 6c 65 28 77 6d | 65 6e 75 25 2c 77 69 74 |sable(wm|enu%,wit|
|00002d70| 65 6d 25 29 0d 12 ac 25 | 77 70 74 72 25 3d 28 77 |em%)...%|wptr%=(w|
|00002d80| 6d 65 6e 75 25 2b 32 38 | 29 2b 28 32 34 2a 28 77 |menu%+28|)+(24*(w|
|00002d90| 69 74 65 6d 25 2d 31 29 | 29 0d 12 b6 1d 77 70 74 |item%-1)|)....wpt|
|00002da0| 72 25 21 38 3d 77 70 74 | 72 25 21 38 20 84 20 28 |r%!8=wpt|r%!8 . (|
|00002db0| 31 3c 3c 32 32 29 0d 12 | c0 05 e1 0d 12 ca 05 3a |1<<22)..|.......:|
|00002dc0| 0d 12 d4 25 dd 20 f2 77 | 69 6d 70 5f 6d 65 6e 75 |...%. .w|imp_menu|
|00002dd0| 65 6e 61 62 6c 65 28 77 | 6d 65 6e 75 25 2c 77 69 |enable(w|menu%,wi|
|00002de0| 74 65 6d 25 29 0d 12 de | 24 f2 77 69 6d 70 5f 6d |tem%)...|$.wimp_m|
|00002df0| 65 6e 75 64 69 73 61 62 | 6c 65 28 77 6d 65 6e 75 |enudisab|le(wmenu|
|00002e00| 25 2c 77 69 74 65 6d 25 | 29 0d 12 e8 25 77 70 74 |%,witem%|)...%wpt|
|00002e10| 72 25 3d 28 77 6d 65 6e | 75 25 2b 32 38 29 2b 28 |r%=(wmen|u%+28)+(|
|00002e20| 32 34 2a 28 77 69 74 65 | 6d 25 2d 31 29 29 0d 12 |24*(wite|m%-1))..|
|00002e30| f2 1d 77 70 74 72 25 21 | 38 3d 77 70 74 72 25 21 |..wptr%!|8=wptr%!|
|00002e40| 38 20 82 20 28 31 3c 3c | 32 32 29 0d 12 fc 05 e1 |8 . (1<<|22).....|
|00002e50| 0d 13 06 05 3a 0d 13 10 | 29 dd 20 f2 77 69 6d 70 |....:...|). .wimp|
|00002e60| 5f 6d 65 6e 75 64 6f 74 | 74 65 64 6c 69 6e 65 28 |_menudot|tedline(|
|00002e70| 77 6d 65 6e 75 25 2c 77 | 69 74 65 6d 25 29 0d 13 |wmenu%,w|item%)..|
|00002e80| 1a 0b ea 20 77 70 74 72 | 25 0d 13 24 25 77 70 74 |... wptr|%..$%wpt|
|00002e90| 72 25 3d 28 77 6d 65 6e | 75 25 2b 32 38 29 2b 28 |r%=(wmen|u%+28)+(|
|00002ea0| 32 34 2a 28 77 69 74 65 | 6d 25 2d 31 29 29 0d 13 |24*(wite|m%-1))..|
|00002eb0| 2e 17 21 77 70 74 72 25 | 3d 28 21 77 70 74 72 25 |..!wptr%|=(!wptr%|
|00002ec0| 29 20 84 20 32 0d 13 38 | 05 e1 0d 13 42 05 3a 0d |) . 2..8|....B.:.|
|00002ed0| 13 4c 15 dd 20 f2 77 69 | 6d 70 5f 6d 65 6e 75 63 |.L.. .wi|mp_menuc|
|00002ee0| 6c 6f 73 65 0d 13 56 1b | c8 99 22 57 69 6d 70 5f |lose..V.|.."Wimp_|
|00002ef0| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 2d 31 0d |CreateMe|nu",,-1.|
|00002f00| 13 60 05 e1 0d 13 6a 05 | 3a 0d 13 74 21 dd 20 f2 |.`....j.|:..t!. .|
|00002f10| 77 69 6d 70 5f 70 75 74 | 69 63 6f 6e 62 61 72 74 |wimp_put|iconbart|
|00002f20| 65 78 74 28 74 65 78 74 | 24 29 0d 13 7e 12 e7 20 |ext(text|$)..~.. |
|00002f30| 77 42 41 52 54 45 58 54 | 3d a3 20 e1 0d 13 88 17 |wBARTEXT|=. .....|
|00002f40| 24 28 77 69 73 70 72 5f | 74 78 74 25 29 3d 74 65 |$(wispr_|txt%)=te|
|00002f50| 78 74 24 0d 13 92 28 c8 | 99 22 57 69 6d 70 5f 46 |xt$...(.|."Wimp_F|
|00002f60| 6f 72 63 65 52 65 64 72 | 61 77 22 2c 2d 32 2c 30 |orceRedr|aw",-2,0|
|00002f70| 2c 2d 32 34 2c 31 45 36 | 2c 34 30 0d 13 9c 05 e1 |,-24,1E6|,40.....|
|00002f80| 0d 13 a6 05 3a 0d 13 b0 | 22 dd 20 f2 77 69 6d 70 |....:...|". .wimp|
|00002f90| 5f 69 63 6f 6e 62 61 72 | 73 70 72 69 74 65 28 73 |_iconbar|sprite(s|
|00002fa0| 70 72 69 74 65 24 29 0d | 13 ba 1b 24 77 69 73 70 |prite$).|...$wisp|
|00002fb0| 72 69 74 65 32 25 3d 22 | 73 22 2b 73 70 72 69 74 |rite2%="|s"+sprit|
|00002fc0| 65 24 0d 13 c4 27 c8 99 | 22 57 69 6d 70 5f 46 6f |e$...'..|"Wimp_Fo|
|00002fd0| 72 63 65 52 65 64 72 61 | 77 22 2c 2d 31 2c 30 2c |rceRedra|w",-1,0,|
|00002fe0| 30 2c 31 45 36 2c 31 33 | 30 0d 13 ce 05 e1 0d 13 |0,1E6,13|0.......|
|00002ff0| d8 05 3a 0d 13 e2 1e dd | 20 f2 77 69 6d 70 5f 6c |..:.....| .wimp_l|
|00003000| 6f 61 64 73 70 72 69 74 | 65 73 28 66 69 6c 65 24 |oadsprit|es(file$|
|00003010| 29 0d 13 ec 11 ea 20 66 | 69 6c 65 25 2c 73 69 7a |)..... f|ile%,siz|
|00003020| 65 25 0d 13 f6 12 66 69 | 6c 65 25 3d 8e 28 66 69 |e%....fi|le%=.(fi|
|00003030| 6c 65 24 29 0d 14 00 13 | 73 69 7a 65 25 3d a2 23 |le$)....|size%=.#|
|00003040| 66 69 6c 65 25 2b 34 0d | 14 0a 0b d9 23 66 69 6c |file%+4.|....#fil|
|00003050| 65 25 0d 14 14 14 de 20 | 77 73 70 61 72 65 61 25 |e%..... |wsparea%|
|00003060| 20 73 69 7a 65 25 0d 14 | 1e 13 21 77 73 70 61 72 | size%..|..!wspar|
|00003070| 65 61 25 3d 73 69 7a 65 | 25 0d 14 28 11 77 73 70 |ea%=size|%..(.wsp|
|00003080| 61 72 65 61 25 21 38 3d | 31 36 0d 14 32 27 c8 99 |area%!8=|16..2'..|
|00003090| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 26 31 |"OS_Spri|teOp",&1|
|000030a0| 30 41 2c 77 73 70 61 72 | 65 61 25 2c 66 69 6c 65 |0A,wspar|ea%,file|
|000030b0| 24 0d 14 3c 05 e1 0d 14 | 46 05 3a 0d 14 50 25 dd |$..<....|F.:..P%.|
|000030c0| 20 a4 77 69 6d 70 5f 6c | 6f 61 64 77 69 6e 64 6f | .wimp_l|oadwindo|
|000030d0| 77 28 66 69 6c 65 24 2c | 77 69 6e 24 2c 73 70 29 |w(file$,|win$,sp)|
|000030e0| 0d 14 5a 11 ea 20 6e 61 | 6d 65 25 2c 77 68 61 6e |..Z.. na|me%,whan|
|000030f0| 25 0d 14 64 0e de 20 6e | 61 6d 65 25 20 31 31 0d |%..d.. n|ame% 11.|
|00003100| 14 6e 12 de 20 66 6f 6e | 74 62 75 66 25 20 32 35 |.n.. fon|tbuf% 25|
|00003110| 36 0d 14 78 20 c8 99 22 | 57 69 6d 70 5f 4f 70 65 |6..x .."|Wimp_Ope|
|00003120| 6e 54 65 6d 70 6c 61 74 | 65 22 2c 2c 66 69 6c 65 |nTemplat|e",,file|
|00003130| 24 0d 14 82 0f 24 6e 61 | 6d 65 25 3d 77 69 6e 24 |$....$na|me%=win$|
|00003140| 0d 14 8c 4f c8 99 22 57 | 69 6d 70 5f 4c 6f 61 64 |...O.."W|imp_Load|
|00003150| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 77 69 6d 70 25 |Template|",,wimp%|
|00003160| 2c 77 69 63 6f 6e 73 25 | 2c 77 69 63 6f 6e 6d 61 |,wicons%|,wiconma|
|00003170| 78 25 2c 66 6f 6e 74 62 | 75 66 25 2c 6e 61 6d 65 |x%,fontb|uf%,name|
|00003180| 25 2c 30 20 b8 20 2c 2c | 77 69 63 6f 6e 73 25 0d |%,0 . ,,|wicons%.|
|00003190| 14 96 29 e7 20 73 70 3d | 31 20 77 69 6d 70 25 21 |..). sp=|1 wimp%!|
|000031a0| 36 34 3d 31 20 8b 20 77 | 69 6d 70 25 21 36 34 3d |64=1 . w|imp%!64=|
|000031b0| 77 73 70 61 72 65 61 25 | 0d 14 a0 28 c8 99 22 57 |wsparea%|...(.."W|
|000031c0| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|000031d0| 22 2c 2c 77 69 6d 70 25 | 20 b8 20 77 68 61 6e 25 |",,wimp%| . whan%|
|000031e0| 0d 14 aa 1a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |......"W|imp_Clos|
|000031f0| 65 54 65 6d 70 6c 61 74 | 65 22 0d 14 b4 0a 3d 77 |eTemplat|e"....=w|
|00003200| 68 61 6e 25 0d 14 be 05 | 3a 0d 14 c8 21 dd 20 f2 |han%....|:...!. .|
|00003210| 77 69 6d 70 5f 70 75 74 | 63 61 72 65 74 28 77 68 |wimp_put|caret(wh|
|00003220| 61 6e 25 2c 69 63 6f 6e | 25 29 0d 14 d2 0f ea 20 |an%,icon|%)..... |
|00003230| 78 6f 66 66 2c 79 6f 66 | 66 0d 14 dc 13 78 6f 66 |xoff,yof|f....xof|
|00003240| 66 3d 31 45 36 3a 79 6f | 66 66 3d 30 0d 14 e6 39 |f=1E6:yo|ff=0...9|
|00003250| c8 99 22 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 |.."Wimp_|SetCaret|
|00003260| 50 6f 73 69 74 69 6f 6e | 22 2c 77 68 61 6e 25 2c |Position|",whan%,|
|00003270| 69 63 6f 6e 25 2c 78 6f | 66 66 2c 79 6f 66 66 2c |icon%,xo|ff,yoff,|
|00003280| 2d 31 2c 2d 31 0d 14 f0 | 05 e1 0d 14 fa 05 3a 0d |-1,-1...|......:.|
|00003290| 15 04 15 dd 20 f2 77 69 | 6d 70 5f 6c 6f 73 65 63 |.... .wi|mp_losec|
|000032a0| 61 72 65 74 0d 15 0e 20 | c8 99 22 57 69 6d 70 5f |aret... |.."Wimp_|
|000032b0| 53 65 74 43 61 72 65 74 | 50 6f 73 69 74 69 6f 6e |SetCaret|Position|
|000032c0| 22 2c 2d 31 0d 15 18 05 | e1 0d 15 22 05 3a 0d 15 |",-1....|...".:..|
|000032d0| 2c 27 dd 20 f2 77 69 6d | 70 5f 70 75 74 77 69 6e |,'. .wim|p_putwin|
|000032e0| 64 6f 77 74 69 74 6c 65 | 28 77 68 61 6e 25 2c 74 |dowtitle|(whan%,t|
|000032f0| 65 78 74 24 29 0d 15 36 | 26 ea 20 66 6c 61 67 25 |ext$)..6|&. flag%|
|00003300| 2c 77 69 64 74 68 25 2c | 68 65 69 67 68 74 25 2c |,width%,|height%,|
|00003310| 78 6d 69 6e 25 2c 79 6d | 69 6e 25 0d 15 40 11 77 |xmin%,ym|in%..@.w|
|00003320| 69 6d 70 25 21 30 3d 77 | 68 61 6e 25 0d 15 4a 21 |imp%!0=w|han%..J!|
|00003330| c8 99 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |.."Wimp_|GetWindo|
|00003340| 77 49 6e 66 6f 22 2c 2c | 77 69 6d 70 25 0d 15 54 |wInfo",,|wimp%..T|
|00003350| 12 66 6c 61 67 25 3d 77 | 69 6d 70 25 21 36 30 0d |.flag%=w|imp%!60.|
|00003360| 15 5e 14 66 6c 61 67 25 | 3d 28 66 6c 61 67 25 3e |.^.flag%|=(flag%>|
|00003370| 3e 38 29 0d 15 68 51 e7 | 20 28 66 6c 61 67 25 20 |>8)..hQ.| (flag% |
|00003380| 80 20 31 29 20 3d 30 20 | f2 77 69 6d 70 5f 65 72 |. 1) =0 |.wimp_er|
|00003390| 72 6f 72 28 22 44 72 57 | 69 6d 70 22 2c 22 57 69 |ror("DrW|imp","Wi|
|000033a0| 6e 64 6f 77 20 74 69 74 | 6c 65 20 69 73 20 6e 6f |ndow tit|le is no|
|000033b0| 74 20 69 6e 64 69 72 65 | 63 74 65 64 22 2c 31 2c |t indire|cted",1,|
|000033c0| 31 29 3a e1 0d 15 72 15 | 24 28 77 69 6d 70 25 21 |1):...r.|$(wimp%!|
|000033d0| 37 36 29 3d 74 65 78 74 | 24 0d 15 7c 1b 77 69 64 |76)=text|$..|.wid|
|000033e0| 74 68 25 3d 77 69 6d 70 | 25 21 31 32 2d 77 69 6d |th%=wimp|%!12-wim|
|000033f0| 70 25 21 34 0d 15 86 1c | 68 65 69 67 68 74 25 3d |p%!4....|height%=|
|00003400| 77 69 6d 70 25 21 31 36 | 2d 77 69 6d 70 25 21 38 |wimp%!16|-wimp%!8|
|00003410| 0d 15 90 11 78 6d 69 6e | 25 3d 77 69 6d 70 25 21 |....xmin|%=wimp%!|
|00003420| 34 0d 15 9a 19 79 6d 69 | 6e 25 3d 77 69 6d 70 25 |4....ymi|n%=wimp%|
|00003430| 21 38 2b 68 65 69 67 68 | 74 25 0d 15 a4 3d c8 99 |!8+heigh|t%...=..|
|00003440| 22 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 |"Wimp_Fo|rceRedra|
|00003450| 77 22 2c 2d 31 2c 78 6d | 69 6e 25 2c 79 6d 69 6e |w",-1,xm|in%,ymin|
|00003460| 25 2c 78 6d 69 6e 25 2b | 77 69 64 74 68 25 2c 79 |%,xmin%+|width%,y|
|00003470| 6d 69 6e 25 2b 34 34 0d | 15 ae 05 e1 0d 15 b8 05 |min%+44.|........|
|00003480| 3a 0d 15 c2 21 dd 20 a4 | 77 69 6d 70 5f 67 65 74 |:...!. .|wimp_get|
|00003490| 77 69 6e 64 6f 77 74 69 | 74 6c 65 28 77 68 61 6e |windowti|tle(whan|
|000034a0| 25 29 0d 15 cc 11 77 69 | 6d 70 25 21 30 3d 77 68 |%)....wi|mp%!0=wh|
|000034b0| 61 6e 25 0d 15 d6 21 c8 | 99 22 57 69 6d 70 5f 47 |an%...!.|."Wimp_G|
|000034c0| 65 74 57 69 6e 64 6f 77 | 49 6e 66 6f 22 2c 2c 77 |etWindow|Info",,w|
|000034d0| 69 6d 70 25 0d 15 e0 10 | 3d 24 28 77 69 6d 70 25 |imp%....|=$(wimp%|
|000034e0| 21 37 36 29 0d 15 ea 05 | 3a 0d 15 f4 1e dd 20 a4 |!76)....|:..... .|
|000034f0| 77 69 6d 70 5f 67 65 74 | 6c 65 61 66 6e 61 6d 65 |wimp_get|leafname|
|00003500| 28 74 65 78 74 24 29 0d | 15 fe 09 ea 20 4c 2c 70 |(text$).|.... L,p|
|00003510| 0d 16 08 07 70 3d 30 0d | 16 12 14 e3 20 4c 3d 31 |....p=0.|.... L=1|
|00003520| 20 b8 20 a9 28 74 65 78 | 74 24 29 0d 16 1c 19 e7 | . .(tex|t$).....|
|00003530| 20 c1 74 65 78 74 24 2c | 4c 2c 31 29 3d 22 2e 22 | .text$,|L,1)="."|
|00003540| 20 70 3d 4c 0d 16 26 07 | ed 20 4c 0d 16 30 10 e7 | p=L..&.|. L..0..|
|00003550| 20 70 3d 30 20 3d 74 65 | 78 74 24 0d 16 3a 17 3d | p=0 =te|xt$..:.=|
|00003560| c2 74 65 78 74 24 2c a9 | 28 74 65 78 74 24 29 2d |.text$,.|(text$)-|
|00003570| 70 29 0d 16 44 05 3a 0d | 16 4e 14 dd 20 f2 77 69 |p)..D.:.|.N.. .wi|
|00003580| 6d 70 5f 64 61 74 61 73 | 61 76 65 0d 16 58 0b ea |mp_datas|ave..X..|
|00003590| 20 70 61 74 68 24 0d 16 | 62 20 70 61 74 68 24 3d | path$..|b path$=|
|000035a0| a4 77 69 6d 70 5f 73 74 | 72 69 6e 67 28 77 69 6d |.wimp_st|ring(wim|
|000035b0| 70 25 2b 34 34 29 0d 16 | 6c 21 f2 75 73 65 72 5f |p%+44)..|l!.user_|
|000035c0| 73 61 76 65 64 61 74 61 | 28 70 61 74 68 24 2c 77 |savedata|(path$,w|
|000035d0| 73 61 76 65 77 25 29 0d | 16 76 21 ff 22 53 65 74 |savew%).|.v!."Set|
|000035e0| 54 79 70 65 20 22 2b 70 | 61 74 68 24 2b 22 20 22 |Type "+p|ath$+" "|
|000035f0| 2b 77 73 61 76 65 74 24 | 0d 16 80 14 77 69 6d 70 |+wsavet$|....wimp|
|00003600| 25 21 31 32 3d 77 69 6d | 70 25 21 38 0d 16 8a 0e |%!12=wim|p%!8....|
|00003610| 77 69 6d 70 25 21 31 36 | 3d 33 0d 16 94 0e 21 77 |wimp%!16|=3....!w|
|00003620| 69 6d 70 25 3d 32 35 36 | 0d 16 9e 33 c8 99 22 57 |imp%=256|...3.."W|
|00003630| 69 6d 70 5f 53 65 6e 64 | 4d 65 73 73 61 67 65 22 |imp_Send|Message"|
|00003640| 2c 31 38 2c 77 69 6d 70 | 25 2c 77 69 6d 70 25 21 |,18,wimp|%,wimp%!|
|00003650| 32 30 2c 77 69 6d 70 25 | 21 32 34 0d 16 a8 3e e7 |20,wimp%|!24...>.|
|00003660| 20 70 61 74 68 24 3c 3e | 22 3c 57 69 6d 70 24 53 | path$<>|"<Wimp$S|
|00003670| 63 72 61 70 3e 22 20 f2 | 77 69 6d 70 5f 70 75 74 |crap>" .|wimp_put|
|00003680| 69 63 6f 6e 74 65 78 74 | 28 77 73 61 76 65 77 25 |icontext|(wsavew%|
|00003690| 2c 31 2c 70 61 74 68 24 | 29 0d 16 b2 05 e1 0d 16 |,1,path$|).......|
|000036a0| bc 05 3a 0d 16 c6 1c dd | 20 f2 77 69 6d 70 5f 71 |..:.....| .wimp_q|
|000036b0| 75 69 63 6b 73 61 76 65 | 28 77 68 61 6e 25 29 0d |uicksave|(whan%).|
|000036c0| 16 d0 0b ea 20 70 61 74 | 68 24 0d 16 da 24 70 61 |.... pat|h$...$pa|
|000036d0| 74 68 24 3d a4 77 69 6d | 70 5f 67 65 74 69 63 6f |th$=.wim|p_getico|
|000036e0| 6e 74 65 78 74 28 77 68 | 61 6e 25 2c 31 29 0d 16 |ntext(wh|an%,1)..|
|000036f0| e4 13 e7 20 a7 70 61 74 | 68 24 2c 22 2e 22 29 20 |... .pat|h$,".") |
|00003700| 8c 0d 16 ee 1f f2 75 73 | 65 72 5f 73 61 76 65 64 |......us|er_saved|
|00003710| 61 74 61 28 70 61 74 68 | 24 2c 77 68 61 6e 25 29 |ata(path|$,whan%)|
|00003720| 0d 16 f8 33 ff 22 53 65 | 74 54 79 70 65 20 22 2b |...3."Se|tType "+|
|00003730| 70 61 74 68 24 2b 22 20 | 22 2b a4 75 73 65 72 5f |path$+" |"+.user_|
|00003740| 73 61 76 65 66 69 6c 65 | 74 79 70 65 28 77 68 61 |savefile|type(wha|
|00003750| 6e 25 29 0d 17 02 05 cc | 0d 17 0c 5b f2 77 69 6d |n%).....|...[.wim|
|00003760| 70 5f 65 72 72 6f 72 28 | 22 44 72 57 69 6d 70 22 |p_error(|"DrWimp"|
|00003770| 2c 22 54 6f 20 73 61 76 | 65 2c 20 64 72 61 67 20 |,"To sav|e, drag |
|00003780| 74 68 65 20 69 63 6f 6e | 20 74 6f 20 61 20 64 69 |the icon| to a di|
|00003790| 72 65 63 74 6f 72 79 20 | 76 69 65 77 65 72 20 6f |rectory |viewer o|
|000037a0| 72 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 22 2c 31 |r applic|ation",1|
|000037b0| 2c 31 29 0d 17 16 05 cd | 0d 17 20 05 e1 0d 17 2a |,1).....|.. ....*|
|000037c0| 05 3a 0d 17 34 1c dd 20 | f2 77 69 6d 70 5f 73 74 |.:..4.. |.wimp_st|
|000037d0| 61 72 74 64 72 61 67 28 | 77 68 61 6e 25 29 0d 17 |artdrag(|whan%)..|
|000037e0| 3e 0d ea 20 6f 78 25 2c | 6f 79 25 0d 17 48 11 77 |>.. ox%,|oy%..H.w|
|000037f0| 73 61 76 65 77 25 3d 77 | 68 61 6e 25 0d 17 52 25 |savew%=w|han%..R%|
|00003800| 77 73 61 76 65 74 24 3d | a4 75 73 65 72 5f 73 61 |wsavet$=|.user_sa|
|00003810| 76 65 66 69 6c 65 74 79 | 70 65 28 77 68 61 6e 25 |vefilety|pe(whan%|
|00003820| 29 0d 17 5c 12 e7 20 77 | 73 61 76 65 74 24 3d 22 |)..\.. w|savet$="|
|00003830| 22 20 e1 0d 17 66 12 21 | 77 69 6d 70 25 3d 77 73 |" ...f.!|wimp%=ws|
|00003840| 61 76 65 77 25 0d 17 70 | 22 c8 99 22 57 69 6d 70 |avew%..p|".."Wimp|
|00003850| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00003860| 2c 2c 77 69 6d 70 25 0d | 17 7a 18 6f 78 25 3d 77 |,,wimp%.|.z.ox%=w|
|00003870| 69 6d 70 25 21 34 2d 77 | 69 6d 70 25 21 32 30 0d |imp%!4-w|imp%!20.|
|00003880| 17 84 19 6f 79 25 3d 77 | 69 6d 70 25 21 31 36 2d |...oy%=w|imp%!16-|
|00003890| 77 69 6d 70 25 21 32 34 | 0d 17 8e 0d 77 69 6d 70 |wimp%!24|....wimp|
|000038a0| 25 21 34 3d 30 0d 17 98 | 20 c8 99 22 57 69 6d 70 |%!4=0...| .."Wimp|
|000038b0| 5f 47 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_GetIcon|State",,|
|000038c0| 77 69 6d 70 25 0d 17 a2 | 0d 77 69 6d 70 25 21 34 |wimp%...|.wimp%!4|
|000038d0| 3d 35 0d 17 ac 17 77 69 | 6d 70 25 21 38 3d 6f 78 |=5....wi|mp%!8=ox|
|000038e0| 25 2b 77 69 6d 70 25 21 | 38 0d 17 b6 19 77 69 6d |%+wimp%!|8....wim|
|000038f0| 70 25 21 31 32 3d 6f 79 | 25 2b 77 69 6d 70 25 21 |p%!12=oy|%+wimp%!|
|00003900| 31 32 0d 17 c0 19 77 69 | 6d 70 25 21 31 36 3d 6f |12....wi|mp%!16=o|
|00003910| 78 25 2b 77 69 6d 70 25 | 21 31 36 0d 17 ca 19 77 |x%+wimp%|!16....w|
|00003920| 69 6d 70 25 21 32 30 3d | 6f 79 25 2b 77 69 6d 70 |imp%!20=|oy%+wimp|
|00003930| 25 21 32 30 0d 17 d4 0e | 77 69 6d 70 25 21 32 34 |%!20....|wimp%!24|
|00003940| 3d 30 0d 17 de 0e 77 69 | 6d 70 25 21 32 38 3d 30 |=0....wi|mp%!28=0|
|00003950| 0d 17 e8 16 77 69 6d 70 | 25 21 33 32 3d 26 37 46 |....wimp|%!32=&7F|
|00003960| 46 46 46 46 46 46 0d 17 | f2 16 77 69 6d 70 25 21 |FFFFFF..|..wimp%!|
|00003970| 33 36 3d 26 37 46 46 46 | 46 46 46 46 0d 17 fc 1b |36=&7FFF|FFFF....|
|00003980| c8 99 22 57 69 6d 70 5f | 44 72 61 67 42 6f 78 22 |.."Wimp_|DragBox"|
|00003990| 2c 2c 77 69 6d 70 25 0d | 18 06 05 e1 0d 18 10 05 |,,wimp%.|........|
|000039a0| 3a 0d 18 1a 19 dd 20 a4 | 77 69 6d 70 5f 73 74 72 |:..... .|wimp_str|
|000039b0| 69 6e 67 28 77 70 74 72 | 25 29 0d 18 24 08 ea 20 |ing(wptr|%)..$.. |
|000039c0| 61 24 0d 18 2e 10 c8 95 | 20 3f 77 70 74 72 25 3c |a$......| ?wptr%<|
|000039d0| 3e 30 0d 18 38 1a 61 24 | 2b 3d bd 28 3f 77 70 74 |>0..8.a$|+=.(?wpt|
|000039e0| 72 25 29 3a 77 70 74 72 | 25 2b 3d 31 0d 18 42 05 |r%):wptr|%+=1..B.|
|000039f0| ce 0d 18 4c 07 3d 61 24 | 0d 18 56 05 3a 0d 18 60 |...L.=a$|..V.:..`|
|00003a00| 23 dd 20 f2 77 69 6d 70 | 5f 7a 65 72 6f 74 65 72 |#. .wimp|_zeroter|
|00003a10| 6d 69 6e 61 74 65 28 77 | 70 74 72 25 2c 74 24 29 |minate(w|ptr%,t$)|
|00003a20| 0d 18 6a 07 ea 20 4c 0d | 18 74 11 e3 20 4c 3d 31 |..j.. L.|.t.. L=1|
|00003a30| 20 b8 20 a9 28 74 24 29 | 0d 18 7e 16 3f 77 70 74 | . .(t$)|..~.?wpt|
|00003a40| 72 25 3d 97 28 c1 74 24 | 2c 4c 2c 31 29 29 0d 18 |r%=.(.t$|,L,1))..|
|00003a50| 88 0c 77 70 74 72 25 2b | 3d 31 0d 18 92 07 ed 20 |..wptr%+|=1..... |
|00003a60| 4c 0d 18 9c 0c 3f 77 70 | 74 72 25 3d 30 0d 18 a6 |L....?wp|tr%=0...|
|00003a70| 05 e1 0d 18 b0 05 3a 0d | 18 ba 10 dd 20 f2 77 69 |......:.|.... .wi|
|00003a80| 6d 70 5f 68 65 6c 70 0d | 18 c4 17 ea 20 68 65 6c |mp_help.|.... hel|
|00003a90| 70 25 2c 77 68 61 6e 25 | 2c 69 63 6f 6e 25 0d 18 |p%,whan%|,icon%..|
|00003aa0| ce 14 77 69 6d 70 25 21 | 31 32 3d 77 69 6d 70 25 |..wimp%!|12=wimp%|
|00003ab0| 21 38 0d 18 d8 11 77 69 | 6d 70 25 21 31 36 3d 26 |!8....wi|mp%!16=&|
|00003ac0| 35 30 33 0d 18 e2 12 68 | 65 6c 70 25 3d 77 69 6d |503....h|elp%=wim|
|00003ad0| 70 25 2b 32 30 0d 18 ec | 12 77 68 61 6e 25 3d 77 |p%+20...|.whan%=w|
|00003ae0| 69 6d 70 25 21 33 32 0d | 18 f6 12 69 63 6f 6e 25 |imp%!32.|...icon%|
|00003af0| 3d 77 69 6d 70 25 21 33 | 36 0d 19 00 21 68 65 6c |=wimp%!3|6...!hel|
|00003b00| 70 24 3d a4 75 73 65 72 | 5f 68 65 6c 70 28 77 68 |p$=.user|_help(wh|
|00003b10| 61 6e 25 2c 69 63 6f 6e | 25 29 0d 19 0a 15 24 68 |an%,icon|%)....$h|
|00003b20| 65 6c 70 25 3d 68 65 6c | 70 24 2b 22 7c 4d 22 0d |elp%=hel|p$+"|M".|
|00003b30| 19 14 15 68 65 6c 70 25 | 2b 3d a9 28 68 65 6c 70 |...help%|+=.(help|
|00003b40| 24 29 2b 32 0d 19 1e 0c | 3f 68 65 6c 70 25 3d 30 |$)+2....|?help%=0|
|00003b50| 0d 19 28 1d 21 77 69 6d | 70 25 3d 28 68 65 6c 70 |..(.!wim|p%=(help|
|00003b60| 25 2b 34 2d 77 69 6d 70 | 25 29 80 ac 33 0d 19 32 |%+4-wimp|%)..3..2|
|00003b70| 29 c8 99 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 |).."Wimp|_SendMes|
|00003b80| 73 61 67 65 22 2c 31 37 | 2c 77 69 6d 70 25 2c 77 |sage",17|,wimp%,w|
|00003b90| 69 6d 70 25 21 34 0d 19 | 3c 05 e1 0d 19 46 05 3a |imp%!4..|<....F.:|
|00003ba0| 0d 19 50 14 dd 20 f2 77 | 69 6d 70 5f 64 61 74 61 |..P.. .w|imp_data|
|00003bb0| 6c 6f 61 64 0d 19 5a 20 | ea 20 77 68 61 6e 25 2c |load..Z |. whan%,|
|00003bc0| 69 63 6f 6e 25 2c 66 74 | 79 70 65 24 2c 70 61 74 |icon%,ft|ype$,pat|
|00003bd0| 68 24 2c 70 0d 19 64 12 | 77 68 61 6e 25 3d 77 69 |h$,p..d.|whan%=wi|
|00003be0| 6d 70 25 21 32 30 0d 19 | 6e 12 69 63 6f 6e 25 3d |mp%!20..|n.icon%=|
|00003bf0| 77 69 6d 70 25 21 32 34 | 0d 19 78 17 66 74 79 70 |wimp%!24|..x.ftyp|
|00003c00| 65 24 3d c3 7e 28 77 69 | 6d 70 25 21 34 30 29 0d |e$=.~(wi|mp%!40).|
|00003c10| 19 82 20 70 61 74 68 24 | 3d a4 77 69 6d 70 5f 73 |.. path$|=.wimp_s|
|00003c20| 74 72 69 6e 67 28 77 69 | 6d 70 25 2b 34 34 29 0d |tring(wi|mp%+44).|
|00003c30| 19 8c 2e 70 3d a4 75 73 | 65 72 5f 6c 6f 61 64 64 |...p=.us|er_loadd|
|00003c40| 61 74 61 28 70 61 74 68 | 24 2c 77 68 61 6e 25 2c |ata(path|$,whan%,|
|00003c50| 69 63 6f 6e 25 2c 66 74 | 79 70 65 24 29 0d 19 96 |icon%,ft|ype$)...|
|00003c60| 1b e7 20 70 3d 31 20 f2 | 77 69 6d 70 5f 64 61 74 |.. p=1 .|wimp_dat|
|00003c70| 61 6c 6f 61 64 61 63 6b | 0d 19 a0 05 e1 0d 19 aa |aloadack|........|
|00003c80| 05 3a 0d 19 b4 17 dd 20 | f2 77 69 6d 70 5f 64 61 |.:..... |.wimp_da|
|00003c90| 74 61 6c 6f 61 64 61 63 | 6b 0d 19 be 0e 77 69 6d |taloadac|k....wim|
|00003ca0| 70 25 21 31 36 3d 34 0d | 19 c8 33 c8 99 22 57 69 |p%!16=4.|..3.."Wi|
|00003cb0| 6d 70 5f 53 65 6e 64 4d | 65 73 73 61 67 65 22 2c |mp_SendM|essage",|
|00003cc0| 31 37 2c 77 69 6d 70 25 | 2c 77 69 6d 70 25 21 32 |17,wimp%|,wimp%!2|
|00003cd0| 30 2c 77 69 6d 70 25 21 | 32 34 0d 19 d2 34 e7 20 |0,wimp%!|24...4. |
|00003ce0| 70 61 74 68 24 3d 22 3c | 57 69 6d 70 24 53 63 72 |path$="<|Wimp$Scr|
|00003cf0| 61 70 3e 22 20 ff 22 57 | 69 70 65 20 22 2b 70 61 |ap>" ."W|ipe "+pa|
|00003d00| 74 68 24 2b 22 20 7e 43 | 20 7e 56 20 46 22 0d 19 |th$+" ~C| ~V F"..|
|00003d10| dc 05 e1 0d 19 e6 05 3a | 0d 19 f0 17 dd 20 f2 77 |.......:|..... .w|
|00003d20| 69 6d 70 5f 64 61 74 61 | 6c 6f 61 64 61 70 70 0d |imp_data|loadapp.|
|00003d30| 19 fa 16 e7 20 77 69 6d | 70 25 21 34 3d 77 74 61 |.... wim|p%!4=wta|
|00003d40| 73 6b 25 20 e1 0d 1a 04 | 0e 77 69 6d 70 25 21 31 |sk% ....|.wimp%!1|
|00003d50| 36 3d 32 0d 1a 0e 0f 77 | 69 6d 70 25 21 33 36 3d |6=2....w|imp%!36=|
|00003d60| 2d 31 0d 1a 18 14 77 69 | 6d 70 25 21 31 32 3d 77 |-1....wi|mp%!12=w|
|00003d70| 69 6d 70 25 21 38 0d 1a | 22 30 f2 77 69 6d 70 5f |imp%!8..|"0.wimp_|
|00003d80| 7a 65 72 6f 74 65 72 6d | 69 6e 61 74 65 28 77 69 |zeroterm|inate(wi|
|00003d90| 6d 70 25 2b 34 34 2c 22 | 3c 57 69 6d 70 24 53 63 |mp%+44,"|<Wimp$Sc|
|00003da0| 72 61 70 3e 22 29 0d 1a | 2c 32 c8 99 22 57 69 6d |rap>")..|,2.."Wim|
|00003db0| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 31 |p_SendMe|ssage",1|
|00003dc0| 37 2c 77 69 6d 70 25 2c | 77 69 6d 70 25 21 34 2c |7,wimp%,|wimp%!4,|
|00003dd0| 77 69 6d 70 25 21 32 34 | 0d 1a 36 05 e1 0d 1a 40 |wimp%!24|..6....@|
|00003de0| 05 3a 0d 1a 4a 24 dd 20 | f2 77 69 6d 70 5f 69 63 |.:..J$. |.wimp_ic|
|00003df0| 6f 6e 64 69 73 61 62 6c | 65 28 77 68 61 6e 25 2c |ondisabl|e(whan%,|
|00003e00| 69 63 6f 6e 25 29 0d 1a | 54 11 77 69 6d 70 25 21 |icon%)..|T.wimp%!|
|00003e10| 30 3d 77 68 61 6e 25 0d | 1a 5e 11 77 69 6d 70 25 |0=whan%.|.^.wimp%|
|00003e20| 21 34 3d 69 63 6f 6e 25 | 0d 1a 68 13 77 69 6d 70 |!4=icon%|..h.wimp|
|00003e30| 25 21 38 3d 28 31 3c 3c | 32 32 29 0d 1a 72 14 77 |%!8=(1<<|22)..r.w|
|00003e40| 69 6d 70 25 21 31 32 3d | 28 31 3c 3c 32 32 29 0d |imp%!12=|(1<<22).|
|00003e50| 1a 7c 20 c8 99 22 57 69 | 6d 70 5f 53 65 74 49 63 |.| .."Wi|mp_SetIc|
|00003e60| 6f 6e 53 74 61 74 65 22 | 2c 2c 77 69 6d 70 25 0d |onState"|,,wimp%.|
|00003e70| 1a 86 05 e1 0d 1a 90 05 | 3a 0d 1a 9a 23 dd 20 f2 |........|:...#. .|
|00003e80| 77 69 6d 70 5f 69 63 6f | 6e 65 6e 61 62 6c 65 28 |wimp_ico|nenable(|
|00003e90| 77 68 61 6e 25 2c 69 63 | 6f 6e 25 29 0d 1a a4 11 |whan%,ic|on%)....|
|00003ea0| 77 69 6d 70 25 21 30 3d | 77 68 61 6e 25 0d 1a ae |wimp%!0=|whan%...|
|00003eb0| 11 77 69 6d 70 25 21 34 | 3d 69 63 6f 6e 25 0d 1a |.wimp%!4|=icon%..|
|00003ec0| b8 13 77 69 6d 70 25 21 | 38 3d 28 31 3c 3c 32 32 |..wimp%!|8=(1<<22|
|00003ed0| 29 0d 1a c2 14 77 69 6d | 70 25 21 31 32 3d 28 30 |)....wim|p%!12=(0|
|00003ee0| 3c 3c 32 32 29 0d 1a cc | 20 c8 99 22 57 69 6d 70 |<<22)...| .."Wimp|
|00003ef0| 5f 53 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_SetIcon|State",,|
|00003f00| 77 69 6d 70 25 0d 1a d6 | 05 e1 0d 1a e0 05 3a 0d |wimp%...|......:.|
|00003f10| 1a ea 29 dd 20 f2 77 69 | 6d 70 5f 69 63 6f 6e 73 |..). .wi|mp_icons|
|00003f20| 65 6c 65 63 74 28 77 68 | 61 6e 25 2c 69 63 6f 6e |elect(wh|an%,icon|
|00003f30| 25 2c 73 74 61 74 65 29 | 0d 1a f4 11 77 69 6d 70 |%,state)|....wimp|
|00003f40| 25 21 30 3d 77 68 61 6e | 25 0d 1a fe 11 77 69 6d |%!0=whan|%....wim|
|00003f50| 70 25 21 34 3d 69 63 6f | 6e 25 0d 1b 08 17 77 69 |p%!4=ico|n%....wi|
|00003f60| 6d 70 25 21 38 3d 28 73 | 74 61 74 65 3c 3c 32 31 |mp%!8=(s|tate<<21|
|00003f70| 29 0d 1b 12 14 77 69 6d | 70 25 21 31 32 3d 28 31 |)....wim|p%!12=(1|
|00003f80| 3c 3c 32 31 29 0d 1b 1c | 20 c8 99 22 57 69 6d 70 |<<21)...| .."Wimp|
|00003f90| 5f 53 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_SetIcon|State",,|
|00003fa0| 77 69 6d 70 25 0d 1b 26 | 05 e1 0d 1b 30 05 3a 0d |wimp%..&|....0.:.|
|00003fb0| 1b 3a 1f dd 20 f2 77 69 | 6d 70 5f 62 61 6e 6e 65 |.:.. .wi|mp_banne|
|00003fc0| 72 28 77 68 61 6e 25 2c | 64 65 6c 61 79 29 0d 1b |r(whan%,|delay)..|
|00003fd0| 44 07 ea 20 74 0d 1b 4e | 20 f2 77 69 6d 70 5f 6f |D.. t..N| .wimp_o|
|00003fe0| 70 65 6e 77 69 6e 64 6f | 77 28 77 68 61 6e 25 2c |penwindo|w(whan%,|
|00003ff0| 31 2c 2d 31 29 0d 1b 58 | 0d 77 42 41 4e 4e 45 52 |1,-1)..X|.wBANNER|
|00004000| 3d b9 0d 1b 62 20 c8 99 | 22 4f 53 5f 52 65 61 64 |=...b ..|"OS_Read|
|00004010| 4d 6f 6e 6f 74 6f 6e 69 | 63 54 69 6d 65 22 20 b8 |Monotoni|cTime" .|
|00004020| 20 74 0d 1b 6c 1c 77 64 | 65 6c 61 79 6d 61 78 25 | t..l.wd|elaymax%|
|00004030| 3d 28 64 65 6c 61 79 2a | 31 30 30 29 2b 74 0d 1b |=(delay*|100)+t..|
|00004040| 76 12 77 62 61 6e 6e 65 | 72 25 3d 77 68 61 6e 25 |v.wbanne|r%=whan%|
|00004050| 0d 1b 80 05 e1 0d 1b 8a | 05 3a 0d 1b 94 14 dd 20 |........|.:..... |
|00004060| f2 77 69 6d 70 5f 70 6f | 6c 6c 6e 75 6c 6c 0d 1b |.wimp_po|llnull..|
|00004070| 9e 17 e7 20 4e 55 4c 4c | 3d b9 20 f2 75 73 65 72 |... NULL|=. .user|
|00004080| 5f 6e 75 6c 6c 0d 1b a8 | 07 ea 20 74 0d 1b b2 11 |_null...|.. t....|
|00004090| e7 20 77 42 41 4e 4e 45 | 52 3d a3 20 e1 0d 1b bc |. wBANNE|R=. ....|
|000040a0| 20 c8 99 22 4f 53 5f 52 | 65 61 64 4d 6f 6e 6f 74 | .."OS_R|eadMonot|
|000040b0| 6f 6e 69 63 54 69 6d 65 | 22 20 b8 20 74 0d 1b c6 |onicTime|" . t...|
|000040c0| 38 e7 20 74 3e 77 64 65 | 6c 61 79 6d 61 78 25 20 |8. t>wde|laymax% |
|000040d0| f2 77 69 6d 70 5f 63 6c | 6f 73 65 77 69 6e 64 6f |.wimp_cl|osewindo|
|000040e0| 77 28 77 62 61 6e 6e 65 | 72 25 29 3a 77 42 41 4e |w(wbanne|r%):wBAN|
|000040f0| 4e 45 52 3d a3 0d 1b d0 | 05 e1 0d 1b da 05 3a 0d |NER=....|......:.|
|00004100| 1b e4 2d dd 20 f2 77 69 | 6d 70 5f 70 6f 69 6e 74 |..-. .wi|mp_point|
|00004110| 65 72 28 70 6f 69 6e 74 | 65 72 25 2c 73 61 72 65 |er(point|er%,sare|
|00004120| 61 25 2c 70 6f 69 6e 74 | 65 72 24 29 0d 1b ee 0a |a%,point|er$)....|
|00004130| ea 20 70 74 72 24 0d 1b | f8 23 e7 20 70 6f 69 6e |. ptr$..|.#. poin|
|00004140| 74 65 72 25 3d 30 20 70 | 74 72 24 3d 22 70 74 72 |ter%=0 p|tr$="ptr|
|00004150| 5f 64 65 66 61 75 6c 74 | 22 0d 1c 02 1e e7 20 70 |_default|"..... p|
|00004160| 6f 69 6e 74 65 72 25 3d | 31 20 70 74 72 24 3d 70 |ointer%=|1 ptr$=p|
|00004170| 6f 69 6e 74 65 72 24 0d | 1c 0c 0f 70 6f 69 6e 74 |ointer$.|...point|
|00004180| 65 72 25 2b 3d 31 0d 1c | 16 27 e7 20 73 61 72 65 |er%+=1..|.'. sare|
|00004190| 61 25 3d 30 20 f2 77 69 | 6d 70 5f 70 6f 69 6e 74 |a%=0 .wi|mp_point|
|000041a0| 65 72 52 4d 41 28 70 74 | 72 24 29 3a e1 0d 1c 20 |erRMA(pt|r$):... |
|000041b0| 31 c8 99 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |1.."OS_S|priteOp"|
|000041c0| 2c 32 35 36 2b 33 36 2c | 77 73 70 61 72 65 61 25 |,256+36,|wsparea%|
|000041d0| 2c 70 74 72 24 2c 70 6f | 69 6e 74 65 72 25 0d 1c |,ptr$,po|inter%..|
|000041e0| 2a 05 e1 0d 1c 34 05 3a | 0d 1c 3e 1c dd 20 f2 77 |*....4.:|..>.. .w|
|000041f0| 69 6d 70 5f 70 6f 69 6e | 74 65 72 52 4d 41 28 70 |imp_poin|terRMA(p|
|00004200| 74 72 24 29 0d 1c 48 27 | c8 99 22 57 69 6d 70 5f |tr$)..H'|.."Wimp_|
|00004210| 53 70 72 69 74 65 4f 70 | 22 2c 33 36 2c 2c 70 74 |SpriteOp|",36,,pt|
|00004220| 72 24 2c 70 6f 69 6e 74 | 65 72 25 0d 1c 52 05 e1 |r$,point|er%..R..|
|00004230| 0d 1c 5c 05 3a 0d 1c 66 | 1f dd 20 a4 77 69 6d 70 |..\.:..f|.. .wimp|
|00004240| 5f 67 65 74 6d 65 6e 75 | 74 69 74 6c 65 28 6d 68 |_getmenu|title(mh|
|00004250| 61 6e 25 29 0d 1c 70 0f | 3d 24 28 6d 68 61 6e 25 |an%)..p.|=$(mhan%|
|00004260| 2b 30 29 0d 1c 7a 05 3a | 0d 1c 84 25 dd 20 f2 77 |+0)..z.:|...%. .w|
|00004270| 69 6d 70 5f 70 75 74 6d | 65 6e 75 74 69 74 6c 65 |imp_putm|enutitle|
|00004280| 28 6d 68 61 6e 25 2c 74 | 65 78 74 24 29 0d 1c 8e |(mhan%,t|ext$)...|
|00004290| 22 e7 20 a9 28 74 65 78 | 74 24 29 3e 31 31 20 74 |". .(tex|t$)>11 t|
|000042a0| 65 78 74 24 3d c0 74 65 | 78 74 24 2c 31 31 29 0d |ext$=.te|xt$,11).|
|000042b0| 1c 98 14 24 28 6d 68 61 | 6e 25 2b 30 29 3d 74 65 |...$(mha|n%+0)=te|
|000042c0| 78 74 24 0d 1c a2 1e f2 | 77 69 6d 70 5f 63 61 6c |xt$.....|wimp_cal|
|000042d0| 63 6d 65 6e 75 77 69 64 | 74 68 28 6d 68 61 6e 25 |cmenuwid|th(mhan%|
|000042e0| 29 0d 1c ac 05 e1 0d 1c | b6 05 3a 0d 1c c0 1f dd |).......|..:.....|
|000042f0| 20 f2 77 69 6d 70 5f 73 | 74 61 72 74 74 61 73 6b | .wimp_s|tarttask|
|00004300| 28 63 6f 6d 6d 61 6e 64 | 24 29 0d 1c ca 1f c8 99 |(command|$)......|
|00004310| 22 57 69 6d 70 5f 53 74 | 61 72 74 54 61 73 6b 22 |"Wimp_St|artTask"|
|00004320| 2c 63 6f 6d 6d 61 6e 64 | 24 0d 1c d4 05 e1 0d 1c |,command|$.......|
|00004330| de 05 3a 0d 1c e8 25 dd | 20 a4 77 69 6d 70 5f 67 |..:...%.| .wimp_g|
|00004340| 65 74 6d 65 6e 75 74 65 | 78 74 28 6d 68 61 6e 25 |etmenute|xt(mhan%|
|00004350| 2c 77 69 74 65 6d 25 29 | 0d 1c f2 0e ea 20 70 25 |,witem%)|..... p%|
|00004360| 2c 66 6c 61 67 25 0d 1c | fc 19 70 25 3d 34 30 2b |,flag%..|..p%=40+|
|00004370| 28 28 77 69 74 65 6d 25 | 2d 31 29 2a 32 34 29 0d |((witem%|-1)*24).|
|00004380| 1d 06 16 66 6c 61 67 25 | 3d 6d 68 61 6e 25 21 28 |...flag%|=mhan%!(|
|00004390| 70 25 2d 34 29 0d 1d 10 | 14 66 6c 61 67 25 3d 28 |p%-4)...|.flag%=(|
|000043a0| 66 6c 61 67 25 3e 3e 38 | 29 0d 1d 1a 21 e7 20 28 |flag%>>8|)...!. (|
|000043b0| 66 6c 61 67 25 20 80 20 | 31 29 20 3d 31 20 3d 24 |flag% . |1) =1 =$|
|000043c0| 28 6d 68 61 6e 25 21 70 | 25 29 0d 1d 24 10 3d 24 |(mhan%!p|%)..$.=$|
|000043d0| 28 6d 68 61 6e 25 2b 70 | 25 29 0d 1d 2e 05 3a 0d |(mhan%+p|%)....:.|
|000043e0| 1d 38 2b dd 20 f2 77 69 | 6d 70 5f 70 75 74 6d 65 |.8+. .wi|mp_putme|
|000043f0| 6e 75 74 65 78 74 28 6d | 68 61 6e 25 2c 77 69 74 |nutext(m|han%,wit|
|00004400| 65 6d 25 2c 74 65 78 74 | 24 29 0d 1d 42 0e ea 20 |em%,text|$)..B.. |
|00004410| 70 25 2c 66 6c 61 67 25 | 0d 1d 4c 19 70 25 3d 34 |p%,flag%|..L.p%=4|
|00004420| 30 2b 28 28 77 69 74 65 | 6d 25 2d 31 29 2a 32 34 |0+((wite|m%-1)*24|
|00004430| 29 0d 1d 56 16 66 6c 61 | 67 25 3d 6d 68 61 6e 25 |)..V.fla|g%=mhan%|
|00004440| 21 28 70 25 2d 34 29 0d | 1d 60 14 66 6c 61 67 25 |!(p%-4).|.`.flag%|
|00004450| 3d 28 66 6c 61 67 25 3e | 3e 38 29 0d 1d 6a 3b e7 |=(flag%>|>8)..j;.|
|00004460| 20 28 66 6c 61 67 25 20 | 80 20 31 29 20 3d 31 20 | (flag% |. 1) =1 |
|00004470| f2 77 69 6d 70 5f 70 75 | 74 6d 65 6e 75 74 65 78 |.wimp_pu|tmenutex|
|00004480| 74 69 6e 64 28 6d 68 61 | 6e 25 2c 70 25 2c 74 65 |tind(mha|n%,p%,te|
|00004490| 78 74 24 29 3a e1 0d 1d | 74 38 e7 20 a9 28 74 65 |xt$):...|t8. .(te|
|000044a0| 78 74 24 29 3e 31 31 20 | f2 77 69 6d 70 5f 6e 65 |xt$)>11 |.wimp_ne|
|000044b0| 77 6d 65 6e 75 69 6e 64 | 28 6d 68 61 6e 25 2c 77 |wmenuind|(mhan%,w|
|000044c0| 69 74 65 6d 25 2c 74 65 | 78 74 24 29 3a e1 0d 1d |item%,te|xt$):...|
|000044d0| 7e 15 24 28 6d 68 61 6e | 25 2b 70 25 29 3d 74 65 |~.$(mhan|%+p%)=te|
|000044e0| 78 74 24 0d 1d 88 1e f2 | 77 69 6d 70 5f 63 61 6c |xt$.....|wimp_cal|
|000044f0| 63 6d 65 6e 75 77 69 64 | 74 68 28 6d 68 61 6e 25 |cmenuwid|th(mhan%|
|00004500| 29 0d 1d 92 05 e1 0d 1d | 9c 05 3a 0d 1d a6 2a dd |).......|..:...*.|
|00004510| 20 f2 77 69 6d 70 5f 6e | 65 77 6d 65 6e 75 69 6e | .wimp_n|ewmenuin|
|00004520| 64 28 6d 68 61 6e 25 2c | 77 69 74 65 6d 25 2c 74 |d(mhan%,|witem%,t|
|00004530| 65 78 74 24 29 0d 1d b0 | 11 77 70 74 72 25 3d 6d |ext$)...|.wptr%=m|
|00004540| 68 61 6e 25 2b 34 0d 1d | ba 16 77 70 74 72 25 2b |han%+4..|..wptr%+|
|00004550| 3d 28 32 34 2a 77 69 74 | 65 6d 25 29 0d 1d c4 1c |=(24*wit|em%)....|
|00004560| 77 70 74 72 25 21 38 3d | 77 70 74 72 25 21 38 20 |wptr%!8=|wptr%!8 |
|00004570| 84 20 28 31 3c 3c 38 29 | 0d 1d ce 1a de 20 74 77 |. (1<<8)|..... tw|
|00004580| 65 6c 76 65 25 20 28 a9 | 28 74 65 78 74 24 29 2b |elve% (.|(text$)+|
|00004590| 31 29 0d 1d d8 14 77 70 | 74 72 25 21 31 32 3d 74 |1)....wp|tr%!12=t|
|000045a0| 77 65 6c 76 65 25 0d 1d | e2 0e 77 70 74 72 25 21 |welve%..|..wptr%!|
|000045b0| 31 36 3d 30 0d 1d ec 14 | 24 28 74 77 65 6c 76 65 |16=0....|$(twelve|
|000045c0| 25 29 3d 74 65 78 74 24 | 0d 1d f6 1e f2 77 69 6d |%)=text$|.....wim|
|000045d0| 70 5f 63 61 6c 63 6d 65 | 6e 75 77 69 64 74 68 28 |p_calcme|nuwidth(|
|000045e0| 6d 68 61 6e 25 29 0d 1e | 00 05 e1 0d 1e 0a 05 3a |mhan%)..|.......:|
|000045f0| 0d 1e 14 2a dd 20 f2 77 | 69 6d 70 5f 70 75 74 6d |...*. .w|imp_putm|
|00004600| 65 6e 75 74 65 78 74 69 | 6e 64 28 6d 68 61 6e 25 |enutexti|nd(mhan%|
|00004610| 2c 70 25 2c 74 65 78 74 | 24 29 0d 1e 1e 25 74 77 |,p%,text|$)...%tw|
|00004620| 65 6c 76 65 25 3d 6d 68 | 61 6e 25 21 70 25 3a 24 |elve%=mh|an%!p%:$|
|00004630| 28 74 77 65 6c 76 65 25 | 29 3d 74 65 78 74 24 0d |(twelve%|)=text$.|
|00004640| 1e 28 1e f2 77 69 6d 70 | 5f 63 61 6c 63 6d 65 6e |.(..wimp|_calcmen|
|00004650| 75 77 69 64 74 68 28 6d | 68 61 6e 25 29 0d 1e 32 |uwidth(m|han%)..2|
|00004660| 05 e1 0d 1e 3c 05 3a 0d | 1e 46 20 dd 20 f2 77 69 |....<.:.|.F . .wi|
|00004670| 6d 70 5f 63 61 6c 63 6d | 65 6e 75 77 69 64 74 68 |mp_calcm|enuwidth|
|00004680| 28 6d 68 61 6e 25 29 0d | 1e 50 26 ea 20 74 69 74 |(mhan%).|.P&. tit|
|00004690| 6c 65 24 2c 66 6c 61 67 | 25 2c 77 69 64 74 68 25 |le$,flag|%,width%|
|000046a0| 2c 69 74 65 6d 24 2c 77 | 69 64 74 68 25 0d 1e 5a |,item$,w|idth%..Z|
|000046b0| 15 74 69 74 6c 65 24 3d | 24 28 6d 68 61 6e 25 2b |.title$=|$(mhan%+|
|000046c0| 30 29 0d 1e 64 1b 77 69 | 64 74 68 25 3d 28 a9 28 |0)..d.wi|dth%=(.(|
|000046d0| 74 69 74 6c 65 24 29 2b | 31 29 2a 31 36 0d 1e 6e |title$)+|1)*16..n|
|000046e0| 12 77 70 74 72 25 3d 6d | 68 61 6e 25 2b 32 38 0d |.wptr%=m|han%+28.|
|000046f0| 1e 78 05 f5 0d 1e 82 11 | 66 6c 61 67 25 3d 77 70 |.x......|flag%=wp|
|00004700| 74 72 25 21 38 0d 1e 8c | 14 66 6c 61 67 25 3d 28 |tr%!8...|.flag%=(|
|00004710| 66 6c 61 67 25 3e 3e 38 | 29 0d 1e 96 26 e7 20 28 |flag%>>8|)...&. (|
|00004720| 66 6c 61 67 25 20 80 20 | 31 29 20 3d 31 20 69 74 |flag% . |1) =1 it|
|00004730| 65 6d 24 3d 24 28 77 70 | 74 72 25 21 31 32 29 0d |em$=$(wp|tr%!12).|
|00004740| 1e a0 26 e7 20 28 66 6c | 61 67 25 20 80 20 31 29 |..&. (fl|ag% . 1)|
|00004750| 20 3d 30 20 69 74 65 6d | 24 3d 24 28 77 70 74 72 | =0 item|$=$(wptr|
|00004760| 25 2b 31 32 29 0d 1e aa | 35 e7 20 28 28 a9 28 69 |%+12)...|5. ((.(i|
|00004770| 74 65 6d 24 29 2b 31 29 | 2a 31 36 29 3e 77 69 64 |tem$)+1)|*16)>wid|
|00004780| 74 68 25 20 77 69 64 74 | 68 25 3d 28 a9 28 69 74 |th% widt|h%=(.(it|
|00004790| 65 6d 24 29 2b 31 29 2a | 31 36 0d 1e b4 10 66 6c |em$)+1)*|16....fl|
|000047a0| 61 67 25 3d 21 77 70 74 | 72 25 0d 1e be 14 66 6c |ag%=!wpt|r%....fl|
|000047b0| 61 67 25 3d 28 66 6c 61 | 67 25 3e 3e 37 29 0d 1e |ag%=(fla|g%>>7)..|
|000047c0| c8 0d 77 70 74 72 25 2b | 3d 32 34 0d 1e d2 14 fd |..wptr%+|=24.....|
|000047d0| 20 28 66 6c 61 67 25 20 | 80 20 31 29 20 3d 31 0d | (flag% |. 1) =1.|
|000047e0| 1e dc 13 6d 68 61 6e 25 | 21 31 36 3d 77 69 64 74 |...mhan%|!16=widt|
|000047f0| 68 25 0d 1e e6 05 e1 0d | 1e f0 05 3a 0d 1e fa 2b |h%......|...:...+|
|00004800| dd 20 f2 77 69 6d 70 5f | 6d 65 6e 75 77 72 69 74 |. .wimp_|menuwrit|
|00004810| 65 28 6d 68 61 6e 25 2c | 77 69 74 65 6d 25 2c 62 |e(mhan%,|witem%,b|
|00004820| 75 66 6c 65 6e 25 29 0d | 1f 04 12 de 20 62 75 66 |uflen%).|.... buf|
|00004830| 25 20 62 75 66 6c 65 6e | 25 0d 1f 0e 0e 24 28 62 |% buflen|%....$(b|
|00004840| 75 66 25 29 3d 22 22 0d | 1f 18 11 77 70 74 72 25 |uf%)="".|...wptr%|
|00004850| 3d 6d 68 61 6e 25 2b 34 | 0d 1f 22 14 77 70 74 72 |=mhan%+4|..".wptr|
|00004860| 25 2b 3d 32 34 2a 77 69 | 74 65 6d 25 0d 1f 2c 1a |%+=24*wi|tem%..,.|
|00004870| 21 77 70 74 72 25 3d 21 | 77 70 74 72 25 20 84 20 |!wptr%=!|wptr% . |
|00004880| 28 31 3c 3c 32 29 0d 1f | 36 1c 77 70 74 72 25 21 |(1<<2)..|6.wptr%!|
|00004890| 38 3d 77 70 74 72 25 21 | 38 20 84 20 28 31 3c 3c |8=wptr%!|8 . (1<<|
|000048a0| 38 29 0d 1f 40 11 77 70 | 74 72 25 21 31 32 3d 62 |8)..@.wp|tr%!12=b|
|000048b0| 75 66 25 0d 1f 4a 14 77 | 70 74 72 25 21 32 30 3d |uf%..J.w|ptr%!20=|
|000048c0| 62 75 66 6c 65 6e 25 0d | 1f 54 0e 77 70 74 72 25 |buflen%.|.T.wptr%|
|000048d0| 21 31 36 3d 30 0d 1f 5e | 05 e1 0d 1f 68 05 3a 0d |!16=0..^|....h.:.|
|000048e0| 1f 72 25 dd 20 a4 77 69 | 6d 70 5f 67 65 74 77 69 |.r%. .wi|mp_getwi|
|000048f0| 6e 64 6f 77 73 69 7a 65 | 28 77 68 61 6e 25 2c 73 |ndowsize|(whan%,s|
|00004900| 69 64 65 29 0d 1f 7c 11 | 77 69 6d 70 25 21 30 3d |ide)..|.|wimp%!0=|
|00004910| 77 68 61 6e 25 0d 1f 86 | 22 c8 99 22 57 69 6d 70 |whan%...|".."Wimp|
|00004920| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00004930| 2c 2c 77 69 6d 70 25 0d | 1f 90 22 e7 20 73 69 64 |,,wimp%.|..". sid|
|00004940| 65 3d 30 20 3d 28 77 69 | 6d 70 25 21 31 32 2d 77 |e=0 =(wi|mp%!12-w|
|00004950| 69 6d 70 25 21 34 29 2b | 32 0d 1f 9a 1e e7 20 73 |imp%!4)+|2..... s|
|00004960| 69 64 65 3d 31 20 3d 77 | 69 6d 70 25 21 31 36 3d |ide=1 =w|imp%!16=|
|00004970| 77 69 6d 70 25 21 38 0d | 1f a4 06 3d 30 0d 1f ae |wimp%!8.|...=0...|
|00004980| 05 3a 0d 1f b8 16 dd 20 | a4 77 69 6d 70 5f 6c 69 |.:..... |.wimp_li|
|00004990| 62 76 65 72 73 69 6f 6e | 0d 1f c2 0d 3d 77 69 6d |bversion|....=wim|
|000049a0| 70 76 65 72 25 0d 1f cc | 05 3a 0d 1f d6 20 dd 20 |pver%...|.:... . |
|000049b0| a4 77 69 6d 70 5f 73 79 | 73 76 61 72 69 61 62 6c |.wimp_sy|svariabl|
|000049c0| 65 28 73 79 73 76 61 72 | 24 29 0d 1f e0 1c ea 20 |e(sysvar|$)..... |
|000049d0| 6c 65 6e 25 2c 72 65 73 | 75 6c 74 25 2c 76 61 72 |len%,res|ult%,var|
|000049e0| 69 61 62 6c 65 25 0d 1f | ea 12 24 77 69 6d 70 25 |iable%..|..$wimp%|
|000049f0| 3d 73 79 73 76 61 72 24 | 0d 1f f4 33 c8 99 22 4f |=sysvar$|...3.."O|
|00004a00| 53 5f 52 65 61 64 56 61 | 72 56 61 6c 22 2c 77 69 |S_ReadVa|rVal",wi|
|00004a10| 6d 70 25 2c 77 69 6d 70 | 25 2b 32 35 35 2c 32 35 |mp%,wimp|%+255,25|
|00004a20| 35 2c 2c 33 b8 2c 2c 6c | 65 6e 25 0d 1f fe 17 77 |5,,3.,,l|en%....w|
|00004a30| 69 6d 70 25 3f 28 6c 65 | 6e 25 2b 32 35 35 29 3d |imp%?(le|n%+255)=|
|00004a40| 31 33 0d 20 08 11 3d 24 | 28 77 69 6d 70 25 2b 32 |13. ..=$|(wimp%+2|
|00004a50| 35 35 29 0d 20 12 05 3a | 0d 20 1c 2a dd 20 f2 77 |55). ..:|. .*. .w|
|00004a60| 69 6d 70 5f 70 75 74 6d | 65 6e 75 69 74 65 6d 28 |imp_putm|enuitem(|
|00004a70| 6d 65 6e 75 25 2c 69 74 | 65 6d 25 2c 74 65 78 74 |menu%,it|em%,text|
|00004a80| 24 29 0d 20 26 18 ea 20 | 6e 75 6d 2c 70 2c 73 75 |$). &.. |num,p,su|
|00004a90| 62 6d 65 6e 75 25 2c 4c | 2c 4d 0d 20 30 1d 6e 75 |bmenu%,L|,M. 0.nu|
|00004aa0| 6d 3d a4 77 69 6d 70 5f | 6d 65 6e 75 73 69 7a 65 |m=.wimp_|menusize|
|00004ab0| 28 6d 65 6e 75 25 29 0d | 20 3a 11 77 70 74 72 25 |(menu%).| :.wptr%|
|00004ac0| 3d 6d 65 6e 75 25 2b 34 | 0d 20 44 1f e7 20 69 74 |=menu%+4|. D.. it|
|00004ad0| 65 6d 25 3e 28 6e 75 6d | 2b 31 29 20 69 74 65 6d |em%>(num|+1) item|
|00004ae0| 25 3d 6e 75 6d 2b 31 0d | 20 4e 15 e7 20 69 74 65 |%=num+1.| N.. ite|
|00004af0| 6d 25 3c 31 20 69 74 65 | 6d 25 3d 31 0d 20 58 13 |m%<1 ite|m%=1. X.|
|00004b00| e7 20 69 74 65 6d 25 3d | 6e 75 6d 2b 31 20 8c 0d |. item%=|num+1 ..|
|00004b10| 20 62 11 77 70 74 72 25 | 2b 3d 32 34 2a 6e 75 6d | b.wptr%|+=24*num|
|00004b20| 0d 20 6c 1c 77 70 74 72 | 25 21 30 3d 77 70 74 72 |. l.wptr|%!0=wptr|
|00004b30| 25 21 30 20 84 20 28 31 | 3c 3c 37 29 0d 20 76 1c |%!0 . (1|<<7). v.|
|00004b40| 77 70 74 72 25 21 30 3d | 77 70 74 72 25 21 30 20 |wptr%!0=|wptr%!0 |
|00004b50| 82 20 28 31 3c 3c 37 29 | 0d 20 80 0d 77 70 74 72 |. (1<<7)|. ..wptr|
|00004b60| 25 2b 3d 32 34 0d 20 8a | 0f 77 70 74 72 25 21 30 |%+=24. .|.wptr%!0|
|00004b70| 3d 26 38 30 0d 20 94 05 | cc 0d 20 9e 15 77 70 74 |=&80. ..|.. ..wpt|
|00004b80| 72 25 2b 3d 32 34 2a 28 | 6e 75 6d 2b 31 29 0d 20 |r%+=24*(|num+1). |
|00004b90| a8 20 e3 20 4c 3d 28 6e | 75 6d 2b 31 29 20 b8 20 |. . L=(n|um+1) . |
|00004ba0| 28 69 74 65 6d 25 2b 31 | 29 20 88 20 2d 31 0d 20 |(item%+1|) . -1. |
|00004bb0| b2 12 e3 20 4d 3d 30 20 | b8 20 32 30 20 88 20 34 |... M=0 |. 20 . 4|
|00004bc0| 0d 20 bc 18 77 70 74 72 | 25 21 4d 3d 77 70 74 72 |. ..wptr|%!M=wptr|
|00004bd0| 25 21 28 4d 2d 32 34 29 | 0d 20 c6 07 ed 20 4d 0d |%!(M-24)|. ... M.|
|00004be0| 20 d0 0d 77 70 74 72 25 | 2d 3d 32 34 0d 20 da 07 | ..wptr%|-=24. ..|
|00004bf0| ed 20 4c 0d 20 e4 1e 77 | 70 74 72 25 3d 28 6d 65 |. L. ..w|ptr%=(me|
|00004c00| 6e 75 25 2b 34 29 2b 28 | 32 34 2a 69 74 65 6d 25 |nu%+4)+(|24*item%|
|00004c10| 29 0d 20 ee 0d 77 70 74 | 72 25 21 30 3d 30 0d 20 |). ..wpt|r%!0=0. |
|00004c20| f8 05 cd 0d 21 02 11 70 | 3d a7 74 65 78 74 24 2c |....!..p|=.text$,|
|00004c30| 22 3e 22 29 0d 21 0c 14 | e7 20 70 3d 30 20 77 70 |">").!..|. p=0 wp|
|00004c40| 74 72 25 21 34 3d 2d 31 | 0d 21 16 3a e7 20 70 3c |tr%!4=-1|.!.:. p<|
|00004c50| 3e 30 20 73 75 62 6d 65 | 6e 75 25 3d a0 28 c2 74 |>0 subme|nu%=.(.t|
|00004c60| 65 78 74 24 2c a9 28 74 | 65 78 74 24 29 2d 70 29 |ext$,.(t|ext$)-p)|
|00004c70| 29 3a 77 70 74 72 25 21 | 34 3d 73 75 62 6d 65 6e |):wptr%!|4=submen|
|00004c80| 75 25 0d 21 20 1c e7 20 | 70 3c 3e 30 20 74 65 78 |u%.! .. |p<>0 tex|
|00004c90| 74 24 3d c0 74 65 78 74 | 24 2c 70 2d 31 29 0d 21 |t$=.text|$,p-1).!|
|00004ca0| 2a 2b e7 20 a9 28 74 65 | 78 74 24 29 3e 31 31 20 |*+. .(te|xt$)>11 |
|00004cb0| f2 77 69 6d 70 5f 70 75 | 74 69 74 65 6d 69 6e 64 |.wimp_pu|titemind|
|00004cc0| 28 74 65 78 74 24 29 3a | e1 0d 21 34 15 24 28 77 |(text$):|..!4.$(w|
|00004cd0| 70 74 72 25 2b 31 32 29 | 3d 74 65 78 74 24 0d 21 |ptr%+12)|=text$.!|
|00004ce0| 3e 14 77 70 74 72 25 21 | 38 3d 26 37 30 30 30 30 |>.wptr%!|8=&70000|
|00004cf0| 32 31 0d 21 48 1e f2 77 | 69 6d 70 5f 63 61 6c 63 |21.!H..w|imp_calc|
|00004d00| 6d 65 6e 75 77 69 64 74 | 68 28 6d 65 6e 75 25 29 |menuwidt|h(menu%)|
|00004d10| 0d 21 52 05 e1 0d 21 5c | 05 3a 0d 21 66 1d dd 20 |.!R...!\|.:.!f.. |
|00004d20| f2 77 69 6d 70 5f 70 75 | 74 69 74 65 6d 69 6e 64 |.wimp_pu|titemind|
|00004d30| 28 74 65 78 74 24 29 0d | 21 70 0d ea 20 74 77 65 |(text$).|!p.. twe|
|00004d40| 6c 76 65 25 0d 21 7a 1a | de 20 74 77 65 6c 76 65 |lve%.!z.|. twelve|
|00004d50| 25 20 28 a9 28 74 65 78 | 74 24 29 2b 31 29 0d 21 |% (.(tex|t$)+1).!|
|00004d60| 84 14 24 28 74 77 65 6c | 76 65 25 29 3d 74 65 78 |..$(twel|ve%)=tex|
|00004d70| 74 24 0d 21 8e 14 77 70 | 74 72 25 21 31 32 3d 74 |t$.!..wp|tr%!12=t|
|00004d80| 77 65 6c 76 65 25 0d 21 | 98 0e 77 70 74 72 25 21 |welve%.!|..wptr%!|
|00004d90| 31 36 3d 30 0d 21 a2 14 | 77 70 74 72 25 21 38 3d |16=0.!..|wptr%!8=|
|00004da0| 26 37 30 30 30 31 32 31 | 0d 21 ac 1e f2 77 69 6d |&7000121|.!...wim|
|00004db0| 70 5f 63 61 6c 63 6d 65 | 6e 75 77 69 64 74 68 28 |p_calcme|nuwidth(|
|00004dc0| 6d 65 6e 75 25 29 0d 21 | b6 05 e1 0d 21 c0 05 3a |menu%).!|....!..:|
|00004dd0| 0d 21 ca 27 dd 20 f2 77 | 69 6d 70 5f 72 65 6d 6f |.!.'. .w|imp_remo|
|00004de0| 76 65 6d 65 6e 75 69 74 | 65 6d 28 6d 65 6e 75 25 |vemenuit|em(menu%|
|00004df0| 2c 69 74 65 6d 25 29 0d | 21 d4 09 ea 20 6e 75 6d |,item%).|!... num|
|00004e00| 0d 21 de 1d 6e 75 6d 3d | a4 77 69 6d 70 5f 6d 65 |.!..num=|.wimp_me|
|00004e10| 6e 75 73 69 7a 65 28 6d | 65 6e 75 25 29 0d 21 e8 |nusize(m|enu%).!.|
|00004e20| 0d e7 20 6e 75 6d 3d 31 | 20 e1 0d 21 f2 11 77 70 |.. num=1| ..!..wp|
|00004e30| 74 72 25 3d 6d 65 6e 75 | 25 2b 34 0d 21 fc 15 e7 |tr%=menu|%+4.!...|
|00004e40| 20 69 74 65 6d 25 3c 31 | 20 69 74 65 6d 25 3d 31 | item%<1| item%=1|
|00004e50| 0d 22 06 19 e7 20 69 74 | 65 6d 25 3e 6e 75 6d 20 |."... it|em%>num |
|00004e60| 69 74 65 6d 25 3d 6e 75 | 6d 0d 22 10 11 e7 20 69 |item%=nu|m."... i|
|00004e70| 74 65 6d 25 3d 6e 75 6d | 20 8c 0d 22 1a 17 77 70 |tem%=num| .."..wp|
|00004e80| 74 72 25 2b 3d 32 34 2a | 28 69 74 65 6d 25 2d 31 |tr%+=24*|(item%-1|
|00004e90| 29 0d 22 24 1e 77 70 74 | 72 25 21 30 3d 28 77 70 |)."$.wpt|r%!0=(wp|
|00004ea0| 74 72 25 21 30 20 84 20 | 28 31 3c 3c 37 29 29 0d |tr%!0 . |(1<<7)).|
|00004eb0| 22 2e 1e f2 77 69 6d 70 | 5f 63 61 6c 63 6d 65 6e |"...wimp|_calcmen|
|00004ec0| 75 77 69 64 74 68 28 6d | 65 6e 75 25 29 0d 22 38 |uwidth(m|enu%)."8|
|00004ed0| 05 cc 0d 22 42 13 77 70 | 74 72 25 2b 3d 32 34 2a |..."B.wp|tr%+=24*|
|00004ee0| 69 74 65 6d 25 0d 22 4c | 15 e3 20 4c 3d 69 74 65 |item%."L|.. L=ite|
|00004ef0| 6d 25 20 b8 20 6e 75 6d | 2d 31 0d 22 56 12 e3 20 |m% . num|-1."V.. |
|00004f00| 4d 3d 30 20 b8 20 32 30 | 20 88 20 34 0d 22 60 18 |M=0 . 20| . 4."`.|
|00004f10| 77 70 74 72 25 21 4d 3d | 77 70 74 72 25 21 28 4d |wptr%!M=|wptr%!(M|
|00004f20| 2b 32 34 29 0d 22 6a 07 | ed 20 4d 0d 22 74 0d 77 |+24)."j.|. M."t.w|
|00004f30| 70 74 72 25 2b 3d 32 34 | 0d 22 7e 07 ed 20 4c 0d |ptr%+=24|."~.. L.|
|00004f40| 22 88 1e f2 77 69 6d 70 | 5f 63 61 6c 63 6d 65 6e |"...wimp|_calcmen|
|00004f50| 75 77 69 64 74 68 28 6d | 65 6e 75 25 29 0d 22 92 |uwidth(m|enu%).".|
|00004f60| 05 cd 0d 22 9c 05 e1 0d | 22 a6 05 3a 0d 22 b0 26 |..."....|"..:.".&|
|00004f70| dd 20 f2 77 69 6d 70 5f | 72 65 63 72 65 61 74 65 |. .wimp_|recreate|
|00004f80| 6d 65 6e 75 28 77 6d 65 | 6e 75 25 2c 6d 65 6e 75 |menu(wme|nu%,menu|
|00004f90| 24 29 0d 22 ba 17 ea 20 | 6e 75 6d 2c 4c 2c 70 2c |$)."... |num,L,p,|
|00004fa0| 6d 24 2c 74 69 74 6c 65 | 24 0d 22 c4 24 6e 75 6d |m$,title|$.".$num|
|00004fb0| 3d a4 77 69 6d 70 5f 6e | 75 6d 62 65 72 6f 66 65 |=.wimp_n|umberofe|
|00004fc0| 6e 74 72 69 65 73 28 6d | 65 6e 75 24 29 0d 22 ce |ntries(m|enu$).".|
|00004fd0| 12 77 70 74 72 25 3d 77 | 6d 65 6e 75 25 2b 34 0d |.wptr%=w|menu%+4.|
|00004fe0| 22 d8 11 70 3d a7 6d 65 | 6e 75 24 2c 22 2f 22 29 |"..p=.me|nu$,"/")|
|00004ff0| 0d 22 e2 16 74 69 74 6c | 65 24 3d c0 6d 65 6e 75 |."..titl|e$=.menu|
|00005000| 24 2c 70 2d 31 29 0d 22 | ec 1c 6d 65 6e 75 24 3d |$,p-1)."|..menu$=|
|00005010| c2 6d 65 6e 75 24 2c a9 | 28 6d 65 6e 75 24 29 2d |.menu$,.|(menu$)-|
|00005020| 70 29 0d 22 f6 25 e7 20 | a9 28 74 69 74 6c 65 24 |p).".%. |.(title$|
|00005030| 29 3e 31 31 20 74 69 74 | 6c 65 24 3d c0 74 69 74 |)>11 tit|le$=.tit|
|00005040| 6c 65 24 2c 31 31 29 0d | 23 00 16 24 28 77 6d 65 |le$,11).|#..$(wme|
|00005050| 6e 75 25 2b 30 29 3d 74 | 69 74 6c 65 24 0d 23 0a |nu%+0)=t|itle$.#.|
|00005060| 0f e3 20 4c 3d 31 20 b8 | 20 6e 75 6d 0d 23 14 0d |.. L=1 .| num.#..|
|00005070| 77 70 74 72 25 2b 3d 32 | 34 0d 23 1e 17 e7 20 4c |wptr%+=2|4.#... L|
|00005080| 3d 6e 75 6d 20 77 70 74 | 72 25 21 30 3d 26 38 30 |=num wpt|r%!0=&80|
|00005090| 0d 23 28 15 e7 20 4c 3c | 6e 75 6d 20 77 70 74 72 |.#(.. L<|num wptr|
|000050a0| 25 21 30 3d 30 0d 23 32 | 14 77 70 74 72 25 21 38 |%!0=0.#2|.wptr%!8|
|000050b0| 3d 26 37 30 30 30 30 32 | 31 0d 23 3c 11 70 3d a7 |=&700002|1.#<.p=.|
|000050c0| 6d 65 6e 75 24 2c 22 2f | 22 29 0d 23 46 12 e7 20 |menu$,"/|").#F.. |
|000050d0| 70 3d 30 20 6d 24 3d 6d | 65 6e 75 24 0d 23 50 32 |p=0 m$=m|enu$.#P2|
|000050e0| e7 20 70 3c 3e 30 20 6d | 24 3d c0 6d 65 6e 75 24 |. p<>0 m|$=.menu$|
|000050f0| 2c 70 2d 31 29 3a 6d 65 | 6e 75 24 3d c2 6d 65 6e |,p-1):me|nu$=.men|
|00005100| 75 24 2c a9 28 6d 65 6e | 75 24 29 2d 70 29 0d 23 |u$,.(men|u$)-p).#|
|00005110| 5a 0e 70 3d a7 6d 24 2c | 22 3e 22 29 0d 23 64 14 |Z.p=.m$,|">").#d.|
|00005120| e7 20 70 3d 30 20 77 70 | 74 72 25 21 34 3d 2d 31 |. p=0 wp|tr%!4=-1|
|00005130| 0d 23 6e 2e e7 20 70 3c | 3e 30 20 77 70 74 72 25 |.#n.. p<|>0 wptr%|
|00005140| 21 34 3d a0 28 c2 6d 24 | 2c a9 28 6d 24 29 2d 70 |!4=.(.m$|,.(m$)-p|
|00005150| 29 29 3a 6d 24 3d c0 6d | 24 2c 70 2d 31 29 0d 23 |)):m$=.m|$,p-1).#|
|00005160| 78 28 e7 20 a9 28 6d 24 | 29 3e 31 31 20 f2 77 69 |x(. .(m$|)>11 .wi|
|00005170| 6d 70 5f 72 65 63 72 65 | 61 74 65 69 74 65 6d 69 |mp_recre|ateitemi|
|00005180| 6e 64 28 6d 24 29 0d 23 | 82 1d e7 20 a9 28 6d 24 |nd(m$).#|... .(m$|
|00005190| 29 3c 31 32 20 24 28 77 | 70 74 72 25 2b 31 32 29 |)<12 $(w|ptr%+12)|
|000051a0| 3d 6d 24 0d 23 8c 07 ed | 20 4c 0d 23 96 1f f2 77 |=m$.#...| L.#...w|
|000051b0| 69 6d 70 5f 63 61 6c 63 | 6d 65 6e 75 77 69 64 74 |imp_calc|menuwidt|
|000051c0| 68 28 77 6d 65 6e 75 25 | 29 0d 23 a0 05 e1 0d 23 |h(wmenu%|).#....#|
|000051d0| aa 05 3a 0d 23 b4 1f dd | 20 f2 77 69 6d 70 5f 72 |..:.#...| .wimp_r|
|000051e0| 65 63 72 65 61 74 65 69 | 74 65 6d 69 6e 64 28 6d |ecreatei|temind(m|
|000051f0| 24 29 0d 23 be 0d ea 20 | 74 77 65 6c 76 65 25 0d |$).#... |twelve%.|
|00005200| 23 c8 14 77 70 74 72 25 | 21 38 3d 26 37 30 30 30 |#..wptr%|!8=&7000|
|00005210| 31 32 31 0d 23 d2 17 de | 20 74 77 65 6c 76 65 25 |121.#...| twelve%|
|00005220| 20 28 a9 28 6d 24 29 2b | 31 29 0d 23 dc 11 24 28 | (.(m$)+|1).#..$(|
|00005230| 74 77 65 6c 76 65 25 29 | 3d 6d 24 0d 23 e6 14 77 |twelve%)|=m$.#..w|
|00005240| 70 74 72 25 21 31 32 3d | 74 77 65 6c 76 65 25 0d |ptr%!12=|twelve%.|
|00005250| 23 f0 0e 77 70 74 72 25 | 21 31 36 3d 30 0d 23 fa |#..wptr%|!16=0.#.|
|00005260| 05 e1 0d 24 04 05 3a 0d | 24 0e 2b dd 20 a4 77 69 |...$..:.|$.+. .wi|
|00005270| 6d 70 5f 63 72 65 61 74 | 65 6d 65 6e 75 61 72 72 |mp_creat|emenuarr|
|00005280| 61 79 28 61 72 72 61 79 | 24 28 29 2c 73 69 7a 65 |ay(array|$(),size|
|00005290| 25 29 0d 24 18 24 ea 20 | 6e 75 6d 2c 77 6d 65 6e |%).$.$. |num,wmen|
|000052a0| 75 25 2c 4c 2c 70 2c 77 | 69 64 74 68 25 2c 69 74 |u%,L,p,w|idth%,it|
|000052b0| 65 6d 6c 65 6e 25 0d 24 | 22 24 6e 75 6d 3d a4 77 |emlen%.$|"$num=.w|
|000052c0| 69 6d 70 5f 67 65 74 61 | 72 72 61 79 73 69 7a 65 |imp_geta|rraysize|
|000052d0| 28 61 72 72 61 79 24 28 | 29 29 0d 24 2c 19 e7 20 |(array$(|)).$,.. |
|000052e0| 73 69 7a 65 25 3c 6e 75 | 6d 20 73 69 7a 65 25 3d |size%<nu|m size%=|
|000052f0| 6e 75 6d 0d 24 36 1a de | 20 77 6d 65 6e 75 25 20 |num.$6..| wmenu% |
|00005300| 32 38 2b 28 32 34 2a 73 | 69 7a 65 25 29 0d 24 40 |28+(24*s|ize%).$@|
|00005310| 17 77 6d 65 6e 75 25 21 | 31 32 3d 26 30 30 30 37 |.wmenu%!|12=&0007|
|00005320| 30 32 30 37 0d 24 4a 10 | 77 6d 65 6e 75 25 21 32 |0207.$J.|wmenu%!2|
|00005330| 30 3d 34 34 0d 24 54 0f | 77 6d 65 6e 75 25 21 32 |0=44.$T.|wmenu%!2|
|00005340| 34 3d 30 0d 24 5e 13 77 | 70 74 72 25 3d 77 6d 65 |4=0.$^.w|ptr%=wme|
|00005350| 6e 75 25 2b 32 38 0d 24 | 68 2e e7 20 a9 28 61 72 |nu%+28.$|h.. .(ar|
|00005360| 72 61 79 24 28 30 29 29 | 3e 31 31 20 61 72 72 61 |ray$(0))|>11 arra|
|00005370| 79 24 28 30 29 3d c0 61 | 72 72 61 79 24 28 30 29 |y$(0)=.a|rray$(0)|
|00005380| 2c 31 31 29 0d 24 72 19 | 24 28 77 6d 65 6e 75 25 |,11).$r.|$(wmenu%|
|00005390| 2b 30 29 3d 61 72 72 61 | 79 24 28 30 29 0d 24 7c |+0)=arra|y$(0).$||
|000053a0| 1e 77 69 64 74 68 25 3d | 28 a9 28 61 72 72 61 79 |.width%=|(.(array|
|000053b0| 24 28 30 29 29 2d 31 29 | 2a 31 36 0d 24 86 0f e3 |$(0))-1)|*16.$...|
|000053c0| 20 4c 3d 31 20 b8 20 6e | 75 6d 0d 24 90 14 77 70 | L=1 . n|um.$..wp|
|000053d0| 74 72 25 21 38 3d 26 37 | 30 30 30 30 32 31 0d 24 |tr%!8=&7|000021.$|
|000053e0| 9a 23 e7 20 4c 3d 6e 75 | 6d 20 77 70 74 72 25 21 |.#. L=nu|m wptr%!|
|000053f0| 30 3d 26 38 30 20 8b 20 | 77 70 74 72 25 21 30 3d |0=&80 . |wptr%!0=|
|00005400| 30 0d 24 a4 15 70 3d a7 | 61 72 72 61 79 24 28 4c |0.$..p=.|array$(L|
|00005410| 29 2c 22 3e 22 29 0d 24 | ae 21 e7 20 70 3d 30 20 |),">").$|.!. p=0 |
|00005420| 77 70 74 72 25 21 34 3d | 2d 31 3a 6d 24 3d 61 72 |wptr%!4=|-1:m$=ar|
|00005430| 72 61 79 24 28 4c 29 0d | 24 b8 42 e7 20 70 3e 30 |ray$(L).|$.B. p>0|
|00005440| 20 77 70 74 72 25 21 34 | 3d a0 28 c2 61 72 72 61 | wptr%!4|=.(.arra|
|00005450| 79 24 28 4c 29 2c a9 28 | 61 72 72 61 79 24 28 4c |y$(L),.(|array$(L|
|00005460| 29 29 2d 70 29 29 3a 6d | 24 3d c0 61 72 72 61 79 |))-p)):m|$=.array|
|00005470| 24 28 4c 29 2c 70 2d 31 | 29 0d 24 c2 28 e7 20 a9 |$(L),p-1|).$.(. .|
|00005480| 28 6d 24 29 3e 31 31 20 | f2 77 69 6d 70 5f 72 65 |(m$)>11 |.wimp_re|
|00005490| 63 72 65 61 74 65 69 74 | 65 6d 69 6e 64 28 6d 24 |createit|emind(m$|
|000054a0| 29 0d 24 cc 1d e7 20 a9 | 28 6d 24 29 3c 31 32 20 |).$... .|(m$)<12 |
|000054b0| 24 28 77 70 74 72 25 2b | 31 32 29 3d 6d 24 0d 24 |$(wptr%+|12)=m$.$|
|000054c0| d6 19 69 74 65 6d 6c 65 | 6e 25 3d 28 a9 28 6d 24 |..itemle|n%=(.(m$|
|000054d0| 29 2b 31 29 2a 31 36 0d | 24 e0 25 e7 20 69 74 65 |)+1)*16.|$.%. ite|
|000054e0| 6d 6c 65 6e 25 3e 77 69 | 64 74 68 25 20 77 69 64 |mlen%>wi|dth% wid|
|000054f0| 74 68 25 3d 69 74 65 6d | 6c 65 6e 25 0d 24 ea 0d |th%=item|len%.$..|
|00005500| 77 70 74 72 25 2b 3d 32 | 34 0d 24 f4 07 ed 20 4c |wptr%+=2|4.$... L|
|00005510| 0d 24 fe 14 77 6d 65 6e | 75 25 21 31 36 3d 77 69 |.$..wmen|u%!16=wi|
|00005520| 64 74 68 25 0d 25 08 0b | 3d 77 6d 65 6e 75 25 0d |dth%.%..|=wmenu%.|
|00005530| 25 12 05 3a 0d 25 1c 22 | dd 20 a4 77 69 6d 70 5f |%..:.%."|. .wimp_|
|00005540| 67 65 74 61 72 72 61 79 | 73 69 7a 65 28 61 72 72 |getarray|size(arr|
|00005550| 61 79 24 28 29 29 0d 25 | 26 07 ea 20 6c 0d 25 30 |ay$()).%|&.. l.%0|
|00005560| 07 6c 3d 30 0d 25 3a 05 | f5 0d 25 44 08 6c 2b 3d |.l=0.%:.|..%D.l+=|
|00005570| 31 0d 25 4e 15 fd 20 61 | 72 72 61 79 24 28 6c 29 |1.%N.. a|rray$(l)|
|00005580| 3d 22 45 4e 44 22 0d 25 | 58 08 3d 6c 2d 31 0d 25 |="END".%|X.=l-1.%|
|00005590| 62 05 3a 0d 25 6c 2e dd | 20 f2 77 69 6d 70 5f 72 |b.:.%l..| .wimp_r|
|000055a0| 65 63 72 65 61 74 65 6d | 65 6e 75 61 72 72 61 79 |ecreatem|enuarray|
|000055b0| 28 77 6d 65 6e 75 25 2c | 61 72 72 61 79 24 28 29 |(wmenu%,|array$()|
|000055c0| 29 0d 25 76 20 ea 20 6e | 75 6d 2c 4c 2c 70 2c 6d |).%v . n|um,L,p,m|
|000055d0| 24 2c 69 74 65 6d 6c 65 | 6e 25 2c 77 69 64 74 68 |$,itemle|n%,width|
|000055e0| 25 0d 25 80 24 6e 75 6d | 3d a4 77 69 6d 70 5f 67 |%.%.$num|=.wimp_g|
|000055f0| 65 74 61 72 72 61 79 73 | 69 7a 65 28 61 72 72 61 |etarrays|ize(arra|
|00005600| 79 24 28 29 29 0d 25 8a | 13 77 70 74 72 25 3d 77 |y$()).%.|.wptr%=w|
|00005610| 6d 65 6e 75 25 2b 32 38 | 0d 25 94 2e e7 20 a9 28 |menu%+28|.%... .(|
|00005620| 61 72 72 61 79 24 28 30 | 29 29 3e 31 31 20 61 72 |array$(0|))>11 ar|
|00005630| 72 61 79 24 28 30 29 3d | c0 61 72 72 61 79 24 28 |ray$(0)=|.array$(|
|00005640| 30 29 2c 31 31 29 0d 25 | 9e 19 24 28 77 6d 65 6e |0),11).%|..$(wmen|
|00005650| 75 25 2b 30 29 3d 61 72 | 72 61 79 24 28 30 29 0d |u%+0)=ar|ray$(0).|
|00005660| 25 a8 1e 77 69 64 74 68 | 25 3d 28 a9 28 61 72 72 |%..width|%=(.(arr|
|00005670| 61 79 24 28 30 29 29 2d | 31 29 2a 31 36 0d 25 b2 |ay$(0))-|1)*16.%.|
|00005680| 0f e3 20 4c 3d 31 20 b8 | 20 6e 75 6d 0d 25 bc 14 |.. L=1 .| num.%..|
|00005690| 77 70 74 72 25 21 38 3d | 26 37 30 30 30 30 32 31 |wptr%!8=|&7000021|
|000056a0| 0d 25 c6 23 e7 20 4c 3d | 6e 75 6d 20 77 70 74 72 |.%.#. L=|num wptr|
|000056b0| 25 21 30 3d 26 38 30 20 | 8b 20 77 70 74 72 25 21 |%!0=&80 |. wptr%!|
|000056c0| 30 3d 30 0d 25 d0 15 70 | 3d a7 61 72 72 61 79 24 |0=0.%..p|=.array$|
|000056d0| 28 4c 29 2c 22 3e 22 29 | 0d 25 da 21 e7 20 70 3d |(L),">")|.%.!. p=|
|000056e0| 30 20 77 70 74 72 25 21 | 34 3d 2d 31 3a 6d 24 3d |0 wptr%!|4=-1:m$=|
|000056f0| 61 72 72 61 79 24 28 4c | 29 0d 25 e4 42 e7 20 70 |array$(L|).%.B. p|
|00005700| 3e 30 20 77 70 74 72 25 | 21 34 3d a0 28 c2 61 72 |>0 wptr%|!4=.(.ar|
|00005710| 72 61 79 24 28 4c 29 2c | a9 28 61 72 72 61 79 24 |ray$(L),|.(array$|
|00005720| 28 4c 29 29 2d 70 29 29 | 3a 6d 24 3d c0 61 72 72 |(L))-p))|:m$=.arr|
|00005730| 61 79 24 28 4c 29 2c 70 | 2d 31 29 0d 25 ee 28 e7 |ay$(L),p|-1).%.(.|
|00005740| 20 a9 28 6d 24 29 3e 31 | 31 20 f2 77 69 6d 70 5f | .(m$)>1|1 .wimp_|
|00005750| 72 65 63 72 65 61 74 65 | 69 74 65 6d 69 6e 64 28 |recreate|itemind(|
|00005760| 6d 24 29 0d 25 f8 1d e7 | 20 a9 28 6d 24 29 3c 31 |m$).%...| .(m$)<1|
|00005770| 32 20 24 28 77 70 74 72 | 25 2b 31 32 29 3d 6d 24 |2 $(wptr|%+12)=m$|
|00005780| 0d 26 02 19 69 74 65 6d | 6c 65 6e 25 3d 28 a9 28 |.&..item|len%=(.(|
|00005790| 6d 24 29 2b 31 29 2a 31 | 36 0d 26 0c 25 e7 20 69 |m$)+1)*1|6.&.%. i|
|000057a0| 74 65 6d 6c 65 6e 25 3e | 77 69 64 74 68 25 20 77 |temlen%>|width% w|
|000057b0| 69 64 74 68 25 3d 69 74 | 65 6d 6c 65 6e 25 0d 26 |idth%=it|emlen%.&|
|000057c0| 16 0d 77 70 74 72 25 2b | 3d 32 34 0d 26 20 07 ed |..wptr%+|=24.& ..|
|000057d0| 20 4c 0d 26 2a 14 77 6d | 65 6e 75 25 21 31 36 3d | L.&*.wm|enu%!16=|
|000057e0| 77 69 64 74 68 25 0d 26 | 34 05 e1 0d 26 3e 05 3a |width%.&|4...&>.:|
|000057f0| 0d 26 48 16 dd 20 f2 77 | 69 6d 70 5f 73 69 6e 67 |.&H.. .w|imp_sing|
|00005800| 6c 65 70 6f 6c 6c 0d 26 | 52 0d ea 20 72 65 61 73 |lepoll.&|R.. reas|
|00005810| 6f 6e 25 0d 26 5c 29 c8 | 99 22 57 69 6d 70 5f 50 |on%.&\).|."Wimp_P|
|00005820| 6f 6c 6c 22 2c 30 2c 77 | 69 6d 70 25 20 b8 20 72 |oll",0,w|imp% . r|
|00005830| 65 61 73 6f 6e 25 2c 77 | 69 6d 70 25 0d 26 66 10 |eason%,w|imp%.&f.|
|00005840| c8 8e 20 72 65 61 73 6f | 6e 25 20 ca 0d 26 70 18 |.. reaso|n% ..&p.|
|00005850| c9 20 30 20 3a 20 f2 77 | 69 6d 70 5f 70 6f 6c 6c |. 0 : .w|imp_poll|
|00005860| 6e 75 6c 6c 0d 26 7a 20 | c9 20 31 20 3a 20 f2 77 |null.&z |. 1 : .w|
|00005870| 69 6d 70 5f 70 6f 6c 6c | 72 65 64 72 61 77 77 69 |imp_poll|redrawwi|
|00005880| 6e 64 6f 77 0d 26 84 1e | c9 20 32 20 3a 20 f2 77 |ndow.&..|. 2 : .w|
|00005890| 69 6d 70 5f 70 6f 6c 6c | 6f 70 65 6e 77 69 6e 64 |imp_poll|openwind|
|000058a0| 6f 77 0d 26 8e 1f c9 20 | 33 20 3a 20 f2 77 69 6d |ow.&... |3 : .wim|
|000058b0| 70 5f 70 6f 6c 6c 63 6c | 6f 73 65 77 69 6e 64 6f |p_pollcl|osewindo|
|000058c0| 77 0d 26 98 26 c9 20 34 | 20 3a 20 f2 75 73 65 72 |w.&.&. 4| : .user|
|000058d0| 5f 6c 65 61 76 69 6e 67 | 77 69 6e 64 6f 77 28 77 |_leaving|window(w|
|000058e0| 69 6d 70 25 21 30 29 0d | 26 a2 27 c9 20 35 20 3a |imp%!0).|&.'. 5 :|
|000058f0| 20 f2 75 73 65 72 5f 65 | 6e 74 65 72 69 6e 67 77 | .user_e|nteringw|
|00005900| 69 6e 64 6f 77 28 77 69 | 6d 70 25 21 30 29 0d 26 |indow(wi|mp%!0).&|
|00005910| ac 1e c9 20 36 20 3a 20 | f2 77 69 6d 70 5f 70 6f |... 6 : |.wimp_po|
|00005920| 6c 6c 6d 6f 75 73 65 63 | 6c 69 63 6b 0d 26 b6 1f |llmousec|lick.&..|
|00005930| c9 20 37 20 3a 20 f2 77 | 69 6d 70 5f 70 6f 6c 6c |. 7 : .w|imp_poll|
|00005940| 73 61 76 65 6d 65 73 73 | 61 67 65 0d 26 c0 1c c9 |savemess|age.&...|
|00005950| 20 38 20 3a 20 f2 77 69 | 6d 70 5f 70 6f 6c 6c 6b | 8 : .wi|mp_pollk|
|00005960| 65 79 70 72 65 73 73 0d | 26 ca 21 c9 20 39 20 3a |eypress.|&.!. 9 :|
|00005970| 20 f2 77 69 6d 70 5f 70 | 6f 6c 6c 6d 65 6e 75 73 | .wimp_p|ollmenus|
|00005980| 65 6c 65 63 74 69 6f 6e | 0d 26 d4 0a c9 20 31 30 |election|.&... 10|
|00005990| 20 3a 0d 26 de 0a c9 20 | 31 31 20 3a 0d 26 e8 0a | :.&... |11 :.&..|
|000059a0| c9 20 31 32 20 3a 0d 26 | f2 0a c9 20 31 33 20 3a |. 12 :.&|... 13 :|
|000059b0| 0d 26 fc 0a c9 20 31 34 | 20 3a 0d 27 06 0a c9 20 |.&... 14| :.'... |
|000059c0| 31 35 20 3a 0d 27 10 0a | c9 20 31 36 20 3a 0d 27 |15 :.'..|. 16 :.'|
|000059d0| 1a 1f c9 20 31 37 2c 31 | 38 20 3a 20 f2 77 69 6d |... 17,1|8 : .wim|
|000059e0| 70 5f 70 6f 6c 6c 6d 65 | 73 73 61 67 65 0d 27 24 |p_pollme|ssage.'$|
|000059f0| 0a c9 20 31 39 20 3a 0d | 27 2e 05 cb 0d 27 38 05 |.. 19 :.|'....'8.|
|00005a00| e1 0d ff                |                         |...     |        |
+--------+-------------------------+-------------------------+--------+--------+