home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / misc / unimode / patch001 / P1 / Patch / !RunImage next >
Unknown  |  1994-09-03  |  62.0 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1a f4 20 20 20 | 20 20 20 20 20 20 20 20 |..... | |
|00000010| 3e 21 52 75 6e 49 6d 61 | 67 65 0d 00 14 04 0d 00 |>!RunIma|ge......|
|00000020| 1e 27 f4 20 32 38 2d 41 | 75 67 2d 31 39 39 34 20 |.'. 28-A|ug-1994 |
|00000030| 76 32 2e 30 31 20 7b 50 | 61 74 63 68 2d 4c 65 76 |v2.01 {P|atch-Lev|
|00000040| 65 6c 20 31 7d 0d 00 28 | 23 f4 20 a9 20 31 39 39 |el 1}..(|#. . 199|
|00000050| 32 2c 39 33 2c 39 34 20 | 62 79 20 48 65 6e 64 72 |2,93,94 |by Hendr|
|00000060| 69 78 20 42 72 6f 73 2e | 0d 00 32 04 0d 00 3c 4a |ix Bros.|..2...<J|
|00000070| f4 20 27 21 52 75 6e 49 | 6d 61 67 65 27 20 73 75 |. '!RunI|mage' su|
|00000080| 70 70 6c 69 65 73 20 61 | 20 44 65 73 6b 74 6f 70 |pplies a| Desktop|
|00000090| 2d 66 72 6f 6e 74 2d 65 | 6e 64 20 74 6f 20 74 68 |-front-e|nd to th|
|000000a0| 65 20 55 6e 69 76 65 72 | 73 61 6c 4d 6f 64 65 20 |e Univer|salMode |
|000000b0| 6d 6f 64 75 6c 65 0d 00 | 46 04 0d 00 50 1f f4 20 |module..|F...P.. |
|000000c0| 54 68 69 73 20 70 72 6f | 67 72 61 6d 20 69 73 20 |This pro|gram is |
|000000d0| 50 4f 53 54 2d 57 61 72 | 65 0d 00 5a 4e f4 20 59 |POST-War|e..ZN. Y|
|000000e0| 6f 75 20 6d 61 79 20 66 | 72 65 65 6c 79 20 63 6f |ou may f|reely co|
|000000f0| 70 79 20 61 6e 64 20 75 | 73 65 20 74 68 69 73 20 |py and u|se this |
|00000100| 70 72 6f 67 72 61 6d 20 | 75 6e 64 65 72 20 74 68 |program |under th|
|00000110| 65 20 66 6f 6c 6c 6f 77 | 69 6e 67 20 63 6f 6e 64 |e follow|ing cond|
|00000120| 69 74 69 6f 6e 73 3a 0d | 00 64 4c f4 20 20 20 20 |itions:.|.dL. |
|00000130| 20 31 2e 20 54 68 65 20 | 65 6e 74 69 72 65 20 55 | 1. The |entire U|
|00000140| 6e 69 4d 6f 64 65 20 70 | 61 63 6b 61 67 65 20 69 |niMode p|ackage i|
|00000150| 73 20 6c 65 66 74 20 69 | 6e 74 61 63 74 2e 20 4e |s left i|ntact. N|
|00000160| 6f 20 63 68 61 6e 67 65 | 73 20 61 72 65 20 74 6f |o change|s are to|
|00000170| 20 62 65 0d 00 6e 35 f4 | 20 20 20 20 20 20 20 20 | be..n5.| |
|00000180| 6d 61 64 65 20 74 6f 20 | 61 6e 79 20 6f 66 20 74 |made to |any of t|
|00000190| 68 65 20 66 69 6c 65 73 | 20 69 6e 20 74 68 65 20 |he files| in the |
|000001a0| 70 61 63 6b 61 67 65 2e | 0d 00 78 2a f4 20 20 20 |package.|..x*. |
|000001b0| 20 20 32 2e 20 59 6f 75 | 20 64 6f 20 6e 6f 74 20 | 2. You| do not |
|000001c0| 73 65 6c 6c 20 74 68 69 | 73 20 70 72 6f 67 72 61 |sell thi|s progra|
|000001d0| 6d 2e 0d 00 82 3d f4 20 | 20 20 20 20 33 2e 20 59 |m....=. | 3. Y|
|000001e0| 6f 75 20 73 65 6e 64 20 | 61 20 6e 69 63 65 20 70 |ou send |a nice p|
|000001f0| 69 63 74 75 72 65 2d 70 | 6f 73 74 63 61 72 64 20 |icture-p|ostcard |
|00000200| 74 6f 20 74 68 65 20 61 | 75 74 68 6f 72 73 3a 0d |to the a|uthors:.|
|00000210| 00 8c 3d f4 20 20 20 20 | 20 20 20 20 20 20 20 20 |..=. | |
|00000220| 20 4d 61 75 72 69 63 65 | 20 48 65 6e 64 72 69 78 | Maurice| Hendrix|
|00000230| 20 20 20 20 20 20 20 20 | 20 4a 65 61 6e 2d 50 69 | | Jean-Pi|
|00000240| eb 72 72 65 20 48 65 6e | 64 72 69 78 0d 00 96 39 |.rre Hen|drix...9|
|00000250| f4 20 20 20 20 20 20 20 | 20 20 20 20 20 20 42 65 |. | Be|
|00000260| 72 67 65 69 6a 6b 73 74 | 72 61 61 74 20 31 37 20 |rgeijkst|raat 17 |
|00000270| 20 20 20 20 20 20 4b 61 | 6e 61 61 6c 73 74 72 61 | Ka|naalstra|
|00000280| 61 74 20 33 33 0d 00 a0 | 39 f4 20 20 20 20 20 20 |at 33...|9. |
|00000290| 20 20 20 20 20 20 20 35 | 30 34 33 20 42 44 20 20 | 5|043 BD |
|000002a0| 54 69 6c 62 75 72 67 20 | 20 20 20 20 20 20 20 35 |Tilburg | 5|
|000002b0| 31 30 34 20 41 41 20 20 | 44 6f 6e 67 65 6e 0d 00 |104 AA |Dongen..|
|000002c0| aa 39 f4 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.9. | |
|000002d0| 54 68 65 20 4e 65 74 68 | 65 72 4c 61 6e 64 73 20 |The Neth|erLands |
|000002e0| 20 20 20 20 20 20 20 20 | 54 68 65 20 4e 65 74 68 | |The Neth|
|000002f0| 65 72 6c 61 6e 64 73 0d | 00 b4 04 0d 00 be 0c 44 |erlands.|.......D|
|00000300| 65 62 75 67 25 3d a3 0d | 00 c8 2c ee 20 85 20 c8 |ebug%=..|..,. . .|
|00000310| 99 20 22 48 6f 75 72 67 | 6c 61 73 73 5f 53 6d 61 |. "Hourg|lass_Sma|
|00000320| 73 68 22 3a f2 4d 6f 61 | 6e 28 9f 2c f6 24 2c 9e |sh":.Moa|n(.,.$,.|
|00000330| 29 3a e0 0d 00 d2 04 0d | 00 dc 09 f2 49 6e 69 74 |):......|....Init|
|00000340| 0d 00 e6 05 f5 0d 00 f0 | 1c 20 20 20 20 f2 4d 61 |........|. .Ma|
|00000350| 69 6e 50 6f 6c 6c 28 50 | 6f 6c 6c 4d 61 73 6b 25 |inPoll(P|ollMask%|
|00000360| 29 0d 00 fa 0d fd 20 71 | 75 69 74 25 3d b9 0d 01 |)..... q|uit%=...|
|00000370| 04 10 f2 4d 65 6d 6f 72 | 79 53 74 61 74 65 0d 01 |...Memor|yState..|
|00000380| 0e 12 f4 20 50 52 4f 43 | 54 69 6d 65 72 28 32 29 |... PROC|Timer(2)|
|00000390| 0d 01 18 14 f2 44 65 62 | 75 67 28 22 42 79 65 2e |.....Deb|ug("Bye.|
|000003a0| 2e 2e 22 29 0d 01 22 1c | ff 28 22 25 55 6e 73 65 |..")..".|.("%Unse|
|000003b0| 74 20 55 6e 69 4d 6f 64 | 65 24 46 6c 61 67 22 29 |t UniMod|e$Flag")|
|000003c0| 0d 01 2c 17 c8 99 20 22 | 57 69 6d 70 5f 43 6c 6f |..,... "|Wimp_Clo|
|000003d0| 73 65 44 6f 77 6e 22 0d | 01 36 05 e0 0d 01 40 04 |seDown".|.6....@.|
|000003e0| 0d 01 4a 0f dd 20 f2 44 | 65 62 75 67 67 65 72 0d |..J.. .D|ebugger.|
|000003f0| 01 54 0e e7 20 44 65 62 | 75 67 25 20 8c 0d 01 5e |.T.. Deb|ug% ...^|
|00000400| 95 20 20 20 20 24 42 75 | 66 66 65 72 25 3d 22 25 |. $Bu|ffer%="%|
|00000410| 54 61 73 6b 57 69 6e 64 | 6f 77 20 22 2b bd 28 33 |TaskWind|ow "+.(3|
|00000420| 34 29 2b 22 42 41 53 49 | 43 20 2d 71 75 69 74 20 |4)+"BASI|C -quit |
|00000430| 3c 55 6e 69 4d 6f 64 65 | 24 44 69 72 3e 2e 55 6e |<UniMode|$Dir>.Un|
|00000440| 69 44 65 62 75 67 22 2b | bd 28 33 34 29 2b 22 20 |iDebug"+|.(34)+" |
|00000450| 2d 77 69 6d 70 73 6c 6f | 74 20 31 36 6b 20 2d 6e |-wimpslo|t 16k -n|
|00000460| 61 6d 65 20 22 2b bd 28 | 33 34 29 2b 22 55 6e 69 |ame "+.(|34)+"Uni|
|00000470| 4d 6f 64 65 20 44 65 62 | 75 67 67 65 72 22 2b bd |Mode Deb|ugger"+.|
|00000480| 28 33 34 29 2b 22 20 2d | 71 75 69 74 22 2b bd 28 |(34)+" -|quit"+.(|
|00000490| 30 29 0d 01 68 23 20 20 | 20 20 c8 99 20 22 57 69 |0)..h# | .. "Wi|
|000004a0| 6d 70 5f 53 74 61 72 74 | 54 61 73 6b 22 2c 42 75 |mp_Start|Task",Bu|
|000004b0| 66 66 65 72 25 0d 01 72 | 05 cd 0d 01 7c 05 e1 0d |ffer%..r|....|...|
|000004c0| 01 86 04 0d 01 90 10 dd | 20 f2 54 69 6d 65 72 28 |........| .Timer(|
|000004d0| 41 25 29 0d 01 9a 0b c8 | 8e 20 41 25 20 ca 0d 01 |A%).....|. A% ...|
|000004e0| a4 1f 20 20 20 20 20 20 | 20 20 c9 20 30 20 20 3a |.. | . 0 :|
|000004f0| 54 69 6d 65 72 25 2b 3d | 91 2d 54 31 25 0d 01 ae |Timer%+=|.-T1%...|
|00000500| 17 20 20 20 20 20 20 20 | 20 c9 20 31 20 20 3a 54 |. | . 1 :T|
|00000510| 31 25 3d 91 0d 01 b8 56 | 20 20 20 20 20 20 20 20 |1%=....V| |
|00000520| c9 20 32 20 20 3a f4 20 | 50 52 4f 43 44 65 62 75 |. 2 :. |PROCDebu|
|00000530| 67 28 22 41 70 70 6c 69 | 63 61 74 69 6f 6e 20 77 |g("Appli|cation w|
|00000540| 61 73 20 61 63 74 69 76 | 65 20 66 6f 72 20 22 2b |as activ|e for "+|
|00000550| 53 54 52 24 28 54 49 4d | 45 2f 31 30 30 29 2b 22 |STR$(TIM|E/100)+"|
|00000560| 20 73 65 63 6f 6e 64 73 | 22 29 0d 01 c2 8b 20 20 | seconds|").... |
|00000570| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 f4 | | .|
|00000580| 20 50 52 4f 43 44 65 62 | 75 67 28 22 41 70 70 6c | PROCDeb|ug("Appl|
|00000590| 69 63 61 74 69 6f 6e 20 | 75 73 65 64 20 22 2b 53 |ication |used "+S|
|000005a0| 54 52 24 28 54 69 6d 65 | 72 25 2f 31 30 30 29 2b |TR$(Time|r%/100)+|
|000005b0| 22 20 73 65 63 6f 6e 64 | 73 20 6f 66 20 70 72 6f |" second|s of pro|
|000005c0| 63 65 73 73 6f 72 20 74 | 69 6d 65 20 28 3d 22 2b |cessor t|ime (="+|
|000005d0| 53 54 52 24 28 49 4e 54 | 28 28 54 69 6d 65 72 25 |STR$(INT|((Timer%|
|000005e0| 2f 54 49 4d 45 29 2a 31 | 30 30 2b 2e 35 29 29 2b |/TIME)*1|00+.5))+|
|000005f0| 22 25 29 22 29 0d 01 cc | 05 cb 0d 01 d6 05 e1 0d |"%)")...|........|
|00000600| 01 e0 04 0d 01 ea 10 dd | 20 f2 44 65 62 75 67 28 |........| .Debug(|
|00000610| 41 24 29 0d 01 f4 08 ea | 20 46 25 0d 01 fe 0e e7 |A$).....| F%.....|
|00000620| 20 44 65 62 75 67 25 20 | 8c 0d 02 08 18 20 20 20 | Debug% |..... |
|00000630| 20 46 25 3d ae 22 50 69 | 70 65 3a 44 65 62 75 67 | F%=."Pi|pe:Debug|
|00000640| 22 0d 02 12 0f 20 20 20 | 20 d5 23 46 25 2c 41 24 |".... | .#F%,A$|
|00000650| 0d 02 1c 0c 20 20 20 20 | d9 23 46 25 0d 02 26 05 |.... |.#F%..&.|
|00000660| cd 0d 02 30 05 e1 0d 02 | 3a 04 0d 02 44 0b dd 20 |...0....|:...D.. |
|00000670| f2 49 6e 69 74 0d 02 4e | 08 ea 20 4d 25 0d 02 58 |.Init..N|.. M%..X|
|00000680| 15 c8 99 20 22 48 6f 75 | 72 67 6c 61 73 73 5f 4f |... "Hou|rglass_O|
|00000690| 6e 22 0d 02 62 1f c8 99 | 20 22 48 6f 75 72 67 6c |n"..b...| "Hourgl|
|000006a0| 61 73 73 5f 50 65 72 63 | 65 6e 74 61 67 65 22 2c |ass_Perc|entage",|
|000006b0| 30 0d 02 6c 30 f4 20 50 | 52 4f 43 44 65 62 75 67 |0..l0. P|ROCDebug|
|000006c0| 28 22 22 29 3a 54 49 4d | 45 3d 30 3a 54 69 6d 65 |(""):TIM|E=0:Time|
|000006d0| 72 25 3d 30 3a 50 52 4f | 43 54 69 6d 65 72 28 31 |r%=0:PRO|CTimer(1|
|000006e0| 29 0d 02 76 22 f4 20 50 | 52 4f 43 44 65 62 75 67 |)..v". P|ROCDebug|
|000006f0| 28 22 44 65 62 75 67 67 | 65 72 20 61 63 74 69 76 |("Debugg|er activ|
|00000700| 65 22 29 0d 02 80 10 f2 | 4d 65 6d 6f 72 79 53 74 |e").....|MemorySt|
|00000710| 61 74 65 0d 02 8a 3c 57 | 69 6d 70 25 3d a4 44 69 |ate...<W|imp%=.Di|
|00000720| 6d 42 6c 6f 63 6b 28 35 | 31 32 29 20 20 20 3a f4 |mBlock(5|12) :.|
|00000730| 20 62 75 66 66 65 72 20 | 66 6f 72 20 57 69 6d 70 | buffer |for Wimp|
|00000740| 2d 63 6f 6d 6d 75 6e 69 | 63 61 74 69 6f 6e 73 0d |-communi|cations.|
|00000750| 02 94 35 42 75 66 66 65 | 72 25 3d a4 44 69 6d 42 |..5Buffe|r%=.DimB|
|00000760| 6c 6f 63 6b 28 31 30 32 | 34 29 3a f4 20 62 75 66 |lock(102|4):. buf|
|00000770| 66 65 72 20 66 6f 72 20 | 69 6e 74 65 72 6e 61 6c |fer for |internal|
|00000780| 20 75 73 65 0d 02 9e 3a | 45 72 72 6f 72 25 3d a4 | use...:|Error%=.|
|00000790| 44 69 6d 42 6c 6f 63 6b | 28 32 35 36 29 20 20 3a |DimBlock|(256) :|
|000007a0| f4 20 62 75 66 66 65 72 | 20 66 6f 72 20 45 72 72 |. buffer| for Err|
|000007b0| 6f 72 20 67 65 6e 65 72 | 61 74 69 6f 6e 2e 0d 02 |or gener|ation...|
|000007c0| a8 1b c8 9b 20 22 55 6e | 69 4d 6f 64 65 3a 55 6e |.... "Un|iMode:Un|
|000007d0| 69 4d 6f 64 65 4c 69 62 | 22 0d 02 b2 1a c8 9b 20 |iModeLib|"...... |
|000007e0| 22 55 6e 69 4d 6f 64 65 | 3a 55 4d 55 73 65 72 4c |"UniMode|:UMUserL|
|000007f0| 69 62 22 0d 02 bc 1f 4d | 6f 64 65 4c 6f 61 64 24 |ib"....M|odeLoad$|
|00000800| 3d a4 5f 47 65 74 50 61 | 72 61 6d 65 74 65 72 28 |=._GetPa|rameter(|
|00000810| 30 29 0d 02 c6 20 c8 99 | 20 22 48 6f 75 72 67 6c |0)... ..| "Hourgl|
|00000820| 61 73 73 5f 50 65 72 63 | 65 6e 74 61 67 65 22 2c |ass_Perc|entage",|
|00000830| 31 30 0d 02 d0 15 f2 4c | 6f 61 64 4d 65 73 73 61 |10.....L|oadMessa|
|00000840| 67 65 46 69 6c 65 73 0d | 02 da 20 55 74 69 6c 56 |geFiles.|.. UtilV|
|00000850| 65 72 73 69 6f 6e 25 3d | a4 47 65 74 55 74 69 6c |ersion%=|.GetUtil|
|00000860| 56 65 72 73 69 6f 6e 0d | 02 e4 14 54 61 73 6b 53 |Version.|...TaskS|
|00000870| 77 69 74 63 68 69 6e 67 | 25 3d a3 0d 02 ee 2e 5f |witching|%=....._|
|00000880| 46 69 6c 65 54 79 70 65 | 25 3d 26 31 30 33 20 20 |FileType|%=&103 |
|00000890| 20 20 20 20 20 20 20 3a | f4 20 46 69 6c 65 54 79 | :|. FileTy|
|000008a0| 70 65 20 6f 66 20 4d 44 | 46 0d 02 f8 2c 5f 69 6e |pe of MD|F...,_in|
|000008b0| 74 65 72 6c 61 63 65 64 | 3d a3 20 20 20 20 20 20 |terlaced|=. |
|000008c0| 20 3a f4 20 49 6e 74 65 | 72 6c 61 63 65 20 73 75 | :. Inte|rlace su|
|000008d0| 70 70 6f 72 74 0d 03 02 | 3f 5f 62 70 70 3d 30 20 |pport...|?_bpp=0 |
|000008e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000008f0| 20 3a f4 20 44 65 66 61 | 75 6c 74 20 6e 75 6d 62 | :. Defa|ult numb|
|00000900| 65 72 20 6f 66 20 62 69 | 74 73 20 70 65 72 20 70 |er of bi|ts per p|
|00000910| 69 78 65 6c 0d 03 0c 4c | 50 69 78 25 3d a3 20 20 |ixel...L|Pix%=. |
|00000920| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a f4 20 46 | | :. F|
|00000930| 6c 61 67 73 20 70 72 65 | 73 65 6e 63 65 20 6f 66 |lags pre|sence of|
|00000940| 20 70 69 78 65 6c 72 61 | 74 65 20 69 6e 20 76 69 | pixelra|te in vi|
|00000950| 64 63 6c 69 73 74 20 76 | 65 72 73 69 6f 6e 20 32 |dclist v|ersion 2|
|00000960| 0d 03 16 41 4e 61 6d 65 | 24 3d 22 22 20 20 20 20 |...AName|$="" |
|00000970| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a f4 20 4e | | :. N|
|00000980| 61 6d 65 20 6f 66 20 76 | 61 72 69 61 62 6c 65 2f |ame of v|ariable/|
|00000990| 72 65 67 69 73 74 65 72 | 20 52 45 54 55 52 4e 65 |register| RETURNe|
|000009a0| 64 0d 03 20 42 52 6f 6d | 4d 6f 64 65 73 25 3d 34 |d.. BRom|Modes%=4|
|000009b0| 37 20 20 20 20 20 20 20 | 20 20 20 20 20 3a f4 20 |7 | :. |
|000009c0| 4e 75 6d 62 65 72 20 6f | 66 20 48 69 67 68 65 73 |Number o|f Highes|
|000009d0| 74 20 52 4f 4d 20 73 63 | 72 65 65 6e 6d 6f 64 65 |t ROM sc|reenmode|
|000009e0| 20 2b 31 0d 03 2a 0a 52 | 65 67 25 3d 30 0d 03 34 | +1..*.R|eg%=0..4|
|000009f0| 0e 46 6f 72 6d 75 6c 61 | 25 3d 30 0d 03 3e 0a 6c |.Formula|%=0..>.l|
|00000a00| 73 62 25 3d 30 0d 03 48 | 0a 6d 73 62 25 3d 30 0d |sb%=0..H|.msb%=0.|
|00000a10| 03 52 0d 53 77 69 74 63 | 68 25 3d 30 0d 03 5c 0c |.R.Switc|h%=0..\.|
|00000a20| 57 72 69 74 65 25 3d 30 | 0d 03 66 2e de 20 43 28 |Write%=0|..f.. C(|
|00000a30| 31 36 29 3a 43 28 29 3d | 30 20 20 20 20 20 20 20 |16):C()=|0 |
|00000a40| 20 20 3a f4 20 27 43 6f | 6e 73 74 61 6e 74 73 27 | :. 'Co|nstants'|
|00000a50| 20 61 72 72 61 79 0d 03 | 70 37 de 20 4d 44 46 25 | array..|p7. MDF%|
|00000a60| 20 31 30 30 30 20 20 20 | 20 20 20 20 20 20 20 20 | 1000 | |
|00000a70| 3a f4 20 4d 44 46 20 4c | 6f 61 64 69 6e 67 20 61 |:. MDF L|oading a|
|00000a80| 6e 64 20 63 6f 6d 70 69 | 6c 69 6e 67 2e 0d 03 7a |nd compi|ling...z|
|00000a90| 0d 4d 44 46 6c 65 6e 25 | 3d 30 0d 03 84 43 c8 99 |.MDFlen%|=0...C..|
|00000aa0| 20 22 4f 53 5f 4d 6f 64 | 75 6c 65 22 2c 31 38 2c | "OS_Mod|ule",18,|
|00000ab0| 22 55 6e 69 76 65 72 73 | 61 6c 4d 6f 64 65 22 20 |"Univers|alMode" |
|00000ac0| b8 20 2c 4d 6f 64 75 6c | 65 25 2c 2c 2c 4d 6f 64 |. ,Modul|e%,,,Mod|
|00000ad0| 75 6c 65 57 6f 72 6b 73 | 70 61 63 65 25 0d 03 8e |uleWorks|pace%...|
|00000ae0| 33 c8 99 20 22 4f 53 5f | 4d 6f 64 75 6c 65 22 2c |3.. "OS_|Module",|
|00000af0| 31 38 2c 22 55 74 69 6c | 69 74 79 4d 6f 64 75 6c |18,"Util|ityModul|
|00000b00| 65 22 20 b8 20 2c 2c 2c | 52 6f 6d 41 64 64 72 25 |e" . ,,,|RomAddr%|
|00000b10| 0d 03 98 29 c8 99 20 22 | 4f 53 5f 52 65 61 64 53 |...).. "|OS_ReadS|
|00000b20| 79 73 49 6e 66 6f 22 2c | 31 20 b8 20 2c 4d 6f 6e |ysInfo",|1 . ,Mon|
|00000b30| 69 74 6f 72 54 79 70 65 | 25 0d 03 a2 08 4f 6e 3d |itorType|%....On=|
|00000b40| 31 0d 03 ac 09 4f 66 66 | 3d 30 0d 03 b6 10 4f 6e |1....Off|=0....On|
|00000b50| 65 54 68 69 72 64 3d 31 | 2f 33 0d 03 c0 0f 4f 6e |eThird=1|/3....On|
|00000b60| 65 48 61 6c 66 3d 31 2f | 32 0d 03 ca 10 54 77 6f |eHalf=1/|2....Two|
|00000b70| 54 68 69 72 64 3d 32 2f | 33 0d 03 d4 10 4f 6e 65 |Third=2/|3....One|
|00000b80| 57 68 6f 6c 65 3d 31 2f | 31 0d 03 de 3a 54 61 62 |Whole=1/|1...:Tab|
|00000b90| 6c 65 42 61 73 65 25 3d | 52 6f 6d 41 64 64 72 25 |leBase%=|RomAddr%|
|00000ba0| 2b a0 28 a4 5f 4c 6f 6f | 6b 75 70 28 4f 70 74 69 |+.(._Loo|kup(Opti|
|00000bb0| 6f 6e 49 6e 66 6f 25 2c | 22 55 54 49 4c 4f 46 46 |onInfo%,|"UTILOFF|
|00000bc0| 22 29 29 0d 03 e8 3b 50 | 6f 6c 6c 4d 61 73 6b 25 |"))...;P|ollMask%|
|00000bd0| 3d 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3a |=0 | :|
|00000be0| f4 20 50 6f 6c 6c 4d 61 | 73 6b 20 70 61 73 73 65 |. PollMa|sk passe|
|00000bf0| 64 20 74 6f 20 57 69 6d | 70 5f 50 6f 6c 6c 0d 03 |d to Wim|p_Poll..|
|00000c00| f2 2d 71 75 69 74 25 3d | a3 20 20 20 20 20 20 20 |.-quit%=|. |
|00000c10| 20 20 20 20 20 20 3a f4 | 20 46 6c 61 67 73 20 66 | :.| Flags f|
|00000c20| 69 6e 61 6c 69 73 61 74 | 69 6f 6e 0d 03 fc 04 0d |inalisat|ion.....|
|00000c30| 04 06 1e f4 20 54 65 73 | 74 20 66 6f 72 20 44 72 |.... Tes|t for Dr|
|00000c40| 61 67 41 53 70 72 69 74 | 65 20 62 69 74 0d 04 10 |agASprit|e bit...|
|00000c50| 35 c8 99 20 22 4f 53 5f | 42 79 74 65 22 2c 31 36 |5.. "OS_|Byte",16|
|00000c60| 31 2c 32 38 20 b8 20 2c | 2c 4d 25 3a 53 6f 6c 69 |1,28 . ,|,M%:Soli|
|00000c70| 64 44 72 61 67 25 3d 28 | 4d 25 3e 3e 31 20 80 20 |dDrag%=(|M%>>1 . |
|00000c80| 31 29 0d 04 1a 21 f4 20 | 54 65 73 74 20 66 6f 72 |1)...!. |Test for|
|00000c90| 20 46 6f 72 63 65 41 44 | 72 61 67 20 6d 6f 64 75 | ForceAD|rag modu|
|00000ca0| 6c 65 2e 0d 04 24 3b f4 | 20 54 68 69 73 20 6d 6f |le...$;.| This mo|
|00000cb0| 64 75 6c 65 20 63 72 61 | 73 68 65 73 20 74 68 65 |dule cra|shes the|
|00000cc0| 20 61 70 70 6c 69 63 61 | 74 69 6f 6e 2e 20 52 65 | applica|tion. Re|
|00000cd0| 61 73 6f 6e 3a 20 55 6e | 6b 6e 6f 77 6e 2e 0d 04 |ason: Un|known...|
|00000ce0| 2e 20 f4 20 53 6f 2c 20 | 68 65 72 65 27 73 20 74 |. . So, |here's t|
|00000cf0| 68 65 20 77 6f 72 6b 61 | 72 6f 75 6e 64 3a 0d 04 |he worka|round:..|
|00000d00| 38 29 c8 99 20 22 58 4f | 53 5f 4d 6f 64 75 6c 65 |8).. "XO|S_Module|
|00000d10| 22 2c 31 38 2c 22 46 6f | 72 63 65 41 44 72 61 67 |",18,"Fo|rceADrag|
|00000d20| 22 20 b8 20 3b 4d 25 0d | 04 42 1f e7 20 28 4d 25 |" . ;M%.|.B.. (M%|
|00000d30| 20 80 20 31 29 3d 30 20 | 8c 20 53 6f 6c 69 64 44 | . 1)=0 |. SolidD|
|00000d40| 72 61 67 25 3d 31 0d 04 | 4c 14 e7 20 53 6f 6c 69 |rag%=1..|L.. Soli|
|00000d50| 64 44 72 61 67 25 3d 30 | 20 8c 0d 04 56 14 20 20 |dDrag%=0| ...V. |
|00000d60| 20 20 53 6f 6c 69 64 44 | 72 61 67 25 3d a3 0d 04 | SolidD|rag%=...|
|00000d70| 60 05 cc 0d 04 6a 14 20 | 20 20 20 53 6f 6c 69 64 |`....j. | Solid|
|00000d80| 44 72 61 67 25 3d b9 0d | 04 74 05 cd 0d 04 7e 26 |Drag%=..|.t....~&|
|00000d90| f4 20 4d 65 73 73 61 67 | 65 73 20 62 65 69 6e 67 |. Messag|es being|
|00000da0| 20 61 63 63 65 70 74 65 | 64 20 62 79 20 74 61 73 | accepte|d by tas|
|00000db0| 6b 3a 0d 04 88 2c 57 69 | 6d 70 25 21 30 3d 35 3a |k:...,Wi|mp%!0=5:|
|00000dc0| 57 69 6d 70 25 21 34 3d | 32 3a 57 69 6d 70 25 21 |Wimp%!4=|2:Wimp%!|
|00000dd0| 38 3d 33 3a 57 69 6d 70 | 25 21 31 32 3d 34 0d 04 |8=3:Wimp|%!12=4..|
|00000de0| 92 2b 57 69 6d 70 25 21 | 31 36 3d 31 30 3a 57 69 |.+Wimp%!|16=10:Wi|
|00000df0| 6d 70 25 21 32 30 3d 31 | 34 3a 57 69 6d 70 25 21 |mp%!20=1|4:Wimp%!|
|00000e00| 32 34 3d 26 34 30 30 43 | 30 0d 04 9c 1c 57 69 6d |24=&400C|0....Wim|
|00000e10| 70 25 21 32 38 3d 26 35 | 30 32 3a 57 69 6d 70 25 |p%!28=&5|02:Wimp%|
|00000e20| 21 33 32 3d 30 0d 04 a6 | 04 0d 04 b0 20 c8 99 20 |!32=0...|.... .. |
|00000e30| 22 48 6f 75 72 67 6c 61 | 73 73 5f 50 65 72 63 65 |"Hourgla|ss_Perce|
|00000e40| 6e 74 61 67 65 22 2c 32 | 30 0d 04 ba 1d f4 20 50 |ntage",2|0..... P|
|00000e50| 52 4f 43 44 65 62 75 67 | 28 22 49 6e 69 74 69 61 |ROCDebug|("Initia|
|00000e60| 6c 69 73 65 22 29 0d 04 | c4 7c c8 99 20 22 57 69 |lise")..|.|.. "Wi|
|00000e70| 6d 70 5f 49 6e 69 74 69 | 61 6c 69 73 65 22 2c bb |mp_Initi|alise",.|
|00000e80| 28 a4 5f 4c 6f 6f 6b 75 | 70 28 4f 70 74 69 6f 6e |(._Looku|p(Option|
|00000e90| 49 6e 66 6f 25 2c 22 55 | 54 49 4c 22 29 29 2c 26 |Info%,"U|TIL")),&|
|00000ea0| 34 42 35 33 34 31 35 34 | 2c a4 5f 4c 6f 6f 6b 75 |4B534154|,._Looku|
|00000eb0| 70 28 4d 65 73 73 61 67 | 65 49 6e 66 6f 25 2c 22 |p(Messag|eInfo%,"|
|00000ec0| 54 41 53 4b 22 29 2c 57 | 69 6d 70 25 20 b8 20 57 |TASK"),W|imp% . W|
|00000ed0| 69 6d 70 56 65 72 73 69 | 6f 6e 25 2c 54 61 73 6b |impVersi|on%,Task|
|00000ee0| 48 25 0d 04 ce 04 0d 04 | d8 4e ee 20 85 20 c8 99 |H%......|.N. . ..|
|00000ef0| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 53 6d 61 73 | "Hourgl|ass_Smas|
|00000f00| 68 22 3a f2 45 72 72 6f | 72 28 9f 2c f6 24 2b 22 |h":.Erro|r(.,.$+"|
|00000f10| 20 28 49 6e 74 65 72 6e | 61 6c 20 63 6f 64 65 3a | (Intern|al code:|
|00000f20| 20 22 2b c3 7e 9f 2b 22 | 2f 22 2b c3 9e 2b 22 29 | "+.~.+"|/"+..+")|
|00000f30| 22 29 3a e0 0d 04 e2 04 | 0d 04 ec 47 e7 20 55 74 |"):.....|...G. Ut|
|00000f40| 69 6c 56 65 72 73 69 6f | 6e 25 3c 3e bb 28 a4 5f |ilVersio|n%<>.(._|
|00000f50| 4c 6f 6f 6b 75 70 28 4f | 70 74 69 6f 6e 49 6e 66 |Lookup(O|ptionInf|
|00000f60| 6f 25 2c 22 55 54 49 4c | 22 29 29 20 8c 20 f2 45 |o%,"UTIL|")) . .E|
|00000f70| 72 72 6f 72 28 2d 32 2c | 22 45 52 52 32 22 29 0d |rror(-2,|"ERR2").|
|00000f80| 04 f6 04 0d 05 00 41 52 | 61 73 74 65 72 54 69 6d |......AR|asterTim|
|00000f90| 65 25 3d a4 44 69 6d 42 | 6c 6f 63 6b 28 33 39 32 |e%=.DimB|lock(392|
|00000fa0| 29 20 20 20 20 20 3a f4 | 20 4d 43 20 66 6f 72 20 |) :.| MC for |
|00000fb0| 63 6f 6d 70 75 74 69 6e | 67 20 72 61 73 74 65 72 |computin|g raster|
|00000fc0| 74 69 6d 65 0d 05 0a 28 | f2 5f 43 6f 6d 70 69 6c |time...(|._Compil|
|00000fd0| 65 52 61 73 74 65 72 54 | 69 6d 65 28 52 61 73 74 |eRasterT|ime(Rast|
|00000fe0| 65 72 54 69 6d 65 25 2c | 33 39 32 29 0d 05 14 1c |erTime%,|392)....|
|00000ff0| ff 28 22 25 53 65 74 20 | 55 6e 69 4d 6f 64 65 24 |.("%Set |UniMode$|
|00001000| 46 6c 61 67 20 31 22 29 | 0d 05 1e 12 f4 20 50 52 |Flag 1")|..... PR|
|00001010| 4f 43 44 65 62 75 67 67 | 65 72 0d 05 28 04 0d 05 |OCDebugg|er..(...|
|00001020| 32 1f c8 99 22 48 6f 75 | 72 67 6c 61 73 73 5f 50 |2..."Hou|rglass_P|
|00001030| 65 72 63 65 6e 74 61 67 | 65 22 2c 33 30 0d 05 3c |ercentag|e",30..<|
|00001040| 12 f2 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 73 0d |..LoadTe|mplates.|
|00001050| 05 46 11 f2 4d 61 6b 65 | 4d 65 6e 75 54 72 65 65 |.F..Make|MenuTree|
|00001060| 0d 05 50 20 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 |..P .. "|Hourglas|
|00001070| 73 5f 50 65 72 63 65 6e | 74 61 67 65 22 2c 34 30 |s_Percen|tage",40|
|00001080| 0d 05 5a 26 55 73 65 72 | 24 3d a4 5f 4c 6f 6f 6b |..Z&User|$=._Look|
|00001090| 75 70 28 4f 70 74 69 6f | 6e 49 6e 66 6f 25 2c 22 |up(Optio|nInfo%,"|
|000010a0| 55 53 45 52 22 29 0d 05 | 64 17 49 63 6f 6e 25 3d |USER")..|d.Icon%=|
|000010b0| a4 44 69 6d 42 6c 6f 63 | 6b 28 34 30 29 0d 05 6e |.DimBloc|k(40)..n|
|000010c0| 3f 49 63 6f 6e 42 61 72 | 48 25 3d a4 49 63 6f 6e |?IconBar|H%=.Icon|
|000010d0| 28 49 63 6f 6e 25 2c 2d | 31 2c 30 2c 30 2c 36 38 |(Icon%,-|1,0,0,68|
|000010e0| 2c 36 38 2c 26 33 30 31 | 41 2c 22 21 75 6e 69 6d |,68,&301|A,"!unim|
|000010f0| 6f 64 65 32 22 2c 30 2c | 30 2c 30 29 0d 05 78 20 |ode2",0,|0,0)..x |
|00001100| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 50 65 |.. "Hour|glass_Pe|
|00001110| 72 63 65 6e 74 61 67 65 | 22 2c 35 30 0d 05 82 2d |rcentage|",50...-|
|00001120| f4 20 50 52 4f 43 44 65 | 62 75 67 28 22 49 6e 69 |. PROCDe|bug("Ini|
|00001130| 74 69 61 6c 69 73 65 20 | 57 69 6e 64 6f 77 20 63 |tialise |Window c|
|00001140| 6f 6e 74 65 6e 74 73 22 | 29 0d 05 8c 13 f2 49 6e |ontents"|).....In|
|00001150| 69 74 57 69 6e 64 6f 77 | 73 28 eb 29 0d 05 96 3b |itWindow|s(.)...;|
|00001160| f2 53 65 74 57 72 69 74 | 65 61 62 6c 65 28 55 6e |.SetWrit|eable(Un|
|00001170| 69 4d 6f 64 65 48 25 2c | 30 2c a4 5f 4c 6f 6f 6b |iModeH%,|0,._Look|
|00001180| 75 70 28 4f 70 74 69 6f | 6e 49 6e 66 6f 25 2c 22 |up(Optio|nInfo%,"|
|00001190| 4d 4f 44 45 22 29 29 0d | 05 a0 1b f2 53 68 61 64 |MODE")).|....Shad|
|000011a0| 65 49 63 6f 6e 28 55 6e | 69 4d 6f 64 65 48 25 2c |eIcon(Un|iModeH%,|
|000011b0| 30 29 0d 05 aa 20 f2 46 | 6f 72 63 65 53 74 61 74 |0)... .F|orceStat|
|000011c0| 65 28 55 6e 69 4d 6f 64 | 65 48 25 2c 31 2c 4f 66 |e(UniMod|eH%,1,Of|
|000011d0| 66 29 0d 05 b4 1f f2 46 | 6f 72 63 65 53 74 61 74 |f).....F|orceStat|
|000011e0| 65 28 55 6e 69 4d 6f 64 | 65 48 25 2c 33 2c 4f 6e |e(UniMod|eH%,3,On|
|000011f0| 29 0d 05 be 20 c8 99 20 | 22 48 6f 75 72 67 6c 61 |)... .. |"Hourgla|
|00001200| 73 73 5f 50 65 72 63 65 | 6e 74 61 67 65 22 2c 37 |ss_Perce|ntage",7|
|00001210| 30 0d 05 c8 15 21 55 74 | 69 6c 52 6f 6d 3d 52 6f |0....!Ut|ilRom=Ro|
|00001220| 6d 41 64 64 72 25 0d 05 | d2 18 f2 55 70 64 61 74 |mAddr%..|...Updat|
|00001230| 65 43 6f 6e 74 72 6f 6c | 57 69 6e 64 6f 77 0d 05 |eControl|Window..|
|00001240| dc 21 c8 99 20 22 48 6f | 75 72 67 6c 61 73 73 5f |.!.. "Ho|urglass_|
|00001250| 50 65 72 63 65 6e 74 61 | 67 65 22 2c 39 30 2e 0d |Percenta|ge",90..|
|00001260| 05 e6 3d 4d 6f 64 65 4c | 6f 61 64 25 3d a3 20 20 |..=ModeL|oad%=. |
|00001270| 20 20 20 20 20 20 20 3a | f4 20 46 6c 61 67 73 20 | :|. Flags |
|00001280| 4d 44 46 20 69 6e 20 71 | 75 65 75 65 20 66 6f 72 |MDF in q|ueue for|
|00001290| 20 70 72 6f 63 65 73 73 | 69 6e 67 2e 0d 05 f0 41 | process|ing....A|
|000012a0| 43 6f 6d 70 69 6c 65 64 | 25 3d a3 20 20 20 20 20 |Compiled|%=. |
|000012b0| 20 20 20 20 3a f4 20 46 | 6c 61 67 73 20 63 6f 6e | :. F|lags con|
|000012c0| 74 65 6e 74 73 20 6f 66 | 20 77 69 6e 64 6f 77 73 |tents of| windows|
|000012d0| 20 69 73 20 63 6f 6d 70 | 69 6c 65 64 2e 0d 05 fa | is comp|iled....|
|000012e0| 30 43 61 72 65 74 5f 47 | 6f 74 74 65 6e 25 3d a3 |0Caret_G|otten%=.|
|000012f0| 20 20 20 20 20 3a f4 20 | 46 6c 61 67 73 20 63 61 | :. |Flags ca|
|00001300| 72 65 74 2d 6f 77 6e 65 | 72 73 68 69 70 0d 06 04 |ret-owne|rship...|
|00001310| 35 e7 20 4d 6f 64 65 4c | 6f 61 64 24 3c 3e 22 22 |5. ModeL|oad$<>""|
|00001320| 20 8c 20 4d 6f 64 65 4c | 6f 61 64 25 3d b9 3a f2 | . ModeL|oad%=.:.|
|00001330| 4c 6f 61 64 4d 44 46 28 | 4d 6f 64 65 4c 6f 61 64 |LoadMDF(|ModeLoad|
|00001340| 24 29 0d 06 0e 04 0d 06 | 18 37 54 61 73 6b 53 77 |$)......|.7TaskSw|
|00001350| 69 74 63 68 69 6e 67 25 | 3d a0 28 a4 5f 4c 6f 6f |itching%|=.(._Loo|
|00001360| 6b 75 70 28 4f 70 74 69 | 6f 6e 49 6e 66 6f 25 2c |kup(Opti|onInfo%,|
|00001370| 22 4d 55 4c 54 49 54 41 | 53 4b 22 29 29 0d 06 22 |"MULTITA|SK")).."|
|00001380| 11 4d 75 6c 74 69 54 61 | 73 6b 25 3d 31 30 0d 06 |.MultiTa|sk%=10..|
|00001390| 2c 21 f4 20 50 52 4f 43 | 44 65 62 75 67 28 22 49 |,!. PROC|Debug("I|
|000013a0| 6e 69 74 20 46 69 6e 61 | 6c 69 73 65 64 22 29 0d |nit Fina|lised").|
|000013b0| 06 36 10 f2 4d 65 6d 6f | 72 79 53 74 61 74 65 0d |.6..Memo|ryState.|
|000013c0| 06 40 46 f4 20 50 52 4f | 43 44 65 62 75 67 28 22 |.@F. PRO|CDebug("|
|000013d0| 54 69 6d 65 20 74 61 6b | 65 6e 20 66 6f 72 20 69 |Time tak|en for i|
|000013e0| 6e 69 74 69 61 6c 69 73 | 61 74 69 6f 6e 3a 20 22 |nitialis|ation: "|
|000013f0| 2b 53 54 52 24 28 54 49 | 4d 45 2f 31 30 30 29 2b |+STR$(TI|ME/100)+|
|00001400| 22 20 73 22 29 0d 06 4a | 16 c8 99 20 22 48 6f 75 |" s")..J|... "Hou|
|00001410| 72 67 6c 61 73 73 5f 4f | 66 66 22 0d 06 54 05 e1 |rglass_O|ff"..T..|
|00001420| 0d 06 5e 04 0d 06 68 13 | dd 20 f2 4d 61 69 6e 50 |..^...h.|. .MainP|
|00001430| 6f 6c 6c 28 4d 25 29 0d | 06 72 0b ea 20 52 25 2c |oll(M%).|.r.. R%,|
|00001440| 42 25 0d 06 7c 12 f4 20 | 50 52 4f 43 54 69 6d 65 |B%..|.. |PROCTime|
|00001450| 72 28 30 29 0d 06 86 23 | c8 99 20 22 57 69 6d 70 |r(0)...#|.. "Wimp|
|00001460| 5f 50 6f 6c 6c 22 2c 4d | 25 2c 57 69 6d 70 25 20 |_Poll",M|%,Wimp% |
|00001470| b8 20 52 25 2c 42 25 0d | 06 90 12 f4 20 50 52 4f |. R%,B%.|.... PRO|
|00001480| 43 54 69 6d 65 72 28 31 | 29 0d 06 9a 0b c8 8e 20 |CTimer(1|)...... |
|00001490| 52 25 20 ca 0d 06 a4 23 | 20 20 20 20 c9 20 30 20 |R% ....#| . 0 |
|000014a0| 20 20 20 20 20 3a 4d 25 | 3d a4 4d 75 6c 74 69 54 | :M%|=.MultiT|
|000014b0| 61 73 6b 28 4d 25 29 0d | 06 ae 23 20 20 20 20 c9 |ask(M%).|..# .|
|000014c0| 20 32 20 20 20 20 20 20 | 3a f2 4f 70 65 6e 57 69 | 2 |:.OpenWi|
|000014d0| 6e 64 6f 77 28 42 25 2c | 30 29 0d 06 b8 24 20 20 |ndow(B%,|0)...$ |
|000014e0| 20 20 c9 20 33 20 20 20 | 20 20 20 3a f2 43 6c 6f | . 3 | :.Clo|
|000014f0| 73 65 57 69 6e 64 6f 77 | 28 42 25 21 30 29 0d 06 |seWindow|(B%!0)..|
|00001500| c2 2f 20 20 20 20 c9 20 | 36 20 20 20 20 20 20 3a |./ . |6 :|
|00001510| f2 4d 6f 75 73 65 43 6c | 69 63 6b 28 42 25 21 38 |.MouseCl|ick(B%!8|
|00001520| 2c 42 25 21 31 32 2c 42 | 25 21 31 36 29 0d 06 cc |,B%!12,B|%!16)...|
|00001530| 1b 20 20 20 20 c9 20 37 | 20 20 20 20 20 20 3a f2 |. . 7| :.|
|00001540| 44 72 61 67 53 74 6f 70 | 0d 06 d6 35 20 20 20 20 |DragStop|...5 |
|00001550| c9 20 38 20 20 20 20 20 | 20 3a f2 4b 65 79 50 72 |. 8 | :.KeyPr|
|00001560| 65 73 73 28 57 69 6d 70 | 25 21 30 2c 57 69 6d 70 |ess(Wimp|%!0,Wimp|
|00001570| 25 21 34 2c 57 69 6d 70 | 25 21 32 34 29 0d 06 e0 |%!4,Wimp|%!24)...|
|00001580| 1d 20 20 20 20 c9 20 39 | 20 20 20 20 20 20 3a f2 |. . 9| :.|
|00001590| 44 65 63 6f 64 65 4d 65 | 6e 75 0d 06 ea 25 20 20 |DecodeMe|nu...% |
|000015a0| 20 20 c9 20 31 37 2c 31 | 38 20 20 3a f2 57 69 6d | . 17,1|8 :.Wim|
|000015b0| 70 4d 65 73 73 61 67 65 | 28 52 25 2c 42 25 29 0d |pMessage|(R%,B%).|
|000015c0| 06 f4 2c 20 20 20 20 7f | 20 20 20 3a 4d 25 3d a4 |.., .| :M%=.|
|000015d0| 53 6f 72 72 79 5f 77 6f | 6e 74 5f 68 61 70 70 65 |Sorry_wo|nt_happe|
|000015e0| 6e 5f 61 67 61 69 6e 28 | 52 25 29 0d 06 fe 05 cb |n_again(|R%).....|
|000015f0| 0d 07 08 05 e1 0d 07 12 | 04 0d 07 1c 22 dd 20 f2 |........|....". .|
|00001600| 57 69 6d 70 4d 65 73 73 | 61 67 65 28 52 65 61 73 |WimpMess|age(Reas|
|00001610| 6f 6e 25 2c 42 6c 6f 63 | 6b 25 29 0d 07 26 0d ea |on%,Bloc|k%)..&..|
|00001620| 20 49 25 2c 41 63 6b 25 | 0d 07 30 0a 41 63 6b 25 | I%,Ack%|..0.Ack%|
|00001630| 3d a3 0d 07 3a 2d f4 20 | 50 52 4f 43 44 65 62 75 |=...:-. |PROCDebu|
|00001640| 67 28 22 4d 65 73 73 61 | 67 65 3a 20 22 2b 53 54 |g("Messa|ge: "+ST|
|00001650| 52 24 7e 28 42 6c 6f 63 | 6b 25 21 31 36 29 29 0d |R$~(Bloc|k%!16)).|
|00001660| 07 44 12 c8 8e 20 42 6c | 6f 63 6b 25 21 31 36 20 |.D... Bl|ock%!16 |
|00001670| ca 0d 07 4e 18 20 20 20 | 20 c9 20 30 20 20 20 20 |...N. | . 0 |
|00001680| 20 3a 71 75 69 74 25 3d | b9 0d 07 58 3a 20 20 20 | :quit%=|...X: |
|00001690| 20 c9 20 32 20 20 20 20 | 20 3a f2 44 61 74 61 53 | . 2 | :.DataS|
|000016a0| 61 76 65 28 42 6c 6f 63 | 6b 25 21 34 30 2c a4 5f |ave(Bloc|k%!40,._|
|000016b0| 53 74 72 69 6e 67 30 28 | 42 6c 6f 63 6b 25 2b 34 |String0(|Block%+4|
|000016c0| 34 29 29 0d 07 62 22 20 | 20 20 20 c9 20 33 20 20 |4))..b" | . 3 |
|000016d0| 20 20 20 3a f2 44 61 74 | 61 4c 6f 61 64 28 42 6c | :.Dat|aLoad(Bl|
|000016e0| 6f 63 6b 25 29 0d 07 6c | 29 20 20 20 20 c9 20 34 |ock%)..l|) . 4|
|000016f0| 20 20 20 20 20 3a c8 99 | 20 22 57 69 6d 70 5f 43 | :..| "Wimp_C|
|00001700| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 2d 31 0d 07 |reateMen|u",,-1..|
|00001710| 76 22 20 20 20 20 c9 20 | 35 20 20 20 20 20 3a f2 |v" . |5 :.|
|00001720| 44 61 74 61 4c 6f 61 64 | 28 42 6c 6f 63 6b 25 29 |DataLoad|(Block%)|
|00001730| 0d 07 80 3d 20 20 20 20 | c9 20 26 41 20 20 20 20 |...= |. &A |
|00001740| 3a f2 53 61 76 65 44 65 | 73 6b 74 6f 70 28 42 6c |:.SaveDe|sktop(Bl|
|00001750| 6f 63 6b 25 21 32 30 2c | 42 6c 6f 63 6b 25 21 32 |ock%!20,|Block%!2|
|00001760| 34 29 3a 52 65 61 73 6f | 6e 25 3d 31 37 0d 07 8a |4):Reaso|n%=17...|
|00001770| 22 20 20 20 20 c9 20 26 | 35 30 32 20 20 3a f2 48 |" . &|502 :.H|
|00001780| 65 6c 70 55 73 65 72 28 | 42 6c 6f 63 6b 25 29 0d |elpUser(|Block%).|
|00001790| 07 94 1f 20 20 20 20 c9 | 20 26 34 30 30 43 30 3a |... .| &400C0:|
|000017a0| c8 8e 20 42 6c 6f 63 6b | 25 21 33 32 20 ca 0d 07 |.. Block|%!32 ...|
|000017b0| 9e 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.0 | |
|000017c0| 20 20 20 20 20 20 c9 20 | 34 3a 20 f2 55 70 64 61 | . |4: .Upda|
|000017d0| 74 65 45 6e 68 61 6e 63 | 65 72 4d 65 6e 75 0d 07 |teEnhanc|erMenu..|
|000017e0| a8 2b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.+ | |
|000017f0| 20 20 20 20 20 20 c9 20 | 32 3a 20 c8 8e 20 42 6c | . |2: .. Bl|
|00001800| 6f 63 6b 25 21 33 36 20 | ca 0d 07 b2 57 20 20 20 |ock%!36 |....W |
|00001810| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001820| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 c9 20 30 | | . 0|
|00001830| 3a 20 f2 53 65 74 57 72 | 69 74 65 61 62 6c 65 28 |: .SetWr|iteable(|
|00001840| 44 69 61 6c 6f 67 48 25 | 2c 32 2c 22 66 69 6c 65 |DialogH%|,2,"file|
|00001850| 5f 22 2b c3 7e 5f 46 69 | 6c 65 54 79 70 65 25 29 |_"+.~_Fi|leType%)|
|00001860| 0d 07 bc 50 20 20 20 20 | 20 20 20 20 20 20 20 20 |...P | |
|00001870| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001880| 20 20 20 20 20 20 20 20 | 20 20 20 20 f2 53 65 74 | | .Set|
|00001890| 57 72 69 74 65 61 62 6c | 65 28 44 69 61 6c 6f 67 |Writeabl|e(Dialog|
|000018a0| 48 25 2c 31 2c 22 4d 44 | 46 5f 46 69 6c 65 22 29 |H%,1,"MD|F_File")|
|000018b0| 0d 07 c6 4d 20 20 20 20 | 20 20 20 20 20 20 20 20 |...M | |
|000018c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000018d0| 20 20 20 20 c9 20 31 3a | 20 f2 53 65 74 57 72 69 | . 1:| .SetWri|
|000018e0| 74 65 61 62 6c 65 28 44 | 69 61 6c 6f 67 48 25 2c |teable(D|ialogH%,|
|000018f0| 32 2c 22 66 69 6c 65 5f | 66 66 66 22 29 0d 07 d0 |2,"file_|fff")...|
|00001900| 52 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |R | |
|00001910| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001920| 20 20 20 20 20 20 20 20 | 20 f2 53 65 74 57 72 69 | | .SetWri|
|00001930| 74 65 61 62 6c 65 28 44 | 69 61 6c 6f 67 48 25 2c |teable(D|ialogH%,|
|00001940| 31 2c 22 53 63 72 69 70 | 74 46 69 6c 65 22 29 0d |1,"Scrip|tFile").|
|00001950| 07 da 25 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..% | |
|00001960| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001970| 20 20 20 cb 0d 07 e4 15 | 20 20 20 20 20 20 20 20 | .....| |
|00001980| 20 20 20 20 20 20 20 20 | cb 0d 07 ee 4a 20 20 20 | |....J |
|00001990| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 c8 99 20 | | .. |
|000019a0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 53 75 62 4d |"Wimp_Cr|eateSubM|
|000019b0| 65 6e 75 22 2c 2c 42 6c | 6f 63 6b 25 21 32 30 2c |enu",,Bl|ock%!20,|
|000019c0| 42 6c 6f 63 6b 25 21 32 | 34 2c 42 6c 6f 63 6b 25 |Block%!2|4,Block%|
|000019d0| 21 32 38 0d 07 f8 7a 20 | 20 20 20 20 7f 20 3a f4 |!28...z | . :.|
|000019e0| 20 50 52 4f 43 44 65 62 | 75 67 28 22 2a 2a 2a 20 | PROCDeb|ug("*** |
|000019f0| 57 41 52 4e 49 4e 47 20 | 2a 2a 2a 20 2a 2a 2a 55 |WARNING |*** ***U|
|00001a00| 6e 73 75 70 70 6f 72 74 | 65 64 20 4d 65 73 73 61 |nsupport|ed Messa|
|00001a10| 67 65 20 69 6e 20 57 69 | 6d 70 5f 49 6e 69 74 69 |ge in Wi|mp_Initi|
|00001a20| 61 6c 69 73 65 3a 20 22 | 2b 53 54 52 24 7e 28 42 |alise: "|+STR$~(B|
|00001a30| 6c 6f 63 6b 25 21 31 36 | 29 2b 22 20 50 6c 65 61 |lock%!16|)+" Plea|
|00001a40| 73 65 20 61 64 64 20 63 | 6f 64 65 22 29 0d 08 02 |se add c|ode")...|
|00001a50| 05 cb 0d 08 0c 11 f4 20 | 41 63 6b 6e 6f 77 6c 65 |....... |Acknowle|
|00001a60| 64 67 65 0d 08 16 1b e7 | 20 52 65 61 73 6f 6e 25 |dge.....| Reason%|
|00001a70| 3d 31 38 20 80 20 41 63 | 6b 25 3d b9 20 8c 0d 08 |=18 . Ac|k%=. ...|
|00001a80| 20 1a 20 20 20 20 42 6c | 6f 63 6b 25 21 31 32 3d | . Bl|ock%!12=|
|00001a90| 42 6c 6f 63 6b 25 21 38 | 0d 08 2a 30 20 20 20 20 |Block%!8|..*0 |
|00001aa0| c8 99 20 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 |.. "Wimp|_SendMes|
|00001ab0| 73 61 67 65 22 2c 31 39 | 2c 42 6c 6f 63 6b 25 2c |sage",19|,Block%,|
|00001ac0| 42 6c 6f 63 6b 25 21 34 | 0d 08 34 05 cd 0d 08 3e |Block%!4|..4....>|
|00001ad0| 05 e1 0d 08 48 04 0d 08 | 52 1b dd 20 f2 4d 6f 75 |....H...|R.. .Mou|
|00001ae0| 73 65 43 6c 69 63 6b 28 | 42 25 2c 57 25 2c 49 25 |seClick(|B%,W%,I%|
|00001af0| 29 0d 08 5c 08 ea 20 54 | 25 0d 08 66 17 e7 20 4d |)..\.. T|%..f.. M|
|00001b00| 75 6c 74 69 54 61 73 6b | 25 3c 3e 30 20 8c 20 e1 |ultiTask|%<>0 . .|
|00001b10| 0d 08 70 33 f4 20 50 52 | 4f 43 44 65 62 75 67 28 |..p3. PR|OCDebug(|
|00001b20| 22 4d 6f 75 73 65 43 6c | 69 63 6b 3a 20 22 2b 53 |"MouseCl|ick: "+S|
|00001b30| 54 52 24 42 25 2b 22 20 | 3e 20 22 2b 53 54 52 24 |TR$B%+" |> "+STR$|
|00001b40| 49 25 29 0d 08 7a 0b c8 | 8e 20 57 25 20 ca 0d 08 |I%)..z..|. W% ...|
|00001b50| 84 22 20 20 20 20 c9 20 | 2d 32 20 20 20 20 20 3a |." . |-2 :|
|00001b60| e7 20 49 25 3d 49 63 6f | 6e 42 61 72 48 25 20 8c |. I%=Ico|nBarH% .|
|00001b70| 0d 08 8e 1b 20 20 20 20 | 20 20 20 20 20 20 20 20 |.... | |
|00001b80| 20 20 20 20 c8 8e 20 42 | 25 20 ca 0d 08 98 42 20 | .. B|% ....B |
|00001b90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001ba0| 20 20 20 c9 20 31 20 20 | 3a ff 28 22 25 46 69 6c | . 1 |:.("%Fil|
|00001bb0| 65 72 5f 4f 70 65 6e 44 | 69 72 20 3c 55 6e 69 4d |er_OpenD|ir <UniM|
|00001bc0| 6f 64 65 4d 44 53 24 44 | 69 72 3e 22 29 0d 08 a2 |odeMDS$D|ir>")...|
|00001bd0| 4e 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |N | |
|00001be0| 20 20 20 20 20 c9 20 32 | 20 20 3a c8 99 20 22 57 | . 2| :.. "W|
|00001bf0| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00001c00| 2c 4d 61 69 6e 25 2c 21 | 57 69 6d 70 25 2d 36 34 |,Main%,!|Wimp%-64|
|00001c10| 2c 39 36 2b 28 31 30 2a | 33 36 29 0d 08 ac 42 20 |,96+(10*|36)...B |
|00001c20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001c30| 20 20 20 c9 20 34 20 20 | 3a ff 28 22 25 46 69 6c | . 4 |:.("%Fil|
|00001c40| 65 72 5f 4f 70 65 6e 44 | 69 72 20 3c 55 6e 69 4d |er_OpenD|ir <UniM|
|00001c50| 6f 64 65 4d 44 46 24 44 | 69 72 3e 22 29 0d 08 b6 |odeMDF$D|ir>")...|
|00001c60| 15 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00001c70| 20 cb 0d 08 c0 13 20 20 | 20 20 20 20 20 20 20 20 | ..... | |
|00001c80| 20 20 20 20 cd 0d 08 ca | 38 20 20 20 20 c9 20 43 | ....|8 . C|
|00001c90| 6f 6e 74 72 6f 6c 48 25 | 20 20 3a e7 20 42 25 3d |ontrolH%| :. B%=|
|00001ca0| 31 20 80 20 49 25 3c 31 | 32 38 20 8c 20 f2 49 6e |1 . I%<1|28 . .In|
|00001cb0| 69 74 57 69 6e 64 6f 77 | 73 28 49 25 29 0d 08 d4 |itWindow|s(I%)...|
|00001cc0| 53 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |S | |
|00001cd0| 20 20 20 20 20 e7 20 42 | 25 3d 34 20 80 20 49 25 | . B|%=4 . I%|
|00001ce0| 3c 31 32 38 20 8c 20 c8 | 99 20 22 57 69 6d 70 5f |<128 . .|. "Wimp_|
|00001cf0| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 2d 31 3a |CreateMe|nu",,-1:|
|00001d00| f2 49 6e 69 74 57 69 6e | 64 6f 77 73 28 49 25 29 |.InitWin|dows(I%)|
|00001d10| 0d 08 de 22 20 20 20 20 | 20 20 20 20 20 20 20 20 |..." | |
|00001d20| 20 20 20 20 20 20 20 20 | e7 20 49 25 3d 31 32 38 | |. I%=128|
|00001d30| 20 8c 0d 08 e8 2d 20 20 | 20 20 20 20 20 20 20 20 | ....- | |
|00001d40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 c8 99 | | ..|
|00001d50| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 6e 22 0d | "Hourgl|ass_On".|
|00001d60| 08 f2 30 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..0 | |
|00001d70| 20 20 20 20 20 20 20 20 | 20 20 20 f2 55 70 64 61 | | .Upda|
|00001d80| 74 65 43 6f 6e 74 72 6f | 6c 57 69 6e 64 6f 77 0d |teContro|lWindow.|
|00001d90| 08 fc 2e 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |... | |
|00001da0| 20 20 20 20 20 20 20 20 | 20 20 20 c8 99 20 22 48 | | .. "H|
|00001db0| 6f 75 72 67 6c 61 73 73 | 5f 4f 66 66 22 0d 09 06 |ourglass|_Off"...|
|00001dc0| 19 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00001dd0| 20 20 20 20 20 cd 0d 09 | 10 46 20 20 20 20 20 20 | ...|.F |
|00001de0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 e7 20 | | . |
|00001df0| 49 25 3e 31 32 38 20 80 | 20 42 25 3d 31 20 8c 20 |I%>128 .| B%=1 . |
|00001e00| f2 46 6f 72 63 65 53 74 | 61 74 65 28 43 6f 6e 74 |.ForceSt|ate(Cont|
|00001e10| 72 6f 6c 48 25 2c 49 25 | 2c 4f 6e 29 0d 09 1a 32 |rolH%,I%|,On)...2|
|00001e20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001e30| 20 20 20 20 e7 20 49 25 | 3e 31 32 38 20 80 20 28 | . I%|>128 . (|
|00001e40| 42 25 3d 34 20 84 20 42 | 25 3d 31 29 20 8c 0d 09 |B%=4 . B|%=1) ...|
|00001e50| 24 2f 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |$/ | |
|00001e60| 20 20 20 20 20 20 20 20 | 20 20 4d 6f 6e 69 74 6f | | Monito|
|00001e70| 72 54 79 70 65 25 3d 49 | 25 2d 31 32 39 0d 09 2e |rType%=I|%-129...|
|00001e80| 2d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |- | |
|00001e90| 20 20 20 20 20 20 20 20 | 20 c8 99 20 22 48 6f 75 | | .. "Hou|
|00001ea0| 72 67 6c 61 73 73 5f 4f | 6e 22 0d 09 38 30 20 20 |rglass_O|n"..80 |
|00001eb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001ec0| 20 20 20 20 20 20 f2 55 | 70 64 61 74 65 43 6f 6e | .U|pdateCon|
|00001ed0| 74 72 6f 6c 57 69 6e 64 | 6f 77 0d 09 42 2e 20 20 |trolWind|ow..B. |
|00001ee0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001ef0| 20 20 20 20 20 20 c8 99 | 20 22 48 6f 75 72 67 6c | ..| "Hourgl|
|00001f00| 61 73 73 5f 4f 66 66 22 | 0d 09 4c 19 20 20 20 20 |ass_Off"|..L. |
|00001f10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001f20| cd 0d 09 56 48 20 20 20 | 20 c9 20 52 65 67 73 48 |...VH | . RegsH|
|00001f30| 25 20 20 20 20 3a e7 20 | 42 25 3d 32 20 8c 20 c8 |% :. |B%=2 . .|
|00001f40| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 4d 65 |. "Wimp_|CreateMe|
|00001f50| 6e 75 22 2c 2c 4d 61 69 | 6e 25 2c 21 57 69 6d 70 |nu",,Mai|n%,!Wimp|
|00001f60| 25 2c 57 69 6d 70 25 21 | 34 0d 09 60 20 20 20 20 |%,Wimp%!|4..` |
|00001f70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001f80| 20 e7 20 42 25 3d 34 20 | 8c 0d 09 6a 45 20 20 20 | . B%=4 |...jE |
|00001f90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001fa0| 20 20 20 20 20 e3 20 54 | 25 3d 31 20 b8 20 bb 28 | . T|%=1 . .(|
|00001fb0| a4 5f 4c 6f 6f 6b 75 70 | 28 4d 65 73 73 61 67 65 |._Lookup|(Message|
|00001fc0| 49 6e 66 6f 25 2c 22 52 | 45 47 53 22 29 29 0d 09 |Info%,"R|EGS"))..|
|00001fd0| 74 68 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |th | |
|00001fe0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 f2 47 | | .G|
|00001ff0| 65 74 52 65 67 69 73 74 | 65 72 49 6e 66 6f 28 22 |etRegist|erInfo("|
|00002000| 52 45 47 22 2b c3 54 25 | 2c 4e 61 6d 65 24 2c 52 |REG"+.T%|,Name$,R|
|00002010| 65 67 25 2c 46 6f 72 6d | 75 6c 61 25 2c 6c 73 62 |eg%,Form|ula%,lsb|
|00002020| 25 2c 6d 73 62 25 2c 53 | 77 69 74 63 68 25 2c 57 |%,msb%,S|witch%,W|
|00002030| 72 69 74 65 25 29 0d 09 | 7e 48 20 20 20 20 20 20 |rite%)..|~H |
|00002040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002050| 20 20 20 20 20 20 e7 20 | 49 25 3d 53 77 69 74 63 | . |I%=Switc|
|00002060| 68 25 20 80 20 57 72 69 | 74 65 25 3c 3e 2d 31 20 |h% . Wri|te%<>-1 |
|00002070| 80 20 57 72 69 74 65 25 | 3c 3e 33 33 20 8c 0d 09 |. Write%|<>33 ...|
|00002080| 88 43 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.C | |
|00002090| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000020a0| 20 20 e7 20 a4 47 65 74 | 49 63 6f 6e 53 74 61 74 | . .Get|IconStat|
|000020b0| 65 28 52 65 67 73 48 25 | 2c 49 25 29 3d 4f 6e 20 |e(RegsH%|,I%)=On |
|000020c0| 8c 0d 09 92 43 20 20 20 | 20 20 20 20 20 20 20 20 |....C | |
|000020d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000020e0| 20 20 20 20 20 20 20 20 | 20 f2 55 6e 73 68 61 64 | | .Unshad|
|000020f0| 65 49 63 6f 6e 28 52 65 | 67 73 48 25 2c 57 72 69 |eIcon(Re|gsH%,Wri|
|00002100| 74 65 25 29 0d 09 9c 25 | 20 20 20 20 20 20 20 20 |te%)...%| |
|00002110| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002120| 20 20 20 20 20 20 20 20 | cc 0d 09 a6 41 20 20 20 | |....A |
|00002130| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002140| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002150| 20 f2 53 68 61 64 65 49 | 63 6f 6e 28 52 65 67 73 | .ShadeI|con(Regs|
|00002160| 48 25 2c 57 72 69 74 65 | 25 29 0d 09 b0 25 20 20 |H%,Write|%)...% |
|00002170| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002180| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 cd 0d | | ..|
|00002190| 09 ba 21 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..! | |
|000021a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 cd | | .|
|000021b0| 0d 09 c4 39 20 20 20 20 | 20 20 20 20 20 20 20 20 |...9 | |
|000021c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000021d0| e7 20 52 65 67 25 3d 26 | 45 30 20 80 20 49 25 3d |. Reg%=&|E0 . I%=|
|000021e0| 53 77 69 74 63 68 25 20 | 8c 0d 09 ce 48 20 20 20 |Switch% |....H |
|000021f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002200| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 e7 20 a4 | | . .|
|00002210| 47 65 74 49 63 6f 6e 53 | 74 61 74 65 28 52 65 67 |GetIconS|tate(Reg|
|00002220| 73 48 25 2c 53 77 69 74 | 63 68 25 29 3d 4f 6e 20 |sH%,Swit|ch%)=On |
|00002230| 8c 0d 09 d8 34 20 20 20 | 20 20 20 20 20 20 20 20 |....4 | |
|00002240| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002250| 20 20 20 20 20 20 20 20 | 20 e3 20 58 25 3d 33 34 | | . X%=34|
|00002260| 20 b8 20 34 34 0d 09 e2 | 3f 20 20 20 20 20 20 20 | . 44...|? |
|00002270| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002280| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 f2 55 6e | | .Un|
|00002290| 73 68 61 64 65 49 63 6f | 6e 28 52 65 67 73 48 25 |shadeIco|n(RegsH%|
|000022a0| 2c 58 25 29 0d 09 ec 29 | 20 20 20 20 20 20 20 20 |,X%)...)| |
|000022b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000022c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 ed 0d 09 f6 | | ....|
|000022d0| 25 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |% | |
|000022e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000022f0| 20 cc 0d 0a 00 34 20 20 | 20 20 20 20 20 20 20 20 | ....4 | |
|00002300| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002310| 20 20 20 20 20 20 20 20 | 20 20 e3 20 58 25 3d 33 | | . X%=3|
|00002320| 34 20 b8 20 34 34 0d 0a | 0a 3d 20 20 20 20 20 20 |4 . 44..|.= |
|00002330| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002340| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 f2 53 | | .S|
|00002350| 68 61 64 65 49 63 6f 6e | 28 52 65 67 73 48 25 2c |hadeIcon|(RegsH%,|
|00002360| 58 25 29 0d 0a 14 29 20 | 20 20 20 20 20 20 20 20 |X%)...) | |
|00002370| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002380| 20 20 20 20 20 20 20 20 | 20 20 20 ed 0d 0a 1e 26 | | ....&|
|00002390| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000023a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000023b0| 20 cd 0d 0a 28 21 20 20 | 20 20 20 20 20 20 20 20 | ...(! | |
|000023c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000023d0| 20 20 cd 0d 0a 32 1d 20 | 20 20 20 20 20 20 20 20 | ...2. | |
|000023e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 ed | | .|
|000023f0| 0d 0a 3c 19 20 20 20 20 | 20 20 20 20 20 20 20 20 |..<. | |
|00002400| 20 20 20 20 20 20 20 20 | cd 0d 0a 46 21 20 20 20 | |...F! |
|00002410| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002420| 20 e7 20 49 25 3d 33 32 | 20 8c 0d 0a 50 2d 20 20 | . I%=32| ...P- |
|00002430| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002440| 20 20 20 20 20 20 c8 99 | 20 22 48 6f 75 72 67 6c | ..| "Hourgl|
|00002450| 61 73 73 5f 4f 6e 22 0d | 0a 5a 26 20 20 20 20 20 |ass_On".|.Z& |
|00002460| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002470| 20 20 20 f2 43 6c 65 61 | 72 52 65 67 73 0d 0a 64 | .Clea|rRegs..d|
|00002480| 41 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |A | |
|00002490| 20 20 20 20 20 20 20 20 | 20 f2 42 61 73 65 52 65 | | .BaseRe|
|000024a0| 67 73 28 bb 28 a4 47 65 | 74 57 72 69 74 65 61 62 |gs(.(.Ge|tWriteab|
|000024b0| 6c 65 28 52 65 67 73 48 | 25 2c 33 29 29 29 0d 0a |le(RegsH|%,3)))..|
|000024c0| 6e 2e 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |n. | |
|000024d0| 20 20 20 20 20 20 20 20 | 20 20 c8 99 20 22 48 6f | | .. "Ho|
|000024e0| 75 72 67 6c 61 73 73 5f | 4f 66 66 22 0d 0a 78 19 |urglass_|Off"..x.|
|000024f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002500| 20 20 20 20 cd 0d 0a 82 | 48 20 20 20 20 c9 20 57 | ....|H . W|
|00002510| 6f 72 6b 48 25 20 20 20 | 20 3a e7 20 42 25 3d 32 |orkH% | :. B%=2|
|00002520| 20 8c 20 c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 | . .. "W|imp_Crea|
|00002530| 74 65 4d 65 6e 75 22 2c | 2c 4d 61 69 6e 25 2c 21 |teMenu",|,Main%,!|
|00002540| 57 69 6d 70 25 2c 57 69 | 6d 70 25 21 34 0d 0a 8c |Wimp%,Wi|mp%!4...|
|00002550| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002560| 20 20 20 20 20 e7 20 42 | 25 3d 34 20 8c 0d 0a 96 | . B|%=4 ....|
|00002570| 45 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |E | |
|00002580| 20 20 20 20 20 20 20 20 | 20 e3 20 54 25 3d 31 20 | | . T%=1 |
|00002590| b8 20 bb 28 a4 5f 4c 6f | 6f 6b 75 70 28 4d 65 73 |. .(._Lo|okup(Mes|
|000025a0| 73 61 67 65 49 6e 66 6f | 25 2c 22 56 41 52 53 22 |sageInfo|%,"VARS"|
|000025b0| 29 29 0d 0a a0 59 20 20 | 20 20 20 20 20 20 20 20 |))...Y | |
|000025c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000025d0| 20 20 f2 47 65 74 4d 6f | 64 65 56 61 72 69 61 62 | .GetMo|deVariab|
|000025e0| 6c 65 49 6e 66 6f 28 22 | 56 41 52 22 2b c3 54 25 |leInfo("|VAR"+.T%|
|000025f0| 2c 4e 61 6d 65 24 2c 56 | 61 72 25 2c 53 77 69 74 |,Name$,V|ar%,Swit|
|00002600| 63 68 25 2c 57 72 69 74 | 65 25 29 0d 0a aa 3b 20 |ch%,Writ|e%)...; |
|00002610| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002620| 20 20 20 20 20 20 20 20 | 20 20 20 e7 20 49 25 3d | | . I%=|
|00002630| 53 77 69 74 63 68 25 20 | 80 20 57 72 69 74 65 25 |Switch% |. Write%|
|00002640| 3c 3e 2d 31 20 8c 0d 0a | b4 43 20 20 20 20 20 20 |<>-1 ...|.C |
|00002650| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002660| 20 20 20 20 20 20 20 20 | 20 20 e7 20 a4 47 65 74 | | . .Get|
|00002670| 49 63 6f 6e 53 74 61 74 | 65 28 57 6f 72 6b 48 25 |IconStat|e(WorkH%|
|00002680| 2c 49 25 29 3d 4f 6e 20 | 8c 0d 0a be 43 20 20 20 |,I%)=On |....C |
|00002690| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000026a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000026b0| 20 f2 55 6e 73 68 61 64 | 65 49 63 6f 6e 28 57 6f | .Unshad|eIcon(Wo|
|000026c0| 72 6b 48 25 2c 57 72 69 | 74 65 25 29 0d 0a c8 25 |rkH%,Wri|te%)...%|
|000026d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000026e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000026f0| cc 0d 0a d2 41 20 20 20 | 20 20 20 20 20 20 20 20 |....A | |
|00002700| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002710| 20 20 20 20 20 20 20 20 | 20 f2 53 68 61 64 65 49 | | .ShadeI|
|00002720| 63 6f 6e 28 57 6f 72 6b | 48 25 2c 57 72 69 74 65 |con(Work|H%,Write|
|00002730| 25 29 0d 0a dc 25 20 20 | 20 20 20 20 20 20 20 20 |%)...% | |
|00002740| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002750| 20 20 20 20 20 20 cd 0d | 0a e6 21 20 20 20 20 20 | ..|..! |
|00002760| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002770| 20 20 20 20 20 20 20 cd | 0d 0a f0 37 20 20 20 20 | .|...7 |
|00002780| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002790| 20 20 20 20 20 20 20 20 | e7 20 49 25 3d 53 77 69 | |. I%=Swi|
|000027a0| 74 63 68 25 20 80 20 56 | 61 72 25 3d 30 20 8c 0d |tch% . V|ar%=0 ..|
|000027b0| 0a fa 47 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..G | |
|000027c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000027d0| 20 20 e7 20 a4 47 65 74 | 49 63 6f 6e 53 74 61 74 | . .Get|IconStat|
|000027e0| 65 28 57 6f 72 6b 48 25 | 2c 53 77 69 74 63 68 25 |e(WorkH%|,Switch%|
|000027f0| 29 3d 4f 6e 20 8c 0d 0b | 04 33 20 20 20 20 20 20 |)=On ...|.3 |
|00002800| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002810| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 e3 20 58 | | . X|
|00002820| 25 3d 33 33 20 b8 20 33 | 39 0d 0b 0e 42 20 20 20 |%=33 . 3|9...B |
|00002830| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002840| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002850| 20 20 20 20 f2 55 6e 73 | 68 61 64 65 49 63 6f 6e | .Uns|hadeIcon|
|00002860| 28 57 6f 72 6b 48 25 2c | 58 25 29 0d 0b 18 28 20 |(WorkH%,|X%)...( |
|00002870| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002880| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002890| 20 20 ed 0d 0b 22 24 20 | 20 20 20 20 20 20 20 20 | ..."$ | |
|000028a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000028b0| 20 20 20 20 20 20 cc 0d | 0b 2c 33 20 20 20 20 20 | ..|.,3 |
|000028c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000028d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 e3 20 | | . |
|000028e0| 58 25 3d 33 33 20 b8 20 | 33 39 0d 0b 36 40 20 20 |X%=33 . |39..6@ |
|000028f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002900| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002910| 20 20 20 20 20 f2 53 68 | 61 64 65 49 63 6f 6e 28 | .Sh|adeIcon(|
|00002920| 57 6f 72 6b 48 25 2c 58 | 25 29 0d 0b 40 28 20 20 |WorkH%,X|%)..@( |
|00002930| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002940| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002950| 20 ed 0d 0b 4a 24 20 20 | 20 20 20 20 20 20 20 20 | ...J$ | |
|00002960| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002970| 20 20 20 20 20 cd 0d 0b | 54 21 20 20 20 20 20 20 | ...|T! |
|00002980| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002990| 20 20 20 20 20 20 cd 0d | 0b 5e 49 20 20 20 20 20 | ..|.^I |
|000029a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000029b0| 20 20 20 20 20 20 20 e7 | 20 49 25 3d 53 77 69 74 | .| I%=Swit|
|000029c0| 63 68 25 20 80 20 56 61 | 72 25 3d 33 20 8c 20 f2 |ch% . Va|r%=3 . .|
|000029d0| 4e 43 6f 6c 6f 75 72 28 | 53 77 69 74 63 68 25 29 |NColour(|Switch%)|
|000029e0| 0d 0b 68 45 20 20 20 20 | 20 20 20 20 20 20 20 20 |..hE | |
|000029f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002a00| e7 20 49 25 3d 53 77 69 | 74 63 68 25 20 80 20 56 |. I%=Swi|tch% . V|
|00002a10| 61 72 25 3d 39 20 8c 20 | f2 42 50 50 28 53 77 69 |ar%=9 . |.BPP(Swi|
|00002a20| 74 63 68 25 29 0d 0b 72 | 1d 20 20 20 20 20 20 20 |tch%)..r|. |
|00002a30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002a40| 20 ed 0d 0b 7c 19 20 20 | 20 20 20 20 20 20 20 20 | ...|. | |
|00002a50| 20 20 20 20 20 20 20 20 | 20 20 cd 0d 0b 86 21 20 | | ....! |
|00002a60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002a70| 20 20 20 e7 20 49 25 3d | 34 30 20 8c 0d 0b 90 2d | . I%=|40 ....-|
|00002a80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002a90| 20 20 20 20 20 20 20 20 | c8 99 20 22 48 6f 75 72 | |.. "Hour|
|00002aa0| 67 6c 61 73 73 5f 4f 6e | 22 0d 0b 9a 26 20 20 20 |glass_On|"...& |
|00002ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002ac0| 20 20 20 20 20 f2 43 6c | 65 61 72 57 6f 72 6b 0d | .Cl|earWork.|
|00002ad0| 0b a4 41 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..A | |
|00002ae0| 20 20 20 20 20 20 20 20 | 20 20 20 f2 42 61 73 65 | | .Base|
|00002af0| 57 6f 72 6b 28 bb 28 a4 | 47 65 74 57 72 69 74 65 |Work(.(.|GetWrite|
|00002b00| 61 62 6c 65 28 57 6f 72 | 6b 48 25 2c 33 29 29 29 |able(Wor|kH%,3)))|
|00002b10| 0d 0b ae 2e 20 20 20 20 | 20 20 20 20 20 20 20 20 |.... | |
|00002b20| 20 20 20 20 20 20 20 20 | 20 20 20 20 c8 99 20 22 | | .. "|
|00002b30| 48 6f 75 72 67 6c 61 73 | 73 5f 4f 66 66 22 0d 0b |Hourglas|s_Off"..|
|00002b40| b8 19 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00002b50| 20 20 20 20 20 20 cd 0d | 0b c2 48 20 20 20 20 c9 | ..|..H .|
|00002b60| 20 53 70 65 63 73 48 25 | 20 20 20 3a e7 20 42 25 | SpecsH%| :. B%|
|00002b70| 3d 32 20 8c 20 c8 99 20 | 22 57 69 6d 70 5f 43 72 |=2 . .. |"Wimp_Cr|
|00002b80| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 4d 61 69 6e 25 |eateMenu|",,Main%|
|00002b90| 2c 21 57 69 6d 70 25 2c | 57 69 6d 70 25 21 34 0d |,!Wimp%,|Wimp%!4.|
|00002ba0| 0b cc 48 20 20 20 20 c9 | 20 49 64 48 25 20 20 20 |..H .| IdH% |
|00002bb0| 20 20 20 3a e7 20 42 25 | 3d 32 20 8c 20 c8 99 20 | :. B%|=2 . .. |
|00002bc0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00002bd0| 22 2c 2c 4d 61 69 6e 25 | 2c 21 57 69 6d 70 25 2c |",,Main%|,!Wimp%,|
|00002be0| 57 69 6d 70 25 21 34 0d | 0b d6 35 20 20 20 20 c9 |Wimp%!4.|..5 .|
|00002bf0| 20 44 69 61 6c 6f 67 48 | 25 20 20 3a e7 20 42 25 | DialogH|% :. B%|
|00002c00| 3d 36 34 20 80 20 49 25 | 3d 32 20 8c 20 f2 44 72 |=64 . I%|=2 . .Dr|
|00002c10| 61 67 42 6f 78 28 57 25 | 2c 49 25 29 0d 0b e0 1d |agBox(W%|,I%)....|
|00002c20| 20 20 20 20 c9 20 55 6e | 69 4d 6f 64 65 48 25 20 | . Un|iModeH% |
|00002c30| 3a e7 20 42 25 3d 34 20 | 8c 0d 0b ea 23 20 20 20 |:. B%=4 |....# |
|00002c40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002c50| 20 20 20 20 20 c8 8e 20 | 49 25 20 ca 0d 0b f4 39 | .. |I% ....9|
|00002c60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002c70| 20 20 20 20 20 20 20 20 | 20 20 20 20 c9 20 31 20 | | . 1 |
|00002c80| 20 3a e7 20 43 61 72 65 | 74 5f 47 6f 74 74 65 6e | :. Care|t_Gotten|
|00002c90| 25 3d a3 20 8c 0d 0b fe | 36 20 20 20 20 20 20 20 |%=. ....|6 |
|00002ca0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002cb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002cc0| 20 f2 47 65 74 5f 43 61 | 72 65 74 0d 0c 08 3c 20 | .Get_Ca|ret...< |
|00002cd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002ce0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002cf0| 20 20 20 20 20 20 20 f2 | 53 65 74 5f 43 61 72 65 | .|Set_Care|
|00002d00| 74 28 57 25 2c 30 29 0d | 0c 12 29 20 20 20 20 20 |t(W%,0).|..) |
|00002d10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002d20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 cd | | .|
|00002d30| 0d 0c 1c 3a 20 20 20 20 | 20 20 20 20 20 20 20 20 |...: | |
|00002d40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002d50| 20 20 20 20 20 20 20 20 | f2 55 6e 73 68 61 64 65 | |.Unshade|
|00002d60| 49 63 6f 6e 28 57 25 2c | 30 29 0d 0c 26 31 20 20 |Icon(W%,|0)..&1 |
|00002d70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002d80| 20 20 20 20 20 20 20 20 | 20 20 c9 20 33 20 20 3a | | . 3 :|
|00002d90| f2 4c 6f 73 65 5f 43 61 | 72 65 74 0d 0c 30 38 20 |.Lose_Ca|ret..08 |
|00002da0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002db0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002dc0| 20 20 20 f2 53 68 61 64 | 65 49 63 6f 6e 28 57 25 | .Shad|eIcon(W%|
|00002dd0| 2c 30 29 0d 0c 3a 47 20 | 20 20 20 20 20 20 20 20 |,0)..:G | |
|00002de0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002df0| 20 20 20 c9 20 34 20 20 | 3a e7 20 a4 47 65 74 49 | . 4 |:. .GetI|
|00002e00| 63 6f 6e 53 74 61 74 65 | 28 55 6e 69 4d 6f 64 65 |conState|(UniMode|
|00002e10| 48 25 2c 31 29 3d 4f 6e | 20 8c 0d 0c 44 73 20 20 |H%,1)=On| ...Ds |
|00002e20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002e30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002e40| 20 20 20 20 20 20 e7 20 | bb 28 a4 47 65 74 57 72 | . |.(.GetWr|
|00002e50| 69 74 65 61 62 6c 65 28 | 55 6e 69 4d 6f 64 65 48 |iteable(|UniModeH|
|00002e60| 25 2c 30 29 29 3e 31 32 | 37 20 84 20 bb 28 a4 47 |%,0))>12|7 . .(.G|
|00002e70| 65 74 57 72 69 74 65 61 | 62 6c 65 28 55 6e 69 4d |etWritea|ble(UniM|
|00002e80| 6f 64 65 48 25 2c 30 29 | 29 3c 30 20 8c 0d 0c 4e |odeH%,0)|)<0 ...N|
|00002e90| 67 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |g | |
|00002ea0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002eb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 e7 20 bb | | . .|
|00002ec0| 28 a4 47 65 74 57 72 69 | 74 65 61 62 6c 65 28 55 |(.GetWri|teable(U|
|00002ed0| 6e 69 4d 6f 64 65 48 25 | 2c 30 29 29 3e 31 32 37 |niModeH%|,0))>127|
|00002ee0| 20 8c 20 f2 45 72 72 6f | 72 28 2d 33 2c 22 45 52 | . .Erro|r(-3,"ER|
|00002ef0| 52 39 22 29 0d 0c 58 66 | 20 20 20 20 20 20 20 20 |R9")..Xf| |
|00002f00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002f10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002f20| 20 20 20 20 e7 20 bb 28 | a4 47 65 74 57 72 69 74 | . .(|.GetWrit|
|00002f30| 65 61 62 6c 65 28 55 6e | 69 4d 6f 64 65 48 25 2c |eable(Un|iModeH%,|
|00002f40| 30 29 29 3c 30 20 8c 20 | f2 45 72 72 6f 72 28 2d |0))<0 . |.Error(-|
|00002f50| 33 2c 22 45 52 52 31 30 | 22 29 0d 0c 62 2d 20 20 |3,"ERR10|")..b- |
|00002f60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002f70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002f80| 20 20 20 20 20 20 cc 0d | 0c 6c 3b 20 20 20 20 20 | ..|.l; |
|00002f90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002fa0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002fb0| 20 20 20 20 20 20 20 f2 | 4c 6f 73 65 5f 43 61 72 | .|Lose_Car|
|00002fc0| 65 74 0d 0c 76 5f 20 20 | 20 20 20 20 20 20 20 20 |et..v_ | |
|00002fd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002fe0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002ff0| 20 20 f2 4d 6f 64 65 4c | 6f 61 64 28 a4 47 65 74 | .ModeL|oad(.Get|
|00003000| 57 72 69 74 65 61 62 6c | 65 28 55 6e 69 4d 6f 64 |Writeabl|e(UniMod|
|00003010| 65 48 25 2c 30 29 2c 4d | 6f 64 65 4c 6f 61 64 24 |eH%,0),M|odeLoad$|
|00003020| 29 0d 0c 80 57 20 20 20 | 20 20 20 20 20 20 20 20 |)...W | |
|00003030| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003050| 20 e7 20 4d 6f 64 65 4c | 6f 61 64 25 3d a3 20 8c | . ModeL|oad%=. .|
|00003060| 20 f2 43 6c 6f 73 65 57 | 69 6e 64 6f 77 28 55 6e | .CloseW|indow(Un|
|00003070| 69 4d 6f 64 65 48 25 29 | 0d 0c 8a 2d 20 20 20 20 |iModeH%)|...- |
|00003080| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003090| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000030a0| 20 20 20 20 cd 0d 0c 94 | 29 20 20 20 20 20 20 20 | ....|) |
|000030b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000030c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 cd 0d 0c | | ...|
|000030d0| 9e 49 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.I | |
|000030e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000030f0| 20 20 20 20 20 20 e7 20 | a4 47 65 74 49 63 6f 6e | . |.GetIcon|
|00003100| 53 74 61 74 65 28 55 6e | 69 4d 6f 64 65 48 25 2c |State(Un|iModeH%,|
|00003110| 33 29 3d 4f 6e 20 8c 0d | 0c a8 43 20 20 20 20 20 |3)=On ..|..C |
|00003120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003130| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003140| 20 20 20 f2 43 6c 6f 73 | 65 57 69 6e 64 6f 77 28 | .Clos|eWindow(|
|00003150| 55 6e 69 4d 6f 64 65 48 | 25 29 0d 0c b2 40 20 20 |UniModeH|%)...@ |
|00003160| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003170| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003180| 20 20 20 20 20 20 f2 4d | 6f 64 65 49 6e 66 6f 28 | .M|odeInfo(|
|00003190| 4d 6f 64 65 4c 6f 61 64 | 24 29 0d 0c bc 29 20 20 |ModeLoad|$)...) |
|000031a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000031b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000031c0| 20 20 cd 0d 0c c6 21 20 | 20 20 20 20 20 20 20 20 | ....! | |
|000031d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000031e0| 20 20 20 cb 0d 0c d0 19 | 20 20 20 20 20 20 20 20 | .....| |
|000031f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 cd 0d 0c da | | ....|
|00003200| 28 20 20 20 20 7f 3a f4 | 20 50 52 4f 43 44 65 62 |( .:.| PROCDeb|
|00003210| 75 67 28 22 42 75 74 74 | 6f 6e 3a 20 22 2b 53 54 |ug("Butt|on: "+ST|
|00003220| 52 24 42 25 29 0d 0c e4 | 2f 20 20 20 20 20 20 20 |R$B%)...|/ |
|00003230| 20 20 20 20 20 f4 20 50 | 52 4f 43 44 65 62 75 67 | . P|ROCDebug|
|00003240| 28 22 57 69 6e 64 6f 77 | 3a 20 22 2b 53 54 52 24 |("Window|: "+STR$|
|00003250| 7e 57 25 29 0d 0c ee 2e | 20 20 20 20 20 20 20 20 |~W%)....| |
|00003260| 20 20 20 20 f4 20 50 52 | 4f 43 44 65 62 75 67 28 | . PR|OCDebug(|
|00003270| 22 49 63 6f 6e 20 20 3a | 20 22 2b 53 54 52 24 49 |"Icon :| "+STR$I|
|00003280| 25 29 0d 0c f8 05 cb 0d | 0d 02 05 e1 0d 0d 0c 04 |%)......|........|
|00003290| 0d 0d 16 11 dd 20 f2 44 | 65 63 6f 64 65 4d 65 6e |..... .D|ecodeMen|
|000032a0| 75 0d 0d 20 10 c8 8e 20 | 57 69 6d 70 25 21 30 20 |u.. ... |Wimp%!0 |
|000032b0| ca 0d 0d 2a 1a 20 20 20 | 20 c9 20 31 20 20 3a c8 |...*. | . 1 :.|
|000032c0| 8e 20 57 69 6d 70 25 21 | 34 20 ca 0d 0d 34 3d 20 |. Wimp%!|4 ...4= |
|000032d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 c9 | | .|
|000032e0| 20 30 20 20 3a 21 57 69 | 6d 70 25 3d 53 70 65 63 | 0 :!Wi|mp%=Spec|
|000032f0| 73 48 25 3a f2 4f 70 65 | 6e 57 69 6e 64 6f 77 28 |sH%:.Ope|nWindow(|
|00003300| 57 69 6d 70 25 2c 31 29 | 0d 0d 3e 3c 20 20 20 20 |Wimp%,1)|..>< |
|00003310| 20 20 20 20 20 20 20 20 | 20 20 20 20 c9 20 31 20 | | . 1 |
|00003320| 20 3a 21 57 69 6d 70 25 | 3d 52 65 67 73 48 25 3a | :!Wimp%|=RegsH%:|
|00003330| f2 4f 70 65 6e 57 69 6e | 64 6f 77 28 57 69 6d 70 |.OpenWin|dow(Wimp|
|00003340| 25 2c 31 29 0d 0d 48 3c | 20 20 20 20 20 20 20 20 |%,1)..H<| |
|00003350| 20 20 20 20 20 20 20 20 | c9 20 32 20 20 3a 21 57 | |. 2 :!W|
|00003360| 69 6d 70 25 3d 57 6f 72 | 6b 48 25 3a f2 4f 70 65 |imp%=Wor|kH%:.Ope|
|00003370| 6e 57 69 6e 64 6f 77 28 | 57 69 6d 70 25 2c 31 29 |nWindow(|Wimp%,1)|
|00003380| 0d 0d 52 3a 20 20 20 20 | 20 20 20 20 20 20 20 20 |..R: | |
|00003390| 20 20 20 20 c9 20 33 20 | 20 3a 21 57 69 6d 70 25 | . 3 | :!Wimp%|
|000033a0| 3d 49 64 48 25 3a f2 4f | 70 65 6e 57 69 6e 64 6f |=IdH%:.O|penWindo|
|000033b0| 77 28 57 69 6d 70 25 2c | 31 29 0d 0d 5c 11 20 20 |w(Wimp%,|1)..\. |
|000033c0| 20 20 20 20 20 20 20 20 | 20 20 cb 0d 0d 66 1a 20 | | ...f. |
|000033d0| 20 20 20 c9 20 32 20 20 | 3a c8 8e 20 57 69 6d 70 | . 2 |:.. Wimp|
|000033e0| 25 21 34 20 ca 0d 0d 70 | 29 20 20 20 20 20 20 20 |%!4 ...p|) |
|000033f0| 20 20 20 20 20 20 20 20 | 20 c9 20 32 20 20 3a e7 | | . 2 :.|
|00003400| 20 43 6f 6d 70 69 6c 65 | 64 25 3d a3 20 8c 0d 0d | Compile|d%=. ...|
|00003410| 7a 36 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |z6 | |
|00003420| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003430| 20 20 f2 45 72 72 6f 72 | 28 2d 33 2c 22 45 52 52 | .Error|(-3,"ERR|
|00003440| 31 31 22 29 0d 0d 84 1e | 20 20 20 20 20 20 20 20 |11")....| |
|00003450| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003460| 20 cc 0d 0d 8e 63 20 20 | 20 20 20 20 20 20 20 20 | ....c | |
|00003470| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003480| 20 20 20 20 20 20 f4 20 | 50 52 4f 43 44 65 62 75 | . |PROCDebu|
|00003490| 67 28 22 2a 2a 2a 2a 20 | 53 61 76 65 20 61 6e 20 |g("**** |Save an |
|000034a0| 4d 44 46 20 69 6e 74 6f | 20 6d 65 6d 6f 72 79 3a |MDF into| memory:|
|000034b0| 20 4e 4f 54 20 53 55 50 | 50 4f 52 54 45 44 20 2a | NOT SUP|PORTED *|
|000034c0| 2a 2a 2a 22 29 0d 0d 98 | 1e 20 20 20 20 20 20 20 |***")...|. |
|000034d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000034e0| 20 20 cd 0d 0d a2 12 20 | 20 20 20 20 20 20 20 20 | ..... | |
|000034f0| 20 20 20 20 cb 0d 0d ac | 58 20 20 20 20 c9 20 33 | ....|X . 3|
|00003500| 20 20 3a 24 42 75 66 66 | 65 72 25 3d 22 25 54 61 | :$Buff|er%="%Ta|
|00003510| 73 6b 57 69 6e 64 6f 77 | 20 55 6e 69 4d 6f 64 65 |skWindow| UniMode|
|00003520| 3a 4d 6f 64 65 49 6e 66 | 6f 20 2d 77 69 6d 70 73 |:ModeInf|o -wimps|
|00003530| 6c 6f 74 20 31 36 6b 20 | 2d 6e 61 6d 65 20 4d 6f |lot 16k |-name Mo|
|00003540| 64 65 49 6e 66 6f 20 2d | 71 75 69 74 22 0d 0d b6 |deInfo -|quit"...|
|00003550| 2c 20 20 20 20 20 20 20 | 20 20 20 20 20 20 c8 99 |, | ..|
|00003560| 20 22 57 69 6d 70 5f 53 | 74 61 72 74 54 61 73 6b | "Wimp_S|tartTask|
|00003570| 22 2c 42 75 66 66 65 72 | 25 0d 0d c0 1a 20 20 20 |",Buffer|%.... |
|00003580| 20 c9 20 34 20 20 3a c8 | 8e 20 57 69 6d 70 25 21 | . 4 :.|. Wimp%!|
|00003590| 34 20 ca 0d 0d ca 28 20 | 20 20 20 20 20 20 20 20 |4 ....( | |
|000035a0| 20 20 20 20 20 20 20 c9 | 20 30 20 20 3a ff 28 22 | .| 0 :.("|
|000035b0| 25 56 69 64 63 20 4f 66 | 66 22 29 0d 0d d4 27 20 |%Vidc Of|f")...' |
|000035c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 c9 | | .|
|000035d0| 20 31 20 20 3a ff 28 22 | 25 56 69 64 63 20 4f 6e | 1 :.("|%Vidc On|
|000035e0| 22 29 0d 0d de 29 20 20 | 20 20 20 20 20 20 20 20 |")...) | |
|000035f0| 20 20 20 20 20 20 c9 20 | 32 20 20 3a ff 28 22 25 | . |2 :.("%|
|00003600| 56 69 64 63 20 41 75 74 | 6f 22 29 0d 0d e8 44 20 |Vidc Aut|o")...D |
|00003610| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 c9 | | .|
|00003620| 20 33 20 20 3a ff 28 22 | 25 56 69 64 63 20 49 6e | 3 :.("|%Vidc In|
|00003630| 74 65 6c 6c 69 67 65 6e | 74 22 29 3a c8 99 20 22 |telligen|t"):.. "|
|00003640| 57 69 6d 70 5f 53 65 74 | 4d 6f 64 65 22 2c eb 0d |Wimp_Set|Mode",..|
|00003650| 0d f2 3e 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..> | |
|00003660| 20 20 20 c9 20 34 20 20 | 3a ff 28 22 25 56 69 64 | . 4 |:.("%Vid|
|00003670| 63 20 50 72 65 66 73 22 | 29 3a c8 99 20 22 57 69 |c Prefs"|):.. "Wi|
|00003680| 6d 70 5f 53 65 74 4d 6f | 64 65 22 2c eb 0d 0d fc |mp_SetMo|de",....|
|00003690| 3e 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |> | |
|000036a0| 20 c9 20 35 20 20 3a ff | 28 22 25 56 69 64 63 20 | . 5 :.|("%Vidc |
|000036b0| 51 75 69 65 74 22 29 3a | c8 99 20 22 57 69 6d 70 |Quiet"):|.. "Wimp|
|000036c0| 5f 53 65 74 4d 6f 64 65 | 22 2c eb 0d 0e 06 11 20 |_SetMode|",..... |
|000036d0| 20 20 20 20 20 20 20 20 | 20 20 20 cb 0d 0e 10 23 | | ....#|
|000036e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 f2 55 70 64 | | .Upd|
|000036f0| 61 74 65 45 6e 68 61 6e | 63 65 72 4d 65 6e 75 0d |ateEnhan|cerMenu.|
|00003700| 0e 1a 37 20 20 20 20 c9 | 20 35 20 20 3a 42 75 66 |..7 .| 5 :Buf|
|00003710| 66 65 72 25 21 30 3d 30 | 3a 24 28 42 75 66 66 65 |fer%!0=0|:$(Buffe|
|00003720| 72 25 2b 34 29 3d a4 52 | 61 73 74 65 72 54 69 6d |r%+4)=.R|asterTim|
|00003730| 65 2b bd 28 30 29 0d 0e | 24 46 20 20 20 20 20 20 |e+.(0)..|$F |
|00003740| 20 20 20 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 52 | ..| "Wimp_R|
|00003750| 65 70 6f 72 74 45 72 72 | 6f 72 22 2c 42 75 66 66 |eportErr|or",Buff|
|00003760| 65 72 25 2c 25 31 31 30 | 30 31 2c 22 52 61 73 74 |er%,%110|01,"Rast|
|00003770| 65 72 46 72 65 71 75 65 | 6e 63 79 22 0d 0e 2e 16 |erFreque|ncy"....|
|00003780| 20 20 20 20 c9 20 36 20 | 20 3a f2 43 6f 6d 70 69 | . 6 | :.Compi|
|00003790| 6c 65 0d 0e 38 15 20 20 | 20 20 c9 20 38 20 20 3a |le..8. | . 8 :|
|000037a0| 71 75 69 74 25 3d b9 0d | 0e 42 05 cb 0d 0e 4c 25 |quit%=..|.B....L%|
|000037b0| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 50 6f 69 6e |.. "Wimp|_GetPoin|
|000037c0| 74 65 72 49 6e 66 6f 22 | 2c 2c 42 75 66 66 65 72 |terInfo"|,,Buffer|
|000037d0| 25 0d 0e 56 13 e7 20 42 | 75 66 66 65 72 25 21 38 |%..V.. B|uffer%!8|
|000037e0| 3d 31 20 8c 0d 0e 60 23 | 20 20 20 20 c8 99 20 22 |=1 ...`#| .. "|
|000037f0| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|00003800| 2c 2c 4d 61 69 6e 25 0d | 0e 6a 05 cd 0d 0e 74 05 |,,Main%.|.j....t.|
|00003810| e1 0d 0e 7e 04 0d 0e 88 | 14 dd 20 a4 4d 75 6c 74 |...~....|.. .Mult|
|00003820| 69 54 61 73 6b 28 4d 25 | 29 0d 0e 92 13 c8 8e 20 |iTask(M%|)...... |
|00003830| 4d 75 6c 74 69 54 61 73 | 6b 25 20 ca 0d 0e 9c 31 |MultiTas|k% ....1|
|00003840| 20 20 20 20 c9 20 30 20 | 20 20 20 20 20 3a 4d 25 | . 0 | :M%|
|00003850| 3d a4 53 6f 72 72 79 5f | 77 6f 6e 74 5f 68 61 70 |=.Sorry_|wont_hap|
|00003860| 70 65 6e 5f 61 67 61 69 | 6e 28 52 25 29 0d 0e a6 |pen_agai|n(R%)...|
|00003870| 24 20 20 20 20 c9 20 31 | 20 20 20 20 20 20 3a f4 |$ . 1| :.|
|00003880| 20 43 6f 6d 70 69 6c 65 | 72 20 69 73 20 62 75 73 | Compile|r is bus|
|00003890| 79 0d 0e b0 24 20 20 20 | 20 c9 20 32 20 20 20 20 |y...$ | . 2 |
|000038a0| 20 20 3a f4 20 45 78 74 | 72 61 74 6f 72 20 69 73 | :. Ext|rator is|
|000038b0| 20 62 75 73 79 0d 0e ba | 27 20 20 20 20 c9 20 33 | busy...|' . 3|
|000038c0| 20 20 20 20 20 20 3a f4 | 20 49 6e 69 74 57 69 6e | :.| InitWin|
|000038d0| 64 6f 77 73 20 69 73 20 | 62 75 73 79 0d 0e c4 1d |dows is |busy....|
|000038e0| 20 20 20 20 c9 20 31 30 | 2c 31 31 20 3a 42 75 66 | . 10|,11 :Buf|
|000038f0| 66 65 72 25 21 30 3d 2d | 32 0d 0e ce 27 20 20 20 |fer%!0=-|2...' |
|00003900| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 42 75 66 | | Buf|
|00003910| 66 65 72 25 21 34 3d 49 | 63 6f 6e 42 61 72 48 25 |fer%!4=I|conBarH%|
|00003920| 0d 0e d8 33 20 20 20 20 | 20 20 20 20 20 20 20 20 |...3 | |
|00003930| 20 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 | .. "|Wimp_Get|
|00003940| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 42 75 66 66 |IconStat|e",,Buff|
|00003950| 65 72 25 0d 0e e2 31 20 | 20 20 20 20 20 20 20 20 |er%...1 | |
|00003960| 20 20 20 20 20 20 20 c8 | 99 20 22 57 69 6d 70 5f | .|. "Wimp_|
|00003970| 44 65 6c 65 74 65 49 63 | 6f 6e 22 2c 2c 42 75 66 |DeleteIc|on",,Buf|
|00003980| 66 65 72 25 0d 0e ec 4c | 20 20 20 20 20 20 20 20 |fer%...L| |
|00003990| 20 20 20 20 20 20 20 20 | 49 63 6f 6e 42 61 72 48 | |IconBarH|
|000039a0| 25 3d a4 49 63 6f 6e 28 | 49 63 6f 6e 25 2c 2d 31 |%=.Icon(|Icon%,-1|
|000039b0| 2c 30 2c 30 2c 36 38 2c | 36 38 2c 26 33 30 31 41 |,0,0,68,|68,&301A|
|000039c0| 2c 22 61 63 74 69 76 65 | 22 2c 30 2c 30 2c 30 29 |,"active|",0,0,0)|
|000039d0| 0d 0e f6 32 20 20 20 20 | 20 20 20 20 20 20 20 20 |...2 | |
|000039e0| 20 20 20 20 e7 20 4d 75 | 6c 74 69 54 61 73 6b 25 | . Mu|ltiTask%|
|000039f0| 3d 31 30 20 8c 20 4d 75 | 6c 74 69 54 61 73 6b 25 |=10 . Mu|ltiTask%|
|00003a00| 3d 30 0d 0f 00 1d 20 20 | 20 20 c9 20 31 32 20 20 |=0.... | . 12 |
|00003a10| 20 20 3a 42 75 66 66 65 | 72 25 21 30 3d 2d 32 0d | :Buffe|r%!0=-2.|
|00003a20| 0f 0a 27 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..' | |
|00003a30| 20 20 20 42 75 66 66 65 | 72 25 21 34 3d 49 63 6f | Buffe|r%!4=Ico|
|00003a40| 6e 42 61 72 48 25 0d 0f | 14 33 20 20 20 20 20 20 |nBarH%..|.3 |
|00003a50| 20 20 20 20 20 20 20 20 | 20 20 c8 99 20 22 57 69 | | .. "Wi|
|00003a60| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00003a70| 2c 2c 42 75 66 66 65 72 | 25 0d 0f 1e 31 20 20 20 |,,Buffer|%...1 |
|00003a80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 c8 99 20 | | .. |
|00003a90| 22 57 69 6d 70 5f 44 65 | 6c 65 74 65 49 63 6f 6e |"Wimp_De|leteIcon|
|00003aa0| 22 2c 2c 42 75 66 66 65 | 72 25 0d 0f 28 4f 20 20 |",,Buffe|r%..(O |
|00003ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 49 63 | | Ic|
|00003ac0| 6f 6e 42 61 72 48 25 3d | a4 49 63 6f 6e 28 49 63 |onBarH%=|.Icon(Ic|
|00003ad0| 6f 6e 25 2c 2d 31 2c 30 | 2c 30 2c 36 38 2c 36 38 |on%,-1,0|,0,68,68|
|00003ae0| 2c 26 33 30 31 41 2c 22 | 74 72 61 6e 73 69 65 6e |,&301A,"|transien|
|00003af0| 74 22 2c 30 2c 30 2c 30 | 29 0d 0f 32 28 20 20 20 |t",0,0,0|)..2( |
|00003b00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 f2 43 6c | | .Cl|
|00003b10| 6f 73 65 57 69 6e 64 6f | 77 28 52 65 67 73 48 25 |oseWindo|w(RegsH%|
|00003b20| 29 0d 0f 3c 28 20 20 20 | 20 20 20 20 20 20 20 20 |)..<( | |
|00003b30| 20 20 20 20 20 f2 43 6c | 6f 73 65 57 69 6e 64 6f | .Cl|oseWindo|
|00003b40| 77 28 57 6f 72 6b 48 25 | 29 0d 0f 46 26 20 20 20 |w(WorkH%|)..F& |
|00003b50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 f2 43 6c | | .Cl|
|00003b60| 6f 73 65 57 69 6e 64 6f | 77 28 49 64 48 25 29 0d |oseWindo|w(IdH%).|
|00003b70| 0f 50 29 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.P) | |
|00003b80| 20 20 20 f2 43 6c 6f 73 | 65 57 69 6e 64 6f 77 28 | .Clos|eWindow(|
|00003b90| 53 70 65 63 73 48 25 29 | 0d 0f 5a 1d 20 20 20 20 |SpecsH%)|..Z. |
|00003ba0| c9 20 31 33 20 20 20 20 | 3a 42 75 66 66 65 72 25 |. 13 |:Buffer%|
|00003bb0| 21 30 3d 2d 32 0d 0f 64 | 27 20 20 20 20 20 20 20 |!0=-2..d|' |
|00003bc0| 20 20 20 20 20 20 20 20 | 20 42 75 66 66 65 72 25 | | Buffer%|
|00003bd0| 21 34 3d 49 63 6f 6e 42 | 61 72 48 25 0d 0f 6e 33 |!4=IconB|arH%..n3|
|00003be0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003bf0| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 49 63 6f 6e |.. "Wimp|_GetIcon|
|00003c00| 53 74 61 74 65 22 2c 2c | 42 75 66 66 65 72 25 0d |State",,|Buffer%.|
|00003c10| 0f 78 31 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.x1 | |
|00003c20| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 44 65 6c 65 | .. "W|imp_Dele|
|00003c30| 74 65 49 63 6f 6e 22 2c | 2c 42 75 66 66 65 72 25 |teIcon",|,Buffer%|
|00003c40| 0d 0f 82 4f 20 20 20 20 | 20 20 20 20 20 20 20 20 |...O | |
|00003c50| 20 20 20 20 49 63 6f 6e | 42 61 72 48 25 3d a4 49 | Icon|BarH%=.I|
|00003c60| 63 6f 6e 28 49 63 6f 6e | 25 2c 2d 31 2c 30 2c 30 |con(Icon|%,-1,0,0|
|00003c70| 2c 36 38 2c 36 38 2c 26 | 33 30 31 41 2c 22 21 75 |,68,68,&|301A,"!u|
|00003c80| 6e 69 6d 6f 64 65 32 22 | 2c 30 2c 30 2c 30 29 0d |nimode2"|,0,0,0).|
|00003c90| 0f 8c 05 cb 0d 0f 96 07 | 3d 4d 25 0d 0f a0 04 0d |........|=M%.....|
|00003ca0| 0f aa 11 dd 20 f2 54 61 | 73 6b 53 77 69 74 63 68 |.... .Ta|skSwitch|
|00003cb0| 0d 0f b4 27 e7 20 54 61 | 73 6b 53 77 69 74 63 68 |...'. Ta|skSwitch|
|00003cc0| 69 6e 67 25 3d b9 20 8c | 20 f2 4d 61 69 6e 50 6f |ing%=. .| .MainPo|
|00003cd0| 6c 6c 28 26 33 30 29 0d | 0f be 05 e1 0d 0f c8 04 |ll(&30).|........|
|00003ce0| 0d 0f d2 22 dd 20 a4 53 | 6f 72 72 79 5f 77 6f 6e |...". .S|orry_won|
|00003cf0| 74 5f 68 61 70 70 65 6e | 5f 61 67 61 69 6e 28 52 |t_happen|_again(R|
|00003d00| 25 29 0d 0f dc 49 f4 20 | 50 52 4f 43 44 65 62 75 |%)...I. |PROCDebu|
|00003d10| 67 28 22 4d 61 73 6b 65 | 64 20 6f 75 74 20 72 65 |g("Maske|d out re|
|00003d20| 61 73 6f 6e 63 6f 64 65 | 3a 20 22 2b 53 54 52 24 |asoncode|: "+STR$|
|00003d30| 52 25 2b 22 20 4d 61 73 | 6b 20 22 2b 53 54 52 24 |R%+" Mas|k "+STR$|
|00003d40| 7e 50 6f 6c 6c 4d 61 73 | 6b 25 29 0d 0f e6 4c 50 |~PollMas|k%)...LP|
|00003d50| 6f 6c 6c 4d 61 73 6b 25 | 3d 28 50 6f 6c 6c 4d 61 |ollMask%|=(PollMa|
|00003d60| 73 6b 25 20 84 20 28 31 | 3c 3c 52 25 29 29 20 80 |sk% . (1|<<R%)) .|
|00003d70| 20 26 31 43 45 33 39 37 | 33 20 20 3a f4 20 6d 61 | &1CE397|3 :. ma|
|00003d80| 70 20 6f 75 74 20 75 6e | 75 73 65 64 20 72 65 61 |p out un|used rea|
|00003d90| 73 6f 6e 63 6f 64 65 0d | 0f f0 2b f4 20 50 52 4f |soncode.|..+. PRO|
|00003da0| 43 44 65 62 75 67 28 22 | 4e 65 77 20 4d 61 73 6b |CDebug("|New Mask|
|00003db0| 20 22 2b 53 54 52 24 7e | 50 6f 6c 6c 4d 61 73 6b | "+STR$~|PollMask|
|00003dc0| 25 29 0d 0f fa 0e 3d 50 | 6f 6c 6c 4d 61 73 6b 25 |%)....=P|ollMask%|
|00003dd0| 0d 10 04 04 0d 10 0e 19 | dd 20 f2 4b 65 79 50 72 |........|. .KeyPr|
|00003de0| 65 73 73 28 57 25 2c 49 | 25 2c 43 25 29 0d 10 18 |ess(W%,I|%,C%)...|
|00003df0| 17 e7 20 4d 75 6c 74 69 | 54 61 73 6b 25 3c 3e 30 |.. Multi|Task%<>0|
|00003e00| 20 8c 20 e1 0d 10 22 0b | c8 8e 20 43 25 20 ca 0d | . ...".|.. C% ..|
|00003e10| 10 2c 19 20 20 20 20 c9 | 20 33 39 39 3a f4 20 43 |.,. .| 399:. C|
|00003e20| 75 72 73 6f 72 20 55 70 | 0d 10 36 1b 20 20 20 20 |ursor Up|..6. |
|00003e30| c9 20 33 39 38 3a f4 20 | 43 75 72 73 6f 72 20 44 |. 398:. |Cursor D|
|00003e40| 6f 77 6e 0d 10 40 18 20 | 20 20 20 c9 20 31 33 20 |own..@. | . 13 |
|00003e50| 3a f4 20 3c 52 65 74 75 | 72 6e 3e 0d 10 4a 17 20 |:. <Retu|rn>..J. |
|00003e60| 20 20 20 20 20 20 20 20 | 20 20 20 c8 8e 20 57 25 | | .. W%|
|00003e70| 20 ca 0d 10 54 22 20 20 | 20 20 20 20 20 20 20 20 | ...T" | |
|00003e80| 20 20 20 20 20 20 c9 20 | 55 6e 69 4d 6f 64 65 48 | . |UniModeH|
|00003e90| 25 20 20 3a 0d 10 5e 3d | 20 20 20 20 20 20 20 20 |% :..^=| |
|00003ea0| 20 20 20 20 20 20 20 20 | 20 20 20 20 e7 20 bb 28 | | . .(|
|00003eb0| a4 47 65 74 57 72 69 74 | 65 61 62 6c 65 28 55 6e |.GetWrit|eable(Un|
|00003ec0| 69 4d 6f 64 65 48 25 2c | 30 29 29 3e 31 32 37 20 |iModeH%,|0))>127 |
|00003ed0| 8c 0d 10 68 2e 20 20 20 | 20 20 20 20 20 20 20 20 |...h. | |
|00003ee0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 f2 45 | | .E|
|00003ef0| 72 72 6f 72 28 2d 33 2c | 22 45 52 52 39 22 29 0d |rror(-3,|"ERR9").|
|00003f00| 10 72 19 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.r. | |
|00003f10| 20 20 20 20 20 20 20 cc | 0d 10 7c 28 20 20 20 20 | .|..|( |
|00003f20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003f30| 20 20 20 20 20 f2 4c 6f | 73 65 5f 43 61 72 65 74 | .Lo|se_Caret|
|00003f40| 0d 10 86 4c 20 20 20 20 | 20 20 20 20 20 20 20 20 |...L | |
|00003f50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 f2 4d 6f | | .Mo|
|00003f60| 64 65 4c 6f 61 64 28 a4 | 47 65 74 57 72 69 74 65 |deLoad(.|GetWrite|
|00003f70| 61 62 6c 65 28 55 6e 69 | 4d 6f 64 65 48 25 2c 30 |able(Uni|ModeH%,0|
|00003f80| 29 2c 4d 6f 64 65 4c 6f | 61 64 24 29 0d 10 90 44 |),ModeLo|ad$)...D|
|00003f90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003fa0| 20 20 20 20 20 20 20 20 | 20 e7 20 4d 6f 64 65 4c | | . ModeL|
|00003fb0| 6f 61 64 25 3d a3 20 8c | 20 f2 43 6c 6f 73 65 57 |oad%=. .| .CloseW|
|00003fc0| 69 6e 64 6f 77 28 55 6e | 69 4d 6f 64 65 48 25 29 |indow(Un|iModeH%)|
|00003fd0| 0d 10 9a 19 20 20 20 20 | 20 20 20 20 20 20 20 20 |.... | |
|00003fe0| 20 20 20 20 20 20 20 20 | cd 0d 10 a4 11 20 20 20 | |..... |
|00003ff0| 20 20 20 20 20 20 20 20 | 20 cb 0d 10 ae 28 20 20 | | ....( |
|00004000| 20 20 7f 20 20 20 20 20 | 20 20 3a c8 99 20 22 57 | . | :.. "W|
|00004010| 69 6d 70 5f 50 72 6f 63 | 65 73 73 4b 65 79 22 2c |imp_Proc|essKey",|
|00004020| 43 25 0d 10 b8 05 cb 0d | 10 c2 05 e1 0d 10 cc 04 |C%......|........|
|00004030| 0d 10 d6 10 dd 20 f2 47 | 65 74 5f 43 61 72 65 74 |..... .G|et_Caret|
|00004040| 0d 10 e0 27 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |...'.. "|Wimp_Get|
|00004050| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 2c |CaretPos|ition",,|
|00004060| 42 75 66 66 65 72 25 0d | 10 ea 16 43 61 72 65 74 |Buffer%.|...Caret|
|00004070| 5f 52 30 3d 42 75 66 66 | 65 72 25 21 30 0d 10 f4 |_R0=Buff|er%!0...|
|00004080| 16 43 61 72 65 74 5f 52 | 31 3d 42 75 66 66 65 72 |.Caret_R|1=Buffer|
|00004090| 25 21 34 0d 10 fe 16 43 | 61 72 65 74 5f 52 32 3d |%!4....C|aret_R2=|
|000040a0| 42 75 66 66 65 72 25 21 | 38 0d 11 08 17 43 61 72 |Buffer%!|8....Car|
|000040b0| 65 74 5f 52 33 3d 42 75 | 66 66 65 72 25 21 31 32 |et_R3=Bu|ffer%!12|
|000040c0| 0d 11 12 17 43 61 72 65 | 74 5f 52 34 3d 42 75 66 |....Care|t_R4=Buf|
|000040d0| 66 65 72 25 21 31 36 0d | 11 1c 17 43 61 72 65 74 |fer%!16.|...Caret|
|000040e0| 5f 52 35 3d 42 75 66 66 | 65 72 25 21 32 30 0d 11 |_R5=Buff|er%!20..|
|000040f0| 26 13 43 61 72 65 74 5f | 47 6f 74 74 65 6e 25 3d |&.Caret_|Gotten%=|
|00004100| b9 0d 11 30 05 e1 0d 11 | 3a 05 3a 0d 11 44 17 dd |...0....|:.:..D..|
|00004110| 20 f2 53 65 74 5f 43 61 | 72 65 74 28 57 25 2c 49 | .Set_Ca|ret(W%,I|
|00004120| 25 29 0d 11 4e 30 c8 99 | 20 22 57 69 6d 70 5f 53 |%)..N0..| "Wimp_S|
|00004130| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00004140| 2c 57 25 2c 49 25 2c 39 | 39 39 39 2c 2c 2d 31 2c |,W%,I%,9|999,,-1,|
|00004150| 2d 31 0d 11 58 05 e1 0d | 11 62 05 3a 0d 11 6c 11 |-1..X...|.b.:..l.|
|00004160| dd 20 f2 4c 6f 73 65 5f | 43 61 72 65 74 0d 11 76 |. .Lose_|Caret..v|
|00004170| 15 e7 20 43 61 72 65 74 | 5f 47 6f 74 74 65 6e 25 |.. Caret|_Gotten%|
|00004180| 20 8c 0d 11 80 58 20 20 | 20 20 c8 99 20 22 57 69 | ....X | .. "Wi|
|00004190| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|000041a0| 69 6f 6e 22 2c 43 61 72 | 65 74 5f 52 30 2c 43 61 |ion",Car|et_R0,Ca|
|000041b0| 72 65 74 5f 52 31 2c 43 | 61 72 65 74 5f 52 32 2c |ret_R1,C|aret_R2,|
|000041c0| 43 61 72 65 74 5f 52 33 | 2c 43 61 72 65 74 5f 52 |Caret_R3|,Caret_R|
|000041d0| 34 2c 43 61 72 65 74 5f | 52 35 0d 11 8a 17 20 20 |4,Caret_|R5.... |
|000041e0| 20 20 43 61 72 65 74 5f | 47 6f 74 74 65 6e 25 3d | Caret_|Gotten%=|
|000041f0| a3 0d 11 94 05 cd 0d 11 | 9e 05 e1 0d 11 a8 04 0d |........|........|
|00004200| 11 b2 30 dd 20 a4 49 63 | 6f 6e 28 42 25 2c 57 25 |..0. .Ic|on(B%,W%|
|00004210| 2c 58 25 2c 59 25 2c 49 | 25 2c 48 25 2c 46 25 2c |,X%,Y%,I|%,H%,F%,|
|00004220| 41 24 2c 64 31 25 2c 64 | 32 25 2c 64 33 25 29 0d |A$,d1%,d|2%,d3%).|
|00004230| 11 bc 08 ea 20 41 25 0d | 11 c6 0c 42 25 21 30 30 |.... A%.|...B%!00|
|00004240| 3d 57 25 0d 11 d0 0c 42 | 25 21 30 34 3d 58 25 0d |=W%....B|%!04=X%.|
|00004250| 11 da 0c 42 25 21 30 38 | 3d 59 25 0d 11 e4 0f 42 |...B%!08|=Y%....B|
|00004260| 25 21 31 32 3d 58 25 2b | 49 25 0d 11 ee 0f 42 25 |%!12=X%+|I%....B%|
|00004270| 21 31 36 3d 59 25 2b 48 | 25 0d 11 f8 0c 42 25 21 |!16=Y%+H|%....B%!|
|00004280| 32 30 3d 46 25 0d 12 02 | 0d e7 20 64 31 25 3d 30 |20=F%...|.. d1%=0|
|00004290| 20 8c 0d 12 0c 13 20 20 | 20 20 24 28 42 25 2b 32 | ..... | $(B%+2|
|000042a0| 34 29 3d 41 24 0d 12 16 | 05 cc 0d 12 20 11 20 20 |4)=A$...|.... . |
|000042b0| 20 20 42 25 21 32 34 3d | 64 31 25 0d 12 2a 11 20 | B%!24=|d1%..*. |
|000042c0| 20 20 20 42 25 21 32 38 | 3d 64 32 25 0d 12 34 11 | B%!28|=d2%..4.|
|000042d0| 20 20 20 20 42 25 21 33 | 32 3d 64 33 25 0d 12 3e | B%!3|2=d3%..>|
|000042e0| 05 cd 0d 12 48 21 c8 99 | 20 22 57 69 6d 70 5f 43 |....H!..| "Wimp_C|
|000042f0| 72 65 61 74 65 49 63 6f | 6e 22 2c 2c 42 25 20 b8 |reateIco|n",,B% .|
|00004300| 20 41 25 0d 12 52 07 3d | 41 25 0d 12 5c 04 0d 12 | A%..R.=|A%..\...|
|00004310| 66 17 dd 20 f2 4c 6f 61 | 64 4d 65 73 73 61 67 65 |f.. .Loa|dMessage|
|00004320| 46 69 6c 65 73 0d 12 70 | 38 c8 99 20 22 4d 65 73 |Files..p|8.. "Mes|
|00004330| 73 61 67 65 54 72 61 6e | 73 5f 46 69 6c 65 49 6e |sageTran|s_FileIn|
|00004340| 66 6f 22 2c 2c 22 55 6e | 69 4d 6f 64 65 3a 4f 70 |fo",,"Un|iMode:Op|
|00004350| 74 69 6f 6e 73 22 20 b8 | 20 2c 2c 4d 25 0d 12 7a |tions" .| ,,M%..z|
|00004360| 34 4f 70 74 69 6f 6e 73 | 25 3d a4 44 69 6d 42 6c |4Options|%=.DimBl|
|00004370| 6f 63 6b 28 4d 25 29 3a | 4f 70 74 69 6f 6e 49 6e |ock(M%):|OptionIn|
|00004380| 66 6f 25 3d a4 44 69 6d | 42 6c 6f 63 6b 28 31 36 |fo%=.Dim|Block(16|
|00004390| 29 0d 12 84 39 c8 99 20 | 22 4d 65 73 73 61 67 65 |)...9.. |"Message|
|000043a0| 54 72 61 6e 73 5f 46 69 | 6c 65 49 6e 66 6f 22 2c |Trans_Fi|leInfo",|
|000043b0| 2c 22 55 6e 69 4d 6f 64 | 65 3a 4d 65 73 73 61 67 |,"UniMod|e:Messag|
|000043c0| 65 73 22 20 b8 20 2c 2c | 4d 25 0d 12 8e 36 4d 65 |es" . ,,|M%...6Me|
|000043d0| 73 73 61 67 65 73 25 3d | a4 44 69 6d 42 6c 6f 63 |ssages%=|.DimBloc|
|000043e0| 6b 28 4d 25 29 3a 4d 65 | 73 73 61 67 65 49 6e 66 |k(M%):Me|ssageInf|
|000043f0| 6f 25 3d a4 44 69 6d 42 | 6c 6f 63 6b 28 31 36 29 |o%=.DimB|lock(16)|
|00004400| 0d 12 98 45 c8 99 20 22 | 4d 65 73 73 61 67 65 54 |...E.. "|MessageT|
|00004410| 72 61 6e 73 5f 4f 70 65 | 6e 46 69 6c 65 22 2c 4f |rans_Ope|nFile",O|
|00004420| 70 74 69 6f 6e 49 6e 66 | 6f 25 2c 22 55 6e 69 4d |ptionInf|o%,"UniM|
|00004430| 6f 64 65 3a 4f 70 74 69 | 6f 6e 73 22 2c 4f 70 74 |ode:Opti|ons",Opt|
|00004440| 69 6f 6e 73 25 0d 12 a2 | 2b c8 99 20 22 4d 65 73 |ions%...|+.. "Mes|
|00004450| 73 61 67 65 54 72 61 6e | 73 5f 43 6c 6f 73 65 46 |sageTran|s_CloseF|
|00004460| 69 6c 65 22 2c 4f 70 74 | 69 6f 6e 49 6e 66 6f 25 |ile",Opt|ionInfo%|
|00004470| 0d 12 ac 48 c8 99 20 22 | 4d 65 73 73 61 67 65 54 |...H.. "|MessageT|
|00004480| 72 61 6e 73 5f 4f 70 65 | 6e 46 69 6c 65 22 2c 4d |rans_Ope|nFile",M|
|00004490| 65 73 73 61 67 65 49 6e | 66 6f 25 2c 22 55 6e 69 |essageIn|fo%,"Uni|
|000044a0| 4d 6f 64 65 3a 4d 65 73 | 73 61 67 65 73 22 2c 4d |Mode:Mes|sages",M|
|000044b0| 65 73 73 61 67 65 73 25 | 0d 12 b6 2c c8 99 20 22 |essages%|...,.. "|
|000044c0| 4d 65 73 73 61 67 65 54 | 72 61 6e 73 5f 43 6c 6f |MessageT|rans_Clo|
|000044d0| 73 65 46 69 6c 65 22 2c | 4d 65 73 73 61 67 65 49 |seFile",|MessageI|
|000044e0| 6e 66 6f 25 0d 12 c0 22 | f4 20 50 72 65 70 61 72 |nfo%..."|. Prepar|
|000044f0| 65 20 66 6f 72 20 6c 6f | 61 64 69 6e 67 20 6f 66 |e for lo|ading of|
|00004500| 20 66 69 6c 65 73 0d 12 | ca 1d 53 63 72 69 70 74 | files..|..Script|
|00004510| 49 6e 66 6f 25 3d a4 44 | 69 6d 42 6c 6f 63 6b 28 |Info%=.D|imBlock(|
|00004520| 31 36 29 0d 12 d4 05 e1 | 0d 12 de 04 0d 12 e8 14 |16).....|........|
|00004530| dd 20 f2 4c 6f 61 64 54 | 65 6d 70 6c 61 74 65 73 |. .LoadT|emplates|
|00004540| 0d 12 f2 11 ea 20 42 25 | 2c 49 25 2c 48 25 2c 5a |..... B%|,I%,H%,Z|
|00004550| 25 0d 12 fc 2f c8 99 20 | 22 57 69 6d 70 5f 4f 70 |%.../.. |"Wimp_Op|
|00004560| 65 6e 54 65 6d 70 6c 61 | 74 65 22 2c 2c 22 55 6e |enTempla|te",,"Un|
|00004570| 69 4d 6f 64 65 3a 54 65 | 6d 70 6c 61 74 65 73 22 |iMode:Te|mplates"|
|00004580| 0d 13 06 3a c8 99 20 22 | 57 69 6d 70 5f 4c 6f 61 |...:.. "|Wimp_Loa|
|00004590| 64 54 65 6d 70 6c 61 74 | 65 22 2c 2c 2d 31 2c 30 |dTemplat|e",,-1,0|
|000045a0| 2c 30 2c 2d 31 2c 22 53 | 61 76 65 42 6f 78 22 2c |,0,-1,"S|aveBox",|
|000045b0| 30 20 b8 20 2c 42 25 2c | 49 25 0d 13 10 2f 20 20 |0 . ,B%,|I%.../ |
|000045c0| 20 20 5a 25 3d a4 43 6c | 61 69 6d 52 4d 41 28 42 | Z%=.Cl|aimRMA(B|
|000045d0| 25 29 3a 44 69 61 6c 6f | 67 49 25 3d a4 44 69 6d |%):Dialo|gI%=.Dim|
|000045e0| 42 6c 6f 63 6b 28 49 25 | 29 0d 13 1a 38 20 20 20 |Block(I%|)...8 |
|000045f0| 20 44 69 61 6c 6f 67 48 | 25 3d a4 43 72 65 61 74 | DialogH|%=.Creat|
|00004600| 65 57 69 6e 64 6f 77 28 | 5a 25 2c 44 69 61 6c 6f |eWindow(|Z%,Dialo|
|00004610| 67 49 25 2c 49 25 2c 22 | 53 61 76 65 42 6f 78 22 |gI%,I%,"|SaveBox"|
|00004620| 29 0d 13 24 17 20 20 20 | 20 f2 52 65 6c 65 61 73 |)..$. | .Releas|
|00004630| 65 52 4d 41 28 5a 25 29 | 0d 13 2e 37 c8 99 20 22 |eRMA(Z%)|...7.. "|
|00004640| 57 69 6d 70 5f 4c 6f 61 | 64 54 65 6d 70 6c 61 74 |Wimp_Loa|dTemplat|
|00004650| 65 22 2c 2c 2d 31 2c 30 | 2c 30 2c 2d 31 2c 22 49 |e",,-1,0|,0,-1,"I|
|00004660| 6e 66 6f 22 2c 30 20 b8 | 20 2c 42 25 2c 49 25 0d |nfo",0 .| ,B%,I%.|
|00004670| 13 38 2d 20 20 20 20 5a | 25 3d a4 43 6c 61 69 6d |.8- Z|%=.Claim|
|00004680| 52 4d 41 28 42 25 29 3a | 49 6e 66 6f 49 25 3d a4 |RMA(B%):|InfoI%=.|
|00004690| 44 69 6d 42 6c 6f 63 6b | 28 49 25 29 0d 13 42 31 |DimBlock|(I%)..B1|
|000046a0| 20 20 20 20 49 6e 66 6f | 48 25 3d a4 43 72 65 61 | Info|H%=.Crea|
|000046b0| 74 65 57 69 6e 64 6f 77 | 28 5a 25 2c 49 6e 66 6f |teWindow|(Z%,Info|
|000046c0| 49 25 2c 49 25 2c 22 49 | 6e 66 6f 22 29 0d 13 4c |I%,I%,"I|nfo")..L|
|000046d0| 17 20 20 20 20 f2 52 65 | 6c 65 61 73 65 52 4d 41 |. .Re|leaseRMA|
|000046e0| 28 5a 25 29 0d 13 56 3b | c8 99 20 22 57 69 6d 70 |(Z%)..V;|.. "Wimp|
|000046f0| 5f 4c 6f 61 64 54 65 6d | 70 6c 61 74 65 22 2c 2c |_LoadTem|plate",,|
|00004700| 2d 31 2c 30 2c 30 2c 2d | 31 2c 22 4d 6f 64 65 4c |-1,0,0,-|1,"ModeL|
|00004710| 6f 61 64 22 2c 30 20 b8 | 20 2c 42 25 2c 49 25 0d |oad",0 .| ,B%,I%.|
|00004720| 13 60 30 20 20 20 20 5a | 25 3d a4 43 6c 61 69 6d |.`0 Z|%=.Claim|
|00004730| 52 4d 41 28 42 25 29 3a | 55 6e 69 4d 6f 64 65 49 |RMA(B%):|UniModeI|
|00004740| 25 3d a4 44 69 6d 42 6c | 6f 63 6b 28 49 25 29 0d |%=.DimBl|ock(I%).|
|00004750| 13 6a 3b 20 20 20 20 55 | 6e 69 4d 6f 64 65 48 25 |.j; U|niModeH%|
|00004760| 3d a4 43 72 65 61 74 65 | 57 69 6e 64 6f 77 28 5a |=.Create|Window(Z|
|00004770| 25 2c 55 6e 69 4d 6f 64 | 65 49 25 2c 49 25 2c 22 |%,UniMod|eI%,I%,"|
|00004780| 4d 6f 64 65 4c 6f 61 64 | 22 29 0d 13 74 17 20 20 |ModeLoad|")..t. |
|00004790| 20 20 f2 52 65 6c 65 61 | 73 65 52 4d 41 28 5a 25 | .Relea|seRMA(Z%|
|000047a0| 29 0d 13 7e 38 c8 99 20 | 22 57 69 6d 70 5f 4c 6f |)..~8.. |"Wimp_Lo|
|000047b0| 61 64 54 65 6d 70 6c 61 | 74 65 22 2c 2c 2d 31 2c |adTempla|te",,-1,|
|000047c0| 30 2c 30 2c 2d 31 2c 22 | 53 70 65 63 73 22 2c 30 |0,0,-1,"|Specs",0|
|000047d0| 20 b8 20 2c 42 25 2c 49 | 25 0d 13 88 2e 20 20 20 | . ,B%,I|%.... |
|000047e0| 20 5a 25 3d a4 43 6c 61 | 69 6d 52 4d 41 28 42 25 | Z%=.Cla|imRMA(B%|
|000047f0| 29 3a 53 70 65 63 73 49 | 25 3d a4 44 69 6d 42 6c |):SpecsI|%=.DimBl|
|00004800| 6f 63 6b 28 49 25 29 0d | 13 92 34 20 20 20 20 53 |ock(I%).|..4 S|
|00004810| 70 65 63 73 48 25 3d a4 | 43 72 65 61 74 65 57 69 |pecsH%=.|CreateWi|
|00004820| 6e 64 6f 77 28 5a 25 2c | 53 70 65 63 73 49 25 2c |ndow(Z%,|SpecsI%,|
|00004830| 49 25 2c 22 53 70 65 63 | 73 22 29 0d 13 9c 17 20 |I%,"Spec|s").... |
|00004840| 20 20 20 f2 52 65 6c 65 | 61 73 65 52 4d 41 28 5a | .Rele|aseRMA(Z|
|00004850| 25 29 0d 13 a6 37 c8 99 | 20 22 57 69 6d 70 5f 4c |%)...7..| "Wimp_L|
|00004860| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 2d 31 |oadTempl|ate",,-1|
|00004870| 2c 30 2c 30 2c 2d 31 2c | 22 57 6f 72 6b 22 2c 30 |,0,0,-1,|"Work",0|
|00004880| 20 b8 20 2c 42 25 2c 49 | 25 0d 13 b0 2d 20 20 20 | . ,B%,I|%...- |
|00004890| 20 5a 25 3d a4 43 6c 61 | 69 6d 52 4d 41 28 42 25 | Z%=.Cla|imRMA(B%|
|000048a0| 29 3a 57 6f 72 6b 49 25 | 3d a4 44 69 6d 42 6c 6f |):WorkI%|=.DimBlo|
|000048b0| 63 6b 28 49 25 29 0d 13 | ba 31 20 20 20 20 57 6f |ck(I%)..|.1 Wo|
|000048c0| 72 6b 48 25 3d a4 43 72 | 65 61 74 65 57 69 6e 64 |rkH%=.Cr|eateWind|
|000048d0| 6f 77 28 5a 25 2c 57 6f | 72 6b 49 25 2c 49 25 2c |ow(Z%,Wo|rkI%,I%,|
|000048e0| 22 57 6f 72 6b 22 29 0d | 13 c4 17 20 20 20 20 f2 |"Work").|... .|
|000048f0| 52 65 6c 65 61 73 65 52 | 4d 41 28 5a 25 29 0d 13 |ReleaseR|MA(Z%)..|
|00004900| ce 3a c8 99 20 22 57 69 | 6d 70 5f 4c 6f 61 64 54 |.:.. "Wi|mp_LoadT|
|00004910| 65 6d 70 6c 61 74 65 22 | 2c 2c 2d 31 2c 30 2c 30 |emplate"|,,-1,0,0|
|00004920| 2c 2d 31 2c 22 43 6f 6e | 74 72 6f 6c 22 2c 30 20 |,-1,"Con|trol",0 |
|00004930| b8 20 2c 42 25 2c 49 25 | 0d 13 d8 30 20 20 20 20 |. ,B%,I%|...0 |
|00004940| 5a 25 3d a4 43 6c 61 69 | 6d 52 4d 41 28 42 25 29 |Z%=.Clai|mRMA(B%)|
|00004950| 3a 43 6f 6e 74 72 6f 6c | 49 25 3d a4 44 69 6d 42 |:Control|I%=.DimB|
|00004960| 6c 6f 63 6b 28 49 25 29 | 0d 13 e2 3a 20 20 20 20 |lock(I%)|...: |
|00004970| 43 6f 6e 74 72 6f 6c 48 | 25 3d a4 43 72 65 61 74 |ControlH|%=.Creat|
|00004980| 65 57 69 6e 64 6f 77 28 | 5a 25 2c 43 6f 6e 74 72 |eWindow(|Z%,Contr|
|00004990| 6f 6c 49 25 2c 49 25 2c | 22 43 6f 6e 74 72 6f 6c |olI%,I%,|"Control|
|000049a0| 22 29 0d 13 ec 17 20 20 | 20 20 f2 52 65 6c 65 61 |").... | .Relea|
|000049b0| 73 65 52 4d 41 28 5a 25 | 29 0d 13 f6 37 c8 99 20 |seRMA(Z%|)...7.. |
|000049c0| 22 57 69 6d 70 5f 4c 6f | 61 64 54 65 6d 70 6c 61 |"Wimp_Lo|adTempla|
|000049d0| 74 65 22 2c 2c 2d 31 2c | 30 2c 30 2c 2d 31 2c 22 |te",,-1,|0,0,-1,"|
|000049e0| 56 69 64 63 22 2c 30 20 | b8 20 2c 42 25 2c 49 25 |Vidc",0 |. ,B%,I%|
|000049f0| 0d 14 00 2d 20 20 20 20 | 5a 25 3d a4 43 6c 61 69 |...- |Z%=.Clai|
|00004a00| 6d 52 4d 41 28 42 25 29 | 3a 52 65 67 73 49 25 3d |mRMA(B%)|:RegsI%=|
|00004a10| a4 44 69 6d 42 6c 6f 63 | 6b 28 49 25 29 0d 14 0a |.DimBloc|k(I%)...|
|00004a20| 31 20 20 20 20 52 65 67 | 73 48 25 3d a4 43 72 65 |1 Reg|sH%=.Cre|
|00004a30| 61 74 65 57 69 6e 64 6f | 77 28 5a 25 2c 52 65 67 |ateWindo|w(Z%,Reg|
|00004a40| 73 49 25 2c 49 25 2c 22 | 56 69 64 63 22 29 0d 14 |sI%,I%,"|Vidc")..|
|00004a50| 14 17 20 20 20 20 f2 52 | 65 6c 65 61 73 65 52 4d |.. .R|eleaseRM|
|00004a60| 41 28 5a 25 29 0d 14 1e | 39 c8 99 20 22 57 69 6d |A(Z%)...|9.. "Wim|
|00004a70| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00004a80| 2c 2d 31 2c 30 2c 30 2c | 2d 31 2c 22 49 64 54 65 |,-1,0,0,|-1,"IdTe|
|00004a90| 78 74 22 2c 30 20 b8 20 | 2c 42 25 2c 49 25 0d 14 |xt",0 . |,B%,I%..|
|00004aa0| 28 2b 20 20 20 20 5a 25 | 3d a4 43 6c 61 69 6d 52 |(+ Z%|=.ClaimR|
|00004ab0| 4d 41 28 42 25 29 3a 49 | 64 49 25 3d a4 44 69 6d |MA(B%):I|dI%=.Dim|
|00004ac0| 42 6c 6f 63 6b 28 49 25 | 29 0d 14 32 2f 20 20 20 |Block(I%|)..2/ |
|00004ad0| 20 49 64 48 25 3d a4 43 | 72 65 61 74 65 57 69 6e | IdH%=.C|reateWin|
|00004ae0| 64 6f 77 28 5a 25 2c 49 | 64 49 25 2c 49 25 2c 22 |dow(Z%,I|dI%,I%,"|
|00004af0| 49 64 54 65 78 74 22 29 | 0d 14 3c 17 20 20 20 20 |IdText")|..<. |
|00004b00| f2 52 65 6c 65 61 73 65 | 52 4d 41 28 5a 25 29 0d |.Release|RMA(Z%).|
|00004b10| 14 46 1b c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |.F... "W|imp_Clos|
|00004b20| 65 54 65 6d 70 6c 61 74 | 65 22 0d 14 50 04 0d 14 |eTemplat|e"..P...|
|00004b30| 5a 05 e1 0d 14 64 04 0d | 14 6e 20 dd 20 a4 43 72 |Z....d..|.n . .Cr|
|00004b40| 65 61 74 65 57 69 6e 64 | 6f 77 28 41 25 2c 42 25 |eateWind|ow(A%,B%|
|00004b50| 2c 4c 25 2c 41 24 29 0d | 14 78 08 ea 20 48 25 0d |,L%,A$).|.x.. H%.|
|00004b60| 14 82 2f c8 99 20 22 57 | 69 6d 70 5f 4c 6f 61 64 |../.. "W|imp_Load|
|00004b70| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 41 25 2c 42 25 |Template|",,A%,B%|
|00004b80| 2c 42 25 2b 4c 25 2c 2d | 31 2c 41 24 2c 30 0d 14 |,B%+L%,-|1,A$,0..|
|00004b90| 8c 0c 41 25 21 32 34 3d | 2d 31 0d 14 96 0c 48 25 |..A%!24=|-1....H%|
|00004ba0| 3d 41 25 21 37 32 0d 14 | a0 28 24 28 48 25 29 3d |=A%!72..|.($(H%)=|
|00004bb0| a4 5f 4c 6f 6f 6b 75 70 | 28 4d 65 73 73 61 67 65 |._Lookup|(Message|
|00004bc0| 49 6e 66 6f 25 2c 41 24 | 29 2b bd 28 30 29 0d 14 |Info%,A$|)+.(0)..|
|00004bd0| aa 23 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |.#.. "Wi|mp_Creat|
|00004be0| 65 57 69 6e 64 6f 77 22 | 2c 2c 41 25 20 b8 20 48 |eWindow"|,,A% . H|
|00004bf0| 25 0d 14 b4 07 3d 48 25 | 0d 14 be 04 0d 14 c8 18 |%....=H%|........|
|00004c00| dd 20 f2 4f 70 65 6e 57 | 69 6e 64 6f 77 28 42 25 |. .OpenW|indow(B%|
|00004c10| 2c 54 25 29 0d 14 d2 29 | e7 20 54 25 3d 31 20 8c |,T%)...)|. T%=1 .|
|00004c20| 20 c8 99 20 22 57 69 6d | 70 5f 47 65 74 57 69 6e | .. "Wim|p_GetWin|
|00004c30| 64 6f 77 53 74 61 74 65 | 22 2c 2c 42 25 0d 14 dc |dowState|",,B%...|
|00004c40| 1c c8 99 20 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 |... "Wim|p_OpenWi|
|00004c50| 6e 64 6f 77 22 2c 2c 42 | 25 0d 14 e6 05 e1 0d 14 |ndow",,B|%.......|
|00004c60| f0 04 0d 14 fa 16 dd 20 | f2 43 6c 6f 73 65 57 69 |....... |.CloseWi|
|00004c70| 6e 64 6f 77 28 48 25 29 | 0d 15 04 0d 21 57 69 6d |ndow(H%)|....!Wim|
|00004c80| 70 25 3d 48 25 0d 15 0e | 2c e7 20 48 25 3d 55 6e |p%=H%...|,. H%=Un|
|00004c90| 69 4d 6f 64 65 48 25 20 | 8c 20 4d 6f 64 65 4c 6f |iModeH% |. ModeLo|
|00004ca0| 61 64 25 3d a3 3a f2 4c | 6f 73 65 5f 43 61 72 65 |ad%=.:.L|ose_Care|
|00004cb0| 74 0d 15 18 20 c8 99 20 | 22 57 69 6d 70 5f 43 6c |t... .. |"Wimp_Cl|
|00004cc0| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 57 69 6d 70 |oseWindo|w",,Wimp|
|00004cd0| 25 0d 15 22 05 e1 0d 15 | 2c 04 0d 15 36 13 dd 20 |%.."....|,...6.. |
|00004ce0| a4 44 69 6d 42 6c 6f 63 | 6b 28 53 25 29 0d 15 40 |.DimBloc|k(S%)..@|
|00004cf0| 0b ea 20 54 25 2c 42 25 | 0d 15 4a 18 4d 65 6d 6f |.. T%,B%|..J.Memo|
|00004d00| 72 79 41 76 61 69 6c 61 | 62 6c 65 25 3d 93 2d e0 |ryAvaila|ble%=.-.|
|00004d10| 0d 15 54 51 e7 20 4d 65 | 6d 6f 72 79 41 76 61 69 |..TQ. Me|moryAvai|
|00004d20| 6c 61 62 6c 65 25 3c 28 | 53 25 2b 32 30 34 38 29 |lable%<(|S%+2048)|
|00004d30| 20 8c 20 f2 4d 6f 61 6e | 28 30 30 2c 22 4e 6f 74 | . .Moan|(00,"Not|
|00004d40| 20 65 6e 6f 75 67 68 20 | 6d 65 6d 6f 72 79 20 69 | enough |memory i|
|00004d50| 6e 20 74 68 69 73 20 73 | 6c 6f 74 22 2c 30 29 3a |n this s|lot",0):|
|00004d60| e0 0d 15 5e 0b de 20 42 | 25 20 53 25 0d 15 68 1f |...^.. B|% S%..h.|
|00004d70| e3 20 54 25 3d 42 25 20 | b8 20 42 25 2b 53 25 20 |. T%=B% |. B%+S% |
|00004d80| 88 20 34 3a 21 54 25 3d | 30 3a ed 0d 15 72 07 3d |. 4:!T%=|0:...r.=|
|00004d90| 42 25 0d 15 7c 04 0d 15 | 86 12 dd 20 f2 4d 65 6d |B%..|...|... .Mem|
|00004da0| 6f 72 79 53 74 61 74 65 | 0d 15 90 1c 4d 65 6d 6f |oryState|....Memo|
|00004db0| 72 79 41 6c 6c 6f 63 61 | 74 65 64 25 3d 93 2d 26 |ryAlloca|ted%=.-&|
|00004dc0| 38 30 30 30 0d 15 9a 32 | f4 20 50 52 4f 43 44 65 |8000...2|. PROCDe|
|00004dd0| 62 75 67 28 22 41 6c 6c | 6f 63 61 74 65 64 20 22 |bug("All|ocated "|
|00004de0| 2b 53 54 52 24 4d 65 6d | 6f 72 79 41 6c 6c 6f 63 |+STR$Mem|oryAlloc|
|00004df0| 61 74 65 64 25 29 0d 15 | a4 18 4d 65 6d 6f 72 79 |ated%)..|..Memory|
|00004e00| 34 50 72 6f 67 72 61 6d | 25 3d b8 50 2d 90 0d 15 |4Program|%=.P-...|
|00004e10| ae 37 f4 20 50 52 4f 43 | 44 65 62 75 67 28 22 55 |.7. PROC|Debug("U|
|00004e20| 73 65 64 20 62 79 20 70 | 72 6f 67 72 61 6d 20 22 |sed by p|rogram "|
|00004e30| 2b 53 54 52 24 4d 65 6d | 6f 72 79 34 50 72 6f 67 |+STR$Mem|ory4Prog|
|00004e40| 72 61 6d 25 29 0d 15 b8 | 18 4d 65 6d 6f 72 79 41 |ram%)...|.MemoryA|
|00004e50| 76 61 69 6c 61 62 6c 65 | 25 3d 93 2d e0 0d 15 c2 |vailable|%=.-....|
|00004e60| 32 f4 20 50 52 4f 43 44 | 65 62 75 67 28 22 41 76 |2. PROCD|ebug("Av|
|00004e70| 61 69 6c 61 62 6c 65 20 | 22 2b 53 54 52 24 4d 65 |ailable |"+STR$Me|
|00004e80| 6d 6f 72 79 41 76 61 69 | 6c 61 62 6c 65 25 29 0d |moryAvai|lable%).|
|00004e90| 15 cc 05 e1 0d 15 d6 04 | 0d 15 e0 15 dd 20 a4 47 |........|..... .G|
|00004ea0| 65 74 55 74 69 6c 56 65 | 72 73 69 6f 6e 0d 15 ea |etUtilVe|rsion...|
|00004eb0| 08 ea 20 52 25 0d 15 f4 | 18 c8 99 20 22 58 4f 53 |.. R%...|... "XOS|
|00004ec0| 5f 42 79 74 65 22 2c 30 | 20 b8 20 52 25 0d 15 fe |_Byte",0| . R%...|
|00004ed0| 21 3d bb 28 c1 a4 5f 53 | 74 72 69 6e 67 30 28 52 |!=.(.._S|tring0(R|
|00004ee0| 25 2b 34 29 2c 39 2c 34 | 29 29 2a 31 30 30 0d 16 |%+4),9,4|))*100..|
|00004ef0| 08 04 0d 16 12 15 dd 20 | f2 4d 6f 61 6e 28 41 25 |....... |.Moan(A%|
|00004f00| 2c 41 24 2c 42 25 29 0d | 16 1c 0d 43 25 3d 45 72 |,A$,B%).|...C%=Er|
|00004f10| 72 6f 72 25 0d 16 26 0b | 43 25 21 30 3d 41 25 0d |ror%..&.|C%!0=A%.|
|00004f20| 16 30 38 24 28 43 25 2b | 34 29 3d 41 24 2b 22 20 |.08$(C%+|4)=A$+" |
|00004f30| 28 49 6e 74 65 72 6e 61 | 6c 20 63 6f 64 65 3a 20 |(Interna|l code: |
|00004f40| 22 2b c3 7e 41 25 2b 22 | 2f 22 2b c3 42 25 2b 22 |"+.~A%+"|/"+.B%+"|
|00004f50| 29 22 2b bd 28 30 29 0d | 16 3a 32 c8 99 20 22 57 |)"+.(0).|.:2.. "W|
|00004f60| 69 6d 70 5f 52 65 70 6f | 72 74 45 72 72 6f 72 22 |imp_Repo|rtError"|
|00004f70| 2c 43 25 2c 25 31 30 2c | 22 55 6e 69 4d 6f 64 65 |,C%,%10,|"UniMode|
|00004f80| 20 50 72 65 57 69 6d 70 | 22 0d 16 44 18 f4 20 50 | PreWimp|"..D.. P|
|00004f90| 52 4f 43 44 65 62 75 67 | 28 24 28 43 25 2b 34 29 |ROCDebug|($(C%+4)|
|00004fa0| 29 0d 16 4e 1b f4 20 50 | 52 4f 43 44 65 62 75 67 |)..N.. P|ROCDebug|
|00004fb0| 28 22 41 61 72 67 68 2e | 2e 2e 22 29 0d 16 58 05 |("Aargh.|..")..X.|
|00004fc0| e1 0d 16 62 04 0d 16 6c | 13 dd 20 f2 45 72 72 6f |...b...l|.. .Erro|
|00004fd0| 72 28 53 25 2c 41 24 29 | 0d 16 76 0b ea 20 43 25 |r(S%,A$)|..v.. C%|
|00004fe0| 2c 4d 25 0d 16 80 04 0d | 16 8a 4b f4 20 49 6e 74 |,M%.....|..K. Int|
|00004ff0| 65 72 6e 61 6c 20 45 72 | 72 6f 72 73 20 61 72 65 |ernal Er|rors are|
|00005000| 20 69 6e 20 74 68 65 20 | 72 61 6e 67 65 20 2d 33 | in the |range -3|
|00005010| 2e 2e 2e 2d 31 20 61 6e | 64 20 6d 75 73 74 20 62 |...-1 an|d must b|
|00005020| 65 20 6c 6f 6f 6b 65 64 | 20 75 70 20 69 6e 20 74 |e looked| up in t|
|00005030| 68 65 0d 16 94 3e f4 20 | 6d 65 73 73 61 67 65 20 |he...>. |message |
|00005040| 66 69 6c 65 2e 20 41 6c | 6c 20 6f 74 68 65 72 20 |file. Al|l other |
|00005050| 65 72 72 6f 72 73 20 28 | 42 41 53 49 43 2f 4f 53 |errors (|BASIC/OS|
|00005060| 29 20 61 72 65 20 70 61 | 73 73 65 64 20 6f 6e 2e |) are pa|ssed on.|
|00005070| 0d 16 9e 15 f4 20 53 25 | 3a 20 2d 33 20 3d 20 4e |..... S%|: -3 = N|
|00005080| 6f 74 69 66 79 0d 16 a8 | 1b f4 20 20 20 20 20 2d |otify...|.. -|
|00005090| 32 20 3d 20 55 73 65 72 | 20 44 65 63 69 64 65 73 |2 = User| Decides|
|000050a0| 0d 16 b2 14 f4 20 20 20 | 20 20 2d 31 20 3d 20 46 |..... | -1 = F|
|000050b0| 61 74 61 6c 0d 16 bc 04 | 0d 16 c6 13 4d 25 3d 4d |atal....|....M%=M|
|000050c0| 65 73 73 61 67 65 49 6e | 66 6f 25 0d 16 d0 0e 21 |essageIn|fo%....!|
|000050d0| 45 72 72 6f 72 25 3d 53 | 25 0d 16 da 27 e7 20 53 |Error%=S|%...'. S|
|000050e0| 25 3c 30 20 80 20 53 25 | 3e 2d 34 20 8c 20 41 24 |%<0 . S%|>-4 . A$|
|000050f0| 3d a4 5f 4c 6f 6f 6b 75 | 70 28 4d 25 2c 41 24 29 |=._Looku|p(M%,A$)|
|00005100| 0d 16 e4 3c e7 20 53 25 | 3c 2d 33 20 84 20 53 25 |...<. S%|<-3 . S%|
|00005110| 3e 3d 30 20 8c 20 53 25 | 3d 2d 31 20 3a f4 20 42 |>=0 . S%|=-1 :. B|
|00005120| 41 53 49 43 2f 4f 53 20 | 65 72 72 6f 72 73 20 61 |ASIC/OS |errors a|
|00005130| 6c 77 61 79 73 20 66 61 | 74 61 6c 2e 0d 16 ee 12 |lways fa|tal.....|
|00005140| 24 28 45 72 72 6f 72 25 | 2b 34 29 3d 41 24 0d 16 |$(Error%|+4)=A$..|
|00005150| f8 0b c8 8e 20 53 25 20 | ca 0d 17 02 0c 20 20 20 |.... S% |..... |
|00005160| 20 c9 20 2d 33 0d 17 0c | 10 20 20 20 20 20 20 20 | . -3...|. |
|00005170| 20 f4 20 4f 4b 0d 17 16 | 46 20 20 20 20 20 20 20 | . OK...|F |
|00005180| 20 c8 99 20 22 57 69 6d | 70 5f 52 65 70 6f 72 74 | .. "Wim|p_Report|
|00005190| 45 72 72 6f 72 22 2c 45 | 72 72 6f 72 25 2c 25 31 |Error",E|rror%,%1|
|000051a0| 2c a4 5f 4c 6f 6f 6b 75 | 70 28 4d 25 2c 22 53 54 |,._Looku|p(M%,"ST|
|000051b0| 41 54 31 22 29 20 b8 20 | 2c 43 25 0d 17 20 0c 20 |AT1") . |,C%.. . |
|000051c0| 20 20 20 c9 20 2d 31 0d | 17 2a 14 20 20 20 20 20 | . -1.|.*. |
|000051d0| 20 20 20 f4 20 43 41 4e | 43 45 4c 0d 17 34 47 20 | . CAN|CEL..4G |
|000051e0| 20 20 20 20 20 20 20 c8 | 99 20 22 57 69 6d 70 5f | .|. "Wimp_|
|000051f0| 52 65 70 6f 72 74 45 72 | 72 6f 72 22 2c 45 72 72 |ReportEr|ror",Err|
|00005200| 6f 72 25 2c 25 31 30 2c | a4 5f 4c 6f 6f 6b 75 70 |or%,%10,|._Lookup|
|00005210| 28 4d 25 2c 22 53 54 41 | 54 32 22 29 20 b8 20 2c |(M%,"STA|T2") . ,|
|00005220| 43 25 0d 17 3e 0c 20 20 | 20 20 c9 20 2d 32 0d 17 |C%..>. | . -2..|
|00005230| 48 19 20 20 20 20 20 20 | 20 20 f4 20 4f 4b 20 2f |H. | . OK /|
|00005240| 20 43 41 4e 43 45 4c 0d | 17 52 47 20 20 20 20 20 | CANCEL.|.RG |
|00005250| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 52 65 70 6f | .. "W|imp_Repo|
|00005260| 72 74 45 72 72 6f 72 22 | 2c 45 72 72 6f 72 25 2c |rtError"|,Error%,|
|00005270| 25 31 31 2c a4 5f 4c 6f | 6f 6b 75 70 28 4d 25 2c |%11,._Lo|okup(M%,|
|00005280| 22 53 54 41 54 33 22 29 | 20 b8 20 2c 43 25 0d 17 |"STAT3")| . ,C%..|
|00005290| 5c 05 cb 0d 17 66 0b c8 | 8e 20 43 25 20 ca 0d 17 |\....f..|. C% ...|
|000052a0| 70 0d 20 20 20 20 c9 20 | 30 2c 31 0d 17 7a 0d 20 |p. . |0,1..z. |
|000052b0| 20 20 20 20 20 20 20 e1 | 0d 17 84 0b 20 20 20 20 | .|.... |
|000052c0| c9 20 32 0d 17 8e 24 20 | 20 20 20 20 20 20 20 ff |. 2...$ | .|
|000052d0| 28 22 25 55 6e 53 65 74 | 20 55 6e 69 4d 6f 64 65 |("%UnSet| UniMode|
|000052e0| 24 46 6c 61 67 22 29 0d | 17 98 1b 20 20 20 20 20 |$Flag").|... |
|000052f0| 20 20 20 f4 20 50 52 4f | 43 44 65 62 75 67 28 41 | . PRO|CDebug(A|
|00005300| 24 29 0d 17 a2 23 20 20 | 20 20 20 20 20 20 f4 20 |$)...# | . |
|00005310| 50 52 4f 43 44 65 62 75 | 67 28 22 41 61 72 67 68 |PROCDebu|g("Aargh|
|00005320| 2e 2e 2e 22 29 0d 17 ac | 1f 20 20 20 20 20 20 20 |...")...|. |
|00005330| 20 c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 | .. "Wim|p_CloseD|
|00005340| 6f 77 6e 22 0d 17 b6 0d | 20 20 20 20 20 20 20 20 |own"....| |
|00005350| e0 0d 17 c0 05 cb 0d 17 | ca 05 e1 0d 17 d4 04 0d |........|........|
|00005360| 17 de 15 dd 20 f2 44 72 | 61 67 42 6f 78 28 57 25 |.... .Dr|agBox(W%|
|00005370| 2c 49 25 29 0d 17 e8 08 | ea 20 66 24 0d 17 f2 0d |,I%)....|. f$....|
|00005380| 21 57 69 6d 70 25 3d 57 | 25 0d 17 fc 23 c8 99 20 |!Wimp%=W|%...#.. |
|00005390| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 |"Wimp_Ge|tWindowS|
|000053a0| 74 61 74 65 22 2c 2c 57 | 69 6d 70 25 0d 18 06 18 |tate",,W|imp%....|
|000053b0| 6f 78 25 3d 57 69 6d 70 | 25 21 34 2d 57 69 6d 70 |ox%=Wimp|%!4-Wimp|
|000053c0| 25 21 32 30 0d 18 10 19 | 6f 79 25 3d 57 69 6d 70 |%!20....|oy%=Wimp|
|000053d0| 25 21 31 36 2d 57 69 6d | 70 25 21 32 34 0d 18 1a |%!16-Wim|p%!24...|
|000053e0| 0d 21 57 69 6d 70 25 3d | 57 25 0d 18 24 0e 57 69 |.!Wimp%=|W%..$.Wi|
|000053f0| 6d 70 25 21 34 3d 49 25 | 0d 18 2e 21 c8 99 20 22 |mp%!4=I%|...!.. "|
|00005400| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|00005410| 65 22 2c 2c 57 69 6d 70 | 25 0d 18 38 0e 57 69 6d |e",,Wimp|%..8.Wim|
|00005420| 70 25 21 30 3d 57 25 0d | 18 42 0d 57 69 6d 70 25 |p%!0=W%.|.B.Wimp%|
|00005430| 21 34 3d 35 0d 18 4c 17 | 57 69 6d 70 25 21 38 3d |!4=5..L.|Wimp%!8=|
|00005440| 6f 78 25 2b 57 69 6d 70 | 25 21 38 0d 18 56 19 57 |ox%+Wimp|%!8..V.W|
|00005450| 69 6d 70 25 21 31 32 3d | 6f 79 25 2b 57 69 6d 70 |imp%!12=|oy%+Wimp|
|00005460| 25 21 31 32 0d 18 60 19 | 57 69 6d 70 25 21 31 36 |%!12..`.|Wimp%!16|
|00005470| 3d 6f 78 25 2b 57 69 6d | 70 25 21 31 36 0d 18 6a |=ox%+Wim|p%!16..j|
|00005480| 19 57 69 6d 70 25 21 32 | 30 3d 6f 79 25 2b 57 69 |.Wimp%!2|0=oy%+Wi|
|00005490| 6d 70 25 21 32 30 0d 18 | 74 0e 57 69 6d 70 25 21 |mp%!20..|t.Wimp%!|
|000054a0| 32 34 3d 30 0d 18 7e 0e | 57 69 6d 70 25 21 32 38 |24=0..~.|Wimp%!28|
|000054b0| 3d 30 0d 18 88 16 57 69 | 6d 70 25 21 33 32 3d 26 |=0....Wi|mp%!32=&|
|000054c0| 37 46 46 46 46 46 46 46 | 0d 18 92 16 57 69 6d 70 |7FFFFFFF|....Wimp|
|000054d0| 25 21 33 36 3d 26 37 46 | 46 46 46 46 46 46 0d 18 |%!36=&7F|FFFFFF..|
|000054e0| 9c 2f 57 69 6d 70 25 21 | 34 30 3d 30 3a 57 69 6d |./Wimp%!|40=0:Wim|
|000054f0| 70 25 21 34 34 3d 30 3a | 57 69 6d 70 25 21 34 38 |p%!44=0:|Wimp%!48|
|00005500| 3d 30 3a 57 69 6d 70 25 | 21 35 32 3d 30 0d 18 a6 |=0:Wimp%|!52=0...|
|00005510| 20 66 24 3d a4 47 65 74 | 57 72 69 74 65 61 62 6c | f$=.Get|Writeabl|
|00005520| 65 28 44 69 61 6c 6f 67 | 48 25 2c 32 29 0d 18 b0 |e(Dialog|H%,2)...|
|00005530| 12 e7 20 53 6f 6c 69 64 | 44 72 61 67 25 20 8c 0d |.. Solid|Drag% ..|
|00005540| 18 ba 2f 20 20 20 20 c8 | 99 20 22 44 72 61 67 41 |../ .|. "DragA|
|00005550| 53 70 72 69 74 65 5f 53 | 74 61 72 74 22 2c 31 33 |Sprite_S|tart",13|
|00005560| 33 2c 31 2c 66 24 2c 57 | 69 6d 70 25 2b 38 0d 18 |3,1,f$,W|imp%+8..|
|00005570| c4 05 cc 0d 18 ce 20 20 | 20 20 20 c8 99 20 22 57 |...... | .. "W|
|00005580| 69 6d 70 5f 44 72 61 67 | 42 6f 78 22 2c 2c 57 69 |imp_Drag|Box",,Wi|
|00005590| 6d 70 25 0d 18 d8 05 cd | 0d 18 e2 05 e1 0d 18 ec |mp%.....|........|
|000055a0| 04 0d 18 f6 0f dd 20 f2 | 44 72 61 67 53 74 6f 70 |...... .|DragStop|
|000055b0| 0d 19 00 0b ea 20 4c 24 | 2c 66 24 0d 19 0a 40 e7 |..... L$|,f$...@.|
|000055c0| 20 53 6f 6c 69 64 44 72 | 61 67 25 20 8c 20 c8 99 | SolidDr|ag% . ..|
|000055d0| 20 22 44 72 61 67 41 53 | 70 72 69 74 65 5f 53 74 | "DragAS|prite_St|
|000055e0| 6f 70 22 20 8b 20 c8 99 | 20 22 57 69 6d 70 5f 44 |op" . ..| "Wimp_D|
|000055f0| 72 61 67 42 6f 78 22 2c | 2c 2d 31 0d 19 14 20 4c |ragBox",|,-1... L|
|00005600| 24 3d a4 47 65 74 57 72 | 69 74 65 61 62 6c 65 28 |$=.GetWr|iteable(|
|00005610| 44 69 61 6c 6f 67 48 25 | 2c 31 29 0d 19 1e 20 66 |DialogH%|,1)... f|
|00005620| 24 3d a4 47 65 74 57 72 | 69 74 65 61 62 6c 65 28 |$=.GetWr|iteable(|
|00005630| 44 69 61 6c 6f 67 48 25 | 2c 32 29 0d 19 28 23 c8 |DialogH%|,2)..(#.|
|00005640| 99 20 22 57 69 6d 70 5f | 47 65 74 50 6f 69 6e 74 |. "Wimp_|GetPoint|
|00005650| 65 72 49 6e 66 6f 22 2c | 2c 57 69 6d 70 25 0d 19 |erInfo",|,Wimp%..|
|00005660| 32 15 57 69 6d 70 25 21 | 32 30 3d 57 69 6d 70 25 |2.Wimp%!|20=Wimp%|
|00005670| 21 31 32 0d 19 3c 15 57 | 69 6d 70 25 21 32 34 3d |!12..<.W|imp%!24=|
|00005680| 57 69 6d 70 25 21 31 36 | 0d 19 46 14 57 69 6d 70 |Wimp%!16|..F.Wimp|
|00005690| 25 21 32 38 3d 57 69 6d | 70 25 21 30 0d 19 50 14 |%!28=Wim|p%!0..P.|
|000056a0| 57 69 6d 70 25 21 33 32 | 3d 57 69 6d 70 25 21 34 |Wimp%!32|=Wimp%!4|
|000056b0| 0d 19 5a 10 57 69 6d 70 | 25 21 33 36 3d 35 31 32 |..Z.Wimp|%!36=512|
|000056c0| 0d 19 64 0f 57 69 6d 70 | 25 21 30 3d 32 35 36 0d |..d.Wimp|%!0=256.|
|000056d0| 19 6e 0e 57 69 6d 70 25 | 21 31 32 3d 30 0d 19 78 |.n.Wimp%|!12=0..x|
|000056e0| 1a 57 69 6d 70 25 21 31 | 36 3d 31 20 3a f4 20 44 |.Wimp%!1|6=1 :. D|
|000056f0| 61 74 61 53 61 76 65 0d | 19 82 1a 57 69 6d 70 25 |ataSave.|...Wimp%|
|00005700| 21 34 30 3d a0 28 22 26 | 22 2b c2 66 24 2c 33 29 |!40=.("&|"+.f$,3)|
|00005710| 29 0d 19 8c 12 24 28 57 | 69 6d 70 25 2b 34 34 29 |)....$(W|imp%+44)|
|00005720| 3d 4c 24 0d 19 96 34 c8 | 99 20 22 57 69 6d 70 5f |=L$...4.|. "Wimp_|
|00005730| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 2c 31 37 2c |SendMess|age",17,|
|00005740| 57 69 6d 70 25 2c 57 69 | 6d 70 25 21 32 30 2c 57 |Wimp%,Wi|mp%!20,W|
|00005750| 69 6d 70 25 21 32 34 0d | 19 a0 05 e1 0d 19 aa 04 |imp%!24.|........|
|00005760| 0d 19 b4 1c dd 20 f2 44 | 61 74 61 53 61 76 65 28 |..... .D|ataSave(|
|00005770| 54 79 70 65 25 2c 46 69 | 6c 65 24 29 0d 19 be 0c |Type%,Fi|le$)....|
|00005780| ea 20 53 61 76 65 64 25 | 0d 19 c8 0c 53 61 76 65 |. Saved%|....Save|
|00005790| 64 25 3d a3 0d 19 d2 0e | c8 8e 20 54 79 70 65 25 |d%=.....|.. Type%|
|000057a0| 20 ca 0d 19 dc 31 20 20 | 20 20 c9 20 26 46 46 46 | ....1 | . &FFF|
|000057b0| 20 20 20 20 20 20 20 3a | f2 53 61 76 65 53 63 72 | :|.SaveScr|
|000057c0| 69 70 74 28 46 69 6c 65 | 24 29 3a 53 61 76 65 64 |ipt(File|$):Saved|
|000057d0| 25 3d b9 0d 19 e6 25 20 | 20 20 20 c9 20 5f 46 69 |%=....% | . _Fi|
|000057e0| 6c 65 54 79 70 65 25 20 | 3a e7 20 43 6f 6d 70 69 |leType% |:. Compi|
|000057f0| 6c 65 64 25 3d b9 20 8c | 0d 19 f0 34 20 20 20 20 |led%=. .|...4 |
|00005800| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005810| 20 20 20 20 f2 53 61 76 | 65 4d 44 46 28 46 69 6c | .Sav|eMDF(Fil|
|00005820| 65 24 29 3a 53 61 76 65 | 64 25 3d b9 0d 19 fa 1a |e$):Save|d%=.....|
|00005830| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005840| 20 20 20 20 20 cc 0d 1a | 04 2e 20 20 20 20 20 20 | ...|.. |
|00005850| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005860| 20 20 f2 45 72 72 6f 72 | 28 2d 33 2c 22 45 52 52 | .Error|(-3,"ERR|
|00005870| 31 31 22 29 0d 1a 0e 1a | 20 20 20 20 20 20 20 20 |11")....| |
|00005880| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 cd 0d 1a | | ...|
|00005890| 18 05 cb 0d 1a 22 10 e7 | 20 53 61 76 65 64 25 3d |....."..| Saved%=|
|000058a0| b9 20 8c 0d 1a 2c 18 20 | 20 20 20 57 69 6d 70 25 |. ...,. | Wimp%|
|000058b0| 21 31 32 3d 57 69 6d 70 | 25 21 38 0d 1a 36 12 20 |!12=Wimp|%!8..6. |
|000058c0| 20 20 20 57 69 6d 70 25 | 21 31 36 3d 33 0d 1a 40 | Wimp%|!16=3..@|
|000058d0| 38 20 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 53 65 |8 .. |"Wimp_Se|
|000058e0| 6e 64 4d 65 73 73 61 67 | 65 22 2c 31 38 2c 57 69 |ndMessag|e",18,Wi|
|000058f0| 6d 70 25 2c 57 69 6d 70 | 25 21 32 30 2c 57 69 6d |mp%,Wimp|%!20,Wim|
|00005900| 70 25 21 32 34 0d 1a 4a | 05 cc 0d 1a 54 14 20 20 |p%!24..J|....T. |
|00005910| 20 20 42 75 66 66 65 72 | 25 21 31 36 3d 34 0d 1a | Buffer|%!16=4..|
|00005920| 5e 20 20 20 20 20 f2 57 | 69 6d 70 4d 65 73 73 61 |^ .W|impMessa|
|00005930| 67 65 28 2d 31 2c 42 75 | 66 66 65 72 25 29 0d 1a |ge(-1,Bu|ffer%)..|
|00005940| 68 05 cd 0d 1a 72 05 e1 | 0d 1a 7c 04 0d 1a 86 13 |h....r..|..|.....|
|00005950| dd 20 f2 44 61 74 61 4c | 6f 61 64 28 42 25 29 0d |. .DataL|oad(B%).|
|00005960| 1a 90 08 ea 20 53 25 0d | 1a 9a 1e 4d 6f 64 65 4c |.... S%.|...ModeL|
|00005970| 6f 61 64 24 3d a4 5f 53 | 74 72 69 6e 67 30 28 42 |oad$=._S|tring0(B|
|00005980| 25 2b 34 34 29 0d 1a a4 | 08 53 25 3d a3 0d 1a ae |%+44)...|.S%=....|
|00005990| 0e c8 8e 20 42 25 21 34 | 30 20 ca 0d 1a b8 25 20 |... B%!4|0 ....% |
|000059a0| 20 20 20 c9 20 5f 46 69 | 6c 65 54 79 70 65 25 20 | . _Fi|leType% |
|000059b0| 3a e7 20 4d 6f 64 65 4c | 6f 61 64 25 3d b9 20 8c |:. ModeL|oad%=. .|
|000059c0| 0d 1a c2 26 20 20 20 20 | 20 20 20 20 20 20 20 20 |...& | |
|000059d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 42 25 21 31 | | B%!1|
|000059e0| 32 3d 42 25 21 38 0d 1a | cc 23 20 20 20 20 20 20 |2=B%!8..|.# |
|000059f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005a00| 20 20 42 25 21 31 36 3d | 34 0d 1a d6 37 20 20 20 | B%!16=|4...7 |
|00005a10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005a20| 20 20 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 53 65 | .. |"Wimp_Se|
|00005a30| 6e 64 4d 65 73 73 61 67 | 65 22 2c 31 39 2c 42 25 |ndMessag|e",19,B%|
|00005a40| 0d 1a e0 2d 20 20 20 20 | 20 20 20 20 20 20 20 20 |...- | |
|00005a50| 20 20 20 20 20 20 20 20 | 20 20 20 20 f2 45 72 72 | | .Err|
|00005a60| 6f 72 28 2d 33 2c 22 45 | 52 52 36 22 29 0d 1a ea |or(-3,"E|RR6")...|
|00005a70| 1d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00005a80| 20 20 20 20 20 20 20 20 | 20 e1 0d 1a f4 1a 20 20 | | ..... |
|00005a90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005aa0| 20 20 20 cd 0d 1a fe 24 | 20 20 20 20 20 20 20 20 | ....$| |
|00005ab0| 20 20 20 20 20 20 20 20 | 53 25 3d b9 3a 4d 6f 64 | |S%=.:Mod|
|00005ac0| 65 4c 6f 61 64 25 3d b9 | 0d 1b 08 24 20 20 20 20 |eLoad%=.|...$ |
|00005ad0| c9 20 26 46 46 46 20 20 | 20 20 20 20 20 3a e7 20 |. &FFF | :. |
|00005ae0| 28 42 25 21 31 36 29 3c | 3e 35 20 8c 0d 1b 12 34 |(B%!16)<|>5 ....4|
|00005af0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005b00| 20 20 20 20 20 20 20 20 | 53 25 3d a4 43 68 65 63 | |S%=.Chec|
|00005b10| 6b 46 69 6c 65 28 4d 6f | 64 65 4c 6f 61 64 24 29 |kFile(Mo|deLoad$)|
|00005b20| 0d 1b 1c 24 20 20 20 20 | 20 20 20 20 20 20 20 20 |...$ | |
|00005b30| 20 20 20 20 20 20 20 20 | 20 20 20 20 e7 20 53 25 | | . S%|
|00005b40| 3d b9 20 8c 0d 1b 26 31 | 20 20 20 20 20 20 20 20 |=. ...&1| |
|00005b50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005b60| 20 20 20 20 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 | .. "|Hourglas|
|00005b70| 73 5f 4f 6e 22 0d 1b 30 | 36 20 20 20 20 20 20 20 |s_On"..0|6 |
|00005b80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005b90| 20 20 20 20 20 f2 4c 6f | 61 64 53 63 72 69 70 74 | .Lo|adScript|
|00005ba0| 28 4d 6f 64 65 4c 6f 61 | 64 24 29 0d 1b 3a 32 20 |(ModeLoa|d$)..:2 |
|00005bb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005bc0| 20 20 20 20 20 20 20 20 | 20 20 20 c8 99 20 22 48 | | .. "H|
|00005bd0| 6f 75 72 67 6c 61 73 73 | 5f 4f 66 66 22 0d 1b 44 |ourglass|_Off"..D|
|00005be0| 1d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00005bf0| 20 20 20 20 20 20 20 20 | 20 cc 0d 1b 4e 31 20 20 | | ...N1 |
|00005c00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005c10| 20 20 20 20 20 20 20 20 | 20 20 f2 45 72 72 6f 72 | | .Error|
|00005c20| 28 2d 33 2c 22 45 52 52 | 38 22 29 0d 1b 58 1d 20 |(-3,"ERR|8")..X. |
|00005c30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005c40| 20 20 20 20 20 20 20 cd | 0d 1b 62 19 20 20 20 20 | .|..b. |
|00005c50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005c60| cd 0d 1b 6c 05 cb 0d 1b | 76 04 0d 1b 80 0a e7 20 |...l....|v...... |
|00005c70| 53 25 20 8c 0d 1b 8a 12 | 20 20 20 20 42 25 21 31 |S% .....| B%!1|
|00005c80| 32 3d 42 25 21 38 0d 1b | 94 0f 20 20 20 20 42 25 |2=B%!8..|.. B%|
|00005c90| 21 31 36 3d 34 0d 1b 9e | 23 20 20 20 20 c8 99 20 |!16=4...|# .. |
|00005ca0| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00005cb0| 65 22 2c 31 39 2c 42 25 | 0d 1b a8 05 cd 0d 1b b2 |e",19,B%|........|
|00005cc0| 11 e7 20 4d 6f 64 65 4c | 6f 61 64 25 20 8c 0d 1b |.. ModeL|oad% ...|
|00005cd0| bc 1b 20 20 20 20 f2 4c | 6f 61 64 4d 44 46 28 4d |.. .L|oadMDF(M|
|00005ce0| 6f 64 65 4c 6f 61 64 24 | 29 0d 1b c6 04 0d 1b d0 |odeLoad$|).......|
|00005cf0| 05 cd 0d 1b da 05 e1 0d | 1b e4 04 0d 1b ee 12 dd |........|........|
|00005d00| 20 f2 53 61 76 65 4d 44 | 46 28 41 24 29 0d 1b f8 | .SaveMD|F(A$)...|
|00005d10| 22 f4 20 50 52 4f 43 44 | 65 62 75 67 28 22 53 61 |". PROCD|ebug("Sa|
|00005d20| 76 69 6e 67 20 4d 44 46 | 3a 20 22 2b 41 24 29 0d |ving MDF|: "+A$).|
|00005d30| 1c 02 34 c8 99 20 22 4f | 53 5f 46 69 6c 65 22 2c |..4.. "O|S_File",|
|00005d40| 31 30 2c 41 24 2c 5f 46 | 69 6c 65 54 79 70 65 25 |10,A$,_F|ileType%|
|00005d50| 2c 2c 4d 44 46 25 2c 4d | 44 46 25 2b 4d 44 46 6c |,,MDF%,M|DF%+MDFl|
|00005d60| 65 6e 25 0d 1c 0c 05 e1 | 0d 1c 16 04 0d 1c 20 12 |en%.....|...... .|
|00005d70| dd 20 f2 4c 6f 61 64 4d | 44 46 28 41 24 29 0d 1c |. .LoadM|DF(A$)..|
|00005d80| 2a 27 f4 20 50 52 4f 43 | 44 65 62 75 67 28 22 4c |*'. PROC|Debug("L|
|00005d90| 6f 61 64 69 6e 67 20 3a | 20 22 2b 4d 6f 64 65 4c |oading :| "+ModeL|
|00005da0| 6f 61 64 24 29 0d 1c 34 | 3e f2 53 65 74 57 72 69 |oad$)..4|>.SetWri|
|00005db0| 74 65 61 62 6c 65 28 55 | 6e 69 4d 6f 64 65 48 25 |teable(U|niModeH%|
|00005dc0| 2c 32 2c 22 46 69 6c 65 | 3a 20 27 22 2b a4 5f 6c |,2,"File|: '"+._l|
|00005dd0| 65 61 66 28 4d 6f 64 65 | 4c 6f 61 64 24 29 2b 22 |eaf(Mode|Load$)+"|
|00005de0| 27 22 29 0d 1c 3e 14 21 | 57 69 6d 70 25 3d 55 6e |'")..>.!|Wimp%=Un|
|00005df0| 69 4d 6f 64 65 48 25 0d | 1c 48 18 f2 4f 70 65 6e |iModeH%.|.H..Open|
|00005e00| 57 69 6e 64 6f 77 28 57 | 69 6d 70 25 2c 31 29 0d |Window(W|imp%,1).|
|00005e10| 1c 52 05 e1 0d 1c 5c 04 | 0d 1c 66 17 dd 20 a4 43 |.R....\.|..f.. .C|
|00005e20| 68 65 63 6b 46 69 6c 65 | 28 46 69 6c 65 24 29 0d |heckFile|(File$).|
|00005e30| 1c 70 0b ea 20 48 25 2c | 41 24 0d 1c 7a 0e 48 25 |.p.. H%,|A$..z.H%|
|00005e40| 3d 8e 20 46 69 6c 65 24 | 0d 1c 84 0b 41 24 3d be |=. File$|....A$=.|
|00005e50| 23 48 25 0d 1c 8e 08 d9 | 23 48 25 0d 1c 98 30 e7 |#H%.....|#H%...0.|
|00005e60| 20 a7 a4 5f 43 61 70 69 | 74 61 6c 73 28 41 24 29 | .._Capi|tals(A$)|
|00005e70| 2c 22 23 4d 4f 44 45 44 | 45 53 43 52 49 50 54 49 |,"#MODED|ESCRIPTI|
|00005e80| 4f 4e 22 29 3e 30 20 8c | 20 3d b9 0d 1c a2 2c e7 |ON")>0 .| =....,.|
|00005e90| 20 a7 a4 5f 43 61 70 69 | 74 61 6c 73 28 41 24 29 | .._Capi|tals(A$)|
|00005ea0| 2c 22 4d 4f 44 45 44 45 | 53 43 52 49 50 54 49 4f |,"MODEDE|SCRIPTIO|
|00005eb0| 4e 22 29 3e 30 20 8c 0d | 1c ac 11 20 20 20 20 21 |N")>0 ..|... !|
|00005ec0| 57 69 6d 70 25 3d 2d 33 | 0d 1c b6 31 20 20 20 20 |Wimp%=-3|...1 |
|00005ed0| 24 28 57 69 6d 70 25 2b | 34 29 3d a4 5f 4c 6f 6f |$(Wimp%+|4)=._Loo|
|00005ee0| 6b 75 70 28 4d 65 73 73 | 61 67 65 49 6e 66 6f 25 |kup(Mess|ageInfo%|
|00005ef0| 2c 22 45 52 52 31 32 22 | 29 0d 1c c0 4c 20 20 20 |,"ERR12"|)...L |
|00005f00| 20 c8 99 20 22 57 69 6d | 70 5f 52 65 70 6f 72 74 | .. "Wim|p_Report|
|00005f10| 45 72 72 6f 72 22 2c 57 | 69 6d 70 25 2c 25 31 31 |Error",W|imp%,%11|
|00005f20| 2c a4 5f 4c 6f 6f 6b 75 | 70 28 4d 65 73 73 61 67 |,._Looku|p(Messag|
|00005f30| 65 49 6e 66 6f 25 2c 22 | 53 54 41 54 31 22 29 20 |eInfo%,"|STAT1") |
|00005f40| b8 20 2c 48 25 0d 1c ca | 10 20 20 20 20 e7 20 48 |. ,H%...|. . H|
|00005f50| 25 3d 31 20 8c 0d 1c d4 | 1c 20 20 20 20 20 20 20 |%=1 ....|. |
|00005f60| 20 f2 5f 43 6f 6e 76 65 | 72 74 28 46 69 6c 65 24 | ._Conve|rt(File$|
|00005f70| 29 0d 1c de 0e 20 20 20 | 20 20 20 20 20 3d b9 0d |).... | =..|
|00005f80| 1c e8 09 20 20 20 20 cd | 0d 1c f2 05 cd 0d 1c fc |... .|........|
|00005f90| 06 3d a3 0d 1d 06 04 0d | 1d 10 13 dd 20 f2 4d 61 |.=......|.... .Ma|
|00005fa0| 6b 65 4d 65 6e 75 54 72 | 65 65 0d 1d 1a 18 4d 61 |keMenuTr|ee....Ma|
|00005fb0| 69 6e 25 3d a4 44 69 6d | 42 6c 6f 63 6b 28 32 35 |in%=.Dim|Block(25|
|00005fc0| 36 29 0d 1d 24 18 53 75 | 62 32 25 3d a4 44 69 6d |6)..$.Su|b2%=.Dim|
|00005fd0| 42 6c 6f 63 6b 28 32 35 | 36 29 0d 1d 2e 18 53 75 |Block(25|6)....Su|
|00005fe0| 62 33 25 3d a4 44 69 6d | 42 6c 6f 63 6b 28 32 35 |b3%=.Dim|Block(25|
|00005ff0| 36 29 0d 1d 38 19 53 75 | 62 33 43 25 3d a4 44 69 |6)..8.Su|b3C%=.Di|
|00006000| 6d 42 6c 6f 63 6b 28 32 | 35 36 29 0d 1d 42 18 53 |mBlock(2|56)..B.S|
|00006010| 75 62 35 25 3d a4 44 69 | 6d 42 6c 6f 63 6b 28 32 |ub5%=.Di|mBlock(2|
|00006020| 35 36 29 0d 1d 4c 18 53 | 75 62 38 25 3d a4 44 69 |56)..L.S|ub8%=.Di|
|00006030| 6d 42 6c 6f 63 6b 28 32 | 35 36 29 0d 1d 56 1b 69 |mBlock(2|56)..V.i|
|00006040| 6e 64 62 75 66 25 3d a4 | 44 69 6d 42 6c 6f 63 6b |ndbuf%=.|DimBlock|
|00006050| 28 31 30 32 34 29 0d 1d | 60 52 f2 4d 61 6b 65 4d |(1024)..|`R.MakeM|
|00006060| 65 6e 75 28 4d 61 69 6e | 25 2c a4 5f 4c 6f 6f 6b |enu(Main|%,._Look|
|00006070| 75 70 28 4d 65 73 73 61 | 67 65 49 6e 66 6f 25 2c |up(Messa|geInfo%,|
|00006080| 22 4d 45 4e 55 31 22 29 | 2c a4 5f 4c 6f 6f 6b 75 |"MENU1")|,._Looku|
|00006090| 70 28 4d 65 73 73 61 67 | 65 49 6e 66 6f 25 2c 22 |p(Messag|eInfo%,"|
|000060a0| 4d 41 49 4e 54 22 29 29 | 0d 1d 6a 52 f2 4d 61 6b |MAINT"))|..jR.Mak|
|000060b0| 65 4d 65 6e 75 28 53 75 | 62 32 25 2c a4 5f 4c 6f |eMenu(Su|b2%,._Lo|
|000060c0| 6f 6b 75 70 28 4d 65 73 | 73 61 67 65 49 6e 66 6f |okup(Mes|sageInfo|
|000060d0| 25 2c 22 4d 45 4e 55 32 | 22 29 2c a4 5f 4c 6f 6f |%,"MENU2|"),._Loo|
|000060e0| 6b 75 70 28 4d 65 73 73 | 61 67 65 49 6e 66 6f 25 |kup(Mess|ageInfo%|
|000060f0| 2c 22 4d 41 49 4e 32 22 | 29 29 0d 1d 74 51 f2 4d |,"MAIN2"|))..tQ.M|
|00006100| 61 6b 65 4d 65 6e 75 28 | 53 75 62 33 43 25 2c a4 |akeMenu(|Sub3C%,.|
|00006110| 5f 4c 6f 6f 6b 75 70 28 | 4f 70 74 69 6f 6e 49 6e |_Lookup(|OptionIn|
|00006120| 66 6f 25 2c 22 4d 4f 44 | 45 22 29 2c a4 5f 4c 6f |fo%,"MOD|E"),._Lo|
|00006130| 6f 6b 75 70 28 4d 65 73 | 73 61 67 65 49 6e 66 6f |okup(Mes|sageInfo|
|00006140| 25 2c 22 53 55 42 33 43 | 22 29 29 0d 1d 7e 52 f2 |%,"SUB3C|"))..~R.|
|00006150| 4d 61 6b 65 4d 65 6e 75 | 28 53 75 62 33 25 2c a4 |MakeMenu|(Sub3%,.|
|00006160| 5f 4c 6f 6f 6b 75 70 28 | 4d 65 73 73 61 67 65 49 |_Lookup(|MessageI|
|00006170| 6e 66 6f 25 2c 22 4d 45 | 4e 55 33 22 29 2c a4 5f |nfo%,"ME|NU3"),._|
|00006180| 4c 6f 6f 6b 75 70 28 4d | 65 73 73 61 67 65 49 6e |Lookup(M|essageIn|
|00006190| 66 6f 25 2c 22 4d 41 49 | 4e 33 22 29 29 0d 1d 88 |fo%,"MAI|N3"))...|
|000061a0| 52 f2 4d 61 6b 65 4d 65 | 6e 75 28 53 75 62 35 25 |R.MakeMe|nu(Sub5%|
|000061b0| 2c a4 5f 4c 6f 6f 6b 75 | 70 28 4d 65 73 73 61 67 |,._Looku|p(Messag|
|000061c0| 65 49 6e 66 6f 25 2c 22 | 4d 45 4e 55 35 22 29 2c |eInfo%,"|MENU5"),|
|000061d0| a4 5f 4c 6f 6f 6b 75 70 | 28 4d 65 73 73 61 67 65 |._Lookup|(Message|
|000061e0| 49 6e 66 6f 25 2c 22 4d | 41 49 4e 35 22 29 29 0d |Info%,"M|AIN5")).|
|000061f0| 1d 92 52 f2 4d 61 6b 65 | 4d 65 6e 75 28 53 75 62 |..R.Make|Menu(Sub|
|00006200| 38 25 2c a4 5f 4c 6f 6f | 6b 75 70 28 4d 65 73 73 |8%,._Loo|kup(Mess|
|00006210| 61 67 65 49 6e 66 6f 25 | 2c 22 4d 45 4e 55 38 22 |ageInfo%|,"MENU8"|
|00006220| 29 2c a4 5f 4c 6f 6f 6b | 75 70 28 4d 65 73 73 61 |),._Look|up(Messa|
|00006230| 67 65 49 6e 66 6f 25 2c | 22 4d 41 49 4e 38 22 29 |geInfo%,|"MAIN8")|
|00006240| 29 0d 1d 9c 13 4d 61 69 | 6e 25 21 33 32 3d 49 6e |)....Mai|n%!32=In|
|00006250| 66 6f 48 25 0d 1d a6 0e | 4d 61 69 6e 25 21 32 38 |foH%....|Main%!28|
|00006260| 3d 30 0d 1d b0 19 4d 61 | 69 6e 25 21 28 33 32 2b |=0....Ma|in%!(32+|
|00006270| 31 2a 32 34 29 3d 53 75 | 62 32 25 0d 1d ba 19 4d |1*24)=Su|b2%....M|
|00006280| 61 69 6e 25 21 28 33 32 | 2b 32 2a 32 34 29 3d 53 |ain%!(32|+2*24)=S|
|00006290| 75 62 33 25 0d 1d c4 19 | 4d 61 69 6e 25 21 28 33 |ub3%....|Main%!(3|
|000062a0| 32 2b 34 2a 32 34 29 3d | 53 75 62 35 25 0d 1d ce |2+4*24)=|Sub5%...|
|000062b0| 1d 4d 61 69 6e 25 21 28 | 33 32 2b 37 2a 32 34 29 |.Main%!(|32+7*24)|
|000062c0| 3d 43 6f 6e 74 72 6f 6c | 48 25 0d 1d d8 15 4d 61 |=Control|H%....Ma|
|000062d0| 69 6e 25 21 28 32 38 2b | 37 2a 32 34 29 3d 38 0d |in%!(28+|7*24)=8.|
|000062e0| 1d e2 1c 53 75 62 33 25 | 21 28 33 32 2b 30 2a 32 |...Sub3%|!(32+0*2|
|000062f0| 34 29 3d 44 69 61 6c 6f | 67 48 25 0d 1d ec 1c 53 |4)=Dialo|gH%....S|
|00006300| 75 62 33 25 21 28 33 32 | 2b 31 2a 32 34 29 3d 44 |ub3%!(32|+1*24)=D|
|00006310| 69 61 6c 6f 67 48 25 0d | 1d f6 1a 53 75 62 33 25 |ialogH%.|...Sub3%|
|00006320| 21 28 33 32 2b 32 2a 32 | 34 29 3d 53 75 62 33 43 |!(32+2*2|4)=Sub3C|
|00006330| 25 0d 1e 00 11 53 75 62 | 33 43 25 21 32 38 3d 26 |%....Sub|3C%!28=&|
|00006340| 38 43 0d 1e 0a 10 53 75 | 62 33 43 25 21 33 32 3d |8C....Su|b3C%!32=|
|00006350| 2d 31 0d 1e 14 16 53 75 | 62 33 43 25 21 33 36 3d |-1....Su|b3C%!36=|
|00006360| 26 37 30 30 30 31 32 31 | 0d 1e 1e 17 53 75 62 33 |&7000121|....Sub3|
|00006370| 43 25 21 34 30 3d 53 75 | 62 33 43 25 2b 36 34 0d |C%!40=Su|b3C%+64.|
|00006380| 1e 28 10 53 75 62 33 43 | 25 21 34 34 3d 2d 31 0d |.(.Sub3C|%!44=-1.|
|00006390| 1e 32 11 53 75 62 33 43 | 25 21 34 38 3d 34 34 30 |.2.Sub3C|%!48=440|
|000063a0| 0d 1e 3c 2d 24 28 53 75 | 62 33 43 25 2b 36 34 29 |..<-$(Su|b3C%+64)|
|000063b0| 3d a4 5f 4c 6f 6f 6b 75 | 70 28 4f 70 74 69 6f 6e |=._Looku|p(Option|
|000063c0| 49 6e 66 6f 25 2c 22 4d | 4f 44 45 22 29 0d 1e 46 |Info%,"M|ODE")..F|
|000063d0| 1d 53 75 62 35 25 21 28 | 33 36 2b 36 2a 32 34 29 |.Sub5%!(|36+6*24)|
|000063e0| 3d 26 30 42 30 30 30 30 | 32 31 0d 1e 50 15 53 75 |=&0B0000|21..P.Su|
|000063f0| 62 35 25 21 28 32 38 2b | 35 2a 32 34 29 3d 32 0d |b5%!(28+|5*24)=2.|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.