/ ARM Club 1 / ARM_CLUB_CD.iso / contents / apps / program / a / bas / !BasLib / WimpLib

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1b f4 20 3e 3c | 42 61 73 4c 69 62 24 44 |..... ><|BasLib$D|
|00000010| 69 72 3e 2e 57 69 6d 70 | 4c 69 62 0d 00 14 2f f4 |ir>.Wimp|Lib.../.|
|00000020| 20 42 41 53 49 43 20 4c | 69 62 72 61 72 79 20 66 | BASIC L|ibrary f|
|00000030| 6f 72 20 57 49 4d 50 20 | 68 61 6e 64 6c 69 6e 67 |or WIMP |handling|
|00000040| 20 66 75 6e 63 74 69 6f | 6e 73 0d 00 1e 48 f4 20 | functio|ns...H. |
|00000050| 43 65 72 74 61 69 6e 20 | 64 65 66 61 75 6c 74 73 |Certain |defaults|
|00000060| 20 73 65 74 20 61 70 70 | 72 6f 70 72 69 61 74 65 | set app|ropriate|
|00000070| 20 74 6f 20 52 49 53 43 | 20 4f 53 20 6d 75 6c 74 | to RISC| OS mult|
|00000080| 69 74 61 73 6b 69 6e 67 | 20 70 72 6f 74 6f 63 6f |itasking| protoco|
|00000090| 6c 73 0d 00 28 40 f4 20 | 44 65 76 65 6c 6f 70 65 |ls..(@. |Develope|
|000000a0| 64 20 61 73 20 61 20 70 | 72 6f 6a 65 63 74 3a 20 |d as a p|roject: |
|000000b0| 72 65 2d 77 72 69 74 65 | 20 61 70 70 6c 69 63 61 |re-write| applica|
|000000c0| 74 69 6f 6e 73 20 69 6e | 20 52 49 53 43 20 55 53 |tions in| RISC US|
|000000d0| 45 52 0d 00 32 41 f4 20 | 22 4d 61 73 74 65 72 69 |ER..2A. |"Masteri|
|000000e0| 6e 67 20 74 68 65 20 57 | 49 4d 50 22 20 73 65 72 |ng the W|IMP" ser|
|000000f0| 69 65 73 20 75 73 69 6e | 67 20 6d 79 20 6f 77 6e |ies usin|g my own|
|00000100| 20 70 72 6f 67 72 61 6d | 6d 69 6e 67 20 73 74 79 | program|ming sty|
|00000110| 6c 65 2e 0d 00 3c 25 f4 | 20 50 65 74 65 72 20 47 |le...<%.| Peter G|
|00000120| 72 65 65 6e 68 61 6d 2c | 20 73 74 61 72 74 65 64 |reenham,| started|
|00000130| 20 31 37 2f 37 2f 39 30 | 0d 00 46 1e f4 20 4c 61 | 17/7/90|..F.. La|
|00000140| 74 65 73 74 20 76 65 72 | 73 69 6f 6e 20 3a 20 31 |test ver|sion : 1|
|00000150| 34 2f 31 2f 39 32 0d 00 | 50 46 f4 20 49 4d 50 4f |4/1/92..|PF. IMPO|
|00000160| 52 54 41 4e 54 3a 20 4e | 6f 20 66 75 72 74 68 65 |RTANT: N|o furthe|
|00000170| 72 20 61 74 74 65 6d 70 | 74 73 20 74 6f 20 72 65 |r attemp|ts to re|
|00000180| 74 61 69 6e 20 52 69 73 | 63 20 4f 53 20 32 20 63 |tain Ris|c OS 2 c|
|00000190| 6f 6d 70 61 74 69 62 69 | 6c 69 74 79 0d 00 5a 2e |ompatibi|lity..Z.|
|000001a0| f4 20 4d 79 20 74 61 73 | 6b 73 20 77 69 6c 6c 20 |. My tas|ks will |
|000001b0| 6e 6f 77 20 6f 6e 6c 79 | 20 77 6f 72 6b 20 6f 6e |now only| work on|
|000001c0| 20 52 69 73 63 20 4f 53 | 20 33 0d 00 64 06 f4 3a | Risc OS| 3..d..:|
|000001d0| 0d 00 6e 21 dd 20 a4 5f | 49 6e 69 74 69 61 6c 69 |..n!. ._|Initiali|
|000001e0| 73 65 5f 57 69 6d 70 4c | 69 62 28 70 61 74 68 24 |se_WimpL|ib(path$|
|000001f0| 29 0d 00 78 15 ea 20 74 | 61 73 6b 6e 61 6d 65 24 |)..x.. t|askname$|
|00000200| 2c 74 61 73 6b 25 0d 00 | 82 13 49 6e 69 74 69 61 |,task%..|..Initia|
|00000210| 6c 69 73 69 6e 67 25 3d | b9 0d 00 8c 32 f4 20 41 |lising%=|....2. A|
|00000220| 62 6f 76 65 20 66 6c 61 | 67 20 69 73 20 73 65 74 |bove fla|g is set|
|00000230| 20 46 41 4c 53 45 20 77 | 68 65 6e 20 50 6f 6c 6c | FALSE w|hen Poll|
|00000240| 69 6e 67 20 62 65 67 69 | 6e 73 2e 0d 00 96 29 f2 |ing begi|ns....).|
|00000250| 5f 4f 70 65 6e 5f 4d 65 | 73 73 61 67 65 46 69 6c |_Open_Me|ssageFil|
|00000260| 65 28 70 61 74 68 24 2b | 22 3a 4d 65 73 73 61 67 |e(path$+|":Messag|
|00000270| 65 73 22 29 0d 00 a0 18 | ee 20 85 20 f2 5f 45 72 |es")....|. . ._Er|
|00000280| 72 6f 72 5f 4e 6f 57 69 | 6d 70 3a e0 0d 00 aa 0f |ror_NoWi|mp:.....|
|00000290| f4 20 54 68 65 20 42 6c | 6f 63 6b 0d 00 b4 14 6c |. The Bl|ock....l|
|000002a0| 65 6e 5f 77 62 6c 6f 63 | 6b 25 3d 33 30 37 32 0d |en_wbloc|k%=3072.|
|000002b0| 00 be 19 de 20 77 62 6c | 6f 63 6b 25 20 6c 65 6e |.... wbl|ock% len|
|000002c0| 5f 77 62 6c 6f 63 6b 25 | 0d 00 c8 5d f4 20 4f 74 |_wblock%|...]. Ot|
|000002d0| 68 65 72 20 64 65 66 69 | 6e 69 74 69 6f 6e 73 20 |her defi|nitions |
|000002e0| 2d 20 69 6e 20 63 6f 6d | 70 69 6c 65 64 20 6c 61 |- in com|piled la|
|000002f0| 6e 67 75 61 67 65 20 28 | 65 67 3a 43 29 20 6d 61 |nguage (|eg:C) ma|
|00000300| 6e 79 20 6f 66 20 74 68 | 65 73 65 20 77 6f 75 6c |ny of th|ese woul|
|00000310| 64 20 62 65 20 23 64 65 | 66 69 6e 65 2f 72 65 70 |d be #de|fine/rep|
|00000320| 6c 61 63 65 2e 0d 00 d2 | 1e f4 20 4f 74 68 65 72 |lace....|.. Other|
|00000330| 73 20 67 6c 6f 62 61 6c | 20 76 61 72 69 61 62 6c |s global| variabl|
|00000340| 65 73 2e 0d 00 dc 05 3a | 0d 00 e6 27 f4 20 56 61 |es.....:|...'. Va|
|00000350| 6c 69 64 61 74 69 6f 6e | 20 73 74 72 69 6e 67 20 |lidation| string |
|00000360| 62 6c 6f 63 6b 20 2d 20 | 4e 65 65 64 65 64 3f 0d |block - |Needed?.|
|00000370| 00 f0 49 f4 20 59 65 73 | 2e 20 4c 65 6e 67 74 68 |..I. Yes|. Length|
|00000380| 20 6f 66 20 76 61 6c 69 | 64 61 74 69 6f 6e 20 62 | of vali|dation b|
|00000390| 75 66 66 65 72 20 6e 6f | 74 20 68 65 6c 64 20 69 |uffer no|t held i|
|000003a0| 6e 20 69 63 6f 6e 2f 6d | 65 6e 75 20 69 74 65 6d |n icon/m|enu item|
|000003b0| 20 62 6c 6f 63 6b 73 2e | 0d 00 fa 38 f4 20 47 6f | blocks.|...8. Go|
|000003c0| 20 74 6f 20 75 6e 69 66 | 6f 72 6d 20 73 69 7a 65 | to unif|orm size|
|000003d0| 20 6f 66 20 6d 61 78 20 | 73 74 72 69 6e 67 20 6c | of max |string l|
|000003e0| 65 6e 67 74 68 20 32 35 | 36 20 63 68 61 72 73 2e |ength 25|6 chars.|
|000003f0| 0d 01 04 16 56 61 6c 53 | 74 72 69 6e 67 4c 65 6e |....ValS|tringLen|
|00000400| 25 3d 26 31 30 30 0d 01 | 0e 05 3a 0d 01 18 30 f4 |%=&100..|..:...0.|
|00000410| 20 53 63 72 61 70 2f 77 | 6f 72 6b 69 6e 67 20 62 | Scrap/w|orking b|
|00000420| 6c 6f 63 6b 20 28 73 61 | 6d 65 20 73 69 7a 65 20 |lock (sa|me size |
|00000430| 61 73 20 77 62 6c 6f 63 | 6b 25 29 0d 01 22 18 de |as wbloc|k%).."..|
|00000440| 20 73 63 72 61 70 25 20 | 6c 65 6e 5f 77 62 6c 6f | scrap% |len_wblo|
|00000450| 63 6b 25 0d 01 2c 05 3a | 0d 01 36 12 f4 20 57 49 |ck%..,.:|..6.. WI|
|00000460| 4d 50 20 43 6f 6c 6f 75 | 72 73 0d 01 40 0b 47 72 |MP Colou|rs..@.Gr|
|00000470| 65 79 30 3d 30 0d 01 4a | 0b 47 72 65 79 31 3d 31 |ey0=0..J|.Grey1=1|
|00000480| 0d 01 54 0b 47 72 65 79 | 32 3d 32 0d 01 5e 0b 47 |..T.Grey|2=2..^.G|
|00000490| 72 65 79 33 3d 33 0d 01 | 68 0b 47 72 65 79 34 3d |rey3=3..|h.Grey4=|
|000004a0| 34 0d 01 72 0b 47 72 65 | 79 35 3d 35 0d 01 7c 0b |4..r.Gre|y5=5..|.|
|000004b0| 47 72 65 79 36 3d 36 0d | 01 86 0b 47 72 65 79 37 |Grey6=6.|...Grey7|
|000004c0| 3d 37 0d 01 90 0f 57 68 | 69 74 65 3d 47 72 65 79 |=7....Wh|ite=Grey|
|000004d0| 30 0d 01 9a 0f 42 6c 61 | 63 6b 3d 47 72 65 79 37 |0....Bla|ck=Grey7|
|000004e0| 0d 01 a4 0e 44 61 72 6b | 42 6c 75 65 3d 38 0d 01 |....Dark|Blue=8..|
|000004f0| ae 0c 59 65 6c 6c 6f 77 | 3d 39 0d 01 b8 11 4c 69 |..Yellow|=9....Li|
|00000500| 67 68 74 47 72 65 65 6e | 3d 31 30 0d 01 c2 0a 52 |ghtGreen|=10....R|
|00000510| 65 64 3d 31 31 0d 01 cc | 0c 43 72 65 61 6d 3d 31 |ed=11...|.Cream=1|
|00000520| 32 0d 01 d6 10 44 61 72 | 6b 47 72 65 65 6e 3d 31 |2....Dar|kGreen=1|
|00000530| 33 0d 01 e0 0a 54 61 6e | 3d 31 34 0d 01 ea 0b 43 |3....Tan|=14....C|
|00000540| 79 61 6e 3d 31 35 0d 01 | f4 12 4c 69 67 68 74 42 |yan=15..|..LightB|
|00000550| 6c 75 65 3d 43 79 61 6e | 0d 01 fe 05 3a 0d 02 08 |lue=Cyan|....:...|
|00000560| 17 f4 20 57 49 4d 50 20 | 52 65 61 73 6f 6e 20 43 |.. WIMP |Reason C|
|00000570| 6f 64 65 73 0d 02 12 60 | 72 65 61 73 6f 6e 25 3d |odes...`|reason%=|
|00000580| b9 20 3a f4 20 41 6c 77 | 61 79 73 20 74 68 65 20 |. :. Alw|ays the |
|00000590| 6d 6f 73 74 20 72 65 63 | 65 6e 74 20 72 65 61 73 |most rec|ent reas|
|000005a0| 6f 6e 20 63 6f 64 65 20 | 72 65 74 75 72 6e 65 64 |on code |returned|
|000005b0| 2e 20 49 66 20 54 52 55 | 45 2c 20 77 65 20 61 72 |. If TRU|E, we ar|
|000005c0| 65 20 73 74 69 6c 6c 20 | 73 74 61 72 74 69 6e 67 |e still |starting|
|000005d0| 20 75 70 2e 0d 02 1c 16 | 4e 75 6c 6c 5f 52 65 61 | up.....|Null_Rea|
|000005e0| 73 6f 6e 5f 43 6f 64 65 | 3d 30 0d 02 26 1b 52 65 |son_Code|=0..&.Re|
|000005f0| 64 72 61 77 5f 57 69 6e | 64 6f 77 5f 52 65 71 75 |draw_Win|dow_Requ|
|00000600| 65 73 74 3d 31 0d 02 30 | 19 4f 70 65 6e 5f 57 69 |est=1..0|.Open_Wi|
|00000610| 6e 64 6f 77 5f 52 65 71 | 75 65 73 74 3d 32 0d 02 |ndow_Req|uest=2..|
|00000620| 3a 1a 43 6c 6f 73 65 5f | 57 69 6e 64 6f 77 5f 52 |:.Close_|Window_R|
|00000630| 65 71 75 65 73 74 3d 33 | 0d 02 44 1c 50 6f 69 6e |equest=3|..D.Poin|
|00000640| 74 65 72 5f 4c 65 61 76 | 69 6e 67 5f 57 69 6e 64 |ter_Leav|ing_Wind|
|00000650| 6f 77 3d 34 0d 02 4e 1d | 50 6f 69 6e 74 65 72 5f |ow=4..N.|Pointer_|
|00000660| 45 6e 74 65 72 69 6e 67 | 5f 57 69 6e 64 6f 77 3d |Entering|_Window=|
|00000670| 35 0d 02 58 11 4d 6f 75 | 73 65 5f 43 6c 69 63 6b |5..X.Mou|se_Click|
|00000680| 3d 36 0d 02 62 13 55 73 | 65 72 5f 44 72 61 67 5f |=6..b.Us|er_Drag_|
|00000690| 42 6f 78 3d 37 0d 02 6c | 11 4b 65 79 5f 50 72 65 |Box=7..l|.Key_Pre|
|000006a0| 73 73 65 64 3d 38 0d 02 | 76 14 4d 65 6e 75 5f 53 |ssed=8..|v.Menu_S|
|000006b0| 65 6c 65 63 74 69 6f 6e | 3d 39 0d 02 80 15 53 63 |election|=9....Sc|
|000006c0| 72 6f 6c 6c 5f 52 65 71 | 75 65 73 74 3d 31 30 0d |roll_Req|uest=10.|
|000006d0| 02 8a 11 4c 6f 73 65 5f | 43 61 72 65 74 3d 31 31 |...Lose_|Caret=11|
|000006e0| 0d 02 94 11 47 61 69 6e | 5f 43 61 72 65 74 3d 31 |....Gain|_Caret=1|
|000006f0| 32 0d 02 9e 13 55 73 65 | 72 5f 4d 65 73 73 61 67 |2....Use|r_Messag|
|00000700| 65 3d 31 37 0d 02 a8 1c | 55 73 65 72 5f 4d 65 73 |e=17....|User_Mes|
|00000710| 73 61 67 65 5f 52 65 63 | 6f 72 64 65 64 3d 31 38 |sage_Rec|orded=18|
|00000720| 0d 02 b2 1f 55 73 65 72 | 5f 4d 65 73 73 61 67 65 |....User|_Message|
|00000730| 5f 41 63 6b 6e 6f 77 6c | 65 64 67 65 3d 31 39 0d |_Acknowl|edge=19.|
|00000740| 02 bc 05 3a 0d 02 c6 0c | 4d 79 5f 52 65 66 3d 30 |...:....|My_Ref=0|
|00000750| 0d 02 d0 13 4d 79 5f 50 | 72 65 51 75 69 74 52 65 |....My_P|reQuitRe|
|00000760| 66 3d 30 0d 02 da 0e 59 | 6f 75 72 5f 52 65 66 3d |f=0....Y|our_Ref=|
|00000770| 30 0d 02 e4 10 41 75 74 | 6f 5f 51 75 69 74 25 3d |0....Aut|o_Quit%=|
|00000780| b9 0d 02 ee 56 f4 20 54 | 68 69 73 20 6d 61 6b 65 |....V. T|his make|
|00000790| 73 20 57 69 6d 70 4c 69 | 62 20 61 75 74 6f 6d 61 |s WimpLi|b automa|
|000007a0| 74 69 63 61 6c 6c 79 20 | 73 65 6e 74 20 4d 65 73 |tically |sent Mes|
|000007b0| 73 61 67 65 5f 51 75 69 | 74 20 69 66 20 6e 6f 20 |sage_Qui|t if no |
|000007c0| 6f 62 6a 65 63 74 69 6f | 6e 20 74 6f 20 61 6e 20 |objectio|n to an |
|000007d0| 65 61 72 6c 69 65 72 0d | 02 f8 37 f4 20 4d 65 73 |earlier.|..7. Mes|
|000007e0| 73 61 67 65 5f 50 72 65 | 51 75 69 74 2e 20 4f 63 |sage_Pre|Quit. Oc|
|000007f0| 63 61 73 69 6f 6e 61 6c | 6c 79 20 74 68 69 73 20 |casional|ly this |
|00000800| 69 73 20 6e 6f 74 20 77 | 61 6e 74 65 64 2e 0d 03 |is not w|anted...|
|00000810| 02 05 3a 0d 03 0c 20 f4 | 20 54 61 73 6b 20 4d 61 |..:... .| Task Ma|
|00000820| 6e 61 67 65 72 20 6d 65 | 73 73 61 67 65 20 63 6f |nager me|ssage co|
|00000830| 64 65 73 0d 03 16 12 4d | 65 73 73 61 67 65 5f 51 |des....M|essage_Q|
|00000840| 75 69 74 3d 30 0d 03 20 | 16 4d 65 73 73 61 67 65 |uit=0.. |.Message|
|00000850| 5f 44 61 74 61 53 61 76 | 65 3d 31 0d 03 2a 19 4d |_DataSav|e=1..*.M|
|00000860| 65 73 73 61 67 65 5f 44 | 61 74 61 53 61 76 65 41 |essage_D|ataSaveA|
|00000870| 63 6b 3d 32 0d 03 34 16 | 4d 65 73 73 61 67 65 5f |ck=2..4.|Message_|
|00000880| 44 61 74 61 4c 6f 61 64 | 3d 33 0d 03 3e 19 4d 65 |DataLoad|=3..>.Me|
|00000890| 73 73 61 67 65 5f 44 61 | 74 61 4c 6f 61 64 41 63 |ssage_Da|taLoadAc|
|000008a0| 6b 3d 34 0d 03 48 16 4d | 65 73 73 61 67 65 5f 44 |k=4..H.M|essage_D|
|000008b0| 61 74 61 4f 70 65 6e 3d | 35 0d 03 52 16 4d 65 73 |ataOpen=|5..R.Mes|
|000008c0| 73 61 67 65 5f 52 41 4d | 46 65 74 63 68 3d 36 0d |sage_RAM|Fetch=6.|
|000008d0| 03 5c 19 4d 65 73 73 61 | 67 65 5f 52 41 4d 54 72 |.\.Messa|ge_RAMTr|
|000008e0| 61 6e 73 6d 69 74 3d 37 | 0d 03 66 15 4d 65 73 73 |ansmit=7|..f.Mess|
|000008f0| 61 67 65 5f 50 72 65 51 | 75 69 74 3d 38 0d 03 70 |age_PreQ|uit=8..p|
|00000900| 1a 4d 65 73 73 61 67 65 | 5f 53 61 76 65 44 65 73 |.Message|_SaveDes|
|00000910| 6b 74 6f 70 3d 31 30 0d | 03 7a 1d 4d 65 73 73 61 |ktop=10.|.z.Messa|
|00000920| 67 65 5f 46 69 6c 65 72 | 4f 70 65 6e 44 69 72 3d |ge_Filer|OpenDir=|
|00000930| 26 34 30 30 0d 03 84 1e | 4d 65 73 73 61 67 65 5f |&400....|Message_|
|00000940| 46 69 6c 65 72 43 6c 6f | 73 65 44 69 72 3d 26 34 |FilerClo|seDir=&4|
|00000950| 30 31 0d 03 8e 19 4d 65 | 73 73 61 67 65 5f 4e 6f |01....Me|ssage_No|
|00000960| 74 69 66 79 3d 26 34 30 | 30 34 30 0d 03 98 1e 4d |tify=&40|040....M|
|00000970| 65 73 73 61 67 65 5f 4d | 65 6e 75 57 61 72 6e 69 |essage_M|enuWarni|
|00000980| 6e 67 3d 26 34 30 30 43 | 30 0d 03 a2 1d 4d 65 73 |ng=&400C|0....Mes|
|00000990| 73 61 67 65 5f 4d 6f 64 | 65 43 68 61 6e 67 65 3d |sage_Mod|eChange=|
|000009a0| 26 34 30 30 43 31 0d 03 | ac 21 4d 65 73 73 61 67 |&400C1..|.!Messag|
|000009b0| 65 5f 54 61 73 6b 49 6e | 69 74 69 61 6c 69 73 65 |e_TaskIn|itialise|
|000009c0| 3d 26 34 30 30 43 32 0d | 03 b6 20 4d 65 73 73 61 |=&400C2.|.. Messa|
|000009d0| 67 65 5f 54 61 73 6b 43 | 6c 6f 73 65 44 6f 77 6e |ge_TaskC|loseDown|
|000009e0| 3d 26 34 30 30 43 33 0d | 03 c0 1b 4d 65 73 73 61 |=&400C3.|...Messa|
|000009f0| 67 65 5f 53 6c 6f 74 53 | 69 7a 65 3d 26 34 30 30 |ge_SlotS|ize=&400|
|00000a00| 43 34 0d 03 ca 1a 4d 65 | 73 73 61 67 65 5f 53 65 |C4....Me|ssage_Se|
|00000a10| 74 53 6c 6f 74 3d 26 34 | 30 30 43 35 0d 03 d4 1d |tSlot=&4|00C5....|
|00000a20| 4d 65 73 73 61 67 65 5f | 54 61 73 6b 4e 61 6d 65 |Message_|TaskName|
|00000a30| 52 71 3d 26 34 30 30 43 | 36 0d 03 de 1d 4d 65 73 |Rq=&400C|6....Mes|
|00000a40| 73 61 67 65 5f 54 61 73 | 6b 4e 61 6d 65 49 73 3d |sage_Tas|kNameIs=|
|00000a50| 26 34 30 30 43 37 0d 03 | e8 1e 4d 65 73 73 61 67 |&400C7..|..Messag|
|00000a60| 65 5f 4d 65 6e 75 44 65 | 6c 65 74 65 64 3d 26 34 |e_MenuDe|leted=&4|
|00000a70| 30 30 43 39 0d 03 f2 1c | 4d 65 73 73 61 67 65 5f |00C9....|Message_|
|00000a80| 48 65 6c 70 52 65 71 75 | 65 73 74 3d 26 35 30 32 |HelpRequ|est=&502|
|00000a90| 0d 03 fc 1a 4d 65 73 73 | 61 67 65 5f 48 65 6c 70 |....Mess|age_Help|
|00000aa0| 52 65 70 6c 79 3d 26 35 | 30 33 0d 04 06 05 3a 0d |Reply=&5|03....:.|
|00000ab0| 04 10 24 f4 20 50 72 65 | 64 65 66 69 6e 65 64 20 |..$. Pre|defined |
|00000ac0| 77 69 6e 64 6f 77 20 74 | 79 70 65 20 6e 75 6d 62 |window t|ype numb|
|00000ad0| 65 72 73 0d 04 1a 2e f4 | 20 4e 6f 74 65 20 31 30 |ers.....| Note 10|
|00000ae0| 2f 38 2f 39 31 20 63 68 | 61 6e 67 65 64 20 74 6f |/8/91 ch|anged to|
|00000af0| 20 6e 65 67 61 74 69 76 | 65 20 6e 75 6d 62 65 72 | negativ|e number|
|00000b00| 73 0d 04 24 5d f4 20 54 | 68 69 73 20 69 73 20 73 |s..$]. T|his is s|
|00000b10| 6f 20 74 68 61 74 20 70 | 6f 73 69 74 69 76 65 20 |o that p|ositive |
|00000b20| 6e 75 6d 62 65 72 73 20 | 61 72 65 20 72 65 63 6f |numbers |are reco|
|00000b30| 67 6e 69 73 65 64 20 62 | 79 20 46 4e 43 72 65 61 |gnised b|y FNCrea|
|00000b40| 74 65 5f 57 69 6e 64 6f | 77 20 61 73 20 77 69 6e |te_Windo|w as win|
|00000b50| 64 6f 77 20 66 6c 61 67 | 20 64 61 74 61 2e 0d 04 |dow flag| data...|
|00000b60| 2e 2b f4 20 54 68 69 73 | 20 69 73 20 61 73 73 75 |.+. This| is assu|
|00000b70| 6d 69 6e 67 20 62 69 74 | 20 33 31 20 69 73 20 6e |ming bit| 31 is n|
|00000b80| 65 76 65 72 20 73 65 74 | 2e 0d 04 38 0f 64 65 66 |ever set|...8.def|
|00000b90| 61 75 6c 74 25 3d 2d 31 | 0d 04 42 0f 66 69 78 73 |ault%=-1|..B.fixs|
|00000ba0| 69 7a 65 25 3d 2d 32 0d | 04 4c 0f 69 6e 66 6f 62 |ize%=-2.|.L.infob|
|00000bb0| 6f 78 25 3d 2d 33 0d 04 | 56 16 64 65 66 61 75 6c |ox%=-3..|V.defaul|
|00000bc0| 74 5f 72 65 64 72 61 77 | 25 3d 2d 35 0d 04 60 05 |t_redraw|%=-5..`.|
|00000bd0| 3a 0d 04 6a 18 f4 20 57 | 69 6e 64 6f 77 20 66 6c |:..j.. W|indow fl|
|00000be0| 61 67 20 76 61 6c 75 65 | 73 0d 04 74 0a 64 72 61 |ag value|s..t.dra|
|00000bf0| 67 3d b9 0d 04 7e 0c 72 | 65 64 72 61 77 3d a3 0d |g=...~.r|edraw=..|
|00000c00| 04 88 0a 70 61 6e 65 3d | b9 0d 04 92 0e 73 6c 69 |...pane=|.....sli|
|00000c10| 64 65 6f 66 66 3d b9 0d | 04 9c 0f 67 65 6e 73 63 |deoff=..|...gensc|
|00000c20| 72 6f 6c 6c 3d b9 0d 04 | a6 18 67 65 6e 73 63 72 |roll=...|..genscr|
|00000c30| 6f 6c 6c 5f 6e 6f 72 65 | 70 65 61 74 3d b9 0d 04 |oll_nore|peat=...|
|00000c40| b0 0a 67 63 6f 6c 3d b9 | 0d 04 ba 10 73 74 61 79 |..gcol=.|....stay|
|00000c50| 62 6f 74 74 6f 6d 3d b9 | 0d 04 c4 0d 68 6f 74 6b |bottom=.|....hotk|
|00000c60| 65 79 73 3d b9 0d 04 ce | 0a 62 61 63 6b 3d b9 0d |eys=....|.back=..|
|00000c70| 04 d8 0b 63 6c 6f 73 65 | 3d b9 0d 04 e2 0b 74 69 |...close|=.....ti|
|00000c80| 74 6c 65 3d b9 0d 04 ec | 0c 74 6f 67 67 6c 65 3d |tle=....|.toggle=|
|00000c90| b9 0d 04 f6 0d 76 73 63 | 72 6f 6c 6c 3d b9 0d 05 |.....vsc|roll=...|
|00000ca0| 00 0c 72 65 73 69 7a 65 | 3d b9 0d 05 0a 0d 68 73 |..resize|=.....hs|
|00000cb0| 63 72 6f 6c 6c 3d b9 0d | 05 14 05 3a 0d 05 1e 26 |croll=..|...:...&|
|00000cc0| f4 20 54 69 74 6c 65 20 | 62 61 72 20 61 6e 64 20 |. Title |bar and |
|00000cd0| 67 65 6e 65 72 61 6c 20 | 69 63 6f 6e 20 66 6c 61 |general |icon fla|
|00000ce0| 67 73 0d 05 28 0a 74 65 | 78 74 3d b9 0d 05 32 0c |gs..(.te|xt=...2.|
|00000cf0| 73 70 72 69 74 65 3d b9 | 0d 05 3c 0d 68 63 65 6e |sprite=.|..<.hcen|
|00000d00| 74 72 65 3d b9 0d 05 46 | 0d 76 63 65 6e 74 72 65 |tre=...F|.vcentre|
|00000d10| 3d b9 0d 05 50 10 73 79 | 73 74 65 6d 66 6f 6e 74 |=...P.sy|stemfont|
|00000d20| 3d a3 0d 05 5a 0c 72 69 | 67 68 74 6a 3d b9 0d 05 |=...Z.ri|ghtj=...|
|00000d30| 64 05 3a 0d 05 6e 10 f4 | 20 49 63 6f 6e 20 66 6c |d.:..n..| Icon fl|
|00000d40| 61 67 73 0d 05 78 43 f4 | 20 74 65 78 74 2c 73 70 |ags..xC.| text,sp|
|00000d50| 72 69 74 65 2c 68 63 65 | 6e 74 72 65 2c 76 63 65 |rite,hce|ntre,vce|
|00000d60| 6e 74 72 65 2c 73 79 73 | 74 65 6d 66 6f 6e 74 2c |ntre,sys|temfont,|
|00000d70| 72 69 67 68 74 6a 20 61 | 6c 72 65 61 64 79 20 64 |rightj a|lready d|
|00000d80| 65 66 69 6e 65 64 0d 05 | 82 0c 62 6f 72 64 65 72 |efined..|..border|
|00000d90| 3d b9 0d 05 8c 0c 66 69 | 6c 6c 65 64 3d b9 0d 05 |=.....fi|lled=...|
|00000da0| 96 0e 74 61 73 6b 68 65 | 6c 70 3d b9 0d 05 a0 10 |..taskhe|lp=.....|
|00000db0| 69 6e 64 69 72 65 63 74 | 65 64 3d b9 0d 05 aa 15 |indirect|ed=.....|
|00000dc0| 65 73 67 5f 67 72 6f 75 | 70 73 65 6c 65 63 74 3d |esg_grou|pselect=|
|00000dd0| b9 0d 05 b4 0e 66 75 6c | 6c 73 69 7a 65 3d a3 0d |.....ful|lsize=..|
|00000de0| 05 be 11 70 72 65 73 65 | 6c 65 63 74 65 64 3d b9 |...prese|lected=.|
|00000df0| 0d 05 c8 10 73 65 6c 65 | 63 74 61 62 6c 65 3d a3 |....sele|ctable=.|
|00000e00| 0d 05 d2 1c 73 68 61 64 | 65 64 3d b9 20 3a 20 f4 |....shad|ed=. : .|
|00000e10| 20 52 65 64 75 6e 64 61 | 6e 63 79 2e 0d 05 dc 0d | Redunda|ncy.....|
|00000e20| 64 65 6c 65 74 65 64 3d | b9 0d 05 e6 05 3a 0d 05 |deleted=|.....:..|
|00000e30| f0 1a f4 20 54 68 69 73 | 20 69 73 20 69 6e 20 46 |... This| is in F|
|00000e40| 69 6c 65 72 4c 69 62 3a | 0d 05 fa 19 f2 5f 49 6e |ilerLib:|....._In|
|00000e50| 69 74 69 61 6c 69 73 65 | 5f 46 69 6c 65 72 4c 69 |itialise|_FilerLi|
|00000e60| 62 0d 06 04 05 3a 0d 06 | 0e 0c f4 20 6f 74 68 65 |b....:..|... othe|
|00000e70| 72 73 0d 06 18 27 69 63 | 6f 6e 62 61 72 25 3d 2d |rs...'ic|onbar%=-|
|00000e80| 32 20 3a 20 f4 20 66 6f | 72 20 50 52 4f 43 62 75 |2 : . fo|r PROCbu|
|00000e90| 74 74 6f 6e 63 6c 69 63 | 6b 0d 06 22 4e 3a 20 f4 |ttonclic|k.."N: .|
|00000ea0| 20 57 69 6d 70 5f 50 6f | 6c 6c 20 72 65 61 73 6f | Wimp_Po|ll reaso|
|00000eb0| 6e 20 63 6f 64 65 20 66 | 6f 72 20 62 75 74 74 6f |n code f|or butto|
|00000ec0| 6e 63 6c 69 63 6b 20 72 | 65 74 75 72 6e 73 20 69 |nclick r|eturns i|
|00000ed0| 63 6f 6e 62 61 72 20 61 | 73 20 2d 32 20 72 65 67 |conbar a|s -2 reg|
|00000ee0| 61 72 64 6c 65 73 73 0d | 06 2c 4e 3a 20 f4 20 6f |ardless.|.,N: . o|
|00000ef0| 66 20 73 69 64 65 2c 20 | 70 72 6f 62 61 62 6c 79 |f side, |probably|
|00000f00| 20 62 65 63 61 75 73 65 | 20 2d 31 20 75 73 65 64 | because| -1 used|
|00000f10| 20 62 79 20 73 6f 6d 65 | 20 63 61 6c 6c 73 20 74 | by some| calls t|
|00000f20| 6f 20 69 6e 64 69 63 61 | 74 65 20 6e 6f 20 77 69 |o indica|te no wi|
|00000f30| 6e 64 6f 77 2c 0d 06 36 | 16 3a 20 f4 20 41 72 74 |ndow,..6|.: . Art|
|00000f40| 68 75 72 20 66 6f 73 73 | 69 6c 3f 0d 06 40 14 69 |hur foss|il?..@.i|
|00000f50| 63 6f 6e 62 61 72 5f 6c | 65 66 74 25 3d 2d 32 0d |conbar_l|eft%=-2.|
|00000f60| 06 4a 15 69 63 6f 6e 62 | 61 72 5f 72 69 67 68 74 |.J.iconb|ar_right|
|00000f70| 25 3d 2d 31 0d 06 54 19 | 69 63 6f 6e 62 61 72 5f |%=-1..T.|iconbar_|
|00000f80| 66 6f 72 63 65 6c 65 66 | 74 25 3d 2d 35 0d 06 5e |forcelef|t%=-5..^|
|00000f90| 1a 69 63 6f 6e 62 61 72 | 5f 66 6f 72 63 65 72 69 |.iconbar|_forceri|
|00000fa0| 67 68 74 25 3d 2d 38 0d | 06 68 31 3a f4 20 49 63 |ght%=-8.|.h1:. Ic|
|00000fb0| 6f 6e 62 61 72 20 70 72 | 69 6f 72 69 74 69 65 73 |onbar pr|iorities|
|00000fc0| 2c 20 74 6f 20 62 65 20 | 66 69 6c 6c 65 64 20 6f |, to be |filled o|
|00000fd0| 75 74 20 6c 61 74 65 72 | 0d 06 72 28 57 69 6d 70 |ut later|..r(Wimp|
|00000fe0| 50 72 69 6f 72 69 74 79 | 5f 52 65 73 6f 75 72 63 |Priority|_Resourc|
|00000ff0| 65 46 69 6c 65 72 3d 26 | 35 30 30 30 30 30 30 30 |eFiler=&|50000000|
|00001000| 0d 06 7c 2a 77 69 6e 64 | 6f 77 5f 62 61 63 6b 67 |..|*wind|ow_backg|
|00001010| 72 6f 75 6e 64 25 3d 2d | 31 20 3a 20 f4 20 50 73 |round%=-|1 : . Ps|
|00001020| 65 75 64 6f 2d 69 63 6f | 6e 2e 0d 06 86 0c 62 5f |eudo-ico|n.....b_|
|00001030| 6e 75 6c 6c 3d 30 0d 06 | 90 0e 62 5f 61 64 6a 75 |null=0..|..b_adju|
|00001040| 73 74 3d 31 0d 06 9a 0c | 62 5f 6d 65 6e 75 3d 32 |st=1....|b_menu=2|
|00001050| 0d 06 a4 0e 62 5f 73 65 | 6c 65 63 74 3d 34 0d 06 |....b_se|lect=4..|
|00001060| ae 1d 62 5f 73 65 6c 65 | 63 74 5f 64 72 61 67 3d |..b_sele|ct_drag=|
|00001070| 62 5f 73 65 6c 65 63 74 | 2a 31 36 0d 06 b8 1d 62 |b_select|*16....b|
|00001080| 5f 61 64 6a 75 73 74 5f | 64 72 61 67 3d 62 5f 61 |_adjust_|drag=b_a|
|00001090| 64 6a 75 73 74 2a 31 36 | 0d 06 c2 1b 62 31 30 5f |djust*16|....b10_|
|000010a0| 73 65 6c 65 63 74 3d 62 | 5f 73 65 6c 65 63 74 2a |select=b|_select*|
|000010b0| 32 35 36 0d 06 cc 17 62 | 31 30 5f 6d 65 6e 75 3d |256....b|10_menu=|
|000010c0| 62 5f 6d 65 6e 75 2a 32 | 35 36 0d 06 d6 1b 62 31 |b_menu*2|56....b1|
|000010d0| 30 5f 61 64 6a 75 73 74 | 3d 62 5f 61 64 6a 75 73 |0_adjust|=b_adjus|
|000010e0| 74 2a 32 35 36 0d 06 e0 | 1f 62 31 30 5f 73 65 6c |t*256...|.b10_sel|
|000010f0| 65 63 74 5f 64 72 61 67 | 3d 62 5f 73 65 6c 65 63 |ect_drag|=b_selec|
|00001100| 74 2a 31 36 0d 06 ea 1b | 62 31 30 5f 6d 65 6e 75 |t*16....|b10_menu|
|00001110| 5f 64 72 61 67 3d 62 5f | 6d 65 6e 75 2a 31 36 0d |_drag=b_|menu*16.|
|00001120| 06 f4 1f 62 31 30 5f 61 | 64 6a 75 73 74 5f 64 72 |...b10_a|djust_dr|
|00001130| 61 67 3d 62 5f 61 64 6a | 75 73 74 2a 31 36 0d 06 |ag=b_adj|ust*16..|
|00001140| fe 1e 62 31 30 5f 73 65 | 6c 65 63 74 5f 64 6f 75 |..b10_se|lect_dou|
|00001150| 62 6c 65 3d 62 5f 73 65 | 6c 65 63 74 0d 07 08 1a |ble=b_se|lect....|
|00001160| 62 31 30 5f 6d 65 6e 75 | 5f 64 6f 75 62 6c 65 3d |b10_menu|_double=|
|00001170| 62 5f 6d 65 6e 75 0d 07 | 12 1e 62 31 30 5f 61 64 |b_menu..|..b10_ad|
|00001180| 6a 75 73 74 5f 64 6f 75 | 62 6c 65 3d 62 5f 61 64 |just_dou|ble=b_ad|
|00001190| 6a 75 73 74 0d 07 1c 53 | 6d 65 6e 75 77 69 6e 64 |just...S|menuwind|
|000011a0| 6f 77 25 3d 30 20 3a 20 | f4 20 68 61 6e 64 6c 65 |ow%=0 : |. handle|
|000011b0| 20 6f 66 20 77 69 6e 64 | 6f 77 20 74 6f 20 77 68 | of wind|ow to wh|
|000011c0| 69 63 68 20 57 69 6d 70 | 5f 50 6f 6c 6c 20 4d 65 |ich Wimp|_Poll Me|
|000011d0| 6e 75 5f 53 65 6c 65 63 | 74 20 76 61 6c 75 65 73 |nu_Selec|t values|
|000011e0| 20 72 65 66 65 72 2e 0d | 07 26 43 3a 20 f4 20 49 | refer..|.&C: . I|
|000011f0| 74 73 20 70 72 65 73 65 | 6e 63 65 20 68 65 72 65 |ts prese|nce here|
|00001200| 20 69 73 20 52 65 64 75 | 6e 64 61 6e 74 2e 20 49 | is Redu|ndant. I|
|00001210| 74 20 69 73 20 73 65 74 | 20 62 79 20 50 52 4f 43 |t is set| by PROC|
|00001220| 43 72 65 61 74 65 4d 65 | 6e 75 0d 07 30 3d 3a 20 |CreateMe|nu..0=: |
|00001230| f4 20 46 6f 72 20 75 73 | 65 20 69 6e 20 50 52 4f |. For us|e in PRO|
|00001240| 43 6d 65 6e 75 64 6f 6e | 65 2e 20 32 32 2f 38 2f |Cmenudon|e. 22/8/|
|00001250| 39 31 20 4e 6f 77 20 6d | 65 6e 75 69 63 6f 6e 25 |91 Now m|enuicon%|
|00001260| 20 61 64 64 65 64 2e 0d | 07 3a 0f 6d 65 6e 75 69 | added..|.:.menui|
|00001270| 63 6f 6e 25 3d b9 0d 07 | 44 12 63 75 72 72 65 6e |con%=...|D.curren|
|00001280| 74 6d 65 6e 75 25 3d b9 | 0d 07 4e 1b 64 72 61 67 |tmenu%=.|..N.drag|
|00001290| 67 69 6e 67 5f 69 63 6f | 6e 5f 77 69 6e 64 6f 77 |ging_ico|n_window|
|000012a0| 25 3d b9 0d 07 58 42 3a | 20 f4 20 48 61 6e 64 6c |%=...XB:| . Handl|
|000012b0| 65 20 6f 66 20 77 69 6e | 64 6f 77 20 63 75 72 72 |e of win|dow curr|
|000012c0| 65 6e 74 6c 79 2d 64 72 | 61 67 67 69 6e 67 20 69 |ently-dr|agging i|
|000012d0| 63 6f 6e 20 77 61 73 20 | 64 72 61 67 67 65 64 20 |con was |dragged |
|000012e0| 66 72 6f 6d 2e 0d 07 62 | 4c 3a 20 f4 20 54 68 69 |from...b|L: . Thi|
|000012f0| 73 20 61 6e 64 20 6e 65 | 78 74 20 76 61 72 20 61 |s and ne|xt var a|
|00001300| 72 65 20 73 65 74 20 62 | 79 20 50 52 4f 43 5f 44 |re set b|y PROC_D|
|00001310| 72 61 67 5f 49 63 6f 6e | 20 61 6e 64 20 75 6e 73 |rag_Icon| and uns|
|00001320| 65 74 20 28 62 61 63 6b | 20 74 6f 20 54 52 55 45 |et (back| to TRUE|
|00001330| 29 0d 07 6c 29 3a 20 f4 | 20 62 79 20 75 73 65 72 |)..l): .| by user|
|00001340| 20 72 6f 75 74 69 6e 65 | 20 50 52 4f 43 55 73 65 | routine| PROCUse|
|00001350| 72 5f 44 72 61 67 5f 42 | 6f 78 0d 07 76 14 64 72 |r_Drag_B|ox..v.dr|
|00001360| 61 67 67 69 6e 67 5f 69 | 63 6f 6e 25 3d b9 0d 07 |agging_i|con%=...|
|00001370| 80 2e 3a 20 f4 20 68 61 | 6e 64 6c 65 20 6f 66 20 |..: . ha|ndle of |
|00001380| 69 63 6f 6e 20 63 75 72 | 72 65 6e 74 6c 79 20 62 |icon cur|rently b|
|00001390| 65 69 6e 67 20 64 72 61 | 67 67 65 64 0d 07 8a 5f |eing dra|gged..._|
|000013a0| 77 69 6d 70 5f 73 70 72 | 69 74 65 73 25 3d 31 20 |wimp_spr|ites%=1 |
|000013b0| 3a 20 f4 20 46 6f 72 20 | 75 73 65 20 69 6e 20 63 |: . For |use in c|
|000013c0| 72 65 61 74 69 6e 67 20 | 77 69 6e 64 6f 77 73 2c |reating |windows,|
|000013d0| 20 75 73 65 20 74 68 69 | 73 20 61 73 20 73 70 72 | use thi|s as spr|
|000013e0| 69 74 65 20 62 6c 6f 63 | 6b 20 66 6f 72 20 57 49 |ite bloc|k for WI|
|000013f0| 4d 50 20 73 70 72 69 74 | 65 73 2e 0d 07 94 0a 7a |MP sprit|es.....z|
|00001400| 65 72 6f 3d 30 0d 07 9e | 56 6a 75 6e 6b 3d b3 28 |ero=0...|Vjunk=.(|
|00001410| 2d 91 29 20 3a 20 f4 20 | 4e 65 76 65 72 20 70 75 |-.) : . |Never pu|
|00001420| 74 20 61 6e 79 74 68 69 | 6e 67 20 68 65 72 65 20 |t anythi|ng here |
|00001430| 79 6f 75 20 77 61 6e 74 | 20 74 6f 20 6b 65 65 70 |you want| to keep|
|00001440| 21 20 54 68 69 73 20 61 | 6c 73 6f 20 69 6e 69 74 |! This a|lso init|
|00001450| 69 61 6c 69 73 65 73 20 | 52 4e 44 0d 07 a8 39 76 |ialises |RND...9v|
|00001460| 6f 69 64 3d 6a 75 6e 6b | 20 3a 20 f4 20 53 61 6d |oid=junk| : . Sam|
|00001470| 65 20 61 73 20 6a 75 6e | 6b 2e 20 54 65 72 6d 20 |e as jun|k. Term |
|00001480| 6d 69 67 68 74 20 62 65 | 20 70 72 65 66 65 72 61 |might be| prefera|
|00001490| 62 6c 65 2e 0d 07 b2 66 | 46 6f 6e 74 4d 65 6e 75 |ble....f|FontMenu|
|000014a0| 25 3d b9 20 3a 20 f4 20 | 53 6f 20 77 65 20 6b 6e |%=. : . |So we kn|
|000014b0| 6f 77 20 61 20 66 6f 6e | 74 20 6d 65 6e 75 20 64 |ow a fon|t menu d|
|000014c0| 6f 65 73 20 6e 6f 74 20 | 61 6c 72 65 61 64 79 20 |oes not |already |
|000014d0| 65 78 69 73 74 2e 20 53 | 65 65 20 46 4e 5f 43 72 |exist. S|ee FN_Cr|
|000014e0| 65 61 74 65 5f 4d 65 6e | 75 5f 46 6f 6e 74 53 65 |eate_Men|u_FontSe|
|000014f0| 6c 65 63 74 6f 72 50 6c | 75 73 0d 07 bc 05 3a 0d |lectorPl|us....:.|
|00001500| 07 c6 41 70 6f 6c 6c 5f | 63 6f 6e 74 72 6f 6c 6d |..Apoll_|controlm|
|00001510| 61 73 6b 25 3d 30 20 3a | 20 f4 20 43 6f 6e 74 72 |ask%=0 :| . Contr|
|00001520| 6f 6c 20 6d 61 73 6b 20 | 66 6f 72 20 57 69 6d 70 |ol mask |for Wimp|
|00001530| 5f 50 6f 6c 6c 20 2d 20 | 64 65 66 61 75 6c 74 2e |_Poll - |default.|
|00001540| 0d 07 d0 39 f4 20 44 65 | 66 61 75 6c 74 20 63 6c |...9. De|fault cl|
|00001550| 61 69 6d 73 20 61 6c 6c | 20 65 76 65 6e 74 73 2e |aims all| events.|
|00001560| 20 53 6f 6d 65 20 66 6f | 72 20 57 69 6d 70 45 78 | Some fo|r WimpEx|
|00001570| 74 27 73 20 73 61 6b 65 | 2e 0d 07 da 54 73 69 6e |t's sake|....Tsin|
|00001580| 67 6c 65 70 6f 6c 6c 6d | 61 73 6b 5f 6e 75 6c 6c |glepollm|ask_null|
|00001590| 25 3d 26 37 46 45 20 3a | 20 f4 20 54 68 69 73 20 |%=&7FE :| . This |
|000015a0| 6d 65 61 6e 73 20 4f 4e | 4c 59 20 6e 75 6c 6c 2d |means ON|LY null-|
|000015b0| 72 65 61 73 6f 6e 2d 63 | 6f 64 65 73 20 63 61 6e |reason-c|odes can|
|000015c0| 20 62 65 20 72 65 74 75 | 72 6e 65 64 2e 0d 07 e4 | be retu|rned....|
|000015d0| 19 73 69 6e 67 6c 65 70 | 6f 6c 6c 6d 61 73 6b 5f |.singlep|ollmask_|
|000015e0| 61 6e 79 25 3d 30 0d 07 | ee 11 70 6f 6c 6c 5f 64 |any%=0..|..poll_d|
|000015f0| 65 6c 61 79 25 3d a3 0d | 07 f8 05 3a 0d 08 02 05 |elay%=..|...:....|
|00001600| 3a 0d 08 0c 13 24 77 62 | 6c 6f 63 6b 25 3d 22 54 |:....$wb|lock%="T|
|00001610| 41 53 4b 22 0d 08 16 1f | 74 61 73 6b 6e 61 6d 65 |ASK"....|taskname|
|00001620| 24 3d a4 5f 54 72 61 6e | 73 28 22 3d 54 4e 61 6d |$=._Tran|s("=TNam|
|00001630| 65 22 29 0d 08 20 1d 73 | 63 72 61 70 25 21 30 3d |e").. .s|crap%!0=|
|00001640| 4d 65 73 73 61 67 65 5f | 44 61 74 61 53 61 76 65 |Message_|DataSave|
|00001650| 0d 08 2a 20 73 63 72 61 | 70 25 21 34 3d 4d 65 73 |..* scra|p%!4=Mes|
|00001660| 73 61 67 65 5f 44 61 74 | 61 53 61 76 65 41 63 6b |sage_Dat|aSaveAck|
|00001670| 0d 08 34 1d 73 63 72 61 | 70 25 21 38 3d 4d 65 73 |..4.scra|p%!8=Mes|
|00001680| 73 61 67 65 5f 44 61 74 | 61 4c 6f 61 64 0d 08 3e |sage_Dat|aLoad..>|
|00001690| 21 73 63 72 61 70 25 21 | 31 32 3d 4d 65 73 73 61 |!scrap%!|12=Messa|
|000016a0| 67 65 5f 44 61 74 61 4c | 6f 61 64 41 63 6b 0d 08 |ge_DataL|oadAck..|
|000016b0| 48 1e 73 63 72 61 70 25 | 21 31 36 3d 4d 65 73 73 |H.scrap%|!16=Mess|
|000016c0| 61 67 65 5f 44 61 74 61 | 4f 70 65 6e 0d 08 52 1d |age_Data|Open..R.|
|000016d0| 73 63 72 61 70 25 21 32 | 30 3d 4d 65 73 73 61 67 |scrap%!2|0=Messag|
|000016e0| 65 5f 50 72 65 51 75 69 | 74 0d 08 5c 21 73 63 72 |e_PreQui|t..\!scr|
|000016f0| 61 70 25 21 32 34 3d 4d | 65 73 73 61 67 65 5f 53 |ap%!24=M|essage_S|
|00001700| 61 76 65 44 65 73 6b 74 | 6f 70 0d 08 66 22 73 63 |aveDeskt|op..f"sc|
|00001710| 72 61 70 25 21 32 38 3d | 4d 65 73 73 61 67 65 5f |rap%!28=|Message_|
|00001720| 46 69 6c 65 72 4f 70 65 | 6e 44 69 72 0d 08 70 23 |FilerOpe|nDir..p#|
|00001730| 73 63 72 61 70 25 21 33 | 32 3d 4d 65 73 73 61 67 |scrap%!3|2=Messag|
|00001740| 65 5f 46 69 6c 65 72 43 | 6c 6f 73 65 44 69 72 0d |e_FilerC|loseDir.|
|00001750| 08 7a 1c 73 63 72 61 70 | 25 21 33 36 3d 4d 65 73 |.z.scrap|%!36=Mes|
|00001760| 73 61 67 65 5f 4e 6f 74 | 69 66 79 0d 08 84 21 73 |sage_Not|ify...!s|
|00001770| 63 72 61 70 25 21 34 30 | 3d 4d 65 73 73 61 67 65 |crap%!40|=Message|
|00001780| 5f 4d 65 6e 75 57 61 72 | 6e 69 6e 67 0d 08 8e 20 |_MenuWar|ning... |
|00001790| 73 63 72 61 70 25 21 34 | 34 3d 4d 65 73 73 61 67 |scrap%!4|4=Messag|
|000017a0| 65 5f 4d 6f 64 65 43 68 | 61 6e 67 65 0d 08 98 24 |e_ModeCh|ange...$|
|000017b0| 73 63 72 61 70 25 21 34 | 38 3d 4d 65 73 73 61 67 |scrap%!4|8=Messag|
|000017c0| 65 5f 54 61 73 6b 49 6e | 69 74 69 61 6c 69 73 65 |e_TaskIn|itialise|
|000017d0| 0d 08 a2 23 73 63 72 61 | 70 25 21 35 32 3d 4d 65 |...#scra|p%!52=Me|
|000017e0| 73 73 61 67 65 5f 54 61 | 73 6b 43 6c 6f 73 65 44 |ssage_Ta|skCloseD|
|000017f0| 6f 77 6e 0d 08 ac 1e 73 | 63 72 61 70 25 21 35 36 |own....s|crap%!56|
|00001800| 3d 4d 65 73 73 61 67 65 | 5f 53 6c 6f 74 53 69 7a |=Message|_SlotSiz|
|00001810| 65 0d 08 b6 1d 73 63 72 | 61 70 25 21 36 30 3d 4d |e....scr|ap%!60=M|
|00001820| 65 73 73 61 67 65 5f 53 | 65 74 53 6c 6f 74 0d 08 |essage_S|etSlot..|
|00001830| c0 20 73 63 72 61 70 25 | 21 36 34 3d 4d 65 73 73 |. scrap%|!64=Mess|
|00001840| 61 67 65 5f 54 61 73 6b | 4e 61 6d 65 52 71 0d 08 |age_Task|NameRq..|
|00001850| ca 20 73 63 72 61 70 25 | 21 36 38 3d 4d 65 73 73 |. scrap%|!68=Mess|
|00001860| 61 67 65 5f 54 61 73 6b | 4e 61 6d 65 49 73 0d 08 |age_Task|NameIs..|
|00001870| d4 21 73 63 72 61 70 25 | 21 37 32 3d 4d 65 73 73 |.!scrap%|!72=Mess|
|00001880| 61 67 65 5f 4d 65 6e 75 | 44 65 6c 65 74 65 64 0d |age_Menu|Deleted.|
|00001890| 08 de 21 73 63 72 61 70 | 25 21 37 36 3d 4d 65 73 |..!scrap|%!76=Mes|
|000018a0| 73 61 67 65 5f 48 65 6c | 70 52 65 71 75 65 73 74 |sage_Hel|pRequest|
|000018b0| 0d 08 e8 24 73 63 72 61 | 70 25 21 38 30 3d 4d 65 |...$scra|p%!80=Me|
|000018c0| 73 73 61 67 65 5f 48 65 | 6c 70 52 65 70 6c 79 3d |ssage_He|lpReply=|
|000018d0| 26 35 30 33 0d 08 f2 0f | 73 63 72 61 70 25 21 38 |&503....|scrap%!8|
|000018e0| 34 3d 30 0d 08 fc 47 c8 | 99 20 22 57 69 6d 70 5f |4=0...G.|. "Wimp_|
|000018f0| 49 6e 69 74 69 61 6c 69 | 73 65 22 2c 33 30 30 2c |Initiali|se",300,|
|00001900| 21 77 62 6c 6f 63 6b 25 | 2c 74 61 73 6b 6e 61 6d |!wblock%|,tasknam|
|00001910| 65 24 2c 73 63 72 61 70 | 25 20 b8 20 76 65 72 73 |e$,scrap|% . vers|
|00001920| 69 6f 6e 25 2c 74 61 73 | 6b 25 0d 09 06 14 ee 20 |ion%,tas|k%..... |
|00001930| 85 20 f2 5f 45 72 72 6f | 72 5f 57 69 6d 70 0d 09 |. ._Erro|r_Wimp..|
|00001940| 10 1f 57 69 6d 70 45 78 | 74 5f 52 65 71 75 65 73 |..WimpEx|t_Reques|
|00001950| 74 65 72 57 69 6e 64 6f | 77 25 3d 2d 33 0d 09 1a |terWindo|w%=-3...|
|00001960| 1c 57 69 6d 70 45 78 74 | 5f 46 65 61 74 75 72 65 |.WimpExt|_Feature|
|00001970| 73 25 3d 25 30 31 30 31 | 30 0d 09 24 48 c8 99 20 |s%=%0101|0..$H.. |
|00001980| 22 57 69 6d 70 45 78 74 | 5f 49 6e 69 74 69 61 6c |"WimpExt|_Initial|
|00001990| 69 73 65 22 2c 34 2c 74 | 61 73 6b 25 2c 57 69 6d |ise",4,t|ask%,Wim|
|000019a0| 70 45 78 74 5f 46 65 61 | 74 75 72 65 73 25 20 b8 |pExt_Fea|tures% .|
|000019b0| 20 57 69 6d 70 45 78 74 | 5f 56 65 72 73 69 6f 6e | WimpExt|_Version|
|000019c0| 25 0d 09 2e 0b 71 75 69 | 74 25 3d a3 0d 09 38 0a |%....qui|t%=...8.|
|000019d0| 3d 74 61 73 6b 25 0d 09 | 42 05 3a 0d 09 4c 26 dd |=task%..|B.:..L&.|
|000019e0| 20 a4 5f 45 6e 75 6d 65 | 72 61 74 65 5f 54 61 73 | ._Enume|rate_Tas|
|000019f0| 6b 73 28 70 6f 69 6e 74 | 65 72 25 2c 6c 65 6e 25 |ks(point|er%,len%|
|00001a00| 29 0d 09 56 52 f4 20 50 | 65 72 66 6f 72 6d 73 20 |)..VR. P|erforms |
|00001a10| 54 61 73 6b 4d 61 6e 61 | 67 65 72 5f 45 6e 75 6d |TaskMana|ger_Enum|
|00001a20| 65 72 61 74 65 54 61 73 | 6b 73 20 61 6e 64 20 72 |erateTas|ks and r|
|00001a30| 65 74 75 72 6e 73 20 70 | 6f 69 6e 74 65 72 20 74 |eturns p|ointer t|
|00001a40| 6f 20 6c 61 73 74 20 74 | 61 73 6b 20 72 65 63 6f |o last t|ask reco|
|00001a50| 72 64 2e 0d 09 60 09 ea | 20 52 31 25 0d 09 6a 3a |rd...`..| R1%..j:|
|00001a60| c8 99 20 22 54 61 73 6b | 4d 61 6e 61 67 65 72 5f |.. "Task|Manager_|
|00001a70| 45 6e 75 6d 65 72 61 74 | 65 54 61 73 6b 73 22 2c |Enumerat|eTasks",|
|00001a80| 30 2c 70 6f 69 6e 74 65 | 72 25 2c 6c 65 6e 25 20 |0,pointe|r%,len% |
|00001a90| b8 20 2c 52 31 25 0d 09 | 74 0a 3d 52 31 25 2d 31 |. ,R1%..|t.=R1%-1|
|00001aa0| 0d 09 7e 05 3a 0d 09 88 | 21 dd 20 a4 5f 47 65 74 |..~.:...|!. ._Get|
|00001ab0| 5f 54 61 73 6b 4e 61 6d | 65 28 74 61 73 6b 68 61 |_TaskNam|e(taskha|
|00001ac0| 6e 64 6c 65 25 29 0d 09 | 92 3f c8 99 20 22 54 61 |ndle%)..|.?.. "Ta|
|00001ad0| 73 6b 4d 61 6e 61 67 65 | 72 5f 54 61 73 6b 4e 61 |skManage|r_TaskNa|
|00001ae0| 6d 65 46 72 6f 6d 48 61 | 6e 64 6c 65 22 2c 74 61 |meFromHa|ndle",ta|
|00001af0| 73 6b 68 61 6e 64 6c 65 | 25 20 b8 20 74 61 73 6b |skhandle|% . task|
|00001b00| 6e 61 6d 65 24 0d 09 9c | 0e 3d 74 61 73 6b 6e 61 |name$...|.=taskna|
|00001b10| 6d 65 24 0d 09 a6 05 3a | 0d 09 b0 21 dd 20 a4 5f |me$....:|...!. ._|
|00001b20| 47 65 74 5f 54 61 73 6b | 49 6e 66 6f 28 74 61 73 |Get_Task|Info(tas|
|00001b30| 6b 68 61 6e 64 6c 65 25 | 29 0d 09 ba 4d f4 20 50 |khandle%|)...M. P|
|00001b40| 65 72 66 6f 72 6d 73 20 | 54 61 73 6b 4d 61 6e 61 |erforms |TaskMana|
|00001b50| 67 65 72 5f 45 6e 75 6d | 65 72 61 74 65 54 61 73 |ger_Enum|erateTas|
|00001b60| 6b 73 20 61 6e 64 20 72 | 65 74 75 72 6e 73 20 70 |ks and r|eturns p|
|00001b70| 6f 69 6e 74 65 72 20 74 | 6f 20 74 61 73 6b 20 72 |ointer t|o task r|
|00001b80| 65 63 6f 72 64 2e 0d 09 | c4 36 f4 20 55 73 65 73 |ecord...|.6. Uses|
|00001b90| 20 73 63 72 61 70 25 2e | 20 54 68 65 20 74 61 73 | scrap%.| The tas|
|00001ba0| 6b 20 72 65 71 75 65 73 | 74 65 64 20 4d 55 53 54 |k reques|ted MUST|
|00001bb0| 20 62 65 20 72 75 6e 6e | 69 6e 67 21 0d 09 ce 15 | be runn|ing!....|
|00001bc0| ea 20 6c 61 73 74 25 2c | 70 74 72 25 2c 6f 75 74 |. last%,|ptr%,out|
|00001bd0| 25 0d 09 d8 2f 6c 61 73 | 74 25 3d a4 5f 45 6e 75 |%.../las|t%=._Enu|
|00001be0| 6d 65 72 61 74 65 5f 54 | 61 73 6b 73 28 73 63 72 |merate_T|asks(scr|
|00001bf0| 61 70 25 2c 6c 65 6e 5f | 77 62 6c 6f 63 6b 25 29 |ap%,len_|wblock%)|
|00001c00| 0d 09 e2 0f 70 74 72 25 | 3d 73 63 72 61 70 25 0d |....ptr%|=scrap%.|
|00001c10| 09 ec 1a c8 95 20 70 74 | 72 25 21 30 3c 3e 74 61 |..... pt|r%!0<>ta|
|00001c20| 73 6b 68 61 6e 64 6c 65 | 25 0d 09 f6 0e 20 20 70 |skhandle|%....  p|
|00001c30| 74 72 25 2b 3d 31 36 0d | 0a 00 05 ce 0d 0a 0a 09 |tr%+=16.|........|
|00001c40| 3d 70 74 72 25 0d 0a 14 | 05 3a 0d 0a 1e 8a dd 20 |=ptr%...|.:..... |
|00001c50| a4 5f 50 72 65 70 61 72 | 65 5f 57 69 6e 64 6f 77 |._Prepar|e_Window|
|00001c60| 42 6c 6f 63 6b 28 62 6c | 6f 63 6b 25 2c 74 69 74 |Block(bl|ock%,tit|
|00001c70| 6c 65 24 2c 70 72 65 64 | 65 66 69 6e 65 64 25 2c |le$,pred|efined%,|
|00001c80| 66 6f 72 65 25 2c 62 61 | 63 6b 25 2c 78 25 2c 79 |fore%,ba|ck%,x%,y|
|00001c90| 25 2c 77 69 64 74 68 25 | 2c 68 65 69 67 68 74 25 |%,width%|,height%|
|00001ca0| 2c 65 78 74 78 25 2c 65 | 78 74 79 25 2c 73 63 72 |,extx%,e|xty%,scr|
|00001cb0| 6f 6c 6c 78 25 2c 73 63 | 72 6f 6c 6c 79 25 2c 6d |ollx%,sc|rolly%,m|
|00001cc0| 69 6e 78 25 2c 6d 69 6e | 79 25 2c 73 70 72 69 74 |inx%,min|y%,sprit|
|00001cd0| 65 73 25 29 0d 0a 28 5b | f4 20 31 37 2f 35 2f 39 |es%)..([|. 17/5/9|
|00001ce0| 32 3a 20 54 61 6b 65 73 | 20 65 78 74 72 61 20 70 |2: Takes| extra p|
|00001cf0| 61 72 61 6d 65 74 65 72 | 2c 20 62 6c 6f 63 6b 25 |arameter|, block%|
|00001d00| 2e 20 49 66 20 74 68 69 | 73 20 69 73 20 54 52 55 |. If thi|s is TRU|
|00001d10| 45 20 69 74 20 61 73 73 | 75 6d 65 73 20 77 62 6c |E it ass|umes wbl|
|00001d20| 6f 63 6b 25 2c 20 6f 74 | 68 65 72 77 69 73 65 0d |ock%, ot|herwise.|
|00001d30| 0a 32 2a f4 20 20 20 20 | 20 20 20 20 20 20 69 74 |.2*.    |      it|
|00001d40| 20 61 73 73 75 6d 65 73 | 20 62 6c 6f 63 6b 25 20 | assumes| block% |
|00001d50| 69 73 20 76 61 6c 69 64 | 2e 0d 0a 3c 2e f4 20 20 |is valid|...<..  |
|00001d60| 20 20 20 20 20 20 20 20 | 4e 6f 77 20 61 20 66 75 |        |Now a fu|
|00001d70| 6e 63 74 69 6f 6e 20 72 | 65 74 75 72 6e 69 6e 67 |nction r|eturning|
|00001d80| 20 62 6c 6f 63 6b 25 0d | 0a 46 1a ea 20 77 69 6e | block%.|.F.. win|
|00001d90| 64 6f 77 25 2c 74 65 78 | 74 70 6f 69 6e 74 65 72 |dow%,tex|tpointer|
|00001da0| 25 0d 0a 50 1a 74 69 74 | 6c 65 24 3d a4 5f 54 72 |%..P.tit|le$=._Tr|
|00001db0| 61 6e 73 28 74 69 74 6c | 65 24 29 0d 0a 5a 1f e7 |ans(titl|e$)..Z..|
|00001dc0| 20 62 6c 6f 63 6b 25 3d | b9 20 8c 20 62 6c 6f 63 | block%=|. . bloc|
|00001dd0| 6b 25 3d 77 62 6c 6f 63 | 6b 25 0d 0a 64 1f f2 5f |k%=wbloc|k%..d.._|
|00001de0| 43 6c 65 61 72 5f 4d 65 | 6d 42 6c 6f 63 6b 28 62 |Clear_Me|mBlock(b|
|00001df0| 6c 6f 63 6b 25 2c 38 38 | 29 0d 0a 6e 14 c8 8e 20 |lock%,88|)..n... |
|00001e00| 70 72 65 64 65 66 69 6e | 65 64 25 20 ca 0d 0a 78 |predefin|ed% ...x|
|00001e10| 10 20 20 c9 20 64 65 66 | 61 75 6c 74 25 0d 0a 82 |.  . def|ault%...|
|00001e20| 14 20 20 20 20 62 6c 6f | 63 6b 25 21 32 34 3d 2d |.    blo|ck%!24=-|
|00001e30| 31 0d 0a 8c ad 20 20 20 | 20 62 6c 6f 63 6b 25 21 |1....   | block%!|
|00001e40| 32 38 3d a4 5f 53 65 74 | 5f 57 69 6e 64 6f 77 46 |28=._Set|_WindowF|
|00001e50| 6c 61 67 73 57 6f 72 64 | 28 64 72 61 67 2c ac 72 |lagsWord|(drag,.r|
|00001e60| 65 64 72 61 77 2c ac 70 | 61 6e 65 2c ac 73 6c 69 |edraw,.p|ane,.sli|
|00001e70| 64 65 6f 66 66 2c 67 65 | 6e 73 63 72 6f 6c 6c 2c |deoff,ge|nscroll,|
|00001e80| ac 67 65 6e 73 63 72 6f | 6c 6c 5f 6e 6f 72 65 70 |.genscro|ll_norep|
|00001e90| 65 61 74 2c ac 67 63 6f | 6c 2c ac 73 74 61 79 62 |eat,.gco|l,.stayb|
|00001ea0| 6f 74 74 6f 6d 2c ac 68 | 6f 74 6b 65 79 73 2c 62 |ottom,.h|otkeys,b|
|00001eb0| 61 63 6b 2c 63 6c 6f 73 | 65 2c 74 69 74 6c 65 2c |ack,clos|e,title,|
|00001ec0| 74 6f 67 67 6c 65 2c 76 | 73 63 72 6f 6c 6c 2c 72 |toggle,v|scroll,r|
|00001ed0| 65 73 69 7a 65 2c 68 73 | 63 72 6f 6c 6c 29 0d 0a |esize,hs|croll)..|
|00001ee0| 96 2c 20 20 20 20 62 6c | 6f 63 6b 25 3f 33 32 3d |.,    bl|ock%?32=|
|00001ef0| 42 6c 61 63 6b 20 3a 20 | f4 20 74 69 74 6c 65 20 |Black : |. title |
|00001f00| 66 6f 72 65 67 72 6f 75 | 6e 64 0d 0a a0 2c 20 20 |foregrou|nd...,  |
|00001f10| 20 20 62 6c 6f 63 6b 25 | 3f 33 33 3d 47 72 65 79 |  block%|?33=Grey|
|00001f20| 32 20 3a 20 f4 20 74 69 | 74 6c 65 20 62 61 63 6b |2 : . ti|tle back|
|00001f30| 67 72 6f 75 6e 64 0d 0a | aa 30 20 20 20 20 62 6c |ground..|.0    bl|
|00001f40| 6f 63 6b 25 3f 33 34 3d | 66 6f 72 65 25 20 3a 20 |ock%?34=|fore% : |
|00001f50| f4 20 77 6f 72 6b 20 61 | 72 65 61 20 66 6f 72 65 |. work a|rea fore|
|00001f60| 67 72 6f 75 6e 64 0d 0a | b4 30 20 20 20 20 62 6c |ground..|.0    bl|
|00001f70| 6f 63 6b 25 3f 33 35 3d | 62 61 63 6b 25 20 3a 20 |ock%?35=|back% : |
|00001f80| f4 20 77 6f 72 6b 20 61 | 72 65 61 20 62 61 63 6b |. work a|rea back|
|00001f90| 67 72 6f 75 6e 64 0d 0a | be 2c 20 20 20 20 62 6c |ground..|.,    bl|
|00001fa0| 6f 63 6b 25 3f 33 36 3d | 47 72 65 79 33 20 3a 20 |ock%?36=|Grey3 : |
|00001fb0| f4 20 73 63 72 6f 6c 6c | 20 62 61 72 20 6f 75 74 |. scroll| bar out|
|00001fc0| 65 72 0d 0a c8 2c 20 20 | 20 20 62 6c 6f 63 6b 25 |er...,  |  block%|
|00001fd0| 3f 33 37 3d 47 72 65 79 | 31 20 3a 20 f4 20 73 63 |?37=Grey|1 : . sc|
|00001fe0| 72 6f 6c 6c 20 62 61 72 | 20 69 6e 6e 65 72 0d 0a |roll bar| inner..|
|00001ff0| d2 27 20 20 20 20 62 6c | 6f 63 6b 25 3f 33 38 3d |.'    bl|ock%?38=|
|00002000| 43 72 65 61 6d 20 3a 20 | f4 20 69 6e 70 75 74 20 |Cream : |. input |
|00002010| 66 6f 63 75 73 0d 0a dc | 4f 20 20 20 20 62 6c 6f |focus...|O    blo|
|00002020| 63 6b 25 21 35 36 3d a4 | 5f 53 65 74 5f 54 69 74 |ck%!56=.|_Set_Tit|
|00002030| 6c 65 42 61 72 46 6c 61 | 67 73 57 6f 72 64 28 74 |leBarFla|gsWord(t|
|00002040| 65 78 74 2c ac 73 70 72 | 69 74 65 2c 73 79 73 74 |ext,.spr|ite,syst|
|00002050| 65 6d 66 6f 6e 74 2c 69 | 6e 64 69 72 65 63 74 65 |emfont,i|ndirecte|
|00002060| 64 2c 30 29 0d 0a e6 2b | 20 20 20 20 62 6c 6f 63 |d,0)...+|    bloc|
|00002070| 6b 25 21 36 30 3d 33 3c | 3c 31 32 20 3a 20 f4 20 |k%!60=3<|<12 : . |
|00002080| 77 6f 72 6b 20 61 72 65 | 61 20 66 6c 61 67 73 0d |work are|a flags.|
|00002090| 0a f0 17 20 20 c9 20 64 | 65 66 61 75 6c 74 5f 72 |...  . d|efault_r|
|000020a0| 65 64 72 61 77 25 0d 0a | fa 14 20 20 20 20 62 6c |edraw%..|..    bl|
|000020b0| 6f 63 6b 25 21 32 34 3d | 2d 31 0d 0b 04 ac 20 20 |ock%!24=|-1....  |
|000020c0| 20 20 62 6c 6f 63 6b 25 | 21 32 38 3d a4 5f 53 65 |  block%|!28=._Se|
|000020d0| 74 5f 57 69 6e 64 6f 77 | 46 6c 61 67 73 57 6f 72 |t_Window|FlagsWor|
|000020e0| 64 28 64 72 61 67 2c 72 | 65 64 72 61 77 2c ac 70 |d(drag,r|edraw,.p|
|000020f0| 61 6e 65 2c ac 73 6c 69 | 64 65 6f 66 66 2c 67 65 |ane,.sli|deoff,ge|
|00002100| 6e 73 63 72 6f 6c 6c 2c | ac 67 65 6e 73 63 72 6f |nscroll,|.genscro|
|00002110| 6c 6c 5f 6e 6f 72 65 70 | 65 61 74 2c ac 67 63 6f |ll_norep|eat,.gco|
|00002120| 6c 2c ac 73 74 61 79 62 | 6f 74 74 6f 6d 2c ac 68 |l,.stayb|ottom,.h|
|00002130| 6f 74 6b 65 79 73 2c 62 | 61 63 6b 2c 63 6c 6f 73 |otkeys,b|ack,clos|
|00002140| 65 2c 74 69 74 6c 65 2c | 74 6f 67 67 6c 65 2c 76 |e,title,|toggle,v|
|00002150| 73 63 72 6f 6c 6c 2c 72 | 65 73 69 7a 65 2c 68 73 |scroll,r|esize,hs|
|00002160| 63 72 6f 6c 6c 29 0d 0b | 0e 2c 20 20 20 20 62 6c |croll)..|.,    bl|
|00002170| 6f 63 6b 25 3f 33 32 3d | 42 6c 61 63 6b 20 3a 20 |ock%?32=|Black : |
|00002180| f4 20 74 69 74 6c 65 20 | 66 6f 72 65 67 72 6f 75 |. title |foregrou|
|00002190| 6e 64 0d 0b 18 2c 20 20 | 20 20 62 6c 6f 63 6b 25 |nd...,  |  block%|
|000021a0| 3f 33 33 3d 47 72 65 79 | 32 20 3a 20 f4 20 74 69 |?33=Grey|2 : . ti|
|000021b0| 74 6c 65 20 62 61 63 6b | 67 72 6f 75 6e 64 0d 0b |tle back|ground..|
|000021c0| 22 30 20 20 20 20 62 6c | 6f 63 6b 25 3f 33 34 3d |"0    bl|ock%?34=|
|000021d0| 66 6f 72 65 25 20 3a 20 | f4 20 77 6f 72 6b 20 61 |fore% : |. work a|
|000021e0| 72 65 61 20 66 6f 72 65 | 67 72 6f 75 6e 64 0d 0b |rea fore|ground..|
|000021f0| 2c 30 20 20 20 20 62 6c | 6f 63 6b 25 3f 33 35 3d |,0    bl|ock%?35=|
|00002200| 62 61 63 6b 25 20 3a 20 | f4 20 77 6f 72 6b 20 61 |back% : |. work a|
|00002210| 72 65 61 20 62 61 63 6b | 67 72 6f 75 6e 64 0d 0b |rea back|ground..|
|00002220| 36 2c 20 20 20 20 62 6c | 6f 63 6b 25 3f 33 36 3d |6,    bl|ock%?36=|
|00002230| 47 72 65 79 33 20 3a 20 | f4 20 73 63 72 6f 6c 6c |Grey3 : |. scroll|
|00002240| 20 62 61 72 20 6f 75 74 | 65 72 0d 0b 40 2c 20 20 | bar out|er..@,  |
|00002250| 20 20 62 6c 6f 63 6b 25 | 3f 33 37 3d 47 72 65 79 |  block%|?37=Grey|
|00002260| 31 20 3a 20 f4 20 73 63 | 72 6f 6c 6c 20 62 61 72 |1 : . sc|roll bar|
|00002270| 20 69 6e 6e 65 72 0d 0b | 4a 27 20 20 20 20 62 6c | inner..|J'    bl|
|00002280| 6f 63 6b 25 3f 33 38 3d | 43 72 65 61 6d 20 3a 20 |ock%?38=|Cream : |
|00002290| f4 20 69 6e 70 75 74 20 | 66 6f 63 75 73 0d 0b 54 |. input |focus..T|
|000022a0| 4f 20 20 20 20 62 6c 6f | 63 6b 25 21 35 36 3d a4 |O    blo|ck%!56=.|
|000022b0| 5f 53 65 74 5f 54 69 74 | 6c 65 42 61 72 46 6c 61 |_Set_Tit|leBarFla|
|000022c0| 67 73 57 6f 72 64 28 74 | 65 78 74 2c ac 73 70 72 |gsWord(t|ext,.spr|
|000022d0| 69 74 65 2c 73 79 73 74 | 65 6d 66 6f 6e 74 2c 69 |ite,syst|emfont,i|
|000022e0| 6e 64 69 72 65 63 74 65 | 64 2c 30 29 0d 0b 5e 2b |ndirecte|d,0)..^+|
|000022f0| 20 20 20 20 62 6c 6f 63 | 6b 25 21 36 30 3d 33 3c |    bloc|k%!60=3<|
|00002300| 3c 31 32 20 3a 20 f4 20 | 77 6f 72 6b 20 61 72 65 |<12 : . |work are|
|00002310| 61 20 66 6c 61 67 73 0d | 0b 68 10 20 20 c9 20 66 |a flags.|.h.  . f|
|00002320| 69 78 73 69 7a 65 25 0d | 0b 72 14 20 20 20 20 62 |ixsize%.|.r.    b|
|00002330| 6c 6f 63 6b 25 21 32 34 | 3d 2d 31 0d 0b 7c b2 20 |lock%!24|=-1..|. |
|00002340| 20 20 20 62 6c 6f 63 6b | 25 21 32 38 3d a4 5f 53 |   block|%!28=._S|
|00002350| 65 74 5f 57 69 6e 64 6f | 77 46 6c 61 67 73 57 6f |et_Windo|wFlagsWo|
|00002360| 72 64 28 64 72 61 67 2c | ac 72 65 64 72 61 77 2c |rd(drag,|.redraw,|
|00002370| ac 70 61 6e 65 2c ac 73 | 6c 69 64 65 6f 66 66 2c |.pane,.s|lideoff,|
|00002380| ac 67 65 6e 73 63 72 6f | 6c 6c 2c ac 67 65 6e 73 |.genscro|ll,.gens|
|00002390| 63 72 6f 6c 6c 5f 6e 6f | 72 65 70 65 61 74 2c ac |croll_no|repeat,.|
|000023a0| 67 63 6f 6c 2c ac 73 74 | 61 79 62 6f 74 74 6f 6d |gcol,.st|aybottom|
|000023b0| 2c ac 68 6f 74 6b 65 79 | 73 2c 62 61 63 6b 2c 63 |,.hotkey|s,back,c|
|000023c0| 6c 6f 73 65 2c 74 69 74 | 6c 65 2c ac 74 6f 67 67 |lose,tit|le,.togg|
|000023d0| 6c 65 2c ac 76 73 63 72 | 6f 6c 6c 2c ac 72 65 73 |le,.vscr|oll,.res|
|000023e0| 69 7a 65 2c ac 68 73 63 | 72 6f 6c 6c 29 0d 0b 86 |ize,.hsc|roll)...|
|000023f0| 17 20 20 20 20 62 6c 6f | 63 6b 25 3f 33 32 3d 42 |.    blo|ck%?32=B|
|00002400| 6c 61 63 6b 0d 0b 90 17 | 20 20 20 20 62 6c 6f 63 |lack....|    bloc|
|00002410| 6b 25 3f 33 33 3d 47 72 | 65 79 32 0d 0b 9a 17 20 |k%?33=Gr|ey2.... |
|00002420| 20 20 20 62 6c 6f 63 6b | 25 3f 33 34 3d 66 6f 72 |   block|%?34=for|
|00002430| 65 25 0d 0b a4 17 20 20 | 20 20 62 6c 6f 63 6b 25 |e%....  |  block%|
|00002440| 3f 33 35 3d 62 61 63 6b | 25 0d 0b ae 17 20 20 20 |?35=back|%....   |
|00002450| 20 62 6c 6f 63 6b 25 3f | 33 36 3d 47 72 65 79 33 | block%?|36=Grey3|
|00002460| 0d 0b b8 17 20 20 20 20 | 62 6c 6f 63 6b 25 3f 33 |....    |block%?3|
|00002470| 37 3d 47 72 65 79 31 0d | 0b c2 17 20 20 20 20 62 |7=Grey1.|...    b|
|00002480| 6c 6f 63 6b 25 3f 33 38 | 3d 43 72 65 61 6d 0d 0b |lock%?38|=Cream..|
|00002490| cc 44 20 20 20 20 62 6c | 6f 63 6b 25 21 35 36 3d |.D    bl|ock%!56=|
|000024a0| a4 5f 53 65 74 5f 54 69 | 74 6c 65 42 61 72 46 6c |._Set_Ti|tleBarFl|
|000024b0| 61 67 73 57 6f 72 64 28 | 74 65 78 74 2c ac 73 70 |agsWord(|text,.sp|
|000024c0| 72 69 74 65 2c 73 79 73 | 74 65 6d 66 6f 6e 74 2c |rite,sys|temfont,|
|000024d0| 30 29 0d 0b d6 17 20 20 | 20 20 62 6c 6f 63 6b 25 |0)....  |  block%|
|000024e0| 21 36 30 3d 33 3c 3c 31 | 32 0d 0b e0 10 20 20 c9 |!60=3<<1|2....  .|
|000024f0| 20 69 6e 66 6f 62 6f 78 | 25 0d 0b ea 14 20 20 20 | infobox|%....   |
|00002500| 20 62 6c 6f 63 6b 25 21 | 32 34 3d 2d 31 0d 0b f4 | block%!|24=-1...|
|00002510| b3 20 20 20 20 62 6c 6f | 63 6b 25 21 32 38 3d a4 |.    blo|ck%!28=.|
|00002520| 5f 53 65 74 5f 57 69 6e | 64 6f 77 46 6c 61 67 73 |_Set_Win|dowFlags|
|00002530| 57 6f 72 64 28 64 72 61 | 67 2c 72 65 64 72 61 77 |Word(dra|g,redraw|
|00002540| 2c ac 70 61 6e 65 2c ac | 73 6c 69 64 65 6f 66 66 |,.pane,.|slideoff|
|00002550| 2c ac 67 65 6e 73 63 72 | 6f 6c 6c 2c ac 67 65 6e |,.genscr|oll,.gen|
|00002560| 73 63 72 6f 6c 6c 5f 6e | 6f 72 65 70 65 61 74 2c |scroll_n|orepeat,|
|00002570| ac 67 63 6f 6c 2c ac 73 | 74 61 79 62 6f 74 74 6f |.gcol,.s|taybotto|
|00002580| 6d 2c ac 68 6f 74 6b 65 | 79 73 2c ac 62 61 63 6b |m,.hotke|ys,.back|
|00002590| 2c ac 63 6c 6f 73 65 2c | 74 69 74 6c 65 2c ac 74 |,.close,|title,.t|
|000025a0| 6f 67 67 6c 65 2c ac 76 | 73 63 72 6f 6c 6c 2c ac |oggle,.v|scroll,.|
|000025b0| 72 65 73 69 7a 65 2c ac | 68 73 63 72 6f 6c 6c 29 |resize,.|hscroll)|
|000025c0| 0d 0b fe 17 20 20 20 20 | 62 6c 6f 63 6b 25 3f 33 |....    |block%?3|
|000025d0| 32 3d 42 6c 61 63 6b 0d | 0c 08 17 20 20 20 20 62 |2=Black.|...    b|
|000025e0| 6c 6f 63 6b 25 3f 33 33 | 3d 47 72 65 79 32 0d 0c |lock%?33|=Grey2..|
|000025f0| 12 17 20 20 20 20 62 6c | 6f 63 6b 25 3f 33 34 3d |..    bl|ock%?34=|
|00002600| 42 6c 61 63 6b 0d 0c 1c | 17 20 20 20 20 62 6c 6f |Black...|.    blo|
|00002610| 63 6b 25 3f 33 35 3d 47 | 72 65 79 31 0d 0c 26 19 |ck%?35=G|rey1..&.|
|00002620| 20 20 20 20 62 6c 6f 63 | 6b 25 3f 33 36 3d 47 72 |    bloc|k%?36=Gr|
|00002630| 65 79 33 20 3a 0d 0c 30 | 36 20 20 20 20 62 6c 6f |ey3 :..0|6    blo|
|00002640| 63 6b 25 3f 33 37 3d 47 | 72 65 79 31 20 3a f4 20 |ck%?37=G|rey1 :. |
|00002650| 54 68 65 73 65 20 74 68 | 72 65 65 20 61 72 65 20 |These th|ree are |
|00002660| 69 72 72 65 6c 65 76 61 | 6e 74 2e 0d 0c 3a 19 20 |irreleva|nt...:. |
|00002670| 20 20 20 62 6c 6f 63 6b | 25 3f 33 38 3d 43 72 65 |   block|%?38=Cre|
|00002680| 61 6d 20 3a 0d 0c 44 4f | 20 20 20 20 62 6c 6f 63 |am :..DO|    bloc|
|00002690| 6b 25 21 35 36 3d a4 5f | 53 65 74 5f 54 69 74 6c |k%!56=._|Set_Titl|
|000026a0| 65 42 61 72 46 6c 61 67 | 73 57 6f 72 64 28 74 65 |eBarFlag|sWord(te|
|000026b0| 78 74 2c ac 73 70 72 69 | 74 65 2c 73 79 73 74 65 |xt,.spri|te,syste|
|000026c0| 6d 66 6f 6e 74 2c 69 6e | 64 69 72 65 63 74 65 64 |mfont,in|directed|
|000026d0| 2c 30 29 0d 0c 4e 13 20 | 20 20 20 62 6c 6f 63 6b |,0)..N. |   block|
|000026e0| 25 21 36 30 3d 30 0d 0c | 58 07 20 20 7f 0d 0c 62 |%!60=0..|X.  ...b|
|000026f0| 3d 20 20 20 20 f4 20 70 | 72 65 64 65 66 69 6e 65 |=    . p|redefine|
|00002700| 64 25 20 3e 20 30 2c 20 | 69 74 20 68 6f 6c 64 73 |d% > 0, |it holds|
|00002710| 20 77 69 6e 64 6f 77 20 | 66 6c 61 67 73 20 28 62 | window |flags (b|
|00002720| 6c 6f 63 6b 25 21 32 38 | 29 2e 0d 0c 6c 19 20 20 |lock%!28|)...l.  |
|00002730| 20 20 f4 20 43 6f 6c 6f | 72 73 20 53 74 61 6e 64 |  . Colo|rs Stand|
|00002740| 61 72 64 0d 0c 76 14 20 | 20 20 20 62 6c 6f 63 6b |ard..v. |   block|
|00002750| 25 21 32 34 3d 2d 31 0d | 0c 80 1d 20 20 20 20 62 |%!24=-1.|...    b|
|00002760| 6c 6f 63 6b 25 21 32 38 | 3d 70 72 65 64 65 66 69 |lock%!28|=predefi|
|00002770| 6e 65 64 25 0d 0c 8a 2c | 20 20 20 20 62 6c 6f 63 |ned%...,|    bloc|
|00002780| 6b 25 3f 33 32 3d 42 6c | 61 63 6b 20 3a 20 f4 20 |k%?32=Bl|ack : . |
|00002790| 74 69 74 6c 65 20 66 6f | 72 65 67 72 6f 75 6e 64 |title fo|reground|
|000027a0| 0d 0c 94 2c 20 20 20 20 | 62 6c 6f 63 6b 25 3f 33 |...,    |block%?3|
|000027b0| 33 3d 47 72 65 79 32 20 | 3a 20 f4 20 74 69 74 6c |3=Grey2 |: . titl|
|000027c0| 65 20 62 61 63 6b 67 72 | 6f 75 6e 64 0d 0c 9e 30 |e backgr|ound...0|
|000027d0| 20 20 20 20 62 6c 6f 63 | 6b 25 3f 33 34 3d 66 6f |    bloc|k%?34=fo|
|000027e0| 72 65 25 20 3a 20 f4 20 | 77 6f 72 6b 20 61 72 65 |re% : . |work are|
|000027f0| 61 20 66 6f 72 65 67 72 | 6f 75 6e 64 0d 0c a8 30 |a foregr|ound...0|
|00002800| 20 20 20 20 62 6c 6f 63 | 6b 25 3f 33 35 3d 62 61 |    bloc|k%?35=ba|
|00002810| 63 6b 25 20 3a 20 f4 20 | 77 6f 72 6b 20 61 72 65 |ck% : . |work are|
|00002820| 61 20 62 61 63 6b 67 72 | 6f 75 6e 64 0d 0c b2 2c |a backgr|ound...,|
|00002830| 20 20 20 20 62 6c 6f 63 | 6b 25 3f 33 36 3d 47 72 |    bloc|k%?36=Gr|
|00002840| 65 79 33 20 3a 20 f4 20 | 73 63 72 6f 6c 6c 20 62 |ey3 : . |scroll b|
|00002850| 61 72 20 6f 75 74 65 72 | 0d 0c bc 2c 20 20 20 20 |ar outer|...,    |
|00002860| 62 6c 6f 63 6b 25 3f 33 | 37 3d 47 72 65 79 31 20 |block%?3|7=Grey1 |
|00002870| 3a 20 f4 20 73 63 72 6f | 6c 6c 20 62 61 72 20 69 |: . scro|ll bar i|
|00002880| 6e 6e 65 72 0d 0c c6 27 | 20 20 20 20 62 6c 6f 63 |nner...'|    bloc|
|00002890| 6b 25 3f 33 38 3d 43 72 | 65 61 6d 20 3a 20 f4 20 |k%?38=Cr|eam : . |
|000028a0| 69 6e 70 75 74 20 66 6f | 63 75 73 0d 0c d0 52 20 |input fo|cus...R |
|000028b0| 20 20 20 62 6c 6f 63 6b | 25 21 35 36 3d a4 5f 53 |   block|%!56=._S|
|000028c0| 65 74 5f 54 69 74 6c 65 | 42 61 72 46 6c 61 67 73 |et_Title|BarFlags|
|000028d0| 57 6f 72 64 28 74 65 78 | 74 2c ac 73 70 72 69 74 |Word(tex|t,.sprit|
|000028e0| 65 2c 73 79 73 74 65 6d | 66 6f 6e 74 2c a9 28 74 |e,system|font,.(t|
|000028f0| 69 74 6c 65 24 29 3e 3d | 31 32 2c 30 29 0d 0c da |itle$)>=|12,0)...|
|00002900| 45 20 20 20 20 62 6c 6f | 63 6b 25 21 36 30 3d 33 |E    blo|ck%!60=3|
|00002910| 3c 3c 31 32 20 3a 20 f4 | 20 77 6f 72 6b 20 61 72 |<<12 : .| work ar|
|00002920| 65 61 20 66 6c 61 67 73 | 20 2d 20 53 69 6e 67 6c |ea flags| - Singl|
|00002930| 65 20 63 6c 69 63 6b 20 | 61 73 20 64 65 66 61 75 |e click |as defau|
|00002940| 6c 74 0d 0c e4 05 cb 0d | 0c ee 0d e7 20 78 25 3c |lt......|.... x%<|
|00002950| 3e b9 20 8c 0d 0c f8 51 | 20 20 f4 20 69 66 20 65 |>. ....Q|  . if e|
|00002960| 78 74 78 25 20 61 6e 64 | 20 65 78 74 79 25 20 61 |xtx% and| exty% a|
|00002970| 72 65 20 7a 65 72 6f 2c | 20 74 68 65 79 20 77 69 |re zero,| they wi|
|00002980| 6c 6c 20 62 65 20 6d 61 | 64 65 20 65 71 75 61 6c |ll be ma|de equal|
|00002990| 20 74 6f 20 77 69 64 74 | 68 20 61 6e 64 20 68 65 | to widt|h and he|
|000029a0| 69 67 68 74 2e 0d 0d 02 | 11 20 20 62 6c 6f 63 6b |ight....|.  block|
|000029b0| 25 21 30 3d 78 25 0d 0d | 0c 19 20 20 62 6c 6f 63 |%!0=x%..|..  bloc|
|000029c0| 6b 25 21 34 3d 79 25 2d | 68 65 69 67 68 74 25 0d |k%!4=y%-|height%.|
|000029d0| 0d 16 18 20 20 62 6c 6f | 63 6b 25 21 38 3d 78 25 |...  blo|ck%!8=x%|
|000029e0| 2b 77 69 64 74 68 25 0d | 0d 20 12 20 20 62 6c 6f |+width%.|. .  blo|
|000029f0| 63 6b 25 21 31 32 3d 79 | 25 0d 0d 2a 18 20 20 62 |ck%!12=y|%..*.  b|
|00002a00| 6c 6f 63 6b 25 21 31 36 | 3d 73 63 72 6f 6c 6c 78 |lock%!16|=scrollx|
|00002a10| 25 0d 0d 34 18 20 20 62 | 6c 6f 63 6b 25 21 32 30 |%..4.  b|lock%!20|
|00002a20| 3d 73 63 72 6f 6c 6c 79 | 25 0d 0d 3e 11 20 20 62 |=scrolly|%..>.  b|
|00002a30| 6c 6f 63 6b 25 21 34 30 | 3d 30 0d 0d 48 31 20 20 |lock%!40|=0..H1  |
|00002a40| 62 6c 6f 63 6b 25 21 34 | 34 3d 2d 28 a4 5f 47 65 |block%!4|4=-(._Ge|
|00002a50| 74 5f 4e 75 6c 6c 53 75 | 62 73 74 28 65 78 74 79 |t_NullSu|bst(exty|
|00002a60| 25 2c 68 65 69 67 68 74 | 25 29 29 0d 0d 52 2d 20 |%,height|%))..R- |
|00002a70| 20 62 6c 6f 63 6b 25 21 | 34 38 3d a4 5f 47 65 74 | block%!|48=._Get|
|00002a80| 5f 4e 75 6c 6c 53 75 62 | 73 74 28 65 78 74 78 25 |_NullSub|st(extx%|
|00002a90| 2c 77 69 64 74 68 25 29 | 0d 0d 5c 11 20 20 62 6c |,width%)|..\.  bl|
|00002aa0| 6f 63 6b 25 21 35 32 3d | 30 0d 0d 66 37 20 20 62 |ock%!52=|0..f7  b|
|00002ab0| 6c 6f 63 6b 25 21 36 34 | 3d a4 5f 47 65 74 5f 4e |lock%!64|=._Get_N|
|00002ac0| 75 6c 6c 53 75 62 73 74 | 28 73 70 72 69 74 65 73 |ullSubst|(sprites|
|00002ad0| 25 2c 77 69 6d 70 5f 73 | 70 72 69 74 65 73 25 29 |%,wimp_s|prites%)|
|00002ae0| 0d 0d 70 1f 20 20 62 6c | 6f 63 6b 25 21 36 38 3d |..p.  bl|ock%!68=|
|00002af0| 6d 69 6e 78 25 2b 6d 69 | 6e 79 25 3c 3c 31 36 0d |minx%+mi|ny%<<16.|
|00002b00| 0d 7a 1f 20 20 e7 20 a4 | 5f 67 65 74 62 69 74 28 |.z.  . .|_getbit(|
|00002b10| 62 6c 6f 63 6b 25 21 35 | 36 2c 38 29 20 8c 0d 0d |block%!5|6,8) ...|
|00002b20| 84 2a 20 20 20 20 74 65 | 78 74 70 6f 69 6e 74 65 |.*    te|xtpointe|
|00002b30| 72 25 3d a4 5f 41 6c 6c | 6f 63 5f 4d 65 6d 42 6c |r%=._All|oc_MemBl|
|00002b40| 6f 63 6b 28 32 35 36 29 | 0d 0d 8e 1c 20 20 20 20 |ock(256)|....    |
|00002b50| 24 74 65 78 74 70 6f 69 | 6e 74 65 72 25 3d 74 69 |$textpoi|nter%=ti|
|00002b60| 74 6c 65 24 0d 0d 98 1e | 20 20 20 20 62 6c 6f 63 |tle$....|    bloc|
|00002b70| 6b 25 21 37 32 3d 74 65 | 78 74 70 6f 69 6e 74 65 |k%!72=te|xtpointe|
|00002b80| 72 25 0d 0d a2 14 20 20 | 20 20 62 6c 6f 63 6b 25 |r%....  |  block%|
|00002b90| 21 37 36 3d 2d 31 0d 0d | ac 15 20 20 20 20 62 6c |!76=-1..|..    bl|
|00002ba0| 6f 63 6b 25 21 38 30 3d | 32 35 36 0d 0d b6 07 20 |ock%!80=|256.... |
|00002bb0| 20 cc 0d 0d c0 1b 20 20 | 20 20 24 28 62 6c 6f 63 | .....  |  $(bloc|
|00002bc0| 6b 25 2b 37 32 29 3d 74 | 69 74 6c 65 24 0d 0d ca |k%+72)=t|itle$...|
|00002bd0| 07 20 20 cd 0d 0d d4 05 | cd 0d 0d de 0b 3d 62 6c |.  .....|.....=bl|
|00002be0| 6f 63 6b 25 0d 0d e8 05 | 3a 0d 0d f2 7d dd 20 a4 |ock%....|:...}. .|
|00002bf0| 5f 43 72 65 61 74 65 5f | 57 69 6e 64 6f 77 28 74 |_Create_|Window(t|
|00002c00| 69 74 6c 65 24 2c 70 72 | 65 64 65 66 69 6e 65 64 |itle$,pr|edefined|
|00002c10| 25 2c 66 6f 72 65 25 2c | 62 61 63 6b 25 2c 78 25 |%,fore%,|back%,x%|
|00002c20| 2c 79 25 2c 77 69 64 74 | 68 25 2c 68 65 69 67 68 |,y%,widt|h%,heigh|
|00002c30| 74 25 2c 65 78 74 78 25 | 2c 65 78 74 79 25 2c 73 |t%,extx%|,exty%,s|
|00002c40| 63 72 6f 6c 6c 78 25 2c | 73 63 72 6f 6c 6c 79 25 |crollx%,|scrolly%|
|00002c50| 2c 6d 69 6e 78 25 2c 6d | 69 6e 79 25 2c 73 70 72 |,minx%,m|iny%,spr|
|00002c60| 69 74 65 73 25 29 0d 0d | fc 47 f4 20 4d 6f 73 74 |ites%)..|.G. Most|
|00002c70| 20 63 6f 6d 6d 6f 6e 20 | 77 61 79 2e 20 43 61 6c | common |way. Cal|
|00002c80| 6c 20 74 68 69 73 20 46 | 4e 20 66 72 6f 6d 20 70 |l this F|N from p|
|00002c90| 72 6f 67 2e 20 43 61 6c | 6c 20 50 72 65 70 61 72 |rog. Cal|l Prepar|
|00002ca0| 65 5f 57 69 6e 64 6f 77 | 42 6c 6f 63 6b 0d 0e 06 |e_Window|Block...|
|00002cb0| 6c f4 20 69 66 20 79 6f | 75 20 77 61 6e 74 20 74 |l. if yo|u want t|
|00002cc0| 6f 20 73 75 62 73 65 71 | 75 65 6e 74 6c 79 20 61 |o subseq|uently a|
|00002cd0| 64 64 20 73 6f 6d 65 20 | 69 6e 69 74 69 61 6c 20 |dd some |initial |
|00002ce0| 69 63 6f 6e 20 64 65 66 | 69 6e 69 74 69 6f 6e 73 |icon def|initions|
|00002cf0| 2c 20 74 68 65 6e 20 63 | 61 6c 6c 20 46 4e 5f 57 |, then c|all FN_W|
|00002d00| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00002d10| 28 62 6c 6f 63 6b 25 29 | 2e 0d 0e 10 0c ea 20 62 |(block%)|...... b|
|00002d20| 6c 6f 63 6b 25 0d 0e 1a | 8a 62 6c 6f 63 6b 25 3d |lock%...|.block%=|
|00002d30| a4 5f 50 72 65 70 61 72 | 65 5f 57 69 6e 64 6f 77 |._Prepar|e_Window|
|00002d40| 42 6c 6f 63 6b 28 b9 2c | 74 69 74 6c 65 24 2c 70 |Block(.,|title$,p|
|00002d50| 72 65 64 65 66 69 6e 65 | 64 25 2c 66 6f 72 65 25 |redefine|d%,fore%|
|00002d60| 2c 62 61 63 6b 25 2c 78 | 25 2c 79 25 2c 77 69 64 |,back%,x|%,y%,wid|
|00002d70| 74 68 25 2c 68 65 69 67 | 68 74 25 2c 65 78 74 78 |th%,heig|ht%,extx|
|00002d80| 25 2c 65 78 74 79 25 2c | 73 63 72 6f 6c 6c 78 25 |%,exty%,|scrollx%|
|00002d90| 2c 73 63 72 6f 6c 6c 79 | 25 2c 6d 69 6e 78 25 2c |,scrolly|%,minx%,|
|00002da0| 6d 69 6e 79 25 2c 73 70 | 72 69 74 65 73 25 29 0d |miny%,sp|rites%).|
|00002db0| 0e 24 20 3d a4 5f 57 69 | 6d 70 5f 43 72 65 61 74 |.$ =._Wi|mp_Creat|
|00002dc0| 65 57 69 6e 64 6f 77 28 | 62 6c 6f 63 6b 25 29 0d |eWindow(|block%).|
|00002dd0| 0e 2e 05 3a 0d 0e 38 21 | dd 20 a4 5f 57 69 6d 70 |...:..8!|. ._Wimp|
|00002de0| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 28 62 6c |_CreateW|indow(bl|
|00002df0| 6f 63 6b 25 29 0d 0e 42 | 0d ea 20 77 69 6e 64 6f |ock%)..B|.. windo|
|00002e00| 77 25 0d 0e 4c 2c c8 99 | 20 22 57 69 6d 70 5f 43 |w%..L,..| "Wimp_C|
|00002e10| 72 65 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |reateWin|dow",,bl|
|00002e20| 6f 63 6b 25 20 b8 20 77 | 69 6e 64 6f 77 25 0d 0e |ock% . w|indow%..|
|00002e30| 56 0c 3d 77 69 6e 64 6f | 77 25 0d 0e 60 05 3a 0d |V.=windo|w%..`.:.|
|00002e40| 0e 6a 20 dd 20 f2 5f 4f | 70 65 6e 5f 54 65 6d 70 |.j . ._O|pen_Temp|
|00002e50| 6c 61 74 65 28 66 69 6c | 65 6e 61 6d 65 24 29 0d |late(fil|ename$).|
|00002e60| 0e 74 25 c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |.t%.. "W|imp_Open|
|00002e70| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 66 69 6c 65 6e |Template|",,filen|
|00002e80| 61 6d 65 24 0d 0e 7e 05 | e1 0d 0e 88 05 3a 0d 0e |ame$..~.|.....:..|
|00002e90| 92 16 dd 20 f2 5f 43 6c | 6f 73 65 5f 54 65 6d 70 |... ._Cl|ose_Temp|
|00002ea0| 6c 61 74 65 0d 0e 9c 1b | c8 99 20 22 57 69 6d 70 |late....|.. "Wimp|
|00002eb0| 5f 43 6c 6f 73 65 54 65 | 6d 70 6c 61 74 65 22 0d |_CloseTe|mplate".|
|00002ec0| 0e a6 05 e1 0d 0e b0 05 | 3a 0d 0e ba 2b dd 20 a4 |........|:...+. .|
|00002ed0| 5f 4c 6f 61 64 5f 54 65 | 6d 70 6c 61 74 65 28 77 |_Load_Te|mplate(w|
|00002ee0| 69 6e 64 6f 77 24 2c 73 | 70 72 69 74 65 5f 61 72 |indow$,s|prite_ar|
|00002ef0| 65 61 25 29 0d 0e c4 2a | ea 20 77 6f 72 6b 6c 65 |ea%)...*|. workle|
|00002f00| 66 74 25 2c 77 69 6e 64 | 6f 77 25 2c 69 64 61 74 |ft%,wind|ow%,idat|
|00002f10| 61 25 2c 69 64 61 74 61 | 5f 73 69 7a 65 25 0d 0e |a%,idata|_size%..|
|00002f20| ce 14 f4 24 73 63 72 61 | 70 25 3d 77 69 6e 64 6f |...$scra|p%=windo|
|00002f30| 77 24 0d 0e d8 3c c8 99 | 20 22 57 69 6d 70 5f 4c |w$...<..| "Wimp_L|
|00002f40| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 30 2c |oadTempl|ate",,0,|
|00002f50| 2c 2c 2d 31 2c 77 69 6e | 64 6f 77 24 2c 30 20 b8 |,,-1,win|dow$,0 .|
|00002f60| 20 2c 2c 69 64 61 74 61 | 5f 73 69 7a 65 25 0d 0e | ,,idata|_size%..|
|00002f70| e2 28 69 64 61 74 61 25 | 3d a4 5f 41 6c 6c 6f 63 |.(idata%|=._Alloc|
|00002f80| 5f 4d 65 6d 42 6c 6f 63 | 6b 28 69 64 61 74 61 5f |_MemBloc|k(idata_|
|00002f90| 73 69 7a 65 25 29 0d 0e | ec 4e c8 99 20 22 57 69 |size%)..|.N.. "Wi|
|00002fa0| 6d 70 5f 4c 6f 61 64 54 | 65 6d 70 6c 61 74 65 22 |mp_LoadT|emplate"|
|00002fb0| 2c 2c 77 62 6c 6f 63 6b | 25 2c 69 64 61 74 61 25 |,,wblock|%,idata%|
|00002fc0| 2c 69 64 61 74 61 25 2b | 69 64 61 74 61 5f 73 69 |,idata%+|idata_si|
|00002fd0| 7a 65 25 2c 73 63 72 61 | 70 25 2c 77 69 6e 64 6f |ze%,scra|p%,windo|
|00002fe0| 77 24 2c 30 0d 0e f6 11 | 77 62 6c 6f 63 6b 25 21 |w$,0....|wblock%!|
|00002ff0| 32 34 3d 2d 31 0d 0f 00 | 1b 77 62 6c 6f 63 6b 25 |24=-1...|.wblock%|
|00003000| 21 36 34 3d 73 70 72 69 | 74 65 5f 61 72 65 61 25 |!64=spri|te_area%|
|00003010| 0d 0f 0a 21 3d a4 5f 57 | 69 6d 70 5f 43 72 65 61 |...!=._W|imp_Crea|
|00003020| 74 65 57 69 6e 64 6f 77 | 28 77 62 6c 6f 63 6b 25 |teWindow|(wblock%|
|00003030| 29 0d 0f 14 05 3a 0d 0f | 1e 3f dd 20 f2 5f 4f 70 |)....:..|.?. ._Op|
|00003040| 65 6e 5f 57 69 6e 64 6f | 77 5f 50 6f 73 53 69 7a |en_Windo|w_PosSiz|
|00003050| 65 28 77 69 6e 64 6f 77 | 25 2c 70 6f 73 78 25 2c |e(window|%,posx%,|
|00003060| 70 6f 73 79 25 2c 77 69 | 64 74 68 25 2c 68 65 69 |posy%,wi|dth%,hei|
|00003070| 67 68 74 25 29 0d 0f 28 | 38 f4 20 55 73 65 20 77 |ght%)..(|8. Use w|
|00003080| 69 74 68 20 63 61 72 65 | 2e 20 4f 6e 6c 79 20 61 |ith care|. Only a|
|00003090| 70 70 6c 69 63 61 62 6c | 65 20 74 6f 20 63 65 72 |pplicabl|e to cer|
|000030a0| 74 61 69 6e 20 77 69 6e | 64 6f 77 73 2e 0d 0f 32 |tain win|dows...2|
|000030b0| 40 f4 20 69 65 3a 20 77 | 69 64 74 68 20 61 6e 64 |@. ie: w|idth and|
|000030c0| 20 68 65 69 67 68 74 20 | 61 72 65 20 69 72 72 65 | height |are irre|
|000030d0| 6c 65 76 61 6e 74 20 74 | 6f 20 66 69 78 65 64 2d |levant t|o fixed-|
|000030e0| 73 69 7a 65 20 77 69 6e | 64 6f 77 73 2e 0d 0f 3c |size win|dows...<|
|000030f0| 40 f4 20 49 66 20 61 6e | 79 20 70 61 72 61 6d 65 |@. If an|y parame|
|00003100| 74 65 72 20 69 73 20 54 | 52 55 45 2c 20 74 68 65 |ter is T|RUE, the|
|00003110| 20 63 75 72 72 65 6e 74 | 20 76 61 6c 75 65 73 20 | current| values |
|00003120| 61 72 65 20 72 65 74 61 | 69 6e 65 64 2e 0d 0f 46 |are reta|ined...F|
|00003130| 2e f2 5f 47 65 74 5f 57 | 69 6e 64 6f 77 53 74 61 |.._Get_W|indowSta|
|00003140| 74 65 5f 50 6f 69 6e 74 | 65 72 28 77 69 6e 64 6f |te_Point|er(windo|
|00003150| 77 25 2c 77 62 6c 6f 63 | 6b 25 29 0d 0f 50 1f e7 |w%,wbloc|k%)..P..|
|00003160| 20 70 6f 73 78 25 3d b9 | 20 8c 20 70 6f 73 78 25 | posx%=.| . posx%|
|00003170| 3d 77 62 6c 6f 63 6b 25 | 21 34 0d 0f 5a 1f e7 20 |=wblock%|!4..Z.. |
|00003180| 70 6f 73 79 25 3d b9 20 | 8c 20 70 6f 73 79 25 3d |posy%=. |. posy%=|
|00003190| 77 62 6c 6f 63 6b 25 21 | 38 0d 0f 64 2c e7 20 77 |wblock%!|8..d,. w|
|000031a0| 69 64 74 68 25 3d b9 20 | 8c 20 77 69 64 74 68 25 |idth%=. |. width%|
|000031b0| 3d 77 62 6c 6f 63 6b 25 | 21 31 32 2d 77 62 6c 6f |=wblock%|!12-wblo|
|000031c0| 63 6b 25 21 34 0d 0f 6e | 2e e7 20 68 65 69 67 68 |ck%!4..n|.. heigh|
|000031d0| 74 25 3d b9 20 8c 20 68 | 65 69 67 68 74 25 3d 77 |t%=. . h|eight%=w|
|000031e0| 62 6c 6f 63 6b 25 21 31 | 36 2d 77 62 6c 6f 63 6b |block%!1|6-wblock|
|000031f0| 25 21 38 0d 0f 78 13 77 | 62 6c 6f 63 6b 25 21 34 |%!8..x.w|block%!4|
|00003200| 3d 70 6f 73 78 25 0d 0f | 82 13 77 62 6c 6f 63 6b |=posx%..|..wblock|
|00003210| 25 21 38 3d 70 6f 73 79 | 25 0d 0f 8c 1b 77 62 6c |%!8=posy|%....wbl|
|00003220| 6f 63 6b 25 21 31 32 3d | 70 6f 73 78 25 2b 77 69 |ock%!12=|posx%+wi|
|00003230| 64 74 68 25 0d 0f 96 1c | 77 62 6c 6f 63 6b 25 21 |dth%....|wblock%!|
|00003240| 31 36 3d 70 6f 73 79 25 | 2b 68 65 69 67 68 74 25 |16=posy%|+height%|
|00003250| 0d 0f a0 2e f2 5f 4f 70 | 65 6e 5f 57 69 6e 64 6f |....._Op|en_Windo|
|00003260| 77 5f 42 6c 6f 63 6b 46 | 69 6c 6c 65 64 28 77 69 |w_BlockF|illed(wi|
|00003270| 6e 64 6f 77 25 2c 77 62 | 6c 6f 63 6b 25 29 0d 0f |ndow%,wb|lock%)..|
|00003280| aa 05 e1 0d 0f b4 05 3a | 0d 0f be 23 dd 20 f2 5f |.......:|...#. ._|
|00003290| 4f 70 65 6e 5f 57 69 6e | 64 6f 77 5f 43 65 6e 74 |Open_Win|dow_Cent|
|000032a0| 72 65 28 77 69 6e 64 6f | 77 25 29 0d 0f c8 11 ea |re(windo|w%).....|
|000032b0| 20 78 70 6f 73 25 2c 79 | 70 6f 73 25 0d 0f d2 46 | xpos%,y|pos%...F|
|000032c0| 78 70 6f 73 25 3d 28 28 | a4 5f 47 65 74 5f 4d 6f |xpos%=((|._Get_Mo|
|000032d0| 64 65 5f 57 69 64 74 68 | 20 2f 20 32 29 20 2d 20 |de_Width| / 2) - |
|000032e0| 28 a4 5f 47 65 74 5f 57 | 69 6e 64 6f 77 5f 57 69 |(._Get_W|indow_Wi|
|000032f0| 64 74 68 28 77 69 6e 64 | 6f 77 25 29 20 2f 20 32 |dth(wind|ow%) / 2|
|00003300| 29 29 0d 0f dc 48 79 70 | 6f 73 25 3d 28 28 a4 5f |))...Hyp|os%=((._|
|00003310| 47 65 74 5f 4d 6f 64 65 | 5f 48 65 69 67 68 74 20 |Get_Mode|_Height |
|00003320| 2f 20 32 29 20 2d 20 28 | a4 5f 47 65 74 5f 57 69 |/ 2) - (|._Get_Wi|
|00003330| 6e 64 6f 77 5f 48 65 69 | 67 68 74 28 77 69 6e 64 |ndow_Hei|ght(wind|
|00003340| 6f 77 25 29 20 2f 20 32 | 29 29 0d 0f e6 32 f2 5f |ow%) / 2|))...2._|
|00003350| 4f 70 65 6e 5f 57 69 6e | 64 6f 77 5f 50 6f 73 53 |Open_Win|dow_PosS|
|00003360| 69 7a 65 28 77 69 6e 64 | 6f 77 25 2c 78 70 6f 73 |ize(wind|ow%,xpos|
|00003370| 25 2c 79 70 6f 73 25 2c | b9 2c b9 29 0d 0f f0 05 |%,ypos%,|.,.)....|
|00003380| e1 0d 0f fa 05 3a 0d 10 | 04 24 dd 20 f2 5f 4f 70 |.....:..|.$. ._Op|
|00003390| 65 6e 5f 57 69 6e 64 6f | 77 5f 54 6f 70 4c 65 66 |en_Windo|w_TopLef|
|000033a0| 74 28 77 69 6e 64 6f 77 | 25 29 0d 10 0e 3a f2 5f |t(window|%)...:._|
|000033b0| 4f 70 65 6e 5f 57 69 6e | 64 6f 77 5f 50 6f 73 53 |Open_Win|dow_PosS|
|000033c0| 69 7a 65 28 77 69 6e 64 | 6f 77 25 2c 30 2c a4 5f |ize(wind|ow%,0,._|
|000033d0| 47 65 74 5f 4d 6f 64 65 | 5f 48 65 69 67 68 74 2c |Get_Mode|_Height,|
|000033e0| b9 2c b9 29 0d 10 18 05 | e1 0d 10 22 05 3a 0d 10 |.,.)....|...".:..|
|000033f0| 2c 1c dd 20 f2 5f 4f 70 | 65 6e 5f 57 69 6e 64 6f |,.. ._Op|en_Windo|
|00003400| 77 28 77 69 6e 64 6f 77 | 25 29 0d 10 36 2e f2 5f |w(window|%)..6.._|
|00003410| 47 65 74 5f 57 69 6e 64 | 6f 77 53 74 61 74 65 5f |Get_Wind|owState_|
|00003420| 50 6f 69 6e 74 65 72 28 | 77 69 6e 64 6f 77 25 2c |Pointer(|window%,|
|00003430| 77 62 6c 6f 63 6b 25 29 | 0d 10 40 2e f2 5f 4f 70 |wblock%)|..@.._Op|
|00003440| 65 6e 5f 57 69 6e 64 6f | 77 5f 42 6c 6f 63 6b 46 |en_Windo|w_BlockF|
|00003450| 69 6c 6c 65 64 28 77 69 | 6e 64 6f 77 25 2c 77 62 |illed(wi|ndow%,wb|
|00003460| 6c 6f 63 6b 25 29 0d 10 | 4a 05 e1 0d 10 54 05 3a |lock%)..|J....T.:|
|00003470| 0d 10 5e 22 dd 20 f2 5f | 4f 70 65 6e 5f 57 69 6e |..^". ._|Open_Win|
|00003480| 64 6f 77 5f 4f 6e 54 6f | 70 28 77 69 6e 64 6f 77 |dow_OnTo|p(window|
|00003490| 25 29 0d 10 68 56 f4 20 | 45 6e 73 75 72 65 73 20 |%)..hV. |Ensures |
|000034a0| 61 20 77 69 6e 64 6f 77 | 20 77 69 6c 6c 20 62 65 |a window| will be|
|000034b0| 20 6f 70 65 6e 65 64 20 | 6f 6e 20 66 72 6f 6e 74 | opened |on front|
|000034c0| 2e 20 4f 6e 20 61 6e 20 | 6f 70 65 6e 20 77 69 6e |. On an |open win|
|000034d0| 64 6f 77 2c 20 62 72 69 | 6e 67 73 20 69 74 20 74 |dow, bri|ngs it t|
|000034e0| 6f 20 66 72 6f 6e 74 2e | 0d 10 72 24 f2 5f 4f 70 |o front.|..r$._Op|
|000034f0| 65 6e 5f 57 69 6e 64 6f | 77 5f 42 65 68 69 6e 64 |en_Windo|w_Behind|
|00003500| 28 77 69 6e 64 6f 77 25 | 2c 2d 31 29 0d 10 7c 05 |(window%|,-1)..|.|
|00003510| e1 0d 10 86 05 3a 0d 10 | 90 26 dd 20 f2 5f 4f 70 |.....:..|.&. ._Op|
|00003520| 65 6e 5f 57 69 6e 64 6f | 77 5f 42 65 68 69 6e 64 |en_Windo|w_Behind|
|00003530| 41 6c 6c 28 77 69 6e 64 | 6f 77 25 29 0d 10 9a 54 |All(wind|ow%)...T|
|00003540| f4 20 45 6e 73 75 72 65 | 73 20 61 20 77 69 6e 64 |. Ensure|s a wind|
|00003550| 6f 77 20 69 73 20 6f 70 | 65 6e 65 64 20 61 74 20 |ow is op|ened at |
|00003560| 74 68 65 20 62 61 63 6b | 20 28 74 68 6f 75 67 68 |the back| (though|
|00003570| 20 69 6e 20 66 72 6f 6e | 74 20 6f 66 20 53 74 61 | in fron|t of Sta|
|00003580| 79 62 6f 74 74 6f 6d 20 | 77 69 6e 64 6f 77 73 29 |ybottom |windows)|
|00003590| 0d 10 a4 26 f4 20 49 66 | 20 77 69 6e 64 6f 77 20 |...&. If| window |
|000035a0| 69 73 20 6f 70 65 6e 2c | 20 70 75 74 73 20 69 74 |is open,| puts it|
|000035b0| 20 62 61 63 6b 2e 0d 10 | ae 24 f2 5f 4f 70 65 6e | back...|.$._Open|
|000035c0| 5f 57 69 6e 64 6f 77 5f | 42 65 68 69 6e 64 28 77 |_Window_|Behind(w|
|000035d0| 69 6e 64 6f 77 25 2c 2d | 32 29 0d 10 b8 05 e1 0d |indow%,-|2)......|
|000035e0| 10 c2 05 3a 0d 10 cc 30 | dd 20 f2 5f 4f 70 65 6e |...:...0|. ._Open|
|000035f0| 5f 57 69 6e 64 6f 77 5f | 42 65 68 69 6e 64 28 77 |_Window_|Behind(w|
|00003600| 69 6e 64 6f 77 25 2c 6f | 74 68 65 72 77 69 6e 64 |indow%,o|therwind|
|00003610| 6f 77 25 29 0d 10 d6 50 | f4 20 45 71 75 69 76 65 |ow%)...P|. Equive|
|00003620| 6c 61 6e 74 20 6f 66 20 | 4f 70 65 6e 57 69 6e 64 |lant of |OpenWind|
|00003630| 6f 77 5f 43 68 65 63 6b | 2c 20 62 75 74 20 6f 70 |ow_Check|, but op|
|00003640| 65 6e 73 20 77 69 6e 64 | 6f 77 20 62 65 68 69 6e |ens wind|ow behin|
|00003650| 64 20 67 69 76 65 6e 20 | 6f 74 68 65 72 20 77 69 |d given |other wi|
|00003660| 6e 64 6f 77 0d 10 e0 2e | f2 5f 47 65 74 5f 57 69 |ndow....|._Get_Wi|
|00003670| 6e 64 6f 77 53 74 61 74 | 65 5f 50 6f 69 6e 74 65 |ndowStat|e_Pointe|
|00003680| 72 28 77 69 6e 64 6f 77 | 25 2c 77 62 6c 6f 63 6b |r(window|%,wblock|
|00003690| 25 29 0d 10 ea 1b 77 62 | 6c 6f 63 6b 25 21 32 38 |%)....wb|lock%!28|
|000036a0| 3d 6f 74 68 65 72 77 69 | 6e 64 6f 77 25 0d 10 f4 |=otherwi|ndow%...|
|000036b0| 2e f2 5f 4f 70 65 6e 5f | 57 69 6e 64 6f 77 5f 42 |.._Open_|Window_B|
|000036c0| 6c 6f 63 6b 46 69 6c 6c | 65 64 28 77 69 6e 64 6f |lockFill|ed(windo|
|000036d0| 77 25 2c 77 62 6c 6f 63 | 6b 25 29 0d 10 fe 05 e1 |w%,wbloc|k%).....|
|000036e0| 0d 11 08 05 3a 0d 11 12 | 1c dd 20 a4 5f 77 69 6e |....:...|.. ._win|
|000036f0| 64 6f 77 5f 6f 70 65 6e | 28 77 69 6e 64 6f 77 25 |dow_open|(window%|
|00003700| 29 0d 11 1c 0a ea 20 6f | 75 74 25 0d 11 26 2f c8 |)..... o|ut%..&/.|
|00003710| 99 20 22 57 69 6d 70 45 | 78 74 5f 43 68 65 63 6b |. "WimpE|xt_Check|
|00003720| 57 69 6e 64 6f 77 4f 70 | 65 6e 22 2c 77 69 6e 64 |WindowOp|en",wind|
|00003730| 6f 77 25 20 b8 20 6f 75 | 74 25 0d 11 30 0a 3d 2d |ow% . ou|t%..0.=-|
|00003740| 6f 75 74 25 0d 11 3a 05 | 3a 0d 11 44 1f dd 20 a4 |out%..:.|:..D.. .|
|00003750| 5f 77 69 6e 64 6f 77 5f | 63 6f 76 65 72 65 64 28 |_window_|covered(|
|00003760| 77 69 6e 64 6f 77 25 29 | 0d 11 4e 40 f4 20 72 65 |window%)|..N@. re|
|00003770| 74 75 72 6e 73 20 54 52 | 55 45 20 69 66 20 77 69 |turns TR|UE if wi|
|00003780| 6e 64 6f 77 20 69 73 20 | 70 61 72 74 69 61 6c 6c |ndow is |partiall|
|00003790| 79 20 6f 72 20 63 6f 6d | 70 6c 65 74 65 6c 79 20 |y or com|pletely |
|000037a0| 63 6f 76 65 72 65 64 2e | 0d 11 58 30 3d ac 28 a4 |covered.|..X0=.(.|
|000037b0| 5f 67 65 74 62 69 74 28 | a4 5f 47 65 74 5f 57 69 |_getbit(|._Get_Wi|
|000037c0| 6e 64 6f 77 5f 46 6c 61 | 67 73 28 77 69 6e 64 6f |ndow_Fla|gs(windo|
|000037d0| 77 25 29 2c 31 37 29 29 | 0d 11 62 05 3a 0d 11 6c |w%),17))|..b.:..l|
|000037e0| 20 dd 20 a4 5f 77 69 6e | 64 6f 77 5f 66 75 6c 6c | . ._win|dow_full|
|000037f0| 73 69 7a 65 28 77 69 6e | 64 6f 77 25 29 0d 11 76 |size(win|dow%)..v|
|00003800| 43 f4 20 52 65 74 75 72 | 6e 73 20 54 52 55 45 2f |C. Retur|ns TRUE/|
|00003810| 46 41 4c 53 45 20 66 6f | 72 20 77 68 65 74 68 65 |FALSE fo|r whethe|
|00003820| 72 20 77 69 6e 64 6f 77 | 20 69 73 20 74 6f 67 67 |r window| is togg|
|00003830| 6c 65 64 20 74 6f 20 66 | 75 6c 6c 20 73 69 7a 65 |led to f|ull size|
|00003840| 0d 11 80 2d 3d a4 5f 67 | 65 74 62 69 74 28 a4 5f |...-=._g|etbit(._|
|00003850| 47 65 74 5f 57 69 6e 64 | 6f 77 5f 46 6c 61 67 73 |Get_Wind|ow_Flags|
|00003860| 28 77 69 6e 64 6f 77 25 | 29 2c 31 38 29 0d 11 8a |(window%|),18)...|
|00003870| 05 3a 0d 11 94 2a dd 20 | a4 5f 47 65 74 5f 43 6f |.:...*. |._Get_Co|
|00003880| 76 65 72 69 6e 67 57 69 | 6e 64 6f 77 5f 48 61 6e |veringWi|ndow_Han|
|00003890| 64 6c 65 28 77 69 6e 64 | 6f 77 25 29 0d 11 9e 4a |dle(wind|ow%)...J|
|000038a0| f4 20 52 65 74 75 72 6e | 73 20 68 61 6e 64 6c 65 |. Return|s handle|
|000038b0| 20 6f 66 20 77 69 6e 64 | 6f 77 20 63 6f 76 65 72 | of wind|ow cover|
|000038c0| 69 6e 67 20 74 68 69 73 | 20 6f 6e 65 2c 20 6f 72 |ing this| one, or|
|000038d0| 20 54 52 55 45 20 69 66 | 20 69 74 20 69 73 20 6f | TRUE if| it is o|
|000038e0| 6e 20 74 6f 70 2e 0d 11 | a8 0f ea 20 70 74 72 25 |n top...|... ptr%|
|000038f0| 2c 6f 75 74 25 0d 11 b2 | 0a 6f 75 74 25 3d b9 0d |,out%...|.out%=..|
|00003900| 11 bc 12 e7 20 77 69 6e | 64 6f 77 25 3c 3e b9 20 |.... win|dow%<>. |
|00003910| 8c 0d 11 c6 26 20 20 70 | 74 72 25 3d a4 5f 47 65 |....&  p|tr%=._Ge|
|00003920| 74 5f 57 69 6e 64 6f 77 | 5f 53 74 61 74 65 28 77 |t_Window|_State(w|
|00003930| 69 6e 64 6f 77 25 29 0d | 11 d0 12 20 20 6f 75 74 |indow%).|...  out|
|00003940| 25 3d 70 74 72 25 21 32 | 38 0d 11 da 05 cd 0d 11 |%=ptr%!2|8.......|
|00003950| e4 09 3d 6f 75 74 25 0d | 11 ee 05 3a 0d 11 f8 2f |..=out%.|...:.../|
|00003960| dd 20 f2 5f 4f 70 65 6e | 5f 57 69 6e 64 6f 77 5f |. ._Open|_Window_|
|00003970| 42 6c 6f 63 6b 46 69 6c | 6c 65 64 28 77 69 6e 64 |BlockFil|led(wind|
|00003980| 6f 77 25 2c 62 6c 6f 63 | 6b 25 29 0d 12 02 14 62 |ow%,bloc|k%)....b|
|00003990| 6c 6f 63 6b 25 21 30 3d | 77 69 6e 64 6f 77 25 0d |lock%!0=|window%.|
|000039a0| 12 0c 20 c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |.. .. "W|imp_Open|
|000039b0| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|000039c0| 12 16 05 e1 0d 12 20 05 | 3a 0d 12 2a 1d dd 20 f2 |...... .|:..*.. .|
|000039d0| 5f 43 6c 6f 73 65 5f 57 | 69 6e 64 6f 77 28 77 69 |_Close_W|indow(wi|
|000039e0| 6e 64 6f 77 25 29 0d 12 | 34 15 77 62 6c 6f 63 6b |ndow%)..|4.wblock|
|000039f0| 25 21 30 3d 77 69 6e 64 | 6f 77 25 0d 12 3e 22 c8 |%!0=wind|ow%..>".|
|00003a00| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |. "Wimp_|CloseWin|
|00003a10| 64 6f 77 22 2c 2c 77 62 | 6c 6f 63 6b 25 0d 12 48 |dow",,wb|lock%..H|
|00003a20| 05 e1 0d 12 52 05 3a 0d | 12 5c 1e dd 20 f2 5f 44 |....R.:.|.\.. ._D|
|00003a30| 65 6c 65 74 65 5f 57 69 | 6e 64 6f 77 28 77 69 6e |elete_Wi|ndow(win|
|00003a40| 64 6f 77 25 29 0d 12 66 | 15 77 62 6c 6f 63 6b 25 |dow%)..f|.wblock%|
|00003a50| 21 30 3d 77 69 6e 64 6f | 77 25 0d 12 70 23 c8 99 |!0=windo|w%..p#..|
|00003a60| 20 22 57 69 6d 70 5f 44 | 65 6c 65 74 65 57 69 6e | "Wimp_D|eleteWin|
|00003a70| 64 6f 77 22 2c 2c 77 62 | 6c 6f 63 6b 25 0d 12 7a |dow",,wb|lock%..z|
|00003a80| 05 e1 0d 12 84 05 3a 0d | 12 8e 23 dd 20 a4 5f 47 |......:.|..#. ._G|
|00003a90| 65 74 5f 57 69 6e 64 6f | 77 5f 4f 75 74 6c 69 6e |et_Windo|w_Outlin|
|00003aa0| 65 28 77 69 6e 64 6f 77 | 25 29 0d 12 98 14 73 63 |e(window|%)....sc|
|00003ab0| 72 61 70 25 21 30 3d 77 | 69 6e 64 6f 77 25 0d 12 |rap%!0=w|indow%..|
|00003ac0| a2 26 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |.&.. "Wi|mp_GetWi|
|00003ad0| 6e 64 6f 77 4f 75 74 6c | 69 6e 65 22 2c 2c 73 63 |ndowOutl|ine",,sc|
|00003ae0| 72 61 70 25 0d 12 ac 0b | 3d 73 63 72 61 70 25 0d |rap%....|=scrap%.|
|00003af0| 12 b6 05 3a 0d 12 c0 21 | dd 20 a4 5f 47 65 74 5f |...:...!|. ._Get_|
|00003b00| 57 69 6e 64 6f 77 5f 54 | 69 74 6c 65 28 77 69 6e |Window_T|itle(win|
|00003b10| 64 6f 77 25 29 0d 12 ca | 17 ea 20 74 69 74 6c 65 |dow%)...|.. title|
|00003b20| 24 2c 70 74 72 25 2c 74 | 70 74 72 25 0d 12 d4 4c |$,ptr%,t|ptr%...L|
|00003b30| f4 20 4c 65 61 76 65 73 | 20 72 65 73 74 20 6f 66 |. Leaves| rest of|
|00003b40| 20 64 61 74 61 20 61 74 | 20 70 74 72 25 20 28 63 | data at| ptr% (c|
|00003b50| 75 72 72 65 6e 74 6c 79 | 20 73 63 72 61 70 25 2c |urrently| scrap%,|
|00003b60| 20 73 65 65 20 46 4e 5f | 47 65 74 5f 57 69 6e 64 | see FN_|Get_Wind|
|00003b70| 6f 77 5f 49 6e 66 6f 29 | 0d 12 de 23 70 74 72 25 |ow_Info)|...#ptr%|
|00003b80| 3d a4 5f 47 65 74 5f 57 | 69 6e 64 6f 77 5f 49 6e |=._Get_W|indow_In|
|00003b90| 66 6f 28 77 69 6e 64 6f | 77 25 29 0d 12 e8 39 e7 |fo(windo|w%)...9.|
|00003ba0| 20 a4 5f 67 65 74 62 69 | 74 28 70 74 72 25 21 36 | ._getbi|t(ptr%!6|
|00003bb0| 30 2c 38 29 20 8c 20 74 | 70 74 72 25 3d 70 74 72 |0,8) . t|ptr%=ptr|
|00003bc0| 25 21 37 36 20 8b 20 74 | 70 74 72 25 3d 70 74 72 |%!76 . t|ptr%=ptr|
|00003bd0| 25 2b 37 36 0d 12 f2 2a | 74 69 74 6c 65 24 3d a4 |%+76...*|title$=.|
|00003be0| 5f 47 65 74 5f 54 65 72 | 6d 69 6e 61 74 65 64 53 |_Get_Ter|minatedS|
|00003bf0| 74 72 69 6e 67 28 74 70 | 74 72 25 2c b9 29 0d 12 |tring(tp|tr%,.)..|
|00003c00| fc 0b 3d 74 69 74 6c 65 | 24 0d 13 06 05 3a 0d 13 |..=title|$....:..|
|00003c10| 10 28 dd 20 f2 5f 53 65 | 74 5f 57 69 6e 64 6f 77 |.(. ._Se|t_Window|
|00003c20| 5f 54 69 74 6c 65 28 77 | 69 6e 64 6f 77 25 2c 74 |_Title(w|indow%,t|
|00003c30| 69 74 6c 65 24 29 0d 13 | 1a 39 c8 99 20 22 57 69 |itle$)..|.9.. "Wi|
|00003c40| 6d 70 45 78 74 5f 53 65 | 74 57 69 6e 64 6f 77 54 |mpExt_Se|tWindowT|
|00003c50| 69 74 6c 65 22 2c 2c 2c | 77 69 6e 64 6f 77 25 2c |itle",,,|window%,|
|00003c60| a4 5f 54 72 61 6e 73 28 | 74 69 74 6c 65 24 29 0d |._Trans(|title$).|
|00003c70| 13 24 05 e1 0d 13 2e 05 | 3a 0d 13 38 20 dd 20 a4 |.$......|:..8 . .|
|00003c80| 5f 77 69 6e 64 6f 77 5f | 74 69 74 6c 65 62 61 72 |_window_|titlebar|
|00003c90| 28 77 69 6e 64 6f 77 25 | 29 0d 13 42 23 70 74 72 |(window%|)..B#ptr|
|00003ca0| 25 3d a4 5f 47 65 74 5f | 57 69 6e 64 6f 77 5f 49 |%=._Get_|Window_I|
|00003cb0| 6e 66 6f 28 77 69 6e 64 | 6f 77 25 29 0d 13 4c 2d |nfo(wind|ow%)..L-|
|00003cc0| e7 20 a4 5f 67 65 74 62 | 69 74 28 70 74 72 25 21 |. ._getb|it(ptr%!|
|00003cd0| 33 32 2c 33 31 29 20 8c | 20 62 69 74 25 3d 32 36 |32,31) .| bit%=26|
|00003ce0| 20 8b 20 62 69 74 25 3d | 30 0d 13 56 1d 3d 28 a4 | . bit%=|0..V.=(.|
|00003cf0| 5f 67 65 74 62 69 74 28 | 70 74 72 25 21 33 32 2c |_getbit(|ptr%!32,|
|00003d00| 62 69 74 25 29 29 0d 13 | 60 05 3a 0d 13 6a 34 dd |bit%))..|`.:..j4.|
|00003d10| 20 f2 5f 47 65 74 5f 57 | 69 6e 64 6f 77 5f 50 6f | ._Get_W|indow_Po|
|00003d20| 73 69 74 69 6f 6e 28 77 | 69 6e 64 6f 77 25 2c f8 |sition(w|indow%,.|
|00003d30| 20 70 6f 73 78 25 2c f8 | 20 70 6f 73 79 25 29 0d | posx%,.| posy%).|
|00003d40| 13 74 4b f4 20 52 65 74 | 75 72 6e 73 20 74 6f 70 |.tK. Ret|urns top|
|00003d50| 20 6c 65 66 74 20 70 6f | 73 69 74 69 6f 6e 20 6f | left po|sition o|
|00003d60| 66 20 77 69 6e 64 6f 77 | 2e 20 53 70 65 63 69 66 |f window|. Specif|
|00003d70| 69 63 61 6c 6c 79 20 74 | 68 65 20 74 6f 70 20 6c |ically t|he top l|
|00003d80| 65 66 74 20 6f 66 20 74 | 68 65 0d 13 7e 18 f4 20 |eft of t|he..~.. |
|00003d90| 76 69 73 69 62 6c 65 20 | 77 6f 72 6b 20 61 72 65 |visible |work are|
|00003da0| 61 2e 0d 13 88 0e ea 20 | 70 6f 69 6e 74 65 72 25 |a...... |pointer%|
|00003db0| 0d 13 92 28 70 6f 69 6e | 74 65 72 25 3d a4 5f 47 |...(poin|ter%=._G|
|00003dc0| 65 74 5f 57 69 6e 64 6f | 77 5f 53 74 61 74 65 28 |et_Windo|w_State(|
|00003dd0| 77 69 6e 64 6f 77 25 29 | 0d 13 9c 14 70 6f 73 78 |window%)|....posx|
|00003de0| 25 3d 70 6f 69 6e 74 65 | 72 25 21 34 0d 13 a6 15 |%=pointe|r%!4....|
|00003df0| 70 6f 73 79 25 3d 70 6f | 69 6e 74 65 72 25 21 31 |posy%=po|inter%!1|
|00003e00| 36 0d 13 b0 05 e1 0d 13 | ba 05 3a 0d 13 c4 20 dd |6.......|..:... .|
|00003e10| 20 a4 5f 47 65 74 5f 57 | 69 6e 64 6f 77 5f 58 70 | ._Get_W|indow_Xp|
|00003e20| 6f 73 28 77 69 6e 64 6f | 77 25 29 0d 13 ce 0a ea |os(windo|w%).....|
|00003e30| 20 6f 75 74 25 0d 13 d8 | 2c f2 5f 47 65 74 5f 57 | out%...|,._Get_W|
|00003e40| 69 6e 64 6f 77 5f 50 6f | 73 69 74 69 6f 6e 28 77 |indow_Po|sition(w|
|00003e50| 69 6e 64 6f 77 25 2c 6f | 75 74 25 2c 6a 75 6e 6b |indow%,o|ut%,junk|
|00003e60| 29 0d 13 e2 09 3d 6f 75 | 74 25 0d 13 ec 05 3a 0d |)....=ou|t%....:.|
|00003e70| 13 f6 20 dd 20 a4 5f 47 | 65 74 5f 57 69 6e 64 6f |.. . ._G|et_Windo|
|00003e80| 77 5f 59 70 6f 73 28 77 | 69 6e 64 6f 77 25 29 0d |w_Ypos(w|indow%).|
|00003e90| 14 00 0a ea 20 6f 75 74 | 25 0d 14 0a 2c f2 5f 47 |.... out|%...,._G|
|00003ea0| 65 74 5f 57 69 6e 64 6f | 77 5f 50 6f 73 69 74 69 |et_Windo|w_Positi|
|00003eb0| 6f 6e 28 77 69 6e 64 6f | 77 25 2c 6a 75 6e 6b 2c |on(windo|w%,junk,|
|00003ec0| 6f 75 74 25 29 0d 14 14 | 09 3d 6f 75 74 25 0d 14 |out%)...|.=out%..|
|00003ed0| 1e 05 3a 0d 14 28 32 dd | 20 f2 5f 47 65 74 5f 57 |..:..(2.| ._Get_W|
|00003ee0| 69 6e 64 6f 77 5f 4f 66 | 66 73 65 74 28 77 69 6e |indow_Of|fset(win|
|00003ef0| 64 6f 77 25 2c f8 20 78 | 6f 66 66 25 2c f8 20 79 |dow%,. x|off%,. y|
|00003f00| 6f 66 66 25 29 0d 14 32 | 0e ea 20 70 6f 69 6e 74 |off%)..2|.. point|
|00003f10| 65 72 25 0d 14 3c 28 70 | 6f 69 6e 74 65 72 25 3d |er%..<(p|ointer%=|
|00003f20| a4 5f 47 65 74 5f 57 69 | 6e 64 6f 77 5f 53 74 61 |._Get_Wi|ndow_Sta|
|00003f30| 74 65 28 77 69 6e 64 6f | 77 25 29 0d 14 46 15 78 |te(windo|w%)..F.x|
|00003f40| 6f 66 66 25 3d 70 6f 69 | 6e 74 65 72 25 21 32 30 |off%=poi|nter%!20|
|00003f50| 0d 14 50 15 79 6f 66 66 | 25 3d 70 6f 69 6e 74 65 |..P.yoff|%=pointe|
|00003f60| 72 25 21 32 34 0d 14 5a | 05 e1 0d 14 64 05 3a 0d |r%!24..Z|....d.:.|
|00003f70| 14 6e 20 dd 20 a4 5f 47 | 65 74 5f 57 69 6e 64 6f |.n . ._G|et_Windo|
|00003f80| 77 5f 58 6f 66 66 28 77 | 69 6e 64 6f 77 25 29 0d |w_Xoff(w|indow%).|
|00003f90| 14 78 0a ea 20 6f 75 74 | 25 0d 14 82 2a f2 5f 47 |.x.. out|%...*._G|
|00003fa0| 65 74 5f 57 69 6e 64 6f | 77 5f 4f 66 66 73 65 74 |et_Windo|w_Offset|
|00003fb0| 28 77 69 6e 64 6f 77 25 | 2c 6f 75 74 25 2c 6a 75 |(window%|,out%,ju|
|00003fc0| 6e 6b 29 0d 14 8c 09 3d | 6f 75 74 25 0d 14 96 05 |nk)....=|out%....|
|00003fd0| 3a 0d 14 a0 20 dd 20 a4 | 5f 47 65 74 5f 57 69 6e |:... . .|_Get_Win|
|00003fe0| 64 6f 77 5f 59 6f 66 66 | 28 77 69 6e 64 6f 77 25 |dow_Yoff|(window%|
|00003ff0| 29 0d 14 aa 0a ea 20 6f | 75 74 25 0d 14 b4 2a f2 |)..... o|ut%...*.|
|00004000| 5f 47 65 74 5f 57 69 6e | 64 6f 77 5f 4f 66 66 73 |_Get_Win|dow_Offs|
|00004010| 65 74 28 77 69 6e 64 6f | 77 25 2c 6a 75 6e 6b 2c |et(windo|w%,junk,|
|00004020| 6f 75 74 25 29 0d 14 be | 09 3d 6f 75 74 25 0d 14 |out%)...|.=out%..|
|00004030| c8 05 3a 0d 14 d2 3e dd | 20 f2 5f 43 6f 6e 76 65 |..:...>.| ._Conve|
|00004040| 72 74 5f 53 63 72 65 65 | 6e 50 6f 73 5f 57 69 6e |rt_Scree|nPos_Win|
|00004050| 64 6f 77 50 6f 73 28 77 | 69 6e 64 6f 77 25 2c f8 |dowPos(w|indow%,.|
|00004060| 20 78 73 70 6f 74 25 2c | f8 20 79 73 70 6f 74 25 | xspot%,|. yspot%|
|00004070| 29 0d 14 dc 5d f4 20 54 | 68 69 73 20 74 61 6b 65 |)...]. T|his take|
|00004080| 73 20 4f 53 20 47 72 61 | 70 68 69 63 73 20 75 6e |s OS Gra|phics un|
|00004090| 69 74 73 20 61 6e 64 20 | 61 20 77 69 6e 64 6f 77 |its and |a window|
|000040a0| 20 68 61 6e 64 6c 65 2c | 20 61 6e 64 20 66 69 6e | handle,| and fin|
|000040b0| 64 73 20 6f 75 74 20 77 | 68 65 72 65 20 74 68 65 |ds out w|here the|
|000040c0| 20 66 6f 72 6d 65 72 20 | 72 65 6c 61 74 65 0d 14 | former |relate..|
|000040d0| e6 27 f4 20 74 6f 20 74 | 68 65 20 6c 61 74 74 65 |.'. to t|he latte|
|000040e0| 72 27 73 20 77 6f 72 6b | 20 61 72 65 61 20 6f 72 |r's work| area or|
|000040f0| 69 67 69 6e 2e 0d 14 f0 | 1d ea 20 78 70 6f 73 25 |igin....|.. xpos%|
|00004100| 2c 79 70 6f 73 25 2c 78 | 6f 66 66 25 2c 79 6f 66 |,ypos%,x|off%,yof|
|00004110| 66 25 0d 14 fa 2e f2 5f | 47 65 74 5f 57 69 6e 64 |f%....._|Get_Wind|
|00004120| 6f 77 5f 50 6f 73 69 74 | 69 6f 6e 28 77 69 6e 64 |ow_Posit|ion(wind|
|00004130| 6f 77 25 2c 78 70 6f 73 | 25 2c 79 70 6f 73 25 29 |ow%,xpos|%,ypos%)|
|00004140| 0d 15 04 2c f2 5f 47 65 | 74 5f 57 69 6e 64 6f 77 |...,._Ge|t_Window|
|00004150| 5f 4f 66 66 73 65 74 28 | 77 69 6e 64 6f 77 25 2c |_Offset(|window%,|
|00004160| 78 6f 66 66 25 2c 79 6f | 66 66 25 29 0d 15 0e 1f |xoff%,yo|ff%)....|
|00004170| 78 73 70 6f 74 25 3d 28 | 78 73 70 6f 74 25 2d 78 |xspot%=(|xspot%-x|
|00004180| 70 6f 73 25 29 2b 78 6f | 66 66 25 0d 15 18 22 79 |pos%)+xo|ff%..."y|
|00004190| 73 70 6f 74 25 3d 28 2d | 28 79 70 6f 73 25 2d 79 |spot%=(-|(ypos%-y|
|000041a0| 73 70 6f 74 25 29 29 2b | 79 6f 66 66 25 0d 15 22 |spot%))+|yoff%.."|
|000041b0| 05 e1 0d 15 2c 05 3a 0d | 15 36 3e dd 20 f2 5f 43 |....,.:.|.6>. ._C|
|000041c0| 6f 6e 76 65 72 74 5f 57 | 69 6e 64 6f 77 50 6f 73 |onvert_W|indowPos|
|000041d0| 5f 53 63 72 65 65 6e 50 | 6f 73 28 77 69 6e 64 6f |_ScreenP|os(windo|
|000041e0| 77 25 2c f8 20 78 73 70 | 6f 74 25 2c f8 20 79 73 |w%,. xsp|ot%,. ys|
|000041f0| 70 6f 74 25 29 0d 15 40 | 5a f4 20 54 68 69 73 20 |pot%)..@|Z. This |
|00004200| 74 61 6b 65 73 20 70 6f | 73 69 74 69 6f 6e 20 72 |takes po|sition r|
|00004210| 65 6c 61 74 69 76 65 20 | 74 6f 20 77 69 6e 64 6f |elative |to windo|
|00004220| 77 27 73 20 77 6f 72 6b | 20 61 72 65 61 20 65 78 |w's work| area ex|
|00004230| 74 65 6e 74 20 6f 72 69 | 67 69 6e 20 61 6e 64 20 |tent ori|gin and |
|00004240| 66 69 6e 64 73 20 6f 75 | 74 20 77 68 65 72 65 0d |finds ou|t where.|
|00004250| 15 4a 2e f4 20 69 74 20 | 72 65 6c 61 74 65 73 20 |.J.. it |relates |
|00004260| 74 6f 20 74 68 65 20 61 | 63 74 75 61 6c 20 64 65 |to the a|ctual de|
|00004270| 73 6b 74 6f 70 20 73 63 | 72 65 65 6e 2e 0d 15 54 |sktop sc|reen...T|
|00004280| 1d ea 20 78 70 6f 73 25 | 2c 79 70 6f 73 25 2c 78 |.. xpos%|,ypos%,x|
|00004290| 6f 66 66 25 2c 79 6f 66 | 66 25 0d 15 5e 2e f2 5f |off%,yof|f%..^.._|
|000042a0| 47 65 74 5f 57 69 6e 64 | 6f 77 5f 50 6f 73 69 74 |Get_Wind|ow_Posit|
|000042b0| 69 6f 6e 28 77 69 6e 64 | 6f 77 25 2c 78 70 6f 73 |ion(wind|ow%,xpos|
|000042c0| 25 2c 79 70 6f 73 25 29 | 0d 15 68 2c f2 5f 47 65 |%,ypos%)|..h,._Ge|
|000042d0| 74 5f 57 69 6e 64 6f 77 | 5f 4f 66 66 73 65 74 28 |t_Window|_Offset(|
|000042e0| 77 69 6e 64 6f 77 25 2c | 78 6f 66 66 25 2c 79 6f |window%,|xoff%,yo|
|000042f0| 66 66 25 29 0d 15 72 19 | 78 73 70 6f 74 25 2b 3d |ff%)..r.|xspot%+=|
|00004300| 28 78 70 6f 73 25 2d 78 | 6f 66 66 25 29 0d 15 7c |(xpos%-x|off%)..||
|00004310| 1c 79 73 70 6f 74 25 2b | 3d 28 2d 28 79 6f 66 66 |.yspot%+|=(-(yoff|
|00004320| 25 2d 79 70 6f 73 25 29 | 29 0d 15 86 05 e1 0d 15 |%-ypos%)|).......|
|00004330| 90 05 3a 0d 15 9a 32 dd | 20 f2 5f 47 65 74 5f 57 |..:...2.| ._Get_W|
|00004340| 69 6e 64 6f 77 5f 53 69 | 7a 65 28 77 69 6e 64 6f |indow_Si|ze(windo|
|00004350| 77 25 2c f8 20 73 69 7a | 65 78 25 2c f8 20 73 69 |w%,. siz|ex%,. si|
|00004360| 7a 65 79 25 29 0d 15 a4 | 22 f4 20 52 65 74 75 72 |zey%)...|". Retur|
|00004370| 6e 73 20 73 69 7a 65 20 | 6f 66 20 6f 70 65 6e 20 |ns size |of open |
|00004380| 77 69 6e 64 6f 77 2e 0d | 15 ae 0e ea 20 70 6f 69 |window..|.... poi|
|00004390| 6e 74 65 72 25 0d 15 b8 | 28 70 6f 69 6e 74 65 72 |nter%...|(pointer|
|000043a0| 25 3d a4 5f 47 65 74 5f | 57 69 6e 64 6f 77 5f 53 |%=._Get_|Window_S|
|000043b0| 74 61 74 65 28 77 69 6e | 64 6f 77 25 29 0d 15 c2 |tate(win|dow%)...|
|000043c0| 25 73 69 7a 65 78 25 3d | 28 70 6f 69 6e 74 65 72 |%sizex%=|(pointer|
|000043d0| 25 21 31 32 29 2d 28 70 | 6f 69 6e 74 65 72 25 21 |%!12)-(p|ointer%!|
|000043e0| 34 29 0d 15 cc 25 73 69 | 7a 65 79 25 3d 28 70 6f |4)...%si|zey%=(po|
|000043f0| 69 6e 74 65 72 25 21 31 | 36 29 2d 28 70 6f 69 6e |inter%!1|6)-(poin|
|00004400| 74 65 72 25 21 38 29 0d | 15 d6 05 e1 0d 15 e0 05 |ter%!8).|........|
|00004410| 3a 0d 15 ea 21 dd 20 a4 | 5f 47 65 74 5f 57 69 6e |:...!. .|_Get_Win|
|00004420| 64 6f 77 5f 57 69 64 74 | 68 28 77 69 6e 64 6f 77 |dow_Widt|h(window|
|00004430| 25 29 0d 15 f4 0e ea 20 | 70 6f 69 6e 74 65 72 25 |%)..... |pointer%|
|00004440| 0d 15 fe 28 70 6f 69 6e | 74 65 72 25 3d a4 5f 47 |...(poin|ter%=._G|
|00004450| 65 74 5f 57 69 6e 64 6f | 77 5f 53 74 61 74 65 28 |et_Windo|w_State(|
|00004460| 77 69 6e 64 6f 77 25 29 | 0d 16 08 1f 3d 28 70 6f |window%)|....=(po|
|00004470| 69 6e 74 65 72 25 21 31 | 32 29 2d 28 70 6f 69 6e |inter%!1|2)-(poin|
|00004480| 74 65 72 25 21 34 29 0d | 16 12 05 3a 0d 16 1c 22 |ter%!4).|...:..."|
|00004490| dd 20 a4 5f 47 65 74 5f | 57 69 6e 64 6f 77 5f 48 |. ._Get_|Window_H|
|000044a0| 65 69 67 68 74 28 77 69 | 6e 64 6f 77 25 29 0d 16 |eight(wi|ndow%)..|
|000044b0| 26 0e ea 20 70 6f 69 6e | 74 65 72 25 0d 16 30 28 |&.. poin|ter%..0(|
|000044c0| 70 6f 69 6e 74 65 72 25 | 3d a4 5f 47 65 74 5f 57 |pointer%|=._Get_W|
|000044d0| 69 6e 64 6f 77 5f 53 74 | 61 74 65 28 77 69 6e 64 |indow_St|ate(wind|
|000044e0| 6f 77 25 29 0d 16 3a 1f | 3d 28 70 6f 69 6e 74 65 |ow%)..:.|=(pointe|
|000044f0| 72 25 21 31 36 29 2d 28 | 70 6f 69 6e 74 65 72 25 |r%!16)-(|pointer%|
|00004500| 21 38 29 0d 16 44 05 3a | 0d 16 4e 20 dd 20 a4 5f |!8)..D.:|..N . ._|
|00004510| 47 65 74 5f 57 69 6e 64 | 6f 77 5f 49 6e 66 6f 28 |Get_Wind|ow_Info(|
|00004520| 77 69 6e 64 6f 77 25 29 | 0d 16 58 11 f4 20 55 73 |window%)|..X.. Us|
|00004530| 65 73 20 73 63 72 61 70 | 25 0d 16 62 2c f2 5f 47 |es scrap|%..b,._G|
|00004540| 65 74 5f 57 69 6e 64 6f | 77 49 6e 66 6f 5f 50 6f |et_Windo|wInfo_Po|
|00004550| 69 6e 74 65 72 28 77 69 | 6e 64 6f 77 25 2c 73 63 |inter(wi|ndow%,sc|
|00004560| 72 61 70 25 29 0d 16 6c | 0b 3d 73 63 72 61 70 25 |rap%)..l|.=scrap%|
|00004570| 0d 16 76 05 3a 0d 16 80 | 2e dd 20 f2 5f 47 65 74 |..v.:...|.. ._Get|
|00004580| 5f 57 69 6e 64 6f 77 49 | 6e 66 6f 5f 50 6f 69 6e |_WindowI|nfo_Poin|
|00004590| 74 65 72 28 77 69 6e 64 | 6f 77 25 2c 62 6c 6f 63 |ter(wind|ow%,bloc|
|000045a0| 6b 25 29 0d 16 8a 2c f4 | 20 41 73 73 75 6d 65 73 |k%)...,.| Assumes|
|000045b0| 20 76 61 6c 69 64 20 62 | 6c 6f 63 6b 20 73 75 70 | valid b|lock sup|
|000045c0| 70 6c 69 65 64 20 69 6e | 20 62 6c 6f 63 6b 25 0d |plied in| block%.|
|000045d0| 16 94 14 62 6c 6f 63 6b | 25 21 30 3d 77 69 6e 64 |...block|%!0=wind|
|000045e0| 6f 77 25 0d 16 9e 23 c8 | 99 20 22 57 69 6d 70 5f |ow%...#.|. "Wimp_|
|000045f0| 47 65 74 57 69 6e 64 6f | 77 49 6e 66 6f 22 2c 2c |GetWindo|wInfo",,|
|00004600| 62 6c 6f 63 6b 25 0d 16 | a8 05 e1 0d 16 b2 05 3a |block%..|.......:|
|00004610| 0d 16 bc 29 dd 20 a4 5f | 47 65 74 5f 57 69 6e 64 |...). ._|Get_Wind|
|00004620| 6f 77 5f 4e 75 6d 62 65 | 72 4f 66 49 63 6f 6e 73 |ow_Numbe|rOfIcons|
|00004630| 28 77 69 6e 64 6f 77 25 | 29 0d 16 c6 25 3d 21 28 |(window%|)...%=!(|
|00004640| a4 5f 47 65 74 5f 57 69 | 6e 64 6f 77 5f 49 6e 66 |._Get_Wi|ndow_Inf|
|00004650| 6f 28 77 69 6e 64 6f 77 | 25 29 2b 38 38 29 0d 16 |o(window|%)+88)..|
|00004660| d0 05 3a 0d 16 da 21 dd | 20 a4 5f 47 65 74 5f 57 |..:...!.| ._Get_W|
|00004670| 69 6e 64 6f 77 5f 53 74 | 61 74 65 28 77 69 6e 64 |indow_St|ate(wind|
|00004680| 6f 77 25 29 0d 16 e4 53 | f4 20 55 53 45 53 20 73 |ow%)...S|. USES s|
|00004690| 63 72 61 70 25 20 21 21 | 20 52 65 74 75 72 6e 73 |crap% !!| Returns|
|000046a0| 20 70 6f 69 6e 74 65 72 | 20 74 6f 20 74 68 61 74 | pointer| to that|
|000046b0| 20 62 6c 6f 63 6b 20 28 | 61 73 20 49 20 6d 61 79 | block (|as I may|
|000046c0| 20 63 68 61 6e 67 65 20 | 69 74 20 66 72 6f 6d 20 | change |it from |
|000046d0| 73 63 72 61 70 25 29 0d | 16 ee 2d f2 5f 47 65 74 |scrap%).|..-._Get|
|000046e0| 5f 57 69 6e 64 6f 77 53 | 74 61 74 65 5f 50 6f 69 |_WindowS|tate_Poi|
|000046f0| 6e 74 65 72 28 77 69 6e | 64 6f 77 25 2c 73 63 72 |nter(win|dow%,scr|
|00004700| 61 70 25 29 0d 16 f8 0b | 3d 73 63 72 61 70 25 0d |ap%)....|=scrap%.|
|00004710| 17 02 05 3a 0d 17 0c 2f | dd 20 f2 5f 47 65 74 5f |...:.../|. ._Get_|
|00004720| 57 69 6e 64 6f 77 53 74 | 61 74 65 5f 50 6f 69 6e |WindowSt|ate_Poin|
|00004730| 74 65 72 28 77 69 6e 64 | 6f 77 25 2c 62 6c 6f 63 |ter(wind|ow%,bloc|
|00004740| 6b 25 29 0d 17 16 2c f4 | 20 41 73 73 75 6d 65 73 |k%)...,.| Assumes|
|00004750| 20 76 61 6c 69 64 20 62 | 6c 6f 63 6b 20 73 75 70 | valid b|lock sup|
|00004760| 70 6c 69 65 64 20 69 6e | 20 62 6c 6f 63 6b 25 0d |plied in| block%.|
|00004770| 17 20 14 62 6c 6f 63 6b | 25 21 30 3d 77 69 6e 64 |. .block|%!0=wind|
|00004780| 6f 77 25 0d 17 2a 24 c8 | 99 20 22 57 69 6d 70 5f |ow%..*$.|. "Wimp_|
|00004790| 47 65 74 57 69 6e 64 6f | 77 53 74 61 74 65 22 2c |GetWindo|wState",|
|000047a0| 2c 62 6c 6f 63 6b 25 0d | 17 34 05 e1 0d 17 3e 05 |,block%.|.4....>.|
|000047b0| 3a 0d 17 48 21 dd 20 a4 | 5f 47 65 74 5f 57 69 6e |:..H!. .|_Get_Win|
|000047c0| 64 6f 77 5f 46 6c 61 67 | 73 28 77 69 6e 64 6f 77 |dow_Flag|s(window|
|000047d0| 25 29 0d 17 52 0e ea 20 | 70 6f 69 6e 74 65 72 25 |%)..R.. |pointer%|
|000047e0| 0d 17 5c 28 70 6f 69 6e | 74 65 72 25 3d a4 5f 47 |..\(poin|ter%=._G|
|000047f0| 65 74 5f 57 69 6e 64 6f | 77 5f 53 74 61 74 65 28 |et_Windo|w_State(|
|00004800| 77 69 6e 64 6f 77 25 29 | 0d 17 66 10 3d 70 6f 69 |window%)|..f.=poi|
|00004810| 6e 74 65 72 25 21 33 32 | 0d 17 70 05 3a 0d 17 7a |nter%!32|..p.:..z|
|00004820| 26 dd 20 f2 5f 47 72 61 | 62 5f 49 6e 70 75 74 46 |&. ._Gra|b_InputF|
|00004830| 6f 63 75 73 28 77 69 6e | 64 6f 77 25 2c 69 63 6f |ocus(win|dow%,ico|
|00004840| 6e 25 29 0d 17 84 2d c8 | 99 20 22 57 69 6d 70 45 |n%)...-.|. "WimpE|
|00004850| 78 74 5f 50 75 74 43 61 | 72 65 74 49 63 6f 6e 22 |xt_PutCa|retIcon"|
|00004860| 2c 2c 2c 77 69 6e 64 6f | 77 25 2c 69 63 6f 6e 25 |,,,windo|w%,icon%|
|00004870| 0d 17 8e 38 f4 20 50 52 | 4f 43 5f 57 69 6d 70 5f |...8. PR|OC_Wimp_|
|00004880| 53 65 74 43 61 72 65 74 | 50 6f 73 69 74 69 6f 6e |SetCaret|Position|
|00004890| 28 77 69 6e 64 6f 77 25 | 2c 69 63 6f 6e 25 2c 30 |(window%|,icon%,0|
|000048a0| 2c 30 2c 2d 31 2c 30 29 | 0d 17 98 05 e1 0d 17 a2 |,0,-1,0)|........|
|000048b0| 05 3a 0d 17 ac 47 dd 20 | f2 5f 57 69 6d 70 5f 53 |.:...G. |._Wimp_S|
|000048c0| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 28 |etCaretP|osition(|
|000048d0| 77 69 6e 64 6f 77 25 2c | 69 63 6f 6e 25 2c 78 70 |window%,|icon%,xp|
|000048e0| 6f 73 25 2c 79 70 6f 73 | 25 2c 68 65 69 67 68 74 |os%,ypos|%,height|
|000048f0| 25 2c 69 6e 64 65 78 25 | 29 0d 17 b6 30 f4 20 4e |%,index%|)...0. N|
|00004900| 6f 77 20 72 65 66 72 65 | 73 68 65 73 20 69 63 6f |ow refre|shes ico|
|00004910| 6e 20 77 68 65 72 65 20 | 63 61 72 65 74 20 73 74 |n where |caret st|
|00004920| 61 72 74 73 20 66 72 6f | 6d 0d 17 c0 1e f4 4c 4f |arts fro|m.....LO|
|00004930| 43 41 4c 20 6f 6c 64 77 | 69 6e 64 6f 77 25 2c 6f |CAL oldw|indow%,o|
|00004940| 6c 64 69 63 6f 6e 25 0d | 17 ca 31 f4 50 52 4f 43 |ldicon%.|..1.PROC|
|00004950| 5f 47 65 74 5f 43 61 72 | 65 74 5f 4c 6f 63 61 74 |_Get_Car|et_Locat|
|00004960| 69 6f 6e 28 6f 6c 64 77 | 69 6e 64 6f 77 25 2c 6f |ion(oldw|indow%,o|
|00004970| 6c 64 69 63 6f 6e 25 29 | 0d 17 d4 47 c8 99 20 22 |ldicon%)|...G.. "|
|00004980| 57 69 6d 70 5f 53 65 74 | 43 61 72 65 74 50 6f 73 |Wimp_Set|CaretPos|
|00004990| 69 74 69 6f 6e 22 2c 77 | 69 6e 64 6f 77 25 2c 69 |ition",w|indow%,i|
|000049a0| 63 6f 6e 25 2c 78 70 6f | 73 25 2c 79 70 6f 73 25 |con%,xpo|s%,ypos%|
|000049b0| 2c 68 65 69 67 68 74 25 | 2c 69 6e 64 65 78 25 0d |,height%|,index%.|
|000049c0| 17 de 57 f4 49 46 20 6f | 6c 64 77 69 6e 64 6f 77 |..W.IF o|ldwindow|
|000049d0| 25 3c 3e 54 52 55 45 20 | 41 4e 44 20 6f 6c 64 69 |%<>TRUE |AND oldi|
|000049e0| 63 6f 6e 25 3c 3e 54 52 | 55 45 20 54 48 45 4e 20 |con%<>TR|UE THEN |
|000049f0| 50 52 4f 43 5f 52 65 66 | 72 65 73 68 5f 49 63 6f |PROC_Ref|resh_Ico|
|00004a00| 6e 28 6f 6c 64 77 69 6e | 64 6f 77 25 2c 6f 6c 64 |n(oldwin|dow%,old|
|00004a10| 69 63 6f 6e 25 29 0d 17 | e8 05 e1 0d 17 f2 05 3a |icon%)..|.......:|
|00004a20| 0d 17 fc 17 dd 20 f2 5f | 4c 6f 73 65 5f 49 6e 70 |..... ._|Lose_Inp|
|00004a30| 75 74 46 6f 63 75 73 0d | 18 06 37 f2 5f 57 69 6d |utFocus.|..7._Wim|
|00004a40| 70 5f 53 65 74 43 61 72 | 65 74 50 6f 73 69 74 69 |p_SetCar|etPositi|
|00004a50| 6f 6e 28 b9 2c 6a 75 6e | 6b 2c 6a 75 6e 6b 2c 6a |on(.,jun|k,junk,j|
|00004a60| 75 6e 6b 2c 6a 75 6e 6b | 2c 6a 75 6e 6b 29 0d 18 |unk,junk|,junk)..|
|00004a70| 10 05 e1 0d 18 1a 05 3a | 0d 18 24 2d dd 20 f2 5f |.......:|..$-. ._|
|00004a80| 47 65 74 5f 43 61 72 65 | 74 5f 4c 6f 63 61 74 69 |Get_Care|t_Locati|
|00004a90| 6f 6e 28 f8 20 77 69 6e | 64 6f 77 25 2c f8 20 69 |on(. win|dow%,. i|
|00004aa0| 63 6f 6e 25 29 0d 18 2e | 26 c8 99 20 22 57 69 6d |con%)...|&.. "Wim|
|00004ab0| 70 5f 47 65 74 43 61 72 | 65 74 50 6f 73 69 74 69 |p_GetCar|etPositi|
|00004ac0| 6f 6e 22 2c 2c 73 63 72 | 61 70 25 0d 18 38 14 77 |on",,scr|ap%..8.w|
|00004ad0| 69 6e 64 6f 77 25 3d 73 | 63 72 61 70 25 21 30 0d |indow%=s|crap%!0.|
|00004ae0| 18 42 12 69 63 6f 6e 25 | 3d 73 63 72 61 70 25 21 |.B.icon%|=scrap%!|
|00004af0| 34 0d 18 4c 05 e1 0d 18 | 56 05 3a 0d 18 60 3e dd |4..L....|V.:..`>.|
|00004b00| 20 a4 5f 43 72 65 61 74 | 65 5f 49 6e 66 6f 42 6f | ._Creat|e_InfoBo|
|00004b10| 78 28 6e 61 6d 65 24 2c | 70 75 72 70 6f 73 65 24 |x(name$,|purpose$|
|00004b20| 2c 61 75 74 68 6f 72 24 | 2c 49 6e 63 6c 75 64 65 |,author$|,Include|
|00004b30| 5f 4d 61 6e 75 61 6c 25 | 29 0d 18 6a 3f ea 20 77 |_Manual%|)..j?. w|
|00004b40| 69 6e 68 61 6e 64 6c 65 | 25 2c 69 63 6f 6e 6c 65 |inhandle|%,iconle|
|00004b50| 6e 25 2c 62 6f 78 68 65 | 69 67 68 74 25 2c 66 6f |n%,boxhe|ight%,fo|
|00004b60| 6e 74 31 25 2c 66 6f 6e | 74 32 25 2c 66 6f 6e 74 |nt1%,fon|t2%,font|
|00004b70| 33 25 2c 69 63 6f 6e 25 | 0d 18 74 39 f4 20 57 61 |3%,icon%|..t9. Wa|
|00004b80| 72 6e 69 6e 67 3a 20 69 | 63 6f 6e 20 77 69 64 74 |rning: i|con widt|
|00004b90| 68 73 20 2d 20 61 73 73 | 75 6d 65 73 20 50 75 72 |hs - ass|umes Pur|
|00004ba0| 70 6f 73 65 24 20 69 73 | 20 6c 6f 6e 67 65 73 74 |pose$ is| longest|
|00004bb0| 2e 0d 18 7e 57 f4 20 30 | 36 2f 31 32 2f 39 31 20 |...~W. 0|6/12/91 |
|00004bc0| 4e 6f 77 20 61 75 74 6f | 6d 61 74 69 63 61 6c 6c |Now auto|maticall|
|00004bd0| 79 20 70 75 74 73 20 22 | 4f 6e 2d 6c 69 6e 65 20 |y puts "|On-line |
|00004be0| 4d 61 6e 75 61 6c 22 20 | 69 63 6f 6e 20 61 20 6c |Manual" |icon a l|
|00004bf0| 61 20 44 61 74 61 20 53 | 74 6f 72 65 20 69 6e 20 |a Data S|tore in |
|00004c00| 49 6e 66 6f 20 42 6f 78 | 0d 18 88 34 f4 20 49 66 |Info Box|...4. If|
|00004c10| 20 74 68 65 20 76 61 72 | 69 61 62 6c 65 20 49 6e | the var|iable In|
|00004c20| 63 6c 75 64 65 5f 4d 61 | 6e 75 61 6c 25 20 69 73 |clude_Ma|nual% is|
|00004c30| 20 73 65 74 20 74 6f 20 | 54 52 55 45 0d 18 92 37 | set to |TRUE...7|
|00004c40| 66 6f 6e 74 31 25 3d a4 | 5f 46 6f 6e 74 5f 46 69 |font1%=.|_Font_Fi|
|00004c50| 6e 64 46 6f 6e 74 28 22 | 48 6f 6d 65 72 74 6f 6e |ndFont("|Homerton|
|00004c60| 2e 4d 65 64 69 75 6d 22 | 2c 31 32 2c 31 32 2c 30 |.Medium"|,12,12,0|
|00004c70| 2c 30 29 0d 18 9c 35 66 | 6f 6e 74 32 25 3d a4 5f |,0)...5f|ont2%=._|
|00004c80| 46 6f 6e 74 5f 46 69 6e | 64 46 6f 6e 74 28 22 48 |Font_Fin|dFont("H|
|00004c90| 6f 6d 65 72 74 6f 6e 2e | 42 6f 6c 64 22 2c 31 32 |omerton.|Bold",12|
|00004ca0| 2c 31 32 2c 30 2c 30 29 | 0d 18 a6 35 66 6f 6e 74 |,12,0,0)|...5font|
|00004cb0| 33 25 3d a4 5f 46 6f 6e | 74 5f 46 69 6e 64 46 6f |3%=._Fon|t_FindFo|
|00004cc0| 6e 74 28 22 48 6f 6d 65 | 72 74 6f 6e 2e 42 6f 6c |nt("Home|rton.Bol|
|00004cd0| 64 22 2c 31 34 2c 31 34 | 2c 30 2c 30 29 0d 18 b0 |d",14,14|,0,0)...|
|00004ce0| 18 6e 61 6d 65 24 3d a4 | 5f 54 72 61 6e 73 28 6e |.name$=.|_Trans(n|
|00004cf0| 61 6d 65 24 29 0d 18 ba | 1e 70 75 72 70 6f 73 65 |ame$)...|.purpose|
|00004d00| 24 3d a4 5f 54 72 61 6e | 73 28 70 75 72 70 6f 73 |$=._Tran|s(purpos|
|00004d10| 65 24 29 0d 18 c4 1c 61 | 75 74 68 6f 72 24 3d a4 |e$)....a|uthor$=.|
|00004d20| 5f 54 72 61 6e 73 28 61 | 75 74 68 6f 72 24 29 0d |_Trans(a|uthor$).|
|00004d30| 18 ce 1a 69 63 6f 6e 6c | 65 6e 25 3d a9 28 70 75 |...iconl|en%=.(pu|
|00004d40| 72 70 6f 73 65 24 29 2b | 32 0d 18 d8 12 62 6f 78 |rpose$)+|2....box|
|00004d50| 68 65 69 67 68 74 25 3d | 32 34 34 0d 18 e2 26 e7 |height%=|244...&.|
|00004d60| 20 49 6e 63 6c 75 64 65 | 5f 4d 61 6e 75 61 6c 25 | Include|_Manual%|
|00004d70| 20 8c 20 62 6f 78 68 65 | 69 67 68 74 25 2b 3d 36 | . boxhe|ight%+=6|
|00004d80| 30 0d 18 ec 0c de 20 70 | 62 25 20 33 36 0d 18 f6 |0..... p|b% 36...|
|00004d90| 70 77 69 6e 68 61 6e 64 | 6c 65 25 3d a4 5f 43 72 |pwinhand|le%=._Cr|
|00004da0| 65 61 74 65 5f 57 69 6e | 64 6f 77 28 22 3d 69 62 |eate_Win|dow("=ib|
|00004db0| 78 54 22 2c 69 6e 66 6f | 62 6f 78 25 2c 30 2c 30 |xT",info|box%,0,0|
|00004dc0| 2c 30 2c 30 2c 34 2b 28 | 69 63 6f 6e 6c 65 6e 25 |,0,0,4+(|iconlen%|
|00004dd0| 2b 31 30 29 2a 31 36 2c | 62 6f 78 68 65 69 67 68 |+10)*16,|boxheigh|
|00004de0| 74 25 2c 30 2c 30 2c 30 | 2c 30 2c 30 2c 30 2c 77 |t%,0,0,0|,0,0,0,w|
|00004df0| 69 6d 70 5f 73 70 72 69 | 74 65 73 25 29 0d 19 00 |imp_spri|tes%)...|
|00004e00| 77 76 6f 69 64 3d a4 5f | 43 72 65 61 74 65 5f 54 |wvoid=._|Create_T|
|00004e10| 65 78 74 49 63 6f 6e 28 | 77 69 6e 68 61 6e 64 6c |extIcon(|winhandl|
|00004e20| 65 25 2c 38 2c 2d 36 2c | 39 2c 31 2c 22 3d 69 62 |e%,8,-6,|9,1,"=ib|
|00004e30| 78 4e 22 2c ac 68 63 65 | 6e 74 72 65 2c 76 63 65 |xN",.hce|ntre,vce|
|00004e40| 6e 74 72 65 2c 72 69 67 | 68 74 6a 2c 42 6c 61 63 |ntre,rig|htj,Blac|
|00004e50| 6b 2c 47 72 65 79 33 2c | ac 66 69 6c 6c 65 64 2c |k,Grey3,|.filled,|
|00004e60| ac 62 6f 72 64 65 72 2c | 30 2c 30 2c 30 2c 22 46 |.border,|0,0,0,"F|
|00004e70| 31 37 22 29 0d 19 0a 78 | 76 6f 69 64 3d a4 5f 43 |17")...x|void=._C|
|00004e80| 72 65 61 74 65 5f 54 65 | 78 74 49 63 6f 6e 28 77 |reate_Te|xtIcon(w|
|00004e90| 69 6e 68 61 6e 64 6c 65 | 25 2c 38 2c 2d 36 38 2c |inhandle|%,8,-68,|
|00004ea0| 39 2c 31 2c 22 3d 69 62 | 78 50 22 2c ac 68 63 65 |9,1,"=ib|xP",.hce|
|00004eb0| 6e 74 72 65 2c 76 63 65 | 6e 74 72 65 2c 72 69 67 |ntre,vce|ntre,rig|
|00004ec0| 68 74 6a 2c 42 6c 61 63 | 6b 2c 47 72 65 79 33 2c |htj,Blac|k,Grey3,|
|00004ed0| ac 66 69 6c 6c 65 64 2c | ac 62 6f 72 64 65 72 2c |.filled,|.border,|
|00004ee0| 30 2c 30 2c 30 2c 22 46 | 31 37 22 29 0d 19 14 79 |0,0,0,"F|17")...y|
|00004ef0| 76 6f 69 64 3d a4 5f 43 | 72 65 61 74 65 5f 54 65 |void=._C|reate_Te|
|00004f00| 78 74 49 63 6f 6e 28 77 | 69 6e 68 61 6e 64 6c 65 |xtIcon(w|inhandle|
|00004f10| 25 2c 38 2c 2d 31 32 36 | 2c 39 2c 31 2c 22 3d 69 |%,8,-126|,9,1,"=i|
|00004f20| 62 78 41 22 2c ac 68 63 | 65 6e 74 72 65 2c 76 63 |bxA",.hc|entre,vc|
|00004f30| 65 6e 74 72 65 2c 72 69 | 67 68 74 6a 2c 42 6c 61 |entre,ri|ghtj,Bla|
|00004f40| 63 6b 2c 47 72 65 79 33 | 2c ac 66 69 6c 6c 65 64 |ck,Grey3|,.filled|
|00004f50| 2c ac 62 6f 72 64 65 72 | 2c 30 2c 30 2c 30 2c 22 |,.border|,0,0,0,"|
|00004f60| 46 31 37 22 29 0d 19 1e | 79 76 6f 69 64 3d a4 5f |F17")...|yvoid=._|
|00004f70| 43 72 65 61 74 65 5f 54 | 65 78 74 49 63 6f 6e 28 |Create_T|extIcon(|
|00004f80| 77 69 6e 68 61 6e 64 6c | 65 25 2c 38 2c 2d 31 38 |winhandl|e%,8,-18|
|00004f90| 36 2c 39 2c 31 2c 22 3d | 69 62 78 56 22 2c ac 68 |6,9,1,"=|ibxV",.h|
|00004fa0| 63 65 6e 74 72 65 2c 76 | 63 65 6e 74 72 65 2c 72 |centre,v|centre,r|
|00004fb0| 69 67 68 74 6a 2c 42 6c | 61 63 6b 2c 47 72 65 79 |ightj,Bl|ack,Grey|
|00004fc0| 33 2c ac 66 69 6c 6c 65 | 64 2c ac 62 6f 72 64 65 |3,.fille|d,.borde|
|00004fd0| 72 2c 30 2c 30 2c 30 2c | 22 46 31 37 22 29 0d 19 |r,0,0,0,|"F17")..|
|00004fe0| 28 80 76 6f 69 64 3d a4 | 5f 43 72 65 61 74 65 5f |(.void=.|_Create_|
|00004ff0| 54 65 78 74 49 63 6f 6e | 28 77 69 6e 68 61 6e 64 |TextIcon|(winhand|
|00005000| 6c 65 25 2c 31 35 34 2c | 2d 36 2c 69 63 6f 6e 6c |le%,154,|-6,iconl|
|00005010| 65 6e 25 2c 31 2c 6e 61 | 6d 65 24 2c 68 63 65 6e |en%,1,na|me$,hcen|
|00005020| 74 72 65 2c 76 63 65 6e | 74 72 65 2c ac 72 69 67 |tre,vcen|tre,.rig|
|00005030| 68 74 6a 2c 42 6c 61 63 | 6b 2c 47 72 65 79 31 2c |htj,Blac|k,Grey1,|
|00005040| 66 69 6c 6c 65 64 2c ac | 62 6f 72 64 65 72 2c 30 |filled,.|border,0|
|00005050| 2c 30 2c 30 2c 22 77 34 | 3b 46 31 37 22 29 0d 19 |,0,0,"w4|;F17")..|
|00005060| 32 84 76 6f 69 64 3d a4 | 5f 43 72 65 61 74 65 5f |2.void=.|_Create_|
|00005070| 54 65 78 74 49 63 6f 6e | 28 77 69 6e 68 61 6e 64 |TextIcon|(winhand|
|00005080| 6c 65 25 2c 31 35 34 2c | 2d 36 38 2c 69 63 6f 6e |le%,154,|-68,icon|
|00005090| 6c 65 6e 25 2c 31 2c 70 | 75 72 70 6f 73 65 24 2c |len%,1,p|urpose$,|
|000050a0| 68 63 65 6e 74 72 65 2c | 76 63 65 6e 74 72 65 2c |hcentre,|vcentre,|
|000050b0| ac 72 69 67 68 74 6a 2c | 42 6c 61 63 6b 2c 47 72 |.rightj,|Black,Gr|
|000050c0| 65 79 31 2c 66 69 6c 6c | 65 64 2c ac 62 6f 72 64 |ey1,fill|ed,.bord|
|000050d0| 65 72 2c 30 2c 30 2c 30 | 2c 22 77 34 3b 46 31 37 |er,0,0,0|,"w4;F17|
|000050e0| 22 29 0d 19 3c 84 76 6f | 69 64 3d a4 5f 43 72 65 |")..<.vo|id=._Cre|
|000050f0| 61 74 65 5f 54 65 78 74 | 49 63 6f 6e 28 77 69 6e |ate_Text|Icon(win|
|00005100| 68 61 6e 64 6c 65 25 2c | 31 35 34 2c 2d 31 32 36 |handle%,|154,-126|
|00005110| 2c 69 63 6f 6e 6c 65 6e | 25 2c 31 2c 61 75 74 68 |,iconlen|%,1,auth|
|00005120| 6f 72 24 2c 68 63 65 6e | 74 72 65 2c 76 63 65 6e |or$,hcen|tre,vcen|
|00005130| 74 72 65 2c ac 72 69 67 | 68 74 6a 2c 42 6c 61 63 |tre,.rig|htj,Blac|
|00005140| 6b 2c 47 72 65 79 31 2c | 66 69 6c 6c 65 64 2c ac |k,Grey1,|filled,.|
|00005150| 62 6f 72 64 65 72 2c 30 | 2c 30 2c 30 2c 22 77 34 |border,0|,0,0,"w4|
|00005160| 3b 46 31 37 22 29 0d 19 | 46 85 76 6f 69 64 3d a4 |;F17")..|F.void=.|
|00005170| 5f 43 72 65 61 74 65 5f | 54 65 78 74 49 63 6f 6e |_Create_|TextIcon|
|00005180| 28 77 69 6e 68 61 6e 64 | 6c 65 25 2c 31 35 34 2c |(winhand|le%,154,|
|00005190| 2d 31 38 36 2c 69 63 6f | 6e 6c 65 6e 25 2c 31 2c |-186,ico|nlen%,1,|
|000051a0| 22 3d 54 56 65 72 73 22 | 2c 68 63 65 6e 74 72 65 |"=TVers"|,hcentre|
|000051b0| 2c 76 63 65 6e 74 72 65 | 2c ac 72 69 67 68 74 6a |,vcentre|,.rightj|
|000051c0| 2c 42 6c 61 63 6b 2c 47 | 72 65 79 31 2c 66 69 6c |,Black,G|rey1,fil|
|000051d0| 6c 65 64 2c ac 62 6f 72 | 64 65 72 2c 30 2c 30 2c |led,.bor|der,0,0,|
|000051e0| 30 2c 22 77 34 3b 46 31 | 37 22 29 0d 19 50 11 e3 |0,"w4;F1|7")..P..|
|000051f0| 20 69 63 6f 6e 25 3d 30 | 20 b8 20 33 0d 19 5a 39 | icon%=0| . 3..Z9|
|00005200| 20 20 f2 5f 53 65 74 5f | 49 63 6f 6e 5f 46 6f 6e |  ._Set_|Icon_Fon|
|00005210| 74 4f 72 43 6f 6c 6f 75 | 72 28 77 69 6e 68 61 6e |tOrColou|r(winhan|
|00005220| 64 6c 65 25 2c 69 63 6f | 6e 25 2c 32 30 2c 66 6f |dle%,ico|n%,20,fo|
|00005230| 6e 74 32 25 29 0d 19 64 | 05 ed 0d 19 6e 33 f2 5f |nt2%)..d|....n3._|
|00005240| 53 65 74 5f 49 63 6f 6e | 5f 46 6f 6e 74 4f 72 43 |Set_Icon|_FontOrC|
|00005250| 6f 6c 6f 75 72 28 77 69 | 6e 68 61 6e 64 6c 65 25 |olour(wi|nhandle%|
|00005260| 2c 34 2c 32 30 2c 66 6f | 6e 74 33 25 29 0d 19 78 |,4,20,fo|nt3%)..x|
|00005270| 11 e3 20 69 63 6f 6e 25 | 3d 35 20 b8 20 37 0d 19 |.. icon%|=5 . 7..|
|00005280| 82 39 20 20 f2 5f 53 65 | 74 5f 49 63 6f 6e 5f 46 |.9  ._Se|t_Icon_F|
|00005290| 6f 6e 74 4f 72 43 6f 6c | 6f 75 72 28 77 69 6e 68 |ontOrCol|our(winh|
|000052a0| 61 6e 64 6c 65 25 2c 69 | 63 6f 6e 25 2c 32 30 2c |andle%,i|con%,20,|
|000052b0| 66 6f 6e 74 31 25 29 0d | 19 8c 05 ed 0d 19 96 17 |font1%).|........|
|000052c0| e7 20 49 6e 63 6c 75 64 | 65 5f 4d 61 6e 75 61 6c |. Includ|e_Manual|
|000052d0| 25 20 8c 0d 19 a0 93 20 | 20 4d 61 6e 75 61 6c 5f |% ..... | Manual_|
|000052e0| 49 63 6f 6e 25 3d a4 5f | 43 72 65 61 74 65 5f 54 |Icon%=._|Create_T|
|000052f0| 65 78 74 49 63 6f 6e 28 | 77 69 6e 68 61 6e 64 6c |extIcon(|winhandl|
|00005300| 65 25 2c 38 2c 2d 32 34 | 38 2c 39 2e 37 35 2b 69 |e%,8,-24|8,9.75+i|
|00005310| 63 6f 6e 6c 65 6e 25 2c | 31 2e 36 2c 22 3d 69 62 |conlen%,|1.6,"=ib|
|00005320| 78 4d 22 2c 68 63 65 6e | 74 72 65 2c 76 63 65 6e |xM",hcen|tre,vcen|
|00005330| 74 72 65 2c ac 72 69 67 | 68 74 6a 2c 42 6c 61 63 |tre,.rig|htj,Blac|
|00005340| 6b 2c 47 72 65 79 31 2c | 66 69 6c 6c 65 64 2c ac |k,Grey1,|filled,.|
|00005350| 62 6f 72 64 65 72 2c 33 | 2c 31 2c b9 2c 22 77 30 |border,3|,1,.,"w0|
|00005360| 3b 46 31 37 22 29 0d 19 | aa 40 20 20 f2 5f 53 65 |;F17")..|.@  ._Se|
|00005370| 74 5f 49 63 6f 6e 5f 46 | 6f 6e 74 4f 72 43 6f 6c |t_Icon_F|ontOrCol|
|00005380| 6f 75 72 28 77 69 6e 68 | 61 6e 64 6c 65 25 2c 4d |our(winh|andle%,M|
|00005390| 61 6e 75 61 6c 5f 49 63 | 6f 6e 25 2c 32 30 2c 66 |anual_Ic|on%,20,f|
|000053a0| 6f 6e 74 32 25 29 0d 19 | b4 05 cc 0d 19 be 14 20 |ont2%)..|....... |
|000053b0| 20 4d 61 6e 75 61 6c 5f | 49 63 6f 6e 25 3d b9 0d | Manual_|Icon%=..|
|000053c0| 19 c8 05 cd 0d 19 d2 0f | 3d 77 69 6e 68 61 6e 64 |........|=winhand|
|000053d0| 6c 65 25 0d 19 dc 05 3a | 0d 19 e6 40 f4 20 53 69 |le%....:|...@. Si|
|000053e0| 6e 67 6c 65 20 77 69 6d | 70 2d 70 6f 6c 6c 2c 20 |ngle wim|p-poll, |
|000053f0| 74 6f 20 66 6f 72 63 65 | 20 6d 75 6c 74 69 74 61 |to force| multita|
|00005400| 73 6b 69 6e 67 20 69 6e | 20 73 70 65 63 69 66 69 |sking in| specifi|
|00005410| 63 20 70 6c 61 63 65 73 | 0d 19 f0 3c f4 20 61 6e |c places|...<. an|
|00005420| 64 20 72 65 74 75 72 6e | 20 6f 6e 20 6e 65 78 74 |d return| on next|
|00005430| 20 4e 75 6c 6c 5f 52 65 | 61 73 6f 6e 5f 43 6f 64 | Null_Re|ason_Cod|
|00005440| 65 2c 20 61 6e 64 20 6e | 6f 74 68 69 6e 67 20 65 |e, and n|othing e|
|00005450| 6c 73 65 2e 0d 19 fa 3c | f4 20 41 6c 73 6f 20 73 |lse....<|. Also s|
|00005460| 65 72 76 65 73 20 74 6f | 20 66 6f 72 63 65 20 73 |erves to| force s|
|00005470| 63 72 65 65 6e 20 75 70 | 64 61 74 65 20 61 66 74 |creen up|date aft|
|00005480| 65 72 20 63 68 61 6e 67 | 65 73 20 6d 61 64 65 2e |er chang|es made.|
|00005490| 0d 1a 04 53 f4 20 65 67 | 3a 20 74 6f 20 6d 61 6b |...S. eg|: to mak|
|000054a0| 65 20 69 74 20 73 65 65 | 6d 20 61 73 20 69 66 20 |e it see|m as if |
|000054b0| 73 6f 6d 65 74 68 69 6e | 67 20 77 6f 72 6b 73 20 |somethin|g works |
|000054c0| 66 61 73 74 65 72 20 74 | 68 61 6e 20 69 74 20 64 |faster t|han it d|
|000054d0| 6f 65 73 2e 20 44 6f 20 | 74 68 65 20 76 69 73 69 |oes. Do |the visi|
|000054e0| 62 6c 65 0d 1a 0e 3c f4 | 20 61 63 74 69 6f 6e 73 |ble...<.| actions|
|000054f0| 20 66 69 72 73 74 2c 20 | 63 61 6c 6c 20 74 68 69 | first, |call thi|
|00005500| 73 2c 20 74 68 65 6e 20 | 63 61 72 72 79 20 6f 6e |s, then |carry on|
|00005510| 20 77 69 74 68 20 74 68 | 65 20 72 65 73 74 2e 0d | with th|e rest..|
|00005520| 1a 18 19 dd 20 f2 5f 53 | 69 6e 67 6c 65 50 6f 6c |.... ._S|inglePol|
|00005530| 6c 28 6d 61 73 6b 25 29 | 0d 1a 22 1d 76 6f 69 64 |l(mask%)|..".void|
|00005540| 3d a4 5f 57 69 6d 70 5f | 50 6f 6c 6c 28 6d 61 73 |=._Wimp_|Poll(mas|
|00005550| 6b 25 2c 30 29 0d 1a 2c | 05 e1 0d 1a 36 05 3a 0d |k%,0)..,|....6.:.|
|00005560| 1a 40 2d f4 20 57 69 6d | 70 5f 50 6f 6c 6c 20 66 |.@-. Wim|p_Poll f|
|00005570| 75 6e 63 74 69 6f 6e 2c | 20 72 65 74 75 72 6e 73 |unction,| returns|
|00005580| 20 72 65 61 73 6f 6e 20 | 63 6f 64 65 0d 1a 4a 38 | reason |code..J8|
|00005590| f4 20 63 6f 6e 74 72 6f | 6c 20 6d 61 73 6b 20 69 |. contro|l mask i|
|000055a0| 73 20 66 6f 72 20 52 30 | 2e 20 43 61 6c 6c 20 77 |s for R0|. Call w|
|000055b0| 69 74 68 20 64 65 66 61 | 75 6c 74 20 6f 66 20 7a |ith defa|ult of z|
|000055c0| 65 72 6f 2e 0d 1a 54 48 | f4 20 47 6c 6f 62 61 6c |ero...TH|. Global|
|000055d0| 20 76 61 72 69 61 62 6c | 65 20 27 70 6f 6c 6c 5f | variabl|e 'poll_|
|000055e0| 64 65 6c 61 79 25 27 20 | 63 61 6e 20 62 65 20 75 |delay%' |can be u|
|000055f0| 73 65 64 20 74 6f 20 73 | 65 6c 65 63 74 20 57 69 |sed to s|elect Wi|
|00005600| 6d 70 5f 50 6f 6c 6c 49 | 64 6c 65 2e 0d 1a 5e 4b |mp_PollI|dle...^K|
|00005610| f4 20 49 66 20 74 68 69 | 73 20 69 73 20 46 41 4c |. If thi|s is FAL|
|00005620| 53 45 2c 20 6e 6f 72 6d | 61 6c 20 57 69 6d 70 5f |SE, norm|al Wimp_|
|00005630| 50 6f 6c 6c 20 69 73 20 | 63 61 6c 6c 65 64 2c 20 |Poll is |called, |
|00005640| 6f 74 68 65 72 77 69 73 | 65 20 57 69 6d 70 5f 50 |otherwis|e Wimp_P|
|00005650| 6f 6c 6c 49 64 6c 65 0d | 1a 68 50 f4 20 49 6e 20 |ollIdle.|.hP. In |
|00005660| 66 61 63 74 2c 20 69 74 | 20 61 6c 77 61 79 73 20 |fact, it| always |
|00005670| 63 61 6c 6c 73 20 57 69 | 6d 70 5f 50 6f 6c 6c 49 |calls Wi|mp_PollI|
|00005680| 64 6c 65 2c 20 61 6e 64 | 20 69 66 20 70 6f 6c 6c |dle, and| if poll|
|00005690| 5f 64 65 6c 61 79 25 20 | 69 73 20 46 41 4c 53 45 |_delay% |is FALSE|
|000056a0| 2c 20 69 74 20 69 73 0d | 1a 72 50 f4 20 6f 66 20 |, it is.|.rP. of |
|000056b0| 63 6f 75 72 73 65 20 7a | 65 72 6f 2c 20 73 6f 20 |course z|ero, so |
|000056c0| 69 74 20 77 69 6c 6c 20 | 62 65 68 61 76 65 20 6a |it will |behave j|
|000056d0| 75 73 74 20 6c 69 6b 65 | 20 57 69 6d 70 5f 50 6f |ust like| Wimp_Po|
|000056e0| 6c 6c 2e 20 54 68 65 20 | 61 70 70 6c 69 63 61 74 |ll. The |applicat|
|000056f0| 69 6f 6e 20 63 61 6e 0d | 1a 7c 27 f4 20 73 74 69 |ion can.|.|'. sti|
|00005700| 6c 6c 20 6d 61 73 6b 20 | 6f 75 74 20 6e 75 6c 6c |ll mask |out null|
|00005710| 20 72 65 61 73 6f 6e 20 | 63 6f 64 65 73 2e 0d 1a | reason |codes...|
|00005720| 86 1f dd 20 a4 5f 57 69 | 6d 70 5f 50 6f 6c 6c 28 |... ._Wi|mp_Poll(|
|00005730| 6d 61 73 6b 25 2c 64 65 | 6c 61 79 25 29 0d 1a 90 |mask%,de|lay%)...|
|00005740| 1b ea 20 72 65 61 73 6f | 6e 25 2c 74 65 6d 70 25 |.. reaso|n%,temp%|
|00005750| 2c 72 65 76 65 72 74 25 | 0d 1a 9a 18 c8 99 20 22 |,revert%|...... "|
|00005760| 57 69 6d 70 45 78 74 5f | 50 72 65 50 6f 6c 6c 22 |WimpExt_|PrePoll"|
|00005770| 0d 1a a4 4c c8 99 20 22 | 57 69 6d 70 5f 50 6f 6c |...L.. "|Wimp_Pol|
|00005780| 6c 49 64 6c 65 22 2c 6d | 61 73 6b 25 2c 77 62 6c |lIdle",m|ask%,wbl|
|00005790| 6f 63 6b 25 2c a4 5f 4f | 53 5f 52 65 61 64 4d 6f |ock%,._O|S_ReadMo|
|000057a0| 6e 6f 74 6f 6e 69 63 54 | 69 6d 65 2b 64 65 6c 61 |notonicT|ime+dela|
|000057b0| 79 25 20 b8 20 72 65 61 | 73 6f 6e 25 0d 1a ae 65 |y% . rea|son%...e|
|000057c0| e7 20 ac 28 72 65 61 73 | 6f 6e 25 3d 4d 6f 75 73 |. .(reas|on%=Mous|
|000057d0| 65 5f 43 6c 69 63 6b 20 | 80 20 77 62 6c 6f 63 6b |e_Click |. wblock|
|000057e0| 25 21 38 3d 62 5f 6e 75 | 6c 6c 29 20 8c 20 c8 99 |%!8=b_nu|ll) . ..|
|000057f0| 20 22 57 69 6d 70 45 78 | 74 5f 41 63 74 69 6f 6e | "WimpEx|t_Action|
|00005800| 22 2c 74 61 73 6b 25 2c | 77 62 6c 6f 63 6b 25 2c |",task%,|wblock%,|
|00005810| 72 65 61 73 6f 6e 25 20 | b8 20 72 65 61 73 6f 6e |reason% |. reason|
|00005820| 25 0d 1a b8 36 f4 20 43 | 6f 6e 64 69 74 69 6f 6e |%...6. C|ondition|
|00005830| 20 73 74 6f 70 73 20 66 | 6c 69 63 6b 65 72 20 6f | stops f|licker o|
|00005840| 6e 20 41 4c 57 41 59 53 | 20 73 6c 61 62 62 65 64 |n ALWAYS| slabbed|
|00005850| 20 69 63 6f 6e 73 2e 0d | 1a c2 0c 3d 72 65 61 73 | icons..|...=reas|
|00005860| 6f 6e 25 0d 1a cc 05 3a | 0d 1a d6 17 dd 20 f2 5f |on%....:|..... ._|
|00005870| 52 75 6e 5f 50 6f 6c 6c | 69 6e 67 4c 6f 6f 70 0d |Run_Poll|ingLoop.|
|00005880| 1a e0 38 ea 20 77 69 6e | 64 6f 77 25 2c 69 63 6f |..8. win|dow%,ico|
|00005890| 6e 25 2c 62 75 74 74 6f | 6e 25 2c 6d 69 6e 78 25 |n%,butto|n%,minx%|
|000058a0| 2c 6d 61 78 78 25 2c 6d | 69 6e 79 25 2c 6d 61 78 |,maxx%,m|iny%,max|
|000058b0| 79 25 2c 70 74 72 25 0d | 1a ea 07 ea 20 85 0d 1a |y%,ptr%.|.... ...|
|000058c0| f4 37 f4 20 44 6f 65 73 | 20 4e 4f 54 20 61 63 63 |.7. Does| NOT acc|
|000058d0| 65 70 74 20 70 6f 69 6e | 74 65 72 20 74 6f 20 62 |ept poin|ter to b|
|000058e0| 6c 6f 63 6b 2c 20 61 73 | 73 75 6d 65 73 20 77 62 |lock, as|sumes wb|
|000058f0| 6c 6f 63 6b 25 0d 1a fe | 25 f4 20 65 78 69 74 73 |lock%...|%. exits|
|00005900| 20 77 68 65 6e 20 61 70 | 70 6c 69 63 61 74 69 6f | when ap|plicatio|
|00005910| 6e 20 69 73 20 71 75 69 | 74 2e 0d 1b 08 42 f4 20 |n is qui|t....B. |
|00005920| 43 61 6c 6c 73 20 70 72 | 6f 67 72 61 6d 6d 65 72 |Calls pr|ogrammer|
|00005930| 2d 77 72 69 74 74 65 6e | 20 70 72 6f 63 65 64 75 |-written| procedu|
|00005940| 72 65 73 20 74 6f 20 62 | 65 20 73 75 70 70 6c 69 |res to b|e suppli|
|00005950| 65 64 20 69 6e 20 73 68 | 65 6c 6c 2e 0d 1b 12 13 |ed in sh|ell.....|
|00005960| 49 6e 69 74 69 61 6c 69 | 73 69 6e 67 25 3d a3 0d |Initiali|sing%=..|
|00005970| 1b 1c 0d c8 95 20 ac 71 | 75 69 74 25 0d 1b 26 18 |..... .q|uit%..&.|
|00005980| 20 20 ee 20 85 20 ea 20 | f2 5f 45 72 72 6f 72 5f |  . . . |._Error_|
|00005990| 57 69 6d 70 0d 1b 30 18 | 20 20 6f 6c 64 72 65 61 |Wimp..0.|  oldrea|
|000059a0| 73 6f 6e 25 3d 72 65 61 | 73 6f 6e 25 0d 1b 3a 38 |son%=rea|son%..:8|
|000059b0| 20 20 72 65 61 73 6f 6e | 25 3d a4 5f 57 69 6d 70 |  reason|%=._Wimp|
|000059c0| 5f 50 6f 6c 6c 28 70 6f | 6c 6c 5f 63 6f 6e 74 72 |_Poll(po|ll_contr|
|000059d0| 6f 6c 6d 61 73 6b 25 2c | 70 6f 6c 6c 5f 64 65 6c |olmask%,|poll_del|
|000059e0| 61 79 25 29 0d 1b 44 12 | 20 20 c8 8e 20 72 65 61 |ay%)..D.|  .. rea|
|000059f0| 73 6f 6e 25 20 ca 0d 1b | 4e 1a 20 20 20 20 c9 20 |son% ...|N.    . |
|00005a00| 4e 75 6c 6c 5f 52 65 61 | 73 6f 6e 5f 43 6f 64 65 |Null_Rea|son_Code|
|00005a10| 0d 1b 58 1b 20 20 20 20 | 20 20 f2 4e 75 6c 6c 5f |..X.    |  .Null_|
|00005a20| 52 65 61 73 6f 6e 5f 43 | 6f 64 65 0d 1b 62 1f 20 |Reason_C|ode..b. |
|00005a30| 20 20 20 c9 20 52 65 64 | 72 61 77 5f 57 69 6e 64 |   . Red|raw_Wind|
|00005a40| 6f 77 5f 52 65 71 75 65 | 73 74 0d 1b 6c 2b 20 20 |ow_Reque|st..l+  |
|00005a50| 20 20 20 20 f2 52 65 64 | 72 61 77 5f 57 69 6e 64 |    .Red|raw_Wind|
|00005a60| 6f 77 5f 52 65 71 75 65 | 73 74 28 77 62 6c 6f 63 |ow_Reque|st(wbloc|
|00005a70| 6b 25 21 30 29 0d 1b 76 | 1d 20 20 20 20 c9 20 4f |k%!0)..v|.    . O|
|00005a80| 70 65 6e 5f 57 69 6e 64 | 6f 77 5f 52 65 71 75 65 |pen_Wind|ow_Reque|
|00005a90| 73 74 0d 1b 80 29 20 20 | 20 20 20 20 f2 4f 70 65 |st...)  |    .Ope|
|00005aa0| 6e 5f 57 69 6e 64 6f 77 | 5f 52 65 71 75 65 73 74 |n_Window|_Request|
|00005ab0| 28 77 62 6c 6f 63 6b 25 | 21 30 29 0d 1b 8a 1e 20 |(wblock%|!0).... |
|00005ac0| 20 20 20 c9 20 43 6c 6f | 73 65 5f 57 69 6e 64 6f |   . Clo|se_Windo|
|00005ad0| 77 5f 52 65 71 75 65 73 | 74 0d 1b 94 2a 20 20 20 |w_Reques|t...*   |
|00005ae0| 20 20 20 f2 43 6c 6f 73 | 65 5f 57 69 6e 64 6f 77 |   .Clos|e_Window|
|00005af0| 5f 52 65 71 75 65 73 74 | 28 77 62 6c 6f 63 6b 25 |_Request|(wblock%|
|00005b00| 21 30 29 0d 1b 9e 20 20 | 20 20 20 c9 20 50 6f 69 |!0)...  |   . Poi|
|00005b10| 6e 74 65 72 5f 4c 65 61 | 76 69 6e 67 5f 57 69 6e |nter_Lea|ving_Win|
|00005b20| 64 6f 77 0d 1b a8 2c 20 | 20 20 20 20 20 f2 50 6f |dow..., |     .Po|
|00005b30| 69 6e 74 65 72 5f 4c 65 | 61 76 69 6e 67 5f 57 69 |inter_Le|aving_Wi|
|00005b40| 6e 64 6f 77 28 77 62 6c | 6f 63 6b 25 21 30 29 0d |ndow(wbl|ock%!0).|
|00005b50| 1b b2 21 20 20 20 20 c9 | 20 50 6f 69 6e 74 65 72 |..!    .| Pointer|
|00005b60| 5f 45 6e 74 65 72 69 6e | 67 5f 57 69 6e 64 6f 77 |_Enterin|g_Window|
|00005b70| 0d 1b bc 2d 20 20 20 20 | 20 20 f2 50 6f 69 6e 74 |...-    |  .Point|
|00005b80| 65 72 5f 45 6e 74 65 72 | 69 6e 67 5f 57 69 6e 64 |er_Enter|ing_Wind|
|00005b90| 6f 77 28 77 62 6c 6f 63 | 6b 25 21 30 29 0d 1b c6 |ow(wbloc|k%!0)...|
|00005ba0| 15 20 20 20 20 c9 20 4d | 6f 75 73 65 5f 43 6c 69 |.    . M|ouse_Cli|
|00005bb0| 63 6b 0d 1b d0 19 20 20 | 20 20 20 20 6d 69 6e 78 |ck....  |    minx|
|00005bc0| 25 3d 77 62 6c 6f 63 6b | 25 21 30 0d 1b da 19 20 |%=wblock|%!0.... |
|00005bd0| 20 20 20 20 20 6d 69 6e | 79 25 3d 77 62 6c 6f 63 |     min|y%=wbloc|
|00005be0| 6b 25 21 34 0d 1b e4 1b | 20 20 20 20 20 20 62 75 |k%!4....|      bu|
|00005bf0| 74 74 6f 6e 25 3d 77 62 | 6c 6f 63 6b 25 21 38 0d |tton%=wb|lock%!8.|
|00005c00| 1b ee 1c 20 20 20 20 20 | 20 77 69 6e 64 6f 77 25 |...     | window%|
|00005c10| 3d 77 62 6c 6f 63 6b 25 | 21 31 32 0d 1b f8 1a 20 |=wblock%|!12.... |
|00005c20| 20 20 20 20 20 69 63 6f | 6e 25 3d 77 62 6c 6f 63 |     ico|n%=wbloc|
|00005c30| 6b 25 21 31 36 0d 1c 02 | 39 20 20 20 20 20 20 f2 |k%!16...|9      .|
|00005c40| 4d 6f 75 73 65 5f 43 6c | 69 63 6b 28 6d 69 6e 78 |Mouse_Cl|ick(minx|
|00005c50| 25 2c 6d 69 6e 79 25 2c | 62 75 74 74 6f 6e 25 2c |%,miny%,|button%,|
|00005c60| 77 69 6e 64 6f 77 25 2c | 69 63 6f 6e 25 29 0d 1c |window%,|icon%)..|
|00005c70| 0c 17 20 20 20 20 c9 20 | 55 73 65 72 5f 44 72 61 |..    . |User_Dra|
|00005c80| 67 5f 42 6f 78 0d 1c 16 | 1f 20 20 20 20 20 20 c8 |g_Box...|.      .|
|00005c90| 99 20 22 44 72 61 67 41 | 53 70 72 69 74 65 5f 53 |. "DragA|Sprite_S|
|00005ca0| 74 6f 70 22 0d 1c 20 4a | 20 20 20 20 20 20 6d 69 |top".. J|      mi|
|00005cb0| 6e 78 25 3d 77 62 6c 6f | 63 6b 25 21 30 3a 6d 69 |nx%=wblo|ck%!0:mi|
|00005cc0| 6e 79 25 3d 77 62 6c 6f | 63 6b 25 21 34 3a 6d 61 |ny%=wblo|ck%!4:ma|
|00005cd0| 78 78 25 3d 77 62 6c 6f | 63 6b 25 21 38 3a 6d 61 |xx%=wblo|ck%!8:ma|
|00005ce0| 78 79 25 3d 77 62 6c 6f | 63 6b 25 21 31 32 0d 1c |xy%=wblo|ck%!12..|
|00005cf0| 2a 1b 20 20 20 20 20 20 | 77 69 6e 64 6f 77 25 3d |*.      |window%=|
|00005d00| 30 3a 69 63 6f 6e 25 3d | 30 0d 1c 34 35 20 20 20 |0:icon%=|0..45   |
|00005d10| 20 20 20 62 75 74 74 6f | 6e 25 3d a4 5f 47 65 74 |   butto|n%=._Get|
|00005d20| 5f 4d 6f 75 73 65 5f 4c | 6f 63 61 74 69 6f 6e 28 |_Mouse_L|ocation(|
|00005d30| 77 69 6e 64 6f 77 25 2c | 69 63 6f 6e 25 29 0d 1c |window%,|icon%)..|
|00005d40| 3e 6c 20 20 20 20 20 20 | f2 55 73 65 72 5f 44 72 |>l      |.User_Dr|
|00005d50| 61 67 5f 42 6f 78 28 77 | 69 6e 64 6f 77 25 2c 69 |ag_Box(w|indow%,i|
|00005d60| 63 6f 6e 25 2c 64 72 61 | 67 67 69 6e 67 5f 69 63 |con%,dra|gging_ic|
|00005d70| 6f 6e 5f 77 69 6e 64 6f | 77 25 2c 64 72 61 67 67 |on_windo|w%,dragg|
|00005d80| 69 6e 67 5f 69 63 6f 6e | 25 2c 62 75 74 74 6f 6e |ing_icon|%,button|
|00005d90| 25 2c 6d 69 6e 78 25 2c | 6d 69 6e 79 25 2c 6d 61 |%,minx%,|miny%,ma|
|00005da0| 78 78 25 2c 6d 61 78 79 | 25 29 0d 1c 48 21 20 20 |xx%,maxy|%)..H!  |
|00005db0| 20 20 20 20 64 72 61 67 | 67 69 6e 67 5f 69 63 6f |    drag|ging_ico|
|00005dc0| 6e 5f 77 69 6e 64 6f 77 | 25 3d b9 0d 1c 52 1a 20 |n_window|%=...R. |
|00005dd0| 20 20 20 20 20 64 72 61 | 67 67 69 6e 67 5f 69 63 |     dra|gging_ic|
|00005de0| 6f 6e 25 3d b9 0d 1c 5c | 15 20 20 20 20 c9 20 4b |on%=...\|.    . K|
|00005df0| 65 79 5f 50 72 65 73 73 | 65 64 0d 1c 66 36 20 20 |ey_Press|ed..f6  |
|00005e00| 20 20 20 20 f2 4b 65 79 | 5f 50 72 65 73 73 65 64 |    .Key|_Pressed|
|00005e10| 28 77 62 6c 6f 63 6b 25 | 21 30 2c 77 62 6c 6f 63 |(wblock%|!0,wbloc|
|00005e20| 6b 25 21 34 2c 77 62 6c | 6f 63 6b 25 21 32 34 29 |k%!4,wbl|ock%!24)|
|00005e30| 0d 1c 70 18 20 20 20 20 | c9 20 4d 65 6e 75 5f 53 |..p.    |. Menu_S|
|00005e40| 65 6c 65 63 74 69 6f 6e | 0d 1c 7a 24 20 20 20 20 |election|..z$    |
|00005e50| 20 20 70 74 72 25 3d a4 | 5f 57 69 6d 70 5f 47 65 |  ptr%=.|_Wimp_Ge|
|00005e60| 74 50 6f 69 6e 74 65 72 | 49 6e 66 6f 0d 1c 84 16 |tPointer|Info....|
|00005e70| 20 20 20 20 20 20 6d 69 | 6e 78 25 3d 70 74 72 25 |      mi|nx%=ptr%|
|00005e80| 21 30 0d 1c 8e 16 20 20 | 20 20 20 20 6d 69 6e 79 |!0....  |    miny|
|00005e90| 25 3d 70 74 72 25 21 34 | 0d 1c 98 2a 20 20 20 20 |%=ptr%!4|...*    |
|00005ea0| 20 20 62 75 74 74 6f 6e | 25 3d a4 5f 47 65 74 5f |  button|%=._Get_|
|00005eb0| 42 75 74 74 6f 6e 43 6f | 64 65 28 70 74 72 25 21 |ButtonCo|de(ptr%!|
|00005ec0| 38 29 0d 1c a2 1a 20 20 | 20 20 20 20 e7 20 77 62 |8)....  |    . wb|
|00005ed0| 6c 6f 63 6b 25 21 30 3c | 3e b9 20 8c 0d 1c ac 49 |lock%!0<|>. ....I|
|00005ee0| 20 20 20 20 20 20 20 20 | f2 4d 65 6e 75 5f 53 65 |        |.Menu_Se|
|00005ef0| 6c 65 63 74 69 6f 6e 28 | 6d 65 6e 75 77 69 6e 64 |lection(|menuwind|
|00005f00| 6f 77 25 2c 6d 65 6e 75 | 69 63 6f 6e 25 2c 63 75 |ow%,menu|icon%,cu|
|00005f10| 72 72 65 6e 74 6d 65 6e | 75 25 2c 77 62 6c 6f 63 |rrentmen|u%,wbloc|
|00005f20| 6b 25 21 30 29 0d 1c b6 | 49 20 20 20 20 20 20 20 |k%!0)...|I       |
|00005f30| 20 f4 20 77 62 6c 6f 63 | 6b 25 20 68 6f 6c 64 73 | . wbloc|k% holds|
|00005f40| 20 6d 65 6e 75 20 73 65 | 6c 65 63 74 69 6f 6e 73 | menu se|lections|
|00005f50| 20 66 6f 72 20 75 73 65 | 20 69 6e 20 46 4e 5f 57 | for use| in FN_W|
|00005f60| 69 6d 70 5f 44 65 63 6f | 64 65 4d 65 6e 75 0d 1c |imp_Deco|deMenu..|
|00005f70| c0 5c 20 20 20 20 20 20 | 20 20 e7 20 62 75 74 74 |.\      |  . butt|
|00005f80| 6f 6e 25 3d 62 5f 61 64 | 6a 75 73 74 20 8c 20 f2 |on%=b_ad|just . .|
|00005f90| 5f 4f 70 65 6e 5f 4d 65 | 6e 75 28 63 75 72 72 65 |_Open_Me|nu(curre|
|00005fa0| 6e 74 6d 65 6e 75 25 2c | 6d 69 6e 78 25 2c 6d 69 |ntmenu%,|minx%,mi|
|00005fb0| 6e 79 25 2c 6d 65 6e 75 | 77 69 6e 64 6f 77 25 2c |ny%,menu|window%,|
|00005fc0| 6d 65 6e 75 69 63 6f 6e | 25 29 0d 1c ca 0b 20 20 |menuicon|%)....  |
|00005fd0| 20 20 20 20 cd 0d 1c d4 | 18 20 20 20 20 c9 20 53 |    ....|.    . S|
|00005fe0| 63 72 6f 6c 6c 5f 52 65 | 71 75 65 73 74 0d 1c de |croll_Re|quest...|
|00005ff0| 1e 20 20 20 20 20 20 73 | 63 72 6f 6c 6c 5f 69 6e |.      s|croll_in|
|00006000| 63 72 65 6d 65 6e 74 25 | 3d 33 32 0d 1c e8 24 20 |crement%|=32...$ |
|00006010| 20 20 20 20 20 f2 53 63 | 72 6f 6c 6c 5f 52 65 71 |     .Sc|roll_Req|
|00006020| 75 65 73 74 28 77 62 6c | 6f 63 6b 25 21 30 29 0d |uest(wbl|ock%!0).|
|00006030| 1c f2 59 20 20 20 20 20 | 20 f4 20 55 73 65 72 20 |..Y     | . User |
|00006040| 63 61 6e 20 63 68 61 6e | 67 65 20 73 63 72 6f 6c |can chan|ge scrol|
|00006050| 6c 5f 69 6e 63 72 65 6d | 65 6e 74 25 20 49 66 20 |l_increm|ent% If |
|00006060| 69 74 20 63 6f 6d 65 73 | 20 62 61 63 6b 20 68 65 |it comes| back he|
|00006070| 72 65 20 54 52 55 45 2c | 20 74 68 65 6e 20 6e 6f |re TRUE,| then no|
|00006080| 20 66 75 72 74 68 65 72 | 0d 1c fc 28 20 20 20 20 | further|...(    |
|00006090| 20 20 f4 20 61 63 74 69 | 6f 6e 20 77 69 6c 6c 20 |  . acti|on will |
|000060a0| 74 61 6b 65 20 70 6c 61 | 63 65 20 68 65 72 65 2e |take pla|ce here.|
|000060b0| 0d 1d 06 22 20 20 20 20 | 20 20 e7 20 73 63 72 6f |..."    |  . scro|
|000060c0| 6c 6c 5f 69 6e 63 72 65 | 6d 65 6e 74 25 3c 3e b9 |ll_incre|ment%<>.|
|000060d0| 20 8c 0d 1d 10 1b 20 20 | 20 20 20 20 20 20 c8 8e | .....  |      ..|
|000060e0| 20 77 62 6c 6f 63 6b 25 | 21 33 32 20 ca 0d 1d 1a | wblock%|!32 ....|
|000060f0| 12 20 20 20 20 20 20 20 | 20 20 20 c9 20 2d 32 0d |.       |   . -2.|
|00006100| 1d 24 32 20 20 20 20 20 | 20 20 20 20 20 20 20 77 |.$2     |       w|
|00006110| 62 6c 6f 63 6b 25 21 32 | 30 2d 3d 28 77 62 6c 6f |block%!2|0-=(wblo|
|00006120| 63 6b 25 21 31 32 2d 77 | 62 6c 6f 63 6b 25 21 34 |ck%!12-w|block%!4|
|00006130| 29 0d 1d 2e 12 20 20 20 | 20 20 20 20 20 20 20 c9 |)....   |       .|
|00006140| 20 2d 31 0d 1d 38 2d 20 | 20 20 20 20 20 20 20 20 | -1..8- |        |
|00006150| 20 20 20 77 62 6c 6f 63 | 6b 25 21 32 30 2d 3d 73 |   wbloc|k%!20-=s|
|00006160| 63 72 6f 6c 6c 5f 69 6e | 63 72 65 6d 65 6e 74 25 |croll_in|crement%|
|00006170| 0d 1d 42 11 20 20 20 20 | 20 20 20 20 20 20 c9 20 |..B.    |      . |
|00006180| 31 0d 1d 4c 2d 20 20 20 | 20 20 20 20 20 20 20 20 |1..L-   |        |
|00006190| 20 77 62 6c 6f 63 6b 25 | 21 32 30 2b 3d 73 63 72 | wblock%|!20+=scr|
|000061a0| 6f 6c 6c 5f 69 6e 63 72 | 65 6d 65 6e 74 25 0d 1d |oll_incr|ement%..|
|000061b0| 56 11 20 20 20 20 20 20 | 20 20 20 20 c9 20 32 0d |V.      |    . 2.|
|000061c0| 1d 60 32 20 20 20 20 20 | 20 20 20 20 20 20 20 77 |.`2     |       w|
|000061d0| 62 6c 6f 63 6b 25 21 32 | 30 2b 3d 28 77 62 6c 6f |block%!2|0+=(wblo|
|000061e0| 63 6b 25 21 31 32 2d 77 | 62 6c 6f 63 6b 25 21 34 |ck%!12-w|block%!4|
|000061f0| 29 0d 1d 6a 0d 20 20 20 | 20 20 20 20 20 cb 0d 1d |)..j.   |     ...|
|00006200| 74 1b 20 20 20 20 20 20 | 20 20 c8 8e 20 77 62 6c |t.      |  .. wbl|
|00006210| 6f 63 6b 25 21 33 36 20 | ca 0d 1d 7e 12 20 20 20 |ock%!36 |...~.   |
|00006220| 20 20 20 20 20 20 20 c9 | 20 2d 32 0d 1d 88 32 20 |       .| -2...2 |
|00006230| 20 20 20 20 20 20 20 20 | 20 20 20 77 62 6c 6f 63 |        |   wbloc|
|00006240| 6b 25 21 32 34 2d 3d 28 | 77 62 6c 6f 63 6b 25 21 |k%!24-=(|wblock%!|
|00006250| 31 36 2d 77 62 6c 6f 63 | 6b 25 21 38 29 0d 1d 92 |16-wbloc|k%!8)...|
|00006260| 12 20 20 20 20 20 20 20 | 20 20 20 c9 20 2d 31 0d |.       |   . -1.|
|00006270| 1d 9c 2d 20 20 20 20 20 | 20 20 20 20 20 20 20 77 |..-     |       w|
|00006280| 62 6c 6f 63 6b 25 21 32 | 34 2d 3d 73 63 72 6f 6c |block%!2|4-=scrol|
|00006290| 6c 5f 69 6e 63 72 65 6d | 65 6e 74 25 0d 1d a6 11 |l_increm|ent%....|
|000062a0| 20 20 20 20 20 20 20 20 | 20 20 c9 20 31 0d 1d b0 |        |  . 1...|
|000062b0| 2d 20 20 20 20 20 20 20 | 20 20 20 20 20 77 62 6c |-       |     wbl|
|000062c0| 6f 63 6b 25 21 32 34 2b | 3d 73 63 72 6f 6c 6c 5f |ock%!24+|=scroll_|
|000062d0| 69 6e 63 72 65 6d 65 6e | 74 25 0d 1d ba 11 20 20 |incremen|t%....  |
|000062e0| 20 20 20 20 20 20 20 20 | c9 20 32 0d 1d c4 32 20 |        |. 2...2 |
|000062f0| 20 20 20 20 20 20 20 20 | 20 20 20 77 62 6c 6f 63 |        |   wbloc|
|00006300| 6b 25 21 32 34 2b 3d 28 | 77 62 6c 6f 63 6b 25 21 |k%!24+=(|wblock%!|
|00006310| 31 36 2d 77 62 6c 6f 63 | 6b 25 21 38 29 0d 1d ce |16-wbloc|k%!8)...|
|00006320| 0d 20 20 20 20 20 20 20 | 20 cb 0d 1d d8 37 20 20 |.       | ....7  |
|00006330| 20 20 20 20 20 20 f2 5f | 4f 70 65 6e 5f 57 69 6e |      ._|Open_Win|
|00006340| 64 6f 77 5f 42 6c 6f 63 | 6b 46 69 6c 6c 65 64 28 |dow_Bloc|kFilled(|
|00006350| 21 77 62 6c 6f 63 6b 25 | 2c 77 62 6c 6f 63 6b 25 |!wblock%|,wblock%|
|00006360| 29 0d 1d e2 0b 20 20 20 | 20 20 20 cd 0d 1d ec 14 |)....   |   .....|
|00006370| 20 20 20 20 c9 20 4c 6f | 73 65 5f 43 61 72 65 74 |    . Lo|se_Caret|
|00006380| 0d 1d f6 15 20 20 20 20 | 20 20 f2 4c 6f 73 65 5f |....    |  .Lose_|
|00006390| 43 61 72 65 74 0d 1e 00 | 14 20 20 20 20 c9 20 47 |Caret...|.    . G|
|000063a0| 61 69 6e 5f 43 61 72 65 | 74 0d 1e 0a 15 20 20 20 |ain_Care|t....   |
|000063b0| 20 20 20 f2 47 61 69 6e | 5f 43 61 72 65 74 0d 1e |   .Gain|_Caret..|
|000063c0| 14 45 20 20 20 20 c9 20 | 55 73 65 72 5f 4d 65 73 |.E    . |User_Mes|
|000063d0| 73 61 67 65 2c 55 73 65 | 72 5f 4d 65 73 73 61 67 |sage,Use|r_Messag|
|000063e0| 65 5f 52 65 63 6f 72 64 | 65 64 2c 55 73 65 72 5f |e_Record|ed,User_|
|000063f0| 4d 65 73 73 61 67 65 5f | 41 63 6b 6e 6f 77 6c 65 |Message_|Acknowle|
+--------+-------------------------+-------------------------+--------+--------+