/ The Datafile PD-CD 3 / PDCD_3.iso / utilities / utilsf / keywindow / !KeyWindow / Source

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1e f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 20 66 6f 72 20 4b 65 79 | 57 69 6e 64 6f 77 0d 00 | for Key|Window..|
|00000020| 14 05 3a 0d 00 1e f9 de | 20 42 6c 6f 63 6b 20 32 |..:.....| Block 2|
|00000030| 35 36 2c 49 63 6f 6e 42 | 6c 6f 63 6b 20 32 35 36 |56,IconB|lock 256|
|00000040| 2c 4d 65 6e 75 31 20 31 | 32 34 2c 4d 65 6e 75 32 |,Menu1 1|24,Menu2|
|00000050| 20 37 36 2c 4d 65 6e 75 | 33 20 31 37 32 2c 4f 70 | 76,Menu|3 172,Op|
|00000060| 74 4d 65 6e 75 20 31 37 | 32 2c 4c 69 73 74 4d 65 |tMenu 17|2,ListMe|
|00000070| 6e 75 20 32 38 2b 28 37 | 37 2a 32 34 29 2c 4d 65 |nu 28+(7|7*24),Me|
|00000080| 6e 75 74 65 78 74 20 37 | 37 2a 32 31 2c 49 63 6f |nutext 7|7*21,Ico|
|00000090| 6e 44 61 74 61 20 31 32 | 2c 49 6e 66 6f 57 20 35 |nData 12|,InfoW 5|
|000000a0| 35 33 2c 49 6e 66 6f 49 | 6e 64 20 32 33 38 2c 4b |53,InfoI|nd 238,K|
|000000b0| 65 79 73 57 20 32 35 37 | 34 2c 4b 65 79 73 49 6e |eysW 257|4,KeysIn|
|000000c0| 64 20 31 30 37 37 2c 74 | 61 73 6b 6c 65 61 66 20 |d 1077,t|askleaf |
|000000d0| 35 32 2c 69 74 65 6d 6c | 65 61 66 20 35 32 2c 74 |52,iteml|eaf 52,t|
|000000e0| 69 74 6c 65 6c 65 61 66 | 20 35 32 2c 74 61 73 6b |itleleaf| 52,task|
|000000f0| 6c 65 61 66 74 65 78 74 | 20 32 30 2c 69 74 65 6d |leaftext| 20,item|
|00000100| 6c 65 61 66 74 65 78 74 | 20 31 36 2c 74 69 74 6c |leaftext| 16,titl|
|00000110| 65 6c 65 61 66 74 65 78 | 74 20 32 30 0d 00 28 61 |eleaftex|t 20..(a|
|00000120| de 20 53 70 72 69 74 65 | 73 20 32 35 38 34 2c 54 |. Sprite|s 2584,T|
|00000130| 69 74 6c 65 24 28 33 31 | 29 2c 46 69 6c 65 6e 61 |itle$(31|),Filena|
|00000140| 6d 65 24 28 33 31 29 2c | 49 63 6f 6e 44 61 74 61 |me$(31),|IconData|
|00000150| 24 28 33 31 2c 34 37 29 | 2c 54 61 73 6b 6e 61 6d |$(31,47)|,Tasknam|
|00000160| 65 24 28 33 31 29 2c 4b | 65 79 63 6f 64 65 28 34 |e$(31),K|eycode(4|
|00000170| 37 29 2c 4d 65 6e 75 48 | 65 6c 70 20 38 0d 00 32 |7),MenuH|elp 8..2|
|00000180| 05 3a 0d 00 3c 14 2a 53 | 65 74 20 4b 57 24 52 49 |.:..<.*S|et KW$RI|
|00000190| 53 43 4f 53 20 33 0d 00 | 46 30 2a 52 4d 45 6e 73 |SCOS 3..|F0*RMEns|
|000001a0| 75 72 65 20 55 74 69 6c | 69 74 79 4d 6f 64 75 6c |ure Util|ityModul|
|000001b0| 65 20 33 2e 31 30 20 53 | 65 74 20 4b 57 24 52 49 |e 3.10 S|et KW$RI|
|000001c0| 53 43 4f 53 20 32 0d 00 | 50 53 c8 99 20 22 58 4f |SCOS 2..|PS.. "XO|
|000001d0| 53 5f 52 65 61 64 56 61 | 72 56 61 6c 22 2c 22 4b |S_ReadVa|rVal","K|
|000001e0| 57 24 52 49 53 43 4f 53 | 22 2c 42 6c 6f 63 6b 2c |W$RISCOS|",Block,|
|000001f0| 32 35 36 2c 30 2c 30 20 | b8 20 2c 2c 6c 65 6e 3a |256,0,0 |. ,,len:|
|00000200| 42 6c 6f 63 6b 3f 6c 65 | 6e 3d 31 33 3a 77 69 6d |Block?le|n=13:wim|
|00000210| 70 24 3d 24 42 6c 6f 63 | 6b 0d 00 5a 1c e7 20 77 |p$=$Bloc|k..Z.. w|
|00000220| 69 6d 70 24 3c 3e 22 33 | 22 20 8c 20 77 69 6d 70 |imp$<>"3|" . wimp|
|00000230| 24 3d 22 32 22 0d 00 64 | 14 2a 55 6e 73 65 74 20 |$="2"..d|.*Unset |
|00000240| 4b 57 24 52 49 53 43 4f | 53 0d 00 6e 16 f2 72 65 |KW$RISCO|S..n..re|
|00000250| 61 64 6d 6f 64 65 76 61 | 72 69 61 62 6c 65 73 0d |admodeva|riables.|
|00000260| 00 78 31 c8 99 20 22 4f | 53 5f 53 70 72 69 74 65 |.x1.. "O|S_Sprite|
|00000270| 4f 70 22 2c 32 35 36 2b | 39 2c 53 70 72 69 74 65 |Op",256+|9,Sprite|
|00000280| 73 3a 53 70 72 69 74 65 | 73 21 30 3d 32 35 38 34 |s:Sprite|s!0=2584|
|00000290| 0d 00 82 24 e7 20 28 77 | 69 6d 70 24 3d 22 33 22 |...$. (w|imp$="3"|
|000002a0| 29 20 80 20 28 59 45 69 | 67 46 61 63 74 6f 72 3c |) . (YEi|gFactor<|
|000002b0| 32 29 20 8c 0d 00 8c 41 | 20 20 c8 99 20 22 4f 53 |2) ....A|  .. "OS|
|000002c0| 5f 53 70 72 69 74 65 4f | 70 22 2c 32 35 36 2b 31 |_SpriteO|p",256+1|
|000002d0| 30 2c 53 70 72 69 74 65 | 73 2c 22 3c 4b 65 79 57 |0,Sprite|s,"<KeyW|
|000002e0| 69 6e 64 6f 77 24 44 69 | 72 3e 2e 53 70 72 69 74 |indow$Di|r>.Sprit|
|000002f0| 65 73 32 32 22 0d 00 96 | 05 cc 0d 00 a0 3f 20 20 |es22"...|.....?  |
|00000300| c8 99 20 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |.. "OS_S|priteOp"|
|00000310| 2c 32 35 36 2b 31 30 2c | 53 70 72 69 74 65 73 2c |,256+10,|Sprites,|
|00000320| 22 3c 4b 65 79 57 69 6e | 64 6f 77 24 44 69 72 3e |"<KeyWin|dow$Dir>|
|00000330| 2e 53 70 72 69 74 65 73 | 22 0d 00 aa 05 cd 0d 00 |.Sprites|".......|
|00000340| b4 05 3a 0d 00 be 1d e3 | 20 4e 3d 30 20 b8 20 34 |..:.....| N=0 . 4|
|00000350| 37 3a f3 20 4b 65 79 63 | 6f 64 65 28 4e 29 3a ed |7:. Keyc|ode(N):.|
|00000360| 0d 00 c8 f5 dc 20 26 31 | 38 31 2c 26 31 39 31 2c |..... &1|81,&191,|
|00000370| 26 31 41 31 2c 26 31 42 | 31 2c 26 31 38 32 2c 26 |&1A1,&1B|1,&182,&|
|00000380| 31 39 32 2c 26 31 41 32 | 2c 26 31 42 32 2c 26 31 |192,&1A2|,&1B2,&1|
|00000390| 38 33 2c 26 31 39 33 2c | 26 31 41 33 2c 26 31 42 |83,&193,|&1A3,&1B|
|000003a0| 33 2c 26 31 38 34 2c 26 | 31 39 34 2c 26 31 41 34 |3,&184,&|194,&1A4|
|000003b0| 2c 26 31 42 34 2c 26 31 | 38 35 2c 26 31 39 35 2c |,&1B4,&1|85,&195,|
|000003c0| 26 31 41 35 2c 26 31 42 | 35 2c 26 31 38 36 2c 26 |&1A5,&1B|5,&186,&|
|000003d0| 31 39 36 2c 26 31 41 36 | 2c 26 31 42 36 2c 26 31 |196,&1A6|,&1B6,&1|
|000003e0| 38 37 2c 26 31 39 37 2c | 26 31 41 37 2c 26 31 42 |87,&197,|&1A7,&1B|
|000003f0| 37 2c 26 31 38 38 2c 26 | 31 39 38 2c 26 31 41 38 |7,&188,&|198,&1A8|
|00000400| 2c 26 31 42 38 2c 26 31 | 38 39 2c 26 31 39 39 2c |,&1B8,&1|89,&199,|
|00000410| 26 31 41 39 2c 26 31 42 | 39 2c 26 31 43 41 2c 26 |&1A9,&1B|9,&1CA,&|
|00000420| 31 44 41 2c 26 31 45 41 | 2c 26 31 46 41 2c 26 31 |1DA,&1EA|,&1FA,&1|
|00000430| 43 42 2c 26 31 44 42 2c | 26 31 45 42 2c 26 31 46 |CB,&1DB,|&1EB,&1F|
|00000440| 42 2c 26 31 43 43 2c 26 | 31 44 43 2c 26 31 45 43 |B,&1CC,&|1DC,&1EC|
|00000450| 2c 26 31 46 43 0d 00 d2 | 11 e7 20 77 69 6d 70 24 |,&1FC...|.. wimp$|
|00000460| 3d 22 33 22 20 8c 0d 00 | dc 17 20 20 de 20 6d 65 |="3" ...|..  . me|
|00000470| 73 73 61 67 65 6c 69 73 | 74 25 20 32 34 0d 00 e6 |ssagelis|t% 24...|
|00000480| 85 20 20 6d 65 73 73 61 | 67 65 6c 69 73 74 25 21 |.  messa|gelist%!|
|00000490| 30 3d 26 35 30 32 3a 6d | 65 73 73 61 67 65 6c 69 |0=&502:m|essageli|
|000004a0| 73 74 25 21 34 3d 26 34 | 30 30 43 31 3a 6d 65 73 |st%!4=&4|00C1:mes|
|000004b0| 73 61 67 65 6c 69 73 74 | 25 21 38 3d 26 34 30 30 |sagelist|%!8=&400|
|000004c0| 43 32 3a 6d 65 73 73 61 | 67 65 6c 69 73 74 25 21 |C2:messa|gelist%!|
|000004d0| 31 32 3d 26 34 30 30 43 | 33 3a 6d 65 73 73 61 67 |12=&400C|3:messag|
|000004e0| 65 6c 69 73 74 25 21 31 | 36 3d 26 34 30 30 43 37 |elist%!1|6=&400C7|
|000004f0| 3a 6d 65 73 73 61 67 65 | 6c 69 73 74 25 21 32 30 |:message|list%!20|
|00000500| 3d 30 0d 00 f0 4e 20 20 | c8 99 20 22 57 69 6d 70 |=0...N  |.. "Wimp|
|00000510| 5f 49 6e 69 74 69 61 6c | 69 73 65 22 2c 33 30 30 |_Initial|ise",300|
|00000520| 2c 26 34 42 35 33 34 31 | 35 34 2c 22 4b 65 79 a0 |,&4B5341|54,"Key.|
|00000530| 57 69 6e 64 6f 77 22 2c | 6d 65 73 73 61 67 65 6c |Window",|messagel|
|00000540| 69 73 74 25 20 b8 20 77 | 69 6d 70 2c 54 61 73 6b |ist% . w|imp,Task|
|00000550| 0d 00 fa 3a 20 20 f4 20 | 43 68 65 63 6b 20 33 44 |...:  . |Check 3D|
|00000560| 20 64 65 73 6b 74 6f 70 | 20 27 6c 6f 6f 6b 27 20 | desktop| 'look' |
|00000570| 69 73 20 73 77 69 74 63 | 68 65 64 20 6f 6e 20 69 |is switc|hed on i|
|00000580| 6e 20 43 4d 4f 53 20 52 | 41 4d 0d 01 04 24 20 20 |n CMOS R|AM...$  |
|00000590| c8 99 20 22 4f 53 5f 42 | 79 74 65 22 2c 31 36 31 |.. "OS_B|yte",161|
|000005a0| 2c 31 34 30 20 b8 20 2c | 2c 76 61 6c 75 65 0d 01 |,140 . ,|,value..|
|000005b0| 0e 2b 20 20 e7 20 28 76 | 61 6c 75 65 20 80 20 31 |.+  . (v|alue . 1|
|000005c0| 29 20 8c 20 42 6f 72 64 | 65 72 73 3d 32 3a 8b 20 |) . Bord|ers=2:. |
|000005d0| 42 6f 72 64 65 72 73 3d | 30 0d 01 18 34 20 20 f4 |Borders=|0...4  .|
|000005e0| 20 44 65 73 6b 74 6f 70 | 20 33 44 20 73 74 61 74 | Desktop| 3D stat|
|000005f0| 75 73 20 69 73 20 62 69 | 74 20 31 20 6f 66 20 43 |us is bi|t 1 of C|
|00000600| 4d 4f 53 20 62 79 74 65 | 20 31 34 30 2e 0d 01 22 |MOS byte| 140..."|
|00000610| 05 cc 0d 01 2c 41 20 20 | c8 99 20 22 57 69 6d 70 |....,A  |.. "Wimp|
|00000620| 5f 49 6e 69 74 69 61 6c | 69 73 65 22 2c 32 30 30 |_Initial|ise",200|
|00000630| 2c 26 34 42 35 33 34 31 | 35 34 2c 22 4b 65 79 a0 |,&4B5341|54,"Key.|
|00000640| 57 69 6e 64 6f 77 22 20 | b8 20 77 69 6d 70 2c 54 |Window" |. wimp,T|
|00000650| 61 73 6b 0d 01 36 0f 20 | 20 42 6f 72 64 65 72 73 |ask..6. | Borders|
|00000660| 3d 30 0d 01 40 05 cd 0d | 01 4a 11 e7 20 42 6f 72 |=0..@...|.J.. Bor|
|00000670| 64 65 72 73 3d 32 20 8c | 0d 01 54 3a 20 20 c8 99 |ders=2 .|..T:  ..|
|00000680| 20 22 57 69 6d 70 5f 4f | 70 65 6e 54 65 6d 70 6c | "Wimp_O|penTempl|
|00000690| 61 74 65 22 2c 2c 22 3c | 4b 65 79 57 69 6e 64 6f |ate",,"<|KeyWindo|
|000006a0| 77 24 44 69 72 3e 2e 54 | 65 6d 70 6c 61 74 65 33 |w$Dir>.T|emplate3|
|000006b0| 44 22 0d 01 5e 05 cc 0d | 01 68 39 20 20 c8 99 20 |D"..^...|.h9  .. |
|000006c0| 22 57 69 6d 70 5f 4f 70 | 65 6e 54 65 6d 70 6c 61 |"Wimp_Op|enTempla|
|000006d0| 74 65 22 2c 2c 22 3c 4b | 65 79 57 69 6e 64 6f 77 |te",,"<K|eyWindow|
|000006e0| 24 44 69 72 3e 2e 54 65 | 6d 70 6c 61 74 65 73 22 |$Dir>.Te|mplates"|
|000006f0| 0d 01 72 05 cd 0d 01 7c | 52 c8 99 20 22 57 69 6d |..r....||R.. "Wim|
|00000700| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00000710| 2c 49 6e 66 6f 57 2c 49 | 6e 66 6f 49 6e 64 2c 49 |,InfoW,I|nfoInd,I|
|00000720| 6e 66 6f 49 6e 64 2b 32 | 33 38 2c 2d 31 2c 22 49 |nfoInd+2|38,-1,"I|
|00000730| 6e 66 6f 22 2c 30 3a 49 | 6e 66 6f 57 21 36 34 3d |nfo",0:I|nfoW!64=|
|00000740| 53 70 72 69 74 65 73 0d | 01 86 28 c8 99 20 22 57 |Sprites.|..(.. "W|
|00000750| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00000760| 22 2c 2c 49 6e 66 6f 57 | 20 b8 20 49 6e 66 6f 0d |",,InfoW| . Info.|
|00000770| 01 90 45 c8 99 20 22 57 | 69 6d 70 5f 4c 6f 61 64 |..E.. "W|imp_Load|
|00000780| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 4b 65 79 73 57 |Template|",,KeysW|
|00000790| 2b 34 2c 4b 65 79 73 49 | 6e 64 2c 4b 65 79 73 49 |+4,KeysI|nd,KeysI|
|000007a0| 6e 64 2b 31 30 37 37 2c | 2d 31 2c 22 46 4b 65 79 |nd+1077,|-1,"FKey|
|000007b0| 73 22 2c 30 0d 01 9a 2a | c8 99 20 22 57 69 6d 70 |s",0...*|.. "Wimp|
|000007c0| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|000007d0| 4b 65 79 73 57 2b 34 20 | b8 20 4b 65 79 73 0d 01 |KeysW+4 |. Keys..|
|000007e0| a4 1b c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |.... "Wi|mp_Close|
|000007f0| 54 65 6d 70 6c 61 74 65 | 22 0d 01 ae 05 3a 0d 01 |Template|"....:..|
|00000800| b8 0e ee 20 85 20 f2 65 | 72 72 6f 72 0d 01 c2 16 |... . .e|rror....|
|00000810| f2 72 65 61 64 6d 6f 64 | 65 76 61 72 69 61 62 6c |.readmod|evariabl|
|00000820| 65 73 0d 01 cc 14 f2 52 | 65 61 64 49 6e 4b 65 79 |es.....R|eadInKey|
|00000830| 73 74 72 69 70 73 0d 01 | d6 46 4b 65 79 73 4f 70 |strips..|.FKeysOp|
|00000840| 65 6e 3d a3 3a 41 63 74 | 69 76 65 53 74 72 69 70 |en=.:Act|iveStrip|
|00000850| 3d 2d 31 3a 41 63 74 69 | 76 65 54 61 73 6b 3d 2d |=-1:Acti|veTask=-|
|00000860| 31 3a 4d 65 6e 75 4f 6e | 49 63 6f 6e 3d 2d 31 3a |1:MenuOn|Icon=-1:|
|00000870| 54 68 69 73 54 61 73 6b | 24 3d 22 22 0d 01 e0 48 |ThisTask|$=""...H|
|00000880| c8 99 20 22 58 4f 53 5f | 52 65 61 64 56 61 72 56 |.. "XOS_|ReadVarV|
|00000890| 61 6c 22 2c 22 4b 65 79 | 57 69 6e 64 6f 77 24 46 |al","Key|Window$F|
|000008a0| 6c 61 67 73 22 2c 42 6c | 6f 63 6b 2c 32 35 36 2c |lags",Bl|ock,256,|
|000008b0| 30 2c 30 3a 4b 65 79 46 | 6c 61 67 73 3d 42 6c 6f |0,0:KeyF|lags=Blo|
|000008c0| 63 6b 21 30 0d 01 ea 2c | e7 20 4b 65 79 46 6c 61 |ck!0...,|. KeyFla|
|000008d0| 67 73 3e 36 33 20 84 20 | 4b 65 79 46 6c 61 67 73 |gs>63 . |KeyFlags|
|000008e0| 3c 30 20 8c 20 4b 65 79 | 46 6c 61 67 73 3d 35 31 |<0 . Key|Flags=51|
|000008f0| 0d 01 f4 3e e7 20 28 4b | 65 79 46 6c 61 67 73 20 |...>. (K|eyFlags |
|00000900| 80 20 28 31 3c 3c 30 29 | 29 3d 28 31 3c 3c 30 29 |. (1<<0)|)=(1<<0)|
|00000910| 20 8c 20 4f 70 65 6e 41 | 74 54 6f 70 20 3d b9 3a | . OpenA|tTop =.:|
|00000920| 8b 20 4f 70 65 6e 41 74 | 54 6f 70 20 3d a3 0d 01 |. OpenAt|Top =...|
|00000930| fe 3e e7 20 28 4b 65 79 | 46 6c 61 67 73 20 80 20 |.>. (Key|Flags . |
|00000940| 28 31 3c 3c 31 29 29 3d | 28 31 3c 3c 31 29 20 8c |(1<<1))=|(1<<1) .|
|00000950| 20 41 75 74 6f 53 63 72 | 6f 6c 6c 3d b9 3a 8b 20 | AutoScr|oll=.:. |
|00000960| 41 75 74 6f 53 63 72 6f | 6c 6c 3d a3 0d 02 08 3e |AutoScro|ll=....>|
|00000970| e7 20 28 4b 65 79 46 6c | 61 67 73 20 80 20 28 31 |. (KeyFl|ags . (1|
|00000980| 3c 3c 32 29 29 3d 28 31 | 3c 3c 32 29 20 8c 20 53 |<<2))=(1|<<2) . S|
|00000990| 63 72 6f 6c 6c 42 61 72 | 20 3d b9 3a 8b 20 53 63 |crollBar| =.:. Sc|
|000009a0| 72 6f 6c 6c 42 61 72 20 | 3d a3 0d 02 12 3e e7 20 |rollBar |=....>. |
|000009b0| 28 4b 65 79 46 6c 61 67 | 73 20 80 20 28 31 3c 3c |(KeyFlag|s . (1<<|
|000009c0| 33 29 29 3d 28 31 3c 3c | 33 29 20 8c 20 43 6f 6d |3))=(1<<|3) . Com|
|000009d0| 70 72 65 73 73 20 20 3d | b9 3a 8b 20 43 6f 6d 70 |press  =|.:. Comp|
|000009e0| 72 65 73 73 20 20 3d a3 | 0d 02 1c 3e e7 20 28 4b |ress  =.|...>. (K|
|000009f0| 65 79 46 6c 61 67 73 20 | 80 20 28 31 3c 3c 34 29 |eyFlags |. (1<<4)|
|00000a00| 29 3d 28 31 3c 3c 34 29 | 20 8c 20 43 6f 6e 74 65 |)=(1<<4)| . Conte|
|00000a10| 78 74 4f 6e 20 3d b9 3a | 8b 20 43 6f 6e 74 65 78 |xtOn =.:|. Contex|
|00000a20| 74 4f 6e 20 3d a3 0d 02 | 26 3e e7 20 28 4b 65 79 |tOn =...|&>. (Key|
|00000a30| 46 6c 61 67 73 20 80 20 | 28 31 3c 3c 35 29 29 3d |Flags . |(1<<5))=|
|00000a40| 28 31 3c 3c 35 29 20 8c | 20 53 74 61 72 74 75 70 |(1<<5) .| Startup|
|00000a50| 4f 6e 20 3d b9 3a 8b 20 | 53 74 61 72 74 75 70 4f |On =.:. |StartupO|
|00000a60| 6e 20 3d a3 0d 02 30 2f | e7 20 41 75 74 6f 53 63 |n =...0/|. AutoSc|
|00000a70| 72 6f 6c 6c 3d a3 20 80 | 20 53 63 72 6f 6c 6c 42 |roll=. .| ScrollB|
|00000a80| 61 72 3d a3 20 8c 20 41 | 75 74 6f 53 63 72 6f 6c |ar=. . A|utoScrol|
|00000a90| 6c 3d b9 0d 02 3a 1d 44 | 6f 53 63 72 6f 6c 6c 3d |l=...:.D|oScroll=|
|00000aa0| a3 3a f2 64 6f 53 63 72 | 6f 6c 6c 4f 6e 4f 66 66 |.:.doScr|ollOnOff|
|00000ab0| 0d 02 44 05 3a 0d 02 4e | 1d f4 20 50 75 74 20 49 |..D.:..N|.. Put I|
|00000ac0| 63 6f 6e 20 6f 6e 20 74 | 68 65 20 69 63 6f 6e 62 |con on t|he iconb|
|00000ad0| 61 72 0d 02 58 0e 42 6c | 6f 63 6b 21 30 3d 2d 31 |ar..X.Bl|ock!0=-1|
|00000ae0| 0d 02 62 0d 42 6c 6f 63 | 6b 21 34 3d 30 0d 02 6c |..b.Bloc|k!4=0..l|
|00000af0| 0d 42 6c 6f 63 6b 21 38 | 3d 30 0d 02 76 0f 42 6c |.Block!8|=0..v.Bl|
|00000b00| 6f 63 6b 21 31 32 3d 36 | 38 0d 02 80 0f 42 6c 6f |ock!12=6|8....Blo|
|00000b10| 63 6b 21 31 36 3d 36 38 | 0d 02 8a 16 42 6c 6f 63 |ck!16=68|....Bloc|
|00000b20| 6b 21 32 30 3d 26 31 37 | 30 30 33 30 30 32 0d 02 |k!20=&17|003002..|
|00000b30| 94 1e 24 28 42 6c 6f 63 | 6b 2b 32 34 29 3d 22 6b |..$(Bloc|k+24)="k|
|00000b40| 65 79 77 69 6e 64 6f 77 | 69 63 62 22 0d 02 9e 29 |eywindow|icb"...)|
|00000b50| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 49 |.. "Wimp|_CreateI|
|00000b60| 63 6f 6e 22 2c 2c 42 6c | 6f 63 6b 20 b8 20 49 63 |con",,Bl|ock . Ic|
|00000b70| 6f 6e 42 61 72 0d 02 a8 | 05 3a 0d 02 b2 11 f4 20 |onBar...|.:..... |
|00000b80| 42 75 69 6c 64 20 6d 65 | 6e 75 73 0d 02 bc 10 f2 |Build me|nus.....|
|00000b90| 6d 61 6b 65 5f 6c 65 61 | 76 65 73 0d 02 c6 0e 4d |make_lea|ves....M|
|00000ba0| 25 3d 4f 70 74 4d 65 6e | 75 0d 02 d0 19 f2 4d 65 |%=OptMen|u.....Me|
|00000bb0| 6e 75 5f 69 6e 69 74 28 | 22 4f 70 74 69 6f 6e 73 |nu_init(|"Options|
|00000bc0| 22 29 0d 02 da 2b f2 4d | 65 6e 75 5f 69 74 65 6d |")...+.M|enu_item|
|00000bd0| 28 22 4f 70 65 6e 20 61 | 74 20 74 6f 70 22 2c 2d |("Open a|t top",-|
|00000be0| 4f 70 65 6e 41 74 54 6f | 70 2c 2d 31 29 0d 02 e4 |OpenAtTo|p,-1)...|
|00000bf0| 2c f2 4d 65 6e 75 5f 69 | 74 65 6d 28 22 41 75 74 |,.Menu_i|tem("Aut|
|00000c00| 6f 20 73 63 72 6f 6c 6c | 22 2c 2d 41 75 74 6f 53 |o scroll|",-AutoS|
|00000c10| 63 72 6f 6c 6c 2c 2d 31 | 29 0d 02 ee 2a f2 4d 65 |croll,-1|)...*.Me|
|00000c20| 6e 75 5f 69 74 65 6d 28 | 22 53 63 72 6f 6c 6c 20 |nu_item(|"Scroll |
|00000c30| 62 61 72 22 2c 2d 53 63 | 72 6f 6c 6c 42 61 72 2c |bar",-Sc|rollBar,|
|00000c40| 2d 31 29 0d 02 f8 29 f2 | 4d 65 6e 75 5f 69 74 65 |-1)...).|Menu_ite|
|00000c50| 6d 28 22 43 6f 6d 70 72 | 65 73 73 22 2c 2d 43 6f |m("Compr|ess",-Co|
|00000c60| 6d 70 72 65 73 73 2b 32 | 2c 2d 31 29 0d 03 02 2b |mpress+2|,-1)...+|
|00000c70| f2 4d 65 6e 75 5f 69 74 | 65 6d 28 22 53 65 6e 73 |.Menu_it|em("Sens|
|00000c80| 65 20 63 61 72 65 74 22 | 2c 2d 43 6f 6e 74 65 78 |e caret"|,-Contex|
|00000c90| 74 4f 6e 2c 2d 31 29 0d | 03 0c 2e f2 4d 65 6e 75 |tOn,-1).|....Menu|
|00000ca0| 5f 69 74 65 6d 28 22 53 | 65 6e 73 65 20 61 70 70 |_item("S|ense app|
|00000cb0| 73 22 2c 2d 53 74 61 72 | 74 75 70 4f 6e 2b 31 32 |s",-Star|tupOn+12|
|00000cc0| 38 2c 2d 31 29 0d 03 16 | 0c 4d 25 3d 4d 65 6e 75 |8,-1)...|.M%=Menu|
|00000cd0| 31 0d 03 20 1c f2 4d 65 | 6e 75 5f 69 6e 69 74 28 |1.. ..Me|nu_init(|
|00000ce0| 22 4b 65 79 20 57 69 6e | 64 6f 77 22 29 0d 03 2a |"Key Win|dow")..*|
|00000cf0| 1d f2 4d 65 6e 75 5f 69 | 74 65 6d 28 22 49 6e 66 |..Menu_i|tem("Inf|
|00000d00| 6f 22 2c 32 2c 49 6e 66 | 6f 29 0d 03 34 26 f2 4d |o",2,Inf|o)..4&.M|
|00000d10| 65 6e 75 5f 69 74 65 6d | 28 22 4b 65 79 73 74 72 |enu_item|("Keystr|
|00000d20| 69 70 73 22 2c 30 2c 4c | 69 73 74 4d 65 6e 75 29 |ips",0,L|istMenu)|
|00000d30| 0d 03 3e 23 f2 4d 65 6e | 75 5f 69 74 65 6d 28 22 |..>#.Men|u_item("|
|00000d40| 4f 70 74 69 6f 6e 73 22 | 2c 32 2c 4f 70 74 4d 65 |Options"|,2,OptMe|
|00000d50| 6e 75 29 0d 03 48 1d f2 | 4d 65 6e 75 5f 69 74 65 |nu)..H..|Menu_ite|
|00000d60| 6d 28 22 51 75 69 74 22 | 2c 31 32 38 2c 2d 31 29 |m("Quit"|,128,-1)|
|00000d70| 0d 03 52 0c 4d 25 3d 4d | 65 6e 75 32 0d 03 5c 19 |..R.M%=M|enu2..\.|
|00000d80| f2 4d 65 6e 75 5f 69 6e | 69 74 28 22 4d 65 74 68 |.Menu_in|it("Meth|
|00000d90| 6f 64 3a 22 29 0d 03 66 | 22 f2 4d 65 6e 75 5f 69 |od:")..f|".Menu_i|
|00000da0| 74 65 6d 28 22 52 65 70 | 6c 61 63 65 20 6f 6c 64 |tem("Rep|lace old|
|00000db0| 22 2c 30 2c 2d 31 29 0d | 03 70 24 f2 4d 65 6e 75 |",0,-1).|.p$.Menu|
|00000dc0| 5f 69 74 65 6d 28 22 43 | 72 65 61 74 65 20 20 6e |_item("C|reate  n|
|00000dd0| 65 77 22 2c 31 32 38 2c | 2d 31 29 0d 03 7a 0c 4d |ew",128,|-1)..z.M|
|00000de0| 25 3d 4d 65 6e 75 33 0d | 03 84 1a f2 4d 65 6e 75 |%=Menu3.|....Menu|
|00000df0| 5f 69 6e 69 74 28 22 4b | 65 79 73 74 72 69 70 22 |_init("K|eystrip"|
|00000e00| 29 0d 03 8e 26 f2 4d 65 | 6e 75 5f 69 74 65 6d 28 |)...&.Me|nu_item(|
|00000e10| 22 45 64 69 74 20 69 74 | 65 6d 22 2c 30 2c 69 74 |"Edit it|em",0,it|
|00000e20| 65 6d 6c 65 61 66 29 0d | 03 98 28 f2 4d 65 6e 75 |emleaf).|..(.Menu|
|00000e30| 5f 69 74 65 6d 28 22 45 | 64 69 74 20 74 69 74 6c |_item("E|dit titl|
|00000e40| 65 22 2c 32 2c 74 69 74 | 6c 65 6c 65 61 66 29 0d |e",2,tit|leleaf).|
|00000e50| 03 a2 26 f2 4d 65 6e 75 | 5f 69 74 65 6d 28 22 47 |..&.Menu|_item("G|
|00000e60| 65 74 20 73 74 72 69 70 | 22 2c 30 2c 4c 69 73 74 |et strip|",0,List|
|00000e70| 4d 65 6e 75 29 0d 03 ac | 22 f2 4d 65 6e 75 5f 69 |Menu)...|".Menu_i|
|00000e80| 74 65 6d 28 22 43 6c 65 | 61 72 20 73 74 72 69 70 |tem("Cle|ar strip|
|00000e90| 22 2c 32 2c 2d 31 29 0d | 03 b6 27 f2 4d 65 6e 75 |",2,-1).|..'.Menu|
|00000ea0| 5f 69 74 65 6d 28 22 4f | 70 65 6e 20 77 69 74 68 |_item("O|pen with|
|00000eb0| 3f 22 2c 30 2c 74 61 73 | 6b 6c 65 61 66 29 0d 03 |?",0,tas|kleaf)..|
|00000ec0| c0 26 f2 4d 65 6e 75 5f | 69 74 65 6d 28 22 53 61 |.&.Menu_|item("Sa|
|00000ed0| 76 65 20 73 74 72 69 70 | 22 2c 31 32 38 2c 4d 65 |ve strip|",128,Me|
|00000ee0| 6e 75 32 29 0d 03 ca 05 | 3a 0d 03 d4 3c e7 20 66 |nu2)....|:...<. f|
|00000ef0| 69 6c 65 73 3d 33 32 20 | 8c 20 4d 65 6e 75 32 21 |iles=32 |. Menu2!|
|00000f00| 36 30 3d 28 28 4d 65 6e | 75 32 21 36 30 29 20 80 |60=((Men|u2!60) .|
|00000f10| 20 ac 20 28 31 3c 3c 32 | 32 29 29 20 82 20 28 31 | . (1<<2|2)) . (1|
|00000f20| 3c 3c 32 32 29 0d 03 de | 19 f2 75 70 64 61 74 65 |<<22)...|..update|
|00000f30| 4b 65 79 73 57 69 6e 64 | 6f 77 28 2d 31 29 0d 03 |KeysWind|ow(-1)..|
|00000f40| e8 0f f2 44 6f 43 6f 6d | 70 72 65 73 73 0d 03 f2 |...DoCom|press...|
|00000f50| 05 3a 0d 03 fc 17 f4 20 | 4d 61 69 6e 20 70 72 6f |.:..... |Main pro|
|00000f60| 67 72 61 6d 20 6c 6f 6f | 70 0d 04 06 0a 44 6f 6e |gram loo|p....Don|
|00000f70| 65 3d a3 0d 04 10 0e ee | 20 85 20 f2 65 72 72 6f |e=......| . .erro|
|00000f80| 72 0d 04 1a 05 f5 0d 04 | 24 30 20 20 c8 99 20 22 |r.......|$0  .. "|
|00000f90| 57 69 6d 70 5f 50 6f 6c | 6c 22 2c 25 31 30 30 31 |Wimp_Pol|l",%1001|
|00000fa0| 30 30 30 30 30 31 30 2c | 42 6c 6f 63 6b 20 b8 20 |0000010,|Block . |
|00000fb0| 52 65 61 73 6f 6e 0d 04 | 2e 11 20 20 c8 8e 20 52 |Reason..|..  .. R|
|00000fc0| 65 61 73 6f 6e 20 ca 0d | 04 38 2a 20 20 20 20 c9 |eason ..|.8*    .|
|00000fd0| 20 30 20 3a 20 e7 20 44 | 6f 53 63 72 6f 6c 6c 20 | 0 : . D|oScroll |
|00000fe0| 8c 20 f2 4d 6f 6e 69 74 | 6f 72 50 6f 69 6e 74 65 |. .Monit|orPointe|
|00000ff0| 72 0d 04 42 2d 20 20 20 | 20 20 20 20 20 20 20 20 |r..B-   |        |
|00001000| 3a 20 e7 20 43 6f 6e 74 | 65 78 74 4f 6e 20 8c 20 |: . Cont|extOn . |
|00001010| f2 46 69 6e 64 43 61 72 | 65 74 54 61 73 6b 0d 04 |.FindCar|etTask..|
|00001020| 4c 45 20 20 20 20 c9 20 | 32 20 3a 20 c8 99 20 22 |LE    . |2 : .. "|
|00001030| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00001040| 2c 2c 42 6c 6f 63 6b 3a | e7 20 42 6c 6f 63 6b 21 |,,Block:|. Block!|
|00001050| 30 3d 4b 65 79 73 20 8c | 20 4b 65 79 73 4f 70 65 |0=Keys .| KeysOpe|
|00001060| 6e 3d b9 0d 04 56 46 20 | 20 20 20 c9 20 33 20 3a |n=...VF |   . 3 :|
|00001070| 20 c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 | .. "Wim|p_CloseW|
|00001080| 69 6e 64 6f 77 22 2c 2c | 42 6c 6f 63 6b 3a e7 20 |indow",,|Block:. |
|00001090| 42 6c 6f 63 6b 21 30 3d | 4b 65 79 73 20 8c 20 4b |Block!0=|Keys . K|
|000010a0| 65 79 73 4f 70 65 6e 3d | a3 0d 04 60 4a 20 20 20 |eysOpen=|...`J   |
|000010b0| 20 c9 20 34 20 3a 20 e7 | 20 41 75 74 6f 53 63 72 | . 4 : .| AutoScr|
|000010c0| 6f 6c 6c 20 80 20 42 6c | 6f 63 6b 21 30 3d 4b 65 |oll . Bl|ock!0=Ke|
|000010d0| 79 73 20 8c 20 44 6f 53 | 63 72 6f 6c 6c 3d a3 20 |ys . DoS|croll=. |
|000010e0| 3a 20 f4 20 50 6f 69 6e | 74 65 72 20 6c 65 61 76 |: . Poin|ter leav|
|000010f0| 69 6e 67 0d 04 6a 4c 20 | 20 20 20 c9 20 35 20 3a |ing..jL |   . 5 :|
|00001100| 20 e7 20 41 75 74 6f 53 | 63 72 6f 6c 6c 20 80 20 | . AutoS|croll . |
|00001110| 42 6c 6f 63 6b 21 30 3d | 4b 65 79 73 20 8c 20 44 |Block!0=|Keys . D|
|00001120| 6f 53 63 72 6f 6c 6c 3d | b9 20 20 3a 20 f4 20 50 |oScroll=|.  : . P|
|00001130| 6f 69 6e 74 65 72 20 65 | 6e 74 65 72 69 6e 67 0d |ointer e|ntering.|
|00001140| 04 74 1a 20 20 20 20 c9 | 20 36 20 3a 20 f2 4d 6f |.t.    .| 6 : .Mo|
|00001150| 75 73 65 42 75 74 74 6f | 6e 0d 04 7e 16 20 20 20 |useButto|n..~.   |
|00001160| 20 c9 20 38 20 3a 20 f2 | 48 6f 74 4b 65 79 73 0d | . 8 : .|HotKeys.|
|00001170| 04 88 19 20 20 20 20 c9 | 20 39 20 3a 20 f2 44 65 |...    .| 9 : .De|
|00001180| 63 6f 64 65 4d 65 6e 75 | 0d 04 92 21 20 20 20 20 |codeMenu|...!    |
|00001190| c9 20 31 37 2c 31 38 20 | 3a 20 f2 52 65 63 69 65 |. 17,18 |: .Recie|
|000011a0| 76 65 4d 65 73 73 61 67 | 65 0d 04 9c 07 20 20 cb |veMessag|e....  .|
|000011b0| 0d 04 a6 0a fd 20 44 6f | 6e 65 0d 04 b0 26 c8 99 |..... Do|ne...&..|
|000011c0| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e | "Wimp_C|loseDown|
|000011d0| 22 2c 54 61 73 6b 2c 26 | 34 42 35 33 34 31 35 34 |",Task,&|4B534154|
|000011e0| 0d 04 ba 05 e0 0d 04 c4 | 05 3a 0d 04 ce 0c dd 20 |........|.:..... |
|000011f0| f2 65 72 72 6f 72 0d 04 | d8 0d 42 6c 6f 63 6b 21 |.error..|..Block!|
|00001200| 30 3d 9f 0d 04 e2 0e e7 | 20 9f 3d 39 39 39 39 20 |0=......| .=9999 |
|00001210| 8c 0d 04 ec 16 20 20 24 | 28 42 6c 6f 63 6b 2b 34 |.....  $|(Block+4|
|00001220| 29 3d f6 24 2b bd 30 0d | 04 f6 3a 20 20 c8 99 20 |)=.$+.0.|..:  .. |
|00001230| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|00001240| 72 22 2c 42 6c 6f 63 6b | 2c 31 37 2c 22 4b 65 79 |r",Block|,17,"Key|
|00001250| 20 57 69 6e 64 6f 77 22 | 20 b8 20 2c 43 6c 69 63 | Window"| . ,Clic|
|00001260| 6b 0d 05 00 05 cc 0d 05 | 0a 67 20 20 24 28 42 6c |k.......|.g  $(Bl|
|00001270| 6f 63 6b 2b 34 29 3d f6 | 24 2b 22 20 61 74 20 6c |ock+4)=.|$+" at l|
|00001280| 69 6e 65 20 22 2b c3 9e | 2b 22 3b 20 20 43 6c 69 |ine "+..|+";  Cli|
|00001290| 63 6b 20 6f 6e 20 4f 4b | 20 74 6f 20 63 6f 6e 74 |ck on OK| to cont|
|000012a0| 69 6e 75 65 2c 20 6f 72 | 20 43 61 6e 63 65 6c 20 |inue, or| Cancel |
|000012b0| 74 6f 20 74 65 72 6d 69 | 6e 61 74 65 20 74 68 65 |to termi|nate the|
|000012c0| 20 70 72 6f 67 72 61 6d | 2e 22 2b bd 30 0d 05 14 | program|."+.0...|
|000012d0| 39 20 20 c8 99 20 22 57 | 69 6d 70 5f 52 65 70 6f |9  .. "W|imp_Repo|
|000012e0| 72 74 45 72 72 6f 72 22 | 2c 42 6c 6f 63 6b 2c 33 |rtError"|,Block,3|
|000012f0| 2c 22 4b 65 79 20 57 69 | 6e 64 6f 77 22 20 b8 20 |,"Key Wi|ndow" . |
|00001300| 2c 43 6c 69 63 6b 0d 05 | 1e 05 cd 0d 05 28 25 e7 |,Click..|.....(%.|
|00001310| 20 43 6c 69 63 6b 3d 32 | 20 8c 20 c8 99 20 22 57 | Click=2| . .. "W|
|00001320| 69 6d 70 5f 43 6c 6f 73 | 65 44 6f 77 6e 22 3a e0 |imp_Clos|eDown":.|
|00001330| 0d 05 32 05 e1 0d 05 3c | 05 3a 0d 05 46 15 dd 20 |..2....<|.:..F.. |
|00001340| f2 52 65 63 69 65 76 65 | 4d 65 73 73 61 67 65 0d |.Recieve|Message.|
|00001350| 05 50 11 c8 8e 20 42 6c | 6f 63 6b 21 31 36 20 ca |.P... Bl|ock!16 .|
|00001360| 0d 05 5a 12 20 20 c9 20 | 30 20 3a 20 44 6f 6e 65 |..Z.  . |0 : Done|
|00001370| 3d b9 0d 05 64 14 20 20 | c9 20 26 35 30 32 20 3a |=...d.  |. &502 :|
|00001380| 20 f2 48 65 6c 70 0d 05 | 6e 26 20 20 c9 20 26 34 | .Help..|n&  . &4|
|00001390| 30 30 43 31 20 3a 20 f2 | 75 70 64 61 74 65 4b 65 |00C1 : .|updateKe|
|000013a0| 79 73 57 69 6e 64 6f 77 | 28 2d 31 29 0d 05 78 1f |ysWindow|(-1)..x.|
|000013b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000013c0| f2 44 6f 43 6f 6d 70 72 | 65 73 73 0d 05 82 30 20 |.DoCompr|ess...0 |
|000013d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 e7 |        |       .|
|000013e0| 20 4b 65 79 73 4f 70 65 | 6e 20 8c 20 f2 6f 70 65 | KeysOpe|n . .ope|
|000013f0| 6e 28 4b 65 79 73 2c a3 | 2c a3 29 0d 05 8c 38 20 |n(Keys,.|,.)...8 |
|00001400| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 e7 |        |       .|
|00001410| 20 28 28 58 70 69 78 65 | 6c 73 2d 31 29 2a 32 5e | ((Xpixe|ls-1)*2^|
|00001420| 58 45 69 67 46 61 63 74 | 6f 72 29 3e 3d 33 32 39 |XEigFact|or)>=329|
|00001430| 36 20 8c 0d 05 96 57 20 | 20 20 20 20 20 20 20 20 |6 ....W |        |
|00001440| 20 20 20 20 20 20 20 20 | 20 4f 70 74 4d 65 6e 75 |        | OptMenu|
|00001450| 21 28 32 38 2b 38 30 29 | 3d 28 28 4f 70 74 4d 65 |!(28+80)|=((OptMe|
|00001460| 6e 75 21 28 32 38 2b 38 | 30 29 29 20 80 20 ac 20 |nu!(28+8|0)) . . |
|00001470| 28 31 3c 3c 32 32 29 29 | 20 82 20 28 31 3c 3c 32 |(1<<22))| . (1<<2|
|00001480| 32 29 3a f4 20 53 68 61 | 64 65 0d 05 a0 15 20 20 |2):. Sha|de....  |
|00001490| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 cc 0d |        |      ..|
|000014a0| 05 aa 59 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..Y     |        |
|000014b0| 20 20 20 20 20 4f 70 74 | 4d 65 6e 75 21 28 32 38 |     Opt|Menu!(28|
|000014c0| 2b 38 30 29 3d 28 28 4f | 70 74 4d 65 6e 75 21 28 |+80)=((O|ptMenu!(|
|000014d0| 32 38 2b 38 30 29 29 20 | 80 20 ac 20 28 31 3c 3c |28+80)) |. . (1<<|
|000014e0| 32 32 29 29 20 82 20 28 | 30 3c 3c 32 32 29 3a f4 |22)) . (|0<<22):.|
|000014f0| 20 55 6e 73 68 61 64 65 | 0d 05 b4 15 20 20 20 20 | Unshade|....    |
|00001500| 20 20 20 20 20 20 20 20 | 20 20 20 20 cd 0d 05 be |        |    ....|
|00001510| 1c 20 20 c9 20 26 34 30 | 30 43 32 20 80 20 53 74 |.  . &40|0C2 . St|
|00001520| 61 72 74 75 70 4f 6e 20 | 3a 0d 05 c8 46 20 20 20 |artupOn |:...F   |
|00001530| 20 20 20 20 20 20 20 20 | 20 20 20 54 61 73 6b 24 |        |   Task$|
|00001540| 3d 22 22 3a 4e 3d 32 38 | 3a c8 95 20 42 6c 6f 63 |="":N=28|:.. Bloc|
|00001550| 6b 3f 4e 3c 3e 30 3a 54 | 61 73 6b 24 2b 3d bd 28 |k?N<>0:T|ask$+=.(|
|00001560| 42 6c 6f 63 6b 3f 4e 29 | 3a 4e 2b 3d 31 3a ce 0d |Block?N)|:N+=1:..|
|00001570| 05 d2 3e 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..>     |        |
|00001580| 20 4e 3d 2d 31 3a f5 3a | 4e 2b 3d 31 3a fd 20 54 | N=-1:.:|N+=1:. T|
|00001590| 61 73 6b 6e 61 6d 65 24 | 28 4e 29 3d 54 61 73 6b |askname$|(N)=Task|
|000015a0| 24 20 84 20 4e 3d 66 69 | 6c 65 73 2d 31 0d 05 dc |$ . N=fi|les-1...|
|000015b0| 59 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 62 |Y       |       b|
|000015c0| 6c 6f 63 6b 74 61 73 6b | 3d 42 6c 6f 63 6b 21 34 |locktask|=Block!4|
|000015d0| 3a f4 20 74 65 6d 70 6f | 72 61 72 79 20 73 74 6f |:. tempo|rary sto|
|000015e0| 72 65 2c 20 61 73 20 77 | 65 27 72 65 20 67 6f 69 |re, as w|e're goi|
|000015f0| 6e 67 20 74 6f 20 75 73 | 65 20 42 6c 6f 63 6b 20 |ng to us|e Block |
|00001600| 61 67 61 69 6e 2e 0d 05 | e6 13 20 20 20 20 20 20 |again...|..      |
|00001610| 20 20 20 20 20 20 20 20 | 3a 0d 05 f0 41 20 20 20 |        |:...A   |
|00001620| 20 20 20 20 20 20 20 20 | 20 20 20 f4 20 54 68 69 |        |   . Thi|
|00001630| 73 20 69 73 20 74 6f 20 | 66 69 6e 64 20 74 68 65 |s is to |find the|
|00001640| 20 63 61 72 65 74 20 6f | 77 6e 65 72 27 73 20 74 | caret o|wner's t|
|00001650| 61 73 6b 68 61 6e 64 6c | 65 2c 0d 05 fa 42 20 20 |askhandl|e,...B  |
|00001660| 20 20 20 20 20 20 20 20 | 20 20 20 20 f4 20 61 6e |        |    . an|
|00001670| 64 20 63 68 65 63 6b 20 | 69 74 20 61 67 61 69 6e |d check |it again|
|00001680| 73 74 20 74 68 65 20 63 | 75 72 72 65 6e 74 6c 79 |st the c|urrently|
|00001690| 20 6f 70 65 6e 20 73 74 | 72 69 70 2e 0d 06 04 53 | open st|rip....S|
|000016a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 c8 99 |        |      ..|
|000016b0| 20 22 57 69 6d 70 5f 47 | 65 74 43 61 72 65 74 50 | "Wimp_G|etCaretP|
|000016c0| 6f 73 69 74 69 6f 6e 22 | 2c 2c 42 6c 6f 63 6b 3a |osition"|,,Block:|
|000016d0| 63 61 72 65 74 77 69 6e | 64 6f 77 3d 42 6c 6f 63 |caretwin|dow=Bloc|
|000016e0| 6b 21 30 3a 63 61 72 65 | 74 74 61 73 6b 3d 30 0d |k!0:care|ttask=0.|
|000016f0| 06 0e 31 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..1     |        |
|00001700| 20 e7 20 43 6f 6e 74 65 | 78 74 4f 6e 20 80 20 63 | . Conte|xtOn . c|
|00001710| 61 72 65 74 77 69 6e 64 | 6f 77 3c 3e 2d 31 20 8c |aretwind|ow<>-1 .|
|00001720| 0d 06 18 65 20 20 20 20 | 20 20 20 20 20 20 20 20 |...e    |        |
|00001730| 20 20 20 20 42 6c 6f 63 | 6b 21 30 3d 31 36 3a 42 |    Bloc|k!0=16:B|
|00001740| 6c 6f 63 6b 21 31 32 3d | 30 3a f4 20 46 6f 6c 6c |lock!12=|0:. Foll|
|00001750| 6f 77 69 6e 67 20 6d 65 | 73 73 61 67 65 20 69 73 |owing me|ssage is|
|00001760| 20 6e 65 76 65 72 20 73 | 65 6e 74 2c 20 62 75 74 | never s|ent, but|
|00001770| 20 72 65 74 75 72 6e 73 | 20 74 61 73 6b 20 6e 75 | returns| task nu|
|00001780| 6d 62 65 72 2e 0d 06 22 | 4c 20 20 20 20 20 20 20 |mber..."|L       |
|00001790| 20 20 20 20 20 20 20 20 | 20 c8 99 20 22 57 69 6d |        | .. "Wim|
|000017a0| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 31 |p_SendMe|ssage",1|
|000017b0| 39 2c 42 6c 6f 63 6b 2c | 63 61 72 65 74 77 69 6e |9,Block,|caretwin|
|000017c0| 64 6f 77 20 b8 20 2c 2c | 63 61 72 65 74 74 61 73 |dow . ,,|carettas|
|000017d0| 6b 0d 06 2c 13 20 20 20 | 20 20 20 20 20 20 20 20 |k..,.   |        |
|000017e0| 20 20 20 cd 0d 06 36 13 | 20 20 20 20 20 20 20 20 |   ...6.|        |
|000017f0| 20 20 20 20 20 20 3a 0d | 06 40 5d 20 20 20 20 20 |      :.|.@]     |
|00001800| 20 20 20 20 20 20 20 20 | 20 e7 20 28 54 61 73 6b |        | . (Task|
|00001810| 24 3d 54 61 73 6b 6e 61 | 6d 65 24 28 4e 29 29 20 |$=Taskna|me$(N)) |
|00001820| 80 20 28 54 61 73 6b 24 | 3c 3e 24 74 61 73 6b 6c |. (Task$|<>$taskl|
|00001830| 65 61 66 74 65 78 74 29 | 20 80 20 28 41 63 74 69 |eaftext)| . (Acti|
|00001840| 76 65 54 61 73 6b 3c 3e | 63 61 72 65 74 74 61 73 |veTask<>|carettas|
|00001850| 6b 29 20 8c 0d 06 4a 57 | 20 20 20 20 20 20 20 20 |k) ...JW|        |
|00001860| 20 20 20 20 20 20 20 20 | f4 20 4f 70 65 6e 73 20 |        |. Opens |
|00001870| 73 74 72 69 70 20 6f 6e | 6c 79 20 69 66 20 28 61 |strip on|ly if (a|
|00001880| 29 20 6e 65 77 20 73 74 | 72 69 70 20 69 73 20 6e |) new st|rip is n|
|00001890| 6f 74 20 74 68 65 20 73 | 61 6d 65 20 61 73 20 6f |ot the s|ame as o|
|000018a0| 6c 64 20 6f 6e 65 2c 20 | 61 6e 64 0d 06 54 56 20 |ld one, |and..TV |
|000018b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 f4 |        |       .|
|000018c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000018d0| 20 20 20 20 20 28 62 29 | 20 74 68 65 20 63 61 72 |     (b)| the car|
|000018e0| 65 74 20 69 73 20 6e 6f | 74 20 61 6c 72 65 61 64 |et is no|t alread|
|000018f0| 79 20 69 6e 20 61 6e 6f | 74 68 65 72 20 74 61 73 |y in ano|ther tas|
|00001900| 6b 0d 06 5e 47 20 20 20 | 20 20 20 20 20 20 20 20 |k..^G   |        |
|00001910| 20 20 20 20 20 f4 20 20 | 20 20 20 20 20 20 20 20 |     .  |        |
|00001920| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 69 |        |       i|
|00001930| 66 20 63 6f 6e 74 65 78 | 74 20 73 65 6e 73 69 6e |f contex|t sensin|
|00001940| 67 20 69 73 20 6f 6e 2e | 0d 06 68 36 20 20 20 20 |g is on.|..h6    |
|00001950| 20 20 20 20 20 20 20 20 | 20 20 20 20 41 63 74 69 |        |    Acti|
|00001960| 76 65 53 74 72 69 70 3d | 4e 3a 41 63 74 69 76 65 |veStrip=|N:Active|
|00001970| 54 61 73 6b 3d 62 6c 6f | 63 6b 74 61 73 6b 0d 06 |Task=blo|cktask..|
|00001980| 72 38 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |r8      |        |
|00001990| 20 20 f2 75 70 64 61 74 | 65 4b 65 79 73 57 69 6e |  .updat|eKeysWin|
|000019a0| 64 6f 77 28 4e 29 3a f2 | 6f 70 65 6e 28 4b 65 79 |dow(N):.|open(Key|
|000019b0| 73 2c a3 2c a3 29 0d 06 | 7c 3f 20 20 20 20 20 20 |s,.,.)..||?      |
|000019c0| 20 20 20 20 20 20 20 20 | 20 20 4d 65 6e 75 32 21 |        |  Menu2!|
|000019d0| 33 36 3d 28 28 4d 65 6e | 75 32 21 33 36 29 20 80 |36=((Men|u2!36) .|
|000019e0| 20 ac 20 28 31 3c 3c 32 | 32 29 29 20 82 20 28 30 | . (1<<2|2)) . (0|
|000019f0| 3c 3c 32 32 29 0d 06 86 | 2b 20 20 20 20 20 20 20 |<<22)...|+       |
|00001a00| 20 20 20 20 20 20 20 20 | 20 24 74 61 73 6b 6c 65 |        | $taskle|
|00001a10| 61 66 74 65 78 74 3d 54 | 61 73 6b 24 2b bd 31 33 |aftext=T|ask$+.13|
|00001a20| 0d 06 90 13 20 20 20 20 | 20 20 20 20 20 20 20 20 |....    |        |
|00001a30| 20 20 cd 0d 06 9a 1c 20 | 20 c9 20 26 34 30 30 43 |  ..... | . &400C|
|00001a40| 33 20 80 20 53 74 61 72 | 74 75 70 4f 6e 20 3a 0d |3 . Star|tupOn :.|
|00001a50| 06 a4 3a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..:     |        |
|00001a60| 20 e7 20 41 63 74 69 76 | 65 53 74 72 69 70 3c 3e | . Activ|eStrip<>|
|00001a70| 2d 31 20 80 20 41 63 74 | 69 76 65 54 61 73 6b 3d |-1 . Act|iveTask=|
|00001a80| 42 6c 6f 63 6b 21 34 20 | 8c 0d 06 ae 3d 20 20 20 |Block!4 |....=   |
|00001a90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 41 63 74 |        |     Act|
|00001aa0| 69 76 65 53 74 72 69 70 | 3d 2d 31 3a 41 63 74 69 |iveStrip|=-1:Acti|
|00001ab0| 76 65 54 61 73 6b 3d 2d | 31 3a f2 63 6c 6f 73 65 |veTask=-|1:.close|
|00001ac0| 28 4b 65 79 73 29 0d 06 | b8 13 20 20 20 20 20 20 |(Keys)..|..      |
|00001ad0| 20 20 20 20 20 20 20 20 | cd 0d 06 c2 1c 20 20 c9 |        |.....  .|
|00001ae0| 20 26 34 30 30 43 37 20 | 80 20 43 6f 6e 74 65 78 | &400C7 |. Contex|
|00001af0| 74 4f 6e 20 3a 0d 06 cc | 46 20 20 20 20 20 20 20 |tOn :...|F       |
|00001b00| 20 20 20 20 20 20 20 54 | 61 73 6b 24 3d 22 22 3a |       T|ask$="":|
|00001b10| 4e 3d 32 38 3a c8 95 20 | 42 6c 6f 63 6b 3f 4e 3c |N=28:.. |Block?N<|
|00001b20| 3e 30 3a 54 61 73 6b 24 | 2b 3d bd 28 42 6c 6f 63 |>0:Task$|+=.(Bloc|
|00001b30| 6b 3f 4e 29 3a 4e 2b 3d | 31 3a ce 0d 06 d6 3e 20 |k?N):N+=|1:....> |
|00001b40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 4e 3d 2d |        |     N=-|
|00001b50| 31 3a f5 3a 4e 2b 3d 31 | 3a fd 20 54 61 73 6b 6e |1:.:N+=1|:. Taskn|
|00001b60| 61 6d 65 24 28 4e 29 3d | 54 61 73 6b 24 20 84 20 |ame$(N)=|Task$ . |
|00001b70| 4e 3d 66 69 6c 65 73 2d | 31 0d 06 e0 44 20 20 20 |N=files-|1...D   |
|00001b80| 20 20 20 20 20 20 20 20 | 20 20 20 e7 20 28 54 61 |        |   . (Ta|
|00001b90| 73 6b 24 3d 54 61 73 6b | 6e 61 6d 65 24 28 4e 29 |sk$=Task|name$(N)|
|00001ba0| 29 20 80 20 28 63 61 72 | 65 74 74 61 73 6b 3c 3e |) . (car|ettask<>|
|00001bb0| 41 63 74 69 76 65 54 61 | 73 6b 29 20 8c 0d 06 ea |ActiveTa|sk) ....|
|00001bc0| 36 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |6       |        |
|00001bd0| 20 41 63 74 69 76 65 53 | 74 72 69 70 3d 4e 3a 41 | ActiveS|trip=N:A|
|00001be0| 63 74 69 76 65 54 61 73 | 6b 3d 63 61 72 65 74 74 |ctiveTas|k=carett|
|00001bf0| 61 73 6b 0d 06 f4 38 20 | 20 20 20 20 20 20 20 20 |ask...8 |        |
|00001c00| 20 20 20 20 20 20 20 f2 | 75 70 64 61 74 65 4b 65 |       .|updateKe|
|00001c10| 79 73 57 69 6e 64 6f 77 | 28 4e 29 3a f2 6f 70 65 |ysWindow|(N):.ope|
|00001c20| 6e 28 4b 65 79 73 2c a3 | 2c a3 29 0d 06 fe 3f 20 |n(Keys,.|,.)...? |
|00001c30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 4d |        |       M|
|00001c40| 65 6e 75 32 21 33 36 3d | 28 28 4d 65 6e 75 32 21 |enu2!36=|((Menu2!|
|00001c50| 33 36 29 20 80 20 ac 20 | 28 31 3c 3c 32 32 29 29 |36) . . |(1<<22))|
|00001c60| 20 82 20 28 30 3c 3c 32 | 32 29 0d 07 08 2b 20 20 | . (0<<2|2)...+  |
|00001c70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 24 74 |        |      $t|
|00001c80| 61 73 6b 6c 65 61 66 74 | 65 78 74 3d 54 61 73 6b |askleaft|ext=Task|
|00001c90| 24 2b bd 31 33 0d 07 12 | 13 20 20 20 20 20 20 20 |$+.13...|.       |
|00001ca0| 20 20 20 20 20 20 20 cc | 0d 07 1c 55 20 20 20 20 |       .|...U    |
|00001cb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 e7 20 54 61 |        |    . Ta|
|00001cc0| 73 6b 24 3c 3e 54 61 73 | 6b 6e 61 6d 65 24 28 4e |sk$<>Tas|kname$(N|
|00001cd0| 29 20 8c 20 41 63 74 69 | 76 65 53 74 72 69 70 3d |) . Acti|veStrip=|
|00001ce0| 2d 31 3a 41 63 74 69 76 | 65 54 61 73 6b 3d 2d 31 |-1:Activ|eTask=-1|
|00001cf0| 3a f2 63 6c 6f 73 65 28 | 4b 65 79 73 29 0d 07 26 |:.close(|Keys)..&|
|00001d00| 13 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 cd |.       |       .|
|00001d10| 0d 07 30 05 cb 0d 07 3a | 05 e1 0d 07 44 05 3a 0d |..0....:|....D.:.|
|00001d20| 07 4e 14 dd 20 f2 46 69 | 6e 64 43 61 72 65 74 54 |.N.. .Fi|ndCaretT|
|00001d30| 61 73 6b 0d 07 58 45 c8 | 99 20 22 57 69 6d 70 5f |ask..XE.|. "Wimp_|
|00001d40| 47 65 74 43 61 72 65 74 | 50 6f 73 69 74 69 6f 6e |GetCaret|Position|
|00001d50| 22 2c 2c 42 6c 6f 63 6b | 3a 63 61 72 65 74 77 69 |",,Block|:caretwi|
|00001d60| 6e 64 6f 77 3d 42 6c 6f | 63 6b 21 30 3a 63 61 72 |ndow=Blo|ck!0:car|
|00001d70| 65 74 74 61 73 6b 3d 30 | 0d 07 62 16 e7 20 63 61 |ettask=0|..b.. ca|
|00001d80| 72 65 74 77 69 6e 64 6f | 77 3d 2d 31 20 e1 0d 07 |retwindo|w=-1 ...|
|00001d90| 6c 55 42 6c 6f 63 6b 21 | 30 3d 31 36 3a 42 6c 6f |lUBlock!|0=16:Blo|
|00001da0| 63 6b 21 31 32 3d 30 3a | f4 20 46 6f 6c 6c 6f 77 |ck!12=0:|. Follow|
|00001db0| 69 6e 67 20 6d 65 73 73 | 61 67 65 20 69 73 20 6e |ing mess|age is n|
|00001dc0| 65 76 65 72 20 73 65 6e | 74 2c 20 62 75 74 20 72 |ever sen|t, but r|
|00001dd0| 65 74 75 72 6e 73 20 74 | 61 73 6b 20 6e 75 6d 62 |eturns t|ask numb|
|00001de0| 65 72 2e 0d 07 76 4e c8 | 99 20 22 57 69 6d 70 5f |er...vN.|. "Wimp_|
|00001df0| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 2c 31 39 2c |SendMess|age",19,|
|00001e00| 42 6c 6f 63 6b 2c 63 61 | 72 65 74 77 69 6e 64 6f |Block,ca|retwindo|
|00001e10| 77 20 b8 20 2c 2c 63 61 | 72 65 74 74 61 73 6b 3a |w . ,,ca|rettask:|
|00001e20| e7 20 63 61 72 65 74 74 | 61 73 6b 3d 30 20 8c 20 |. carett|ask=0 . |
|00001e30| e1 0d 07 80 2b e7 20 63 | 61 72 65 74 74 61 73 6b |....+. c|arettask|
|00001e40| 3d 54 61 73 6b 20 8c 20 | e1 3a f4 20 46 6f 75 6e |=Task . |.:. Foun|
|00001e50| 64 20 6f 75 72 73 65 6c | 76 65 73 21 0d 07 8a 3c |d oursel|ves!...<|
|00001e60| 42 6c 6f 63 6b 21 30 3d | 32 34 3a 42 6c 6f 63 6b |Block!0=|24:Block|
|00001e70| 21 31 32 3d 30 3a 42 6c | 6f 63 6b 21 31 36 3d 26 |!12=0:Bl|ock!16=&|
|00001e80| 34 30 30 43 36 3a 42 6c | 6f 63 6b 21 32 30 3d 63 |400C6:Bl|ock!20=c|
|00001e90| 61 72 65 74 74 61 73 6b | 0d 07 94 51 c8 99 20 22 |arettask|...Q.. "|
|00001ea0| 57 69 6d 70 5f 53 65 6e | 64 4d 65 73 73 61 67 65 |Wimp_Sen|dMessage|
|00001eb0| 22 2c 31 37 2c 42 6c 6f | 63 6b 2c 30 3a f4 20 54 |",17,Blo|ck,0:. T|
|00001ec0| 68 69 73 20 69 73 20 74 | 6f 20 66 69 6e 64 20 74 |his is t|o find t|
|00001ed0| 68 65 20 63 61 72 65 74 | 20 6f 77 6e 65 72 27 73 |he caret| owner's|
|00001ee0| 20 74 61 73 6b 6e 61 6d | 65 0d 07 9e 05 e1 0d 07 | tasknam|e.......|
|00001ef0| a8 05 3a 0d 07 b2 12 dd | 20 f2 4d 6f 75 73 65 42 |..:.....| .MouseB|
|00001f00| 75 74 74 6f 6e 0d 07 bc | 75 e7 20 42 6c 6f 63 6b |utton...|u. Block|
|00001f10| 21 31 32 3d 49 6e 66 6f | 20 80 20 42 6c 6f 63 6b |!12=Info| . Block|
|00001f20| 21 31 36 3d 39 20 8c 20 | 85 20 39 39 39 39 2c 22 |!16=9 . |. 9999,"|
|00001f30| 4b 65 79 20 57 69 6e 64 | 6f 77 20 73 75 70 70 6f |Key Wind|ow suppo|
|00001f40| 72 74 73 20 69 6e 74 65 | 72 61 63 74 69 76 65 20 |rts inte|ractive |
|00001f50| 68 65 6c 70 20 76 69 61 | 20 41 63 6f 72 6e 27 73 |help via| Acorn's|
|00001f60| 20 48 65 6c 70 20 6f 72 | 20 53 70 79 20 61 70 70 | Help or| Spy app|
|00001f70| 6c 69 63 61 74 69 6f 6e | 73 22 0d 07 c6 26 e7 20 |lication|s"...&. |
|00001f80| 42 6c 6f 63 6b 21 31 32 | 3d 2d 32 20 80 20 42 6c |Block!12|=-2 . Bl|
|00001f90| 6f 63 6b 21 31 36 3d 49 | 63 6f 6e 42 61 72 20 8c |ock!16=I|conBar .|
|00001fa0| 0d 07 d0 1d 20 20 f4 20 | 49 63 6f 6e 20 62 61 72 |....  . |Icon bar|
|00001fb0| 20 69 63 6f 6e 20 63 6c | 69 63 6b 65 64 0d 07 da | icon cl|icked...|
|00001fc0| 12 20 20 c8 8e 20 42 6c | 6f 63 6b 21 38 20 ca 0d |.  .. Bl|ock!8 ..|
|00001fd0| 07 e4 16 20 20 20 20 c9 | 20 32 20 20 20 3a 20 f4 |...    .| 2   : .|
|00001fe0| 20 4d 65 6e 75 0d 07 ee | 1d 20 20 20 20 20 20 4d | Menu...|.      M|
|00001ff0| 25 3d 4d 65 6e 75 31 3a | f2 6d 61 6b 65 5f 6d 65 |%=Menu1:|.make_me|
|00002000| 6e 75 0d 07 f8 20 20 20 | 20 20 c9 20 31 2c 34 20 |nu...   |  . 1,4 |
|00002010| 3a 20 f4 20 41 64 6a 75 | 73 74 2c 20 53 65 6c 65 |: . Adju|st, Sele|
|00002020| 63 74 0d 08 02 33 20 20 | 20 20 20 20 e7 20 42 6c |ct...3  |    . Bl|
|00002030| 6f 63 6b 21 38 3d 31 20 | 8c 20 f2 70 72 65 73 73 |ock!8=1 |. .press|
|00002040| 62 75 74 74 6f 6e 3a f4 | 20 53 69 6c 6c 79 20 74 |button:.| Silly t|
|00002050| 6f 75 63 68 21 0d 08 0c | 1c 20 20 20 20 20 20 e7 |ouch!...|.      .|
|00002060| 20 41 63 74 69 76 65 53 | 74 72 69 70 3d 2d 31 20 | ActiveS|trip=-1 |
|00002070| 8c 0d 08 16 46 20 20 20 | 20 20 20 20 20 e7 20 63 |....F   |     . c|
|00002080| 61 72 65 74 74 61 73 6b | 3d 30 20 8c 20 f2 75 70 |arettask|=0 . .up|
|00002090| 64 61 74 65 4b 65 79 73 | 57 69 6e 64 6f 77 28 30 |dateKeys|Window(0|
|000020a0| 29 3a f2 6f 70 65 6e 28 | 4b 65 79 73 2c a3 2c a3 |):.open(|Keys,.,.|
|000020b0| 29 3a 8b 20 ef 20 37 0d | 08 20 0b 20 20 20 20 20 |):. . 7.|. .     |
|000020c0| 20 cc 0d 08 2a 1b 20 20 | 20 20 20 20 20 20 f2 6f | ...*.  |      .o|
|000020d0| 70 65 6e 28 4b 65 79 73 | 2c a3 2c a3 29 0d 08 34 |pen(Keys|,.,.)..4|
|000020e0| 0b 20 20 20 20 20 20 cd | 0d 08 3e 07 20 20 cb 0d |.      .|..>.  ..|
|000020f0| 08 48 05 cd 0d 08 52 15 | e7 20 42 6c 6f 63 6b 21 |.H....R.|. Block!|
|00002100| 31 32 3d 4b 65 79 73 20 | 8c 0d 08 5c 12 20 20 c8 |12=Keys |...\.  .|
|00002110| 8e 20 42 6c 6f 63 6b 21 | 38 20 ca 0d 08 66 24 20 |. Block!|8 ...f$ |
|00002120| 20 20 20 c9 20 32 20 20 | 20 20 3a 20 4d 25 3d 4d |   . 2  |  : M%=M|
|00002130| 65 6e 75 33 3a f2 6d 61 | 6b 65 5f 6d 65 6e 75 0d |enu3:.ma|ke_menu.|
|00002140| 08 70 2b 20 20 20 20 7f | 20 3a 20 e7 20 42 6c 6f |.p+    .| : . Blo|
|00002150| 63 6b 21 31 36 3e 3d 31 | 36 20 80 20 42 6c 6f 63 |ck!16>=1|6 . Bloc|
|00002160| 6b 21 31 36 3c 3d 36 33 | 20 8c 0d 08 7a 26 20 20 |k!16<=63| ...z&  |
|00002170| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002180| 20 e7 20 42 6c 6f 63 6b | 21 31 36 3d 36 33 20 8c | . Block|!16=63 .|
|00002190| 0d 08 84 50 20 20 20 20 | 20 20 20 20 20 20 20 20 |...P    |        |
|000021a0| 20 20 20 20 20 20 20 20 | 20 e7 20 42 6c 6f 63 6b |        | . Block|
|000021b0| 21 38 3d 35 20 8c 20 c8 | 99 20 22 57 69 6d 70 5f |!8=5 . .|. "Wimp_|
|000021c0| 50 72 6f 63 65 73 73 4b | 65 79 22 2c 4b 65 79 63 |ProcessK|ey",Keyc|
|000021d0| 6f 64 65 28 42 6c 6f 63 | 6b 21 31 36 2d 31 36 29 |ode(Bloc|k!16-16)|
|000021e0| 0d 08 8e 18 20 20 20 20 | 20 20 20 20 20 20 20 20 |....    |        |
|000021f0| 20 20 20 20 20 20 20 cc | 0d 08 98 42 20 20 20 20 |       .|...B    |
|00002200| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002210| 20 c8 99 20 22 57 69 6d | 70 5f 50 72 6f 63 65 73 | .. "Wim|p_Proces|
|00002220| 73 4b 65 79 22 2c 4b 65 | 79 63 6f 64 65 28 42 6c |sKey",Ke|ycode(Bl|
|00002230| 6f 63 6b 21 31 36 2d 31 | 36 29 0d 08 a2 18 20 20 |ock!16-1|6)....  |
|00002240| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002250| 20 cd 0d 08 ac 16 20 20 | 20 20 20 20 20 20 20 20 | .....  |        |
|00002260| 20 20 20 20 20 20 20 cd | 0d 08 b6 07 20 20 cb 0d |       .|....  ..|
|00002270| 08 c0 05 cd 0d 08 ca 05 | e1 0d 08 d4 05 3a 0d 08 |........|.....:..|
|00002280| de 0e dd 20 f2 48 6f 74 | 4b 65 79 73 0d 08 e8 25 |... .Hot|Keys...%|
|00002290| e7 20 42 6c 6f 63 6b 21 | 32 34 3d 26 31 42 41 20 |. Block!|24=&1BA |
|000022a0| 84 20 42 6c 6f 63 6b 21 | 32 34 3d 26 31 46 44 20 |. Block!|24=&1FD |
|000022b0| 8c 0d 08 f2 32 20 20 42 | 6c 6f 63 6b 21 30 3d 4b |....2  B|lock!0=K|
|000022c0| 65 79 73 3a c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |eys:.. "|Wimp_Get|
|000022d0| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 2c 42 6c |WindowSt|ate",,Bl|
|000022e0| 6f 63 6b 0d 08 fc 37 20 | 20 e7 20 42 6c 6f 63 6b |ock...7 | . Block|
|000022f0| 21 32 38 3d 2d 31 20 8c | 20 f2 6f 70 65 6e 28 4b |!28=-1 .| .open(K|
|00002300| 65 79 73 2c a3 2c a3 29 | 3a 8b 20 f2 6f 70 65 6e |eys,.,.)|:. .open|
|00002310| 28 4b 65 79 73 2c b9 2c | a3 29 0d 09 06 05 cc 0d |(Keys,.,|.)......|
|00002320| 09 10 23 20 20 c8 99 20 | 22 57 69 6d 70 5f 50 72 |..#  .. |"Wimp_Pr|
|00002330| 6f 63 65 73 73 4b 65 79 | 22 2c 42 6c 6f 63 6b 21 |ocessKey|",Block!|
|00002340| 32 34 0d 09 1a 05 cd 0d | 09 24 05 e1 0d 09 2e 05 |24......|.$......|
|00002350| 3a 0d 09 38 10 dd 20 f2 | 6d 61 6b 65 5f 6d 65 6e |:..8.. .|make_men|
|00002360| 75 0d 09 42 10 e7 20 4d | 25 3d 4d 65 6e 75 33 20 |u..B.. M|%=Menu3 |
|00002370| 8c 0d 09 4c 31 20 20 4b | 65 79 73 57 21 30 3d 4b |...L1  K|eysW!0=K|
|00002380| 65 79 73 3a c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |eys:.. "|Wimp_Get|
|00002390| 57 69 6e 64 6f 77 49 6e | 66 6f 22 2c 2c 4b 65 79 |WindowIn|fo",,Key|
|000023a0| 73 57 0d 09 56 24 20 20 | 24 74 69 74 6c 65 6c 65 |sW..V$  |$titlele|
|000023b0| 61 66 74 65 78 74 3d 24 | 28 4b 65 79 73 57 21 37 |aftext=$|(KeysW!7|
|000023c0| 36 29 2b bd 31 33 0d 09 | 60 38 20 20 e7 20 24 74 |6)+.13..|`8  . $t|
|000023d0| 69 74 6c 65 6c 65 61 66 | 74 65 78 74 3d 22 3c 55 |itleleaf|text="<U|
|000023e0| 6e 74 69 74 6c 65 64 3e | 22 20 8c 20 24 74 69 74 |ntitled>|" . $tit|
|000023f0| 6c 65 6c 65 61 66 74 65 | 78 74 3d bd 31 33 0d 09 |leleafte|xt=.13..|
|00002400| 6a 21 20 20 24 74 61 73 | 6b 6c 65 61 66 74 65 78 |j!  $tas|kleaftex|
|00002410| 74 3d 54 68 69 73 54 61 | 73 6b 24 2b bd 31 33 0d |t=ThisTa|sk$+.13.|
|00002420| 09 74 41 20 20 c8 99 20 | 22 57 69 6d 70 5f 47 65 |.tA  .. |"Wimp_Ge|
|00002430| 74 50 6f 69 6e 74 65 72 | 49 6e 66 6f 22 2c 2c 49 |tPointer|Info",,I|
|00002440| 63 6f 6e 42 6c 6f 63 6b | 3a 4d 65 6e 75 4f 6e 49 |conBlock|:MenuOnI|
|00002450| 63 6f 6e 3d 49 63 6f 6e | 42 6c 6f 63 6b 21 31 36 |con=Icon|Block!16|
|00002460| 0d 09 7e 29 20 20 e7 20 | 4d 65 6e 75 4f 6e 49 63 |..~)  . |MenuOnIc|
|00002470| 6f 6e 3e 3d 31 36 20 80 | 20 4d 65 6e 75 4f 6e 49 |on>=16 .| MenuOnI|
|00002480| 63 6f 6e 3c 3d 36 33 20 | 8c 0d 09 88 51 20 20 20 |con<=63 |....Q   |
|00002490| 20 49 63 6f 6e 42 6c 6f | 63 6b 21 30 3d 4b 65 79 | IconBlo|ck!0=Key|
|000024a0| 73 3a 49 63 6f 6e 42 6c | 6f 63 6b 21 34 3d 4d 65 |s:IconBl|ock!4=Me|
|000024b0| 6e 75 4f 6e 49 63 6f 6e | 3a c8 99 20 22 57 69 6d |nuOnIcon|:.. "Wim|
|000024c0| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|000024d0| 2c 49 63 6f 6e 42 6c 6f | 63 6b 0d 09 92 29 20 20 |,IconBlo|ck...)  |
|000024e0| 20 20 24 69 74 65 6d 6c | 65 61 66 74 65 78 74 3d |  $iteml|eaftext=|
|000024f0| 24 28 49 63 6f 6e 42 6c | 6f 63 6b 21 32 38 29 2b |$(IconBl|ock!28)+|
|00002500| bd 31 33 0d 09 9c 33 20 | 20 20 20 4d 65 6e 75 33 |.13...3 |   Menu3|
|00002510| 21 33 36 3d 28 28 4d 65 | 6e 75 33 21 33 36 29 20 |!36=((Me|nu3!36) |
|00002520| 80 20 ac 20 28 31 3c 3c | 32 32 29 29 20 82 20 28 |. . (1<<|22)) . (|
|00002530| 30 3c 3c 32 32 29 0d 09 | a6 07 20 20 cc 0d 09 b0 |0<<22)..|..  ....|
|00002540| 33 20 20 20 20 4d 65 6e | 75 33 21 33 36 3d 28 28 |3    Men|u3!36=((|
|00002550| 4d 65 6e 75 33 21 33 36 | 29 20 80 20 ac 20 28 31 |Menu3!36|) . . (1|
|00002560| 3c 3c 32 32 29 29 20 82 | 20 28 31 3c 3c 32 32 29 |<<22)) .| (1<<22)|
|00002570| 0d 09 ba 07 20 20 cd 0d | 09 c4 05 cd 0d 09 ce 16 |....  ..|........|
|00002580| 42 6c 6f 63 6b 21 30 3d | 42 6c 6f 63 6b 21 30 2d |Block!0=|Block!0-|
|00002590| 34 38 0d 09 d8 1b e7 20 | 42 6c 6f 63 6b 21 30 3c |48..... |Block!0<|
|000025a0| 30 20 8c 20 42 6c 6f 63 | 6b 21 30 3d 30 0d 09 e2 |0 . Bloc|k!0=0...|
|000025b0| 2a e7 20 4d 25 3d 4d 65 | 6e 75 31 20 80 20 42 6c |*. M%=Me|nu1 . Bl|
|000025c0| 6f 63 6b 21 34 3c 33 31 | 36 20 8c 20 42 6c 6f 63 |ock!4<31|6 . Bloc|
|000025d0| 6b 21 34 3d 33 31 36 0d | 09 ec 31 c8 99 20 22 57 |k!4=316.|..1.. "W|
|000025e0| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|000025f0| 2c 4d 25 2c 42 6c 6f 63 | 6b 21 30 2d 34 38 2c 42 |,M%,Bloc|k!0-48,B|
|00002600| 6c 6f 63 6b 21 34 2b 34 | 0d 09 f6 05 e1 0d 0a 00 |lock!4+4|........|
|00002610| 05 3a 0d 0a 0a 11 dd 20 | f2 44 65 63 6f 64 65 4d |.:..... |.DecodeM|
|00002620| 65 6e 75 0d 0a 14 0b c8 | 8e 20 4d 25 20 ca 0d 0a |enu.....|. M% ...|
|00002630| 1e 0e 20 20 c9 20 4d 65 | 6e 75 31 3a 0d 0a 28 14 |..  . Me|nu1:..(.|
|00002640| 20 20 20 20 c8 8e 20 42 | 6c 6f 63 6b 21 30 20 ca |    .. B|lock!0 .|
|00002650| 0d 0a 32 0d 20 20 20 20 | 20 20 c9 20 30 0d 0a 3c |..2.    |  . 0..<|
|00002660| 5c 20 20 20 20 20 20 20 | 20 c8 99 20 22 57 69 6d |\       | .. "Wim|
|00002670| 70 5f 47 65 74 50 6f 69 | 6e 74 65 72 49 6e 66 6f |p_GetPoi|nterInfo|
|00002680| 22 2c 2c 42 6c 6f 63 6b | 3a c8 99 20 22 57 69 6d |",,Block|:.. "Wim|
|00002690| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 49 |p_Create|Menu",,I|
|000026a0| 6e 66 6f 2c 42 6c 6f 63 | 6b 21 30 2d 32 34 2c 42 |nfo,Bloc|k!0-24,B|
|000026b0| 6c 6f 63 6b 21 34 2b 32 | 34 0d 0a 46 0d 20 20 20 |lock!4+2|4..F.   |
|000026c0| 20 20 20 c9 20 31 0d 0a | 50 45 20 20 20 20 20 20 |   . 1..|PE      |
|000026d0| 20 20 e7 20 42 6c 6f 63 | 6b 21 34 3e 3d 30 20 8c |  . Bloc|k!4>=0 .|
|000026e0| 20 f2 75 70 64 61 74 65 | 4b 65 79 73 57 69 6e 64 | .update|KeysWind|
|000026f0| 6f 77 28 42 6c 6f 63 6b | 21 34 29 3a f2 6f 70 65 |ow(Block|!4):.ope|
|00002700| 6e 28 4b 65 79 73 2c a3 | 2c a3 29 0d 0a 5a 58 20 |n(Keys,.|,.)..ZX |
|00002710| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002720| 20 20 20 20 20 20 20 20 | 20 20 4d 65 6e 75 32 21 |        |  Menu2!|
|00002730| 33 36 3d 28 28 4d 65 6e | 75 32 21 33 36 29 20 80 |36=((Men|u2!36) .|
|00002740| 20 ac 20 28 31 3c 3c 32 | 32 29 29 20 82 20 28 30 | . (1<<2|2)) . (0|
|00002750| 3c 3c 32 32 29 3a 41 63 | 74 69 76 65 54 61 73 6b |<<22):Ac|tiveTask|
|00002760| 3d 2d 31 0d 0a 64 4b 20 | 20 20 20 20 20 20 20 20 |=-1..dK |        |
|00002770| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002780| 20 20 e7 20 43 6f 6e 74 | 65 78 74 4f 6e 20 8c 20 |  . Cont|extOn . |
|00002790| c8 99 20 22 57 69 6d 70 | 5f 53 65 74 43 61 72 65 |.. "Wimp|_SetCare|
|000027a0| 74 50 6f 73 69 74 69 6f | 6e 22 2c 2c 2d 31 0d 0a |tPositio|n",,-1..|
|000027b0| 6e 0d 20 20 20 20 20 20 | c9 20 32 0d 0a 78 18 20 |n.      |. 2..x. |
|000027c0| 20 20 20 20 20 20 20 c8 | 8e 20 42 6c 6f 63 6b 21 |       .|. Block!|
|000027d0| 34 20 ca 0d 0a 82 12 20 | 20 20 20 20 20 20 20 20 |4 ..... |        |
|000027e0| 20 c9 20 30 3a 0d 0a 8c | 25 20 20 20 20 20 20 20 | . 0:...|%       |
|000027f0| 20 20 20 20 20 4f 70 65 | 6e 41 74 54 6f 70 3d ac |     Ope|nAtTop=.|
|00002800| 20 4f 70 65 6e 41 74 54 | 6f 70 0d 0a 96 3c 20 20 | OpenAtT|op...<  |
|00002810| 20 20 20 20 20 20 20 20 | 20 20 4f 70 74 4d 65 6e |        |  OptMen|
|00002820| 75 21 32 38 3d 28 28 4f | 70 74 4d 65 6e 75 21 32 |u!28=((O|ptMenu!2|
|00002830| 38 29 20 80 20 ac 20 31 | 29 20 82 20 2d 4f 70 65 |8) . . 1|) . -Ope|
|00002840| 6e 41 74 54 6f 70 0d 0a | a0 12 20 20 20 20 20 20 |nAtTop..|..      |
|00002850| 20 20 20 20 c9 20 31 3a | 0d 0a aa 27 20 20 20 20 |    . 1:|...'    |
|00002860| 20 20 20 20 20 20 20 20 | 41 75 74 6f 53 63 72 6f |        |AutoScro|
|00002870| 6c 6c 3d ac 20 41 75 74 | 6f 53 63 72 6f 6c 6c 0d |ll=. Aut|oScroll.|
|00002880| 0a b4 47 20 20 20 20 20 | 20 20 20 20 20 20 20 4f |..G     |       O|
|00002890| 70 74 4d 65 6e 75 21 28 | 32 38 2b 32 34 29 3d 28 |ptMenu!(|28+24)=(|
|000028a0| 28 4f 70 74 4d 65 6e 75 | 21 28 32 38 2b 32 34 29 |(OptMenu|!(28+24)|
|000028b0| 29 20 80 20 ac 20 31 29 | 20 82 20 2d 41 75 74 6f |) . . 1)| . -Auto|
|000028c0| 53 63 72 6f 6c 6c 0d 0a | be 80 20 20 20 20 20 20 |Scroll..|..      |
|000028d0| 20 20 20 20 20 20 e7 20 | 41 75 74 6f 53 63 72 6f |      . |AutoScro|
|000028e0| 6c 6c 3d a3 20 80 20 53 | 63 72 6f 6c 6c 42 61 72 |ll=. . S|crollBar|
|000028f0| 3d a3 20 8c 20 53 63 72 | 6f 6c 6c 42 61 72 3d b9 |=. . Scr|ollBar=.|
|00002900| 3a 4f 70 74 4d 65 6e 75 | 21 28 32 38 2b 34 38 29 |:OptMenu|!(28+48)|
|00002910| 3d 28 28 4f 70 74 4d 65 | 6e 75 21 28 32 38 2b 34 |=((OptMe|nu!(28+4|
|00002920| 38 29 29 20 80 20 ac 20 | 31 29 20 82 20 2d 53 63 |8)) . . |1) . -Sc|
|00002930| 72 6f 6c 6c 42 61 72 3a | f2 64 6f 53 63 72 6f 6c |rollBar:|.doScrol|
|00002940| 6c 4f 6e 4f 66 66 0d 0a | c8 12 20 20 20 20 20 20 |lOnOff..|..      |
|00002950| 20 20 20 20 c9 20 32 3a | 0d 0a d2 25 20 20 20 20 |    . 2:|...%    |
|00002960| 20 20 20 20 20 20 20 20 | 53 63 72 6f 6c 6c 42 61 |        |ScrollBa|
|00002970| 72 3d ac 20 53 63 72 6f | 6c 6c 42 61 72 0d 0a dc |r=. Scro|llBar...|
|00002980| 46 20 20 20 20 20 20 20 | 20 20 20 20 20 4f 70 74 |F       |     Opt|
|00002990| 4d 65 6e 75 21 28 32 38 | 2b 34 38 29 3d 28 28 4f |Menu!(28|+48)=((O|
|000029a0| 70 74 4d 65 6e 75 21 28 | 32 38 2b 34 38 29 29 20 |ptMenu!(|28+48)) |
|000029b0| 80 20 ac 20 31 29 20 82 | 20 2d 53 63 72 6f 6c 6c |. . 1) .| -Scroll|
|000029c0| 42 61 72 0d 0a e6 1e 20 | 20 20 20 20 20 20 20 20 |Bar.... |        |
|000029d0| 20 20 20 f2 64 6f 53 63 | 72 6f 6c 6c 4f 6e 4f 66 |   .doSc|rollOnOf|
|000029e0| 66 0d 0a f0 73 20 20 20 | 20 20 20 20 20 20 20 20 |f...s   |        |
|000029f0| 20 e7 20 41 75 74 6f 53 | 63 72 6f 6c 6c 3d a3 20 | . AutoS|croll=. |
|00002a00| 80 20 53 63 72 6f 6c 6c | 42 61 72 3d a3 20 8c 20 |. Scroll|Bar=. . |
|00002a10| 41 75 74 6f 53 63 72 6f | 6c 6c 3d b9 3a 4f 70 74 |AutoScro|ll=.:Opt|
|00002a20| 4d 65 6e 75 21 28 32 38 | 2b 32 34 29 3d 28 28 4f |Menu!(28|+24)=((O|
|00002a30| 70 74 4d 65 6e 75 21 28 | 32 38 2b 32 34 29 29 20 |ptMenu!(|28+24)) |
|00002a40| 80 20 ac 20 31 29 20 82 | 20 2d 41 75 74 6f 53 63 |. . 1) .| -AutoSc|
|00002a50| 72 6f 6c 6c 0d 0a fa 12 | 20 20 20 20 20 20 20 20 |roll....|        |
|00002a60| 20 20 c9 20 33 3a 0d 0b | 04 23 20 20 20 20 20 20 |  . 3:..|.#      |
|00002a70| 20 20 20 20 20 20 43 6f | 6d 70 72 65 73 73 3d ac |      Co|mpress=.|
|00002a80| 20 43 6f 6d 70 72 65 73 | 73 0d 0b 0e 45 20 20 20 | Compres|s...E   |
|00002a90| 20 20 20 20 20 20 20 20 | 20 4f 70 74 4d 65 6e 75 |        | OptMenu|
|00002aa0| 21 28 32 38 2b 37 32 29 | 3d 28 28 4f 70 74 4d 65 |!(28+72)|=((OptMe|
|00002ab0| 6e 75 21 28 32 38 2b 37 | 32 29 29 20 80 20 ac 20 |nu!(28+7|2)) . . |
|00002ac0| 31 29 20 82 20 2d 43 6f | 6d 70 72 65 73 73 0d 0b |1) . -Co|mpress..|
|00002ad0| 18 25 20 20 20 20 20 20 | 20 20 20 20 20 20 f2 75 |.%      |      .u|
|00002ae0| 70 64 61 74 65 4b 65 79 | 73 57 69 6e 64 6f 77 28 |pdateKey|sWindow(|
|00002af0| 2d 31 29 0d 0b 22 1b 20 | 20 20 20 20 20 20 20 20 |-1)..". |        |
|00002b00| 20 20 20 f2 44 6f 43 6f | 6d 70 72 65 73 73 0d 0b |   .DoCo|mpress..|
|00002b10| 2c 2c 20 20 20 20 20 20 | 20 20 20 20 20 20 e7 20 |,,      |      . |
|00002b20| 4b 65 79 73 4f 70 65 6e | 20 8c 20 f2 6f 70 65 6e |KeysOpen| . .open|
|00002b30| 28 4b 65 79 73 2c a3 2c | a3 29 0d 0b 36 12 20 20 |(Keys,.,|.)..6.  |
|00002b40| 20 20 20 20 20 20 20 20 | c9 20 34 3a 0d 0b 40 25 |        |. 4:..@%|
|00002b50| 20 20 20 20 20 20 20 20 | 20 20 20 20 43 6f 6e 74 |        |    Cont|
|00002b60| 65 78 74 4f 6e 3d ac 20 | 43 6f 6e 74 65 78 74 4f |extOn=. |ContextO|
|00002b70| 6e 0d 0b 4a 46 20 20 20 | 20 20 20 20 20 20 20 20 |n..JF   |        |
|00002b80| 20 4f 70 74 4d 65 6e 75 | 21 28 32 38 2b 39 36 29 | OptMenu|!(28+96)|
|00002b90| 3d 28 28 4f 70 74 4d 65 | 6e 75 21 28 32 38 2b 39 |=((OptMe|nu!(28+9|
|00002ba0| 36 29 29 20 80 20 ac 20 | 31 29 20 82 20 2d 43 6f |6)) . . |1) . -Co|
|00002bb0| 6e 74 65 78 74 4f 6e 0d | 0b 54 12 20 20 20 20 20 |ntextOn.|.T.     |
|00002bc0| 20 20 20 20 20 c9 20 35 | 3a 0d 0b 5e 25 20 20 20 |     . 5|:..^%   |
|00002bd0| 20 20 20 20 20 20 20 20 | 20 53 74 61 72 74 75 70 |        | Startup|
|00002be0| 4f 6e 3d ac 20 53 74 61 | 72 74 75 70 4f 6e 0d 0b |On=. Sta|rtupOn..|
|00002bf0| 68 48 20 20 20 20 20 20 | 20 20 20 20 20 20 4f 70 |hH      |      Op|
|00002c00| 74 4d 65 6e 75 21 28 32 | 38 2b 31 32 30 29 3d 28 |tMenu!(2|8+120)=(|
|00002c10| 28 4f 70 74 4d 65 6e 75 | 21 28 32 38 2b 31 32 30 |(OptMenu|!(28+120|
|00002c20| 29 29 20 80 20 ac 20 31 | 29 20 82 20 2d 53 74 61 |)) . . 1|) . -Sta|
|00002c30| 72 74 75 70 4f 6e 0d 0b | 72 0d 20 20 20 20 20 20 |rtupOn..|r.      |
|00002c40| 20 20 cb 0d 0b 7c 0d 20 | 20 20 20 20 20 c9 20 33 |  ...|. |     . 3|
|00002c50| 0d 0b 86 12 20 20 20 20 | 20 20 20 20 44 6f 6e 65 |....    |    Done|
|00002c60| 3d b9 0d 0b 90 09 20 20 | 20 20 cb 0d 0b 9a 0e 20 |=.....  |  ..... |
|00002c70| 20 c9 20 4d 65 6e 75 33 | 3a 0d 0b a4 14 20 20 20 | . Menu3|:....   |
|00002c80| 20 c8 8e 20 42 6c 6f 63 | 6b 21 30 20 ca 0d 0b ae | .. Bloc|k!0 ....|
|00002c90| 58 20 20 20 20 20 20 c9 | 20 30 20 80 20 42 6c 6f |X      .| 0 . Blo|
|00002ca0| 63 6b 21 34 3d 30 20 3a | 42 6c 6f 63 6b 21 30 3d |ck!4=0 :|Block!0=|
|00002cb0| 4b 65 79 73 3a 42 6c 6f | 63 6b 21 34 3d 4d 65 6e |Keys:Blo|ck!4=Men|
|00002cc0| 75 4f 6e 49 63 6f 6e 3a | c8 99 20 22 57 69 6d 70 |uOnIcon:|.. "Wimp|
|00002cd0| 5f 47 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_GetIcon|State",,|
|00002ce0| 42 6c 6f 63 6b 0d 0b b8 | 34 20 20 20 20 20 20 20 |Block...|4       |
|00002cf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002d00| 20 20 20 20 20 42 6c 6f | 63 6b 21 38 3d 30 3a 42 |     Blo|ck!8=0:B|
|00002d10| 6c 6f 63 6b 21 31 32 3d | 30 0d 0b c2 37 20 20 20 |lock!12=|0...7   |
|00002d20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002d30| 20 20 20 20 20 20 20 20 | 20 e7 20 a9 28 24 69 74 |        | . .($it|
|00002d40| 65 6d 6c 65 61 66 74 65 | 78 74 29 3c 31 36 20 8c |emleafte|xt)<16 .|
|00002d50| 0d 0b cc 3f 20 20 20 20 | 20 20 20 20 20 20 20 20 |...?    |        |
|00002d60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002d70| 20 20 24 28 42 6c 6f 63 | 6b 21 32 38 29 3d 24 69 |  $(Bloc|k!28)=$i|
|00002d80| 74 65 6d 6c 65 61 66 74 | 65 78 74 2b bd 31 33 0d |temleaft|ext+.13.|
|00002d90| 0b d6 21 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..!     |        |
|00002da0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 cc |        |       .|
|00002db0| 0d 0b e0 3b 20 20 20 20 | 20 20 20 20 20 20 20 20 |...;    |        |
|00002dc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002dd0| 20 20 24 28 42 6c 6f 63 | 6b 21 32 38 29 3d 24 69 |  $(Bloc|k!28)=$i|
|00002de0| 74 65 6d 6c 65 61 66 74 | 65 78 74 0d 0b ea 21 20 |temleaft|ext...! |
|00002df0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002e00| 20 20 20 20 20 20 20 20 | 20 20 20 cd 0d 0b f4 54 |        |   ....T|
|00002e10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002e20| 20 20 20 20 20 20 20 20 | 20 20 20 20 c8 99 20 22 |        |    .. "|
|00002e30| 57 69 6d 70 5f 53 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Set|IconStat|
|00002e40| 65 22 2c 2c 42 6c 6f 63 | 6b 3a f2 44 6f 4a 75 73 |e",,Bloc|k:.DoJus|
|00002e50| 74 69 66 79 28 4d 65 6e | 75 4f 6e 49 63 6f 6e 29 |tify(Men|uOnIcon)|
|00002e60| 0d 0b fe 40 20 20 20 20 | 20 20 c9 20 31 20 80 20 |...@    |  . 1 . |
|00002e70| 42 6c 6f 63 6b 21 34 3d | 30 20 3a f2 75 70 64 61 |Block!4=|0 :.upda|
|00002e80| 74 65 4b 65 79 73 57 69 | 6e 64 6f 77 28 2d 33 29 |teKeysWi|ndow(-3)|
|00002e90| 3a f2 6f 70 65 6e 28 4b | 65 79 73 2c b9 2c a3 29 |:.open(K|eys,.,.)|
|00002ea0| 0d 0c 08 45 20 20 20 20 | 20 20 c9 20 32 20 80 20 |...E    |  . 2 . |
|00002eb0| 42 6c 6f 63 6b 21 34 3e | 3d 30 3a f2 75 70 64 61 |Block!4>|=0:.upda|
|00002ec0| 74 65 4b 65 79 73 57 69 | 6e 64 6f 77 28 42 6c 6f |teKeysWi|ndow(Blo|
|00002ed0| 63 6b 21 34 29 3a f2 6f | 70 65 6e 28 4b 65 79 73 |ck!4):.o|pen(Keys|
|00002ee0| 2c b9 2c a3 29 0d 0c 12 | 59 20 20 20 20 20 20 20 |,.,.)...|Y       |
|00002ef0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002f00| 20 20 20 20 20 4d 65 6e | 75 32 21 33 36 3d 28 28 |     Men|u2!36=((|
|00002f10| 4d 65 6e 75 32 21 33 36 | 29 20 80 20 ac 20 28 31 |Menu2!36|) . . (1|
|00002f20| 3c 3c 32 32 29 29 20 82 | 20 28 30 3c 3c 32 32 29 |<<22)) .| (0<<22)|
|00002f30| 3a 41 63 74 69 76 65 54 | 61 73 6b 3d 2d 31 0d 0c |:ActiveT|ask=-1..|
|00002f40| 1c 4c 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.L      |        |
|00002f50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 e7 20 |        |      . |
|00002f60| 43 6f 6e 74 65 78 74 4f | 6e 20 8c 20 c8 99 20 22 |ContextO|n . .. "|
|00002f70| 57 69 6d 70 5f 53 65 74 | 43 61 72 65 74 50 6f 73 |Wimp_Set|CaretPos|
|00002f80| 69 74 69 6f 6e 22 2c 2c | 2d 31 0d 0c 26 42 20 20 |ition",,|-1..&B  |
|00002f90| 20 20 20 20 c9 20 33 20 | 20 20 20 20 20 20 20 20 |    . 3 |        |
|00002fa0| 20 20 20 20 20 20 3a f2 | 75 70 64 61 74 65 4b 65 |      :.|updateKe|
|00002fb0| 79 73 57 69 6e 64 6f 77 | 28 2d 32 29 3a f2 6f 70 |ysWindow|(-2):.op|
|00002fc0| 65 6e 28 4b 65 79 73 2c | b9 2c a3 29 0d 0c 30 4b |en(Keys,|.,.)..0K|
|00002fd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002fe0| 20 20 20 20 20 20 20 20 | 20 20 20 20 4d 65 6e 75 |        |    Menu|
|00002ff0| 32 21 33 36 3d 28 28 4d | 65 6e 75 32 21 33 36 29 |2!36=((M|enu2!36)|
|00003000| 20 80 20 ac 20 28 31 3c | 3c 32 32 29 29 20 82 20 | . . (1<|<22)) . |
|00003010| 28 31 3c 3c 32 32 29 0d | 0c 3a 34 20 20 20 20 20 |(1<<22).|.:4     |
|00003020| 20 c9 20 34 20 20 20 20 | 20 20 20 20 20 20 20 20 | . 4    |        |
|00003030| 20 20 20 3a 54 68 69 73 | 54 61 73 6b 24 3d 24 74 |   :This|Task$=$t|
|00003040| 61 73 6b 6c 65 61 66 74 | 65 78 74 0d 0c 44 46 20 |askleaft|ext..DF |
|00003050| 20 20 20 20 20 c9 20 35 | 20 80 20 42 6c 6f 63 6b |     . 5| . Block|
|00003060| 21 34 3e 3d 30 3a f2 53 | 61 76 65 28 42 6c 6f 63 |!4>=0:.S|ave(Bloc|
|00003070| 6b 21 34 29 3a 41 63 74 | 69 76 65 54 61 73 6b 3d |k!4):Act|iveTask=|
|00003080| 2d 31 3a f2 46 69 6e 64 | 43 61 72 65 74 54 61 73 |-1:.Find|CaretTas|
|00003090| 6b 0d 0c 4e 09 20 20 20 | 20 cb 0d 0c 58 05 cb 0d |k..N.   | ...X...|
|000030a0| 0c 62 23 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 50 |.b#.. "W|imp_GetP|
|000030b0| 6f 69 6e 74 65 72 49 6e | 66 6f 22 2c 2c 42 6c 6f |ointerIn|fo",,Blo|
|000030c0| 63 6b 0d 0c 6c 22 e7 20 | 28 42 6c 6f 63 6b 21 38 |ck..l". |(Block!8|
|000030d0| 20 80 20 31 29 3d 31 20 | 8c 20 f2 6d 61 6b 65 5f | . 1)=1 |. .make_|
|000030e0| 6d 65 6e 75 0d 0c 76 05 | e1 0d 0c 80 05 3a 0d 0c |menu..v.|.....:..|
|000030f0| 8a 18 dd 20 f2 4d 65 6e | 75 5f 69 6e 69 74 28 54 |... .Men|u_init(T|
|00003100| 69 74 6c 65 24 29 0d 0c | 94 1d f4 20 49 6e 69 74 |itle$)..|... Init|
|00003110| 69 61 6c 69 73 65 20 6d | 65 6e 75 20 6f 70 74 69 |ialise m|enu opti|
|00003120| 6f 6e 73 0d 0c 9e 22 f4 | 20 54 69 74 6c 65 20 3d |ons...".| Title =|
|00003130| 20 54 69 74 6c 65 20 61 | 74 20 74 6f 70 20 6f 66 | Title a|t top of|
|00003140| 20 6d 65 6e 75 0d 0c a8 | 1d 4c 25 3d a9 54 69 74 | menu...|.L%=.Tit|
|00003150| 6c 65 24 2b 31 2b 28 a9 | 54 69 74 6c 65 24 3d 31 |le$+1+(.|Title$=1|
|00003160| 32 29 0d 0c b2 0e 24 4d | 25 3d 54 69 74 6c 65 24 |2)....$M|%=Title$|
|00003170| 0d 0c bc 0b 4d 25 3f 31 | 32 3d 37 0d 0c c6 0b 4d |....M%?1|2=7....M|
|00003180| 25 3f 31 33 3d 32 0d 0c | d0 0c 4d 25 3f 31 34 3d |%?13=2..|..M%?14=|
|00003190| 31 31 0d 0c da 0b 4d 25 | 3f 31 35 3d 30 0d 0c e4 |11....M%|?15=0...|
|000031a0| 13 4d 25 21 31 36 3d 28 | 4c 25 2b 31 29 2a 31 36 |.M%!16=(|L%+1)*16|
|000031b0| 0d 0c ee 0c 4d 25 21 32 | 30 3d 34 34 0d 0c f8 0b |....M%!2|0=44....|
|000031c0| 4d 25 21 32 34 3d 30 0d | 0d 02 0c 50 25 3d 4d 25 |M%!24=0.|...P%=M%|
|000031d0| 2b 32 38 0d 0d 0c 05 e1 | 0d 0d 16 05 3a 0d 0d 20 |+28.....|....:.. |
|000031e0| 24 dd 20 f2 4d 65 6e 75 | 5f 69 74 65 6d 28 54 65 |$. .Menu|_item(Te|
|000031f0| 78 74 24 2c 46 6c 61 67 | 73 25 2c 4c 69 6e 6b 25 |xt$,Flag|s%,Link%|
|00003200| 29 0d 0d 2a 3a f4 20 41 | 64 64 20 61 6e 20 65 6e |)..*:. A|dd an en|
|00003210| 74 72 79 20 74 6f 20 74 | 68 65 20 6d 65 6e 75 20 |try to t|he menu |
|00003220| 6c 69 73 74 20 28 43 61 | 6c 6c 20 4d 65 6e 75 5f |list (Ca|ll Menu_|
|00003230| 69 6e 69 74 20 66 69 72 | 73 74 29 0d 0d 34 20 f4 |init fir|st)..4 .|
|00003240| 20 54 65 78 74 20 20 3d | 20 54 65 78 74 20 6f 66 | Text  =| Text of|
|00003250| 20 6d 65 6e 75 20 65 6e | 74 72 79 0d 0d 3e 30 f4 | menu en|try..>0.|
|00003260| 20 46 6c 61 67 73 20 3d | 20 2b 31 20 20 20 20 20 | Flags =| +1     |
|00003270| 20 20 66 6f 72 20 27 74 | 68 69 73 20 69 74 65 6d |  for 't|his item|
|00003280| 20 69 73 20 74 69 63 6b | 65 64 27 0d 0d 48 39 f4 | is tick|ed'..H9.|
|00003290| 20 20 20 20 20 20 20 20 | 20 2b 32 20 20 20 20 20 |        | +2     |
|000032a0| 20 20 66 6f 72 20 27 74 | 68 65 72 65 20 69 73 20 |  for 't|here is |
|000032b0| 61 20 64 6f 74 74 65 64 | 20 6c 69 6e 65 20 61 66 |a dotted| line af|
|000032c0| 74 65 72 27 0d 0d 52 32 | f4 20 20 20 20 20 20 20 |ter'..R2|.       |
|000032d0| 20 20 2b 31 32 38 20 20 | 20 20 20 66 6f 72 20 27 |  +128  |   for '|
|000032e0| 54 68 69 73 20 69 73 20 | 74 68 65 20 6c 61 73 74 |This is |the last|
|000032f0| 20 69 74 65 6d 27 0d 0d | 5c 46 f4 20 4c 69 6e 6b | item'..|\F. Link|
|00003300| 20 20 3d 20 61 64 64 72 | 65 73 73 20 6f 66 20 66 |  = addr|ess of f|
|00003310| 6f 6c 6c 6f 77 69 6e 67 | 20 6d 65 6e 75 20 6f 72 |ollowing| menu or|
|00003320| 20 68 61 6e 64 6c 65 20 | 6f 66 20 77 69 6e 64 6f | handle |of windo|
|00003330| 77 20 74 6f 20 6c 69 6e | 6b 20 74 6f 0d 0d 66 0f |w to lin|k to..f.|
|00003340| 50 25 21 30 3d 46 6c 61 | 67 73 25 0d 0d 70 0e 50 |P%!0=Fla|gs%..p.P|
|00003350| 25 21 34 3d 4c 69 6e 6b | 25 0d 0d 7a 12 50 25 21 |%!4=Link|%..z.P%!|
|00003360| 38 3d 26 30 37 30 30 33 | 30 32 31 0d 0d 84 12 24 |8=&07003|021....$|
|00003370| 28 50 25 2b 31 32 29 3d | 54 65 78 74 24 0d 0d 8e |(P%+12)=|Text$...|
|00003380| 0a 50 25 2b 3d 32 34 0d | 0d 98 2d e7 20 a9 54 65 |.P%+=24.|..-. .Te|
|00003390| 78 74 24 3e 4c 25 20 8c | 20 4c 25 3d a9 54 65 78 |xt$>L% .| L%=.Tex|
|000033a0| 74 24 20 3a 20 4d 25 21 | 31 36 3d 28 4c 25 2b 31 |t$ : M%!|16=(L%+1|
|000033b0| 29 2a 31 36 0d 0d a2 05 | e1 0d 0d ac 05 3a 0d 0d |)*16....|.....:..|
|000033c0| b6 14 dd 20 f2 64 6f 53 | 63 72 6f 6c 6c 4f 6e 4f |... .doS|crollOnO|
|000033d0| 66 66 0d 0d c0 3f 42 6c | 6f 63 6b 21 30 3d 4b 65 |ff...?Bl|ock!0=Ke|
|000033e0| 79 73 3a c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |ys:.. "W|imp_GetW|
|000033f0| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 42 6c 6f |indowSta|te",,Blo|
|00003400| 63 6b 3a 73 74 61 74 65 | 3d 42 6c 6f 63 6b 21 33 |ck:state|=Block!3|
|00003410| 32 0d 0d ca 2f 4b 65 79 | 73 57 21 30 3d 4b 65 79 |2.../Key|sW!0=Key|
|00003420| 73 3a c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |s:.. "Wi|mp_GetWi|
|00003430| 6e 64 6f 77 49 6e 66 6f | 22 2c 2c 4b 65 79 73 57 |ndowInfo|",,KeysW|
|00003440| 0d 0d d4 21 c8 99 20 22 | 57 69 6d 70 5f 44 65 6c |...!.. "|Wimp_Del|
|00003450| 65 74 65 57 69 6e 64 6f | 77 22 2c 2c 4b 65 79 73 |eteWindo|w",,Keys|
|00003460| 57 0d 0d de 59 4b 65 79 | 73 57 21 33 32 3d 28 28 |W...YKey|sW!32=((|
|00003470| 4b 65 79 73 57 21 33 32 | 29 20 80 20 ac 20 28 25 |KeysW!32|) . . (%|
|00003480| 31 31 30 31 3c 3c 32 37 | 29 29 20 82 20 28 28 2d |1101<<27|)) . ((-|
|00003490| 53 63 72 6f 6c 6c 42 61 | 72 3c 3c 33 30 29 2b 28 |ScrollBa|r<<30)+(|
|000034a0| 25 31 30 3c 3c 32 38 29 | 2b 28 2d 53 63 72 6f 6c |%10<<28)|+(-Scrol|
|000034b0| 6c 42 61 72 3c 3c 32 37 | 29 29 0d 0d e8 2a c8 99 |lBar<<27|))...*..|
|000034c0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e | "Wimp_C|reateWin|
|000034d0| 64 6f 77 22 2c 2c 4b 65 | 79 73 57 2b 34 20 b8 20 |dow",,Ke|ysW+4 . |
|000034e0| 4b 65 79 73 0d 0d f2 4a | e7 20 28 73 74 61 74 65 |Keys...J|. (state|
|000034f0| 20 80 20 28 31 3c 3c 31 | 36 29 29 3d 28 31 3c 3c | . (1<<1|6))=(1<<|
|00003500| 31 36 29 20 8c 20 42 6c | 6f 63 6b 21 30 3d 4b 65 |16) . Bl|ock!0=Ke|
|00003510| 79 73 3a c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |ys:.. "W|imp_Open|
|00003520| 57 69 6e 64 6f 77 22 2c | 2c 42 6c 6f 63 6b 0d 0d |Window",|,Block..|
|00003530| fc 05 e1 0d 0e 06 05 3a | 0d 0e 10 18 dd 20 f2 72 |.......:|..... .r|
|00003540| 65 61 64 6d 6f 64 65 76 | 61 72 69 61 62 6c 65 73 |eadmodev|ariables|
|00003550| 0d 0e 1a 2e c8 99 20 22 | 4f 53 5f 52 65 61 64 4d |...... "|OS_ReadM|
|00003560| 6f 64 65 56 61 72 69 61 | 62 6c 65 22 2c 2d 31 2c |odeVaria|ble",-1,|
|00003570| 31 31 20 b8 20 2c 2c 58 | 70 69 78 65 6c 73 0d 0e |11 . ,,X|pixels..|
|00003580| 24 2e c8 99 20 22 4f 53 | 5f 52 65 61 64 4d 6f 64 |$... "OS|_ReadMod|
|00003590| 65 56 61 72 69 61 62 6c | 65 22 2c 2d 31 2c 31 32 |eVariabl|e",-1,12|
|000035a0| 20 b8 20 2c 2c 59 70 69 | 78 65 6c 73 0d 0e 2e 30 | . ,,Ypi|xels...0|
|000035b0| c8 99 20 22 4f 53 5f 52 | 65 61 64 4d 6f 64 65 56 |.. "OS_R|eadModeV|
|000035c0| 61 72 69 61 62 6c 65 22 | 2c 2d 31 2c 34 20 b8 20 |ariable"|,-1,4 . |
|000035d0| 2c 2c 58 45 69 67 46 61 | 63 74 6f 72 0d 0e 38 30 |,,XEigFa|ctor..80|
|000035e0| c8 99 20 22 4f 53 5f 52 | 65 61 64 4d 6f 64 65 56 |.. "OS_R|eadModeV|
|000035f0| 61 72 69 61 62 6c 65 22 | 2c 2d 31 2c 35 20 b8 20 |ariable"|,-1,5 . |
|00003600| 2c 2c 59 45 69 67 46 61 | 63 74 6f 72 0d 0e 42 05 |,,YEigFa|ctor..B.|
|00003610| e1 0d 0e 4c 05 3a 0d 0e | 56 22 dd 20 f2 64 65 63 |...L.:..|V". .dec|
|00003620| 69 64 65 77 69 6e 64 6f | 77 70 6f 73 69 74 69 6f |idewindo|wpositio|
|00003630| 6e 28 42 6c 6f 63 6b 29 | 0d 0e 60 54 77 69 64 74 |n(Block)|..`Twidt|
|00003640| 68 3d 28 42 6c 6f 63 6b | 21 31 32 2d 42 6c 6f 63 |h=(Block|!12-Bloc|
|00003650| 6b 21 34 29 2f 28 32 5e | 58 45 69 67 46 61 63 74 |k!4)/(2^|XEigFact|
|00003660| 6f 72 29 3a 68 65 69 67 | 68 74 3d 28 42 6c 6f 63 |or):heig|ht=(Bloc|
|00003670| 6b 21 31 36 2d 42 6c 6f | 63 6b 21 38 29 2f 28 32 |k!16-Blo|ck!8)/(2|
|00003680| 5e 59 45 69 67 46 61 63 | 74 6f 72 29 0d 0e 6a 30 |^YEigFac|tor)..j0|
|00003690| 78 3d 28 58 70 69 78 65 | 6c 73 2b 31 2d 77 69 64 |x=(Xpixe|ls+1-wid|
|000036a0| 74 68 29 2f 32 3a 79 3d | 28 59 70 69 78 65 6c 73 |th)/2:y=|(Ypixels|
|000036b0| 2b 31 2d 68 65 69 67 68 | 74 29 2f 32 0d 0e 74 37 |+1-heigh|t)/2..t7|
|000036c0| f4 20 41 62 6f 76 65 20 | 63 6f 6f 72 64 69 6e 61 |. Above |coordina|
|000036d0| 74 65 73 20 63 65 6e 74 | 72 61 6c 69 73 65 20 77 |tes cent|ralise w|
|000036e0| 69 6e 64 6f 77 20 28 69 | 6e 20 4f 53 20 75 6e 69 |indow (i|n OS uni|
|000036f0| 74 73 29 0d 0e 7e 28 f4 | 20 4e 6f 77 20 63 6f 6e |ts)..~(.| Now con|
|00003700| 76 65 72 74 20 74 6f 20 | 73 63 72 65 65 6e 20 63 |vert to |screen c|
|00003710| 6f 6f 72 64 69 6e 61 74 | 65 73 3a 0d 0e 88 29 78 |oordinat|es:...)x|
|00003720| 3d 78 2a 28 32 5e 58 45 | 69 67 46 61 63 74 6f 72 |=x*(2^XE|igFactor|
|00003730| 29 3a 79 3d 79 2a 28 32 | 5e 59 45 69 67 46 61 63 |):y=y*(2|^YEigFac|
|00003740| 74 6f 72 29 0d 0e 92 3b | 77 69 64 74 68 3d 77 69 |tor)...;|width=wi|
|00003750| 64 74 68 2a 28 32 5e 58 | 45 69 67 46 61 63 74 6f |dth*(2^X|EigFacto|
|00003760| 72 29 3a 68 65 69 67 68 | 74 3d 68 65 69 67 68 74 |r):heigh|t=height|
|00003770| 2a 28 32 5e 59 45 69 67 | 46 61 63 74 6f 72 29 0d |*(2^YEig|Factor).|
|00003780| 0e 9c 1e 42 6c 6f 63 6b | 21 31 32 3d 78 2b 77 69 |...Block|!12=x+wi|
|00003790| 64 74 68 3a 42 6c 6f 63 | 6b 21 34 3d 78 0d 0e a6 |dth:Bloc|k!4=x...|
|000037a0| 1f 42 6c 6f 63 6b 21 31 | 36 3d 79 2b 68 65 69 67 |.Block!1|6=y+heig|
|000037b0| 68 74 3a 42 6c 6f 63 6b | 21 38 3d 79 0d 0e b0 05 |ht:Block|!8=y....|
|000037c0| e1 0d 0e ba 05 3a 0d 0e | c4 2c dd 20 f2 6f 70 65 |.....:..|.,. .ope|
|000037d0| 6e 28 57 69 6e 64 6f 77 | 48 61 6e 64 6c 65 2c 54 |n(Window|Handle,T|
|000037e0| 6f 70 4f 66 53 74 61 63 | 6b 2c 43 65 6e 74 72 65 |opOfStac|k,Centre|
|000037f0| 64 29 0d 0e ce 39 42 6c | 6f 63 6b 21 30 3d 57 69 |d)...9Bl|ock!0=Wi|
|00003800| 6e 64 6f 77 48 61 6e 64 | 6c 65 3a e7 20 57 69 6e |ndowHand|le:. Win|
|00003810| 64 6f 77 48 61 6e 64 6c | 65 3d 4b 65 79 73 20 8c |dowHandl|e=Keys .|
|00003820| 20 4b 65 79 73 4f 70 65 | 6e 3d b9 0d 0e d8 23 c8 | KeysOpe|n=....#.|
|00003830| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00003840| 77 53 74 61 74 65 22 2c | 2c 42 6c 6f 63 6b 0d 0e |wState",|,Block..|
|00003850| e2 2c e7 20 43 65 6e 74 | 72 65 64 20 8c 20 f2 64 |.,. Cent|red . .d|
|00003860| 65 63 69 64 65 77 69 6e | 64 6f 77 70 6f 73 69 74 |ecidewin|dowposit|
|00003870| 69 6f 6e 28 42 6c 6f 63 | 6b 29 0d 0e ec 42 e7 20 |ion(Bloc|k)...B. |
|00003880| 54 6f 70 4f 66 53 74 61 | 63 6b 20 8c 20 42 6c 6f |TopOfSta|ck . Blo|
|00003890| 63 6b 21 32 38 3d 2d 31 | 20 8b 20 e7 20 57 69 6e |ck!28=-1| . . Win|
|000038a0| 64 6f 77 48 61 6e 64 6c | 65 3d 4b 65 79 73 20 8c |dowHandl|e=Keys .|
|000038b0| 20 42 6c 6f 63 6b 21 32 | 38 3d 2d 32 0d 0e f6 6b | Block!2|8=-2...k|
|000038c0| e7 20 57 69 6e 64 6f 77 | 48 61 6e 64 6c 65 3d 4b |. Window|Handle=K|
|000038d0| 65 79 73 20 80 20 4f 70 | 65 6e 41 74 54 6f 70 20 |eys . Op|enAtTop |
|000038e0| 8c 20 42 6c 6f 63 6b 21 | 31 36 3d 28 59 70 69 78 |. Block!|16=(Ypix|
|000038f0| 65 6c 73 2b 31 29 2a 28 | 32 5e 59 45 69 67 46 61 |els+1)*(|2^YEigFa|
|00003900| 63 74 6f 72 29 2d 54 42 | 61 72 48 65 69 67 68 74 |ctor)-TB|arHeight|
|00003910| 3a 42 6c 6f 63 6b 21 38 | 3d 28 42 6c 6f 63 6b 21 |:Block!8|=(Block!|
|00003920| 31 36 29 2d 32 34 32 0d | 0f 00 1f c8 99 20 22 57 |16)-242.|..... "W|
|00003930| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|00003940| 2c 42 6c 6f 63 6b 0d 0f | 0a 05 e1 0d 0f 14 05 3a |,Block..|.......:|
|00003950| 0d 0f 1e 1a dd 20 f2 63 | 6c 6f 73 65 28 57 69 6e |..... .c|lose(Win|
|00003960| 64 6f 77 48 61 6e 64 6c | 65 29 0d 0f 28 18 42 6c |dowHandl|e)..(.Bl|
|00003970| 6f 63 6b 21 30 3d 57 69 | 6e 64 6f 77 48 61 6e 64 |ock!0=Wi|ndowHand|
|00003980| 6c 65 0d 0f 32 23 c8 99 | 20 22 57 69 6d 70 5f 47 |le..2#..| "Wimp_G|
|00003990| 65 74 57 69 6e 64 6f 77 | 53 74 61 74 65 22 2c 2c |etWindow|State",,|
|000039a0| 42 6c 6f 63 6b 0d 0f 3c | 20 c8 99 20 22 57 69 6d |Block..<| .. "Wim|
|000039b0| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 2c |p_CloseW|indow",,|
|000039c0| 42 6c 6f 63 6b 0d 0f 46 | 24 e7 20 57 69 6e 64 6f |Block..F|$. Windo|
|000039d0| 77 48 61 6e 64 6c 65 3d | 4b 65 79 73 20 8c 20 4b |wHandle=|Keys . K|
|000039e0| 65 79 73 4f 70 65 6e 3d | a3 0d 0f 50 05 e1 0d 0f |eysOpen=|...P....|
|000039f0| 5a 05 3a 0d 0f 64 0b dd | 20 f2 48 65 6c 70 0d 0f |Z.:..d..| .Help..|
|00003a00| 6e 16 42 6c 6f 63 6b 21 | 31 32 20 3d 20 42 6c 6f |n.Block!|12 = Blo|
|00003a10| 63 6b 21 38 0d 0f 78 13 | 42 6c 6f 63 6b 21 31 36 |ck!8..x.|Block!16|
|00003a20| 20 3d 20 26 35 30 33 0d | 0f 82 17 48 65 6c 70 49 | = &503.|...HelpI|
|00003a30| 6e 66 6f 20 3d 20 42 6c | 6f 63 6b 2b 32 30 0d 0f |nfo = Bl|ock+20..|
|00003a40| 8c 07 20 20 3a 0d 0f 96 | 30 f4 20 42 6c 6f 63 6b |..  :...|0. Block|
|00003a50| 21 33 32 20 67 69 76 65 | 73 20 77 69 6e 64 6f 77 |!32 give|s window|
|00003a60| 2c 20 42 6c 6f 63 6b 21 | 33 36 20 67 69 76 65 73 |, Block!|36 gives|
|00003a70| 20 69 63 6f 6e 0d 0f a0 | 07 20 20 3a 0d 0f aa 11 | icon...|.  :....|
|00003a80| c8 8e 20 42 6c 6f 63 6b | 21 33 32 20 ca 0d 0f b4 |.. Block|!32 ....|
|00003a90| 34 20 20 c9 20 2d 32 20 | 20 3a 20 20 f2 53 65 6e |4  . -2 | :  .Sen|
|00003aa0| 64 28 22 54 68 69 73 20 | 69 73 20 74 68 65 20 4b |d("This |is the K|
|00003ab0| 65 79 20 57 69 6e 64 6f | 77 20 69 63 6f 6e 2e 22 |ey Windo|w icon."|
|00003ac0| 29 0d 0f be 64 20 20 20 | 20 20 20 20 20 20 20 20 |)...d   |        |
|00003ad0| 20 20 20 f2 53 65 6e 64 | 28 22 43 6c 69 63 6b 20 |   .Send|("Click |
|00003ae0| 53 45 4c 45 43 54 20 6f | 72 20 41 44 4a 55 53 54 |SELECT o|r ADJUST|
|00003af0| 20 74 6f 20 73 68 6f 77 | 20 61 20 6b 65 79 73 74 | to show| a keyst|
|00003b00| 72 69 70 2c 20 6f 72 20 | 4d 45 4e 55 20 66 6f 72 |rip, or |MENU for|
|00003b10| 20 61 20 6c 69 73 74 20 | 6f 66 20 6f 70 74 69 6f | a list |of optio|
|00003b20| 6e 73 2e 22 29 0d 0f c8 | 8d 20 20 20 20 20 20 20 |ns.")...|.       |
|00003b30| 20 20 20 20 20 20 20 f2 | 53 65 6e 64 28 22 54 68 |       .|Send("Th|
|00003b40| 65 20 27 4b 65 79 73 74 | 72 69 70 73 27 20 73 75 |e 'Keyst|rips' su|
|00003b50| 62 6d 65 6e 75 20 6c 65 | 74 73 20 79 6f 75 20 63 |bmenu le|ts you c|
|00003b60| 68 6f 6f 73 65 20 61 20 | 6b 65 79 73 74 72 69 70 |hoose a |keystrip|
|00003b70| 20 66 72 6f 6d 20 74 68 | 65 20 6c 69 73 74 20 6f | from th|e list o|
|00003b80| 66 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 73 20 4b |f applic|ations K|
|00003b90| 65 79 20 57 69 6e 64 6f | 77 20 63 75 72 72 65 6e |ey Windo|w curren|
|00003ba0| 74 6c 79 20 6b 6e 6f 77 | 73 20 61 62 6f 75 74 2e |tly know|s about.|
|00003bb0| 22 29 0d 0f d2 ae 20 20 | c9 20 49 6e 66 6f 20 3a |")....  |. Info :|
|00003bc0| 20 f2 53 65 6e 64 28 22 | 49 66 20 79 6f 75 20 6c | .Send("|If you l|
|00003bd0| 69 6b 65 20 74 68 69 73 | 20 70 72 6f 67 72 61 6d |ike this| program|
|00003be0| 2c 20 73 65 6e 64 20 6d | 65 20 61 20 64 69 73 63 |, send m|e a disc|
|00003bf0| 20 6f 66 20 50 44 20 73 | 6f 66 74 77 61 72 65 2e | of PD s|oftware.|
|00003c00| 20 49 27 6c 6c 20 72 65 | 74 75 72 6e 20 69 74 20 | I'll re|turn it |
|00003c10| 77 69 74 68 20 74 68 65 | 20 6c 61 74 65 73 74 20 |with the| latest |
|00003c20| 76 65 72 73 69 6f 6e 20 | 6f 66 20 74 68 69 73 20 |version |of this |
|00003c30| 70 72 6f 67 72 61 6d 2c | 20 61 6e 64 20 74 68 65 |program,| and the|
|00003c40| 20 6f 74 68 65 72 20 50 | 44 20 74 68 69 6e 67 73 | other P|D things|
|00003c50| 20 49 27 76 65 20 77 72 | 69 74 74 65 6e 2e 22 29 | I've wr|itten.")|
|00003c60| 0d 0f dc 26 20 20 20 20 | 20 20 20 20 20 20 20 20 |...&    |        |
|00003c70| 20 20 f2 53 65 6e 64 28 | 22 4d 79 20 61 64 64 72 |  .Send(|"My addr|
|00003c80| 65 73 73 3a 22 29 0d 0f | e6 5e 20 20 20 20 20 20 |ess:")..|.^      |
|00003c90| 20 20 20 20 20 20 20 20 | f2 53 65 6e 64 28 22 33 |        |.Send("3|
|00003ca0| 31 20 53 6b 65 6c 74 6f | 6e 20 43 72 65 73 63 65 |1 Skelto|n Cresce|
|00003cb0| 6e 74 2c 20 43 72 6f 73 | 6c 61 6e 64 20 4d 6f 6f |nt, Cros|land Moo|
|00003cc0| 72 2c 20 48 75 64 64 65 | 72 73 66 69 65 6c 64 2c |r, Hudde|rsfield,|
|00003cd0| 20 57 2e 20 59 6f 72 6b | 73 2c 20 48 44 34 20 35 | W. York|s, HD4 5|
|00003ce0| 50 4e 22 29 0d 0f f0 1f | 20 20 c9 20 4b 65 79 73 |PN")....|  . Keys|
|00003cf0| 20 3a 20 e7 20 42 6c 6f | 63 6b 21 33 36 3c 3e 36 | : . Blo|ck!36<>6|
|00003d00| 33 20 8c 0d 0f fa 55 20 | 20 20 20 20 20 20 20 20 |3 ....U |        |
|00003d10| 20 20 20 20 20 20 20 f2 | 53 65 6e 64 28 22 54 68 |       .|Send("Th|
|00003d20| 69 73 20 69 73 20 74 68 | 65 20 6b 65 79 73 74 72 |is is th|e keystr|
|00003d30| 69 70 2e 20 43 6c 69 63 | 6b 20 61 6e 79 20 73 6c |ip. Clic|k any sl|
|00003d40| 6f 74 20 74 6f 20 27 70 | 72 65 73 73 27 20 74 68 |ot to 'p|ress' th|
|00003d50| 65 20 6b 65 79 2e 22 29 | 0d 10 04 c4 20 20 20 20 |e key.")|....    |
|00003d60| 20 20 20 20 20 20 20 20 | 20 20 20 20 f2 53 65 6e |        |    .Sen|
|00003d70| 64 28 22 43 6c 69 63 6b | 20 4d 45 4e 55 20 74 6f |d("Click| MENU to|
|00003d80| 20 6d 6f 64 69 66 79 20 | 74 68 65 20 73 74 72 69 | modify |the stri|
|00003d90| 70 2e 20 45 6e 74 65 72 | 20 61 20 74 61 73 6b 6e |p. Enter| a taskn|
|00003da0| 61 6d 65 20 61 73 20 69 | 74 20 61 70 70 65 61 72 |ame as i|t appear|
|00003db0| 73 20 69 6e 20 74 68 65 | 20 54 61 73 6b 20 44 69 |s in the| Task Di|
|00003dc0| 73 70 6c 61 79 20 77 69 | 6e 64 6f 77 20 69 6e 74 |splay wi|ndow int|
|00003dd0| 6f 20 74 68 65 20 27 4f | 70 65 6e 20 77 69 74 68 |o the 'O|pen with|
|00003de0| 3f 27 20 73 75 62 2d 6d | 65 6e 75 20 74 6f 20 6d |?' sub-m|enu to m|
|00003df0| 61 6b 65 20 61 20 6b 65 | 79 73 74 72 69 70 20 6f |ake a ke|ystrip o|
|00003e00| 70 65 6e 20 61 6e 64 20 | 63 6c 6f 73 65 20 77 69 |pen and |close wi|
|00003e10| 74 68 20 61 20 74 61 73 | 6b 2e 22 29 0d 10 0e 13 |th a tas|k.")....|
|00003e20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 cc 0d |        |      ..|
|00003e30| 10 18 45 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..E     |        |
|00003e40| 20 20 20 f2 53 65 6e 64 | 28 22 54 68 69 73 20 6b |   .Send|("This k|
|00003e50| 65 79 70 72 65 73 73 20 | 75 73 75 61 6c 6c 79 20 |eypress |usually |
|00003e60| 65 78 69 74 73 20 74 68 | 65 20 64 65 73 6b 74 6f |exits th|e deskto|
|00003e70| 70 2e 22 29 0d 10 22 d7 | 20 20 20 20 20 20 20 20 |p.")..".|        |
|00003e80| 20 20 20 20 20 20 20 20 | f2 53 65 6e 64 28 22 53 |        |.Send("S|
|00003e90| 69 6e 63 65 20 74 68 69 | 73 20 69 73 20 61 20 64 |ince thi|s is a d|
|00003ea0| 61 6e 67 65 72 6f 75 73 | 20 69 63 6f 6e 2c 20 79 |angerous| icon, y|
|00003eb0| 6f 75 20 6d 75 73 74 20 | 63 6c 69 63 6b 20 69 74 |ou must |click it|
|00003ec0| 20 77 69 74 68 20 62 6f | 74 68 20 53 45 4c 45 43 | with bo|th SELEC|
|00003ed0| 54 20 61 6e 64 20 41 44 | 4a 55 53 54 20 73 69 6d |T and AD|JUST sim|
|00003ee0| 75 6c 74 61 6e 65 6f 75 | 73 6c 79 20 74 6f 20 6d |ultaneou|sly to m|
|00003ef0| 61 6b 65 20 69 74 20 61 | 63 74 69 76 61 74 65 2e |ake it a|ctivate.|
|00003f00| 20 54 68 65 20 65 61 73 | 69 65 73 74 20 77 61 79 | The eas|iest way|
|00003f10| 20 74 6f 20 64 6f 20 74 | 68 69 73 20 69 73 20 74 | to do t|his is t|
|00003f20| 6f 20 68 6f 6c 64 20 64 | 6f 77 6e 20 53 45 4c 45 |o hold d|own SELE|
|00003f30| 43 54 20 61 6e 64 20 74 | 68 65 6e 20 63 6c 69 63 |CT and t|hen clic|
|00003f40| 6b 20 41 44 4a 55 53 54 | 2e 22 29 0d 10 2c 13 20 |k ADJUST|.")..,. |
|00003f50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 cd 0d 10 |        |     ...|
|00003f60| 36 07 20 20 7f 0d 10 40 | 15 20 20 20 20 e7 20 77 |6.  ...@|.    . w|
|00003f70| 69 6d 70 3e 3d 32 31 37 | 20 8c 0d 10 4a 3d 20 20 |imp>=217| ...J=  |
|00003f80| 20 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |    .. "|Wimp_Get|
|00003f90| 4d 65 6e 75 53 74 61 74 | 65 22 2c 31 2c 4d 65 6e |MenuStat|e",1,Men|
|00003fa0| 75 48 65 6c 70 2c 42 6c | 6f 63 6b 21 33 32 2c 42 |uHelp,Bl|ock!32,B|
|00003fb0| 6c 6f 63 6b 21 33 36 0d | 10 54 11 20 20 20 20 20 |lock!36.|.T.     |
|00003fc0| 20 c8 8e 20 4d 25 20 ca | 0d 10 5e 13 20 20 20 20 | .. M% .|..^.    |
|00003fd0| 20 20 20 20 c9 20 4d 65 | 6e 75 31 0d 10 68 1d 20 |    . Me|nu1..h. |
|00003fe0| 20 20 20 20 20 20 20 20 | 20 c8 8e 20 4d 65 6e 75 |        | .. Menu|
|00003ff0| 48 65 6c 70 21 30 20 ca | 0d 10 72 68 20 20 20 20 |Help!0 .|..rh    |
|00004000| 20 20 20 20 20 20 20 20 | c9 20 30 3a f2 53 65 6e |        |. 0:.Sen|
|00004010| 64 28 22 4d 6f 76 65 20 | 74 68 65 20 70 6f 69 6e |d("Move |the poin|
|00004020| 74 65 72 20 72 69 67 68 | 74 20 6f 72 20 63 6c 69 |ter righ|t or cli|
|00004030| 63 6b 20 53 45 4c 45 43 | 54 20 74 6f 20 73 65 65 |ck SELEC|T to see|
|00004040| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 20 61 62 6f | informa|tion abo|
|00004050| 75 74 20 4b 65 79 20 57 | 69 6e 64 6f 77 2e 22 29 |ut Key W|indow.")|
|00004060| 0d 10 7c 25 20 20 20 20 | 20 20 20 20 20 20 20 20 |..|%    |        |
|00004070| c9 20 31 3a e7 20 4d 65 | 6e 75 48 65 6c 70 21 34 |. 1:. Me|nuHelp!4|
|00004080| 3d 2d 31 20 8c 0d 10 86 | 84 20 20 20 20 20 20 20 |=-1 ....|.       |
|00004090| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 f2 53 |        |      .S|
|000040a0| 65 6e 64 28 22 4d 6f 76 | 65 20 74 68 65 20 70 6f |end("Mov|e the po|
|000040b0| 69 6e 74 65 72 20 72 69 | 67 68 74 20 74 6f 20 76 |inter ri|ght to v|
|000040c0| 69 65 77 20 74 68 65 20 | 6c 69 73 74 20 6f 66 20 |iew the |list of |
|000040d0| 61 70 70 6c 69 63 61 74 | 69 6f 6e 73 20 66 6f 72 |applicat|ions for|
|000040e0| 20 77 68 69 63 68 20 4b | 65 79 20 57 69 6e 64 6f | which K|ey Windo|
|000040f0| 77 20 77 69 6c 6c 20 6f | 70 65 6e 20 61 20 6b 65 |w will o|pen a ke|
|00004100| 79 73 74 72 69 70 2e 22 | 29 0d 10 90 18 20 20 20 |ystrip."|)....   |
|00004110| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004120| cc 0d 10 9a 82 20 20 20 | 20 20 20 20 20 20 20 20 |.....   |        |
|00004130| 20 20 20 20 20 20 20 20 | 20 20 f2 53 65 6e 64 28 |        |  .Send(|
|00004140| 22 54 68 65 20 41 70 70 | 6c 69 63 61 74 69 6f 6e |"The App|lication|
|00004150| 73 20 73 75 62 2d 6d 65 | 6e 75 20 63 6f 6e 74 61 |s sub-me|nu conta|
|00004160| 69 6e 73 20 61 20 6c 69 | 73 74 20 6f 66 20 70 72 |ins a li|st of pr|
|00004170| 6f 67 72 61 6d 73 20 66 | 6f 72 20 77 68 69 63 68 |ograms f|or which|
|00004180| 20 4b 65 79 20 57 69 6e | 64 6f 77 20 77 69 6c 6c | Key Win|dow will|
|00004190| 20 6f 70 65 6e 20 61 20 | 6b 65 79 73 74 72 69 70 | open a |keystrip|
|000041a0| 2e 22 29 0d 10 a4 18 20 | 20 20 20 20 20 20 20 20 |.").... |        |
|000041b0| 20 20 20 20 20 20 20 20 | 20 20 cd 0d 10 ae 23 20 |        |  ....# |
|000041c0| 20 20 20 20 20 20 20 20 | 20 20 20 c9 20 32 3a c8 |        |   . 2:.|
|000041d0| 8e 20 4d 65 6e 75 48 65 | 6c 70 21 34 20 ca 0d 10 |. MenuHe|lp!4 ...|
|000041e0| b8 bd 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..      |        |
|000041f0| 20 20 20 20 20 20 20 c9 | 20 30 3a f2 53 65 6e 64 |       .| 0:.Send|
|00004200| 28 22 49 66 20 27 4f 70 | 65 6e 20 61 74 20 74 6f |("If 'Op|en at to|
|00004210| 70 27 20 69 73 20 74 69 | 63 6b 65 64 2c 20 74 68 |p' is ti|cked, th|
|00004220| 65 20 6b 65 79 73 74 72 | 69 70 20 77 69 6c 6c 20 |e keystr|ip will |
|00004230| 6f 70 65 6e 20 61 74 20 | 74 68 65 20 74 6f 70 20 |open at |the top |
|00004240| 6f 66 20 74 68 65 20 73 | 63 72 65 65 6e 3b 20 6f |of the s|creen; o|
|00004250| 74 68 65 72 77 69 73 65 | 20 69 74 20 77 69 6c 6c |therwise| it will|
|00004260| 20 61 70 70 65 61 72 20 | 61 62 6f 76 65 20 74 68 | appear |above th|
|00004270| 65 20 69 63 6f 6e 2d 62 | 61 72 20 61 6e 64 20 73 |e icon-b|ar and s|
|00004280| 74 61 79 20 77 68 65 72 | 65 76 65 72 20 79 6f 75 |tay wher|ever you|
|00004290| 20 64 72 61 67 20 69 74 | 2e 22 29 0d 10 c2 98 20 | drag it|.").... |
|000042a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000042b0| 20 20 20 20 c9 20 31 3a | f2 53 65 6e 64 28 22 49 |    . 1:|.Send("I|
|000042c0| 66 20 27 41 75 74 6f 20 | 73 63 72 6f 6c 6c 27 20 |f 'Auto |scroll' |
|000042d0| 69 73 20 74 69 63 6b 65 | 64 2c 20 74 68 65 20 6b |is ticke|d, the k|
|000042e0| 65 79 73 74 72 69 70 20 | 77 69 6c 6c 20 73 63 72 |eystrip |will scr|
|000042f0| 6f 6c 6c 20 73 69 64 65 | 77 61 79 73 20 69 66 20 |oll side|ways if |
|00004300| 61 70 70 72 6f 70 72 69 | 61 74 65 20 77 68 65 6e |appropri|ate when|
|00004310| 20 74 68 65 20 70 6f 69 | 6e 74 65 72 20 61 70 70 | the poi|nter app|
|00004320| 72 6f 61 63 68 65 73 20 | 6f 6e 65 20 73 69 64 65 |roaches |one side|
|00004330| 2e 22 29 0d 10 cc 8c 20 | 20 20 20 20 20 20 20 20 |.").... |        |
|00004340| 20 20 20 20 20 20 20 20 | 20 20 20 20 c9 20 32 3a |        |    . 2:|
|00004350| f2 53 65 6e 64 28 22 49 | 66 20 27 53 63 72 6f 6c |.Send("I|f 'Scrol|
|00004360| 6c 20 62 61 72 27 20 69 | 73 20 74 69 63 6b 65 64 |l bar' i|s ticked|
|00004370| 2c 20 74 68 65 20 6b 65 | 79 73 74 72 69 70 20 77 |, the ke|ystrip w|
|00004380| 69 6c 6c 20 68 61 76 65 | 20 61 20 68 6f 72 69 7a |ill have| a horiz|
|00004390| 6f 6e 74 61 6c 20 73 63 | 72 6f 6c 6c 20 62 61 72 |ontal sc|roll bar|
|000043a0| 20 73 6f 20 79 6f 75 20 | 63 61 6e 20 64 72 61 67 | so you |can drag|
|000043b0| 20 69 74 20 64 69 72 65 | 63 74 6c 79 2e 22 29 0d | it dire|ctly.").|
|000043c0| 10 d6 cf 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |...     |        |
|000043d0| 20 20 20 20 20 20 20 20 | c9 20 33 3a f2 53 65 6e |        |. 3:.Sen|
|000043e0| 64 28 22 49 66 20 27 43 | 6f 6d 70 72 65 73 73 27 |d("If 'C|ompress'|
|000043f0| 20 69 73 20 74 69 63 6b | 65 64 2c 20 74 68 65 20 | is tick|ed, the |
|00004400| 6b 65 79 73 74 72 69 70 | 20 77 69 6c 6c 20 73 71 |keystrip| will sq|
|00004410| 75 61 73 68 20 74 6f 20 | 66 69 74 20 61 6c 6c 20 |uash to |fit all |
|00004420| 74 68 65 20 6b 65 79 20 | 6c 61 62 65 6c 73 20 6f |the key |labels o|
|00004430| 6e 20 74 68 65 20 73 63 | 72 65 65 6e 20 61 74 20 |n the sc|reen at |
|00004440| 6f 6e 63 65 2c 20 75 6e | 6c 65 73 73 20 74 68 65 |once, un|less the|
|00004450| 20 73 63 72 65 65 6e 20 | 69 73 20 77 69 64 65 20 | screen |is wide |
|00004460| 65 6e 6f 75 67 68 20 74 | 6f 20 73 68 6f 77 20 74 |enough t|o show t|
|00004470| 68 65 20 77 68 6f 6c 65 | 20 75 6e 63 6f 6d 70 72 |he whole| uncompr|
|00004480| 65 73 73 65 64 20 73 74 | 72 69 70 2e 22 29 0d 10 |essed st|rip.")..|
|00004490| e0 7d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.}      |        |
|000044a0| 20 20 20 20 20 20 20 c9 | 20 34 3a f2 53 65 6e 64 |       .| 4:.Send|
|000044b0| 28 22 49 66 20 27 53 65 | 6e 73 65 20 63 61 72 65 |("If 'Se|nse care|
|000044c0| 74 27 20 69 73 20 74 69 | 63 6b 65 64 2c 20 74 68 |t' is ti|cked, th|
|000044d0| 65 20 6b 65 79 73 74 72 | 69 70 73 20 77 69 6c 6c |e keystr|ips will|
|000044e0| 20 63 68 61 6e 67 65 20 | 61 73 20 79 6f 75 20 6d | change |as you m|
|000044f0| 6f 76 65 20 62 65 74 77 | 65 65 6e 20 61 70 70 6c |ove betw|een appl|
|00004500| 69 63 61 74 69 6f 6e 73 | 2e 22 29 0d 10 ea 87 20 |ications|.").... |
|00004510| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004520| 20 20 20 20 c9 20 35 3a | f2 53 65 6e 64 28 22 49 |    . 5:|.Send("I|
|00004530| 66 20 27 53 65 6e 73 65 | 20 61 70 70 73 27 20 69 |f 'Sense| apps' i|
|00004540| 73 20 74 69 63 6b 65 64 | 2c 20 6b 65 79 73 74 72 |s ticked|, keystr|
|00004550| 69 70 73 20 77 69 6c 6c | 20 61 70 70 65 61 72 20 |ips will| appear |
|00004560| 61 6e 64 20 64 69 73 61 | 70 70 65 61 72 20 61 73 |and disa|ppear as|
|00004570| 20 79 6f 75 20 6c 6f 61 | 64 20 61 6e 64 20 71 75 | you loa|d and qu|
|00004580| 69 74 20 61 70 70 6c 69 | 63 61 74 69 6f 6e 73 2e |it appli|cations.|
|00004590| 22 29 0d 10 f4 70 20 20 | 20 20 20 20 20 20 20 20 |")...p  |        |
|000045a0| 20 20 20 20 20 20 20 20 | 20 20 20 7f 3a f2 53 65 |        |   .:.Se|
|000045b0| 6e 64 28 22 54 68 65 20 | 4f 70 74 69 6f 6e 73 20 |nd("The |Options |
|000045c0| 73 75 62 2d 6d 65 6e 75 | 20 6c 65 74 73 20 79 6f |sub-menu| lets yo|
|000045d0| 75 20 63 6f 6e 66 69 67 | 75 72 65 20 68 6f 77 20 |u config|ure how |
|000045e0| 4b 65 79 20 57 69 6e 64 | 6f 77 20 61 70 70 65 61 |Key Wind|ow appea|
|000045f0| 72 73 20 61 6e 64 20 6f | 70 65 72 61 74 65 73 2e |rs and o|perates.|
|00004600| 22 29 0d 10 fe 18 20 20 | 20 20 20 20 20 20 20 20 |")....  |        |
|00004610| 20 20 20 20 20 20 20 20 | 20 cb 0d 11 08 3d 20 20 |        | ....=  |
|00004620| 20 20 20 20 20 20 20 20 | 20 20 c9 20 33 3a f2 53 |        |  . 3:.S|
|00004630| 65 6e 64 28 22 43 6c 69 | 63 6b 20 53 45 4c 45 43 |end("Cli|ck SELEC|
|00004640| 54 20 74 6f 20 71 75 69 | 74 20 4b 65 79 20 57 69 |T to qui|t Key Wi|
|00004650| 6e 64 6f 77 2e 22 29 0d | 11 12 3e 20 20 20 20 20 |ndow.").|..>     |
|00004660| 20 20 20 20 20 20 20 7f | 3a f2 53 65 6e 64 28 22 |       .|:.Send("|
|00004670| 54 68 69 73 20 69 73 20 | 4b 65 79 20 57 69 6e 64 |This is |Key Wind|
|00004680| 6f 77 27 73 20 69 63 6f | 6e 2d 62 61 72 20 6d 65 |ow's ico|n-bar me|
|00004690| 6e 75 2e 22 29 0d 11 1c | 0f 20 20 20 20 20 20 20 |nu.")...|.       |
|000046a0| 20 20 20 cb 0d 11 26 13 | 20 20 20 20 20 20 20 20 |   ...&.|        |
|000046b0| c9 20 4d 65 6e 75 33 0d | 11 30 1d 20 20 20 20 20 |. Menu3.|.0.     |
|000046c0| 20 20 20 20 20 c8 8e 20 | 4d 65 6e 75 48 65 6c 70 |     .. |MenuHelp|
|000046d0| 21 30 20 ca 0d 11 3a 5c | 20 20 20 20 20 20 20 20 |!0 ...:\|        |
|000046e0| 20 20 20 20 c9 20 30 3a | f2 53 65 6e 64 28 22 59 |    . 0:|.Send("Y|
|000046f0| 6f 75 20 6d 61 79 20 75 | 73 65 20 74 68 69 73 20 |ou may u|se this |
|00004700| 69 74 65 6d 20 74 6f 20 | 65 64 69 74 20 69 6e 64 |item to |edit ind|
|00004710| 69 76 69 64 75 61 6c 20 | 73 6c 6f 74 73 20 69 6e |ividual |slots in|
|00004720| 20 74 68 65 20 6b 65 79 | 73 74 72 69 70 2e 22 29 | the key|strip.")|
|00004730| 0d 11 44 60 20 20 20 20 | 20 20 20 20 20 20 20 20 |..D`    |        |
|00004740| 20 20 20 20 20 20 20 f2 | 53 65 6e 64 28 22 54 68 |       .|Send("Th|
|00004750| 65 20 6f 70 74 69 6f 6e | 20 69 73 20 6f 6e 6c 79 |e option| is only|
|00004760| 20 61 76 61 69 6c 61 62 | 6c 65 20 69 66 20 79 6f | availab|le if yo|
|00004770| 75 20 63 6c 69 63 6b 20 | 4d 45 4e 55 20 6f 76 65 |u click |MENU ove|
|00004780| 72 20 61 20 6b 65 79 20 | 6c 61 62 65 6c 2e 22 29 |r a key |label.")|
|00004790| 0d 11 4e 58 20 20 20 20 | 20 20 20 20 20 20 20 20 |..NX    |        |
|000047a0| c9 20 31 3a f2 53 65 6e | 64 28 22 55 73 65 20 74 |. 1:.Sen|d("Use t|
|000047b0| 68 69 73 20 6f 70 74 69 | 6f 6e 20 74 6f 20 63 68 |his opti|on to ch|
|000047c0| 61 6e 67 65 20 74 68 65 | 20 74 69 74 6c 65 20 6f |ange the| title o|
|000047d0| 66 20 74 68 65 20 6b 65 | 79 73 74 72 69 70 20 77 |f the ke|ystrip w|
|000047e0| 69 6e 64 6f 77 2e 22 29 | 0d 11 58 25 20 20 20 20 |indow.")|..X%    |
|000047f0| 20 20 20 20 20 20 20 20 | c9 20 32 3a e7 20 4d 65 |        |. 2:. Me|
|00004800| 6e 75 48 65 6c 70 21 34 | 3d 2d 31 20 8c 0d 11 62 |nuHelp!4|=-1 ...b|
|00004810| 87 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00004820| 20 20 20 20 20 20 f2 53 | 65 6e 64 28 22 4d 6f 76 |      .S|end("Mov|
|00004830| 65 20 74 68 65 20 70 6f | 69 6e 74 65 72 20 72 69 |e the po|inter ri|
|00004840| 67 68 74 20 61 6e 64 20 | 63 68 6f 6f 73 65 20 61 |ght and |choose a|
|00004850| 6e 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 20 74 6f |n applic|ation to|
|00004860| 20 63 6f 70 79 20 69 74 | 73 20 64 61 74 61 20 69 | copy it|s data i|
|00004870| 6e 74 6f 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 |nto the |current |
|00004880| 73 74 72 69 70 20 66 6f | 72 20 65 64 69 74 69 6e |strip fo|r editin|
|00004890| 67 2e 22 29 0d 11 6c 18 | 20 20 20 20 20 20 20 20 |g.")..l.|        |
|000048a0| 20 20 20 20 20 20 20 20 | 20 20 20 cc 0d 11 76 bd |        |   ...v.|
|000048b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000048c0| 20 20 20 20 20 f2 53 65 | 6e 64 28 22 43 6c 69 63 |     .Se|nd("Clic|
|000048d0| 6b 20 53 45 4c 45 43 54 | 20 74 6f 20 63 6f 70 79 |k SELECT| to copy|
|000048e0| 20 74 68 65 20 64 61 74 | 61 20 66 6f 72 20 74 68 | the dat|a for th|
|000048f0| 69 73 20 61 70 70 6c 69 | 63 61 74 69 6f 6e 20 69 |is appli|cation i|
|00004900| 6e 74 6f 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 |nto the |current |
|00004910| 6b 65 79 73 74 72 69 70 | 20 28 77 68 69 63 68 20 |keystrip| (which |
|00004920| 6d 61 79 20 6e 6f 74 20 | 6e 65 63 65 73 73 61 72 |may not |necessar|
|00004930| 69 6c 79 20 62 65 20 66 | 6f 72 20 74 68 65 20 73 |ily be f|or the s|
|00004940| 61 6d 65 20 61 70 70 6c | 69 63 61 74 69 6f 6e 20 |ame appl|ication |
|00004950| 61 73 20 74 68 65 20 6f | 6e 65 20 79 6f 75 20 63 |as the o|ne you c|
|00004960| 68 6f 6f 73 65 29 2e 22 | 29 0d 11 80 18 20 20 20 |hoose)."|)....   |
|00004970| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004980| cd 0d 11 8a 65 20 20 20 | 20 20 20 20 20 20 20 20 |....e   |        |
|00004990| 20 c9 20 33 3a f2 53 65 | 6e 64 28 22 43 6c 69 63 | . 3:.Se|nd("Clic|
|000049a0| 6b 20 53 45 4c 45 43 54 | 20 74 6f 20 63 6f 6d 70 |k SELECT| to comp|
|000049b0| 6c 65 74 65 6c 79 20 65 | 6d 70 74 79 20 74 68 65 |letely e|mpty the|
|000049c0| 20 63 75 72 72 65 6e 74 | 20 6b 65 79 73 74 72 69 | current| keystri|
|000049d0| 70 20 66 6f 72 20 61 20 | 66 72 65 73 68 20 73 74 |p for a |fresh st|
|000049e0| 61 72 74 2e 22 29 0d 11 | 94 65 20 20 20 20 20 20 |art.")..|.e      |
|000049f0| 20 20 20 20 20 20 c9 20 | 34 3a f2 53 65 6e 64 28 |      . |4:.Send(|
|00004a00| 22 55 73 65 20 74 68 69 | 73 20 6f 70 74 69 6f 6e |"Use thi|s option|
|00004a10| 20 74 6f 20 73 65 74 20 | 74 68 65 20 6e 61 6d 65 | to set |the name|
|00004a20| 20 6f 66 20 74 68 65 20 | 61 70 70 6c 69 63 61 74 | of the |applicat|
|00004a30| 69 6f 6e 20 74 6f 20 75 | 73 65 20 74 68 69 73 20 |ion to u|se this |
|00004a40| 6b 65 79 73 74 72 69 70 | 2e 22 29 0d 11 9e 65 20 |keystrip|.")...e |
|00004a50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004a60| 20 20 f2 53 65 6e 64 28 | 22 54 68 65 20 6e 61 6d |  .Send(|"The nam|
|00004a70| 65 20 73 68 6f 75 6c 64 | 20 62 65 20 65 78 61 63 |e should| be exac|
|00004a80| 74 6c 79 20 61 73 20 69 | 74 20 61 70 70 65 61 72 |tly as i|t appear|
|00004a90| 73 20 69 6e 20 74 68 65 | 20 54 61 73 6b 20 4d 61 |s in the| Task Ma|
|00004aa0| 6e 61 67 65 72 20 64 69 | 73 70 6c 61 79 2e 22 29 |nager di|splay.")|
|00004ab0| 0d 11 a8 23 20 20 20 20 | 20 20 20 20 20 20 20 20 |...#    |        |
|00004ac0| c9 20 35 3a c8 8e 20 4d | 65 6e 75 48 65 6c 70 21 |. 5:.. M|enuHelp!|
|00004ad0| 34 20 ca 0d 11 b2 78 20 | 20 20 20 20 20 20 20 20 |4 ....x |        |
|00004ae0| 20 20 20 20 20 20 20 20 | 20 20 20 20 c9 20 30 3a |        |    . 0:|
|00004af0| f2 53 65 6e 64 28 22 54 | 68 69 73 20 6f 70 74 69 |.Send("T|his opti|
|00004b00| 6f 6e 20 77 69 6c 6c 20 | 75 70 64 61 74 65 20 74 |on will |update t|
|00004b10| 68 65 20 72 65 63 6f 72 | 64 20 66 6f 72 20 74 68 |he recor|d for th|
|00004b20| 65 20 6b 65 79 73 74 72 | 69 70 20 79 6f 75 20 73 |e keystr|ip you s|
|00004b30| 74 61 72 74 65 64 20 65 | 64 69 74 69 6e 67 20 69 |tarted e|diting i|
|00004b40| 6e 69 74 69 61 6c 6c 79 | 2e 22 29 0d 11 bc 62 20 |nitially|.")...b |
|00004b50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004b60| 20 20 20 20 20 20 20 20 | 20 20 20 f2 53 65 6e 64 |        |   .Send|
|00004b70| 28 22 54 68 65 20 6f 70 | 74 69 6f 6e 20 69 73 20 |("The op|tion is |
|00004b80| 75 6e 61 76 61 69 6c 61 | 62 6c 65 20 69 66 20 79 |unavaila|ble if y|
|00004b90| 6f 75 20 68 61 76 65 20 | 75 73 65 64 20 27 43 6c |ou have |used 'Cl|
|00004ba0| 65 61 72 20 73 74 72 69 | 70 27 2e 22 29 0d 11 c6 |ear stri|p'.")...|
|00004bb0| 52 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |R       |        |
|00004bc0| 20 20 20 20 20 20 c9 20 | 31 3a f2 53 65 6e 64 28 |      . |1:.Send(|
|00004bd0| 22 43 6c 69 63 6b 20 53 | 45 4c 45 43 54 20 74 6f |"Click S|ELECT to|
|00004be0| 20 63 72 65 61 74 65 20 | 61 20 62 72 61 6e 64 20 | create |a brand |
|00004bf0| 6e 65 77 20 6b 65 79 73 | 74 72 69 70 2e 22 29 0d |new keys|trip.").|
|00004c00| 11 d0 71 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..q     |        |
|00004c10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 f2 |        |       .|
|00004c20| 53 65 6e 64 28 22 54 68 | 65 20 6f 70 74 69 6f 6e |Send("Th|e option|
|00004c30| 20 77 69 6c 6c 20 62 65 | 20 75 6e 61 76 61 69 6c | will be| unavail|
|00004c40| 61 62 6c 65 20 69 66 20 | 79 6f 75 20 68 61 76 65 |able if |you have|
|00004c50| 20 61 6c 72 65 61 64 79 | 20 64 65 66 69 6e 65 64 | already| defined|
|00004c60| 20 33 32 20 6b 65 79 73 | 74 72 69 70 73 2e 22 29 | 32 keys|trips.")|
|00004c70| 0d 11 da 57 20 20 20 20 | 20 20 20 20 20 20 20 20 |...W    |        |
|00004c80| 20 20 20 20 20 20 20 20 | 20 7f 3a f2 53 65 6e 64 |        | .:.Send|
|00004c90| 28 22 4d 6f 76 65 20 74 | 68 65 20 70 6f 69 6e 74 |("Move t|he point|
|00004ca0| 65 72 20 72 69 67 68 74 | 20 74 6f 20 73 61 76 65 |er right| to save|
|00004cb0| 20 74 68 65 20 65 64 69 | 74 65 64 20 6b 65 79 73 | the edi|ted keys|
|00004cc0| 74 72 69 70 2e 22 29 0d | 11 e4 18 20 20 20 20 20 |trip.").|...     |
|00004cd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 cb 0d |        |      ..|
|00004ce0| 11 ee 3e 20 20 20 20 20 | 20 20 20 20 20 20 20 7f |..>     |       .|
|00004cf0| 3a f2 53 65 6e 64 28 22 | 54 68 69 73 20 69 73 20 |:.Send("|This is |
|00004d00| 4b 65 79 20 57 69 6e 64 | 6f 77 27 73 20 6b 65 79 |Key Wind|ow's key|
|00004d10| 73 74 72 69 70 20 6d 65 | 6e 75 2e 22 29 0d 11 f8 |strip me|nu.")...|
|00004d20| 0f 20 20 20 20 20 20 20 | 20 20 20 cb 0d 12 02 0b |.       |   .....|
|00004d30| 20 20 20 20 20 20 cb 0d | 12 0c 09 20 20 20 20 cd |      ..|...    .|
|00004d40| 0d 12 16 05 cb 0d 12 20 | 07 20 20 3a 0d 12 2a 11 |....... |.  :..*.|
|00004d50| 3f 48 65 6c 70 49 6e 66 | 6f 20 3d 20 30 0d 12 34 |?HelpInf|o = 0..4|
|00004d60| 24 42 6c 6f 63 6b 21 30 | 3d 28 48 65 6c 70 49 6e |$Block!0|=(HelpIn|
|00004d70| 66 6f 2b 34 2d 42 6c 6f | 63 6b 29 20 80 20 ac 20 |fo+4-Blo|ck) . . |
|00004d80| 33 0d 12 3e 2a c8 99 20 | 22 57 69 6d 70 5f 53 65 |3..>*.. |"Wimp_Se|
|00004d90| 6e 64 4d 65 73 73 61 67 | 65 22 2c 31 37 2c 42 6c |ndMessag|e",17,Bl|
|00004da0| 6f 63 6b 2c 42 6c 6f 63 | 6b 21 34 0d 12 48 05 e1 |ock,Bloc|k!4..H..|
|00004db0| 0d 12 52 05 3a 0d 12 5c | 12 dd 20 f2 53 65 6e 64 |..R.:..\|.. .Send|
|00004dc0| 28 54 65 78 74 24 29 0d | 12 66 18 24 48 65 6c 70 |(Text$).|.f.$Help|
|00004dd0| 49 6e 66 6f 3d 54 65 78 | 74 24 2b 22 7c 4d 22 0d |Info=Tex|t$+"|M".|
|00004de0| 12 70 18 48 65 6c 70 49 | 6e 66 6f 2b 3d a9 28 54 |.p.HelpI|nfo+=.(T|
|00004df0| 65 78 74 24 29 2b 32 0d | 12 7a 05 e1 0d 12 84 05 |ext$)+2.|.z......|
|00004e00| 3a 0d 12 8e 28 dd 20 f2 | 75 70 64 61 74 65 49 63 |:...(. .|updateIc|
|00004e10| 6f 6e 54 65 78 74 28 57 | 69 6e 64 6f 77 2c 49 63 |onText(W|indow,Ic|
|00004e20| 6f 6e 2c 54 65 78 74 24 | 29 0d 12 98 62 49 63 6f |on,Text$|)...bIco|
|00004e30| 6e 42 6c 6f 63 6b 21 30 | 3d 57 69 6e 64 6f 77 3a |nBlock!0|=Window:|
|00004e40| 49 63 6f 6e 42 6c 6f 63 | 6b 21 34 3d 49 63 6f 6e |IconBloc|k!4=Icon|
|00004e50| 3a c8 99 20 22 57 69 6d | 70 5f 47 65 74 49 63 6f |:.. "Wim|p_GetIco|
|00004e60| 6e 53 74 61 74 65 22 2c | 2c 49 63 6f 6e 42 6c 6f |nState",|,IconBlo|
|00004e70| 63 6b 3a 4f 6c 64 54 65 | 78 74 24 3d 24 28 49 63 |ck:OldTe|xt$=$(Ic|
|00004e80| 6f 6e 42 6c 6f 63 6b 21 | 32 38 29 0d 12 a2 17 e7 |onBlock!|28).....|
|00004e90| 20 4f 6c 64 54 65 78 74 | 24 3c 3e 54 65 78 74 24 | OldText|$<>Text$|
|00004ea0| 20 8c 0d 12 ac 38 20 20 | 49 63 6f 6e 42 6c 6f 63 | ....8  |IconBloc|
|00004eb0| 6b 21 38 3d 30 3a 49 63 | 6f 6e 42 6c 6f 63 6b 21 |k!8=0:Ic|onBlock!|
|00004ec0| 31 32 3d 30 3a 24 28 49 | 63 6f 6e 42 6c 6f 63 6b |12=0:$(I|conBlock|
|00004ed0| 21 32 38 29 3d 54 65 78 | 74 24 0d 12 b6 27 20 20 |!28)=Tex|t$...'  |
|00004ee0| c8 99 20 22 57 69 6d 70 | 5f 53 65 74 49 63 6f 6e |.. "Wimp|_SetIcon|
|00004ef0| 53 74 61 74 65 22 2c 2c | 49 63 6f 6e 42 6c 6f 63 |State",,|IconBloc|
|00004f00| 6b 0d 12 c0 05 cd 0d 12 | ca 05 e1 0d 12 d4 05 3a |k.......|.......:|
|00004f10| 0d 12 de 15 dd 20 f2 4d | 6f 6e 69 74 6f 72 50 6f |..... .M|onitorPo|
|00004f20| 69 6e 74 65 72 0d 12 e8 | 3f c8 99 20 22 57 69 6d |inter...|?.. "Wim|
|00004f30| 70 5f 47 65 74 50 6f 69 | 6e 74 65 72 49 6e 66 6f |p_GetPoi|nterInfo|
|00004f40| 22 2c 2c 42 6c 6f 63 6b | 3a 4d 6f 75 73 65 78 3d |",,Block|:Mousex=|
|00004f50| 42 6c 6f 63 6b 21 30 3a | 42 6c 6f 63 6b 21 30 3d |Block!0:|Block!0=|
|00004f60| 4b 65 79 73 0d 12 f2 23 | c8 99 20 22 57 69 6d 70 |Keys...#|.. "Wimp|
|00004f70| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00004f80| 2c 2c 42 6c 6f 63 6b 0d | 12 fc 1c e7 20 4d 6f 75 |,,Block.|.... Mou|
|00004f90| 73 65 78 3e 28 42 6c 6f | 63 6b 21 31 32 29 2d 36 |sex>(Blo|ck!12)-6|
|00004fa0| 34 20 8c 0d 13 06 2f 20 | 20 42 6c 6f 63 6b 21 32 |4 ..../ | Block!2|
|00004fb0| 30 2b 3d 31 32 38 3a c8 | 99 20 22 57 69 6d 70 5f |0+=128:.|. "Wimp_|
|00004fc0| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 42 6c 6f |OpenWind|ow",,Blo|
|00004fd0| 63 6b 0d 13 10 05 cd 0d | 13 1a 1b e7 20 4d 6f 75 |ck......|.... Mou|
|00004fe0| 73 65 78 3c 28 42 6c 6f | 63 6b 21 34 29 2b 36 34 |sex<(Blo|ck!4)+64|
|00004ff0| 20 8c 0d 13 24 2f 20 20 | 42 6c 6f 63 6b 21 32 30 | ...$/  |Block!20|
|00005000| 2d 3d 31 32 38 3a c8 99 | 20 22 57 69 6d 70 5f 4f |-=128:..| "Wimp_O|
|00005010| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 42 6c 6f 63 |penWindo|w",,Bloc|
|00005020| 6b 0d 13 2e 05 cd 0d 13 | 38 05 e1 0d 13 42 05 3a |k.......|8....B.:|
|00005030| 0d 13 4c 11 dd 20 f2 44 | 6f 43 6f 6d 70 72 65 73 |..L.. .D|oCompres|
|00005040| 73 0d 13 56 28 e7 20 28 | 28 58 70 69 78 65 6c 73 |s..V(. (|(Xpixels|
|00005050| 2d 31 29 2a 32 5e 58 45 | 69 67 46 61 63 74 6f 72 |-1)*2^XE|igFactor|
|00005060| 29 3e 3d 33 32 39 36 20 | 8c 0d 13 60 10 20 20 43 |)>=3296 |...`.  C|
|00005070| 6f 6d 70 72 65 73 73 3d | a3 0d 13 6a 3c 20 20 4f |ompress=|...j<  O|
|00005080| 70 74 4d 65 6e 75 21 28 | 32 38 2b 37 32 29 3d 28 |ptMenu!(|28+72)=(|
|00005090| 28 4f 70 74 4d 65 6e 75 | 21 28 32 38 2b 37 32 29 |(OptMenu|!(28+72)|
|000050a0| 29 20 80 20 ac 20 31 29 | 20 82 20 30 3a f4 20 55 |) . . 1)| . 0:. U|
|000050b0| 6e 74 69 63 6b 0d 13 74 | 47 20 20 4f 70 74 4d 65 |ntick..t|G  OptMe|
|000050c0| 6e 75 21 28 32 38 2b 38 | 30 29 3d 28 28 4f 70 74 |nu!(28+8|0)=((Opt|
|000050d0| 4d 65 6e 75 21 28 32 38 | 2b 38 30 29 29 20 80 20 |Menu!(28|+80)) . |
|000050e0| ac 20 28 31 3c 3c 32 32 | 29 29 20 82 20 28 31 3c |. (1<<22|)) . (1<|
|000050f0| 3c 32 32 29 3a f4 20 53 | 68 61 64 65 0d 13 7e 58 |<22):. S|hade..~X|
|00005100| 20 20 f4 20 49 66 20 73 | 63 72 65 65 6e 20 69 73 |  . If s|creen is|
|00005110| 20 77 69 64 65 72 20 74 | 68 61 6e 20 28 66 75 6c | wider t|han (ful|
|00005120| 6c 20 73 74 72 69 70 20 | 6d 69 6e 75 73 20 72 69 |l strip |minus ri|
|00005130| 67 68 74 20 68 61 6e 64 | 20 6c 61 62 65 6c 73 29 |ght hand| labels)|
|00005140| 2c 20 74 75 72 6e 20 43 | 6f 6d 70 72 65 73 73 20 |, turn C|ompress |
|00005150| 6f 66 66 2e 0d 13 88 05 | cd 0d 13 92 10 e7 20 43 |off.....|...... C|
|00005160| 6f 6d 70 72 65 73 73 20 | 8c 0d 13 9c 67 20 20 42 |ompress |....g  B|
|00005170| 6c 6f 63 6b 21 30 3d 30 | 3a 42 6c 6f 63 6b 21 34 |lock!0=0|:Block!4|
|00005180| 3d 2d 32 34 34 3a 42 6c | 6f 63 6b 21 38 3d 28 58 |=-244:Bl|ock!8=(X|
|00005190| 70 69 78 65 6c 73 2d 31 | 29 2a 32 5e 58 45 69 67 |pixels-1|)*2^XEig|
|000051a0| 46 61 63 74 6f 72 3a 42 | 6c 6f 63 6b 21 31 32 3d |Factor:B|lock!12=|
|000051b0| 30 3a c8 99 20 22 57 69 | 6d 70 5f 53 65 74 45 78 |0:.. "Wi|mp_SetEx|
|000051c0| 74 65 6e 74 22 2c 4b 65 | 79 73 2c 42 6c 6f 63 6b |tent",Ke|ys,Block|
|000051d0| 0d 13 a6 5c 20 20 4d 61 | 78 57 69 64 74 68 3d 28 |...\  Ma|xWidth=(|
|000051e0| 28 58 70 69 78 65 6c 73 | 2d 31 29 2a 32 5e 58 45 |(Xpixels|-1)*2^XE|
|000051f0| 69 67 46 61 63 74 6f 72 | 29 2d 38 38 2d 32 34 3a |igFactor|)-88-24:|
|00005200| f4 20 38 38 20 66 6f 72 | 20 6c 61 62 65 6c 73 2c |. 88 for| labels,|
|00005210| 20 31 36 20 28 38 2b 38 | 29 20 66 6f 72 20 74 77 | 16 (8+8|) for tw|
|00005220| 6f 20 73 6d 61 6c 6c 20 | 67 61 70 73 0d 13 b0 3b |o small |gaps...;|
|00005230| 20 20 53 6c 6f 74 57 69 | 64 74 68 3d 4d 61 78 57 |  SlotWi|dth=MaxW|
|00005240| 69 64 74 68 20 81 20 31 | 32 3a 52 65 6d 61 69 6e |idth . 1|2:Remain|
|00005250| 64 65 72 3d 28 4d 61 78 | 57 69 64 74 68 20 83 20 |der=(Max|Width . |
|00005260| 31 32 29 20 81 20 33 0d | 13 ba 05 cc 0d 13 c4 53 |12) . 3.|.......S|
|00005270| 20 20 42 6c 6f 63 6b 21 | 30 3d 30 3a 42 6c 6f 63 |  Block!|0=0:Bloc|
|00005280| 6b 21 34 3d 2d 32 34 34 | 3a 42 6c 6f 63 6b 21 38 |k!4=-244|:Block!8|
|00005290| 3d 33 33 39 30 3a 42 6c | 6f 63 6b 21 31 32 3d 30 |=3390:Bl|ock!12=0|
|000052a0| 3a c8 99 20 22 57 69 6d | 70 5f 53 65 74 45 78 74 |:.. "Wim|p_SetExt|
|000052b0| 65 6e 74 22 2c 4b 65 79 | 73 2c 42 6c 6f 63 6b 0d |ent",Key|s,Block.|
|000052c0| 13 ce 1f 20 20 53 6c 6f | 74 57 69 64 74 68 3d 32 |...  Slo|tWidth=2|
|000052d0| 36 36 3a 52 65 6d 61 69 | 6e 64 65 72 3d 30 0d 13 |66:Remai|nder=0..|
|000052e0| d8 05 cd 0d 13 e2 49 4d | 61 78 43 68 61 72 73 3d |......IM|axChars=|
|000052f0| 28 53 6c 6f 74 57 69 64 | 74 68 2d 28 32 2a 42 6f |(SlotWid|th-(2*Bo|
|00005300| 72 64 65 72 73 29 29 20 | 81 20 31 36 3a f4 20 4d |rders)) |. 16:. M|
|00005310| 61 78 20 77 68 6f 6c 65 | 20 63 68 61 72 61 63 74 |ax whole| charact|
|00005320| 65 72 73 20 70 65 72 20 | 73 6c 6f 74 0d 13 ec 13 |ers per |slot....|
|00005330| e3 20 58 3d 31 36 20 b8 | 20 36 30 20 88 20 34 0d |. X=16 .| 60 . 4.|
|00005340| 13 f6 75 20 20 6d 69 6e | 58 3d 38 38 2b 42 6f 72 |..u  min|X=88+Bor|
|00005350| 64 65 72 73 2b 28 28 28 | 58 2d 31 36 29 20 81 20 |ders+(((|X-16) . |
|00005360| 34 29 2a 53 6c 6f 74 57 | 69 64 74 68 29 2d 28 28 |4)*SlotW|idth)-((|
|00005370| 28 32 5e 58 45 69 67 46 | 61 63 74 6f 72 29 20 80 |(2^XEigF|actor) .|
|00005380| 20 28 28 28 28 58 2d 31 | 36 29 20 81 20 34 29 20 | ((((X-1|6) . 4) |
|00005390| 83 20 34 29 3e 31 29 29 | 20 80 20 28 43 6f 6d 70 |. 4)>1))| . (Comp|
|000053a0| 72 65 73 73 20 80 20 28 | 42 6f 72 64 65 72 73 3d |ress . (|Borders=|
|000053b0| 32 29 29 29 0d 14 00 61 | 20 20 f4 20 20 20 20 20 |2)))...a|  .     |
|000053c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000053d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000053e0| 20 20 5e 2d 3e 20 20 41 | 6c 6c 20 74 68 69 73 20 |  ^->  A|ll this |
|000053f0| 69 73 20 74 6f 20 63 6f | 6d 70 65 6e 73 61 74 65 |is to co|mpensate|
|00005400| 20 66 6f 72 20 73 63 61 | 6c 69 6e 67 20 70 72 6f | for sca|ling pro|
|00005410| 62 6c 65 6d 73 0d 14 0a | 5d 20 20 6d 61 78 58 3d |blems...|]  maxX=|
|00005420| 6d 69 6e 58 2b 53 6c 6f | 74 57 69 64 74 68 2d 28 |minX+Slo|tWidth-(|
|00005430| 42 6f 72 64 65 72 73 20 | 80 20 28 43 6f 6d 70 72 |Borders |. (Compr|
|00005440| 65 73 73 20 80 20 28 42 | 6f 72 64 65 72 73 3d 32 |ess . (B|orders=2|
|00005450| 29 29 29 2b 28 28 32 5e | 58 45 69 67 46 61 63 74 |)))+((2^|XEigFact|
|00005460| 6f 72 29 20 80 20 28 42 | 6f 72 64 65 72 73 3d 30 |or) . (B|orders=0|
|00005470| 29 29 0d 14 14 3d 20 20 | e7 20 58 3e 3d 33 32 20 |))...=  |. X>=32 |
|00005480| 8c 20 6d 69 6e 58 2b 3d | 38 2b 52 65 6d 61 69 6e |. minX+=|8+Remain|
|00005490| 64 65 72 3a 6d 61 78 58 | 2b 3d 38 2b 52 65 6d 61 |der:maxX|+=8+Rema|
|000054a0| 69 6e 64 65 72 3a f4 20 | 31 73 74 20 67 61 70 0d |inder:. |1st gap.|
|000054b0| 14 1e 3d 20 20 e7 20 58 | 3e 3d 34 38 20 8c 20 6d |..=  . X|>=48 . m|
|000054c0| 69 6e 58 2b 3d 38 2b 52 | 65 6d 61 69 6e 64 65 72 |inX+=8+R|emainder|
|000054d0| 3a 6d 61 78 58 2b 3d 38 | 2b 52 65 6d 61 69 6e 64 |:maxX+=8|+Remaind|
|000054e0| 65 72 3a f4 20 32 6e 64 | 20 67 61 70 0d 14 28 0f |er:. 2nd| gap..(.|
|000054f0| 20 20 e3 20 59 3d 30 20 | b8 20 34 0d 14 32 44 20 |  . Y=0 |. 4..2D |
|00005500| 20 20 20 6d 69 6e 59 3d | 2d 32 34 30 2b 28 34 38 |   minY=|-240+(48|
|00005510| 2a 59 29 3a 6d 61 78 59 | 3d 6d 69 6e 59 2b 34 38 |*Y):maxY|=minY+48|
|00005520| 2b 28 28 32 5e 59 45 69 | 67 46 61 63 74 6f 72 29 |+((2^YEi|gFactor)|
|00005530| 20 80 20 28 42 6f 72 64 | 65 72 73 3d 30 29 29 0d | . (Bord|ers=0)).|
|00005540| 14 3c 0f 20 20 20 20 e7 | 20 59 3c 34 20 8c 0d 14 |.<.    .| Y<4 ...|
|00005550| 46 1c 20 20 20 20 20 20 | f4 20 4e 6f 72 6d 61 6c |F.      |. Normal|
|00005560| 20 53 6c 6f 74 73 20 2e | 2e 2e 0d 14 50 12 20 20 | Slots .|....P.  |
|00005570| 20 20 20 20 49 63 6f 6e | 3d 58 2b 59 0d 14 5a 09 |    Icon|=X+Y..Z.|
|00005580| 20 20 20 20 cc 0d 14 64 | 22 20 20 20 20 20 20 f4 |    ...d|"      .|
|00005590| 20 52 65 64 20 46 23 20 | 6c 61 62 65 6c 20 69 63 | Red F# |label ic|
|000055a0| 6f 6e 73 20 2e 2e 2e 0d | 14 6e 20 20 20 20 20 20 |ons ....|.n      |
|000055b0| 20 6d 61 78 59 3d 30 3a | 49 63 6f 6e 3d 28 58 2d | maxY=0:|Icon=(X-|
|000055c0| 31 36 29 20 81 20 34 0d | 14 78 09 20 20 20 20 cd |16) . 4.|.x.    .|
|000055d0| 0d 14 82 3f 20 20 20 20 | 42 6c 6f 63 6b 21 30 3d |...?    |Block!0=|
|000055e0| 4b 65 79 73 3a 42 6c 6f | 63 6b 21 34 3d 49 63 6f |Keys:Blo|ck!4=Ico|
|000055f0| 6e 3a c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |n:.. "Wi|mp_GetIc|
|00005600| 6f 6e 53 74 61 74 65 22 | 2c 2c 42 6c 6f 63 6b 0d |onState"|,,Block.|
|00005610| 14 8c 23 20 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |..#    .|. "Wimp_|
|00005620| 44 65 6c 65 74 65 49 63 | 6f 6e 22 2c 2c 42 6c 6f |DeleteIc|on",,Blo|
|00005630| 63 6b 0d 14 96 3e 20 20 | 20 20 42 6c 6f 63 6b 21 |ck...>  |  Block!|
|00005640| 38 3d 6d 69 6e 58 3a 42 | 6c 6f 63 6b 21 31 32 3d |8=minX:B|lock!12=|
|00005650| 6d 69 6e 59 3a 42 6c 6f | 63 6b 21 31 36 3d 6d 61 |minY:Blo|ck!16=ma|
|00005660| 78 58 3a 42 6c 6f 63 6b | 21 32 30 3d 6d 61 78 59 |xX:Block|!20=maxY|
|00005670| 0d 14 a0 0f 20 20 20 20 | e7 20 59 3c 34 20 8c 0d |....    |. Y<4 ..|
|00005680| 14 aa 25 20 20 20 20 20 | 20 e7 20 a9 28 24 28 42 |..%     | . .($(B|
|00005690| 6c 6f 63 6b 21 32 38 29 | 29 3e 4d 61 78 43 68 61 |lock!28)|)>MaxCha|
|000056a0| 72 73 20 8c 0d 14 b4 2e | 20 20 20 20 20 20 20 20 |rs .....|        |
|000056b0| f4 20 4c 65 66 74 20 6a | 75 73 74 69 66 79 20 2d |. Left j|ustify -|
|000056c0| 20 43 6c 65 61 72 20 48 | 43 65 6e 74 72 65 20 62 | Clear H|Centre b|
|000056d0| 69 74 0d 14 be 33 20 20 | 20 20 20 20 20 20 42 6c |it...3  |      Bl|
|000056e0| 6f 63 6b 21 32 34 3d 28 | 42 6c 6f 63 6b 21 32 34 |ock!24=(|Block!24|
|000056f0| 20 80 20 ac 20 28 31 3c | 3c 33 29 29 20 82 20 28 | . . (1<|<3)) . (|
|00005700| 30 3c 3c 33 29 0d 14 c8 | 0b 20 20 20 20 20 20 cc |0<<3)...|.      .|
|00005710| 0d 14 d2 26 20 20 20 20 | 20 20 20 20 f4 20 43 65 |...&    |    . Ce|
|00005720| 6e 74 72 65 20 2d 20 53 | 65 74 20 56 43 65 6e 74 |ntre - S|et VCent|
|00005730| 72 65 20 62 69 74 0d 14 | dc 33 20 20 20 20 20 20 |re bit..|.3      |
|00005740| 20 20 42 6c 6f 63 6b 21 | 32 34 3d 28 42 6c 6f 63 |  Block!|24=(Bloc|
|00005750| 6b 21 32 34 20 80 20 ac | 20 28 31 3c 3c 33 29 29 |k!24 . .| (1<<3))|
|00005760| 20 82 20 28 31 3c 3c 33 | 29 0d 14 e6 0b 20 20 20 | . (1<<3|)....   |
|00005770| 20 20 20 cd 0d 14 f0 09 | 20 20 20 20 cd 0d 14 fa |   .....|    ....|
|00005780| 32 20 20 20 20 42 6c 6f | 63 6b 21 34 3d 4b 65 79 |2    Blo|ck!4=Key|
|00005790| 73 3a c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |s:.. "Wi|mp_Creat|
|000057a0| 65 49 63 6f 6e 22 2c 2c | 42 6c 6f 63 6b 2b 34 0d |eIcon",,|Block+4.|
|000057b0| 15 04 09 20 20 ed 20 59 | 0d 15 0e 07 ed 20 58 0d |...  . Y|..... X.|
|000057c0| 15 18 05 e1 0d 15 22 05 | 3a 0d 15 2c 1b dd 20 f2 |......".|:..,.. .|
|000057d0| 44 6f 4a 75 73 74 69 66 | 79 28 57 68 69 63 68 49 |DoJustif|y(WhichI|
|000057e0| 63 6f 6e 29 0d 15 36 40 | 42 6c 6f 63 6b 21 30 3d |con)..6@|Block!0=|
|000057f0| 4b 65 79 73 3a 42 6c 6f | 63 6b 21 34 3d 57 68 69 |Keys:Blo|ck!4=Whi|
|00005800| 63 68 49 63 6f 6e 3a c8 | 99 20 22 57 69 6d 70 5f |chIcon:.|. "Wimp_|
|00005810| 47 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 42 |GetIconS|tate",,B|
|00005820| 6c 6f 63 6b 0d 15 40 30 | e7 20 a9 28 24 28 42 6c |lock..@0|. .($(Bl|
|00005830| 6f 63 6b 21 32 38 29 29 | 3e 28 28 42 6c 6f 63 6b |ock!28))|>((Block|
|00005840| 21 31 36 2d 42 6c 6f 63 | 6b 21 38 29 20 81 20 31 |!16-Bloc|k!8) . 1|
|00005850| 36 29 20 8c 0d 15 4a 33 | 20 20 42 6c 6f 63 6b 21 |6) ...J3|  Block!|
|00005860| 38 3d 28 30 3c 3c 33 29 | 3a 42 6c 6f 63 6b 21 31 |8=(0<<3)|:Block!1|
|00005870| 32 3d 28 31 3c 3c 33 29 | 3a f4 20 4a 75 73 74 69 |2=(1<<3)|:. Justi|
|00005880| 66 79 20 4c 65 66 74 0d | 15 54 05 cc 0d 15 5e 35 |fy Left.|.T....^5|
|00005890| 20 20 42 6c 6f 63 6b 21 | 38 3d 28 31 3c 3c 33 29 |  Block!|8=(1<<3)|
|000058a0| 3a 42 6c 6f 63 6b 21 31 | 32 3d 28 31 3c 3c 33 29 |:Block!1|2=(1<<3)|
|000058b0| 3a f4 20 4a 75 73 74 69 | 66 79 20 43 65 6e 74 72 |:. Justi|fy Centr|
|000058c0| 65 0d 15 68 05 cd 0d 15 | 72 21 c8 99 20 22 57 69 |e..h....|r!.. "Wi|
|000058d0| 6d 70 5f 53 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_SetIc|onState"|
|000058e0| 2c 2c 42 6c 6f 63 6b 0d | 15 7c 05 e1 0d 15 86 05 |,,Block.|.|......|
|000058f0| 3a 0d 15 90 16 dd 20 f2 | 52 65 61 64 49 6e 4b 65 |:..... .|ReadInKe|
|00005900| 79 73 74 72 69 70 73 0d | 15 9a 15 c8 99 20 22 48 |ystrips.|..... "H|
|00005910| 6f 75 72 67 6c 61 73 73 | 5f 4f 6e 22 0d 15 a4 52 |ourglass|_On"...R|
|00005920| c8 99 20 22 4f 53 5f 46 | 53 43 6f 6e 74 72 6f 6c |.. "OS_F|SControl|
|00005930| 22 2c 32 38 2c 22 3c 4b | 65 79 57 69 6e 64 6f 77 |",28,"<K|eyWindow|
|00005940| 24 44 69 72 3e 2e 44 61 | 74 61 2e 2a 22 20 b8 20 |$Dir>.Da|ta.*" . |
|00005950| 2c 2c 2c 66 69 6c 65 73 | 3a e7 20 66 69 6c 65 73 |,,,files|:. files|
|00005960| 3e 33 32 20 8c 20 66 69 | 6c 65 73 3d 33 32 0d 15 |>32 . fi|les=32..|
|00005970| ae 49 70 6f 69 6e 74 65 | 72 3d 30 3a 4d 25 3d 4c |.Ipointe|r=0:M%=L|
|00005980| 69 73 74 4d 65 6e 75 3a | f2 4d 65 6e 75 5f 69 6e |istMenu:|.Menu_in|
|00005990| 69 74 28 22 41 70 70 6c | 69 63 61 74 69 6f 6e 73 |it("Appl|ications|
|000059a0| 22 29 3a 4d 25 21 31 36 | 3d 32 30 2a 31 36 3a 6f |"):M%!16|=20*16:o|
|000059b0| 66 66 73 65 74 3d 30 0d | 15 b8 13 e3 20 4e 3d 30 |ffset=0.|.... N=0|
|000059c0| 20 b8 20 66 69 6c 65 73 | 2d 31 0d 15 c2 4f c8 99 | . files|-1...O..|
|000059d0| 20 22 4f 53 5f 47 42 50 | 42 22 2c 39 2c 22 3c 4b | "OS_GBP|B",9,"<K|
|000059e0| 65 79 57 69 6e 64 6f 77 | 24 44 69 72 3e 2e 44 61 |eyWindow|$Dir>.Da|
|000059f0| 74 61 22 2c 42 6c 6f 63 | 6b 2c 31 2c 70 6f 69 6e |ta",Bloc|k,1,poin|
|00005a00| 74 65 72 2c 32 35 36 2c | 22 2a 22 20 b8 20 2c 2c |ter,256,|"*" . ,,|
|00005a10| 2c 2c 70 6f 69 6e 74 65 | 72 0d 15 cc 45 46 69 6c |,,pointe|r...EFil|
|00005a20| 65 6e 61 6d 65 24 28 4e | 29 3d 22 22 3a 4d 3d 30 |ename$(N|)="":M=0|
|00005a30| 3a c8 95 20 42 6c 6f 63 | 6b 3f 4d 3c 3e 30 3a 46 |:.. Bloc|k?M<>0:F|
|00005a40| 69 6c 65 6e 61 6d 65 24 | 28 4e 29 2b 3d bd 28 42 |ilename$|(N)+=.(B|
|00005a50| 6c 6f 63 6b 3f 4d 29 3a | 4d 2b 3d 31 3a ce 0d 15 |lock?M):|M+=1:...|
|00005a60| d6 2d 58 3d 8e 28 22 3c | 4b 65 79 57 69 6e 64 6f |.-X=.("<|KeyWindo|
|00005a70| 77 24 44 69 72 3e 2e 44 | 61 74 61 2e 22 2b 46 69 |w$Dir>.D|ata."+Fi|
|00005a80| 6c 65 6e 61 6d 65 24 28 | 4e 29 29 0d 15 e0 22 54 |lename$(|N))..."T|
|00005a90| 69 74 6c 65 24 28 4e 29 | 3d be 23 58 3a 54 61 73 |itle$(N)|=.#X:Tas|
|00005aa0| 6b 6e 61 6d 65 24 28 4e | 29 3d be 23 58 0d 15 ea |kname$(N|)=.#X...|
|00005ab0| 42 50 25 21 30 3d 30 3a | 50 25 21 34 3d 2d 31 3a |BP%!0=0:|P%!4=-1:|
|00005ac0| 50 25 21 38 3d 26 30 37 | 30 30 33 31 32 39 3a 24 |P%!8=&07|003129:$|
|00005ad0| 28 4d 65 6e 75 74 65 78 | 74 2b 6f 66 66 73 65 74 |(Menutex|t+offset|
|00005ae0| 29 3d 54 69 74 6c 65 24 | 28 4e 29 2b bd 31 33 0d |)=Title$|(N)+.13.|
|00005af0| 15 f4 2a 50 25 21 31 32 | 3d 4d 65 6e 75 74 65 78 |..*P%!12|=Menutex|
|00005b00| 74 2b 6f 66 66 73 65 74 | 3a 50 25 21 31 36 3d 30 |t+offset|:P%!16=0|
|00005b10| 3a 50 25 21 32 30 3d 32 | 31 0d 15 fe 15 6f 66 66 |:P%!20=2|1....off|
|00005b20| 73 65 74 2b 3d 32 31 3a | 50 25 2b 3d 32 34 0d 16 |set+=21:|P%+=24..|
|00005b30| 08 0a 4b 3d 2d 31 3a f5 | 0d 16 12 1c 20 20 f5 3a |..K=-1:.|....  .:|
|00005b40| 4b 2b 3d 31 3a 41 24 3d | be 23 58 3a fd 20 41 24 |K+=1:A$=|.#X:. A$|
|00005b50| 3c 3e 22 22 0d 16 1c 0b | 20 20 4d 3d 30 3a f5 0d |<>""....|  M=0:..|
|00005b60| 16 26 16 20 20 20 20 63 | 6f 6d 6d 61 3d a7 41 24 |.&.    c|omma=.A$|
|00005b70| 2c 22 2c 22 29 0d 16 30 | 2e 20 20 20 20 54 24 3d |,",")..0|.    T$=|
|00005b80| c0 41 24 2c 63 6f 6d 6d | 61 2d 31 29 3a e7 20 a9 |.A$,comm|a-1):. .|
|00005b90| 20 54 24 3e 31 36 20 8c | 20 54 24 3d c0 54 24 2c | T$>16 .| T$=.T$,|
|00005ba0| 31 36 29 0d 16 3a 1b 20 | 20 20 20 41 24 3d c2 41 |16)..:. |   A$=.A|
|00005bb0| 24 2c a9 28 41 24 29 2d | 63 6f 6d 6d 61 29 0d 16 |$,.(A$)-|comma)..|
|00005bc0| 44 1d 20 20 20 20 49 63 | 6f 6e 44 61 74 61 24 28 |D.    Ic|onData$(|
|00005bd0| 4e 2c 34 2a 4b 2b 4d 29 | 3d 54 24 0d 16 4e 0c 20 |N,4*K+M)|=T$..N. |
|00005be0| 20 20 20 4d 2b 3d 31 0d | 16 58 15 20 20 fd 20 4d |   M+=1.|.X.  . M|
|00005bf0| 3d 34 20 84 20 63 6f 6d | 6d 61 3d 30 0d 16 62 10 |=4 . com|ma=0..b.|
|00005c00| fd 20 4b 3d 31 31 20 84 | 20 c5 23 58 0d 16 6c 07 |. K=11 .| .#X..l.|
|00005c10| d9 23 58 0d 16 76 17 ed | 20 4e 3a 50 25 2d 3d 32 |.#X..v..| N:P%-=2|
|00005c20| 34 3a 50 25 21 30 3d 31 | 32 38 0d 16 80 16 c8 99 |4:P%!0=1|28......|
|00005c30| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 66 66 22 | "Hourgl|ass_Off"|
|00005c40| 0d 16 8a 05 e1 0d 16 94 | 05 3a 0d 16 9e 1d dd 20 |........|.:..... |
|00005c50| f2 75 70 64 61 74 65 4b | 65 79 73 57 69 6e 64 6f |.updateK|eysWindo|
|00005c60| 77 28 64 61 74 61 29 0d | 16 a8 32 f4 20 46 69 6e |w(data).|..2. Fin|
|00005c70| 64 20 6f 75 74 20 74 68 | 65 20 68 65 69 67 68 74 |d out th|e height|
|00005c80| 20 6f 66 20 61 20 77 69 | 6e 64 6f 77 27 73 20 74 | of a wi|ndow's t|
|00005c90| 69 74 6c 65 20 62 61 72 | 3a 0d 16 b2 42 42 6c 6f |itle bar|:...BBlo|
|00005ca0| 63 6b 21 30 3d 4b 65 79 | 73 3a c8 99 20 22 57 69 |ck!0=Key|s:.. "Wi|
|00005cb0| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|00005cc0| 65 22 2c 2c 42 6c 6f 63 | 6b 3a 57 41 72 65 61 54 |e",,Bloc|k:WAreaT|
|00005cd0| 6f 70 3d 42 6c 6f 63 6b | 21 31 36 0d 16 bc 1f c8 |op=Block|!16.....|
|00005ce0| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |. "Wimp_|OpenWind|
|00005cf0| 6f 77 22 2c 2c 42 6c 6f | 63 6b 0d 16 c6 36 c8 99 |ow",,Blo|ck...6..|
|00005d00| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|00005d10| 4f 75 74 6c 69 6e 65 22 | 2c 2c 42 6c 6f 63 6b 3a |Outline"|,,Block:|
|00005d20| 54 42 61 72 54 6f 70 3d | 42 6c 6f 63 6b 21 31 36 |TBarTop=|Block!16|
|00005d30| 0d 16 d0 3c 54 42 61 72 | 48 65 69 67 68 74 3d 54 |...<TBar|Height=T|
|00005d40| 42 61 72 54 6f 70 2d 57 | 41 72 65 61 54 6f 70 3a |BarTop-W|AreaTop:|
|00005d50| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |.. "Wimp|_CloseWi|
|00005d60| 6e 64 6f 77 22 2c 2c 42 | 6c 6f 63 6b 0d 16 da 29 |ndow",,B|lock...)|
|00005d70| f4 20 2e 2e 2e 20 61 6e | 64 20 6e 6f 77 20 64 6f |. ... an|d now do|
|00005d80| 20 74 68 65 20 69 6d 70 | 6f 72 74 61 6e 74 20 73 | the imp|ortant s|
|00005d90| 74 75 66 66 3a 0d 16 e4 | 16 f2 72 65 61 64 6d 6f |tuff:...|..readmo|
|00005da0| 64 65 76 61 72 69 61 62 | 6c 65 73 0d 16 ee 2f 4b |devariab|les.../K|
|00005db0| 65 79 73 57 21 30 3d 4b | 65 79 73 3a c8 99 20 22 |eysW!0=K|eys:.. "|
|00005dc0| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 49 6e |Wimp_Get|WindowIn|
|00005dd0| 66 6f 22 2c 2c 4b 65 79 | 73 57 0d 16 f8 57 e7 20 |fo",,Key|sW...W. |
|00005de0| 64 61 74 61 3e 2d 31 20 | 8c 20 41 63 74 69 76 65 |data>-1 |. Active|
|00005df0| 53 74 72 69 70 3d 64 61 | 74 61 3a 54 68 69 73 54 |Strip=da|ta:ThisT|
|00005e00| 61 73 6b 24 3d 54 61 73 | 6b 6e 61 6d 65 24 28 64 |ask$=Tas|kname$(d|
|00005e10| 61 74 61 29 3a 24 28 4b | 65 79 73 57 21 37 36 29 |ata):$(K|eysW!76)|
|00005e20| 3d 54 69 74 6c 65 24 28 | 64 61 74 61 29 2b bd 31 |=Title$(|data)+.1|
|00005e30| 33 0d 17 02 85 4b 65 79 | 73 57 21 34 3d 30 3a 4b |3....Key|sW!4=0:K|
|00005e40| 65 79 73 57 21 31 32 3d | 28 58 70 69 78 65 6c 73 |eysW!12=|(Xpixels|
|00005e50| 2d 31 29 2a 28 32 5e 58 | 45 69 67 46 61 63 74 6f |-1)*(2^X|EigFacto|
|00005e60| 72 29 3a e7 20 4f 70 65 | 6e 41 74 54 6f 70 20 8c |r):. Ope|nAtTop .|
|00005e70| 20 4b 65 79 73 57 21 31 | 36 3d 28 59 70 69 78 65 | KeysW!1|6=(Ypixe|
|00005e80| 6c 73 2b 31 29 2a 28 32 | 5e 59 45 69 67 46 61 63 |ls+1)*(2|^YEigFac|
|00005e90| 74 6f 72 29 2d 54 42 61 | 72 48 65 69 67 68 74 3a |tor)-TBa|rHeight:|
|00005ea0| 4b 65 79 73 57 21 38 3d | 28 4b 65 79 73 57 21 31 |KeysW!8=|(KeysW!1|
|00005eb0| 36 29 2d 32 34 32 0d 17 | 0c 2c e7 20 64 61 74 61 |6)-242..|.,. data|
|00005ec0| 3d 2d 32 20 8c 20 24 28 | 4b 65 79 73 57 21 37 36 |=-2 . $(|KeysW!76|
|00005ed0| 29 3d 22 3c 55 6e 74 69 | 74 6c 65 64 3e 22 2b bd |)="<Unti|tled>"+.|
|00005ee0| 31 33 0d 17 16 2e e7 20 | 64 61 74 61 3d 2d 33 20 |13..... |data=-3 |
|00005ef0| 8c 20 24 28 4b 65 79 73 | 57 21 37 36 29 3d 24 74 |. $(Keys|W!76)=$t|
|00005f00| 69 74 6c 65 6c 65 61 66 | 74 65 78 74 2b bd 31 33 |itleleaf|text+.13|
|00005f10| 0d 17 20 48 c8 99 20 22 | 57 69 6d 70 5f 44 65 6c |.. H.. "|Wimp_Del|
|00005f20| 65 74 65 57 69 6e 64 6f | 77 22 2c 2c 4b 65 79 73 |eteWindo|w",,Keys|
|00005f30| 57 3a c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |W:.. "Wi|mp_Creat|
|00005f40| 65 57 69 6e 64 6f 77 22 | 2c 2c 4b 65 79 73 57 2b |eWindow"|,,KeysW+|
|00005f50| 34 20 b8 20 4b 65 79 73 | 0d 17 2a 49 e7 20 64 61 |4 . Keys|..*I. da|
|00005f60| 74 61 3e 2d 31 20 8c 20 | e3 20 4e 3d 30 20 b8 20 |ta>-1 . |. N=0 . |
|00005f70| 34 37 3a f2 75 70 64 61 | 74 65 49 63 6f 6e 54 65 |47:.upda|teIconTe|
|00005f80| 78 74 28 4b 65 79 73 2c | 4e 2b 31 36 2c 49 63 6f |xt(Keys,|N+16,Ico|
|00005f90| 6e 44 61 74 61 24 28 64 | 61 74 61 2c 4e 29 29 3a |nData$(d|ata,N)):|
|00005fa0| ed 0d 17 34 36 e7 20 64 | 61 74 61 3e 2d 31 20 80 |...46. d|ata>-1 .|
|00005fb0| 20 43 6f 6d 70 72 65 73 | 73 20 8c 20 e3 20 4e 3d | Compres|s . . N=|
|00005fc0| 31 36 20 b8 20 36 33 3a | f2 44 6f 4a 75 73 74 69 |16 . 63:|.DoJusti|
|00005fd0| 66 79 28 4e 29 3a ed 0d | 17 3e 56 e7 20 64 61 74 |fy(N):..|.>V. dat|
|00005fe0| 61 3d 2d 32 20 8c 20 e3 | 20 4e 3d 30 20 b8 20 34 |a=-2 . .| N=0 . 4|
|00005ff0| 37 3a f2 75 70 64 61 74 | 65 49 63 6f 6e 54 65 78 |7:.updat|eIconTex|
|00006000| 74 28 4b 65 79 73 2c 4e | 2b 31 36 2c 22 22 29 3a |t(Keys,N|+16,""):|
|00006010| ed 3a 41 63 74 69 76 65 | 53 74 72 69 70 3d 2d 31 |.:Active|Strip=-1|
|00006020| 3a 54 68 69 73 54 61 73 | 6b 24 3d 22 22 0d 17 48 |:ThisTas|k$=""..H|
|00006030| 7d e7 20 64 61 74 61 3d | 2d 32 20 8c 20 f2 75 70 |}. data=|-2 . .up|
|00006040| 64 61 74 65 49 63 6f 6e | 54 65 78 74 28 4b 65 79 |dateIcon|Text(Key|
|00006050| 73 2c 36 30 2c 22 43 6f | 6d 6d 61 6e 64 20 4c 69 |s,60,"Co|mmand Li|
|00006060| 6e 65 22 29 3a f2 44 6f | 4a 75 73 74 69 66 79 28 |ne"):.Do|Justify(|
|00006070| 36 30 29 3a f2 75 70 64 | 61 74 65 49 63 6f 6e 54 |60):.upd|ateIconT|
|00006080| 65 78 74 28 4b 65 79 73 | 2c 36 33 2c 22 45 78 69 |ext(Keys|,63,"Exi|
|00006090| 74 20 44 65 73 6b 74 6f | 70 22 29 3a f2 44 6f 4a |t Deskto|p"):.DoJ|
|000060a0| 75 73 74 69 66 79 28 36 | 33 29 0d 17 52 4e f4 20 |ustify(6|3)..RN. |
|000060b0| 54 68 69 73 20 62 69 74 | 20 73 77 69 74 63 68 65 |This bit| switche|
|000060c0| 73 20 74 68 65 20 61 75 | 74 6f 6d 61 74 69 63 20 |s the au|tomatic |
|000060d0| 46 31 32 20 6c 61 62 65 | 6c 73 20 62 65 74 77 65 |F12 labe|ls betwe|
|000060e0| 65 6e 20 63 6f 6d 70 72 | 65 73 73 20 6d 6f 64 65 |en compr|ess mode|
|000060f0| 20 6f 6e 2f 6f 66 66 3a | 0d 17 5c 5f f4 20 28 2a | on/off:|..\_. (*|
|00006100| a0 43 4c 49 20 63 6f 6e | 74 61 69 6e 73 20 61 20 |.CLI con|tains a |
|00006110| 68 61 72 64 20 73 70 61 | 63 65 2c 20 73 6f 20 4b |hard spa|ce, so K|
|00006120| 57 20 6b 6e 6f 77 73 20 | 74 6f 20 72 65 70 6c 61 |W knows |to repla|
|00006130| 63 65 20 69 74 20 77 69 | 74 68 20 43 6f 6d 6d 61 |ce it wi|th Comma|
|00006140| 6e 64 20 4c 69 6e 65 20 | 64 75 72 69 6e 67 20 61 |nd Line |during a|
|00006150| 20 73 61 76 65 2e 29 0d | 17 66 10 e7 20 43 6f 6d | save.).|.f.. Com|
|00006160| 70 72 65 73 73 20 8c 0d | 17 70 3b 20 20 42 6c 6f |press ..|.p;  Blo|
|00006170| 63 6b 21 30 3d 4b 65 79 | 73 3a 42 6c 6f 63 6b 21 |ck!0=Key|s:Block!|
|00006180| 34 3d 36 30 3a c8 99 20 | 22 57 69 6d 70 5f 47 65 |4=60:.. |"Wimp_Ge|
|00006190| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 42 6c 6f |tIconSta|te",,Blo|
|000061a0| 63 6b 0d 17 7a 54 20 20 | e7 20 24 28 42 6c 6f 63 |ck..zT  |. $(Bloc|
|000061b0| 6b 21 32 38 29 3d 22 43 | 6f 6d 6d 61 6e 64 20 4c |k!28)="C|ommand L|
|000061c0| 69 6e 65 22 20 8c 20 f2 | 75 70 64 61 74 65 49 63 |ine" . .|updateIc|
|000061d0| 6f 6e 54 65 78 74 28 4b | 65 79 73 2c 36 30 2c 22 |onText(K|eys,60,"|
|000061e0| 2a a0 43 4c 49 22 29 3a | f2 44 6f 4a 75 73 74 69 |*.CLI"):|.DoJusti|
|000061f0| 66 79 28 36 30 29 0d 17 | 84 3b 20 20 42 6c 6f 63 |fy(60)..|.;  Bloc|
|00006200| 6b 21 30 3d 4b 65 79 73 | 3a 42 6c 6f 63 6b 21 34 |k!0=Keys|:Block!4|
|00006210| 3d 36 33 3a c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |=63:.. "|Wimp_Get|
|00006220| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 42 6c 6f 63 |IconStat|e",,Bloc|
|00006230| 6b 0d 17 8e 53 20 20 e7 | 20 24 28 42 6c 6f 63 6b |k...S  .| $(Block|
|00006240| 21 32 38 29 3d 22 45 78 | 69 74 20 44 65 73 6b 74 |!28)="Ex|it Deskt|
|00006250| 6f 70 22 20 8c 20 f2 75 | 70 64 61 74 65 49 63 6f |op" . .u|pdateIco|
|00006260| 6e 54 65 78 74 28 4b 65 | 79 73 2c 36 33 2c 22 45 |nText(Ke|ys,63,"E|
|00006270| 78 69 74 22 29 3a f2 44 | 6f 4a 75 73 74 69 66 79 |xit"):.D|oJustify|
|00006280| 28 36 33 29 0d 17 98 05 | cc 0d 17 a2 3b 20 20 42 |(63)....|....;  B|
|00006290| 6c 6f 63 6b 21 30 3d 4b | 65 79 73 3a 42 6c 6f 63 |lock!0=K|eys:Bloc|
|000062a0| 6b 21 34 3d 36 30 3a c8 | 99 20 22 57 69 6d 70 5f |k!4=60:.|. "Wimp_|
|000062b0| 47 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 42 |GetIconS|tate",,B|
|000062c0| 6c 6f 63 6b 0d 17 ac 54 | 20 20 e7 20 24 28 42 6c |lock...T|  . $(Bl|
|000062d0| 6f 63 6b 21 32 38 29 3d | 22 2a a0 43 4c 49 22 20 |ock!28)=|"*.CLI" |
|000062e0| 8c 20 f2 75 70 64 61 74 | 65 49 63 6f 6e 54 65 78 |. .updat|eIconTex|
|000062f0| 74 28 4b 65 79 73 2c 36 | 30 2c 22 43 6f 6d 6d 61 |t(Keys,6|0,"Comma|
|00006300| 6e 64 20 4c 69 6e 65 22 | 29 3a f2 44 6f 4a 75 73 |nd Line"|):.DoJus|
|00006310| 74 69 66 79 28 36 30 29 | 0d 17 b6 3b 20 20 42 6c |tify(60)|...;  Bl|
|00006320| 6f 63 6b 21 30 3d 4b 65 | 79 73 3a 42 6c 6f 63 6b |ock!0=Ke|ys:Block|
|00006330| 21 34 3d 36 33 3a c8 99 | 20 22 57 69 6d 70 5f 47 |!4=63:..| "Wimp_G|
|00006340| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 42 6c |etIconSt|ate",,Bl|
|00006350| 6f 63 6b 0d 17 c0 53 20 | 20 e7 20 24 28 42 6c 6f |ock...S | . $(Blo|
|00006360| 63 6b 21 32 38 29 3d 22 | 45 78 69 74 22 20 8c 20 |ck!28)="|Exit" . |
|00006370| f2 75 70 64 61 74 65 49 | 63 6f 6e 54 65 78 74 28 |.updateI|conText(|
|00006380| 4b 65 79 73 2c 36 33 2c | 22 45 78 69 74 20 44 65 |Keys,63,|"Exit De|
|00006390| 73 6b 74 6f 70 22 29 3a | f2 44 6f 4a 75 73 74 69 |sktop"):|.DoJusti|
|000063a0| 66 79 28 36 33 29 0d 17 | ca 05 cd 0d 17 d4 05 e1 |fy(63)..|........|
|000063b0| 0d 17 de 05 3a 0d 17 e8 | 12 dd 20 f2 6d 61 6b 65 |....:...|.. .make|
|000063c0| 5f 6c 65 61 76 65 73 0d | 17 f2 25 4d 25 3d 74 69 |_leaves.|..%M%=ti|
|000063d0| 74 6c 65 6c 65 61 66 3a | 24 28 74 69 74 6c 65 6c |tleleaf:|$(titlel|
|000063e0| 65 61 66 74 65 78 74 29 | 3d bd 31 33 0d 17 fc 2a |eaftext)|=.13...*|
|000063f0| f2 4d 65 6e 75 5f 69 6e | 69 74 28 22 41 70 70 6c |.Menu_in|it("Appl|
+--------+-------------------------+-------------------------+--------+--------+