home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1988-05-25 | 21.1 KB |
view JSON data
|
view as text
|
open on a Mac
|
open on a PC
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 4f f4 7c 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |...O.|__|________|
|00000010| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000020| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000030| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000040| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 0d |________|_______.|
|00000050| 00 14 4f f4 7c 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |..O.|___|________|
|00000060| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000070| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000080| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000090| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 0d 00 |________|______..|
|000000a0| 1e 4f f4 7c 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |.O.|____|________|
|000000b0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000000c0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000000d0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000000e0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 0d 00 28 |________|_____..(|
|000000f0| 06 f4 7c 0d 00 32 06 f4 | 7c 0d 00 3c 06 f4 7c 0d |..|..2..||..<..|.|
|00000100| 00 46 45 f4 7c 20 20 20 | 20 20 20 20 20 20 20 20 |.FE.| | |
|00000110| 20 20 20 20 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | ---|--------|
|00000120| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000130| 2d 2d 2d 2d 20 20 20 20 | 20 20 20 20 20 20 36 2f |---- | 6/|
|00000140| 31 2f 39 32 0d 00 50 2f | f4 7c 20 20 20 20 20 20 |1/92..P/|.| |
|00000150| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 57 49 4d | | WIM|
|00000160| 50 20 50 52 4f 43 45 44 | 55 52 45 20 4c 49 42 52 |P PROCED|URE LIBR|
|00000170| 41 52 59 0d 00 5a 06 f4 | 7c 0d 00 64 2c f4 7c 20 |ARY..Z..||..d,.| |
|00000180| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000190| 20 20 20 20 49 6e 64 65 | 78 20 6f 66 20 43 6f 6e | Inde|x of Con|
|000001a0| 74 65 6e 74 73 0d 00 6e | 06 f4 7c 0d 00 78 35 f4 |tents..n|..|..x5.|
|000001b0| 7c 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 || | |
|000001c0| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|000001d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001e0| 0d 00 82 06 f4 7c 0d 00 | 8c 24 f4 7c 20 20 20 20 |.....|..|.$.| |
|000001f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000200| 31 2e a0 57 69 6e 64 6f | 77 73 0d 00 96 06 f4 7c |1..Windo|ws.....||
|00000210| 0d 00 a0 22 f4 7c 20 20 | 20 20 20 20 20 20 20 20 |...".| | |
|00000220| 20 20 20 20 20 20 20 20 | 20 20 32 2e a0 49 63 6f | | 2..Ico|
|00000230| 6e 73 0d 00 aa 06 f4 7c | 0d 00 b4 22 f4 7c 20 20 |ns.....||...".| |
|00000240| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000250| 20 20 33 2e a0 4d 65 6e | 75 73 0d 00 be 06 f4 7c | 3..Men|us.....||
|00000260| 0d 00 c8 24 f4 7c 20 20 | 20 20 20 20 20 20 20 20 |...$.| | |
|00000270| 20 20 20 20 20 20 20 20 | 20 20 34 2e a0 53 70 72 | | 4..Spr|
|00000280| 69 74 65 73 0d 00 d2 06 | f4 7c 0d 00 dc 2a f4 7c |ites....|.|...*.||
|00000290| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000002a0| 20 20 20 20 35 2e a0 4d | 69 73 63 65 6c 6c 61 6e | 5..M|iscellan|
|000002b0| 65 6f 75 73 0d 00 e6 06 | f4 7c 0d 00 f0 24 f4 7c |eous....|.|...$.||
|000002c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000002d0| 20 20 20 20 36 2e a0 50 | 6f 6c 6c 69 6e 67 0d 00 | 6..P|olling..|
|000002e0| fa 06 f4 7c 0d 01 04 35 | f4 7c 20 20 20 20 20 20 |...|...5|.| |
|000002f0| 20 20 20 20 20 20 20 20 | 20 20 2d 2d 2d 2d 2d 2d | | ------|
|00000300| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 01 0e 06 f4 7c 0d |--------|-.....|.|
|00000320| 01 18 06 f4 7c 0d 01 22 | 06 f4 7c 0d 01 2c 06 f4 |....|.."|..|..,..|
|00000330| 7c 0d 01 36 06 f4 7c 0d | 01 40 06 f4 7c 0d 01 4a ||..6..|.|.@..|..J|
|00000340| 35 f4 7c 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |5.| | |
|00000350| 20 20 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -----|--------|
|00000360| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000370| 2d 2d 0d 01 54 2a f4 7c | 20 20 20 20 20 20 20 20 |--..T*.|| |
|00000380| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000390| 20 20 31 2e a0 57 69 6e | 64 6f 77 73 0d 01 5e 35 | 1..Win|dows..^5|
|000003a0| f4 7c 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.| | |
|000003b0| 20 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | ------|--------|
|000003c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003d0| 2d 0d 01 68 06 f4 7c 0d | 01 72 06 f4 7c 0d 01 7c |-..h..|.|.r..|..||
|000003e0| 40 f4 7c 20 20 20 20 20 | 20 20 20 20 20 2d 2d 2d |@.| | ---|
|000003f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 01 86 |--------|-----...|
|00000420| 06 f4 7c 0d 01 90 28 f4 | 7c 20 20 20 20 20 20 20 |..|...(.|| |
|00000430| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 50 | | P|
|00000440| 72 6f 63 65 64 75 72 65 | 73 20 3a 0d 01 9a 06 f4 |rocedure|s :.....|
|00000450| 7c 0d 01 a4 38 f4 7c 20 | 20 20 20 20 20 20 20 20 ||...8.| | |
|00000460| 20 20 20 20 50 52 4f 43 | 57 69 6d 70 5f 57 69 6e | PROC|Wimp_Win|
|00000470| 64 6f 77 41 6c 65 72 74 | 28 74 69 74 6c 65 24 2c |dowAlert|(title$,|
|00000480| 6d 65 73 73 61 67 65 24 | 29 0d 01 ae 43 f4 7c 20 |message$|)...C.| |
|00000490| 20 20 20 20 20 20 20 20 | 20 20 20 20 50 52 4f 43 | | PROC|
|000004a0| 57 69 6d 70 5f 57 69 6e | 64 6f 77 41 6c 65 72 74 |Wimp_Win|dowAlert|
|000004b0| 42 6f 78 28 74 69 74 6c | 65 24 2c 6d 65 73 73 61 |Box(titl|e$,messa|
|000004c0| 67 65 24 2c 62 75 74 74 | 6f 6e 25 29 0d 01 b8 37 |ge$,butt|on%)...7|
|000004d0| f4 7c 20 20 20 20 20 20 | 20 20 20 20 20 20 20 46 |.| | F|
|000004e0| 4e 57 69 6d 70 5f 57 69 | 6e 64 6f 77 43 61 6e 63 |NWimp_Wi|ndowCanc|
|000004f0| 65 6c 28 74 69 74 6c 65 | 24 2c 6d 65 73 73 61 67 |el(title|$,messag|
|00000500| 65 24 29 0d 01 c2 3b f4 | 7c 20 20 20 20 20 20 20 |e$)...;.|| |
|00000510| 20 20 20 20 20 20 50 52 | 4f 43 57 69 6d 70 5f 57 | PR|OCWimp_W|
|00000520| 69 6e 64 6f 77 45 72 72 | 6f 72 42 6f 78 28 74 69 |indowErr|orBox(ti|
|00000530| 74 6c 65 24 2c 6d 65 73 | 73 61 67 65 24 29 0d 01 |tle$,mes|sage$)..|
|00000540| cc 2e f4 7c 20 20 20 20 | 20 20 20 20 20 20 20 20 |...| | |
|00000550| 20 46 4e 57 69 6d 70 5f | 57 69 6e 64 6f 77 54 69 | FNWimp_|WindowTi|
|00000560| 74 6c 65 28 77 69 6e 64 | 6f 77 25 29 0d 01 d6 2d |tle(wind|ow%)...-|
|00000570| f4 7c 20 20 20 20 20 20 | 20 20 20 20 20 20 20 46 |.| | F|
|00000580| 4e 57 69 6d 70 5f 57 69 | 6e 64 6f 77 4c 6f 61 64 |NWimp_Wi|ndowLoad|
|00000590| 28 77 69 6e 64 6f 77 24 | 29 0d 01 e0 3b f4 7c 20 |(window$|)...;.| |
|000005a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 46 4e 57 69 | | FNWi|
|000005b0| 6d 70 5f 57 69 6e 64 6f | 77 4c 6f 61 64 46 72 6f |mp_Windo|wLoadFro|
|000005c0| 6d 28 77 69 6e 64 6f 77 | 24 2c 74 65 6d 70 6c 61 |m(window|$,templa|
|000005d0| 74 65 24 29 0d 01 ea 35 | f4 7c 20 20 20 20 20 20 |te$)...5|.| |
|000005e0| 20 20 20 20 20 20 20 50 | 52 4f 43 57 69 6d 70 5f | P|ROCWimp_|
|000005f0| 57 69 6e 64 6f 77 42 72 | 69 6e 67 54 6f 54 6f 70 |WindowBr|ingToTop|
|00000600| 28 77 69 6e 64 6f 77 25 | 29 0d 01 f4 34 f4 7c 20 |(window%|)...4.| |
|00000610| 20 20 20 20 20 20 20 20 | 20 20 20 20 50 52 4f 43 | | PROC|
|00000620| 57 69 6d 70 5f 57 69 6e | 64 6f 77 46 6f 72 63 65 |Wimp_Win|dowForce|
|00000630| 44 72 61 77 28 77 69 6e | 64 6f 77 25 29 0d 01 fe |Draw(win|dow%)...|
|00000640| 2f f4 7c 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |/.| | |
|00000650| 50 52 4f 43 57 69 6d 70 | 5f 57 69 6e 64 6f 77 4f |PROCWimp|_WindowO|
|00000660| 70 65 6e 28 77 69 6e 64 | 6f 77 25 29 0d 02 08 2b |pen(wind|ow%)...+|
|00000670| f4 7c 20 20 20 20 20 20 | 20 20 20 20 20 20 20 50 |.| | P|
|00000680| 52 4f 43 57 69 6d 70 5f | 57 69 6e 64 6f 77 49 6e |ROCWimp_|WindowIn|
|00000690| 74 65 72 66 61 63 65 0d | 02 12 06 f4 7c 0d 02 1c |terface.|....|...|
|000006a0| 3f f4 7c 20 20 20 20 20 | 20 20 20 20 20 20 2d 2d |?.| | --|
|000006b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 02 26 06 |--------|----..&.|
|000006e0| f4 7c 0d 02 30 06 f4 7c | 0d 02 3a 06 f4 7c 0d 02 |.|..0..||..:..|..|
|000006f0| 44 28 dd 20 f2 57 69 6d | 70 5f 57 69 6e 64 6f 77 |D(. .Wim|p_Window|
|00000700| 41 6c 65 72 74 28 74 69 | 74 6c 65 24 2c 6d 65 73 |Alert(ti|tle$,mes|
|00000710| 73 61 67 65 24 29 0d 02 | 4e 2b f2 57 69 6d 70 5f |sage$)..|N+.Wimp_|
|00000720| 57 69 6e 64 6f 77 41 6c | 65 72 74 42 6f 78 28 74 |WindowAl|ertBox(t|
|00000730| 69 74 6c 65 24 2c 6d 65 | 73 73 61 67 65 24 2c 30 |itle$,me|ssage$,0|
|00000740| 29 0d 02 58 05 e1 0d 02 | 62 05 3a 0d 02 6c 33 dd |)..X....|b.:..l3.|
|00000750| 20 f2 57 69 6d 70 5f 57 | 69 6e 64 6f 77 41 6c 65 | .Wimp_W|indowAle|
|00000760| 72 74 42 6f 78 28 74 69 | 74 6c 65 24 2c 6d 65 73 |rtBox(ti|tle$,mes|
|00000770| 73 61 67 65 24 2c 62 75 | 74 74 6f 6e 25 29 0d 02 |sage$,bu|tton%)..|
|00000780| 76 0f ea 20 72 65 73 70 | 6f 6e 73 65 25 0d 02 80 |v.. resp|onse%...|
|00000790| 17 24 28 77 69 6d 70 25 | 2b 34 29 3d 6d 65 73 73 |.$(wimp%|+4)=mess|
|000007a0| 61 67 65 24 0d 02 8a 10 | c8 8e 20 62 75 74 74 6f |age$....|.. butto|
|000007b0| 6e 25 20 ca 0d 02 94 19 | 20 c9 20 32 20 20 20 20 |n% .....| . 2 |
|000007c0| 3a 20 72 65 73 70 6f 6e | 73 65 25 3d 31 0d 02 9e |: respon|se%=1...|
|000007d0| 1a 20 c9 20 31 20 20 20 | 20 3a 20 72 65 73 70 6f |. . 1 | : respo|
|000007e0| 6e 73 65 25 3d 31 35 0d | 02 a8 21 20 c9 20 33 20 |nse%=15.|..! . 3 |
|000007f0| 20 20 20 3a 20 72 65 73 | 70 6f 6e 73 65 25 3d 28 | : res|ponse%=(|
|00000800| 31 3c 3c 35 29 2b 31 36 | 0d 02 b2 21 20 c9 20 34 |1<<5)+16|...! . 4|
|00000810| 20 20 20 20 3a 20 72 65 | 73 70 6f 6e 73 65 25 3d | : re|sponse%=|
|00000820| 28 31 3c 3c 36 29 2b 31 | 36 0d 02 bc 14 7f 20 3a |(1<<6)+1|6..... :|
|00000830| 20 72 65 73 70 6f 6e 73 | 65 25 3d 31 36 0d 02 c6 | respons|e%=16...|
|00000840| 05 cb 0d 02 d0 3d c8 99 | 20 22 57 69 6d 70 5f 52 |.....=..| "Wimp_R|
|00000850| 65 70 6f 72 74 45 72 72 | 6f 72 22 2c 77 69 6d 70 |eportErr|or",wimp|
|00000860| 25 2c 72 65 73 70 6f 6e | 73 65 25 2c 74 69 74 6c |%,respon|se%,titl|
|00000870| 65 24 20 b8 20 2c 72 65 | 73 70 6f 6e 73 65 25 0d |e$ . ,re|sponse%.|
|00000880| 02 da 05 e1 0d 02 e4 05 | 3a 0d 02 ee 29 dd 20 a4 |........|:...). .|
|00000890| 57 69 6d 70 5f 57 69 6e | 64 6f 77 43 61 6e 63 65 |Wimp_Win|dowCance|
|000008a0| 6c 28 74 69 74 6c 65 24 | 2c 6d 65 73 73 61 67 65 |l(title$|,message|
|000008b0| 24 29 0d 02 f8 17 24 28 | 77 69 6d 70 25 2b 34 29 |$)....$(|wimp%+4)|
|000008c0| 3d 6d 65 73 73 61 67 65 | 24 0d 03 02 10 72 65 73 |=message|$....res|
|000008d0| 70 6f 6e 73 65 25 3d 32 | 33 0d 03 0c 3d c8 99 20 |ponse%=2|3...=.. |
|000008e0| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|000008f0| 72 22 2c 77 69 6d 70 25 | 2c 72 65 73 70 6f 6e 73 |r",wimp%|,respons|
|00000900| 65 25 2c 74 69 74 6c 65 | 24 20 b8 20 2c 72 65 73 |e%,title|$ . ,res|
|00000910| 70 6f 6e 73 65 25 0d 03 | 16 10 3d 72 65 73 70 6f |ponse%..|..=respo|
|00000920| 6e 73 65 25 2d 32 0d 03 | 20 05 3a 0d 03 2a 2b dd |nse%-2..| .:..*+.|
|00000930| 20 f2 57 69 6d 70 5f 57 | 69 6e 64 6f 77 45 72 72 | .Wimp_W|indowErr|
|00000940| 6f 72 42 6f 78 28 74 69 | 74 6c 65 24 2c 6d 65 73 |orBox(ti|tle$,mes|
|00000950| 73 61 67 65 24 29 0d 03 | 34 2b f2 57 69 6d 70 5f |sage$)..|4+.Wimp_|
|00000960| 57 69 6e 64 6f 77 41 6c | 65 72 74 42 6f 78 28 74 |WindowAl|ertBox(t|
|00000970| 69 74 6c 65 24 2c 6d 65 | 73 73 61 67 65 24 2c 32 |itle$,me|ssage$,2|
|00000980| 29 0d 03 3e 05 e1 0d 03 | 48 05 3a 0d 03 52 20 dd |)..>....|H.:..R .|
|00000990| 20 a4 57 69 6d 70 5f 57 | 69 6e 64 6f 77 54 69 74 | .Wimp_W|indowTit|
|000009a0| 6c 65 28 77 69 6e 64 6f | 77 25 29 0d 03 5c 13 77 |le(windo|w%)..\.w|
|000009b0| 69 6d 70 25 21 30 3d 77 | 69 6e 64 6f 77 25 0d 03 |imp%!0=w|indow%..|
|000009c0| 66 20 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |f .. "Wi|mp_GetWi|
|000009d0| 6e 64 49 6e 66 6f 22 2c | 2c 77 69 6d 70 25 0d 03 |ndInfo",|,wimp%..|
|000009e0| 70 36 e7 20 28 28 77 69 | 6d 70 25 21 36 30 29 80 |p6. ((wi|mp%!60).|
|000009f0| 26 31 30 30 29 3d 30 20 | 85 20 31 2c 22 54 69 74 |&100)=0 |. 1,"Tit|
|00000a00| 6c 65 20 69 73 6e 27 74 | 20 69 6e 64 69 72 65 63 |le isn't| indirec|
|00000a10| 74 65 64 22 0d 03 7a 10 | 3d 24 28 77 69 6d 70 25 |ted"..z.|=$(wimp%|
|00000a20| 21 37 36 29 0d 03 84 05 | 3a 0d 03 8e 1f dd 20 a4 |!76)....|:..... .|
|00000a30| 57 69 6d 70 5f 57 69 6e | 64 6f 77 4c 6f 61 64 28 |Wimp_Win|dowLoad(|
|00000a40| 77 69 6e 64 6f 77 24 29 | 0d 03 98 39 3d a4 57 69 |window$)|...9=.Wi|
|00000a50| 6d 70 5f 57 69 6e 64 6f | 77 4c 6f 61 64 46 72 6f |mp_Windo|wLoadFro|
|00000a60| 6d 28 77 69 6e 64 6f 77 | 24 2c 22 3c 4f 62 65 79 |m(window|$,"<Obey|
|00000a70| 24 44 69 72 3e 2e 54 65 | 6d 70 6c 61 74 65 73 22 |$Dir>.Te|mplates"|
|00000a80| 29 0d 03 a2 05 3a 0d 03 | ac 2d dd 20 a4 57 69 6d |)....:..|.-. .Wim|
|00000a90| 70 5f 57 69 6e 64 6f 77 | 4c 6f 61 64 46 72 6f 6d |p_Window|LoadFrom|
|00000aa0| 28 77 69 6e 64 6f 77 24 | 2c 74 65 6d 70 6c 61 74 |(window$|,templat|
|00000ab0| 65 24 29 0d 03 b6 1a ea | 20 63 25 2c 69 25 2c 6e |e$).....| c%,i%,n|
|00000ac0| 25 2c 6a 25 2c 73 70 24 | 2c 73 70 32 24 0d 03 c0 |%,j%,sp$|,sp2$...|
|00000ad0| 25 c8 99 20 22 57 69 6d | 70 5f 4f 70 65 6e 54 65 |%.. "Wim|p_OpenTe|
|00000ae0| 6d 70 6c 61 74 65 22 2c | 2c 74 65 6d 70 6c 61 74 |mplate",|,templat|
|00000af0| 65 24 0d 03 ca 4d c8 99 | 20 22 57 69 6d 70 5f 4c |e$...M..| "Wimp_L|
|00000b00| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 77 69 |oadTempl|ate",,wi|
|00000b10| 6d 70 25 2c 69 63 6f 6e | 73 25 2c 69 63 6f 6e 5f |mp%,icon|s%,icon_|
|00000b20| 6d 65 6d 6f 72 79 25 2c | 2d 31 2c 77 69 6e 64 6f |memory%,|-1,windo|
|00000b30| 77 24 2c 30 20 b8 20 2c | 2c 69 63 6f 6e 73 25 0d |w$,0 . ,|,icons%.|
|00000b40| 03 d4 11 c8 8e 20 73 70 | 72 69 74 65 73 25 20 ca |..... sp|rites% .|
|00000b50| 0d 03 de 1f 20 c9 20 31 | 20 20 20 20 3a 20 77 69 |.... . 1| : wi|
|00000b60| 6d 70 25 21 36 34 3d 73 | 70 72 69 74 65 73 25 0d |mp%!64=s|prites%.|
|00000b70| 03 e8 29 20 7f 20 3a 20 | 77 69 6d 70 25 21 36 34 |..) . : |wimp%!64|
|00000b80| 3d a4 45 76 65 6e 74 5f | 53 70 72 69 74 65 73 28 |=.Event_|Sprites(|
|00000b90| 77 69 6e 64 6f 77 25 29 | 0d 03 f2 05 cb 0d 03 fc |window%)|........|
|00000ba0| 26 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |&.. "Wim|p_Create|
|00000bb0| 57 69 6e 64 6f 77 22 2c | 2c 77 69 6d 70 25 20 b8 |Window",|,wimp% .|
|00000bc0| 20 63 25 0d 04 06 1b c8 | 99 20 22 57 69 6d 70 5f | c%.....|. "Wimp_|
|00000bd0| 43 6c 6f 73 65 54 65 6d | 70 6c 61 74 65 22 0d 04 |CloseTem|plate"..|
|00000be0| 10 37 c8 99 20 22 57 69 | 6d 70 5f 57 68 69 63 68 |.7.. "Wi|mp_Which|
|00000bf0| 49 63 6f 6e 22 2c 63 25 | 2c 77 69 6d 70 25 2b 34 |Icon",c%|,wimp%+4|
|00000c00| 30 2c 31 2b 32 2b 28 31 | 3c 3c 38 29 2c 32 2b 28 |0,1+2+(1|<<8),2+(|
|00000c10| 31 3c 3c 38 29 0d 04 1a | 11 c8 8e 20 77 69 6d 70 |1<<8)...|... wimp|
|00000c20| 25 21 34 30 20 ca 0d 04 | 24 0d 20 c9 20 2d 31 20 |%!40 ...|$. . -1 |
|00000c30| 20 20 3a 0d 04 2e 0e 20 | 7f 20 3a 20 69 25 3d 34 | :.... |. : i%=4|
|00000c40| 30 0d 04 38 06 20 f5 0d | 04 42 24 20 20 20 77 69 |0..8. ..|.B$ wi|
|00000c50| 6d 70 25 21 34 3d 77 69 | 6d 70 25 21 69 25 20 3a |mp%!4=wi|mp%!i% :|
|00000c60| 20 77 69 6d 70 25 21 30 | 3d 63 25 0d 04 4c 24 20 | wimp%!0|=c%..L$ |
|00000c70| 20 20 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 | .. "Wi|mp_GetIc|
|00000c80| 6f 6e 53 74 61 74 65 22 | 2c 2c 77 69 6d 70 25 0d |onState"|,,wimp%.|
|00000c90| 04 56 2d 20 20 20 73 70 | 24 3d a4 57 69 6d 70 5f |.V- sp|$=.Wimp_|
|00000ca0| 47 65 74 53 74 72 69 6e | 67 41 74 41 64 64 72 65 |GetStrin|gAtAddre|
|00000cb0| 73 73 28 77 69 6d 70 25 | 21 32 38 29 0d 04 60 22 |ss(wimp%|!28)..`"|
|00000cc0| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 44 65 6c 65 | .. "W|imp_Dele|
|00000cd0| 74 65 49 63 6f 6e 22 2c | 2c 77 69 6d 70 25 0d 04 |teIcon",|,wimp%..|
|00000ce0| 6a 14 20 20 20 c8 8e 20 | 73 70 72 69 74 65 73 25 |j. .. |sprites%|
|00000cf0| 20 ca 0d 04 74 1b 20 20 | 20 20 c9 20 31 20 20 20 | ...t. | . 1 |
|00000d00| 20 3a 20 77 69 6d 70 25 | 21 33 32 3d 31 0d 04 7e | : wimp%|!32=1..~|
|00000d10| 0b 20 20 20 20 7f 20 3a | 0d 04 88 2f 20 20 20 20 |. . :|.../ |
|00000d20| 20 c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 | .. "OS_|SpriteOp|
|00000d30| 22 2c 26 31 30 38 2c 73 | 70 72 69 74 65 73 25 20 |",&108,s|prites% |
|00000d40| b8 20 2c 2c 2c 6e 25 0d | 04 92 0d 20 20 20 20 20 |. ,,,n%.|... |
|00000d50| 6a 25 3d 30 0d 04 9c 12 | 20 20 20 20 20 f5 20 3a |j%=0....| . :|
|00000d60| 20 6a 25 2b 3d 31 0d 04 | a6 3d 20 20 20 20 20 20 | j%+=1..|.= |
|00000d70| c8 99 20 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |.. "OS_S|priteOp"|
|00000d80| 2c 26 31 30 44 2c 73 70 | 72 69 74 65 73 25 2c 70 |,&10D,sp|rites%,p|
|00000d90| 6f 69 6e 74 65 72 5f 62 | 6c 6f 63 6b 25 2c 32 30 |ointer_b|lock%,20|
|00000da0| 2c 6a 25 0d 04 b0 37 20 | 20 20 20 20 20 73 70 32 |,j%...7 | sp2|
|00000db0| 24 3d a4 57 69 6d 70 5f | 47 65 74 53 74 72 69 6e |$=.Wimp_|GetStrin|
|00000dc0| 67 41 74 41 64 64 72 65 | 73 73 28 70 6f 69 6e 74 |gAtAddre|ss(point|
|00000dd0| 65 72 5f 62 6c 6f 63 6b | 25 29 0d 04 ba 1b 20 20 |er_block|%).... |
|00000de0| 20 20 20 fd 20 6a 25 3d | 6e 25 20 84 20 73 70 24 | . j%=|n% . sp$|
|00000df0| 3d 73 70 32 24 0d 04 c4 | 34 20 20 20 20 20 e7 20 |=sp2$...|4 . |
|00000e00| 73 70 24 3d 73 70 32 24 | 20 8c 20 77 69 6d 70 25 |sp$=sp2$| . wimp%|
|00000e10| 21 33 32 3d 73 70 72 69 | 74 65 73 25 20 8b 20 77 |!32=spri|tes% . w|
|00000e20| 69 6d 70 25 21 33 32 3d | 31 0d 04 ce 08 20 20 20 |imp%!32=|1.... |
|00000e30| cb 0d 04 d8 11 20 20 20 | 77 69 6d 70 25 21 34 3d |..... |wimp%!4=|
|00000e40| 63 25 0d 04 e2 2e 20 20 | 20 c8 99 20 22 57 69 6d |c%.... | .. "Wim|
|00000e50| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 77 |p_Create|Icon",,w|
|00000e60| 69 6d 70 25 2b 34 20 b8 | 20 68 61 6e 64 6c 65 25 |imp%+4 .| handle%|
|00000e70| 0d 04 ec 0c 20 20 20 69 | 25 2b 3d 34 0d 04 f6 14 |.... i|%+=4....|
|00000e80| 20 fd 20 28 77 69 6d 70 | 25 21 69 25 29 3d 2d 31 | . (wimp|%!i%)=-1|
|00000e90| 0d 05 00 05 cb 0d 05 0a | 07 3d 63 25 0d 05 14 05 |........|.=c%....|
|00000ea0| 3a 0d 05 1e 25 dd 20 f2 | 57 69 6d 70 5f 57 69 6e |:...%. .|Wimp_Win|
|00000eb0| 64 6f 77 42 72 69 6e 67 | 54 6f 54 6f 70 28 77 69 |dowBring|ToTop(wi|
|00000ec0| 6e 64 6f 77 25 29 0d 05 | 28 12 21 77 69 6d 70 25 |ndow%)..|(.!wimp%|
|00000ed0| 3d 77 69 6e 64 6f 77 25 | 0d 05 32 23 c8 99 20 22 |=window%|..2#.. "|
|00000ee0| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|00000ef0| 61 74 65 22 2c 2c 77 69 | 6d 70 25 0d 05 3c 0f 77 |ate",,wi|mp%..<.w|
|00000f00| 69 6d 70 25 21 32 38 3d | 2d 31 0d 05 46 1f c8 99 |imp%!28=|-1..F...|
|00000f10| 20 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f | "Wimp_O|penWindo|
|00000f20| 77 22 2c 2c 77 69 6d 70 | 25 0d 05 50 05 e1 0d 05 |w",,wimp|%..P....|
|00000f30| 5a 05 3a 0d 05 64 20 dd | 20 f2 57 69 6d 70 5f 57 |Z.:..d .| .Wimp_W|
|00000f40| 69 6e 64 6f 77 43 6c 6f | 73 65 28 77 69 6e 64 6f |indowClo|se(windo|
|00000f50| 77 25 29 0d 05 6e 12 21 | 77 69 6d 70 25 3d 77 69 |w%)..n.!|wimp%=wi|
|00000f60| 6e 64 6f 77 25 0d 05 78 | 20 c8 99 20 22 57 69 6d |ndow%..x| .. "Wim|
|00000f70| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 2c |p_CloseW|indow",,|
|00000f80| 77 69 6d 70 25 0d 05 82 | 05 e1 0d 05 8c 05 3a 0d |wimp%...|......:.|
|00000f90| 05 96 24 dd 20 f2 57 69 | 6d 70 5f 57 69 6e 64 6f |..$. .Wi|mp_Windo|
|00000fa0| 77 46 6f 72 63 65 44 72 | 61 77 28 77 69 6e 64 6f |wForceDr|aw(windo|
|00000fb0| 77 25 29 0d 05 a0 10 c8 | 8e 20 77 69 6e 64 6f 77 |w%).....|. window|
|00000fc0| 25 20 ca 0d 05 aa 38 20 | c9 20 2d 31 20 20 20 3a |% ....8 |. -1 :|
|00000fd0| 20 c8 99 20 22 57 69 6d | 70 5f 46 6f 72 63 65 52 | .. "Wim|p_ForceR|
|00000fe0| 65 64 72 61 77 22 2c 2d | 31 2c 30 2c 30 2c 32 2a |edraw",-|1,0,0,2*|
|00000ff0| 31 32 38 30 2c 32 2a 31 | 30 32 34 0d 05 b4 39 20 |1280,2*1|024...9 |
|00001000| 7f 20 3a 20 c8 99 20 22 | 57 69 6d 70 5f 46 6f 72 |. : .. "|Wimp_For|
|00001010| 63 65 52 65 64 72 61 77 | 22 2c 77 69 6e 64 6f 77 |ceRedraw|",window|
|00001020| 25 2c 30 2c 2d 32 2a 31 | 30 32 34 2c 32 2a 31 32 |%,0,-2*1|024,2*12|
|00001030| 38 30 2c 30 0d 05 be 05 | cb 0d 05 c8 05 e1 0d 05 |80,0....|........|
|00001040| d2 05 3a 0d 05 dc 1f dd | 20 f2 57 69 6d 70 5f 57 |..:.....| .Wimp_W|
|00001050| 69 6e 64 6f 77 4f 70 65 | 6e 28 77 69 6e 64 6f 77 |indowOpe|n(window|
|00001060| 25 29 0d 05 e6 12 21 77 | 69 6d 70 25 3d 77 69 6e |%)....!w|imp%=win|
|00001070| 64 6f 77 25 0d 05 f0 23 | c8 99 20 22 57 69 6d 70 |dow%...#|.. "Wimp|
|00001080| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00001090| 2c 2c 77 69 6d 70 25 0d | 05 fa 1f c8 99 20 22 57 |,,wimp%.|..... "W|
|000010a0| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|000010b0| 2c 77 69 6d 70 25 0d 06 | 04 05 e1 0d 06 0e 05 3a |,wimp%..|.......:|
|000010c0| 0d 06 18 19 f2 57 69 6d | 70 5f 57 69 6e 64 6f 77 |.....Wim|p_Window|
|000010d0| 49 6e 74 65 72 66 61 63 | 65 0d 06 22 20 c8 99 22 |Interfac|e.." .."|
|000010e0| 57 69 6d 70 5f 42 6f 72 | 64 65 72 57 69 6e 64 6f |Wimp_Bor|derWindo|
|000010f0| 77 22 2c 2c 77 69 6d 70 | 25 0d 06 2c 05 e1 0d 06 |w",,wimp|%..,....|
|00001100| 36 06 f4 7c 0d 06 40 06 | f4 7c 0d 06 4a 06 f4 7c |6..|..@.|.|..J..||
|00001110| 0d 06 54 31 f4 7c 20 20 | 20 20 20 20 20 20 20 20 |..T1.| | |
|00001120| 20 20 20 20 20 20 20 20 | 2d 2d 2d 2d 2d 2d 2d 2d | |--------|
|00001130| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001140| 2d 0d 06 5e 28 f4 7c 20 | 20 20 20 20 20 20 20 20 |-..^(.| | |
|00001150| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001160| 20 32 2e a0 49 63 6f 6e | 73 0d 06 68 31 f4 7c 20 | 2..Icon|s..h1.| |
|00001170| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001180| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|00001190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 06 72 06 f4 7c |--------|--..r..||
|000011a0| 0d 06 7c 06 f4 7c 0d 06 | 86 3d f4 7c 20 20 20 20 |..|..|..|.=.| |
|000011b0| 20 20 20 20 20 20 20 20 | 20 2d 2d 2d 2d 2d 2d 2d | | -------|
|000011c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011e0| 2d 2d 2d 0d 06 90 06 f4 | 7c 0d 06 9a 28 f4 7c 20 |---.....||...(.| |
|000011f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001200| 20 20 20 20 20 50 72 6f | 63 65 64 75 72 65 73 20 | Pro|cedures |
|00001210| 3a 0d 06 a4 06 f4 7c 0d | 06 ae 2b f4 7c 20 20 20 |:.....|.|..+.| |
|00001220| 20 20 20 20 20 20 20 20 | 20 20 20 46 4e 57 69 6d | | FNWim|
|00001230| 70 5f 49 63 6f 6e 42 61 | 72 28 53 70 72 69 74 65 |p_IconBa|r(Sprite|
|00001240| 24 29 0d 06 b8 3c f4 7c | 20 20 20 20 20 20 20 20 |$)...<.|| |
|00001250| 20 20 20 20 20 20 50 52 | 4f 43 57 69 6d 70 5f 49 | PR|OCWimp_I|
|00001260| 63 6f 6e 43 61 72 65 74 | 28 77 69 6e 64 6f 77 25 |conCaret|(window%|
|00001270| 2c 69 63 6f 6e 25 2c 63 | 68 61 72 73 25 29 0d 06 |,icon%,c|hars%)..|
|00001280| c2 32 f4 7c 20 20 20 20 | 20 20 20 20 20 20 20 20 |.2.| | |
|00001290| 20 20 46 4e 57 69 6d 70 | 5f 49 63 6f 6e 54 65 78 | FNWimp|_IconTex|
|000012a0| 74 28 77 69 6e 64 6f 77 | 25 2c 69 63 6f 6e 25 29 |t(window|%,icon%)|
|000012b0| 0d 06 cc 38 f4 7c 20 20 | 20 20 20 20 20 20 20 20 |...8.| | |
|000012c0| 20 20 20 20 46 4e 57 69 | 6d 70 5f 49 63 6f 6e 56 | FNWi|mp_IconV|
|000012d0| 61 6c 69 64 61 74 69 6f | 6e 28 77 69 6e 64 6f 77 |alidatio|n(window|
|000012e0| 25 2c 69 63 6f 6e 25 29 | 0d 06 d6 37 f4 7c 20 20 |%,icon%)|...7.| |
|000012f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 50 52 4f 43 | | PROC|
|00001300| 57 69 6d 70 5f 49 63 6f | 6e 44 69 73 61 62 6c 65 |Wimp_Ico|nDisable|
|00001310| 28 77 69 6e 64 6f 77 25 | 2c 69 63 6f 6e 25 29 0d |(window%|,icon%).|
|00001320| 06 e0 36 f4 7c 20 20 20 | 20 20 20 20 20 20 20 20 |..6.| | |
|00001330| 20 20 20 50 52 4f 43 57 | 69 6d 70 5f 49 63 6f 6e | PROCW|imp_Icon|
|00001340| 45 6e 61 62 6c 65 28 77 | 69 6e 64 6f 77 25 2c 69 |Enable(w|indow%,i|
|00001350| 63 6f 6e 25 29 0d 06 ea | 3f f4 7c 20 20 20 20 20 |con%)...|?.| |
|00001360| 20 20 20 20 20 20 20 20 | 20 46 4e 57 69 6d 70 5f | | FNWimp_|
|00001370| 49 63 6f 6e 50 75 74 53 | 70 72 69 74 65 28 77 69 |IconPutS|prite(wi|
|00001380| 6e 64 6f 77 25 2c 69 63 | 6f 6e 25 2c 73 70 72 69 |ndow%,ic|on%,spri|
|00001390| 74 65 24 29 0d 06 f4 3d | f4 7c 20 20 20 20 20 20 |te$)...=|.| |
|000013a0| 20 20 20 20 20 20 20 20 | 50 52 4f 43 57 69 6d 70 | |PROCWimp|
|000013b0| 5f 49 63 6f 6e 50 75 74 | 54 65 78 74 28 77 69 6e |_IconPut|Text(win|
|000013c0| 64 6f 77 25 2c 69 63 6f | 6e 25 2c 74 65 78 74 24 |dow%,ico|n%,text$|
|000013d0| 29 0d 06 fe 2f f4 7c 20 | 20 20 20 20 20 20 20 20 |).../.| | |
|000013e0| 20 20 20 20 20 50 52 4f | 43 57 69 6d 70 5f 49 63 | PRO|CWimp_Ic|
|000013f0| 6f 6e 49 6e 74 65 72 66 | 61 63 65 53 74 61 72 74 |onInterf|aceStart|
|00001400| 0d 07 08 30 f4 7c 20 20 | 20 20 20 20 20 20 20 20 |...0.| | |
|00001410| 20 20 20 20 50 52 4f 43 | 57 69 6d 70 5f 49 63 6f | PROC|Wimp_Ico|
|00001420| 6e 49 6e 74 65 72 66 61 | 63 65 46 69 6e 69 73 68 |nInterfa|ceFinish|
|00001430| 0d 07 12 06 f4 7c 0d 07 | 1c 3d f4 7c 20 20 20 20 |.....|..|.=.| |
|00001440| 20 20 20 20 20 20 20 20 | 20 2d 2d 2d 2d 2d 2d 2d | | -------|
|00001450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001460| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001470| 2d 2d 2d 0d 07 26 06 f4 | 7c 0d 07 30 05 3a 0d 07 |---..&..||..0.:..|
|00001480| 3a 1c dd 20 a4 57 69 6d | 70 5f 49 63 6f 6e 42 61 |:.. .Wim|p_IconBa|
|00001490| 72 28 53 70 72 69 74 65 | 24 29 0d 07 44 0b ea 20 |r(Sprite|$)..D.. |
|000014a0| 69 63 6f 6e 25 0d 07 4e | 0e 77 69 6d 70 25 21 30 |icon%..N|.wimp%!0|
|000014b0| 3d 2d 31 0d 07 58 1d 77 | 69 6d 70 25 21 34 3d 30 |=-1..X.w|imp%!4=0|
|000014c0| 20 20 20 20 20 3a 20 77 | 69 6d 70 25 21 38 3d 30 | : w|imp%!8=0|
|000014d0| 0d 07 62 1d 77 69 6d 70 | 25 21 31 32 3d 36 38 20 |..b.wimp|%!12=68 |
|000014e0| 3a 20 77 69 6d 70 25 21 | 31 36 3d 36 38 0d 07 6c |: wimp%!|16=68..l|
|000014f0| 12 77 69 6d 70 25 21 32 | 30 3d 26 33 30 30 32 0d |.wimp%!2|0=&3002.|
|00001500| 07 76 17 24 28 77 69 6d | 70 25 2b 32 34 29 3d 53 |.v.$(wim|p%+24)=S|
|00001510| 70 72 69 74 65 24 0d 07 | 80 27 c8 99 20 22 57 69 |prite$..|.'.. "Wi|
|00001520| 6d 70 5f 43 72 65 61 74 | 65 49 63 6f 6e 22 2c 2c |mp_Creat|eIcon",,|
|00001530| 77 69 6d 70 25 20 b8 20 | 69 63 6f 6e 25 0d 07 8a |wimp% . |icon%...|
|00001540| 0a 3d 69 63 6f 6e 25 0d | 07 94 05 3a 0d 07 9e 2b |.=icon%.|...:...+|
|00001550| dd 20 f2 57 69 6d 70 5f | 49 63 6f 6e 43 61 72 65 |. .Wimp_|IconCare|
|00001560| 74 28 77 69 6e 64 6f 77 | 25 2c 69 63 6f 6e 25 2c |t(window|%,icon%,|
|00001570| 63 68 61 72 73 25 29 0d | 07 a8 38 c8 99 20 22 57 |chars%).|..8.. "W|
|00001580| 69 6d 70 5f 53 65 74 43 | 61 72 65 74 50 6f 73 69 |imp_SetC|aretPosi|
|00001590| 74 69 6f 6e 22 2c 77 69 | 6e 64 6f 77 25 2c 69 63 |tion",wi|ndow%,ic|
|000015a0| 6f 6e 25 2c 2c 2c 2d 31 | 2c 63 68 61 72 73 25 0d |on%,,,-1|,chars%.|
|000015b0| 07 b2 05 e1 0d 07 bc 05 | 3a 0d 07 c6 23 dd 20 a4 |........|:...#. .|
|000015c0| 57 69 6d 70 5f 49 63 6f | 6e 54 65 78 74 28 77 69 |Wimp_Ico|nText(wi|
|000015d0| 6e 64 6f 77 25 2c 69 63 | 6f 6e 25 29 0d 07 d0 23 |ndow%,ic|on%)...#|
|000015e0| 77 69 6d 70 25 21 30 3d | 77 69 6e 64 6f 77 25 20 |wimp%!0=|window% |
|000015f0| 3a 20 77 69 6d 70 25 21 | 34 3d 69 63 6f 6e 25 0d |: wimp%!|4=icon%.|
|00001600| 07 da 21 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 49 |..!.. "W|imp_GetI|
|00001610| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 77 69 6d 70 25 |conState|",,wimp%|
|00001620| 0d 07 e4 37 e7 20 28 28 | 77 69 6d 70 25 21 32 34 |...7. ((|wimp%!24|
|00001630| 29 20 80 20 26 31 30 30 | 29 3d 30 20 85 20 31 2c |) . &100|)=0 . 1,|
|00001640| 22 49 63 6f 6e 20 69 73 | 6e 27 74 20 69 6e 64 69 |"Icon is|n't indi|
|00001650| 72 65 63 74 65 64 22 0d | 07 ee 10 3d 24 28 77 69 |rected".|...=$(wi|
|00001660| 6d 70 25 21 32 38 29 0d | 07 f8 05 3a 0d 08 02 29 |mp%!28).|...:...)|
|00001670| dd 20 a4 57 69 6d 70 5f | 49 63 6f 6e 56 61 6c 69 |. .Wimp_|IconVali|
|00001680| 64 61 74 69 6f 6e 28 77 | 69 6e 64 6f 77 25 2c 69 |dation(w|indow%,i|
|00001690| 63 6f 6e 25 29 0d 08 0c | 23 77 69 6d 70 25 21 30 |con%)...|#wimp%!0|
|000016a0| 3d 77 69 6e 64 6f 77 25 | 20 3a 20 77 69 6d 70 25 |=window%| : wimp%|
|000016b0| 21 34 3d 69 63 6f 6e 25 | 0d 08 16 21 c8 99 20 22 |!4=icon%|...!.. "|
|000016c0| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|000016d0| 65 22 2c 2c 77 69 6d 70 | 25 0d 08 20 37 e7 20 28 |e",,wimp|%.. 7. (|
|000016e0| 28 77 69 6d 70 25 21 32 | 34 29 20 80 20 26 31 30 |(wimp%!2|4) . &10|
|000016f0| 30 29 3d 30 20 85 20 31 | 2c 22 49 63 6f 6e 20 69 |0)=0 . 1|,"Icon i|
|00001700| 73 6e 27 74 20 69 6e 64 | 69 72 65 63 74 65 64 22 |sn't ind|irected"|
|00001710| 0d 08 2a 10 3d 24 28 77 | 69 6d 70 25 21 33 32 29 |..*.=$(w|imp%!32)|
|00001720| 0d 08 34 05 3a 0d 08 3e | 26 dd 20 f2 57 69 6d 70 |..4.:..>|&. .Wimp|
|00001730| 5f 49 63 6f 6e 44 69 73 | 61 62 6c 65 28 77 69 6e |_IconDis|able(win|
|00001740| 64 6f 77 25 2c 69 63 6f | 6e 25 29 0d 08 48 23 77 |dow%,ico|n%)..H#w|
|00001750| 69 6d 70 25 21 30 3d 77 | 69 6e 64 6f 77 25 20 3a |imp%!0=w|indow% :|
|00001760| 20 77 69 6d 70 25 21 34 | 3d 69 63 6f 6e 25 0d 08 | wimp%!4|=icon%..|
|00001770| 52 24 77 69 6d 70 25 21 | 38 3d 31 3c 3c 32 32 20 |R$wimp%!|8=1<<22 |
|00001780| 20 20 3a 20 77 69 6d 70 | 25 21 31 32 3d 31 3c 3c | : wimp|%!12=1<<|
|00001790| 32 32 0d 08 5c 21 c8 99 | 20 22 57 69 6d 70 5f 53 |22..\!..| "Wimp_S|
|000017a0| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 77 69 |etIconSt|ate",,wi|
|000017b0| 6d 70 25 0d 08 66 05 e1 | 0d 08 70 05 3a 0d 08 7a |mp%..f..|..p.:..z|
|000017c0| 25 dd 20 f2 57 69 6d 70 | 5f 49 63 6f 6e 45 6e 61 |%. .Wimp|_IconEna|
|000017d0| 62 6c 65 28 77 69 6e 64 | 6f 77 25 2c 69 63 6f 6e |ble(wind|ow%,icon|
|000017e0| 25 29 0d 08 84 23 77 69 | 6d 70 25 21 30 3d 77 69 |%)...#wi|mp%!0=wi|
|000017f0| 6e 64 6f 77 25 20 3a 20 | 77 69 6d 70 25 21 34 3d |ndow% : |wimp%!4=|
|00001800| 69 63 6f 6e 25 0d 08 8e | 24 77 69 6d 70 25 21 38 |icon%...|$wimp%!8|
|00001810| 3d 30 20 20 20 20 20 20 | 20 3a 20 77 69 6d 70 25 |=0 | : wimp%|
|00001820| 21 31 32 3d 31 3c 3c 32 | 32 0d 08 98 21 c8 99 20 |!12=1<<2|2...!.. |
|00001830| 22 57 69 6d 70 5f 53 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Se|tIconSta|
|00001840| 74 65 22 2c 2c 77 69 6d | 70 25 0d 08 a2 05 e1 0d |te",,wim|p%......|
|00001850| 08 ac 05 3a 0d 08 b6 30 | dd 20 a4 57 69 6d 70 5f |...:...0|. .Wimp_|
|00001860| 49 63 6f 6e 50 75 74 53 | 70 72 69 74 65 28 77 69 |IconPutS|prite(wi|
|00001870| 6e 64 6f 77 25 2c 69 63 | 6f 6e 25 2c 73 70 72 69 |ndow%,ic|on%,spri|
|00001880| 74 65 24 29 0d 08 c0 21 | 77 69 6d 70 25 21 30 3d |te$)...!|wimp%!0=|
|00001890| 77 69 6e 64 6f 77 25 3a | 77 69 6d 70 25 21 34 3d |window%:|wimp%!4=|
|000018a0| 69 63 6f 6e 25 0d 08 ca | 21 c8 99 20 22 57 69 6d |icon%...|!.. "Wim|
|000018b0| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|000018c0| 2c 77 69 6d 70 25 0d 08 | d4 1f c8 99 20 22 57 69 |,wimp%..|.... "Wi|
|000018d0| 6d 70 5f 44 65 6c 65 74 | 65 49 63 6f 6e 22 2c 2c |mp_Delet|eIcon",,|
|000018e0| 77 69 6d 70 25 0d 08 de | 3d 77 69 6d 70 25 21 34 |wimp%...|=wimp%!4|
|000018f0| 3d 77 69 6d 70 25 21 38 | 20 20 20 3a 20 77 69 6d |=wimp%!8| : wim|
|00001900| 70 25 21 38 3d 77 69 6d | 70 25 21 31 32 20 20 3a |p%!8=wim|p%!12 :|
|00001910| 20 77 69 6d 70 25 21 31 | 32 3d 77 69 6d 70 25 21 | wimp%!1|2=wimp%!|
|00001920| 31 36 0d 08 e8 3f 77 69 | 6d 70 25 21 31 36 3d 77 |16...?wi|mp%!16=w|
|00001930| 69 6d 70 25 21 32 30 20 | 3a 20 77 69 6d 70 25 21 |imp%!20 |: wimp%!|
|00001940| 32 30 3d 77 69 6d 70 25 | 21 32 34 20 3a 20 24 28 |20=wimp%|!24 : $(|
|00001950| 77 69 6d 70 25 2b 32 34 | 29 3d 73 70 72 69 74 65 |wimp%+24|)=sprite|
|00001960| 24 0d 08 f2 27 c8 99 20 | 22 57 69 6d 70 5f 43 72 |$...'.. |"Wimp_Cr|
|00001970| 65 61 74 65 49 63 6f 6e | 22 2c 2c 77 69 6d 70 25 |eateIcon|",,wimp%|
|00001980| 20 b8 20 69 63 6f 6e 25 | 0d 08 fc 0a 3d 69 63 6f | . icon%|....=ico|
|00001990| 6e 25 0d 09 06 05 3a 0d | 09 10 2c dd 20 f2 57 69 |n%....:.|..,. .Wi|
|000019a0| 6d 70 5f 49 63 6f 6e 50 | 75 74 54 65 78 74 28 77 |mp_IconP|utText(w|
|000019b0| 69 6e 64 6f 77 25 2c 69 | 63 6f 6e 25 2c 74 65 78 |indow%,i|con%,tex|
|000019c0| 74 24 29 0d 09 1a 23 77 | 69 6d 70 25 21 30 3d 77 |t$)...#w|imp%!0=w|
|000019d0| 69 6e 64 6f 77 25 20 3a | 20 77 69 6d 70 25 21 34 |indow% :| wimp%!4|
|000019e0| 3d 69 63 6f 6e 25 0d 09 | 24 21 c8 99 20 22 57 69 |=icon%..|$!.. "Wi|
|000019f0| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00001a00| 2c 2c 77 69 6d 70 25 0d | 09 2e 37 e7 20 28 28 77 |,,wimp%.|..7. ((w|
|00001a10| 69 6d 70 25 21 32 34 29 | 20 80 20 26 31 30 30 29 |imp%!24)| . &100)|
|00001a20| 3d 30 20 85 20 31 2c 22 | 49 63 6f 6e 20 69 73 6e |=0 . 1,"|Icon isn|
|00001a30| 27 74 20 69 6e 64 69 72 | 65 63 74 65 64 22 0d 09 |'t indir|ected"..|
|00001a40| 38 15 24 28 77 69 6d 70 | 25 21 32 38 29 3d 74 65 |8.$(wimp|%!28)=te|
|00001a50| 78 74 24 0d 09 42 23 77 | 69 6d 70 25 21 30 3d 77 |xt$..B#w|imp%!0=w|
|00001a60| 69 6e 64 6f 77 25 20 3a | 20 77 69 6d 70 25 21 34 |indow% :| wimp%!4|
|00001a70| 3d 69 63 6f 6e 25 0d 09 | 4c 1a 77 69 6d 70 25 21 |=icon%..|L.wimp%!|
|00001a80| 38 3d 30 20 3a 20 77 69 | 6d 70 25 21 31 32 3d 30 |8=0 : wi|mp%!12=0|
|00001a90| 0d 09 56 21 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |..V!.. "|Wimp_Set|
|00001aa0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 77 69 6d 70 |IconStat|e",,wimp|
|00001ab0| 25 0d 09 60 05 e1 0d 09 | 6a 05 3a 0d 09 74 1e dd |%..`....|j.:..t..|
|00001ac0| 20 f2 57 69 6d 70 5f 49 | 63 6f 6e 49 6e 74 65 72 | .Wimp_I|conInter|
|00001ad0| 66 61 63 65 53 74 61 72 | 74 0d 09 7e 1e c8 99 22 |faceStar|t..~..."|
|00001ae0| 57 69 6d 70 5f 42 6f 72 | 64 65 72 49 63 6f 6e 22 |Wimp_Bor|derIcon"|
|00001af0| 2c 2c 77 69 6d 70 25 0d | 09 88 05 e1 0d 09 92 05 |,,wimp%.|........|
|00001b00| 3a 0d 09 9c 1f dd 20 f2 | 57 69 6d 70 5f 49 63 6f |:..... .|Wimp_Ico|
|00001b10| 6e 49 6e 74 65 72 66 61 | 63 65 46 69 6e 69 73 68 |nInterfa|ceFinish|
|00001b20| 0d 09 a6 0d 77 69 6d 70 | 25 21 38 3d 30 0d 09 b0 |....wimp|%!8=0...|
|00001b30| 1e c8 99 22 57 69 6d 70 | 5f 42 6f 72 64 65 72 49 |..."Wimp|_BorderI|
|00001b40| 63 6f 6e 22 2c 2c 77 69 | 6d 70 25 0d 09 ba 05 e1 |con",,wi|mp%.....|
|00001b50| 0d 09 c4 05 3a 0d 09 ce | 06 f4 7c 0d 09 d8 06 f4 |....:...|..|.....|
|00001b60| 7c 0d 09 e2 06 f4 7c 0d | 09 ec 31 f4 7c 20 20 20 ||.....|.|..1.| |
|00001b70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2d | | -|
|00001b80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b90| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 09 f6 28 f4 7c 20 20 |--------|...(.| |
|00001ba0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001bb0| 20 20 20 20 20 20 20 20 | 33 2e a0 4d 65 6e 75 73 | |3..Menus|
|00001bc0| 0d 0a 00 31 f4 7c 20 20 | 20 20 20 20 20 20 20 20 |...1.| | |
|00001bd0| 20 20 20 20 20 20 20 20 | 2d 2d 2d 2d 2d 2d 2d 2d | |--------|
|00001be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001bf0| 2d 0d 0a 0a 06 f4 7c 0d | 0a 14 06 f4 7c 0d 0a 1e |-.....|.|....|...|
|00001c00| 3f f4 7c 20 20 20 20 20 | 20 20 20 20 20 20 2d 2d |?.| | --|
|00001c10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001c20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001c30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 0a 28 06 |--------|----..(.|
|00001c40| f4 7c 0d 0a 32 28 f4 7c | 20 20 20 20 20 20 20 20 |.|..2(.|| |
|00001c50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 50 72 | | Pr|
|00001c60| 6f 63 65 64 75 72 65 73 | 20 3a 0d 0a 3c 06 f4 7c |ocedures| :..<..||
|00001c70| 0d 0a 46 06 f4 7c 0d 0a | 50 2e f4 7c 20 20 20 20 |..F..|..|P..| |
|00001c80| 20 20 20 20 20 20 20 20 | 50 52 4f 43 57 69 6d 70 | |PROCWimp|
|00001c90| 5f 4d 65 6e 75 41 64 6a | 75 73 74 4f 6e 28 6d 65 |_MenuAdj|ustOn(me|
|00001ca0| 6e 75 25 29 0d 0a 5a 2b | f4 7c 20 20 20 20 20 20 |nu%)..Z+|.| |
|00001cb0| 20 20 20 20 20 20 46 4e | 57 69 6d 70 5f 4d 65 6e | FN|Wimp_Men|
|00001cc0| 75 43 68 6f 69 63 65 28 | 6c 65 76 65 6c 25 29 0d |uChoice(|level%).|
|00001cd0| 0a 64 2a f4 7c 20 20 20 | 20 20 20 20 20 20 20 20 |.d*.| | |
|00001ce0| 20 46 4e 57 69 6d 70 5f | 4d 65 6e 75 43 72 65 61 | FNWimp_|MenuCrea|
|00001cf0| 74 65 28 6d 65 6e 75 24 | 29 0d 0a 6e 24 f4 7c 20 |te(menu$|)..n$.| |
|00001d00| 20 20 20 20 20 20 20 20 | 20 20 20 46 4e 57 69 6d | | FNWim|
|00001d10| 70 5f 4d 65 6e 75 43 6f | 6c 6f 75 72 73 0d 0a 78 |p_MenuCo|lours..x|
|00001d20| 32 f4 7c 20 20 20 20 20 | 20 20 20 20 20 20 20 46 |2.| | F|
|00001d30| 4e 57 69 6d 70 5f 4d 65 | 6e 75 43 72 65 61 74 65 |NWimp_Me|nuCreate|
|00001d40| 43 6f 6c 6f 75 72 73 28 | 74 69 74 6c 65 24 29 0d |Colours(|title$).|
|00001d50| 0a 82 2f f4 7c 20 20 20 | 20 20 20 20 20 20 20 20 |../.| | |
|00001d60| 20 46 4e 57 69 6d 70 5f | 4d 65 6e 75 4e 6f 4f 66 | FNWimp_|MenuNoOf|
|00001d70| 45 6e 74 72 69 65 73 28 | 6d 65 6e 75 24 29 0d 0a |Entries(|menu$)..|
|00001d80| 8c 44 f4 7c 20 20 20 20 | 20 20 20 20 20 20 20 20 |.D.| | |
|00001d90| 50 52 4f 43 57 69 6d 70 | 5f 4d 65 6e 75 42 61 63 |PROCWimp|_MenuBac|
|00001da0| 6b 47 72 6f 75 6e 64 43 | 6f 6c 6f 75 72 28 6d 65 |kGroundC|olour(me|
|00001db0| 6e 75 25 2c 69 74 65 6d | 25 2c 63 6f 6c 6f 75 72 |nu%,item|%,colour|
|00001dc0| 25 29 0d 0a 96 32 f4 7c | 20 20 20 20 20 20 20 20 |%)...2.|| |
|00001dd0| 20 20 20 20 50 52 4f 43 | 57 69 6d 70 5f 4d 65 6e | PROC|Wimp_Men|
|00001de0| 75 43 65 6e 74 72 65 28 | 6d 65 6e 75 25 2c 69 74 |uCentre(|menu%,it|
|00001df0| 65 6d 25 29 0d 0a a0 24 | f4 7c 20 20 20 20 20 20 |em%)...$|.| |
|00001e00| 20 20 20 20 20 20 50 52 | 4f 43 57 69 6d 70 5f 4d | PR|OCWimp_M|
|00001e10| 65 6e 75 43 6c 6f 73 65 | 0d 0a aa 33 f4 7c 20 20 |enuClose|...3.| |
|00001e20| 20 20 20 20 20 20 20 20 | 20 20 50 52 4f 43 57 69 | | PROCWi|
|00001e30| 6d 70 5f 4d 65 6e 75 44 | 69 73 61 62 6c 65 28 6d |mp_MenuD|isable(m|
|00001e40| 65 6e 75 25 2c 69 74 65 | 6d 25 29 0d 0a b4 36 f4 |enu%,ite|m%)...6.|
|00001e50| 7c 20 20 20 20 20 20 20 | 20 20 20 20 20 50 52 4f || | PRO|
|00001e60| 43 57 69 6d 70 5f 4d 65 | 6e 75 44 6f 74 74 65 64 |CWimp_Me|nuDotted|
|00001e70| 4c 69 6e 65 28 6d 65 6e | 75 25 2c 69 74 65 6d 25 |Line(men|u%,item%|
|00001e80| 29 0d 0a be 32 f4 7c 20 | 20 20 20 20 20 20 20 20 |)...2.| | |
|00001e90| 20 20 20 50 52 4f 43 57 | 69 6d 70 5f 4d 65 6e 75 | PROCW|imp_Menu|
|00001ea0| 45 6e 61 62 6c 65 28 6d | 65 6e 75 25 2c 69 74 65 |Enable(m|enu%,ite|
|00001eb0| 6d 25 29 0d 0a c8 44 f4 | 7c 20 20 20 20 20 20 20 |m%)...D.|| |
|00001ec0| 20 20 20 20 20 50 52 4f | 43 57 69 6d 70 5f 4d 65 | PRO|CWimp_Me|
|00001ed0| 6e 75 46 6f 72 65 67 72 | 6f 75 6e 64 43 6f 6c 6f |nuForegr|oundColo|
|00001ee0| 75 72 28 6d 65 6e 75 25 | 2c 69 74 65 6d 25 2c 63 |ur(menu%|,item%,c|
|00001ef0| 6f 6c 6f 75 72 25 29 0d | 0a d2 38 f4 7c 20 20 20 |olour%).|..8.| |
|00001f00| 20 20 20 20 20 20 20 20 | 20 50 52 4f 43 57 69 6d | | PROCWim|
|00001f10| 70 5f 4d 65 6e 75 47 6c | 75 65 28 6d 65 6e 75 31 |p_MenuGl|ue(menu1|
|00001f20| 25 2c 69 74 65 6d 25 2c | 6d 65 6e 75 32 25 29 0d |%,item%,|menu2%).|
|00001f30| 0a dc 36 f4 7c 20 20 20 | 20 20 20 20 20 20 20 20 |..6.| | |
|00001f40| 20 50 52 4f 43 57 69 6d | 70 5f 4d 65 6e 75 49 74 | PROCWim|p_MenuIt|
|00001f50| 65 6d 28 6d 65 6e 75 25 | 2c 69 74 65 6d 25 2c 69 |em(menu%|,item%,i|
|00001f60| 74 65 6d 24 29 0d 0a e6 | 33 f4 7c 20 20 20 20 20 |tem$)...|3.| |
|00001f70| 20 20 20 20 20 20 20 50 | 52 4f 43 57 69 6d 70 5f | P|ROCWimp_|
|00001f80| 4d 65 6e 75 4d 65 73 73 | 61 67 65 28 6d 65 6e 75 |MenuMess|age(menu|
|00001f90| 25 2c 69 74 65 6d 25 29 | 0d 0a f0 31 f4 7c 20 20 |%,item%)|...1.| |
|00001fa0| 20 20 20 20 20 20 20 20 | 20 20 50 52 4f 43 57 69 | | PROCWi|
|00001fb0| 6d 70 5f 4d 65 6e 75 50 | 6f 70 55 70 28 4d 65 6e |mp_MenuP|opUp(Men|
|00001fc0| 75 25 2c 78 25 2c 79 25 | 29 0d 0a fa 2e f4 7c 20 |u%,x%,y%|).....| |
|00001fd0| 20 20 20 20 20 20 20 20 | 20 20 20 50 52 4f 43 57 | | PROCW|
|00001fe0| 69 6d 70 5f 4d 65 6e 75 | 50 6f 70 55 70 42 61 72 |imp_Menu|PopUpBar|
|00001ff0| 28 78 25 2c 79 25 29 0d | 0b 04 30 f4 7c 20 20 20 |(x%,y%).|..0.| |
|00002000| 20 20 20 20 20 20 20 20 | 20 50 52 4f 43 57 69 6d | | PROCWim|
|00002010| 70 5f 4d 65 6e 75 54 69 | 63 6b 28 6d 65 6e 75 25 |p_MenuTi|ck(menu%|
|00002020| 2c 69 74 65 6d 25 29 0d | 0b 0e 32 f4 7c 20 20 20 |,item%).|..2.| |
|00002030| 20 20 20 20 20 20 20 20 | 20 50 52 4f 43 57 69 6d | | PROCWim|
|00002040| 70 5f 4d 65 6e 75 54 69 | 74 6c 65 28 6d 65 6e 75 |p_MenuTi|tle(menu|
|00002050| 25 2c 74 69 74 6c 65 24 | 29 0d 0b 18 4c f4 7c 20 |%,title$|)...L.| |
|00002060| 20 20 20 20 20 20 20 20 | 20 20 20 50 52 4f 43 57 | | PROCW|
|00002070| 69 6d 70 5f 4d 65 6e 75 | 57 72 69 74 65 28 6d 65 |imp_Menu|Write(me|
|00002080| 6e 75 25 2c 69 74 65 6d | 25 2c 62 75 66 66 65 72 |nu%,item|%,buffer|
|00002090| 25 2c 76 61 6c 25 2c 42 | 75 66 66 65 72 4c 65 6e |%,val%,B|ufferLen|
|000020a0| 67 74 68 25 29 0d 0b 22 | 06 f4 7c 0d 0b 2c 3f f4 |gth%).."|..|..,?.|
|000020b0| 7c 20 20 20 20 20 20 20 | 20 20 20 20 2d 2d 2d 2d || | ----|
|000020c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000020d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000020e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 0b 36 06 f4 7c |--------|--..6..||
|000020f0| 0d 0b 40 05 3a 0d 0b 4a | 1f dd 20 f2 57 69 6d 70 |..@.:..J|.. .Wimp|
|00002100| 5f 4d 65 6e 75 41 64 6a | 75 73 74 4f 6e 28 6d 65 |_MenuAdj|ustOn(me|
|00002110| 6e 75 25 29 0d 0b 54 2c | c8 99 20 22 57 69 6d 70 |nu%)..T,|.. "Wimp|
|00002120| 5f 47 65 74 50 6f 69 6e | 74 65 72 49 6e 66 6f 22 |_GetPoin|terInfo"|
|00002130| 2c 2c 70 6f 69 6e 74 65 | 72 5f 62 6c 6f 63 6b 25 |,,pointe|r_block%|
|00002140| 0d 0b 5e 5e e7 20 28 28 | 70 6f 69 6e 74 65 72 5f |..^^. ((|pointer_|
|00002150| 62 6c 6f 63 6b 25 21 38 | 29 80 31 29 3d 31 20 8c |block%!8|).1)=1 .|
|00002160| 20 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 | .. "Wim|p_Create|
|00002170| 4d 65 6e 75 22 2c 2c 6d | 65 6e 75 25 2c 70 6f 69 |Menu",,m|enu%,poi|
|00002180| 6e 74 65 72 5f 62 6c 6f | 63 6b 25 21 30 2c 70 6f |nter_blo|ck%!0,po|
|00002190| 69 6e 74 65 72 5f 62 6c | 6f 63 6b 25 21 34 0d 0b |inter_bl|ock%!4..|
|000021a0| 68 05 e1 0d 0b 72 05 3a | 0d 0b 7c 1e dd 20 a4 57 |h....r.:|..|.. .W|
|000021b0| 69 6d 70 5f 4d 65 6e 75 | 43 68 6f 69 63 65 28 6c |imp_Menu|Choice(l|
|000021c0| 65 76 65 6c 25 29 0d 0b | 86 19 3d 28 77 69 6d 70 |evel%)..|..=(wimp|
|000021d0| 25 21 28 34 2a 6c 65 76 | 65 6c 25 29 29 2b 31 0d |%!(4*lev|el%))+1.|
|000021e0| 0b 90 05 3a 0d 0b 9a 1d | dd 20 a4 57 69 6d 70 5f |...:....|. .Wimp_|
|000021f0| 4d 65 6e 75 43 72 65 61 | 74 65 28 6d 65 6e 75 24 |MenuCrea|te(menu$|
|00002200| 29 0d 0b a4 29 e7 20 6d | 65 6e 75 24 3d 22 43 6f |)...). m|enu$="Co|
|00002210| 6c 6f 75 72 73 22 20 8c | 3d a4 57 69 6d 70 5f 4d |lours" .|=.Wimp_M|
|00002220| 65 6e 75 43 6f 6c 6f 75 | 72 73 0d 0b ae 27 ea 20 |enuColou|rs...'. |
|00002230| 6d 65 6e 75 25 2c 69 6e | 64 65 78 25 2c 77 69 64 |menu%,in|dex%,wid|
|00002240| 74 68 25 2c 6c 65 6e 67 | 74 68 25 2c 6b 25 2c 73 |th%,leng|th%,k%,s|
|00002250| 25 0d 0b b8 2e de 20 6d | 65 6e 75 25 20 32 38 2b |%..... m|enu% 28+|
|00002260| a4 57 69 6d 70 5f 4d 65 | 6e 75 4e 6f 4f 66 45 6e |.Wimp_Me|nuNoOfEn|
|00002270| 74 72 69 65 73 28 6d 65 | 6e 75 24 29 2a 32 34 0d |tries(me|nu$)*24.|
|00002280| 0b c2 37 6d 65 6e 75 25 | 3f 31 32 3d 37 20 20 20 |..7menu%|?12=7 |
|00002290| 3a 20 6d 65 6e 75 25 3f | 31 33 3d 32 20 20 3a 20 |: menu%?|13=2 : |
|000022a0| 6d 65 6e 75 25 3f 31 34 | 3d 37 20 3a 6d 65 6e 75 |menu%?14|=7 :menu|
|000022b0| 25 3f 31 35 3d 30 0d 0b | cc 2b 6d 65 6e 75 25 21 |%?15=0..|.+menu%!|
|000022c0| 31 36 3d 31 34 30 20 3a | 20 6d 65 6e 75 25 21 32 |16=140 :| menu%!2|
|000022d0| 30 3d 34 34 20 3a 20 6d | 65 6e 75 25 21 32 34 3d |0=44 : m|enu%!24=|
|000022e0| 30 0d 0b d6 13 69 6e 64 | 65 78 25 3d 6d 65 6e 75 |0....ind|ex%=menu|
|000022f0| 25 2b 32 38 0d 0b e0 20 | 24 6d 65 6e 75 25 3d c0 |%+28... |$menu%=.|
|00002300| 6d 65 6e 75 24 2c a7 6d | 65 6e 75 24 2c 22 5c 22 |menu$,.m|enu$,"\"|
|00002310| 29 2d 31 29 0d 0b ea 23 | 77 69 64 74 68 25 3d a9 |)-1)...#|width%=.|
|00002320| 28 c0 6d 65 6e 75 24 2c | a7 6d 65 6e 75 24 2c 22 |(.menu$,|.menu$,"|
|00002330| 5c 22 29 2d 31 29 29 0d | 0b f4 24 6d 65 6e 75 24 |\")-1)).|..$menu$|
|00002340| 2b 3d 22 5c 22 20 3a 20 | 4d 65 6e 75 5f 4e 6f 4f |+="\" : |Menu_NoO|
|00002350| 66 45 6e 74 72 69 65 73 | 25 3d 30 0d 0b fe 10 c8 |fEntries|%=0.....|
|00002360| 95 20 6d 65 6e 75 24 3c | 3e 22 22 0d 0c 08 1f 6d |. menu$<|>""....m|
|00002370| 65 6e 75 24 3d c1 6d 65 | 6e 75 24 2c a7 6d 65 6e |enu$=.me|nu$,.men|
|00002380| 75 24 2c 22 5c 22 29 2b | 31 29 0d 0c 12 0e c8 8e |u$,"\")+|1)......|
|00002390| 20 6d 65 6e 75 24 20 ca | 0d 0c 1c 09 20 c9 20 22 | menu$ .|.... . "|
|000023a0| 22 0d 0c 26 08 20 7f 20 | 3a 0d 0c 30 31 20 20 21 |"..&. . |:..01 !|
|000023b0| 69 6e 64 65 78 25 3d 30 | 20 3a 20 69 6e 64 65 78 |index%=0| : index|
|000023c0| 25 21 34 3d 2d 31 20 3a | 20 69 6e 64 65 78 25 21 |%!4=-1 :| index%!|
|000023d0| 38 3d 26 37 30 30 30 30 | 32 31 0d 0c 3a 1b 20 20 |8=&70000|21..:. |
|000023e0| 6c 65 6e 67 74 68 25 3d | a7 6d 65 6e 75 24 2c 22 |length%=|.menu$,"|
|000023f0| 5c 22 29 2d 31 0d 0c 44 | 1e 20 20 6b 25 3d a7 c0 |\")-1..D|. k%=..|
|00002400| 6d 65 6e 75 24 2c 6c 65 | 6e 67 74 68 25 29 2c 22 |menu$,le|ngth%),"|
|00002410| 3e 22 29 0d 0c 4e 0d 20 | 20 c8 8e 20 6b 25 20 ca |>")..N. | .. k% .|
|00002420| 0d 0c 58 0a 20 20 20 c9 | 20 30 0d 0c 62 08 20 20 |..X. .| 0..b. |
|00002430| 20 7f 0d 0c 6c 25 20 20 | 20 20 73 25 3d a0 28 c1 | ...l% | s%=.(.|
|00002440| 6d 65 6e 75 24 2c 6b 25 | 2b 31 2c 6c 65 6e 67 74 |menu$,k%|+1,lengt|
|00002450| 68 25 2d 6b 25 29 29 0d | 0c 76 13 20 20 20 20 69 |h%-k%)).|.v. i|
|00002460| 6e 64 65 78 25 21 34 3d | 73 25 0d 0c 80 14 20 20 |ndex%!4=|s%.... |
|00002470| 20 20 6c 65 6e 67 74 68 | 25 3d 6b 25 2d 31 0d 0c | length|%=k%-1..|
|00002480| 8a 07 20 20 cb 0d 0c 94 | 22 20 20 24 28 69 6e 64 |.. ....|" $(ind|
|00002490| 65 78 25 2b 31 32 29 3d | c0 6d 65 6e 75 24 2c 6c |ex%+12)=|.menu$,l|
|000024a0| 65 6e 67 74 68 25 29 0d | 0c 9e 27 20 20 e7 20 6c |ength%).|..' . l|
|000024b0| 65 6e 67 74 68 25 3e 77 | 69 64 74 68 25 20 8c 20 |ength%>w|idth% . |
|000024c0| 77 69 64 74 68 25 3d 6c | 65 6e 67 74 68 25 0d 0c |width%=l|ength%..|
|000024d0| a8 10 20 20 69 6e 64 65 | 78 25 2b 3d 32 34 0d 0c |.. inde|x%+=24..|
|000024e0| b2 05 cb 0d 0c bc 05 ce | 0d 0c c6 1a 6d 65 6e 75 |........|....menu|
|000024f0| 25 21 31 36 3d 31 36 2a | 28 77 69 64 74 68 25 2b |%!16=16*|(width%+|
|00002500| 31 29 0d 0c d0 28 69 6e | 64 65 78 25 21 2d 32 34 |1)...(in|dex%!-24|
|00002510| 3d 69 6e 64 65 78 25 21 | 2d 32 34 20 84 20 26 38 |=index%!|-24 . &8|
|00002520| 30 20 3a 20 3d 6d 65 6e | 75 25 0d 0c da 05 3a 0d |0 : =men|u%....:.|
|00002530| 0c e4 17 dd 20 a4 57 69 | 6d 70 5f 4d 65 6e 75 43 |.... .Wi|mp_MenuC|
|00002540| 6f 6c 6f 75 72 73 0d 0c | ee 21 3d a4 57 69 6d 70 |olours..|.!=.Wimp|
|00002550| 5f 4d 65 6e 75 43 72 65 | 61 74 65 43 6f 6c 6f 75 |_MenuCre|ateColou|
|00002560| 72 73 28 22 20 22 29 0d | 0c f8 05 3a 0d 0d 02 25 |rs(" ").|...:...%|
|00002570| dd 20 a4 57 69 6d 70 5f | 4d 65 6e 75 43 72 65 61 |. .Wimp_|MenuCrea|
|00002580| 74 65 43 6f 6c 6f 75 72 | 73 28 74 69 74 6c 65 24 |teColour|s(title$|
|00002590| 29 0d 0d 0c 13 ea 20 78 | 24 2c 6d 65 6e 25 2c 6a |)..... x|$,men%,j|
|000025a0| 25 2c 69 25 0d 0d 16 36 | 78 24 3d 74 69 74 6c 65 |%,i%...6|x$=title|
|000025b0| 24 2b 22 5c 30 5c 31 5c | 32 5c 33 5c 34 5c 35 5c |$+"\0\1\|2\3\4\5\|
|000025c0| 36 5c 37 5c 38 5c 39 5c | 31 30 5c 31 31 5c 31 32 |6\7\8\9\|10\11\12|
|000025d0| 5c 31 33 5c 31 34 5c 31 | 35 22 0d 0d 20 1d 6d 65 |\13\14\1|5".. .me|
|000025e0| 6e 25 3d a4 57 69 6d 70 | 5f 4d 65 6e 75 43 72 65 |n%=.Wimp|_MenuCre|
|000025f0| 61 74 65 28 78 24 29 0d | 0d 2a 0f e3 20 69 25 3d |ate(x$).|.*.. i%=|
|00002600| 30 20 b8 20 31 35 0d 0d | 34 0a c8 8e 20 b9 20 ca |0 . 15..|4... . .|
|00002610| 0d 0d 3e 28 c9 20 69 25 | 3c 34 2c 69 25 3d 39 2c |..>(. i%|<4,i%=9,|
|00002620| 69 25 3d 31 32 2c 69 25 | 3d 31 34 2c 69 25 3d 31 |i%=12,i%|=14,i%=1|
|00002630| 35 20 3a 20 6a 25 3d 37 | 0d 0d 48 0c 7f 20 3a 20 |5 : j%=7|..H.. : |
|00002640| 6a 25 3d 30 0d 0d 52 05 | cb 0d 0d 5c 1c 6d 65 6e |j%=0..R.|...\.men|
|00002650| 25 3f 28 33 39 2b 69 25 | 2a 32 34 29 3d 69 25 2a |%?(39+i%|*24)=i%*|
|00002660| 31 36 2b 6a 25 0d 0d 66 | 1f f2 57 69 6d 70 5f 4d |16+j%..f|..Wimp_M|
|00002670| 65 6e 75 43 65 6e 74 72 | 65 28 6d 65 6e 25 2c 69 |enuCentr|e(men%,i|
|00002680| 25 2b 31 29 0d 0d 70 05 | ed 0d 0d 7a 09 3d 6d 65 |%+1)..p.|...z.=me|
|00002690| 6e 25 0d 0d 84 05 3a 0d | 0d 8e 22 dd 20 a4 57 69 |n%....:.|..". .Wi|
|000026a0| 6d 70 5f 4d 65 6e 75 4e | 6f 4f 66 45 6e 74 72 69 |mp_MenuN|oOfEntri|
|000026b0| 65 73 28 6d 65 6e 75 24 | 29 0d 0d 98 1a ea 20 6e |es(menu$|)..... n|
|000026c0| 25 20 2c 6a 25 20 3a 20 | 6e 25 3d 30 20 3a 20 6a |% ,j% : |n%=0 : j|
|000026d0| 25 3d 30 0d 0d a2 05 f5 | 0d 0d ac 17 6a 25 3d a7 |%=0.....|....j%=.|
|000026e0| 6d 65 6e 75 24 2c 22 5c | 22 2c 6a 25 2b 31 29 0d |menu$,"\|",j%+1).|
|000026f0| 0d b6 13 e7 20 6a 25 3c | 3e 30 20 8c 20 6e 25 2b |.... j%<|>0 . n%+|
|00002700| 3d 31 0d 0d c0 0a fd 20 | 6a 25 3d 30 0d 0d ca 07 |=1..... |j%=0....|
|00002710| 3d 6e 25 0d 0d d4 05 3a | 0d 0d de 35 dd 20 f2 57 |=n%....:|...5. .W|
|00002720| 69 6d 70 5f 4d 65 6e 75 | 42 61 63 6b 47 72 6f 75 |imp_Menu|BackGrou|
|00002730| 6e 64 43 6f 6c 6f 75 72 | 28 6d 65 6e 75 25 2c 69 |ndColour|(menu%,i|
|00002740| 74 65 6d 25 2c 63 6f 6c | 6f 75 72 25 29 0d 0d e8 |tem%,col|our%)...|
|00002750| 0e ea 20 66 6f 72 65 25 | 2c 69 25 0d 0d f2 26 66 |.. fore%|,i%...&f|
|00002760| 6f 72 65 25 3d 28 6d 65 | 6e 75 25 3f 28 33 39 2b |ore%=(me|nu%?(39+|
|00002770| 28 69 74 65 6d 25 2d 31 | 29 2a 32 34 29 29 83 31 |(item%-1|)*24)).1|
|00002780| 36 0d 0d fc 28 69 25 3d | 28 28 6d 65 6e 75 25 3f |6...(i%=|((menu%?|
|00002790| 28 33 39 2b 28 69 74 65 | 6d 25 2d 31 29 2a 32 34 |(39+(ite|m%-1)*24|
|000027a0| 29 29 81 31 36 29 83 31 | 36 0d 0e 06 2f 6d 65 6e |)).16).1|6.../men|
|000027b0| 75 25 3f 28 33 39 2b 28 | 69 74 65 6d 25 2d 31 29 |u%?(39+(|item%-1)|
|000027c0| 2a 32 34 29 3d 66 6f 72 | 65 25 2b 31 36 2a 63 6f |*24)=for|e%+16*co|
|000027d0| 6c 6f 75 72 25 2b 69 25 | 0d 0e 10 05 e1 0d 0e 1a |lour%+i%|........|
|000027e0| 05 3a 0d 0e 24 23 dd 20 | f2 57 69 6d 70 5f 4d 65 |.:..$#. |.Wimp_Me|
|000027f0| 6e 75 43 65 6e 74 72 65 | 28 6d 65 6e 75 25 2c 69 |nuCentre|(menu%,i|
|00002800| 74 65 6d 25 29 0d 0e 2e | 3a 6d 65 6e 75 25 21 28 |tem%)...|:menu%!(|
|00002810| 33 36 2b 28 69 74 65 6d | 25 2d 31 29 2a 32 34 29 |36+(item|%-1)*24)|
|00002820| 3d 6d 65 6e 75 25 21 28 | 33 36 2b 28 69 74 65 6d |=menu%!(|36+(item|
|00002830| 25 2d 31 29 2a 32 34 29 | 84 28 31 3c 3c 33 29 0d |%-1)*24)|.(1<<3).|
|00002840| 0e 38 05 e1 0d 0e 42 05 | 3a 0d 0e 4c 15 dd 20 f2 |.8....B.|:..L.. .|
|00002850| 57 69 6d 70 5f 4d 65 6e | 75 43 6c 6f 73 65 0d 0e |Wimp_Men|uClose..|
|00002860| 56 1b c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |V... "Wi|mp_Creat|
|00002870| 65 4d 65 6e 75 22 2c 2d | 31 0d 0e 60 05 e1 0d 0e |eMenu",-|1..`....|
|00002880| 6a 05 3a 0d 0e 74 24 dd | 20 f2 57 69 6d 70 5f 4d |j.:..t$.| .Wimp_M|
|00002890| 65 6e 75 44 69 73 61 62 | 6c 65 28 6d 65 6e 75 25 |enuDisab|le(menu%|
|000028a0| 2c 69 74 65 6d 25 29 0d | 0e 7e 3b 6d 65 6e 75 25 |,item%).|.~;menu%|
|000028b0| 21 28 33 36 2b 28 69 74 | 65 6d 25 2d 31 29 2a 32 |!(36+(it|em%-1)*2|
|000028c0| 34 29 3d 6d 65 6e 75 25 | 21 28 33 36 2b 28 69 74 |4)=menu%|!(36+(it|
|000028d0| 65 6d 25 2d 31 29 2a 32 | 34 29 84 28 31 3c 3c 32 |em%-1)*2|4).(1<<2|
|000028e0| 32 29 0d 0e 88 05 e1 0d | 0e 92 05 3a 0d 0e 9c 27 |2)......|...:...'|
|000028f0| dd 20 f2 57 69 6d 70 5f | 4d 65 6e 75 44 6f 74 74 |. .Wimp_|MenuDott|
|00002900| 65 64 4c 69 6e 65 28 6d | 65 6e 75 25 2c 69 74 65 |edLine(m|enu%,ite|
|00002910| 6d 25 29 0d 0e a6 37 6d | 65 6e 75 25 21 28 32 38 |m%)...7m|enu%!(28|
|00002920| 2b 28 69 74 65 6d 25 2d | 31 29 2a 32 34 29 3d 28 |+(item%-|1)*24)=(|
|00002930| 6d 65 6e 75 25 21 28 32 | 38 2b 28 69 74 65 6d 25 |menu%!(2|8+(item%|
|00002940| 2d 31 29 2a 32 34 29 29 | 84 32 0d 0e b0 05 e1 0d |-1)*24))|.2......|
|00002950| 0e ba 05 3a 0d 0e c4 23 | dd 20 f2 57 69 6d 70 5f |...:...#|. .Wimp_|
|00002960| 4d 65 6e 75 45 6e 61 62 | 6c 65 28 6d 65 6e 75 25 |MenuEnab|le(menu%|
|00002970| 2c 69 74 65 6d 25 29 0d | 0e ce 22 f2 57 69 6d 70 |,item%).|..".Wimp|
|00002980| 5f 4d 65 6e 75 44 69 73 | 61 62 6c 65 28 6d 65 6e |_MenuDis|able(men|
|00002990| 75 25 2c 69 74 65 6d 25 | 29 0d 0e d8 3b 6d 65 6e |u%,item%|)...;men|
|000029a0| 75 25 21 28 33 36 2b 28 | 69 74 65 6d 25 2d 31 29 |u%!(36+(|item%-1)|
|000029b0| 2a 32 34 29 3d 6d 65 6e | 75 25 21 28 33 36 2b 28 |*24)=men|u%!(36+(|
|000029c0| 69 74 65 6d 25 2d 31 29 | 2a 32 34 29 82 28 31 3c |item%-1)|*24).(1<|
|000029d0| 3c 32 32 29 0d 0e e2 05 | e1 0d 0e ec 05 3a 0d 0e |<22)....|.....:..|
|000029e0| f6 35 dd 20 f2 57 69 6d | 70 5f 4d 65 6e 75 46 6f |.5. .Wim|p_MenuFo|
|000029f0| 72 65 67 72 6f 75 6e 64 | 43 6f 6c 6f 75 72 28 6d |reground|Colour(m|
|00002a00| 65 6e 75 25 2c 69 74 65 | 6d 25 2c 63 6f 6c 6f 75 |enu%,ite|m%,colou|
|00002a10| 72 25 29 0d 0f 00 45 6d | 65 6e 75 25 3f 28 33 39 |r%)...Em|enu%?(39|
|00002a20| 2b 28 69 74 65 6d 25 2d | 31 29 2a 32 34 29 3d 63 |+(item%-|1)*24)=c|
|00002a30| 6f 6c 6f 75 72 25 2b 31 | 36 2a 28 28 6d 65 6e 75 |olour%+1|6*((menu|
|00002a40| 25 3f 28 33 39 2b 28 69 | 74 65 6d 25 2d 31 29 2a |%?(39+(i|tem%-1)*|
|00002a50| 32 34 29 29 81 31 36 29 | 0d 0f 0a 05 e1 0d 0f 14 |24)).16)|........|
|00002a60| 05 3a 0d 0f 1e 29 dd 20 | f2 57 69 6d 70 5f 4d 65 |.:...). |.Wimp_Me|
|00002a70| 6e 75 47 6c 75 65 28 6d | 65 6e 75 31 25 2c 69 74 |nuGlue(m|enu1%,it|
|00002a80| 65 6d 25 2c 6d 65 6e 75 | 32 25 29 0d 0f 28 1e 6d |em%,menu|2%)..(.m|
|00002a90| 65 6e 75 31 25 21 28 38 | 2b 69 74 65 6d 25 2a 32 |enu1%!(8|+item%*2|
|00002aa0| 34 29 3d 6d 65 6e 75 32 | 25 0d 0f 32 05 e1 0d 0f |4)=menu2|%..2....|
|00002ab0| 3c 05 3a 0d 0f 46 27 dd | 20 f2 57 69 6d 70 5f 4d |<.:..F'.| .Wimp_M|
|00002ac0| 65 6e 75 49 74 65 6d 28 | 6d 65 6e 75 25 2c 69 74 |enuItem(|menu%,it|
|00002ad0| 65 6d 25 2c 69 74 65 6d | 24 29 0d 0f 50 2c 24 28 |em%,item|$)..P,$(|
|00002ae0| 6d 65 6e 75 25 2b 28 34 | 30 2b 28 69 74 65 6d 25 |menu%+(4|0+(item%|
|00002af0| 2d 31 29 2a 32 34 29 29 | 3d c0 69 74 65 6d 24 2c |-1)*24))|=.item$,|
|00002b00| 31 32 29 2b bd 30 0d 0f | 5a 05 e1 0d 0f 64 05 3a |12)+.0..|Z....d.:|
|00002b10| 0d 0f 6e 24 dd 20 f2 57 | 69 6d 70 5f 4d 65 6e 75 |..n$. .W|imp_Menu|
|00002b20| 4d 65 73 73 61 67 65 28 | 6d 65 6e 75 25 2c 69 74 |Message(|menu%,it|
|00002b30| 65 6d 25 29 0d 0f 78 3c | 6d 65 6e 75 25 21 28 32 |em%)..x<|menu%!(2|
|00002b40| 38 2b 28 69 74 65 6d 25 | 2d 31 29 2a 32 34 29 3d |8+(item%|-1)*24)=|
|00002b50| 28 6d 65 6e 75 25 21 28 | 32 38 2b 28 69 74 65 6d |(menu%!(|28+(item|
|00002b60| 25 2d 31 29 2a 32 34 29 | 29 82 28 31 3c 3c 33 29 |%-1)*24)|).(1<<3)|
|00002b70| 0d 0f 82 05 e1 0d 0f 8c | 05 3a 0d 0f 96 22 dd 20 |........|.:...". |
|00002b80| f2 57 69 6d 70 5f 4d 65 | 6e 75 50 6f 70 55 70 28 |.Wimp_Me|nuPopUp(|
|00002b90| 4d 65 6e 75 25 2c 78 25 | 2c 79 25 29 0d 0f a0 0f |Menu%,x%|,y%)....|
|00002ba0| 6d 65 6e 75 25 3d 4d 65 | 6e 75 25 0d 0f aa 2b c8 |menu%=Me|nu%...+.|
|00002bb0| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 4d 65 |. "Wimp_|CreateMe|
|00002bc0| 6e 75 22 2c 2c 6d 65 6e | 75 25 2c 78 25 2d 36 34 |nu",,men|u%,x%-64|
|00002bd0| 2c 79 25 2b 32 30 0d 0f | b4 05 e1 0d 0f be 05 3a |,y%+20..|.......:|
|00002be0| 0d 0f c8 1f dd 20 f2 57 | 69 6d 70 5f 4d 65 6e 75 |..... .W|imp_Menu|
|00002bf0| 50 6f 70 55 70 42 61 72 | 28 78 25 2c 79 25 29 0d |PopUpBar|(x%,y%).|
|00002c00| 0f d2 0f ea 20 6e 25 20 | 3a 20 6e 25 3d 30 0d 0f |.... n% |: n%=0..|
|00002c10| dc 2b c8 95 20 28 28 42 | 61 72 5f 4d 65 6e 75 25 |.+.. ((B|ar_Menu%|
|00002c20| 21 28 32 38 2b 6e 25 2a | 32 34 29 29 80 25 31 30 |!(28+n%*|24)).%10|
|00002c30| 30 30 30 30 30 30 29 3d | 30 0d 0f e6 09 6e 25 2b |000000)=|0....n%+|
|00002c40| 3d 31 0d 0f f0 05 ce 0d | 0f fa 32 c8 99 20 22 57 |=1......|..2.. "W|
|00002c50| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00002c60| 2c 42 61 72 5f 4d 65 6e | 75 25 2c 78 25 2d 36 34 |,Bar_Men|u%,x%-64|
|00002c70| 2c 39 36 2b 6e 25 2a 34 | 34 0d 10 04 13 6d 65 6e |,96+n%*4|4....men|
|00002c80| 75 25 3d 42 61 72 5f 4d | 65 6e 75 25 0d 10 0e 05 |u%=Bar_M|enu%....|
|00002c90| e1 0d 10 18 05 3a 0d 10 | 22 21 dd 20 f2 57 69 6d |.....:..|"!. .Wim|
|00002ca0| 70 5f 4d 65 6e 75 54 69 | 63 6b 28 6d 65 6e 75 25 |p_MenuTi|ck(menu%|
|00002cb0| 2c 69 74 65 6d 25 29 0d | 10 2c 37 6d 65 6e 75 25 |,item%).|.,7menu%|
|00002cc0| 21 28 32 38 2b 28 69 74 | 65 6d 25 2d 31 29 2a 32 |!(28+(it|em%-1)*2|
|00002cd0| 34 29 3d 28 6d 65 6e 75 | 25 21 28 32 38 2b 28 69 |4)=(menu|%!(28+(i|
|00002ce0| 74 65 6d 25 2d 31 29 2a | 32 34 29 29 82 31 0d 10 |tem%-1)*|24)).1..|
|00002cf0| 36 05 e1 0d 10 40 05 3a | 0d 10 4a 23 dd 20 f2 57 |6....@.:|..J#. .W|
|00002d00| 69 6d 70 5f 4d 65 6e 75 | 54 69 74 6c 65 28 6d 65 |imp_Menu|Title(me|
|00002d10| 6e 75 25 2c 74 69 74 6c | 65 24 29 0d 10 54 19 24 |nu%,titl|e$)..T.$|
|00002d20| 6d 65 6e 75 25 3d c0 74 | 69 74 6c 65 24 2c 31 32 |menu%=.t|itle$,12|
|00002d30| 29 2b bd 30 0d 10 5e 05 | e1 0d 10 68 05 3a 0d 10 |)+.0..^.|...h.:..|
|00002d40| 72 3d dd 20 f2 57 69 6d | 70 5f 4d 65 6e 75 57 72 |r=. .Wim|p_MenuWr|
|00002d50| 69 74 65 28 6d 65 6e 75 | 25 2c 69 74 65 6d 25 2c |ite(menu|%,item%,|
|00002d60| 62 75 66 66 65 72 25 2c | 76 61 6c 25 2c 42 75 66 |buffer%,|val%,Buf|
|00002d70| 66 65 72 4c 65 6e 67 74 | 68 25 29 0d 10 7c 37 6d |ferLengt|h%)..|7m|
|00002d80| 65 6e 75 25 21 28 32 38 | 2b 28 69 74 65 6d 25 2d |enu%!(28|+(item%-|
|00002d90| 31 29 2a 32 34 29 3d 28 | 6d 65 6e 75 25 21 28 32 |1)*24)=(|menu%!(2|
|00002da0| 38 2b 28 69 74 65 6d 25 | 2d 31 29 2a 32 34 29 29 |8+(item%|-1)*24))|
|00002db0| 84 34 0d 10 86 38 6d 65 | 6e 75 25 21 28 33 36 2b |.4...8me|nu%!(36+|
|00002dc0| 28 69 74 65 6d 25 2d 31 | 29 2a 32 34 29 3d 6d 65 |(item%-1|)*24)=me|
|00002dd0| 6e 75 25 21 28 33 36 2b | 28 69 74 65 6d 25 2d 31 |nu%!(36+|(item%-1|
|00002de0| 29 2a 32 34 29 84 26 31 | 30 30 0d 10 90 23 6d 65 |)*24).&1|00...#me|
|00002df0| 6e 75 25 21 28 34 30 2b | 28 69 74 65 6d 25 2d 31 |nu%!(40+|(item%-1|
|00002e00| 29 2a 32 34 29 3d 62 75 | 66 66 65 72 25 0d 10 9a |)*24)=bu|ffer%...|
|00002e10| 20 6d 65 6e 75 25 21 28 | 34 34 2b 28 69 74 65 6d | menu%!(|44+(item|
|00002e20| 25 2d 31 29 2a 32 34 29 | 3d 76 61 6c 25 0d 10 a4 |%-1)*24)|=val%...|
|00002e30| 29 6d 65 6e 75 25 21 28 | 34 38 2b 28 69 74 65 6d |)menu%!(|48+(item|
|00002e40| 25 2d 31 29 2a 32 34 29 | 3d 42 75 66 66 65 72 4c |%-1)*24)|=BufferL|
|00002e50| 65 6e 67 74 68 25 0d 10 | ae 05 e1 0d 10 b8 05 3a |ength%..|.......:|
|00002e60| 0d 10 c2 06 f4 7c 0d 10 | cc 06 f4 7c 0d 10 d6 06 |.....|..|...|....|
|00002e70| f4 7c 0d 10 e0 31 f4 7c | 20 20 20 20 20 20 20 20 |.|...1.|| |
|00002e80| 20 20 20 20 20 20 20 20 | 20 20 2d 2d 2d 2d 2d 2d | | ------|
|00002e90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002ea0| 2d 2d 2d 0d 10 ea 2a f4 | 7c 20 20 20 20 20 20 20 |---...*.|| |
|00002eb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002ec0| 20 20 20 34 2e a0 53 70 | 72 69 74 65 73 0d 10 f4 | 4..Sp|rites...|
|00002ed0| 31 f4 7c 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |1.| | |
|00002ee0| 20 20 20 20 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | ---|--------|
|00002ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 10 |--------|------..|
|00002f00| fe 06 f4 7c 0d 11 08 06 | f4 7c 0d 11 12 3a f4 7c |...|....|.|...:.||
|00002f10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002f20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f40| 2d 2d 2d 2d 0d 11 1c 06 | f4 7c 0d 11 26 28 f4 7c |----....|.|..&(.||
|00002f50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002f60| 20 20 20 20 20 20 50 72 | 6f 63 65 64 75 72 65 73 | Pr|ocedures|
|00002f70| 20 3a 0d 11 30 06 f4 7c | 0d 11 3a 06 f4 7c 0d 11 | :..0..||..:..|..|
|00002f80| 44 2c f4 7c 20 20 20 20 | 20 20 20 20 20 20 20 20 |D,.| | |
|00002f90| 20 20 20 20 20 20 50 52 | 4f 43 57 69 6d 70 5f 53 | PR|OCWimp_S|
|00002fa0| 70 72 69 74 65 73 4c 6f | 61 64 0d 11 4e 3a f4 7c |pritesLo|ad..N:.||
|00002fb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002fc0| 20 20 50 52 4f 43 57 69 | 6d 70 5f 53 70 72 69 74 | PROCWi|mp_Sprit|
|00002fd0| 65 73 50 61 74 68 4c 6f | 61 64 28 70 61 74 68 6e |esPathLo|ad(pathn|
|00002fe0| 61 6d 65 24 0d 11 58 06 | f4 7c 0d 11 62 06 f4 7c |ame$..X.|.|..b..||
|00002ff0| 0d 11 6c 06 f4 7c 0d 11 | 76 3a f4 7c 20 20 20 20 |..l..|..|v:.| |
|00003000| 20 20 20 20 20 20 20 20 | 20 20 20 20 2d 2d 2d 2d | | ----|
|00003010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003030| 0d 11 80 06 f4 7c 0d 11 | 8a 05 3a 0d 11 94 17 dd |.....|..|..:.....|
|00003040| 20 f2 57 69 6d 70 5f 53 | 70 72 69 74 65 73 4c 6f | .Wimp_S|pritesLo|
|00003050| 61 64 0d 11 9e 2f f2 57 | 69 6d 70 5f 53 70 72 69 |ad.../.W|imp_Spri|
|00003060| 74 65 73 50 61 74 68 4c | 6f 61 64 28 22 3c 4f 62 |tesPathL|oad("<Ob|
|00003070| 65 79 24 44 69 72 3e 2e | 53 70 72 69 74 65 73 22 |ey$Dir>.|Sprites"|
|00003080| 29 0d 11 a8 1c 64 69 72 | 65 63 74 5f 73 70 72 69 |)....dir|ect_spri|
|00003090| 74 65 73 25 3d 73 70 72 | 69 74 65 73 25 0d 11 b2 |tes%=spr|ites%...|
|000030a0| 05 e1 0d 11 bc 05 3a 0d | 11 c6 26 dd 20 f2 57 69 |......:.|..&. .Wi|
|000030b0| 6d 70 5f 53 70 72 69 74 | 65 73 50 61 74 68 4c 6f |mp_Sprit|esPathLo|
|000030c0| 61 64 28 70 61 74 68 6e | 61 6d 65 24 29 0d 11 d0 |ad(pathn|ame$)...|
|000030d0| 0a ea 53 25 2c 54 25 0d | 11 da 2c 53 25 3d 8e 22 |..S%,T%.|..,S%=."|
|000030e0| 3c 4f 62 65 79 24 44 69 | 72 3e 2e 53 70 72 69 74 |<Obey$Di|r>.Sprit|
|000030f0| 65 73 22 3a 54 25 3d a2 | 23 53 25 2b 31 36 3a d9 |es":T%=.|#S%+16:.|
|00003100| 23 53 25 0d 11 e4 19 de | 73 70 72 69 74 65 73 25 |#S%.....|sprites%|
|00003110| 54 25 2c 73 70 6e 61 6d | 65 25 31 32 0d 11 ee 1d |T%,spnam|e%12....|
|00003120| 21 73 70 72 69 74 65 73 | 25 3d 54 25 3a 73 70 72 |!sprites|%=T%:spr|
|00003130| 69 74 65 73 25 21 38 3d | 30 0d 11 f8 21 c8 99 22 |ites%!8=|0...!.."|
|00003140| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 26 31 30 |OS_Sprit|eOp",&10|
|00003150| 39 2c 73 70 72 69 74 65 | 73 25 0d 12 02 2b c8 99 |9,sprite|s%...+..|
|00003160| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 26 31 |"OS_Spri|teOp",&1|
|00003170| 30 41 2c 73 70 72 69 74 | 65 73 25 2c 70 61 74 68 |0A,sprit|es%,path|
|00003180| 6e 61 6d 65 24 0d 12 0c | 05 e1 0d 12 16 05 3a 0d |name$...|......:.|
|00003190| 12 20 06 f4 7c 0d 12 2a | 06 f4 7c 0d 12 34 06 f4 |. ..|..*|..|..4..|
|000031a0| 7c 0d 12 3e 31 f4 7c 20 | 20 20 20 20 20 20 20 20 ||..>1.| | |
|000031b0| 20 20 20 20 20 20 20 20 | 20 2d 2d 2d 2d 2d 2d 2d | | -------|
|000031c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000031d0| 2d 2d 0d 12 48 28 f4 7c | 20 20 20 20 20 20 20 20 |--..H(.|| |
|000031e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000031f0| 20 20 35 2e a0 46 69 6c | 65 73 0d 12 52 31 f4 7c | 5..Fil|es..R1.||
|00003200| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003210| 20 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | ------|--------|
|00003220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 12 5c 06 f4 |--------|---..\..|
|00003230| 7c 0d 12 66 06 f4 7c 0d | 12 70 35 f4 7c 20 20 20 ||..f..|.|.p5.| |
|00003240| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2d 2d 2d | | ---|
|00003250| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003260| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 12 7a 06 |--------|----..z.|
|00003270| f4 7c 0d 12 84 28 f4 7c | 20 20 20 20 20 20 20 20 |.|...(.|| |
|00003280| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 50 72 | | Pr|
|00003290| 6f 63 65 64 75 72 65 73 | 20 3a 0d 12 8e 06 f4 7c |ocedures| :.....||
|000032a0| 0d 12 98 06 f4 7c 0d 12 | a2 2e f4 7c 20 20 20 20 |.....|..|...| |
|000032b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 46 4e | | FN|
|000032c0| 57 69 6d 70 5f 46 69 6c | 65 54 79 70 65 28 74 79 |Wimp_Fil|eType(ty|
|000032d0| 70 65 25 29 0d 12 ac 2e | f4 7c 20 20 20 20 20 20 |pe%)....|.| |
|000032e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 46 4e 57 69 | | FNWi|
|000032f0| 6d 70 5f 47 65 74 46 69 | 6c 65 50 61 74 68 4e 61 |mp_GetFi|lePathNa|
|00003300| 6d 65 0d 12 b6 32 f4 7c | 20 20 20 20 20 20 20 20 |me...2.|| |
|00003310| 20 20 20 20 20 20 20 20 | 20 20 46 4e 57 69 6d 70 | | FNWimp|
|00003320| 5f 46 69 6c 65 4c 6f 61 | 64 28 70 61 74 68 6e 61 |_FileLoa|d(pathna|
|00003330| 6d 65 24 29 0d 12 c0 39 | f4 7c 20 20 20 20 20 20 |me$)...9|.| |
|00003340| 20 20 20 20 20 20 20 20 | 20 20 20 20 46 4e 57 69 | | FNWi|
|00003350| 6d 70 5f 47 65 74 53 74 | 72 69 6e 67 41 74 41 64 |mp_GetSt|ringAtAd|
|00003360| 64 72 65 73 73 28 61 72 | 72 61 79 25 29 0d 12 ca |dress(ar|ray%)...|
|00003370| 36 f4 7c 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |6.| | |
|00003380| 20 20 20 20 20 46 4e 57 | 69 6d 70 5f 47 65 74 46 | FNW|imp_GetF|
|00003390| 69 6c 65 46 72 6f 6d 50 | 61 74 68 6e 61 6d 65 28 |ileFromP|athname(|
|000033a0| 66 24 29 0d 12 d4 32 f4 | 7c 20 20 20 20 20 20 20 |f$)...2.|| |
|000033b0| 20 20 20 20 20 20 20 20 | 20 20 20 50 52 4f 43 57 | | PROCW|
|000033c0| 69 6d 70 5f 53 65 6e 64 | 54 6f 45 64 69 74 28 66 |imp_Send|ToEdit(f|
|000033d0| 69 6c 65 24 29 0d 12 de | 06 f4 7c 0d 12 e8 35 f4 |ile$)...|..|...5.|
|000033e0| 7c 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 || | |
|000033f0| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|00003400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003410| 0d 12 f2 06 f4 7c 0d 12 | fc 06 f4 7c 0d 13 06 06 |.....|..|...|....|
|00003420| f4 7c 0d 13 10 05 3a 0d | 13 1a 1b dd 20 a4 57 69 |.|....:.|.... .Wi|
|00003430| 6d 70 5f 46 69 6c 65 54 | 79 70 65 28 74 79 70 65 |mp_FileT|ype(type|
|00003440| 25 29 0d 13 24 0c c8 8e | 74 79 70 65 25 ca 0d 13 |%)..$...|type%...|
|00003450| 2e 11 c9 26 46 46 46 3a | 3d 22 54 65 78 74 22 0d |...&FFF:|="Text".|
|00003460| 13 38 11 c9 26 46 46 44 | 3a 3d 22 44 61 74 61 22 |.8..&FFD|:="Data"|
|00003470| 0d 13 42 12 c9 26 46 46 | 42 3a 3d 22 42 61 73 69 |..B..&FF|B:="Basi|
|00003480| 63 22 0d 13 4c 13 c9 26 | 46 46 39 3a 3d 22 53 70 |c"..L..&|FF9:="Sp|
|00003490| 72 69 74 65 22 0d 13 56 | 14 c9 26 46 45 44 3a 3d |rite"..V|..&FED:=|
|000034a0| 22 50 61 6c 65 74 74 65 | 22 0d 13 60 15 c9 26 46 |"Palette|"..`..&F|
|000034b0| 45 43 3a 3d 22 54 65 6d | 70 6c 61 74 65 22 0d 13 |EC:="Tem|plate"..|
|000034c0| 6a 11 c9 26 41 46 46 3a | 3d 22 44 72 61 77 22 0d |j..&AFF:|="Draw".|
|000034d0| 13 74 14 c9 26 31 30 30 | 30 3a 3d 22 46 6f 6c 64 |.t..&100|0:="Fold|
|000034e0| 65 72 22 0d 13 7e 19 c9 | 26 32 30 30 30 3a 3d 22 |er"..~..|&2000:="|
|000034f0| 41 70 70 6c 69 63 61 74 | 69 6f 6e 22 0d 13 88 0f |Applicat|ion"....|
|00003500| 7f 3d c3 7e 28 74 79 70 | 65 25 29 0d 13 92 05 cb |.=.~(typ|e%).....|
|00003510| 0d 13 9c 05 3a 0d 13 a6 | 1b dd 20 a4 57 69 6d 70 |....:...|.. .Wimp|
|00003520| 5f 47 65 74 46 69 6c 65 | 50 61 74 68 4e 61 6d 65 |_GetFile|PathName|
|00003530| 0d 13 b0 27 3d a4 57 69 | 6d 70 5f 47 65 74 53 74 |...'=.Wi|mp_GetSt|
|00003540| 72 69 6e 67 41 74 41 64 | 64 72 65 73 73 28 77 69 |ringAtAd|dress(wi|
|00003550| 6d 70 25 2b 34 34 29 0d | 13 ba 05 3a 0d 13 c4 1f |mp%+44).|...:....|
|00003560| dd 20 a4 57 69 6d 70 5f | 46 69 6c 65 4c 6f 61 64 |. .Wimp_|FileLoad|
|00003570| 28 70 61 74 68 6e 61 6d | 65 24 29 0d 13 ce 10 ea |(pathnam|e$).....|
|00003580| 53 25 2c 54 25 2c 66 69 | 6c 65 25 0d 13 d8 11 53 |S%,T%,fi|le%....S|
|00003590| 25 3d 8e 70 61 74 68 6e | 61 6d 65 24 0d 13 e2 0e |%=.pathn|ame$....|
|000035a0| 54 25 3d a2 23 53 25 2b | 31 36 0d 13 ec 08 d9 23 |T%=.#S%+|16.....#|
|000035b0| 53 25 0d 13 f6 0c de 66 | 69 6c 65 25 54 25 0d 14 |S%.....f|ile%T%..|
|000035c0| 00 22 ff 28 22 4c 4f 41 | 44 22 2b 70 61 74 68 6e |.".("LOA|D"+pathn|
|000035d0| 61 6d 65 24 2b 22 22 2b | c3 7e 66 69 6c 65 25 29 |ame$+""+|.~file%)|
|000035e0| 0d 14 0a 0a 3d 66 69 6c | 65 25 0d 14 14 05 3b 0d |....=fil|e%....;.|
|000035f0| 14 1e 26 dd 20 a4 57 69 | 6d 70 5f 47 65 74 53 74 |..&. .Wi|mp_GetSt|
|00003600| 72 69 6e 67 41 74 41 64 | 64 72 65 73 73 28 61 72 |ringAtAd|dress(ar|
|00003610| 72 61 79 25 29 0d 14 28 | 0d ea 73 24 3a 73 24 3d |ray%)..(|..s$:s$=|
|00003620| 22 22 0d 14 32 3c c8 95 | 28 3f 61 72 72 61 79 25 |""..2<..|(?array%|
|00003630| 3c 3e 31 33 29 80 28 3f | 61 72 72 61 79 25 3c 3e |<>13).(?|array%<>|
|00003640| 30 29 3a 73 24 2b 3d bd | 28 3f 61 72 72 61 79 25 |0):s$+=.|(?array%|
|00003650| 29 3a 61 72 72 61 79 25 | 2b 3d 31 3a ce 3a 0d 14 |):array%|+=1:.:..|
|00003660| 3c 07 3d 73 24 0d 14 46 | 05 3a 0d 14 50 23 dd 20 |<.=s$..F|.:..P#. |
|00003670| a4 57 69 6d 70 5f 47 65 | 74 46 69 6c 65 46 72 6f |.Wimp_Ge|tFileFro|
|00003680| 6d 50 61 74 68 6e 61 6d | 65 28 66 24 29 0d 14 5a |mPathnam|e(f$)..Z|
|00003690| 11 c8 8e 20 a7 66 24 2c | 22 2e 22 29 20 ca 0d 14 |... .f$,|".") ...|
|000036a0| 64 10 20 c9 20 30 20 20 | 20 20 3a 3d 66 24 0d 14 |d. . 0 | :=f$..|
|000036b0| 6e 37 20 7f 20 3a 3d a4 | 57 69 6d 70 5f 47 65 74 |n7 . :=.|Wimp_Get|
|000036c0| 46 69 6c 65 46 72 6f 6d | 50 61 74 68 6e 61 6d 65 |FileFrom|Pathname|
|000036d0| 28 c2 66 24 2c a9 28 66 | 24 29 2d a7 66 24 2c 22 |(.f$,.(f|$)-.f$,"|
|000036e0| 2e 22 29 29 29 0d 14 78 | 05 cb 0d 14 82 05 3a 0d |.")))..x|......:.|
|000036f0| 14 8c 1d dd 20 f2 57 69 | 6d 70 5f 53 65 6e 64 54 |.... .Wi|mp_SendT|
|00003700| 6f 45 64 69 74 28 66 69 | 6c 65 24 29 0d 14 96 08 |oEdit(fi|le$)....|
|00003710| ea 20 6e 25 0d 14 a0 15 | 77 69 6d 70 25 21 34 3d |. n%....|wimp%!4=|
|00003720| 26 36 43 43 30 31 43 30 | 43 0d 14 aa 0e 77 69 6d |&6CC01C0|C....wim|
|00003730| 70 25 21 31 36 3d 35 0d | 14 b4 0e 77 69 6d 70 25 |p%!16=5.|...wimp%|
|00003740| 21 33 36 3d 30 0d 14 be | 11 77 69 6d 70 25 21 34 |!36=0...|.wimp%!4|
|00003750| 30 3d 26 46 46 46 0d 14 | c8 18 24 28 77 69 6d 70 |0=&FFF..|..$(wimp|
|00003760| 25 2b 34 34 29 3d 66 69 | 6c 65 24 2b bd 30 0d 14 |%+44)=fi|le$+.0..|
|00003770| d2 10 6e 25 3d a9 66 69 | 6c 65 24 2b 34 35 0d 14 |..n%=.fi|le$+45..|
|00003780| dc 2c e7 20 6e 25 83 34 | 20 8c 20 21 77 69 6d 70 |.,. n%.4| . !wimp|
|00003790| 25 3d 34 2b 28 6e 25 3e | 3e 32 29 3c 3c 32 20 8b |%=4+(n%>|>2)<<2 .|
|000037a0| 20 21 77 69 6d 70 25 3d | 6e 25 0d 14 e6 24 c8 99 | !wimp%=|n%...$..|
|000037b0| 20 22 57 69 6d 70 5f 53 | 65 6e 64 4d 65 73 73 61 | "Wimp_S|endMessa|
|000037c0| 67 65 22 2c 31 37 2c 77 | 69 6d 70 25 2c 30 0d 14 |ge",17,w|imp%,0..|
|000037d0| f0 05 e1 0d 14 fa 05 3a | 0d 15 04 06 f4 7c 0d 15 |.......:|.....|..|
|000037e0| 0e 06 f4 7c 0d 15 18 06 | f4 7c 0d 15 22 31 f4 7c |...|....|.|.."1.||
|000037f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003800| 20 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | ------|--------|
|00003810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 15 2c 2c f4 |--------|---..,,.|
|00003820| 7c 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 || | |
|00003830| 20 20 20 20 20 20 20 35 | 2e a0 4d 69 73 63 65 6c | 5|..Miscel|
|00003840| 6c 61 6e 65 6f 75 73 0d | 15 36 31 f4 7c 20 20 20 |laneous.|.61.| |
|00003850| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2d | | -|
|00003860| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003870| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 15 40 06 f4 7c 0d 15 |--------|..@..|..|
|00003880| 4a 06 f4 7c 0d 15 54 35 | f4 7c 20 20 20 20 20 20 |J..|..T5|.| |
|00003890| 20 20 20 20 20 20 20 20 | 20 20 2d 2d 2d 2d 2d 2d | | ------|
|000038a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000038b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 15 5e 06 f4 7c 0d |--------|-..^..|.|
|000038c0| 15 68 28 f4 7c 20 20 20 | 20 20 20 20 20 20 20 20 |.h(.| | |
|000038d0| 20 20 20 20 20 20 20 20 | 20 20 20 50 72 6f 63 65 | | Proce|
|000038e0| 64 75 72 65 73 20 3a 0d | 15 72 06 f4 7c 0d 15 7c |dures :.|.r..|..||
|000038f0| 06 f4 7c 0d 15 86 31 f4 | 7c 20 20 20 20 20 20 20 |..|...1.|| |
|00003900| 20 20 20 20 20 20 20 20 | 20 20 20 50 52 4f 43 57 | | PROCW|
|00003910| 69 6d 70 5f 53 74 61 72 | 74 28 54 61 73 6b 4e 61 |imp_Star|t(TaskNa|
|00003920| 6d 65 24 29 0d 15 90 2e | f4 7c 20 20 20 20 20 20 |me$)....|.| |
|00003930| 20 20 20 20 20 20 20 20 | 20 20 20 20 46 4e 57 69 | | FNWi|
|00003940| 6d 70 5f 42 41 53 49 43 | 50 61 72 61 6d 65 74 65 |mp_BASIC|Paramete|
|00003950| 72 73 0d 15 9a 32 f4 7c | 20 20 20 20 20 20 20 20 |rs...2.|| |
|00003960| 20 20 20 20 20 20 20 20 | 20 20 50 52 4f 43 57 69 | | PROCWi|
|00003970| 6d 70 5f 53 65 74 45 76 | 65 6e 74 56 61 72 69 61 |mp_SetEv|entVaria|
|00003980| 62 6c 65 73 0d 15 a4 37 | f4 7c 20 20 20 20 20 20 |bles...7|.| |
|00003990| 20 20 20 20 20 20 20 20 | 20 20 20 20 50 52 4f 43 | | PROC|
|000039a0| 57 69 6d 70 5f 45 72 72 | 6f 72 28 74 61 73 6b 25 |Wimp_Err|or(task%|
|000039b0| 2c 54 61 73 6b 4e 61 6d | 65 24 29 0d 15 ae 2a f4 |,TaskNam|e$)...*.|
|000039c0| 7c 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 || | |
|000039d0| 20 20 20 50 52 4f 43 57 | 69 6d 70 5f 43 6c 6f 73 | PROCW|imp_Clos|
|000039e0| 65 44 6f 77 6e 0d 15 b8 | 25 f4 7c 20 20 20 20 20 |eDown...|%.| |
|000039f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 50 52 4f | | PRO|
|00003a00| 43 57 69 6d 70 5f 51 75 | 69 74 0d 15 c2 36 f4 7c |CWimp_Qu|it...6.||
|00003a10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003a20| 20 20 46 4e 57 69 6d 70 | 5f 52 65 61 64 56 61 72 | FNWimp|_ReadVar|
|00003a30| 69 61 62 6c 65 28 56 61 | 72 69 61 62 6c 65 24 29 |iable(Va|riable$)|
|00003a40| 0d 15 cc 06 f4 7c 0d 15 | d6 06 f4 7c 0d 15 e0 35 |.....|..|...|...5|
|00003a50| f4 7c 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.| | |
|00003a60| 20 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | ------|--------|
|00003a70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a80| 2d 0d 15 ea 06 f4 7c 0d | 15 f4 05 3a 0d 15 fe 2f |-.....|.|...:.../|
|00003a90| dd 20 f2 57 69 6d 70 5f | 53 74 61 72 74 28 54 61 |. .Wimp_|Start(Ta|
|00003aa0| 73 6b 4e 61 6d 65 24 2c | 77 69 6d 70 5f 6d 65 6d |skName$,|wimp_mem|
|00003ab0| 6f 72 79 25 2c 69 63 6f | 6e 25 29 0d 16 08 25 de |ory%,ico|n%)...%.|
|00003ac0| 20 77 69 6d 70 25 20 77 | 69 6d 70 5f 6d 65 6d 6f | wimp% w|imp_memo|
|00003ad0| 72 79 25 2c 69 63 6f 6e | 73 25 20 69 63 6f 6e 25 |ry%,icon|s% icon%|
|00003ae0| 0d 16 12 29 e7 20 77 69 | 6d 70 5f 6d 65 6d 6f 72 |...). wi|mp_memor|
|00003af0| 79 25 3c 32 35 36 20 8c | 20 77 69 6d 70 5f 6d 65 |y%<256 .| wimp_me|
|00003b00| 6d 6f 72 79 25 3d 32 35 | 36 0d 16 1c 1d 69 63 6f |mory%=25|6....ico|
|00003b10| 6e 5f 6d 65 6d 6f 72 79 | 25 3d 69 63 6f 6e 73 25 |n_memory|%=icons%|
|00003b20| 2b 69 63 6f 6e 25 0d 16 | 26 13 74 61 73 6b 24 3d |+icon%..|&.task$=|
|00003b30| 54 61 73 6b 4e 61 6d 65 | 24 0d 16 30 2b 69 6e 64 |TaskName|$..0+ind|
|00003b40| 69 72 65 63 74 5f 73 70 | 72 69 74 65 73 25 3d 31 |irect_sp|rites%=1|
|00003b50| 20 3a 20 64 69 72 65 63 | 74 5f 73 70 72 69 74 65 | : direc|t_sprite|
|00003b60| 73 25 3d 31 0d 16 3a 1b | f2 57 69 6d 70 5f 53 65 |s%=1..:.|.Wimp_Se|
|00003b70| 74 45 76 65 6e 74 56 61 | 72 69 61 62 6c 65 73 0d |tEventVa|riables.|
|00003b80| 16 44 15 ee 20 85 20 f2 | 57 69 6d 70 5f 45 72 72 |.D.. . .|Wimp_Err|
|00003b90| 6f 72 3a e0 0d 16 4e 40 | c8 99 22 57 69 6d 70 5f |or:...N@|.."Wimp_|
|00003ba0| 49 6e 69 74 69 61 6c 69 | 73 65 22 2c 32 30 30 2c |Initiali|se",200,|
|00003bb0| 26 34 42 35 33 34 31 35 | 34 2c 54 61 73 6b 4e 61 |&4B53415|4,TaskNa|
|00003bc0| 6d 65 24 20 b8 20 76 65 | 72 73 69 6f 6e 25 2c 74 |me$ . ve|rsion%,t|
|00003bd0| 61 73 6b 25 0d 16 58 05 | e1 0d 16 62 05 3a 0d 16 |ask%..X.|...b.:..|
|00003be0| 6c 1b dd 20 a4 57 69 6d | 70 5f 42 41 53 49 43 50 |l.. .Wim|p_BASICP|
|00003bf0| 61 72 61 6d 65 74 65 72 | 73 0d 16 76 15 20 ea 20 |arameter|s..v. . |
|00003c00| 63 6f 6d 24 2c 70 61 72 | 61 6d 24 2c 49 25 0d 16 |com$,par|am$,I%..|
|00003c10| 80 1a 20 c8 99 20 22 4f | 53 5f 47 65 74 45 6e 76 |.. .. "O|S_GetEnv|
|00003c20| 22 20 b8 20 63 6f 6d 24 | 0d 16 8a 0f 20 70 61 72 |" . com$|.... par|
|00003c30| 61 6d 73 24 3d 22 22 0d | 16 94 18 20 49 25 3d a7 |ams$="".|... I%=.|
|00003c40| 63 6f 6d 24 2c 22 20 2d | 71 75 69 74 20 22 29 0d |com$," -|quit ").|
|00003c50| 16 9e 35 20 e7 20 49 25 | 20 8c 20 70 61 72 61 6d |..5 . I%| . param|
|00003c60| 73 24 3d c1 63 6f 6d 24 | 2c a7 63 6f 6d 24 2c 22 |s$=.com$|,.com$,"|
|00003c70| 20 22 2c 49 25 2b a9 22 | 20 2d 71 75 69 74 20 22 | ",I%+."| -quit "|
|00003c80| 29 2b 31 29 0d 16 a8 0c | 3d 70 61 72 61 6d 73 24 |)+1)....|=params$|
|00003c90| 0d 16 b2 05 3a 0d 16 bc | 1d dd 20 f2 57 69 6d 70 |....:...|.. .Wimp|
|00003ca0| 5f 53 65 74 45 76 65 6e | 74 56 61 72 69 61 62 6c |_SetEven|tVariabl|
|00003cb0| 65 73 0d 16 c6 17 de 20 | 70 6f 69 6e 74 65 72 5f |es..... |pointer_|
|00003cc0| 62 6c 6f 63 6b 25 20 32 | 30 0d 16 d0 10 69 6e 74 |block% 2|0....int|
|00003cd0| 65 72 66 61 63 65 25 3d | a3 0d 16 da 2e 6e 75 6c |erface%=|.....nul|
|00003ce0| 6c 25 3d 31 20 20 3a 64 | 72 61 77 25 3d 32 20 3a |l%=1 :d|raw%=2 :|
|00003cf0| 20 20 70 6f 69 6e 74 65 | 72 5f 6c 65 61 76 69 6e | pointe|r_leavin|
|00003d00| 67 25 3d 31 3c 3c 34 0d | 16 e4 31 70 6f 69 6e 74 |g%=1<<4.|..1point|
|00003d10| 65 72 5f 65 6e 74 65 72 | 69 6e 67 25 3d 31 3c 3c |er_enter|ing%=1<<|
|00003d20| 35 3a 6d 6f 75 73 65 25 | 3d 31 3c 3c 36 3a 64 72 |5:mouse%|=1<<6:dr|
|00003d30| 61 67 25 3d 31 3c 3c 37 | 0d 16 ee 26 6b 65 79 25 |ag%=1<<7|...&key%|
|00003d40| 3d 31 3c 3c 38 3a 6d 65 | 6e 75 25 3d 31 3c 3c 39 |=1<<8:me|nu%=1<<9|
|00003d50| 3a 73 63 72 6f 6c 6c 25 | 3d 31 3c 3c 31 30 0d 16 |:scroll%|=1<<10..|
|00003d60| f8 40 6c 6f 73 65 5f 63 | 61 72 65 74 25 3d 31 3c |.@lose_c|aret%=1<|
|00003d70| 3c 31 31 3a 67 61 69 6e | 5f 63 61 72 65 74 25 3d |<11:gain|_caret%=|
|00003d80| 31 3c 3c 31 32 3a 6d 65 | 73 73 61 67 65 25 3d 28 |1<<12:me|ssage%=(|
|00003d90| 31 3c 3c 31 37 29 2b 28 | 31 3c 3c 31 38 29 0d 17 |1<<17)+(|1<<18)..|
|00003da0| 02 30 72 65 63 6f 72 64 | 65 72 25 3d 31 3c 3c 31 |.0record|er%=1<<1|
|00003db0| 38 3a 61 63 6b 6e 6f 77 | 6c 65 64 67 65 25 3d 31 |8:acknow|ledge%=1|
|00003dc0| 3c 3c 31 39 3a 77 69 6e | 64 6f 77 25 3d 30 0d 17 |<<19:win|dow%=0..|
|00003dd0| 0c 21 73 70 72 69 74 65 | 73 25 3d 31 3a 76 65 72 |.!sprite|s%=1:ver|
|00003de0| 73 69 6f 6e 25 3d 30 3a | 74 61 73 6b 25 3d 30 0d |sion%=0:|task%=0.|
|00003df0| 17 16 2a 42 61 72 5f 57 | 69 6e 64 6f 77 25 3d 2d |..*Bar_W|indow%=-|
|00003e00| 32 3a 42 61 72 5f 49 63 | 6f 6e 25 3d 30 3a 42 61 |2:Bar_Ic|on%=0:Ba|
|00003e10| 72 5f 4d 65 6e 75 25 3d | 30 0d 17 20 2a 78 5f 6f |r_Menu%=|0.. *x_o|
|00003e20| 72 69 67 69 6e 25 3d 30 | 3a 79 5f 6f 72 69 67 69 |rigin%=0|:y_origi|
|00003e30| 6e 25 3d 30 3a 53 61 76 | 65 57 69 6e 64 6f 77 25 |n%=0:Sav|eWindow%|
|00003e40| 3d 2d 33 0d 17 2a 33 6d | 65 73 73 61 67 65 5f 71 |=-3..*3m|essage_q|
|00003e50| 75 69 74 25 3d 30 3a 6d | 65 73 73 61 67 65 5f 73 |uit%=0:m|essage_s|
|00003e60| 61 76 65 25 3d 32 3a 6d | 65 73 73 61 67 65 5f 6c |ave%=2:m|essage_l|
|00003e70| 6f 61 64 25 3d 33 0d 17 | 34 21 6d 6f 75 73 65 5f |oad%=3..|4!mouse_|
|00003e80| 62 75 74 74 6f 6e 25 3d | 32 3a 73 61 76 65 5f 65 |button%=|2:save_e|
|00003e90| 76 65 6e 74 25 3d 30 0d | 17 3e 20 74 6f 70 5f 6c |vent%=0.|.> top_l|
|00003ea0| 69 6e 65 25 3d 30 20 3a | 20 62 6f 74 74 6f 6d 5f |ine%=0 :| bottom_|
|00003eb0| 6c 69 6e 65 25 3d 30 0d | 17 48 05 e1 0d 17 52 05 |line%=0.|.H....R.|
|00003ec0| 3a 0d 17 5c 11 dd 20 f2 | 57 69 6d 70 5f 45 72 72 |:..\.. .|Wimp_Err|
|00003ed0| 6f 72 0d 17 66 0a ea 58 | 24 2c 78 25 0d 17 70 09 |or..f..X|$,x%..p.|
|00003ee0| ee 20 85 20 87 0d 17 7a | 08 78 25 3d 9e 0d 17 84 |. . ...z|.x%=....|
|00003ef0| 1b 58 24 3d f6 24 2b 22 | 61 74 6c 69 6e 65 22 2b |.X$=.$+"|atline"+|
|00003f00| c3 28 78 25 81 31 30 29 | 0d 17 8e 10 de 45 72 72 |.(x%.10)|.....Err|
|00003f10| 6f 72 4d 73 67 25 33 36 | 0d 17 98 45 45 72 72 6f |orMsg%36|...EErro|
|00003f20| 72 4d 73 67 25 21 30 3d | 33 36 3a 45 72 72 6f 72 |rMsg%!0=|36:Error|
|00003f30| 4d 73 67 25 21 31 32 3d | 30 3a 45 72 72 6f 72 4d |Msg%!12=|0:ErrorM|
|00003f40| 73 67 25 21 31 36 3d 26 | 38 31 30 38 30 3a 45 72 |sg%!16=&|81080:Er|
|00003f50| 72 6f 72 4d 73 67 25 21 | 32 30 3d 78 25 0d 17 a2 |rorMsg%!|20=x%...|
|00003f60| 1f 24 28 45 72 72 6f 72 | 4d 73 67 25 2b 32 34 29 |.$(Error|Msg%+24)|
|00003f70| 3d 22 21 52 75 6e 49 6d | 61 67 65 22 0d 17 ac 25 |="!RunIm|age"...%|
|00003f80| c8 99 22 57 69 6d 70 5f | 53 65 6e 64 4d 65 73 73 |.."Wimp_|SendMess|
|00003f90| 61 67 65 22 2c 31 37 2c | 45 72 72 6f 72 4d 73 67 |age",17,|ErrorMsg|
|00003fa0| 25 0d 17 b6 1f f2 57 69 | 6d 70 5f 57 69 6e 64 6f |%.....Wi|mp_Windo|
|00003fb0| 77 41 6c 65 72 74 28 74 | 61 73 6b 24 2c 58 24 29 |wAlert(t|ask$,X$)|
|00003fc0| 0d 17 c0 13 f2 57 69 6d | 70 5f 43 6c 6f 73 65 44 |.....Wim|p_CloseD|
|00003fd0| 6f 77 6e 0d 17 ca 05 e1 | 0d 17 d4 05 3a 0d 17 de |own.....|....:...|
|00003fe0| 15 dd 20 f2 57 69 6d 70 | 5f 43 6c 6f 73 65 44 6f |.. .Wimp|_CloseDo|
|00003ff0| 77 6e 0d 17 e8 23 c8 99 | 22 57 69 6d 70 5f 43 6c |wn...#..|"Wimp_Cl|
|00004000| 6f 73 65 44 6f 77 6e 22 | 2c 74 61 73 6b 25 2c 22 |oseDown"|,task%,"|
|00004010| 54 41 53 4b 22 0d 17 f2 | 05 e1 0d 17 fc 05 3a 0d |TASK"...|......:.|
|00004020| 18 06 10 dd 20 f2 57 69 | 6d 70 5f 51 75 69 74 0d |.... .Wi|mp_Quit.|
|00004030| 18 10 0f 66 69 6e 69 73 | 68 65 64 25 3d b9 0d 18 |...finis|hed%=...|
|00004040| 1a 05 e1 0d 18 24 05 3a | 0d 18 2e 23 dd 20 a4 57 |.....$.:|...#. .W|
|00004050| 69 6d 70 5f 52 65 61 64 | 56 61 72 69 61 62 6c 65 |imp_Read|Variable|
|00004060| 28 56 61 72 69 61 62 6c | 65 24 29 0d 18 38 1b ea |(Variabl|e$)..8..|
|00004070| 6c 65 6e 25 2c 72 65 73 | 75 6c 74 25 2c 76 61 72 |len%,res|ult%,var|
|00004080| 69 61 62 6c 65 25 0d 18 | 42 14 24 77 69 6d 70 25 |iable%..|B.$wimp%|
|00004090| 3d 56 61 72 69 61 62 6c | 65 24 0d 18 4c 33 c8 99 |=Variabl|e$..L3..|
|000040a0| 22 4f 53 5f 52 65 61 64 | 56 61 72 56 61 6c 22 2c |"OS_Read|VarVal",|
|000040b0| 77 69 6d 70 25 2c 77 69 | 6d 70 25 2b 32 35 35 2c |wimp%,wi|mp%+255,|
|000040c0| 32 35 35 2c 2c 33 b8 2c | 2c 6c 65 6e 25 0d 18 56 |255,,3.,|,len%..V|
|000040d0| 17 77 69 6d 70 25 3f 28 | 6c 65 6e 25 2b 32 35 35 |.wimp%?(|len%+255|
|000040e0| 29 3d 31 33 0d 18 60 11 | 3d 24 28 77 69 6d 70 25 |)=13..`.|=$(wimp%|
|000040f0| 2b 32 35 35 29 0d 18 6a | 05 3a 0d 18 74 05 3a 0d |+255)..j|.:..t.:.|
|00004100| 18 7e 06 f4 7c 0d 18 88 | 06 f4 7c 0d 18 92 06 f4 |.~..|...|..|.....|
|00004110| 7c 0d 18 9c 06 f4 7c 0d | 18 a6 29 f4 7c 20 20 20 ||.....|.|..).| |
|00004120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004130| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004140| 0d 18 b0 27 f4 7c 20 20 | 20 20 20 20 20 20 20 20 |...'.| | |
|00004150| 20 20 20 20 20 20 20 20 | 20 20 20 57 69 6d 70 20 | | Wimp |
|00004160| 50 6f 6c 6c 69 6e 67 0d | 18 ba 29 f4 7c 20 20 20 |Polling.|..).| |
|00004170| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004190| 0d 18 c4 06 f4 7c 0d 18 | ce 06 f4 7c 0d 18 d8 05 |.....|..|...|....|
|000041a0| 3a 0d 18 e2 18 dd 20 f2 | 57 69 6d 70 5f 57 61 69 |:..... .|Wimp_Wai|
|000041b0| 74 46 6f 72 45 76 65 6e | 74 0d 18 ec 12 ea 20 6d |tForEven|t..... m|
|000041c0| 61 73 6b 25 2c 65 76 65 | 6e 74 25 0d 18 f6 0f 66 |ask%,eve|nt%....f|
|000041d0| 69 6e 69 73 68 65 64 25 | 3d a3 0d 19 00 17 6d 61 |inished%|=.....ma|
|000041e0| 73 6b 25 3d 25 31 31 31 | 30 30 30 30 31 31 30 30 |sk%=%111|00001100|
|000041f0| 31 0d 19 0a 05 f5 0d 19 | 14 27 20 c8 99 22 57 69 |1.......|.' .."Wi|
|00004200| 6d 70 5f 50 6f 6c 6c 22 | 2c 6d 61 73 6b 25 2c 77 |mp_Poll"|,mask%,w|
|00004210| 69 6d 70 25 20 b8 20 65 | 76 65 6e 74 25 0d 19 1e |imp% . e|vent%...|
|00004220| 10 20 c8 8e 20 65 76 65 | 6e 74 25 20 ca 0d 19 28 |. .. eve|nt% ...(|
|00004230| 0a 20 20 c9 30 20 3a 0d | 19 32 1f 20 20 c9 31 20 |. .0 :.|.2. .1 |
|00004240| 3a 20 f2 57 69 6d 70 5f | 50 6f 6c 6c 44 72 61 77 |: .Wimp_|PollDraw|
|00004250| 57 69 6e 64 6f 77 0d 19 | 3c 26 20 20 c9 32 20 3a |Window..|<& .2 :|
|00004260| 20 c8 99 20 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 | .. "Wim|p_OpenWi|
|00004270| 6e 64 6f 77 22 2c 2c 77 | 69 6d 70 25 0d 19 46 20 |ndow",,w|imp%..F |
|00004280| 20 20 c9 33 20 3a 20 f2 | 57 69 6d 70 5f 50 6f 6c | .3 : .|Wimp_Pol|
|00004290| 6c 43 6c 6f 73 65 57 69 | 6e 64 6f 77 0d 19 50 0a |lCloseWi|ndow..P.|
|000042a0| 20 20 c9 34 20 3a 0d 19 | 5a 0a 20 20 c9 35 20 3a | .4 :..|Z. .5 :|
|000042b0| 0d 19 64 1f 20 20 c9 36 | 20 3a 20 f2 57 69 6d 70 |..d. .6| : .Wimp|
|000042c0| 5f 50 6f 6c 6c 4d 6f 75 | 73 65 43 6c 69 63 6b 0d |_PollMou|seClick.|
|000042d0| 19 6e 20 20 20 c9 37 20 | 3a 20 f2 57 69 6d 70 5f |.n .7 |: .Wimp_|
|000042e0| 50 6f 6c 6c 53 61 76 65 | 4d 65 73 73 61 67 65 0d |PollSave|Message.|
|000042f0| 19 78 1d 20 20 c9 38 20 | 3a 20 f2 57 69 6d 70 5f |.x. .8 |: .Wimp_|
|00004300| 50 6f 6c 6c 4b 65 79 50 | 72 65 73 73 0d 19 82 23 |PollKeyP|ress...#|
|00004310| 20 20 c9 39 20 3a 20 f2 | 45 76 65 6e 74 5f 4d 65 | .9 : .|Event_Me|
|00004320| 6e 75 43 68 6f 69 63 65 | 28 6d 65 6e 75 25 29 0d |nuChoice|(menu%).|
|00004330| 19 8c 0a 20 20 c9 31 30 | 3a 0d 19 96 0a 20 20 c9 |... .10|:.... .|
|00004340| 31 31 3a 0d 19 a0 0a 20 | 20 c9 31 32 3a 0d 19 aa |11:.... | .12:...|
|00004350| 20 20 20 c9 31 37 2c 31 | 38 3a 20 f2 57 69 6d 70 | .17,1|8: .Wimp|
|00004360| 5f 50 6f 6c 6c 4d 65 73 | 73 61 67 65 73 0d 19 b4 |_PollMes|sages...|
|00004370| 0a 20 20 c9 31 39 3a 0d | 19 be 06 20 cb 0d 19 c8 |. .19:.|... ....|
|00004380| 0f fd 20 66 69 6e 69 73 | 68 65 64 25 0d 19 d2 05 |.. finis|hed%....|
|00004390| e1 0d 19 dc 05 3a 0d 19 | e6 1a dd 20 f2 57 69 6d |.....:..|... .Wim|
|000043a0| 70 5f 50 6f 6c 6c 44 72 | 61 77 57 69 6e 64 6f 77 |p_PollDr|awWindow|
|000043b0| 0d 19 f0 0b ea 20 6d 6f | 72 65 25 0d 19 fa 26 c8 |..... mo|re%...&.|
|000043c0| 99 22 57 69 6d 70 5f 52 | 65 64 72 61 77 57 69 6e |."Wimp_R|edrawWin|
|000043d0| 64 6f 77 22 2c 2c 77 69 | 6d 70 25 b8 6d 6f 72 65 |dow",,wi|mp%.more|
|000043e0| 25 0d 1a 04 13 77 69 6e | 64 6f 77 25 3d 77 69 6d |%....win|dow%=wim|
|000043f0| 70 25 21 30 0d 1a 0e 41 | 78 5f 6f 72 69 67 69 6e |p%!0...A|x_origin|
|00004400| 25 3d 31 36 2b 77 69 6d | 70 25 21 34 2d 77 69 6d |%=16+wim|p%!4-wim|
|00004410| 70 25 21 32 30 3a 79 5f | 6f 72 69 67 69 6e 25 3d |p%!20:y_|origin%=|
|00004420| 2d 31 36 2b 77 69 6d 70 | 25 21 31 36 2d 77 69 6d |-16+wimp|%!16-wim|
|00004430| 70 25 21 32 34 0d 1a 18 | 0b c8 95 6d 6f 72 65 25 |p%!24...|...more%|
|00004440| 0d 1a 22 30 20 e7 20 69 | 6e 74 65 72 66 61 63 65 |.."0 . i|nterface|
|00004450| 25 20 8c 20 c8 99 22 57 | 69 6d 70 5f 42 6f 72 64 |% . .."W|imp_Bord|
|00004460| 65 72 57 69 6e 64 6f 77 | 22 2c 2c 77 69 6d 70 25 |erWindow|",,wimp%|
|00004470| 0d 1a 2c 2d 20 f2 45 76 | 65 6e 74 5f 44 72 61 77 |..,- .Ev|ent_Draw|
|00004480| 28 77 69 6e 64 6f 77 25 | 2c 78 5f 6f 72 69 67 69 |(window%|,x_origi|
|00004490| 6e 25 2c 79 5f 6f 72 69 | 67 69 6e 25 29 0d 1a 36 |n%,y_ori|gin%)..6|
|000044a0| 27 20 c8 99 22 57 69 6d | 70 5f 47 65 74 52 65 63 |' .."Wim|p_GetRec|
|000044b0| 74 61 6e 67 6c 65 22 2c | 2c 77 69 6d 70 25 b8 6d |tangle",|,wimp%.m|
|000044c0| 6f 72 65 25 0d 1a 40 05 | ce 0d 1a 4a 05 e1 0d 1a |ore%..@.|...J....|
|000044d0| 54 05 3a 0d 1a 5e 1b dd | 20 f2 57 69 6d 70 5f 50 |T.:..^..| .Wimp_P|
|000044e0| 6f 6c 6c 43 6c 6f 73 65 | 57 69 6e 64 6f 77 0d 1a |ollClose|Window..|
|000044f0| 68 25 20 20 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |h% .. "|Wimp_Get|
|00004500| 50 6f 69 6e 74 65 72 49 | 6e 66 6f 22 2c 2c 77 69 |PointerI|nfo",,wi|
|00004510| 6d 70 25 0d 1a 72 29 20 | 20 77 69 6e 64 6f 77 25 |mp%..r) | window%|
|00004520| 3d 77 69 6d 70 25 21 31 | 32 20 3a 20 62 75 74 74 |=wimp%!1|2 : butt|
|00004530| 6f 6e 73 25 3d 77 69 6d | 70 25 21 38 0d 1a 7c 29 |ons%=wim|p%!8..|)|
|00004540| 20 f2 45 76 65 6e 74 5f | 57 69 6e 64 6f 77 43 6c | .Event_|WindowCl|
|00004550| 6f 73 65 28 77 69 6e 64 | 6f 77 25 2c 62 75 74 74 |ose(wind|ow%,butt|
|00004560| 6f 6e 73 25 29 0d 1a 86 | 32 20 21 77 69 6d 70 25 |ons%)...|2 !wimp%|
|00004570| 3d 77 69 6e 64 6f 77 25 | 20 3a 20 c8 99 20 22 57 |=window%| : .. "W|
|00004580| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00004590| 2c 2c 77 69 6d 70 25 0d | 1a 90 05 e1 0d 1a 9a 05 |,,wimp%.|........|
|000045a0| 3a 0d 1a a4 1a dd 20 f2 | 57 69 6d 70 5f 50 6f 6c |:..... .|Wimp_Pol|
|000045b0| 6c 4d 6f 75 73 65 43 6c | 69 63 6b 0d 1a ae 4a 20 |lMouseCl|ick...J |
|000045c0| 62 75 74 74 6f 6e 25 3d | 77 69 6d 70 25 21 38 3a |button%=|wimp%!8:|
|000045d0| 77 69 6e 64 6f 77 25 3d | 77 69 6d 70 25 21 31 32 |window%=|wimp%!12|
|000045e0| 3a 69 63 6f 6e 25 3d 77 | 69 6d 70 25 21 31 36 3a |:icon%=w|imp%!16:|
|000045f0| 78 25 3d 77 69 6d 70 25 | 21 30 3a 79 25 3d 77 69 |x%=wimp%|!0:y%=wi|
|00004600| 6d 70 25 21 34 0d 1a b8 | 11 20 c8 8e 20 62 75 74 |mp%!4...|. .. but|
|00004610| 74 6f 6e 25 20 ca 0d 1a | c2 22 20 20 20 c9 32 20 |ton% ...|." .2 |
|00004620| 20 20 20 3a 20 f2 57 69 | 6d 70 5f 50 6f 6c 6c 4d | : .Wi|mp_PollM|
|00004630| 65 6e 75 50 6f 70 55 70 | 0d 1a cc 23 20 20 20 7f |enuPopUp|...# .|
|00004640| 3a 20 c8 8e 20 a4 45 76 | 65 6e 74 5f 53 61 76 65 |: .. .Ev|ent_Save|
|00004650| 28 77 69 6e 64 6f 77 25 | 29 20 ca 0d 1a d6 2c 20 |(window%|) ...., |
|00004660| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 c9 20 | | . |
|00004670| b9 20 3a 20 f2 57 69 6d | 70 5f 50 6f 6c 6c 4d 6f |. : .Wim|p_PollMo|
|00004680| 75 73 65 53 61 76 65 0d | 1a e0 31 20 20 20 20 20 |useSave.|..1 |
|00004690| 20 20 20 20 20 20 20 20 | 20 20 c9 20 a3 3a 20 f2 | | . .: .|
|000046a0| 57 69 6d 70 5f 50 6f 6c | 6c 45 76 65 6e 74 4d 6f |Wimp_Pol|lEventMo|
|000046b0| 75 73 65 43 6c 69 63 6b | 0d 1a ea 13 20 20 20 20 |useClick|.... |
|000046c0| 20 20 20 20 20 20 20 20 | 20 20 cb 0d 1a f4 06 20 | | ..... |
|000046d0| cb 0d 1a fe 05 e1 0d 1b | 08 05 3a 0d 1b 12 19 dd |........|..:.....|
|000046e0| 20 f2 57 69 6d 70 5f 50 | 6f 6c 6c 4d 65 6e 75 50 | .Wimp_P|ollMenuP|
|000046f0| 6f 70 55 70 0d 1b 1c 1e | 6d 65 6e 75 25 3d a4 45 |opUp....|menu%=.E|
|00004700| 76 65 6e 74 5f 4d 65 6e | 75 28 77 69 6e 64 6f 77 |vent_Men|u(window|
|00004710| 25 29 0d 1b 26 11 20 20 | c8 8e 20 6d 65 6e 75 25 |%)..&. |.. menu%|
|00004720| 20 20 ca 0d 1b 30 0b 20 | 20 20 c9 20 a3 3a 0d 1b | ...0. | . .:..|
|00004730| 3a 0a 20 20 20 7f 20 3a | 0d 1b 44 15 20 20 20 20 |:. . :|..D. |
|00004740| 20 c8 8e 20 77 69 6e 64 | 6f 77 25 20 ca 0d 1b 4e | .. wind|ow% ...N|
|00004750| 17 20 20 20 20 20 20 c9 | 20 2d 32 20 20 20 3a 20 |. .| -2 : |
|00004760| 6e 25 3d 30 0d 1b 58 33 | 20 20 20 20 20 20 20 20 |n%=0..X3| |
|00004770| c8 95 20 28 28 42 61 72 | 5f 4d 65 6e 75 25 21 28 |.. ((Bar|_Menu%!(|
|00004780| 32 38 2b 6e 25 2a 32 34 | 29 29 80 25 31 30 30 30 |28+n%*24|)).%1000|
|00004790| 30 30 30 30 29 3d 30 0d | 1b 62 12 20 20 20 20 20 |0000)=0.|.b. |
|000047a0| 20 20 20 20 6e 25 2b 3d | 31 0d 1b 6c 0d 20 20 20 | n%+=|1..l. |
|000047b0| 20 20 20 20 20 ce 0d 1b | 76 3a 20 20 20 20 20 20 | ...|v: |
|000047c0| 20 20 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 | .. "Wi|mp_Creat|
|000047d0| 65 4d 65 6e 75 22 2c 2c | 42 61 72 5f 4d 65 6e 75 |eMenu",,|Bar_Menu|
|000047e0| 25 2c 78 25 2d 36 34 2c | 39 36 2b 6e 25 2a 34 34 |%,x%-64,|96+n%*44|
|000047f0| 0d 1b 80 34 20 20 20 20 | 20 20 7f 20 3a 20 c8 99 |...4 | . : ..|
|00004800| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00004810| 22 2c 2c 6d 65 6e 75 25 | 2c 78 25 2d 36 34 2c 79 |",,menu%|,x%-64,y|
|00004820| 25 2b 32 30 0d 1b 8a 0a | 20 20 20 20 20 cb 0d 1b |%+20....| ...|
|00004830| 94 07 20 20 cb 0d 1b 9e | 05 e1 0d 1b a8 05 3a 0d |.. ....|......:.|
|00004840| 1b b2 19 dd 20 f2 57 69 | 6d 70 5f 50 6f 6c 6c 4d |.... .Wi|mp_PollM|
|00004850| 6f 75 73 65 53 61 76 65 | 0d 1b bc 0f 20 c8 8e 20 |ouseSave|.... .. |
|00004860| 69 63 6f 6e 25 20 ca 0d | 1b c6 38 20 20 c9 20 30 |icon% ..|..8 . 0|
|00004870| 20 3a 20 e7 20 62 75 74 | 74 6f 6e 25 20 80 20 26 | : . but|ton% . &|
|00004880| 35 30 20 8c 20 f2 57 69 | 6d 70 5f 50 6f 6c 6c 44 |50 . .Wi|mp_PollD|
|00004890| 72 61 67 42 6f 78 28 77 | 69 6e 64 6f 77 25 29 0d |ragBox(w|indow%).|
|000048a0| 1b d0 38 20 20 c9 20 32 | 20 3a 20 e7 20 62 75 74 |..8 . 2| : . but|
|000048b0| 74 6f 6e 25 20 80 20 35 | 20 8c 20 20 f2 57 69 6d |ton% . 5| . .Wim|
|000048c0| 70 5f 50 6f 6c 6c 53 61 | 76 65 46 69 6c 65 28 77 |p_PollSa|veFile(w|
|000048d0| 69 6e 64 6f 77 25 29 0d | 1b da 06 20 cb 0d 1b e4 |indow%).|... ....|
|000048e0| 05 e1 0d 1b ee 05 3a 0d | 1b f8 1f dd 20 f2 57 69 |......:.|.... .Wi|
|000048f0| 6d 70 5f 50 6f 6c 6c 45 | 76 65 6e 74 4d 6f 75 73 |mp_PollE|ventMous|
|00004900| 65 43 6c 69 63 6b 0d 1c | 02 2e 20 e7 20 69 6e 74 |eClick..|.. . int|
|00004910| 65 72 66 61 63 65 25 20 | 8c 20 c8 99 22 57 69 6d |erface% |. .."Wim|
|00004920| 70 5f 42 6f 72 64 65 72 | 49 63 6f 6e 22 2c 2c 77 |p_Border|Icon",,w|
|00004930| 69 6d 70 25 0d 1c 0c 33 | 20 f2 45 76 65 6e 74 5f |imp%...3| .Event_|
|00004940| 4d 6f 75 73 65 43 6c 69 | 63 6b 28 77 69 6e 64 6f |MouseCli|ck(windo|
|00004950| 77 25 2c 69 63 6f 6e 25 | 2c 62 75 74 74 6f 6e 25 |w%,icon%|,button%|
|00004960| 2c 78 25 2c 79 25 29 0d | 1c 16 15 20 c8 8e 20 20 |,x%,y%).|... .. |
|00004970| 69 6e 74 65 72 66 61 63 | 65 25 20 ca 0d 1c 20 0b |interfac|e% ... .|
|00004980| 20 20 c9 20 b9 20 3a 0d | 1c 2a 28 20 20 20 77 69 | . . :.|.*( wi|
|00004990| 6d 70 25 21 30 3d 78 25 | 3a 77 69 6d 70 25 21 34 |mp%!0=x%|:wimp%!4|
|000049a0| 3d 79 25 20 3a 20 77 69 | 6d 70 25 21 38 3d 30 0d |=y% : wi|mp%!8=0.|
|000049b0| 1c 34 28 20 20 20 77 69 | 6d 70 25 21 31 32 3d 77 |.4( wi|mp%!12=w|
|000049c0| 69 6e 64 6f 77 25 20 3a | 20 77 69 6d 70 25 21 31 |indow% :| wimp%!1|
|000049d0| 36 3d 69 63 6f 6e 25 0d | 1c 3e 21 20 20 20 c8 99 |6=icon%.|.>! ..|
|000049e0| 22 57 69 6d 70 5f 42 6f | 72 64 65 72 49 63 6f 6e |"Wimp_Bo|rderIcon|
|000049f0| 22 2c 2c 77 69 6d 70 25 | 0d 1c 48 06 20 cb 0d 1c |",,wimp%|..H. ...|
|00004a00| 52 05 e1 0d 1c 5c 05 3a | 0d 1c 66 21 dd 20 f2 57 |R....\.:|..f!. .W|
|00004a10| 69 6d 70 5f 50 6f 6c 6c | 53 61 76 65 46 69 6c 65 |imp_Poll|SaveFile|
|00004a20| 28 77 69 6e 64 6f 77 25 | 29 0d 1c 70 0a ea 66 69 |(window%|)..p..fi|
|00004a30| 6c 65 24 0d 1c 7a 40 20 | 77 69 6d 70 25 21 30 3d |le$..z@ |wimp%!0=|
|00004a40| 77 69 6e 64 6f 77 25 20 | 3a 20 77 69 6d 70 25 21 |window% |: wimp%!|
|00004a50| 34 3d 31 20 3a 20 c8 99 | 20 22 57 69 6d 70 5f 47 |4=1 : ..| "Wimp_G|
|00004a60| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 77 69 |etIconSt|ate",,wi|
|00004a70| 6d 70 25 0d 1c 84 16 20 | 66 69 6c 65 24 3d 24 28 |mp%.... |file$=$(|
|00004a80| 77 69 6d 70 25 21 32 38 | 29 0d 1c 8e 15 20 c8 8e |wimp%!28|).... ..|
|00004a90| 20 a7 66 69 6c 65 24 2c | 22 2e 22 29 20 ca 0d 1c | .file$,|".") ...|
|00004aa0| 98 0d 20 20 c9 20 30 20 | 20 20 3a 0d 1c a2 40 20 |.. . 0 | :...@ |
|00004ab0| 20 20 24 28 77 69 6d 70 | 25 2b 34 29 3d 22 54 6f | $(wimp|%+4)="To|
|00004ac0| 20 73 61 76 65 2c 20 64 | 72 61 67 20 74 68 65 20 | save, d|rag the |
|00004ad0| 69 63 6f 6e 20 74 6f 20 | 61 20 64 69 72 65 63 74 |icon to |a direct|
|00004ae0| 6f 72 79 20 77 69 6e 64 | 6f 77 22 0d 1c ac 2b 20 |ory wind|ow"...+ |
|00004af0| 20 20 c8 99 20 22 57 69 | 6d 70 5f 52 65 70 6f 72 | .. "Wi|mp_Repor|
|00004b00| 74 45 72 72 6f 72 22 2c | 77 69 6d 70 25 2c 31 36 |tError",|wimp%,16|
|00004b10| 2c 74 61 73 6b 24 0d 1c | b6 08 20 20 7f 3a 0d 1c |,task$..|.. .:..|
|00004b20| c0 25 20 20 20 f2 45 76 | 65 6e 74 5f 53 61 76 65 |.% .Ev|ent_Save|
|00004b30| 46 69 6c 65 28 66 69 6c | 65 24 2c 77 69 6e 64 6f |File(fil|e$,windo|
|00004b40| 77 25 29 0d 1c ca 06 20 | cb 0d 1c d4 1b 20 c8 99 |w%).... |..... ..|
|00004b50| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00004b60| 22 2c 2d 31 0d 1c de 05 | e1 0d 1c e8 05 3a 0d 1c |",-1....|.....:..|
|00004b70| f2 20 dd 20 f2 57 69 6d | 70 5f 50 6f 6c 6c 44 72 |. . .Wim|p_PollDr|
|00004b80| 61 67 42 6f 78 28 77 69 | 6e 64 6f 77 25 29 0d 1c |agBox(wi|ndow%)..|
|00004b90| fc 0a ea 78 25 2c 79 25 | 0d 1d 06 12 20 73 61 76 |...x%,y%|.... sav|
|00004ba0| 65 25 3d 77 69 6e 64 6f | 77 25 0d 1d 10 13 20 21 |e%=windo|w%.... !|
|00004bb0| 77 69 6d 70 25 3d 77 69 | 6e 64 6f 77 25 0d 1d 1a |wimp%=wi|ndow%...|
|00004bc0| 23 20 c8 99 22 57 69 6d | 70 5f 47 65 74 57 69 6e |# .."Wim|p_GetWin|
|00004bd0| 64 6f 77 53 74 61 74 65 | 22 2c 2c 77 69 6d 70 25 |dowState|",,wimp%|
|00004be0| 0d 1d 24 2d 20 78 25 3d | 77 69 6d 70 25 21 34 2d |..$- x%=|wimp%!4-|
|00004bf0| 77 69 6d 70 25 21 32 30 | 3a 79 25 3d 77 69 6d 70 |wimp%!20|:y%=wimp|
|00004c00| 25 21 31 36 2d 77 69 6d | 70 25 21 32 34 0d 1d 2e |%!16-wim|p%!24...|
|00004c10| 0e 20 77 69 6d 70 25 21 | 34 3d 30 0d 1d 38 21 20 |. wimp%!|4=0..8! |
|00004c20| c8 99 22 57 69 6d 70 5f | 47 65 74 49 63 6f 6e 53 |.."Wimp_|GetIconS|
|00004c30| 74 61 74 65 22 2c 2c 77 | 69 6d 70 25 0d 1d 42 13 |tate",,w|imp%..B.|
|00004c40| 20 21 77 69 6d 70 25 3d | 77 69 6e 64 6f 77 25 0d | !wimp%=|window%.|
|00004c50| 1d 4c 0e 20 77 69 6d 70 | 25 21 34 3d 35 0d 1d 56 |.L. wimp|%!4=5..V|
|00004c60| 2c 20 77 69 6d 70 25 21 | 38 3d 78 25 2b 77 69 6d |, wimp%!|8=x%+wim|
|00004c70| 70 25 21 38 3a 77 69 6d | 70 25 21 31 32 3d 79 25 |p%!8:wim|p%!12=y%|
|00004c80| 2b 77 69 6d 70 25 21 31 | 32 0d 1d 60 2e 20 77 69 |+wimp%!1|2..`. wi|
|00004c90| 6d 70 25 21 31 36 3d 78 | 25 2b 77 69 6d 70 25 21 |mp%!16=x|%+wimp%!|
|00004ca0| 31 36 3a 77 69 6d 70 25 | 21 32 30 3d 79 25 2b 77 |16:wimp%|!20=y%+w|
|00004cb0| 69 6d 70 25 21 32 30 0d | 1d 6a 1a 20 77 69 6d 70 |imp%!20.|.j. wimp|
|00004cc0| 25 21 32 34 3d 30 3a 77 | 69 6d 70 25 21 32 38 3d |%!24=0:w|imp%!28=|
|00004cd0| 30 0d 1d 74 2a 20 77 69 | 6d 70 25 21 33 32 3d 26 |0..t* wi|mp%!32=&|
|00004ce0| 37 46 46 46 46 46 46 46 | 3a 77 69 6d 70 25 21 33 |7FFFFFFF|:wimp%!3|
|00004cf0| 36 3d 26 37 46 46 46 46 | 46 46 46 0d 1d 7e 1c 20 |6=&7FFFF|FFF..~. |
|00004d00| c8 99 22 57 69 6d 70 5f | 44 72 61 67 42 6f 78 22 |.."Wimp_|DragBox"|
|00004d10| 2c 2c 77 69 6d 70 25 0d | 1d 88 05 e1 0d 1d 92 05 |,,wimp%.|........|
|00004d20| 3a 0d 1d 9c 18 dd 20 f2 | 57 69 6d 70 5f 50 6f 6c |:..... .|Wimp_Pol|
|00004d30| 6c 4b 65 79 50 72 65 73 | 73 0d 1d a6 31 20 20 77 |lKeyPres|s...1 w|
|00004d40| 69 6e 64 6f 77 25 3d 77 | 69 6d 70 25 21 30 3a 69 |indow%=w|imp%!0:i|
|00004d50| 63 6f 6e 25 3d 77 69 6d | 70 25 21 34 3a 6b 65 79 |con%=wim|p%!4:key|
|00004d60| 25 3d 77 69 6d 70 25 21 | 32 34 0d 1d b0 1f 20 20 |%=wimp%!|24.... |
|00004d70| c8 8e 20 a4 45 76 65 6e | 74 5f 53 61 76 65 28 77 |.. .Even|t_Save(w|
|00004d80| 69 6e 64 6f 77 25 29 20 | ca 0d 1d ba 28 20 20 20 |indow%) |....( |
|00004d90| c9 20 b9 20 3a 20 f2 57 | 69 6d 70 50 6f 6c 6c 5f |. . : .W|impPoll_|
|00004da0| 53 61 76 65 46 69 6c 65 | 28 77 69 6e 64 6f 77 25 |SaveFile|(window%|
|00004db0| 29 0d 1d c4 2f 20 20 20 | c9 20 a3 3a 20 f2 45 76 |).../ |. .: .Ev|
|00004dc0| 65 6e 74 5f 4b 65 79 50 | 72 65 73 73 28 77 69 6e |ent_KeyP|ress(win|
|00004dd0| 64 6f 77 25 2c 69 63 6f | 6e 25 2c 6b 65 79 25 29 |dow%,ico|n%,key%)|
|00004de0| 0d 1d ce 07 20 20 cb 0d | 1d d8 05 e1 0d 1d e2 05 |.... ..|........|
|00004df0| 3a 0d 1d ec 1b dd 20 f2 | 57 69 6d 70 5f 50 6f 6c |:..... .|Wimp_Pol|
|00004e00| 6c 53 61 76 65 4d 65 73 | 73 61 67 65 0d 1d f6 1e |lSaveMes|sage....|
|00004e10| ea 66 69 6c 65 24 2c 77 | 69 6e 64 6f 77 25 2c 69 |.file$,w|indow%,i|
|00004e20| 63 6f 6e 25 2c 78 25 2c | 79 25 0d 1e 00 23 20 c8 |con%,x%,|y%...# .|
|00004e30| 99 22 57 69 6d 70 5f 47 | 65 74 50 6f 69 6e 74 65 |."Wimp_G|etPointe|
|00004e40| 72 49 6e 66 6f 22 2c 2c | 77 69 6d 70 25 0d 1e 0a |rInfo",,|wimp%...|
|00004e50| 3a 20 77 69 6e 64 6f 77 | 25 3d 77 69 6d 70 25 21 |: window|%=wimp%!|
|00004e60| 31 32 3a 69 63 6f 6e 25 | 3d 77 69 6d 70 25 21 31 |12:icon%|=wimp%!1|
|00004e70| 36 3a 78 25 3d 77 69 6d | 70 25 21 30 3a 79 25 3d |6:x%=wim|p%!0:y%=|
|00004e80| 77 69 6d 70 25 21 34 0d | 1e 14 3e 20 77 69 6d 70 |wimp%!4.|..> wimp|
|00004e90| 25 21 30 3d 73 61 76 65 | 25 20 3a 20 77 69 6d 70 |%!0=save|% : wimp|
|00004ea0| 25 21 34 3d 31 20 3a 20 | c8 99 20 22 57 69 6d 70 |%!4=1 : |.. "Wimp|
|00004eb0| 5f 47 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_GetIcon|State",,|
|00004ec0| 77 69 6d 70 25 0d 1e 1e | 16 20 66 69 6c 65 24 3d |wimp%...|. file$=|
|00004ed0| 24 28 77 69 6d 70 25 21 | 32 38 29 0d 1e 28 2b 20 |$(wimp%!|28)..(+ |
|00004ee0| 66 69 6c 65 24 3d a4 57 | 69 6d 70 5f 47 65 74 46 |file$=.W|imp_GetF|
|00004ef0| 69 6c 65 46 72 6f 6d 50 | 61 74 68 6e 61 6d 65 28 |ileFromP|athname(|
|00004f00| 66 69 6c 65 24 29 0d 1e | 32 15 20 77 69 6d 70 25 |file$)..|2. wimp%|
|00004f10| 21 32 30 3d 77 69 6e 64 | 6f 77 25 0d 1e 3c 13 20 |!20=wind|ow%..<. |
|00004f20| 77 69 6d 70 25 21 32 34 | 3d 69 63 6f 6e 25 0d 1e |wimp%!24|=icon%..|
|00004f30| 46 1c 20 77 69 6d 70 25 | 21 32 38 3d 78 25 3a 77 |F. wimp%|!28=x%:w|
|00004f40| 69 6d 70 25 21 33 32 3d | 79 25 0d 1e 50 15 20 77 |imp%!32=|y%..P. w|
|00004f50| 69 6d 70 25 21 33 36 3d | 6c 65 6e 67 74 68 25 0d |imp%!36=|length%.|
|00004f60| 1e 5a 0f 20 77 69 6d 70 | 25 21 30 3d 36 34 0d 1e |.Z. wimp|%!0=64..|
|00004f70| 64 0f 20 77 69 6d 70 25 | 21 31 32 3d 30 0d 1e 6e |d. wimp%|!12=0..n|
|00004f80| 0f 20 77 69 6d 70 25 21 | 31 36 3d 31 0d 1e 78 12 |. wimp%!|16=1..x.|
|00004f90| 20 77 69 6d 70 25 21 34 | 30 3d 26 46 46 46 0d 1e | wimp%!4|0=&FFF..|
|00004fa0| 82 16 20 24 28 77 69 6d | 70 25 2b 34 34 29 3d 66 |.. $(wim|p%+44)=f|
|00004fb0| 69 6c 65 24 0d 1e 8c 34 | 20 c8 99 22 57 69 6d 70 |ile$...4| .."Wimp|
|00004fc0| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 31 37 |_SendMes|sage",17|
|00004fd0| 2c 77 69 6d 70 25 2c 77 | 69 6d 70 25 21 32 30 2c |,wimp%,w|imp%!20,|
|00004fe0| 77 69 6d 70 25 21 32 34 | 0d 1e 96 05 e1 0d 1e a0 |wimp%!24|........|
|00004ff0| 05 3a 0d 1e aa 18 dd 20 | f2 57 69 6d 70 5f 50 6f |.:..... |.Wimp_Po|
|00005000| 6c 6c 4d 65 73 73 61 67 | 65 73 0d 1e b4 0b ea 20 |llMessag|es..... |
|00005010| 66 69 6c 65 24 0d 1e be | 2c 66 69 6c 65 24 3d a4 |file$...|,file$=.|
|00005020| 57 69 6d 70 5f 47 65 74 | 53 74 72 69 6e 67 41 74 |Wimp_Get|StringAt|
|00005030| 41 64 64 72 65 73 73 28 | 77 69 6d 70 25 2b 34 34 |Address(|wimp%+44|
|00005040| 29 0d 1e c8 15 20 20 20 | 20 c8 8e 20 77 69 6d 70 |).... | .. wimp|
|00005050| 25 21 31 36 20 ca 0d 1e | d2 1a 20 20 20 20 20 c9 |%!16 ...|.. .|
|00005060| 20 30 20 3a 20 66 69 6e | 69 73 68 65 64 25 3d b9 | 0 : fin|ished%=.|
|00005070| 0d 1e dc 0e 20 20 20 20 | 20 c9 20 31 20 3a 0d 1e |.... | . 1 :..|
|00005080| e6 0e 20 20 20 20 20 c9 | 20 32 20 3a 0d 1e f0 2f |.. .| 2 :.../|
|00005090| 20 20 20 20 20 20 f4 20 | 50 52 4f 43 57 69 6d 70 | . |PROCWimp|
|000050a0| 5f 49 63 6f 6e 50 75 74 | 54 65 78 74 28 73 61 76 |_IconPut|Text(sav|
|000050b0| 65 25 2c 31 2c 66 69 6c | 65 24 29 0d 1e fa 43 20 |e%,1,fil|e$)...C |
|000050c0| 20 20 20 20 20 77 69 6d | 70 25 21 30 3d 73 61 76 | wim|p%!0=sav|
|000050d0| 65 25 20 3a 20 77 69 6d | 70 25 21 34 3d 31 20 3a |e% : wim|p%!4=1 :|
|000050e0| 20 c8 99 20 22 57 69 6d | 70 5f 47 65 74 49 63 6f | .. "Wim|p_GetIco|
|000050f0| 6e 53 74 61 74 65 22 2c | 2c 77 69 6d 70 25 0d 1f |nState",|,wimp%..|
|00005100| 04 1b 20 20 20 20 20 20 | 24 28 77 69 6d 70 25 21 |.. |$(wimp%!|
|00005110| 32 38 29 3d 66 69 6c 65 | 24 0d 1f 0e 3c 20 20 20 |28)=file|$...< |
|00005120| 20 20 20 77 69 6d 70 25 | 21 30 3d 73 61 76 65 25 | wimp%|!0=save%|
|00005130| 20 3a 20 77 69 6d 70 25 | 21 34 3d 31 20 3a 20 77 | : wimp%|!4=1 : w|
|00005140| 69 6d 70 25 21 38 3d 30 | 20 3a 20 77 69 6d 70 25 |imp%!8=0| : wimp%|
|00005150| 21 31 32 3d 30 0d 1f 18 | 27 20 20 20 20 20 20 c8 |!12=0...|' .|
|00005160| 99 20 22 57 69 6d 70 5f | 53 65 74 49 63 6f 6e 53 |. "Wimp_|SetIconS|
|00005170| 74 61 74 65 22 2c 2c 77 | 69 6d 70 25 0d 1f 22 30 |tate",,w|imp%.."0|
|00005180| 20 20 20 20 20 20 f4 20 | 50 52 4f 43 57 69 6d 70 | . |PROCWimp|
|00005190| 5f 49 63 6f 6e 43 61 72 | 65 74 28 73 61 76 65 25 |_IconCar|et(save%|
|000051a0| 2c 31 2c 4c 45 4e 66 69 | 6c 65 24 29 0d 1f 2c 38 |,1,LENfi|le$)..,8|
|000051b0| 20 20 20 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 53 | ..| "Wimp_S|
|000051c0| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|000051d0| 2c 73 61 76 65 25 2c 31 | 2c 2c 2c 2d 31 2c a9 66 |,save%,1|,,,-1,.f|
|000051e0| 69 6c 65 24 0d 1f 36 26 | 20 20 20 20 20 20 f2 45 |ile$..6&| .E|
|000051f0| 76 65 6e 74 5f 53 61 76 | 65 46 69 6c 65 28 66 69 |vent_Sav|eFile(fi|
|00005200| 6c 65 24 2c 73 61 76 65 | 25 29 0d 1f 40 0c 20 20 |le$,save|%)..@. |
|00005210| 20 20 20 c9 20 33 0d 1f | 4a 47 20 20 20 20 20 20 | . 3..|JG |
|00005220| 74 79 70 65 24 3d a4 57 | 69 6d 70 5f 46 69 6c 65 |type$=.W|imp_File|
|00005230| 54 79 70 65 28 77 69 6d | 70 25 21 34 30 29 20 3a |Type(wim|p%!40) :|
|00005240| 20 f2 45 76 65 6e 74 5f | 4c 6f 61 64 46 69 6c 65 | .Event_|LoadFile|
|00005250| 28 66 69 6c 65 24 2c 74 | 79 70 65 24 29 0d 1f 54 |(file$,t|ype$)..T|
|00005260| 09 20 20 20 20 cb 0d 1f | 5e 05 e1 0d 1f 68 05 3a |. ...|^....h.:|
|00005270| 0d 1f 72 26 dd 20 a4 57 | 69 6d 70 5f 47 65 74 53 |..r&. .W|imp_GetS|
|00005280| 74 72 69 6e 67 41 74 41 | 64 64 72 65 73 73 28 61 |tringAtA|ddress(a|
|00005290| 72 72 61 79 25 29 0d 1f | 7c 0d ea 73 24 3a 73 24 |rray%)..||..s$:s$|
|000052a0| 3d 22 22 0d 1f 86 3c c8 | 95 28 3f 61 72 72 61 79 |=""...<.|.(?array|
|000052b0| 25 3c 3e 31 33 29 80 28 | 3f 61 72 72 61 79 25 3c |%<>13).(|?array%<|
|000052c0| 3e 30 29 3a 73 24 2b 3d | bd 28 3f 61 72 72 61 79 |>0):s$+=|.(?array|
|000052d0| 25 29 3a 61 72 72 61 79 | 25 2b 3d 31 3a ce 3a 0d |%):array|%+=1:.:.|
|000052e0| 1f 90 07 3d 73 24 0d 1f | 9a 05 3a 0d 1f a4 23 dd |...=s$..|..:...#.|
|000052f0| 20 a4 57 69 6d 70 5f 47 | 65 74 46 69 6c 65 46 72 | .Wimp_G|etFileFr|
|00005300| 6f 6d 50 61 74 68 6e 61 | 6d 65 28 66 24 29 0d 1f |omPathna|me(f$)..|
|00005310| ae 11 c8 8e 20 a7 66 24 | 2c 22 2e 22 29 20 ca 0d |.... .f$|,".") ..|
|00005320| 1f b8 10 20 c9 20 30 20 | 20 20 20 3a 3d 66 24 0d |... . 0 | :=f$.|
|00005330| 1f c2 37 20 7f 20 3a 3d | a4 57 69 6d 70 5f 47 65 |..7 . :=|.Wimp_Ge|
|00005340| 74 46 69 6c 65 46 72 6f | 6d 50 61 74 68 6e 61 6d |tFileFro|mPathnam|
|00005350| 65 28 c2 66 24 2c a9 28 | 66 24 29 2d a7 66 24 2c |e(.f$,.(|f$)-.f$,|
|00005360| 22 2e 22 29 29 29 0d 1f | cc 05 cb 0d 1f d6 05 3a |".")))..|.......:|
|00005370| 0d 1f e0 1b dd 20 a4 57 | 69 6d 70 5f 46 69 6c 65 |..... .W|imp_File|
|00005380| 54 79 70 65 28 74 79 70 | 65 25 29 0d 1f ea 0c c8 |Type(typ|e%).....|
|00005390| 8e 74 79 70 65 25 ca 0d | 1f f4 11 c9 26 46 46 46 |.type%..|....&FFF|
|000053a0| 3a 3d 22 54 65 78 74 22 | 0d 1f fe 11 c9 26 46 46 |:="Text"|.....&FF|
|000053b0| 44 3a 3d 22 44 61 74 61 | 22 0d 20 08 12 c9 26 46 |D:="Data|". ...&F|
|000053c0| 46 42 3a 3d 22 42 61 73 | 69 63 22 0d 20 12 13 c9 |FB:="Bas|ic". ...|
|000053d0| 26 46 46 39 3a 3d 22 53 | 70 72 69 74 65 22 0d 20 |&FF9:="S|prite". |
|000053e0| 1c 14 c9 26 46 45 44 3a | 3d 22 50 61 6c 65 74 74 |...&FED:|="Palett|
|000053f0| 65 22 0d 20 26 15 c9 26 | 46 45 43 3a 3d 22 54 65 |e". &..&|FEC:="Te|
|00005400| 6d 70 6c 61 74 65 22 0d | 20 30 11 c9 26 41 46 46 |mplate".| 0..&AFF|
|00005410| 3a 3d 22 44 72 61 77 22 | 0d 20 3a 14 c9 26 31 30 |:="Draw"|. :..&10|
|00005420| 30 30 3a 3d 22 46 6f 6c | 64 65 72 22 0d 20 44 19 |00:="Fol|der". D.|
|00005430| c9 26 32 30 30 30 3a 3d | 22 41 70 70 6c 69 63 61 |.&2000:=|"Applica|
|00005440| 74 69 6f 6e 22 0d 20 4e | 0f 7f 3d c3 7e 28 74 79 |tion". N|..=.~(ty|
|00005450| 70 65 25 29 0d 20 58 05 | cb 0d 20 62 05 3a 0d 20 |pe%). X.|.. b.:. |
|00005460| 6c 04 0d ff | |l... | |
+--------+-------------------------+-------------------------+--------+--------+
