/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / c / charges / !Charges / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1c f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 20 66 6f 72 20 43 68 61 | 72 67 65 73 0d 00 14 05 | for Cha|rges....|
|00000020| 3a 0d 00 1e 1c c8 99 20 | 22 48 6f 75 72 67 6c 61 |:...... |"Hourgla|
|00000030| 73 73 5f 53 74 61 72 74 | 22 2c 31 35 30 0d 00 28 |ss_Start|",150..(|
|00000040| 4d 43 6f 70 79 72 69 67 | 68 74 24 3d 22 a9 20 52 |MCopyrig|ht$=". R|
|00000050| 69 63 68 61 72 64 20 47 | 2e 20 48 61 6c 6c 61 73 |ichard G|. Hallas|
|00000060| 22 3a 56 65 72 73 69 6f | 6e 4e 75 6d 62 65 72 24 |":Versio|nNumber$|
|00000070| 3d 22 31 b7 37 30 20 28 | 31 32 2d 4d 61 72 2d 39 |="1.70 (|12-Mar-9|
|00000080| 34 29 22 3a 44 6f 6e 65 | 3d a3 0d 00 32 05 3a 0d |4)":Done|=...2.:.|
|00000090| 00 3c 7f de 20 53 70 72 | 69 74 65 73 20 39 39 35 |.<.. Spr|ites 995|
|000000a0| 32 3a 21 53 70 72 69 74 | 65 73 3d 39 39 35 32 3a |2:!Sprit|es=9952:|
|000000b0| 53 70 72 69 74 65 73 21 | 34 3d 30 3a 53 70 72 69 |Sprites!|4=0:Spri|
|000000c0| 74 65 73 21 38 3d 31 36 | 3a 53 70 72 69 74 65 73 |tes!8=16|:Sprites|
|000000d0| 21 31 32 3d 31 36 3a c8 | 99 20 22 4f 53 5f 53 70 |!12=16:.|. "OS_Sp|
|000000e0| 72 69 74 65 4f 70 22 2c | 32 35 36 2b 31 30 2c 53 |riteOp",|256+10,S|
|000000f0| 70 72 69 74 65 73 2c 22 | 3c 43 68 61 72 67 65 73 |prites,"|<Charges|
|00000100| 24 44 69 72 3e 2e 53 70 | 72 69 74 65 73 22 0d 00 |$Dir>.Sp|rites"..|
|00000110| 46 13 de 20 46 6f 6e 74 | 43 6f 6f 72 64 73 20 36 |F.. Font|Coords 6|
|00000120| 34 0d 00 50 05 3a 0d 00 | 5a ed de 20 42 6c 6f 63 |4..P.:..|Z.. Bloc|
|00000130| 6b 20 32 35 36 2c 4d 65 | 73 73 61 67 65 42 6c 6f |k 256,Me|ssageBlo|
|00000140| 63 6b 20 32 35 36 2c 4d | 65 73 73 61 67 65 42 75 |ck 256,M|essageBu|
|00000150| 66 66 65 72 20 31 35 2c | 4d 65 73 73 4d 65 6e 75 |ffer 15,|MessMenu|
|00000160| 73 20 32 35 36 2c 4d 65 | 6e 75 31 20 32 35 36 2c |s 256,Me|nu1 256,|
|00000170| 43 75 72 72 4d 65 6e 75 | 20 31 30 32 34 2c 43 6f |CurrMenu| 1024,Co|
|00000180| 75 6e 74 72 79 4d 65 6e | 75 20 35 31 32 2c 4a 6f |untryMen|u 512,Jo|
|00000190| 62 73 4d 65 6e 75 20 31 | 39 30 30 2c 45 78 63 68 |bsMenu 1|900,Exch|
|000001a0| 6e 67 4d 65 6e 75 20 35 | 32 2c 45 78 63 68 6e 67 |ngMenu 5|2,Exchng|
|000001b0| 49 74 65 6d 20 31 32 2c | 45 78 63 68 6e 67 56 61 |Item 12,|ExchngVa|
|000001c0| 6c 69 64 20 36 2c 43 75 | 72 72 57 72 69 74 49 74 |lid 6,Cu|rrWritIt|
|000001d0| 65 6d 20 36 2c 43 75 72 | 72 56 61 6c 69 64 20 31 |em 6,Cur|rValid 1|
|000001e0| 36 2c 49 63 6f 6e 44 61 | 74 61 20 31 32 2c 4a 6f |6,IconDa|ta 12,Jo|
|000001f0| 62 73 57 72 69 74 49 74 | 65 6d 20 31 31 2c 4a 6f |bsWritIt|em 11,Jo|
|00000200| 62 73 56 61 6c 69 64 20 | 31 38 2c 43 61 72 65 74 |bsValid |18,Caret|
|00000210| 20 32 34 0d 00 64 97 de | 20 49 6e 66 6f 57 20 36 | 24..d..| InfoW 6|
|00000220| 30 33 2c 49 6e 66 6f 49 | 6e 64 20 32 38 38 2c 45 |03,InfoI|nd 288,E|
|00000230| 61 72 6e 57 20 36 38 35 | 2c 45 61 72 6e 49 6e 64 |arnW 685|,EarnInd|
|00000240| 20 32 34 31 2c 4f 70 74 | 69 6f 6e 73 57 20 39 33 | 241,Opt|ionsW 93|
|00000250| 38 2c 4f 70 74 69 6f 6e | 73 49 6e 64 20 33 39 33 |8,Option|sInd 393|
|00000260| 2c 43 6f 6e 76 65 72 74 | 57 20 34 33 30 2c 43 6f |,Convert|W 430,Co|
|00000270| 6e 76 65 72 74 49 6e 64 | 20 31 37 36 2c 4a 6f 62 |nvertInd| 176,Job|
|00000280| 73 57 20 34 34 36 2c 4a | 6f 62 73 49 6e 64 20 32 |sW 446,J|obsInd 2|
|00000290| 30 33 2c 51 75 65 72 79 | 57 20 32 35 33 2c 51 75 |03,Query|W 253,Qu|
|000002a0| 65 72 79 49 6e 64 20 33 | 34 35 0d 00 6e 43 de 20 |eryInd 3|45..nC. |
|000002b0| 49 42 43 6c 6f 63 6b 54 | 65 78 74 20 38 2c 54 6f |IBClockT|ext 8,To|
|000002c0| 74 61 6c 54 72 61 6e 73 | 6d 69 74 20 32 32 2c 43 |talTrans|mit 22,C|
|000002d0| 6f 6e 76 65 72 74 54 72 | 61 6e 73 6d 69 74 20 32 |onvertTr|ansmit 2|
|000002e0| 32 2c 4d 65 6e 75 48 65 | 6c 70 20 31 36 0d 00 78 |2,MenuHe|lp 16..x|
|000002f0| 32 43 6f 75 6e 74 72 79 | 4e 61 6d 65 73 3d 31 36 |2Country|Names=16|
|00000300| 3a de 20 43 6f 75 6e 74 | 72 79 4e 61 6d 65 24 28 |:. Count|ryName$(|
|00000310| 43 6f 75 6e 74 72 79 4e | 61 6d 65 73 2d 31 29 0d |CountryN|ames-1).|
|00000320| 00 82 05 3a 0d 00 8c 19 | 2a 53 65 74 20 43 68 61 |...:....|*Set Cha|
|00000330| 72 67 65 73 24 52 49 53 | 43 4f 53 20 33 0d 00 96 |rges$RIS|COS 3...|
|00000340| 1f 2a 53 65 74 20 43 68 | 61 72 67 65 73 24 53 70 |.*Set Ch|arges$Sp|
|00000350| 72 69 74 65 44 72 61 67 | 20 59 65 73 0d 00 a0 35 |riteDrag| Yes...5|
|00000360| 2a 52 4d 45 6e 73 75 72 | 65 20 55 74 69 6c 69 74 |*RMEnsur|e Utilit|
|00000370| 79 4d 6f 64 75 6c 65 20 | 33 2e 30 30 20 53 65 74 |yModule |3.00 Set|
|00000380| 20 43 68 61 72 67 65 73 | 24 52 49 53 43 4f 53 20 | Charges|$RISCOS |
|00000390| 32 0d 00 aa 58 c8 99 20 | 22 58 4f 53 5f 52 65 61 |2...X.. |"XOS_Rea|
|000003a0| 64 56 61 72 56 61 6c 22 | 2c 22 43 68 61 72 67 65 |dVarVal"|,"Charge|
|000003b0| 73 24 52 49 53 43 4f 53 | 22 2c 42 6c 6f 63 6b 2c |s$RISCOS|",Block,|
|000003c0| 32 35 36 2c 30 2c 30 20 | b8 20 2c 2c 6c 65 6e 3a |256,0,0 |. ,,len:|
|000003d0| 42 6c 6f 63 6b 3f 6c 65 | 6e 3d 31 33 3a 77 69 6d |Block?le|n=13:wim|
|000003e0| 70 24 3d 24 42 6c 6f 63 | 6b 0d 00 b4 1c e7 20 77 |p$=$Bloc|k..... w|
|000003f0| 69 6d 70 24 3c 3e 22 33 | 22 20 8c 20 77 69 6d 70 |imp$<>"3|" . wimp|
|00000400| 24 3d 22 32 22 0d 00 be | 38 2a 52 4d 45 6e 73 75 |$="2"...|8*RMEnsu|
|00000410| 72 65 20 44 72 61 67 41 | 53 70 72 69 74 65 20 30 |re DragA|Sprite 0|
|00000420| 2e 30 30 20 53 65 74 20 | 43 68 61 72 67 65 73 24 |.00 Set |Charges$|
|00000430| 53 70 72 69 74 65 44 72 | 61 67 20 4e 6f 0d 00 c8 |SpriteDr|ag No...|
|00000440| 5f c8 99 20 22 58 4f 53 | 5f 52 65 61 64 56 61 72 |_.. "XOS|_ReadVar|
|00000450| 56 61 6c 22 2c 22 43 68 | 61 72 67 65 73 24 53 70 |Val","Ch|arges$Sp|
|00000460| 72 69 74 65 44 72 61 67 | 22 2c 42 6c 6f 63 6b 2c |riteDrag|",Block,|
|00000470| 32 35 36 2c 30 2c 30 20 | b8 20 2c 2c 6c 65 6e 3a |256,0,0 |. ,,len:|
|00000480| 42 6c 6f 63 6b 3f 6c 65 | 6e 3d 31 33 3a 64 72 61 |Block?le|n=13:dra|
|00000490| 67 73 70 72 24 3d 24 42 | 6c 6f 63 6b 0d 00 d2 34 |gspr$=$B|lock...4|
|000004a0| e7 20 64 72 61 67 73 70 | 72 24 3d 22 59 65 73 22 |. dragsp|r$="Yes"|
|000004b0| 20 8c 20 44 72 61 67 41 | 53 70 72 69 74 65 3d b9 | . DragA|Sprite=.|
|000004c0| 3a 8b 20 44 72 61 67 41 | 53 70 72 69 74 65 3d a3 |:. DragA|Sprite=.|
|000004d0| 0d 00 dc 19 2a 55 6e 73 | 65 74 20 43 68 61 72 67 |....*Uns|et Charg|
|000004e0| 65 73 24 52 49 53 43 4f | 53 0d 00 e6 1d 2a 55 6e |es$RISCO|S....*Un|
|000004f0| 73 65 74 20 43 68 61 72 | 67 65 73 24 53 70 72 69 |set Char|ges$Spri|
|00000500| 74 65 44 72 61 67 0d 00 | f0 05 3a 0d 00 fa 64 54 |teDrag..|..:...dT|
|00000510| 65 78 74 46 6f 6e 74 24 | 3d 22 22 3a c8 99 20 22 |extFont$|="":.. "|
|00000520| 58 4f 53 5f 52 65 61 64 | 56 61 72 56 61 6c 22 2c |XOS_Read|VarVal",|
|00000530| 22 57 69 6d 70 24 46 6f | 6e 74 22 2c 42 6c 6f 63 |"Wimp$Fo|nt",Bloc|
|00000540| 6b 2c 32 35 36 2c 30 2c | 30 20 b8 20 2c 2c 6c 65 |k,256,0,|0 . ,,le|
|00000550| 6e 3a 42 6c 6f 63 6b 3f | 6c 65 6e 3d 31 33 3a 54 |n:Block?|len=13:T|
|00000560| 65 78 74 46 6f 6e 74 24 | 3d 24 42 6c 6f 63 6b 0d |extFont$|=$Block.|
|00000570| 01 04 15 e7 20 54 65 78 | 74 46 6f 6e 74 24 3c 3e |.... Tex|tFont$<>|
|00000580| 22 22 20 8c 0d 01 0e 5c | 20 20 c8 99 20 22 58 4f |"" ....\|  .. "XO|
|00000590| 53 5f 52 65 61 64 56 61 | 72 56 61 6c 22 2c 22 57 |S_ReadVa|rVal","W|
|000005a0| 69 6d 70 24 46 6f 6e 74 | 53 69 7a 65 22 2c 42 6c |imp$Font|Size",Bl|
|000005b0| 6f 63 6b 2c 32 35 36 2c | 30 2c 30 20 b8 20 2c 2c |ock,256,|0,0 . ,,|
|000005c0| 6c 65 6e 3a 42 6c 6f 63 | 6b 3f 6c 65 6e 3d 31 33 |len:Bloc|k?len=13|
|000005d0| 3a 46 6f 6e 74 59 3d bb | 28 24 42 6c 6f 63 6b 29 |:FontY=.|($Block)|
|000005e0| 0d 01 18 5d 20 20 c8 99 | 20 22 58 4f 53 5f 52 65 |...]  ..| "XOS_Re|
|000005f0| 61 64 56 61 72 56 61 6c | 22 2c 22 57 69 6d 70 24 |adVarVal|","Wimp$|
|00000600| 46 6f 6e 74 57 69 64 74 | 68 22 2c 42 6c 6f 63 6b |FontWidt|h",Block|
|00000610| 2c 32 35 36 2c 30 2c 30 | 20 b8 20 2c 2c 6c 65 6e |,256,0,0| . ,,len|
|00000620| 3a 42 6c 6f 63 6b 3f 6c | 65 6e 3d 31 33 3a 46 6f |:Block?l|en=13:Fo|
|00000630| 6e 74 58 3d bb 28 24 42 | 6c 6f 63 6b 29 0d 01 22 |ntX=.($B|lock).."|
|00000640| 1d 20 20 e7 20 46 6f 6e | 74 59 3d 30 20 8c 20 46 |.  . Fon|tY=0 . F|
|00000650| 6f 6e 74 59 3d 31 32 2a | 31 36 0d 01 2c 1d 20 20 |ontY=12*|16..,.  |
|00000660| e7 20 46 6f 6e 74 58 3d | 30 20 8c 20 46 6f 6e 74 |. FontX=|0 . Font|
|00000670| 58 3d 46 6f 6e 74 59 0d | 01 36 31 20 20 46 6f 6e |X=FontY.|.61  Fon|
|00000680| 74 48 61 6e 64 6c 65 3d | a4 46 69 6e 64 46 6f 6e |tHandle=|.FindFon|
|00000690| 74 28 54 65 78 74 46 6f | 6e 74 24 2c 46 6f 6e 74 |t(TextFo|nt$,Font|
|000006a0| 58 2c 46 6f 6e 74 59 29 | 0d 01 40 43 20 20 e7 20 |X,FontY)|..@C  . |
|000006b0| 46 6f 6e 74 48 61 6e 64 | 6c 65 3d 2d 31 20 8c 20 |FontHand|le=-1 . |
|000006c0| 54 65 78 74 46 6f 6e 74 | 24 3d 22 22 20 8b 20 c8 |TextFont|$="" . .|
|000006d0| 99 20 22 46 6f 6e 74 5f | 53 65 74 46 6f 6e 74 22 |. "Font_|SetFont"|
|000006e0| 2c 46 6f 6e 74 48 61 6e | 64 6c 65 0d 01 4a 05 cc |,FontHan|dle..J..|
|000006f0| 0d 01 54 15 20 20 46 6f | 6e 74 58 3d 30 3a 46 6f |..T.  Fo|ntX=0:Fo|
|00000700| 6e 74 59 3d 30 0d 01 5e | 05 cd 0d 01 68 05 3a 0d |ntY=0..^|....h.:.|
|00000710| 01 72 11 e7 20 77 69 6d | 70 24 3d 22 33 22 20 8c |.r.. wim|p$="3" .|
|00000720| 0d 01 7c 17 20 20 de 20 | 6d 65 73 73 61 67 65 6c |..|.  . |messagel|
|00000730| 69 73 74 25 20 33 32 0d | 01 86 4b 20 20 6d 65 73 |ist% 32.|..K  mes|
|00000740| 73 61 67 65 6c 69 73 74 | 25 21 30 3d 32 3a 6d 65 |sagelist|%!0=2:me|
|00000750| 73 73 61 67 65 6c 69 73 | 74 25 21 34 3d 34 3a 6d |ssagelis|t%!4=4:m|
|00000760| 65 73 73 61 67 65 6c 69 | 73 74 25 21 38 3d 36 3a |essageli|st%!8=6:|
|00000770| 6d 65 73 73 61 67 65 6c | 69 73 74 25 21 31 32 3d |messagel|ist%!12=|
|00000780| 31 30 0d 01 90 48 20 20 | 6d 65 73 73 61 67 65 6c |10...H  |messagel|
|00000790| 69 73 74 25 21 31 36 3d | 26 35 30 32 3a 6d 65 73 |ist%!16=|&502:mes|
|000007a0| 73 61 67 65 6c 69 73 74 | 25 21 32 30 3d 26 34 30 |sagelist|%!20=&40|
|000007b0| 30 43 30 3a 6d 65 73 73 | 61 67 65 6c 69 73 74 25 |0C0:mess|agelist%|
|000007c0| 21 32 34 3d 26 34 30 30 | 43 31 0d 01 9a 17 20 20 |!24=&400|C1....  |
|000007d0| 6d 65 73 73 61 67 65 6c | 69 73 74 25 21 32 38 3d |messagel|ist%!28=|
|000007e0| 30 0d 01 a4 4b 20 20 c8 | 99 20 22 57 69 6d 70 5f |0...K  .|. "Wimp_|
|000007f0| 49 6e 69 74 69 61 6c 69 | 73 65 22 2c 33 30 30 2c |Initiali|se",300,|
|00000800| 26 34 42 35 33 34 31 35 | 34 2c 22 43 68 61 72 67 |&4B53415|4,"Charg|
|00000810| 65 73 22 2c 6d 65 73 73 | 61 67 65 6c 69 73 74 25 |es",mess|agelist%|
|00000820| 20 b8 20 77 69 6d 70 2c | 54 61 73 6b 0d 01 ae 05 | . wimp,|Task....|
|00000830| cc 0d 01 b8 3e 20 20 c8 | 99 20 22 57 69 6d 70 5f |....>  .|. "Wimp_|
|00000840| 49 6e 69 74 69 61 6c 69 | 73 65 22 2c 32 30 30 2c |Initiali|se",200,|
|00000850| 26 34 42 35 33 34 31 35 | 34 2c 22 43 68 61 72 67 |&4B53415|4,"Charg|
|00000860| 65 73 22 20 b8 20 77 69 | 6d 70 2c 54 61 73 6b 0d |es" . wi|mp,Task.|
|00000870| 01 c2 05 cd 0d 01 cc 22 | c8 99 20 22 49 6e 74 65 |......."|.. "Inte|
|00000880| 72 66 61 63 65 5f 49 6e | 69 74 69 61 6c 69 73 65 |rface_In|itialise|
|00000890| 22 2c 54 61 73 6b 0d 01 | d6 05 3a 0d 01 e0 0e ee |",Task..|..:.....|
|000008a0| 20 85 20 f2 65 72 72 6f | 72 0d 01 ea 5c c8 99 20 | . .erro|r...\.. |
|000008b0| 22 58 4f 53 5f 52 65 61 | 64 56 61 72 56 61 6c 22 |"XOS_Rea|dVarVal"|
|000008c0| 2c 22 43 68 61 72 67 65 | 73 24 43 6f 75 6e 74 72 |,"Charge|s$Countr|
|000008d0| 79 22 2c 42 6c 6f 63 6b | 2c 32 35 36 2c 30 2c 30 |y",Block|,256,0,0|
|000008e0| 20 b8 20 2c 2c 6c 65 6e | 3a 42 6c 6f 63 6b 3f 6c | . ,,len|:Block?l|
|000008f0| 65 6e 3d 31 33 3a 43 6f | 75 6e 74 72 79 24 3d 24 |en=13:Co|untry$=$|
|00000900| 42 6c 6f 63 6b 0d 01 f4 | 21 e7 20 43 6f 75 6e 74 |Block...|!. Count|
|00000910| 72 79 24 3d 22 22 20 8c | 20 43 6f 75 6e 74 72 79 |ry$="" .| Country|
|00000920| 24 3d 22 55 4b 22 0d 01 | fe 1b f2 4c 6f 61 64 4d |$="UK"..|...LoadM|
|00000930| 65 73 73 61 67 65 73 28 | 43 6f 75 6e 74 72 79 24 |essages(|Country$|
|00000940| 29 0d 02 08 2b 54 61 73 | 6b 6e 61 6d 65 24 3d a4 |)...+Tas|kname$=.|
|00000950| 4d 65 73 73 61 67 65 4c | 6f 6f 6b 75 70 28 22 54 |MessageL|ookup("T|
|00000960| 61 73 6b 6e 61 6d 65 22 | 2c 22 22 29 0d 02 12 05 |askname"|,"")....|
|00000970| 3a 0d 02 1c 17 f2 52 65 | 61 64 49 63 6f 6e 42 61 |:.....Re|adIconBa|
|00000980| 72 43 6f 6c 6f 75 72 73 | 0d 02 26 05 3a 0d 02 30 |rColours|..&.:..0|
|00000990| 09 ee 20 85 20 87 0d 02 | 3a 05 3a 0d 02 44 16 f4 |.. . ...|:.:..D..|
|000009a0| 20 53 65 74 20 75 70 20 | 73 61 76 65 20 61 72 65 | Set up |save are|
|000009b0| 61 0d 02 4e 2a c8 99 20 | 22 57 69 6d 70 5f 42 61 |a..N*.. |"Wimp_Ba|
|000009c0| 73 65 4f 66 53 70 72 69 | 74 65 73 22 20 b8 20 2c |seOfSpri|tes" . ,|
|000009d0| 69 63 6f 6e 73 70 72 69 | 74 65 25 0d 02 58 3c c8 |iconspri|te%..X<.|
|000009e0| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|000009f0| 32 35 36 2b 36 32 2c 69 | 63 6f 6e 73 70 72 69 74 |256+62,i|consprit|
|00000a00| 65 25 2c 22 43 68 61 72 | 67 65 73 49 42 22 20 b8 |e%,"Char|gesIB" .|
|00000a10| 20 2c 2c 2c 6c 65 6e 0d | 02 62 2f de 20 49 42 53 | ,,,len.|.b/. IBS|
|00000a20| 70 72 69 74 65 53 61 76 | 65 41 72 65 61 20 6c 65 |priteSav|eArea le|
|00000a30| 6e 3a 49 42 53 70 72 69 | 74 65 53 61 76 65 41 72 |n:IBSpri|teSaveAr|
|00000a40| 65 61 21 30 3d 30 0d 02 | 6c 52 c8 99 20 22 4f 53 |ea!0=0..|lR.. "OS|
|00000a50| 5f 53 70 72 69 74 65 4f | 70 22 2c 32 35 36 2b 36 |_SpriteO|p",256+6|
|00000a60| 30 2c 69 63 6f 6e 73 70 | 72 69 74 65 25 2c 22 43 |0,iconsp|rite%,"C|
|00000a70| 68 61 72 67 65 73 49 42 | 22 2c 49 42 53 70 72 69 |hargesIB|",IBSpri|
|00000a80| 74 65 53 61 76 65 41 72 | 65 61 20 b8 20 72 30 2c |teSaveAr|ea . r0,|
|00000a90| 72 31 2c 72 32 2c 72 33 | 0d 02 76 18 e6 20 30 2c |r1,r2,r3|..v.. 0,|
|00000aa0| 31 32 38 2b 49 42 42 61 | 63 6b 67 72 6f 75 6e 64 |128+IBBa|ckground|
|00000ab0| 0d 02 80 14 e6 20 30 2c | 49 42 46 6f 72 65 67 72 |..... 0,|IBForegr|
|00000ac0| 6f 75 6e 64 0d 02 8a 38 | c8 99 20 22 58 57 69 6d |ound...8|.. "XWim|
|00000ad0| 70 5f 53 65 74 46 6f 6e | 74 43 6f 6c 6f 75 72 73 |p_SetFon|tColours|
|00000ae0| 22 2c 2c 49 42 42 61 63 | 6b 67 72 6f 75 6e 64 2c |",,IBBac|kground,|
|00000af0| 49 42 46 6f 72 65 67 72 | 6f 75 6e 64 0d 02 94 3f |IBForegr|ound...?|
|00000b00| ef 20 35 2c 32 33 2c 31 | 37 2c 37 2c 36 2c 38 3b |. 5,23,1|7,7,6,8;|
|00000b10| 31 36 3b 30 3b 3a f4 20 | 44 6f 75 62 6c 65 20 68 |16;0;:. |Double h|
|00000b20| 65 69 67 68 74 20 27 67 | 72 61 70 68 69 63 73 20 |eight 'g|raphics |
|00000b30| 6d 6f 64 65 27 20 74 65 | 78 74 2e 0d 02 9e 20 c8 |mode' te|xt.... .|
|00000b40| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|00000b50| 72 30 2c 72 31 2c 72 32 | 2c 72 33 0d 02 a8 05 3a |r0,r1,r2|,r3....:|
|00000b60| 0d 02 b2 35 c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 |...5.. "|Wimp_Ope|
|00000b70| 6e 54 65 6d 70 6c 61 74 | 65 22 2c 2c 22 3c 43 68 |nTemplat|e",,"<Ch|
|00000b80| 61 72 67 65 73 24 44 69 | 72 3e 2e 54 65 6d 70 6c |arges$Di|r>.Templ|
|00000b90| 61 74 65 73 22 0d 02 bc | 52 c8 99 20 22 57 69 6d |ates"...|R.. "Wim|
|00000ba0| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00000bb0| 2c 49 6e 66 6f 57 2c 49 | 6e 66 6f 49 6e 64 2c 49 |,InfoW,I|nfoInd,I|
|00000bc0| 6e 66 6f 49 6e 64 2b 32 | 38 38 2c 2d 31 2c 22 49 |nfoInd+2|88,-1,"I|
|00000bd0| 6e 66 6f 22 2c 30 3a 49 | 6e 66 6f 57 21 36 34 3d |nfo",0:I|nfoW!64=|
|00000be0| 53 70 72 69 74 65 73 0d | 02 c6 28 c8 99 20 22 57 |Sprites.|..(.. "W|
|00000bf0| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00000c00| 22 2c 2c 49 6e 66 6f 57 | 20 b8 20 49 6e 66 6f 0d |",,InfoW| . Info.|
|00000c10| 02 d0 56 c8 99 20 22 57 | 69 6d 70 5f 4c 6f 61 64 |..V.. "W|imp_Load|
|00000c20| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 45 61 72 6e 57 |Template|",,EarnW|
|00000c30| 2c 45 61 72 6e 49 6e 64 | 2c 45 61 72 6e 49 6e 64 |,EarnInd|,EarnInd|
|00000c40| 2b 32 34 31 2c 2d 31 2c | 22 45 61 72 6e 69 6e 67 |+241,-1,|"Earning|
|00000c50| 73 22 2c 30 3a 45 61 72 | 6e 57 21 36 34 3d 53 70 |s",0:Ear|nW!64=Sp|
|00000c60| 72 69 74 65 73 0d 02 da | 2c c8 99 20 22 57 69 6d |rites...|,.. "Wim|
|00000c70| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00000c80| 2c 45 61 72 6e 57 20 b8 | 20 45 61 72 6e 69 6e 67 |,EarnW .| Earning|
|00000c90| 73 0d 02 e4 61 c8 99 20 | 22 57 69 6d 70 5f 4c 6f |s...a.. |"Wimp_Lo|
|00000ca0| 61 64 54 65 6d 70 6c 61 | 74 65 22 2c 2c 4f 70 74 |adTempla|te",,Opt|
|00000cb0| 69 6f 6e 73 57 2c 4f 70 | 74 69 6f 6e 73 49 6e 64 |ionsW,Op|tionsInd|
|00000cc0| 2c 4f 70 74 69 6f 6e 73 | 49 6e 64 2b 33 39 33 2c |,Options|Ind+393,|
|00000cd0| 2d 31 2c 22 4f 70 74 69 | 6f 6e 73 22 2c 30 3a 4f |-1,"Opti|ons",0:O|
|00000ce0| 70 74 69 6f 6e 73 57 21 | 36 34 3d 53 70 72 69 74 |ptionsW!|64=Sprit|
|00000cf0| 65 73 0d 02 ee 2e c8 99 | 20 22 57 69 6d 70 5f 43 |es......| "Wimp_C|
|00000d00| 72 65 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 4f 70 |reateWin|dow",,Op|
|00000d10| 74 69 6f 6e 73 57 20 b8 | 20 4f 70 74 69 6f 6e 73 |tionsW .| Options|
|00000d20| 0d 02 f8 61 c8 99 20 22 | 57 69 6d 70 5f 4c 6f 61 |...a.. "|Wimp_Loa|
|00000d30| 64 54 65 6d 70 6c 61 74 | 65 22 2c 2c 43 6f 6e 76 |dTemplat|e",,Conv|
|00000d40| 65 72 74 57 2c 43 6f 6e | 76 65 72 74 49 6e 64 2c |ertW,Con|vertInd,|
|00000d50| 43 6f 6e 76 65 72 74 49 | 6e 64 2b 31 37 36 2c 2d |ConvertI|nd+176,-|
|00000d60| 31 2c 22 43 6f 6e 76 65 | 72 74 22 2c 30 3a 43 6f |1,"Conve|rt",0:Co|
|00000d70| 6e 76 65 72 74 57 21 36 | 34 3d 53 70 72 69 74 65 |nvertW!6|4=Sprite|
|00000d80| 73 0d 03 02 2e c8 99 20 | 22 57 69 6d 70 5f 43 72 |s...... |"Wimp_Cr|
|00000d90| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 43 6f 6e |eateWind|ow",,Con|
|00000da0| 76 65 72 74 57 20 b8 20 | 43 6f 6e 76 65 72 74 0d |vertW . |Convert.|
|00000db0| 03 0c 52 c8 99 20 22 57 | 69 6d 70 5f 4c 6f 61 64 |..R.. "W|imp_Load|
|00000dc0| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 4a 6f 62 73 57 |Template|",,JobsW|
|00000dd0| 2c 4a 6f 62 73 49 6e 64 | 2c 4a 6f 62 73 49 6e 64 |,JobsInd|,JobsInd|
|00000de0| 2b 32 30 33 2c 2d 31 2c | 22 4a 6f 62 73 22 2c 30 |+203,-1,|"Jobs",0|
|00000df0| 3a 4a 6f 62 73 57 21 36 | 34 3d 53 70 72 69 74 65 |:JobsW!6|4=Sprite|
|00000e00| 73 0d 03 16 28 c8 99 20 | 22 57 69 6d 70 5f 43 72 |s...(.. |"Wimp_Cr|
|00000e10| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 4a 6f 62 |eateWind|ow",,Job|
|00000e20| 73 57 20 b8 20 4a 6f 62 | 73 0d 03 20 57 c8 99 20 |sW . Job|s.. W.. |
|00000e30| 22 57 69 6d 70 5f 4c 6f | 61 64 54 65 6d 70 6c 61 |"Wimp_Lo|adTempla|
|00000e40| 74 65 22 2c 2c 51 75 65 | 72 79 57 2c 51 75 65 72 |te",,Que|ryW,Quer|
|00000e50| 79 49 6e 64 2c 51 75 65 | 72 79 49 6e 64 2b 33 34 |yInd,Que|ryInd+34|
|00000e60| 35 2c 2d 31 2c 22 51 75 | 65 72 79 22 2c 30 3a 51 |5,-1,"Qu|ery",0:Q|
|00000e70| 75 65 72 79 57 21 36 34 | 3d 53 70 72 69 74 65 73 |ueryW!64|=Sprites|
|00000e80| 0d 03 2a 2a c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |..**.. "|Wimp_Cre|
|00000e90| 61 74 65 57 69 6e 64 6f | 77 22 2c 2c 51 75 65 72 |ateWindo|w",,Quer|
|00000ea0| 79 57 20 b8 20 51 75 65 | 72 79 0d 03 34 1b c8 99 |yW . Que|ry..4...|
|00000eb0| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 54 65 6d 70 | "Wimp_C|loseTemp|
|00000ec0| 6c 61 74 65 22 0d 03 3e | 05 3a 0d 03 48 28 e7 20 |late"..>|.:..H(. |
|00000ed0| 77 69 6d 70 3e 3d 33 30 | 30 20 8c 20 f2 72 65 6c |wimp>=30|0 . .rel|
|00000ee0| 61 62 65 6c 4d 65 6e 75 | 41 72 72 6f 77 49 63 6f |abelMenu|ArrowIco|
|00000ef0| 6e 73 0d 03 52 05 3a 0d | 03 5c 20 ff 28 22 53 65 |ns..R.:.|.\ .("Se|
|00000f00| 74 20 43 68 61 72 67 65 | 73 24 52 75 6e 6e 69 6e |t Charge|s$Runnin|
|00000f10| 67 20 59 65 73 22 29 0d | 03 66 05 3a 0d 03 70 0d |g Yes").|.f.:..p.|
|00000f20| f2 49 6e 69 74 56 61 72 | 73 0d 03 7a 13 f2 52 65 |.InitVar|s..z..Re|
|00000f30| 6c 61 62 65 6c 57 69 6e | 64 6f 77 73 0d 03 84 0f |labelWin|dows....|
|00000f40| f2 42 75 69 6c 64 4d 65 | 6e 75 73 0d 03 8e 05 3a |.BuildMe|nus....:|
|00000f50| 0d 03 98 1b 52 65 61 64 | 45 72 72 6f 72 3d a4 4c |....Read|Error=.L|
|00000f60| 6f 61 64 53 65 74 74 69 | 6e 67 73 0d 03 a2 05 3a |oadSetti|ngs....:|
|00000f70| 0d 03 ac 16 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 |...... "|Hourglas|
|00000f80| 73 5f 4f 66 66 22 0d 03 | b6 05 3a 0d 03 c0 1e f4 |s_Off"..|..:.....|
|00000f90| 20 50 75 74 20 49 63 6f | 6e 20 6f 6e 20 74 68 65 | Put Ico|n on the|
|00000fa0| 20 69 63 6f 6e 20 62 61 | 72 0d 03 ca 10 e7 20 4a | icon ba|r..... J|
|00000fb0| 6f 62 24 3d 22 84 22 20 | 8c 0d 03 d4 28 20 20 48 |ob$="." |....(  H|
|00000fc0| 6f 75 72 73 3d 53 74 61 | 72 74 48 6f 75 72 73 3a |ours=Sta|rtHours:|
|00000fd0| 4d 69 6e 75 74 65 73 3d | 53 74 61 72 74 4d 69 6e |Minutes=|StartMin|
|00000fe0| 73 0d 03 de 2a 20 20 53 | 65 63 6f 6e 64 73 3d 28 |s...*  S|econds=(|
|00000ff0| 28 48 6f 75 72 73 2a 36 | 30 29 2a 36 30 29 2b 28 |(Hours*6|0)*60)+(|
|00001000| 4d 69 6e 75 74 65 73 2a | 36 30 29 0d 03 e8 05 cc |Minutes*|60).....|
|00001010| 0d 03 f2 21 20 20 4d 69 | 6e 75 74 65 73 3d 28 53 |...!  Mi|nutes=(S|
|00001020| 65 63 6f 6e 64 73 20 81 | 20 36 30 29 20 83 20 36 |econds .| 60) . 6|
|00001030| 30 0d 03 fc 1f 20 20 48 | 6f 75 72 73 3d 28 53 65 |0....  H|ours=(Se|
|00001040| 63 6f 6e 64 73 20 81 20 | 36 30 29 20 81 20 36 30 |conds . |60) . 60|
|00001050| 0d 04 06 05 cd 0d 04 10 | 13 e7 20 49 42 53 68 6f |........|.. IBSho|
|00001060| 77 43 6c 6f 63 6b 20 8c | 0d 04 1a 18 20 20 54 45 |wClock .|....  TE|
|00001070| 4d 50 24 3d c3 28 48 6f | 75 72 73 29 2b 22 3a 22 |MP$=.(Ho|urs)+":"|
|00001080| 0d 04 24 1f 20 20 e7 20 | 4d 69 6e 75 74 65 73 3c |..$.  . |Minutes<|
|00001090| 31 30 20 8c 20 54 45 4d | 50 24 2b 3d 22 30 22 0d |10 . TEM|P$+="0".|
|000010a0| 04 2e 43 20 20 54 45 4d | 50 24 2b 3d c3 28 4d 69 |..C  TEM|P$+=.(Mi|
|000010b0| 6e 75 74 65 73 29 3a e7 | 20 a9 28 54 45 4d 50 24 |nutes):.| .(TEMP$|
|000010c0| 29 3c 37 20 8c 20 54 45 | 4d 50 24 3d c4 37 2d a9 |)<7 . TE|MP$=.7-.|
|000010d0| 28 54 45 4d 50 24 29 2c | 22 30 22 29 2b 54 45 4d |(TEMP$),|"0")+TEM|
|000010e0| 50 24 0d 04 38 18 20 20 | 24 49 42 43 6c 6f 63 6b |P$..8.  |$IBClock|
|000010f0| 54 65 78 74 3d 54 45 4d | 50 24 0d 04 42 05 cc 0d |Text=TEM|P$..B...|
|00001100| 04 4c 27 20 20 54 6f 45 | 61 72 6e 41 6d 6f 75 6e |.L'  ToE|arnAmoun|
|00001110| 74 3d 46 72 6f 6d 45 61 | 72 6e 41 6d 6f 75 6e 74 |t=FromEa|rnAmount|
|00001120| 2a 48 6f 75 72 73 0d 04 | 56 14 20 20 e7 20 57 68 |*Hours..|V.  . Wh|
|00001130| 6f 6c 65 48 6f 75 72 73 | 20 8c 0d 04 60 3d 20 20 |oleHours| ...`=  |
|00001140| 20 20 e7 20 4d 69 6e 75 | 74 65 73 3e 3d 33 30 20 |  . Minu|tes>=30 |
|00001150| 8c 20 54 6f 45 61 72 6e | 41 6d 6f 75 6e 74 3d 46 |. ToEarn|Amount=F|
|00001160| 72 6f 6d 45 61 72 6e 41 | 6d 6f 75 6e 74 2a 28 48 |romEarnA|mount*(H|
|00001170| 6f 75 72 73 2b 31 29 0d | 04 6a 07 20 20 cc 0d 04 |ours+1).|.j.  ...|
|00001180| 74 33 20 20 20 20 54 6f | 45 61 72 6e 41 6d 6f 75 |t3    To|EarnAmou|
|00001190| 6e 74 2b 3d 28 28 46 72 | 6f 6d 45 61 72 6e 41 6d |nt+=((Fr|omEarnAm|
|000011a0| 6f 75 6e 74 2f 36 30 29 | 2a 4d 69 6e 75 74 65 73 |ount/60)|*Minutes|
|000011b0| 29 0d 04 7e 07 20 20 cd | 0d 04 88 2c 20 20 54 6f |)..~.  .|...,  To|
|000011c0| 45 61 72 6e 41 6d 6f 75 | 6e 74 3d 54 6f 45 61 72 |EarnAmou|nt=ToEar|
|000011d0| 6e 41 6d 6f 75 6e 74 2a | 45 78 63 68 61 6e 67 65 |nAmount*|Exchange|
|000011e0| 52 61 74 65 0d 04 92 07 | 20 20 3a 0d 04 9c 36 20 |Rate....|  :...6 |
|000011f0| 20 40 25 3d 26 31 30 32 | 30 32 30 41 3a f4 20 46 | @%=&102|020A:. F|
|00001200| 69 78 65 64 20 66 6f 72 | 6d 61 74 2c 20 32 20 64 |ixed for|mat, 2 d|
|00001210| 70 2c 20 66 69 65 6c 64 | 20 77 69 64 74 68 20 31 |p, field| width 1|
|00001220| 30 0d 04 a6 27 20 20 24 | 49 42 43 6c 6f 63 6b 54 |0...'  $|IBClockT|
|00001230| 65 78 74 3d c0 c3 28 54 | 6f 45 61 72 6e 41 6d 6f |ext=..(T|oEarnAmo|
|00001240| 75 6e 74 29 2c 31 30 29 | 0d 04 b0 43 20 20 e7 20 |unt),10)|...C  . |
|00001250| a9 28 c3 28 54 6f 45 61 | 72 6e 41 6d 6f 75 6e 74 |.(.(ToEa|rnAmount|
|00001260| 29 29 3e 37 20 8c 20 49 | 42 43 6c 6f 63 6b 54 65 |))>7 . I|BClockTe|
|00001270| 78 74 3f 36 3d 97 28 22 | 89 22 29 3a 49 42 43 6c |xt?6=.("|."):IBCl|
|00001280| 6f 63 6b 54 65 78 74 3f | 37 3d 30 0d 04 ba 1f 20 |ockText?|7=0.... |
|00001290| 20 40 25 3d 26 39 30 41 | 3a f4 20 44 65 66 61 75 | @%=&90A|:. Defau|
|000012a0| 6c 74 20 73 65 74 74 69 | 6e 67 0d 04 c4 0b 20 20 |lt setti|ng....  |
|000012b0| 4e 3d 30 3a f5 0d 04 ce | 35 20 20 20 20 e7 20 49 |N=0:....|5    . I|
|000012c0| 42 43 6c 6f 63 6b 54 65 | 78 74 3f 4e 3d 97 28 22 |BClockTe|xt?N=.("|
|000012d0| 2e 22 29 20 8c 20 49 42 | 43 6c 6f 63 6b 54 65 78 |.") . IB|ClockTex|
|000012e0| 74 3f 4e 3d 97 28 22 b7 | 22 29 0d 04 d8 1f 20 20 |t?N=.(".|")....  |
|000012f0| 4e 2b 3d 31 3a fd 20 28 | 49 42 43 6c 6f 63 6b 54 |N+=1:. (|IBClockT|
|00001300| 65 78 74 3f 4e 29 3c 33 | 32 0d 04 e2 05 cd 0d 04 |ext?N)<3|2.......|
|00001310| ec 24 42 6c 6f 63 6b 21 | 30 3d 2d 31 3a 42 6c 6f |.$Block!|0=-1:Blo|
|00001320| 63 6b 21 34 3d 30 3a 42 | 6c 6f 63 6b 21 38 3d 2d |ck!4=0:B|lock!8=-|
|00001330| 31 35 0d 04 f6 2f 42 6c | 6f 63 6b 21 31 32 3d 31 |15.../Bl|ock!12=1|
|00001340| 31 32 3a 42 6c 6f 63 6b | 21 31 36 3d 38 38 3a 42 |12:Block|!16=88:B|
|00001350| 6c 6f 63 6b 21 32 30 3d | 26 31 37 30 30 33 30 30 |lock!20=|&1700300|
|00001360| 41 0d 05 00 1f 24 28 42 | 6c 6f 63 6b 2b 32 34 29 |A....$(B|lock+24)|
|00001370| 3d 22 43 68 61 72 67 65 | 73 49 42 22 2b bd 31 33 |="Charge|sIB"+.13|
|00001380| 0d 05 0a 29 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |...).. "|Wimp_Cre|
|00001390| 61 74 65 49 63 6f 6e 22 | 2c 2c 42 6c 6f 63 6b 20 |ateIcon"|,,Block |
|000013a0| b8 20 49 63 6f 6e 42 61 | 72 0d 05 14 21 f2 55 70 |. IconBa|r...!.Up|
|000013b0| 64 61 74 65 49 42 53 70 | 72 69 74 65 28 24 49 42 |dateIBSp|rite($IB|
|000013c0| 43 6c 6f 63 6b 54 65 78 | 74 29 0d 05 1e 05 3a 0d |ClockTex|t)....:.|
|000013d0| 05 28 0e ee 20 85 20 f2 | 65 72 72 6f 72 0d 05 32 |.(.. . .|error..2|
|000013e0| 05 3a 0d 05 3c 12 c8 8e | 20 52 65 61 64 45 72 72 |.:..<...| ReadErr|
|000013f0| 6f 72 20 ca 0d 05 46 1e | 20 20 c9 20 30 3a f4 20 |or ...F.|  . 0:. |
|00001400| 53 65 74 74 69 6e 67 73 | 20 6c 6f 61 64 65 64 20 |Settings| loaded |
|00001410| 4f 4b 0d 05 50 45 20 20 | c9 20 31 3a f2 44 65 66 |OK..PE  |. 1:.Def|
|00001420| 61 75 6c 74 53 65 74 74 | 69 6e 67 73 3a 85 20 39 |aultSett|ings:. 9|
|00001430| 39 39 39 2c a4 4d 65 73 | 73 61 67 65 4c 6f 6f 6b |999,.Mes|sageLook|
|00001440| 75 70 28 22 45 72 72 6f | 72 5f 35 22 2c 54 61 73 |up("Erro|r_5",Tas|
|00001450| 6b 6e 61 6d 65 24 29 0d | 05 5a 45 20 20 c9 20 32 |kname$).|.ZE  . 2|
|00001460| 3a f2 44 65 66 61 75 6c | 74 53 65 74 74 69 6e 67 |:.Defaul|tSetting|
|00001470| 73 3a 85 20 39 39 39 39 | 2c a4 4d 65 73 73 61 67 |s:. 9999|,.Messag|
|00001480| 65 4c 6f 6f 6b 75 70 28 | 22 45 72 72 6f 72 5f 36 |eLookup(|"Error_6|
|00001490| 22 2c 54 61 73 6b 6e 61 | 6d 65 24 29 0d 05 64 46 |",Taskna|me$)..dF|
|000014a0| 20 20 c9 20 33 3a f2 44 | 65 66 61 75 6c 74 53 65 |  . 3:.D|efaultSe|
|000014b0| 74 74 69 6e 67 73 3a 85 | 20 39 39 39 39 2c a4 4d |ttings:.| 9999,.M|
|000014c0| 65 73 73 61 67 65 4c 6f | 6f 6b 75 70 28 22 45 72 |essageLo|okup("Er|
|000014d0| 72 6f 72 5f 31 37 22 2c | 54 61 73 6b 6e 61 6d 65 |ror_17",|Taskname|
|000014e0| 24 29 0d 05 6e 46 20 20 | c9 20 34 3a f2 44 65 66 |$)..nF  |. 4:.Def|
|000014f0| 61 75 6c 74 53 65 74 74 | 69 6e 67 73 3a 85 20 39 |aultSett|ings:. 9|
|00001500| 39 39 39 2c a4 4d 65 73 | 73 61 67 65 4c 6f 6f 6b |999,.Mes|sageLook|
|00001510| 75 70 28 22 45 72 72 6f | 72 5f 31 39 22 2c 54 61 |up("Erro|r_19",Ta|
|00001520| 73 6b 6e 61 6d 65 24 29 | 0d 05 78 05 cb 0d 05 82 |skname$)|..x.....|
|00001530| 05 3a 0d 05 8c 0e ee 20 | 85 20 f2 65 72 72 6f 72 |.:..... |. .error|
|00001540| 0d 05 96 05 3a 0d 05 a0 | 29 c8 99 20 22 4f 53 5f |....:...|).. "OS_|
|00001550| 52 65 61 64 4d 6f 6e 6f | 74 6f 6e 69 63 54 69 6d |ReadMono|tonicTim|
|00001560| 65 22 20 b8 20 70 6f 6c | 6c 74 69 6d 65 25 0d 05 |e" . pol|ltime%..|
|00001570| aa 05 3a 0d 05 b4 17 f4 | 20 4d 61 69 6e 20 70 72 |..:.....| Main pr|
|00001580| 6f 67 72 61 6d 20 6c 6f | 6f 70 0d 05 be 05 f5 0d |ogram lo|op......|
|00001590| 05 c8 38 20 20 e7 20 51 | 75 65 72 79 43 61 72 65 |..8  . Q|ueryCare|
|000015a0| 74 20 8c 20 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |t . .. "|Wimp_Set|
|000015b0| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 51 |CaretPos|ition",Q|
|000015c0| 75 65 72 79 2c 2d 31 0d | 05 d2 4a 20 20 f4 20 49 |uery,-1.|..J  . I|
|000015d0| 20 64 6f 6e 27 74 20 6c | 69 6b 65 20 74 68 69 73 | don't l|ike this|
|000015e0| 20 6d 75 63 68 2c 20 62 | 75 74 20 69 74 27 73 20 | much, b|ut it's |
|000015f0| 6e 65 63 65 73 73 61 72 | 79 20 74 6f 20 77 61 69 |necessar|y to wai|
|00001600| 74 20 66 6f 72 20 61 20 | 57 69 6d 70 5f 50 6f 6c |t for a |Wimp_Pol|
|00001610| 6c 0d 05 dc 4e 20 20 f4 | 20 62 65 66 6f 72 65 20 |l...N  .| before |
|00001620| 70 75 74 74 69 6e 67 20 | 74 68 65 20 63 61 72 65 |putting |the care|
|00001630| 74 20 69 6e 20 74 68 65 | 20 51 75 65 72 79 20 77 |t in the| Query w|
|00001640| 69 6e 64 6f 77 2c 20 6f | 72 20 65 6c 73 65 20 6e |indow, o|r else n|
|00001650| 6f 74 68 69 6e 67 20 68 | 61 70 70 65 6e 73 2e 0d |othing h|appens..|
|00001660| 05 e6 4b 20 20 f4 20 43 | 75 72 69 6f 75 73 6c 79 |..K  . C|uriously|
|00001670| 2c 20 69 66 20 74 68 65 | 20 77 69 6e 64 6f 77 20 |, if the| window |
|00001680| 69 73 20 6f 70 65 6e 65 | 64 20 77 69 74 68 20 57 |is opene|d with W|
|00001690| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 20 74 |imp_Crea|teMenu t|
|000016a0| 68 65 20 70 72 6f 62 6c | 65 6d 0d 05 f0 4a 20 20 |he probl|em...J  |
|000016b0| f4 20 64 6f 65 73 6e 27 | 74 20 61 72 69 73 65 2e |. doesn'|t arise.|
|000016c0| 20 48 6f 77 65 76 65 72 | 2c 20 69 6e 20 74 68 61 | However|, in tha|
|000016d0| 74 20 73 69 74 75 61 74 | 69 6f 6e 2c 20 3c 45 73 |t situat|ion, <Es|
|000016e0| 63 61 70 65 3e 20 63 61 | 6e 20 62 65 20 75 73 65 |cape> ca|n be use|
|000016f0| 64 20 74 6f 0d 05 fa 2f | 20 20 f4 20 63 6c 6f 73 |d to.../|  . clos|
|00001700| 65 20 74 68 65 20 77 69 | 6e 64 6f 77 2c 20 77 68 |e the wi|ndow, wh|
|00001710| 69 63 68 20 69 73 20 75 | 6e 64 65 73 69 72 61 62 |ich is u|ndesirab|
|00001720| 6c 65 2e 0d 06 04 07 20 | 20 3a 0d 06 0e 4c 20 20 |le..... | :...L  |
|00001730| 42 6c 6f 63 6b 21 34 3d | 2d 31 3a 42 6c 6f 63 6b |Block!4=|-1:Block|
|00001740| 21 38 3d 2d 31 3a f4 20 | 4e 65 65 64 20 74 6f 20 |!8=-1:. |Need to |
|00001750| 63 6c 65 61 72 20 62 6f | 74 68 20 74 68 65 73 65 |clear bo|th these|
|00001760| 20 74 6f 20 2d 31 20 66 | 6f 72 20 74 68 65 20 73 | to -1 f|or the s|
|00001770| 75 62 6d 65 6e 75 0d 06 | 18 48 20 20 f4 20 72 6f |ubmenu..|.H  . ro|
|00001780| 75 74 69 6e 65 2e 20 54 | 68 65 20 66 69 72 73 74 |utine. T|he first|
|00001790| 20 73 75 62 6d 65 6e 75 | 20 69 73 20 61 6c 77 61 | submenu| is alwa|
|000017a0| 79 73 20 61 20 64 69 61 | 6c 6f 67 75 65 20 62 6f |ys a dia|logue bo|
|000017b0| 78 2c 20 73 6f 20 74 68 | 65 20 77 69 6d 70 0d 06 |x, so th|e wimp..|
|000017c0| 22 46 20 20 f4 20 72 65 | 74 75 72 6e 73 20 2d 31 |"F  . re|turns -1|
|000017d0| 20 66 6f 72 20 74 68 61 | 74 20 61 6e 64 20 64 6f | for tha|t and do|
|000017e0| 65 73 6e 27 74 20 62 6f | 74 68 65 72 20 74 6f 20 |esn't bo|ther to |
|000017f0| 70 75 74 20 2d 31 20 69 | 6e 20 74 68 65 20 73 65 |put -1 i|n the se|
|00001800| 63 6f 6e 64 0d 06 2c 4a | 20 20 f4 20 73 75 62 6d |cond..,J|  . subm|
|00001810| 65 6e 75 27 73 20 77 6f | 72 64 2c 20 77 68 69 63 |enu's wo|rd, whic|
|00001820| 68 20 69 73 20 61 63 74 | 75 61 6c 6c 79 20 74 68 |h is act|ually th|
|00001830| 65 20 6f 6e 65 20 77 65 | 20 77 61 6e 74 20 74 6f |e one we| want to|
|00001840| 20 74 65 73 74 20 28 66 | 6f 72 20 74 68 65 0d 06 | test (f|or the..|
|00001850| 36 1b 20 20 f4 20 63 75 | 72 72 65 6e 63 79 20 6d |6.  . cu|rrency m|
|00001860| 65 6e 75 20 65 74 63 29 | 2e 0d 06 40 07 20 20 3a |enu etc)|...@.  :|
|00001870| 0d 06 4a 33 20 20 c8 99 | 20 22 57 69 6d 70 5f 50 |..J3  ..| "Wimp_P|
|00001880| 6f 6c 6c 49 64 6c 65 22 | 2c 30 2c 42 6c 6f 63 6b |ollIdle"|,0,Block|
|00001890| 2c 70 6f 6c 6c 74 69 6d | 65 25 20 b8 20 52 65 61 |,polltim|e% . Rea|
|000018a0| 73 6f 6e 0d 06 54 26 20 | 20 c8 99 20 22 49 6e 74 |son..T& | .. "Int|
|000018b0| 65 72 66 61 63 65 5f 50 | 6f 6c 6c 22 2c 52 65 61 |erface_P|oll",Rea|
|000018c0| 73 6f 6e 2c 2c 54 61 73 | 6b 0d 06 5e 34 20 20 c8 |son,,Tas|k..^4  .|
|000018d0| 99 20 22 49 6e 74 65 72 | 66 61 63 65 5f 50 72 65 |. "Inter|face_Pre|
|000018e0| 50 72 6f 63 65 73 73 4b | 65 79 22 2c 52 65 61 73 |ProcessK|ey",Reas|
|000018f0| 6f 6e 2c 42 6c 6f 63 6b | 2c 54 61 73 6b 0d 06 68 |on,Block|,Task..h|
|00001900| 11 20 20 c8 8e 20 52 65 | 61 73 6f 6e 20 ca 0d 06 |.  .. Re|ason ...|
|00001910| 72 16 20 20 20 20 c9 20 | 30 20 3a 20 f2 44 6f 43 |r.    . |0 : .DoC|
|00001920| 6c 6f 63 6b 0d 06 7c 15 | 20 20 20 20 c9 20 31 20 |lock..|.|    . 1 |
|00001930| 3a 20 f2 52 65 64 72 61 | 77 0d 06 86 29 20 20 20 |: .Redra|w...)   |
|00001940| 20 c9 20 32 20 3a 20 c8 | 99 20 22 57 69 6d 70 5f | . 2 : .|. "Wimp_|
|00001950| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 42 6c 6f |OpenWind|ow",,Blo|
|00001960| 63 6b 0d 06 90 2a 20 20 | 20 20 c9 20 33 20 3a 20 |ck...*  |  . 3 : |
|00001970| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |.. "Wimp|_CloseWi|
|00001980| 6e 64 6f 77 22 2c 2c 42 | 6c 6f 63 6b 0d 06 9a 1a |ndow",,B|lock....|
|00001990| 20 20 20 20 c9 20 36 20 | 3a 20 f2 4d 6f 75 73 65 |    . 6 |: .Mouse|
|000019a0| 42 75 74 74 6f 6e 0d 06 | a4 1b 20 20 20 20 c9 20 |Button..|..    . |
|000019b0| 37 20 3a 20 f2 44 72 61 | 67 46 69 6e 69 73 68 65 |7 : .Dra|gFinishe|
|000019c0| 64 0d 06 ae 19 20 20 20 | 20 c9 20 38 20 3a 20 f2 |d....   | . 8 : .|
|000019d0| 4b 65 79 50 72 65 73 73 | 65 64 0d 06 b8 19 20 20 |KeyPress|ed....  |
|000019e0| 20 20 c9 20 39 20 3a 20 | f2 44 65 63 6f 64 65 4d |  . 9 : |.DecodeM|
|000019f0| 65 6e 75 0d 06 c2 24 20 | 20 20 20 c9 20 31 37 2c |enu...$ |   . 17,|
|00001a00| 31 38 2c 31 39 20 3a 20 | f2 52 65 63 69 65 76 65 |18,19 : |.Recieve|
|00001a10| 4d 65 73 73 61 67 65 0d | 06 cc 07 20 20 cb 0d 06 |Message.|...  ...|
|00001a20| d6 24 20 20 e7 20 45 61 | 72 6e 57 69 6e 64 6f 77 |.$  . Ea|rnWindow|
|00001a30| 4f 70 65 6e 20 8c 20 f2 | 44 6f 45 61 72 6e 69 6e |Open . .|DoEarnin|
|00001a40| 67 73 0d 06 e0 0a fd 20 | 44 6f 6e 65 0d 06 ea 3f |gs..... |Done...?|
|00001a50| e7 20 ac 20 a4 53 61 76 | 65 4a 6f 62 28 4a 6f 62 |. . .Sav|eJob(Job|
|00001a60| 24 29 20 8c 20 85 20 39 | 39 39 39 2c a4 4d 65 73 |$) . . 9|999,.Mes|
|00001a70| 73 61 67 65 4c 6f 6f 6b | 75 70 28 22 45 72 72 6f |sageLook|up("Erro|
|00001a80| 72 5f 31 32 22 2c 4a 6f | 62 24 29 0d 06 f4 45 e7 |r_12",Jo|b$)...E.|
|00001a90| 20 ac 20 a4 52 65 63 6f | 72 64 57 68 69 63 68 4a | . .Reco|rdWhichJ|
|00001aa0| 6f 62 20 8c 20 85 20 39 | 39 39 39 2c a4 4d 65 73 |ob . . 9|999,.Mes|
|00001ab0| 73 61 67 65 4c 6f 6f 6b | 75 70 28 22 45 72 72 6f |sageLook|up("Erro|
|00001ac0| 72 5f 31 38 22 2c 54 61 | 73 6b 6e 61 6d 65 24 29 |r_18",Ta|skname$)|
|00001ad0| 0d 06 fe 1c f2 43 6c 6f | 73 65 4d 65 73 73 61 67 |.....Clo|seMessag|
|00001ae0| 65 73 3a f2 4c 6f 73 65 | 46 6f 6e 74 0d 07 08 21 |es:.Lose|Font...!|
|00001af0| c8 99 20 22 49 6e 74 65 | 72 66 61 63 65 5f 43 6c |.. "Inte|rface_Cl|
|00001b00| 6f 73 65 44 6f 77 6e 22 | 2c 54 61 73 6b 0d 07 12 |oseDown"|,Task...|
|00001b10| 26 c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 |&.. "Wim|p_CloseD|
|00001b20| 6f 77 6e 22 2c 54 61 73 | 6b 2c 26 34 42 35 33 34 |own",Tas|k,&4B534|
|00001b30| 31 35 34 0d 07 1c 1e ff | 28 22 55 6e 53 65 74 20 |154.....|("UnSet |
|00001b40| 43 68 61 72 67 65 73 24 | 52 75 6e 6e 69 6e 67 22 |Charges$|Running"|
|00001b50| 29 0d 07 26 05 e0 0d 07 | 30 05 3a 0d 07 3a 0c dd |)..&....|0.:..:..|
|00001b60| 20 f2 65 72 72 6f 72 0d | 07 44 43 c8 99 20 22 57 | .error.|.DC.. "W|
|00001b70| 69 6d 70 5f 53 70 72 69 | 74 65 4f 70 22 2c 33 36 |imp_Spri|teOp",36|
|00001b80| 2c 30 2c 22 70 74 72 5f | 64 65 66 61 75 6c 74 22 |,0,"ptr_|default"|
|00001b90| 2c 31 2c 30 2c 30 2c 30 | 2c 30 3a f4 20 52 65 73 |,1,0,0,0|,0:. Res|
|00001ba0| 65 74 20 70 6f 69 6e 74 | 65 72 0d 07 4e 41 e7 20 |et point|er..NA. |
|00001bb0| 44 72 61 67 41 53 70 72 | 69 74 65 20 8c 20 c8 99 |DragASpr|ite . ..|
|00001bc0| 20 22 44 72 61 67 41 53 | 70 72 69 74 65 5f 53 74 | "DragAS|prite_St|
|00001bd0| 6f 70 22 3a 8b 20 c8 99 | 20 22 57 69 6d 70 5f 44 |op":. ..| "Wimp_D|
|00001be0| 72 61 67 42 6f 78 22 2c | 2c 2d 31 0d 07 58 15 42 |ragBox",|,-1..X.B|
|00001bf0| 6c 6f 63 6b 21 30 3d 9f | 3a 43 6c 69 63 6b 3d 30 |lock!0=.|:Click=0|
|00001c00| 0d 07 62 0a c8 8e 20 9f | 20 ca 0d 07 6c 28 20 20 |..b... .| ...l(  |
|00001c10| c9 20 39 39 39 39 3a f4 | 20 39 39 39 39 20 69 73 |. 9999:.| 9999 is|
|00001c20| 20 6f 75 72 20 63 75 73 | 74 6f 6d 20 65 72 72 6f | our cus|tom erro|
|00001c30| 72 2e 0d 07 76 5d 20 20 | 20 20 24 28 42 6c 6f 63 |r...v]  |  $(Bloc|
|00001c40| 6b 2b 34 29 3d f6 24 2b | bd 30 3a c8 99 20 22 57 |k+4)=.$+|.0:.. "W|
|00001c50| 69 6d 70 5f 52 65 70 6f | 72 74 45 72 72 6f 72 22 |imp_Repo|rtError"|
|00001c60| 2c 42 6c 6f 63 6b 2c 35 | 31 32 2b 32 35 36 2b 31 |,Block,5|12+256+1|
|00001c70| 36 2b 31 2c 54 61 73 6b | 6e 61 6d 65 24 2c 22 21 |6+1,Task|name$,"!|
|00001c80| 22 2b 54 61 73 6b 6e 61 | 6d 65 24 2c 31 2c 30 0d |"+Taskna|me$,1,0.|
|00001c90| 07 80 07 20 20 7f 0d 07 | 8a ad 20 20 20 20 24 28 |...  ...|..    $(|
|00001ca0| 42 6c 6f 63 6b 2b 34 29 | 3d f6 24 2b 22 20 61 74 |Block+4)|=.$+" at|
|00001cb0| 20 6c 69 6e 65 20 22 2b | c3 9e 2b 22 20 7b 22 2b | line "+|..+" {"+|
|00001cc0| c3 9f 2b 22 7d 2e 20 20 | 28 43 6c 69 63 6b 69 6e |..+"}.  |(Clickin|
|00001cd0| 67 20 6f 6e 20 43 61 6e | 63 65 6c 20 77 69 6c 6c |g on Can|cel will|
|00001ce0| 20 74 65 72 6d 69 6e 61 | 74 65 20 74 68 65 20 70 | termina|te the p|
|00001cf0| 72 6f 67 72 61 6d 2e 29 | 22 2b bd 30 3a c8 99 20 |rogram.)|"+.0:.. |
|00001d00| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|00001d10| 72 22 2c 42 6c 6f 63 6b | 2c 32 35 36 2b 33 2c 54 |r",Block|,256+3,T|
|00001d20| 61 73 6b 6e 61 6d 65 24 | 2c 22 21 22 2b 54 61 73 |askname$|,"!"+Tas|
|00001d30| 6b 6e 61 6d 65 24 2c 31 | 2c 30 20 b8 20 2c 43 6c |kname$,1|,0 . ,Cl|
|00001d40| 69 63 6b 0d 07 94 05 cb | 0d 07 9e 8f e7 20 28 43 |ick.....|..... (C|
|00001d50| 6c 69 63 6b 3d 32 29 20 | 84 20 44 6f 6e 65 20 8c |lick=2) |. Done .|
|00001d60| 20 f2 43 6c 6f 73 65 4d | 65 73 73 61 67 65 73 3a | .CloseM|essages:|
|00001d70| f2 4c 6f 73 65 46 6f 6e | 74 3a c8 99 20 22 49 6e |.LoseFon|t:.. "In|
|00001d80| 74 65 72 66 61 63 65 5f | 43 6c 6f 73 65 44 6f 77 |terface_|CloseDow|
|00001d90| 6e 22 2c 54 61 73 6b 3a | c8 99 20 22 57 69 6d 70 |n",Task:|.. "Wimp|
|00001da0| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 2c 54 61 73 6b |_CloseDo|wn",Task|
|00001db0| 2c 26 34 42 35 33 34 31 | 35 34 3a ff 28 22 55 6e |,&4B5341|54:.("Un|
|00001dc0| 53 65 74 20 43 68 61 72 | 67 65 73 24 52 75 6e 6e |Set Char|ges$Runn|
|00001dd0| 69 6e 67 22 29 3a e0 0d | 07 a8 05 e1 0d 07 b2 05 |ing"):..|........|
|00001de0| 3a 0d 07 bc 0f dd 20 f2 | 49 6e 69 74 56 61 72 73 |:..... .|InitVars|
|00001df0| 0d 07 c6 22 2a 43 48 41 | 4e 4e 45 4c 56 4f 49 43 |..."*CHA|NNELVOIC|
|00001e00| 45 20 31 20 57 61 76 65 | 53 79 6e 74 68 2d 42 65 |E 1 Wave|Synth-Be|
|00001e10| 65 70 0d 07 d0 24 4a 6f | 62 24 3d 22 84 22 3a f4 |ep...$Jo|b$=".":.|
|00001e20| 20 66 6f 72 20 74 68 65 | 20 74 69 6d 65 20 62 65 | for the| time be|
|00001e30| 69 6e 67 2e 2e 2e 0d 07 | da 41 f2 4d 6f 64 65 43 |ing.....|.A.ModeC|
|00001e40| 68 61 6e 67 65 3a f4 20 | 4d 61 6b 65 20 73 75 72 |hange:. |Make sur|
|00001e50| 65 20 77 65 27 72 65 20 | 73 65 74 20 75 70 20 63 |e we're |set up c|
|00001e60| 6f 72 72 65 63 74 6c 79 | 20 74 6f 20 73 74 61 72 |orrectly| to star|
|00001e70| 74 20 77 69 74 68 2e 0d | 07 e4 23 44 6f 6e 65 3d |t with..|..#Done=|
|00001e80| a3 3a 52 65 61 64 45 72 | 72 6f 72 3d 30 3a 57 72 |.:ReadEr|ror=0:Wr|
|00001e90| 69 74 65 45 72 72 6f 72 | 3d 30 0d 07 ee 60 44 72 |iteError|=0...`Dr|
|00001ea0| 61 67 67 69 6e 67 24 3d | 22 22 3a 44 72 61 67 67 |agging$=|"":Dragg|
|00001eb0| 65 64 54 6f 58 3d 30 3a | 44 72 61 67 67 65 64 54 |edToX=0:|DraggedT|
|00001ec0| 6f 59 3d 30 3a 44 72 61 | 67 67 65 64 54 6f 57 69 |oY=0:Dra|ggedToWi|
|00001ed0| 6e 64 6f 77 3d 30 3a 44 | 72 61 67 67 65 64 54 6f |ndow=0:D|raggedTo|
|00001ee0| 49 63 6f 6e 3d 30 3a 4d | 79 52 65 66 3d 30 3a 42 |Icon=0:M|yRef=0:B|
|00001ef0| 79 74 65 73 53 65 6e 74 | 3d 30 0d 07 f8 1f 45 78 |ytesSent|=0....Ex|
|00001f00| 63 68 61 6e 67 65 52 61 | 74 65 3d 31 3a 51 75 65 |changeRa|te=1:Que|
|00001f10| 72 79 43 61 72 65 74 3d | a3 0d 08 02 07 20 20 3a |ryCaret=|.....  :|
|00001f20| 0d 08 0c 16 f4 20 43 6c | 6f 63 6b 20 56 61 72 69 |..... Cl|ock Vari|
|00001f30| 61 62 6c 65 73 3a 0d 08 | 16 3d 20 20 43 6f 75 6e |ables:..|.=  Coun|
|00001f40| 74 69 6e 67 3d a3 3a 54 | 69 6d 65 25 3d 30 3a 43 |ting=.:T|ime%=0:C|
|00001f50| 6c 6f 63 6b 25 3d 30 3a | 48 6f 75 72 73 3d 30 3a |lock%=0:|Hours=0:|
|00001f60| 4d 69 6e 75 74 65 73 3d | 30 3a 53 65 63 6f 6e 64 |Minutes=|0:Second|
|00001f70| 73 3d 30 0d 08 20 07 20 | 20 3a 0d 08 2a 2d f4 20 |s=0.. . | :..*-. |
|00001f80| 54 65 6d 70 20 73 74 6f | 72 65 20 66 6f 72 20 4f |Temp sto|re for O|
|00001f90| 70 74 69 6f 6e 73 20 77 | 69 6e 64 6f 77 20 73 65 |ptions w|indow se|
|00001fa0| 74 74 69 6e 67 73 3a 0d | 08 34 2d 20 20 4f 70 74 |ttings:.|.4-  Opt|
|00001fb0| 5f 43 6f 75 6e 74 72 79 | 24 3d 43 6f 75 6e 74 72 |_Country|$=Countr|
|00001fc0| 79 24 3a 4f 70 74 5f 49 | 42 53 68 6f 77 43 6c 6f |y$:Opt_I|BShowClo|
|00001fd0| 63 6b 3d b9 0d 08 3e 1e | f4 20 4f 70 74 69 6f 6e |ck=...>.|. Option|
|00001fe0| 73 20 77 69 6e 64 6f 77 | 20 73 65 74 74 69 6e 67 |s window| setting|
|00001ff0| 73 3a 0d 08 48 39 20 20 | 57 68 6f 6c 65 48 6f 75 |s:..H9  |WholeHou|
|00002000| 72 73 3d a3 3a 53 74 61 | 72 74 48 6f 75 72 73 3d |rs=.:Sta|rtHours=|
|00002010| 30 3a 53 74 61 72 74 4d | 69 6e 73 3d 30 3a 49 42 |0:StartM|ins=0:IB|
|00002020| 53 68 6f 77 43 6c 6f 63 | 6b 3d b9 0d 08 52 07 20 |ShowCloc|k=...R. |
|00002030| 20 3a 0d 08 5c 2e f4 20 | 54 65 6d 70 20 73 74 6f | :..\.. |Temp sto|
|00002040| 72 65 20 66 6f 72 20 45 | 61 72 6e 69 6e 67 73 20 |re for E|arnings |
|00002050| 77 69 6e 64 6f 77 20 73 | 65 74 74 69 6e 67 73 3a |window s|ettings:|
|00002060| 0d 08 66 5b 20 20 45 61 | 72 6e 5f 46 72 6f 6d 45 |..f[  Ea|rn_FromE|
|00002070| 61 72 6e 43 75 72 72 24 | 3d 22 a3 22 3a 45 61 72 |arnCurr$|=".":Ear|
|00002080| 6e 5f 54 6f 45 61 72 6e | 43 75 72 72 24 3d 22 a3 |n_ToEarn|Curr$=".|
|00002090| 22 3a 45 61 72 6e 5f 46 | 72 6f 6d 45 61 72 6e 41 |":Earn_F|romEarnA|
|000020a0| 6d 6f 75 6e 74 3d 30 3a | 45 61 72 6e 5f 54 6f 45 |mount=0:|Earn_ToE|
|000020b0| 61 72 6e 41 6d 6f 75 6e | 74 3d 30 0d 08 70 1f f4 |arnAmoun|t=0..p..|
|000020c0| 20 45 61 72 6e 69 6e 67 | 73 20 77 69 6e 64 6f 77 | Earning|s window|
|000020d0| 20 73 65 74 74 69 6e 67 | 73 3a 0d 08 7a 47 20 20 | setting|s:..zG  |
|000020e0| 46 72 6f 6d 45 61 72 6e | 43 75 72 72 24 3d 22 a3 |FromEarn|Curr$=".|
|000020f0| 22 3a 54 6f 45 61 72 6e | 43 75 72 72 24 3d 22 a3 |":ToEarn|Curr$=".|
|00002100| 22 3a 46 72 6f 6d 45 61 | 72 6e 41 6d 6f 75 6e 74 |":FromEa|rnAmount|
|00002110| 3d 30 3a 54 6f 45 61 72 | 6e 41 6d 6f 75 6e 74 3d |=0:ToEar|nAmount=|
|00002120| 30 0d 08 84 16 20 20 45 | 61 72 6e 57 69 6e 64 6f |0....  E|arnWindo|
|00002130| 77 4f 70 65 6e 3d a3 0d | 08 8e 05 e1 0d 08 98 05 |wOpen=..|........|
|00002140| 3a 0d 08 a2 0e dd 20 f2 | 44 6f 43 6c 6f 63 6b 0d |:..... .|DoClock.|
|00002150| 08 ac 35 c8 99 20 22 4f | 53 5f 52 65 61 64 4d 6f |..5.. "O|S_ReadMo|
|00002160| 6e 6f 74 6f 6e 69 63 54 | 69 6d 65 22 20 b8 20 54 |notonicT|ime" . T|
|00002170| 69 6d 65 25 3a 54 69 6d | 65 25 3d 54 69 6d 65 25 |ime%:Tim|e%=Time%|
|00002180| 2f 31 30 30 0d 08 b6 5e | e7 20 ac 20 43 6f 75 6e |/100...^|. . Coun|
|00002190| 74 69 6e 67 20 8c 20 c8 | 99 20 22 4f 53 5f 52 65 |ting . .|. "OS_Re|
|000021a0| 61 64 4d 6f 6e 6f 74 6f | 6e 69 63 54 69 6d 65 22 |adMonoto|nicTime"|
|000021b0| 20 b8 20 43 6c 6f 63 6b | 25 3a 70 6f 6c 6c 74 69 | . Clock|%:pollti|
|000021c0| 6d 65 25 3d 43 6c 6f 63 | 6b 25 2b 31 30 30 3a 43 |me%=Cloc|k%+100:C|
|000021d0| 6c 6f 63 6b 25 3d 43 6c | 6f 63 6b 25 2f 31 30 30 |lock%=Cl|ock%/100|
|000021e0| 3a e1 0d 08 c0 15 e7 20 | 43 6c 6f 63 6b 25 3c 3e |:...... |Clock%<>|
|000021f0| 54 69 6d 65 25 20 8c 0d | 08 ca 1d 20 20 53 65 63 |Time% ..|...  Sec|
|00002200| 6f 6e 64 73 2b 3d 28 54 | 69 6d 65 25 2d 43 6c 6f |onds+=(T|ime%-Clo|
|00002210| 63 6b 25 29 0d 08 d4 21 | 20 20 4d 69 6e 75 74 65 |ck%)...!|  Minute|
|00002220| 73 3d 28 53 65 63 6f 6e | 64 73 20 81 20 36 30 29 |s=(Secon|ds . 60)|
|00002230| 20 83 20 36 30 0d 08 de | 1f 20 20 48 6f 75 72 73 | . 60...|.  Hours|
|00002240| 3d 28 53 65 63 6f 6e 64 | 73 20 81 20 36 30 29 20 |=(Second|s . 60) |
|00002250| 81 20 36 30 0d 08 e8 52 | 20 20 e7 20 48 6f 75 72 |. 60...R|  . Hour|
|00002260| 73 3d 31 30 30 30 30 20 | 8c 20 48 6f 75 72 73 3d |s=10000 |. Hours=|
|00002270| 30 3a f4 20 50 72 65 74 | 74 79 20 75 6e 6c 69 6b |0:. Pret|ty unlik|
|00002280| 65 6c 79 2c 20 62 65 20 | 77 65 20 6d 69 67 68 74 |ely, be |we might|
|00002290| 20 61 73 20 77 65 6c 6c | 20 63 61 74 65 72 20 66 | as well| cater f|
|000022a0| 6f 72 20 69 74 21 0d 08 | f2 42 20 20 e7 20 49 42 |or it!..|.B  . IB|
|000022b0| 53 68 6f 77 43 6c 6f 63 | 6b 20 8c 20 f2 53 68 6f |ShowCloc|k . .Sho|
|000022c0| 77 49 42 43 6c 6f 63 6b | 3a 8b 20 f2 44 6f 45 61 |wIBClock|:. .DoEa|
|000022d0| 72 6e 69 6e 67 73 3a f4 | 20 55 70 64 61 74 65 20 |rnings:.| Update |
|000022e0| 69 63 6f 6e 20 62 61 72 | 0d 08 fc 05 cd 0d 09 06 |icon bar|........|
|000022f0| 26 c8 99 20 22 4f 53 5f | 52 65 61 64 4d 6f 6e 6f |&.. "OS_|ReadMono|
|00002300| 74 6f 6e 69 63 54 69 6d | 65 22 20 b8 20 43 6c 6f |tonicTim|e" . Clo|
|00002310| 63 6b 25 0d 09 10 45 70 | 6f 6c 6c 74 69 6d 65 25 |ck%...Ep|olltime%|
|00002320| 3d 43 6c 6f 63 6b 25 2b | 31 30 30 3a f4 20 44 6f |=Clock%+|100:. Do|
|00002330| 20 61 20 57 69 6d 70 5f | 50 6f 6c 6c 20 61 70 70 | a Wimp_|Poll app|
|00002340| 72 6f 78 69 6d 61 74 65 | 6c 79 20 6f 6e 63 65 20 |roximate|ly once |
|00002350| 61 20 73 65 63 6f 6e 64 | 0d 09 1a 15 43 6c 6f 63 |a second|....Cloc|
|00002360| 6b 25 3d 43 6c 6f 63 6b | 25 2f 31 30 30 0d 09 24 |k%=Clock|%/100..$|
|00002370| 05 e1 0d 09 2e 05 3a 0d | 09 38 12 dd 20 f2 53 68 |......:.|.8.. .Sh|
|00002380| 6f 77 49 42 43 6c 6f 63 | 6b 0d 09 42 12 54 45 4d |owIBCloc|k..B.TEM|
|00002390| 50 24 3d c3 28 48 6f 75 | 72 73 29 0d 09 4c 2f e7 |P$=.(Hou|rs)..L/.|
|000023a0| 20 28 53 65 63 6f 6e 64 | 73 20 83 20 32 29 3d 30 | (Second|s . 2)=0|
|000023b0| 20 8c 20 54 45 4d 50 24 | 2b 3d 22 3a 22 20 8b 20 | . TEMP$|+=":" . |
|000023c0| 54 45 4d 50 24 2b 3d 22 | 2e 22 0d 09 56 1d e7 20 |TEMP$+="|."..V.. |
|000023d0| 4d 69 6e 75 74 65 73 3c | 31 30 20 8c 20 54 45 4d |Minutes<|10 . TEM|
|000023e0| 50 24 2b 3d 22 30 22 0d | 09 60 41 54 45 4d 50 24 |P$+="0".|.`ATEMP$|
|000023f0| 2b 3d c3 28 4d 69 6e 75 | 74 65 73 29 3a e7 20 a9 |+=.(Minu|tes):. .|
|00002400| 28 54 45 4d 50 24 29 3c | 37 20 8c 20 54 45 4d 50 |(TEMP$)<|7 . TEMP|
|00002410| 24 3d c4 37 2d a9 28 54 | 45 4d 50 24 29 2c 22 30 |$=.7-.(T|EMP$),"0|
|00002420| 22 29 2b 54 45 4d 50 24 | 0d 09 6a 16 24 49 42 43 |")+TEMP$|..j.$IBC|
|00002430| 6c 6f 63 6b 54 65 78 74 | 3d 54 45 4d 50 24 0d 09 |lockText|=TEMP$..|
|00002440| 74 21 f2 55 70 64 61 74 | 65 49 42 53 70 72 69 74 |t!.Updat|eIBSprit|
|00002450| 65 28 24 49 42 43 6c 6f | 63 6b 54 65 78 74 29 0d |e($IBClo|ckText).|
|00002460| 09 7e 05 e1 0d 09 88 05 | 3a 0d 09 92 13 dd 20 f2 |.~......|:..... .|
|00002470| 44 6f 43 6f 6e 76 65 72 | 73 69 6f 6e 0d 09 9c 34 |DoConver|sion...4|
|00002480| 40 25 3d 26 31 30 32 30 | 32 30 41 3a f4 20 46 69 |@%=&1020|20A:. Fi|
|00002490| 78 65 64 20 66 6f 72 6d | 61 74 2c 20 32 20 64 70 |xed form|at, 2 dp|
|000024a0| 2c 20 66 69 65 6c 64 20 | 77 69 64 74 68 20 31 30 |, field |width 10|
|000024b0| 0d 09 a6 3f f2 75 70 64 | 61 74 65 49 63 6f 6e 28 |...?.upd|ateIcon(|
|000024c0| 43 6f 6e 76 65 72 74 2c | 36 2c c3 28 a4 52 65 61 |Convert,|6,.(.Rea|
|000024d0| 64 49 63 6f 6e 28 43 6f | 6e 76 65 72 74 2c 34 29 |dIcon(Co|nvert,4)|
|000024e0| 2a 45 78 63 68 61 6e 67 | 65 52 61 74 65 29 29 0d |*Exchang|eRate)).|
|000024f0| 09 b0 5c 24 28 43 6f 6e | 76 65 72 74 54 72 61 6e |..\$(Con|vertTran|
|00002500| 73 6d 69 74 29 3d a4 52 | 65 61 64 49 63 6f 6e 53 |smit)=.R|eadIconS|
|00002510| 74 72 28 43 6f 6e 76 65 | 72 74 2c 35 29 2b c0 c3 |tr(Conve|rt,5)+..|
|00002520| 28 a4 52 65 61 64 49 63 | 6f 6e 28 43 6f 6e 76 65 |(.ReadIc|on(Conve|
|00002530| 72 74 2c 34 29 2a 45 78 | 63 68 61 6e 67 65 52 61 |rt,4)*Ex|changeRa|
|00002540| 74 65 29 2c 31 35 29 2b | bd 31 33 0d 09 ba 1d 40 |te),15)+|.13....@|
|00002550| 25 3d 26 39 30 41 3a f4 | 20 44 65 66 61 75 6c 74 |%=&90A:.| Default|
|00002560| 20 73 65 74 74 69 6e 67 | 0d 09 c4 05 e1 0d 09 ce | setting|........|
|00002570| 05 3a 0d 09 d8 11 dd 20 | f2 44 6f 45 61 72 6e 69 |.:..... |.DoEarni|
|00002580| 6e 67 73 0d 09 e2 25 54 | 6f 45 61 72 6e 41 6d 6f |ngs...%T|oEarnAmo|
|00002590| 75 6e 74 3d 46 72 6f 6d | 45 61 72 6e 41 6d 6f 75 |unt=From|EarnAmou|
|000025a0| 6e 74 2a 48 6f 75 72 73 | 0d 09 ec 12 e7 20 57 68 |nt*Hours|..... Wh|
|000025b0| 6f 6c 65 48 6f 75 72 73 | 20 8c 0d 09 f6 3a 20 20 |oleHours| ....:  |
|000025c0| f4 20 57 65 20 68 61 76 | 65 20 74 68 65 20 77 68 |. We hav|e the wh|
|000025d0| 6f 6c 65 20 68 6f 75 72 | 73 20 63 61 6c 63 75 6c |ole hour|s calcul|
|000025e0| 61 74 65 64 20 61 6c 72 | 65 61 64 79 2c 20 62 75 |ated alr|eady, bu|
|000025f0| 74 20 77 65 0d 0a 00 38 | 20 20 f4 20 6d 75 73 74 |t we...8|  . must|
|00002600| 20 72 6f 75 6e 64 20 75 | 70 20 74 6f 20 74 68 65 | round u|p to the|
|00002610| 20 6e 65 78 74 20 68 6f | 75 72 20 69 66 20 4d 69 | next ho|ur if Mi|
|00002620| 6e 75 74 65 73 20 3e 3d | 20 33 30 2e 0d 0a 0a 3b |nutes >=| 30....;|
|00002630| 20 20 e7 20 4d 69 6e 75 | 74 65 73 3e 3d 33 30 20 |  . Minu|tes>=30 |
|00002640| 8c 20 54 6f 45 61 72 6e | 41 6d 6f 75 6e 74 3d 46 |. ToEarn|Amount=F|
|00002650| 72 6f 6d 45 61 72 6e 41 | 6d 6f 75 6e 74 2a 28 48 |romEarnA|mount*(H|
|00002660| 6f 75 72 73 2b 31 29 0d | 0a 14 05 cc 0d 0a 1e 25 |ours+1).|.......%|
|00002670| 20 20 f4 20 43 61 6c 63 | 75 6c 61 74 65 20 63 6f |  . Calc|ulate co|
|00002680| 73 74 73 20 74 6f 20 74 | 68 65 20 6d 69 6e 75 74 |sts to t|he minut|
|00002690| 65 0d 0a 28 31 20 20 54 | 6f 45 61 72 6e 41 6d 6f |e..(1  T|oEarnAmo|
|000026a0| 75 6e 74 2b 3d 28 28 46 | 72 6f 6d 45 61 72 6e 41 |unt+=((F|romEarnA|
|000026b0| 6d 6f 75 6e 74 2f 36 30 | 29 2a 4d 69 6e 75 74 65 |mount/60|)*Minute|
|000026c0| 73 29 0d 0a 32 05 cd 0d | 0a 3c 4c 54 6f 45 61 72 |s)..2...|.<LToEar|
|000026d0| 6e 41 6d 6f 75 6e 74 3d | 54 6f 45 61 72 6e 41 6d |nAmount=|ToEarnAm|
|000026e0| 6f 75 6e 74 2a 45 78 63 | 68 61 6e 67 65 52 61 74 |ount*Exc|hangeRat|
|000026f0| 65 3a f4 20 43 6f 6e 76 | 65 72 74 20 74 6f 20 63 |e:. Conv|ert to c|
|00002700| 75 72 72 65 6e 63 79 20 | 72 65 71 75 69 72 65 64 |urrency |required|
|00002710| 20 61 74 0d 0a 46 4c 20 | 20 20 20 20 20 20 20 20 | at..FL |        |
|00002720| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002730| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 f4 20 |        |      . |
|00002740| 65 78 63 68 61 6e 67 65 | 20 72 61 74 65 20 73 70 |exchange| rate sp|
|00002750| 65 63 69 66 69 65 64 20 | 69 6e 20 62 6f 78 2e 0d |ecified |in box..|
|00002760| 0a 50 34 40 25 3d 26 31 | 30 32 30 32 30 41 3a f4 |.P4@%=&1|02020A:.|
|00002770| 20 46 69 78 65 64 20 66 | 6f 72 6d 61 74 2c 20 32 | Fixed f|ormat, 2|
|00002780| 20 64 70 2c 20 66 69 65 | 6c 64 20 77 69 64 74 68 | dp, fie|ld width|
|00002790| 20 31 30 0d 0a 5a 2b f2 | 75 70 64 61 74 65 49 63 | 10..Z+.|updateIc|
|000027a0| 6f 6e 28 45 61 72 6e 69 | 6e 67 73 2c 37 2c c3 28 |on(Earni|ngs,7,.(|
|000027b0| 54 6f 45 61 72 6e 41 6d | 6f 75 6e 74 29 29 0d 0a |ToEarnAm|ount))..|
|000027c0| 64 39 24 28 54 6f 74 61 | 6c 54 72 61 6e 73 6d 69 |d9$(Tota|lTransmi|
|000027d0| 74 29 3d 54 6f 45 61 72 | 6e 43 75 72 72 24 2b c0 |t)=ToEar|nCurr$+.|
|000027e0| c3 28 54 6f 45 61 72 6e | 41 6d 6f 75 6e 74 29 2c |.(ToEarn|Amount),|
|000027f0| 31 35 29 2b bd 31 33 0d | 0a 6e 1d 40 25 3d 26 39 |15)+.13.|.n.@%=&9|
|00002800| 30 41 3a f4 20 44 65 66 | 61 75 6c 74 20 73 65 74 |0A:. Def|ault set|
|00002810| 74 69 6e 67 0d 0a 78 30 | f4 20 4e 6f 77 20 74 65 |ting..x0|. Now te|
|00002820| 73 74 20 69 66 20 45 61 | 72 6e 69 6e 67 73 20 77 |st if Ea|rnings w|
|00002830| 69 6e 64 6f 77 20 69 73 | 20 73 74 69 6c 6c 20 6f |indow is| still o|
|00002840| 70 65 6e 2e 0d 0a 82 35 | f4 20 54 68 65 20 65 61 |pen....5|. The ea|
|00002850| 72 6e 69 6e 67 73 20 76 | 61 6c 75 65 20 69 73 20 |rnings v|alue is |
|00002860| 63 6f 6e 74 69 6e 75 6f | 75 73 6c 79 20 75 70 64 |continuo|usly upd|
|00002870| 61 74 65 64 20 6f 6e 6c | 79 0d 0a 8c 1c f4 20 69 |ated onl|y..... i|
|00002880| 66 20 74 68 65 20 77 69 | 6e 64 6f 77 20 69 73 20 |f the wi|ndow is |
|00002890| 6f 70 65 6e 2e 0d 0a 96 | 34 42 6c 6f 63 6b 21 30 |open....|4Block!0|
|000028a0| 3d 45 61 72 6e 69 6e 67 | 73 3a c8 99 20 22 57 69 |=Earning|s:.. "Wi|
|000028b0| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|000028c0| 65 22 2c 2c 42 6c 6f 63 | 6b 0d 0a a0 4a e7 20 28 |e",,Bloc|k...J. (|
|000028d0| 28 42 6c 6f 63 6b 21 33 | 32 29 20 80 20 28 31 3c |(Block!3|2) . (1<|
|000028e0| 3c 31 36 29 29 3d 28 31 | 3c 3c 31 36 29 20 8c 20 |<16))=(1|<<16) . |
|000028f0| 45 61 72 6e 57 69 6e 64 | 6f 77 4f 70 65 6e 3d b9 |EarnWind|owOpen=.|
|00002900| 3a 8b 20 45 61 72 6e 57 | 69 6e 64 6f 77 4f 70 65 |:. EarnW|indowOpe|
|00002910| 6e 3d a3 0d 0a aa 2a f4 | 20 55 70 64 61 74 65 20 |n=....*.| Update |
|00002920| 69 63 6f 6e 20 62 61 72 | 20 69 63 6f 6e 20 69 66 |icon bar| icon if|
|00002930| 20 61 70 70 72 6f 70 72 | 69 61 74 65 3a 0d 0a b4 | appropr|iate:...|
|00002940| 15 e7 20 ac 20 49 42 53 | 68 6f 77 43 6c 6f 63 6b |.. . IBS|howClock|
|00002950| 20 8c 0d 0a be 36 20 20 | 40 25 3d 26 31 30 32 30 | ....6  |@%=&1020|
|00002960| 32 30 41 3a f4 20 46 69 | 78 65 64 20 66 6f 72 6d |20A:. Fi|xed form|
|00002970| 61 74 2c 20 32 20 64 70 | 2c 20 66 69 65 6c 64 20 |at, 2 dp|, field |
|00002980| 77 69 64 74 68 20 31 30 | 0d 0a c8 18 20 20 54 45 |width 10|....  TE|
|00002990| 4d 50 24 3d 24 49 42 43 | 6c 6f 63 6b 54 65 78 74 |MP$=$IBC|lockText|
|000029a0| 0d 0a d2 27 20 20 24 49 | 42 43 6c 6f 63 6b 54 65 |...'  $I|BClockTe|
|000029b0| 78 74 3d c0 c3 28 54 6f | 45 61 72 6e 41 6d 6f 75 |xt=..(To|EarnAmou|
|000029c0| 6e 74 29 2c 31 30 29 0d | 0a dc 43 20 20 e7 20 a9 |nt),10).|..C  . .|
|000029d0| 28 c3 28 54 6f 45 61 72 | 6e 41 6d 6f 75 6e 74 29 |(.(ToEar|nAmount)|
|000029e0| 29 3e 37 20 8c 20 49 42 | 43 6c 6f 63 6b 54 65 78 |)>7 . IB|ClockTex|
|000029f0| 74 3f 36 3d 97 28 22 89 | 22 29 3a 49 42 43 6c 6f |t?6=.(".|"):IBClo|
|00002a00| 63 6b 54 65 78 74 3f 37 | 3d 30 0d 0a e6 1f 20 20 |ckText?7|=0....  |
|00002a10| 40 25 3d 26 39 30 41 3a | f4 20 44 65 66 61 75 6c |@%=&90A:|. Defaul|
|00002a20| 74 20 73 65 74 74 69 6e | 67 0d 0a f0 0b 20 20 4e |t settin|g....  N|
|00002a30| 3d 30 3a f5 0d 0a fa 35 | 20 20 20 20 e7 20 49 42 |=0:....5|    . IB|
|00002a40| 43 6c 6f 63 6b 54 65 78 | 74 3f 4e 3d 97 28 22 2e |ClockTex|t?N=.(".|
|00002a50| 22 29 20 8c 20 49 42 43 | 6c 6f 63 6b 54 65 78 74 |") . IBC|lockText|
|00002a60| 3f 4e 3d 97 28 22 b7 22 | 29 0d 0b 04 1f 20 20 4e |?N=.("."|)....  N|
|00002a70| 2b 3d 31 3a fd 20 28 49 | 42 43 6c 6f 63 6b 54 65 |+=1:. (I|BClockTe|
|00002a80| 78 74 3f 4e 29 3c 33 32 | 0d 0b 0e 3b 20 20 e7 20 |xt?N)<32|...;  . |
|00002a90| 54 45 4d 50 24 3c 3e 24 | 49 42 43 6c 6f 63 6b 54 |TEMP$<>$|IBClockT|
|00002aa0| 65 78 74 20 8c 20 f2 55 | 70 64 61 74 65 49 42 53 |ext . .U|pdateIBS|
|00002ab0| 70 72 69 74 65 28 24 49 | 42 43 6c 6f 63 6b 54 65 |prite($I|BClockTe|
|00002ac0| 78 74 29 0d 0b 18 07 20 | 20 3a 0d 0b 22 2a 20 20 |xt).... | :.."*  |
|00002ad0| 3a 20 f4 20 4e 6f 77 20 | 73 68 6f 77 20 74 69 6d |: . Now |show tim|
|00002ae0| 65 20 69 6e 20 45 61 72 | 6e 69 6e 67 73 20 77 69 |e in Ear|nings wi|
|00002af0| 6e 64 6f 77 0d 0b 2c 07 | 20 20 3a 0d 0b 36 14 20 |ndow..,.|  :..6. |
|00002b00| 20 54 45 4d 50 24 3d c3 | 28 48 6f 75 72 73 29 0d | TEMP$=.|(Hours).|
|00002b10| 0b 40 31 20 20 e7 20 28 | 53 65 63 6f 6e 64 73 20 |.@1  . (|Seconds |
|00002b20| 83 20 32 29 3d 30 20 8c | 20 54 45 4d 50 24 2b 3d |. 2)=0 .| TEMP$+=|
|00002b30| 22 3a 22 20 8b 20 54 45 | 4d 50 24 2b 3d 22 2e 22 |":" . TE|MP$+="."|
|00002b40| 0d 0b 4a 1f 20 20 e7 20 | 4d 69 6e 75 74 65 73 3c |..J.  . |Minutes<|
|00002b50| 31 30 20 8c 20 54 45 4d | 50 24 2b 3d 22 30 22 0d |10 . TEM|P$+="0".|
|00002b60| 0b 54 43 20 20 54 45 4d | 50 24 2b 3d c3 28 4d 69 |.TC  TEM|P$+=.(Mi|
|00002b70| 6e 75 74 65 73 29 3a e7 | 20 a9 28 54 45 4d 50 24 |nutes):.| .(TEMP$|
|00002b80| 29 3c 37 20 8c 20 54 45 | 4d 50 24 3d c4 37 2d a9 |)<7 . TE|MP$=.7-.|
|00002b90| 28 54 45 4d 50 24 29 2c | 22 30 22 29 2b 54 45 4d |(TEMP$),|"0")+TEM|
|00002ba0| 50 24 0d 0b 5e 18 20 20 | 24 49 42 43 6c 6f 63 6b |P$..^.  |$IBClock|
|00002bb0| 54 65 78 74 3d 54 45 4d | 50 24 0d 0b 68 33 20 20 |Text=TEM|P$..h3  |
|00002bc0| f2 75 70 64 61 74 65 49 | 63 6f 6e 28 45 61 72 6e |.updateI|con(Earn|
|00002bd0| 69 6e 67 73 2c 31 30 2c | 22 28 22 2b 24 49 42 43 |ings,10,|"("+$IBC|
|00002be0| 6c 6f 63 6b 54 65 78 74 | 2b 22 29 22 29 0d 0b 72 |lockText|+")")..r|
|00002bf0| 05 cc 0d 0b 7c 21 20 20 | f2 75 70 64 61 74 65 49 |....|!  |.updateI|
|00002c00| 63 6f 6e 28 45 61 72 6e | 69 6e 67 73 2c 31 30 2c |con(Earn|ings,10,|
|00002c10| 22 22 29 0d 0b 86 05 cd | 0d 0b 90 05 e1 0d 0b 9a |"").....|........|
|00002c20| 05 3a 0d 0b a4 19 dd 20 | f2 55 70 64 61 74 65 49 |.:..... |.UpdateI|
|00002c30| 42 53 70 72 69 74 65 28 | 41 24 29 0d 0b ae 07 ea |BSprite(|A$).....|
|00002c40| 20 85 0d 0b b8 18 ee 20 | 85 20 ea 20 54 65 78 74 | ...... |. . Text|
|00002c50| 46 6f 6e 74 24 3d 22 22 | 3a e1 0d 0b c2 19 e7 20 |Font$=""|:...... |
|00002c60| a9 28 41 24 29 3e 37 20 | 8c 20 41 24 3d c0 41 24 |.(A$)>7 |. A$=.A$|
|00002c70| 2c 37 29 0d 0b cc 2a c8 | 99 20 22 57 69 6d 70 5f |,7)...*.|. "Wimp_|
|00002c80| 42 61 73 65 4f 66 53 70 | 72 69 74 65 73 22 20 b8 |BaseOfSp|rites" .|
|00002c90| 20 2c 69 63 6f 6e 73 70 | 72 69 74 65 25 0d 0b d6 | ,iconsp|rite%...|
|00002ca0| 52 c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |R.. "OS_|SpriteOp|
|00002cb0| 22 2c 32 35 36 2b 36 30 | 2c 69 63 6f 6e 73 70 72 |",256+60|,iconspr|
|00002cc0| 69 74 65 25 2c 22 43 68 | 61 72 67 65 73 49 42 22 |ite%,"Ch|argesIB"|
|00002cd0| 2c 49 42 53 70 72 69 74 | 65 53 61 76 65 41 72 65 |,IBSprit|eSaveAre|
|00002ce0| 61 20 b8 20 72 30 2c 72 | 31 2c 72 32 2c 72 33 0d |a . r0,r|1,r2,r3.|
|00002cf0| 0b e0 16 ec 20 30 2c 32 | 3a f0 20 31 30 33 2c 31 |.... 0,2|:. 103,1|
|00002d00| 31 36 2c 33 32 0d 0b ea | 19 ec 20 31 36 2a 28 28 |16,32...|.. 16*((|
|00002d10| 37 2d a9 28 41 24 29 29 | 2f 32 29 2c 33 30 0d 0b |7-.(A$))|/2),30..|
|00002d20| f4 14 e7 20 54 65 78 74 | 46 6f 6e 74 24 3d 22 22 |... Text|Font$=""|
|00002d30| 20 8c 0d 0b fe 0a 20 20 | f1 20 41 24 0d 0c 08 05 | .....  |. A$....|
|00002d40| cc 0d 0c 12 40 20 20 c8 | 99 20 22 46 6f 6e 74 5f |....@  .|. "Font_|
|00002d50| 53 63 61 6e 53 74 72 69 | 6e 67 22 2c 46 6f 6e 74 |ScanStri|ng",Font|
|00002d60| 48 61 6e 64 6c 65 2c 41 | 24 2c 26 34 30 31 32 30 |Handle,A|$,&40120|
|00002d70| 2c 2d 31 2c 2d 31 2c 46 | 6f 6e 74 43 6f 6f 72 64 |,-1,-1,F|ontCoord|
|00002d80| 73 0d 0c 1c 4a 20 20 c8 | 99 20 22 46 6f 6e 74 5f |s...J  .|. "Font_|
|00002d90| 43 6f 6e 76 65 72 74 74 | 6f 4f 53 22 2c 2c 28 46 |Convertt|oOS",,(F|
|00002da0| 6f 6e 74 43 6f 6f 72 64 | 73 21 32 38 29 2d 28 46 |ontCoord|s!28)-(F|
|00002db0| 6f 6e 74 43 6f 6f 72 64 | 73 21 32 30 29 20 b8 20 |ontCoord|s!20) . |
|00002dc0| 2c 46 6f 6e 74 41 63 72 | 6f 73 73 0d 0c 26 49 20 |,FontAcr|oss..&I |
|00002dd0| 20 e7 20 46 6f 6e 74 41 | 63 72 6f 73 73 3e 31 31 | . FontA|cross>11|
|00002de0| 30 20 8c 20 46 6f 6e 74 | 41 63 72 6f 73 73 3d 30 |0 . Font|Across=0|
|00002df0| 3a 8b 20 46 6f 6e 74 41 | 63 72 6f 73 73 3d 28 28 |:. FontA|cross=((|
|00002e00| 31 31 30 2d 46 6f 6e 74 | 41 63 72 6f 73 73 29 20 |110-Font|Across) |
|00002e10| 81 20 32 29 0d 0c 30 39 | 20 20 c8 99 20 22 57 69 |. 2)..09|  .. "Wi|
|00002e20| 6d 70 5f 53 65 74 46 6f | 6e 74 43 6f 6c 6f 75 72 |mp_SetFo|ntColour|
|00002e30| 73 22 2c 2c 49 42 42 61 | 63 6b 67 72 6f 75 6e 64 |s",,IBBa|ckground|
|00002e40| 2c 49 42 46 6f 72 65 67 | 72 6f 75 6e 64 0d 0c 3a |,IBForeg|round..:|
|00002e50| 3b 20 20 c8 99 20 22 46 | 6f 6e 74 5f 50 61 69 6e |;  .. "F|ont_Pain|
|00002e60| 74 22 2c 46 6f 6e 74 48 | 61 6e 64 6c 65 2c 41 24 |t",FontH|andle,A$|
|00002e70| 2c 25 31 30 30 30 31 30 | 30 30 30 2c 46 6f 6e 74 |,%100010|000,Font|
|00002e80| 41 63 72 6f 73 73 2c 38 | 0d 0c 44 05 cd 0d 0c 4e |Across,8|..D....N|
|00002e90| 20 c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 | .. "OS_|SpriteOp|
|00002ea0| 22 2c 72 30 2c 72 31 2c | 72 32 2c 72 33 0d 0c 58 |",r0,r1,|r2,r3..X|
|00002eb0| 0d f2 55 70 64 61 74 65 | 49 42 0d 0c 62 05 e1 0d |..Update|IB..b...|
|00002ec0| 0c 6c 05 3a 0d 0c 76 0f | dd 20 f2 55 70 64 61 74 |.l.:..v.|. .Updat|
|00002ed0| 65 49 42 0d 0c 80 07 ea | 20 85 0d 0c 8a 0b ee 20 |eIB.....| ...... |
|00002ee0| 85 20 ea 20 e1 0d 0c 94 | 5a 42 6c 6f 63 6b 21 30 |. . ....|ZBlock!0|
|00002ef0| 3d 2d 31 3a 42 6c 6f 63 | 6b 21 34 3d 49 63 6f 6e |=-1:Bloc|k!4=Icon|
|00002f00| 42 61 72 3a 42 6c 6f 63 | 6b 21 38 3d 30 3a 42 6c |Bar:Bloc|k!8=0:Bl|
|00002f10| 6f 63 6b 21 31 32 3d 30 | 3a c8 99 20 26 34 30 30 |ock!12=0|:.. &400|
|00002f20| 43 44 2c 2c 42 6c 6f 63 | 6b 3a f4 20 22 57 69 6d |CD,,Bloc|k:. "Wim|
|00002f30| 70 5f 53 65 74 49 63 6f | 6e 53 74 61 74 65 22 0d |p_SetIco|nState".|
|00002f40| 0c 9e 4c f4 20 4e 65 65 | 64 20 74 6f 20 68 61 76 |..L. Nee|d to hav|
|00002f50| 65 20 74 68 69 73 20 69 | 6e 20 61 20 73 65 70 61 |e this i|n a sepa|
|00002f60| 72 61 74 65 20 50 52 4f | 43 20 62 65 63 61 75 73 |rate PRO|C becaus|
|00002f70| 65 20 6f 66 20 69 6e 69 | 74 69 61 6c 20 63 61 6c |e of ini|tial cal|
|00002f80| 6c 20 66 72 6f 6d 20 50 | 52 4f 43 0d 0c a8 43 f4 |l from P|ROC...C.|
|00002f90| 20 4d 6f 64 65 43 68 61 | 6e 67 65 2c 20 77 68 65 | ModeCha|nge, whe|
|00002fa0| 6e 20 74 68 65 20 69 63 | 6f 6e 20 62 61 72 20 73 |n the ic|on bar s|
|00002fb0| 70 72 69 74 65 20 68 61 | 73 6e 27 74 20 79 65 74 |prite ha|sn't yet|
|00002fc0| 20 62 65 65 6e 20 64 65 | 66 69 6e 65 64 2e 0d 0c | been de|fined...|
|00002fd0| b2 05 e1 0d 0c bc 05 3a | 0d 0c c6 0d dd 20 f2 52 |.......:|..... .R|
|00002fe0| 65 64 72 61 77 0d 0c d0 | 28 c8 99 20 22 57 69 6d |edraw...|(.. "Wim|
|00002ff0| 70 5f 52 65 64 72 61 77 | 57 69 6e 64 6f 77 22 2c |p_Redraw|Window",|
|00003000| 2c 42 6c 6f 63 6b 20 b8 | 20 66 6c 61 67 0d 0c da |,Block .| flag...|
|00003010| 0b c8 95 20 66 6c 61 67 | 0d 0c e4 2a 20 20 c8 99 |... flag|...*  ..|
|00003020| 20 22 49 6e 74 65 72 66 | 61 63 65 5f 52 65 6e 64 | "Interf|ace_Rend|
|00003030| 65 72 33 64 57 69 6e 64 | 6f 77 22 2c 2c 42 6c 6f |er3dWind|ow",,Blo|
|00003040| 63 6b 0d 0c ee 2a 20 20 | c8 99 20 22 57 69 6d 70 |ck...*  |.. "Wimp|
|00003050| 5f 47 65 74 52 65 63 74 | 61 6e 67 6c 65 22 2c 2c |_GetRect|angle",,|
|00003060| 42 6c 6f 63 6b 20 b8 20 | 66 6c 61 67 0d 0c f8 05 |Block . |flag....|
|00003070| ce 0d 0d 02 05 e1 0d 0d | 0c 05 3a 0d 0d 16 15 dd |........|..:.....|
|00003080| 20 f2 52 65 63 69 65 76 | 65 4d 65 73 73 61 67 65 | .Reciev|eMessage|
|00003090| 0d 0d 20 11 c8 8e 20 42 | 6c 6f 63 6b 21 31 36 20 |.. ... B|lock!16 |
|000030a0| ca 0d 0d 2a 12 20 20 c9 | 20 30 20 3a 20 44 6f 6e |...*.  .| 0 : Don|
|000030b0| 65 3d b9 0d 0d 34 58 20 | 20 c9 20 32 20 3a 20 f4 |e=...4X | . 2 : .|
|000030c0| 20 44 61 74 61 53 61 76 | 65 41 63 6b 20 2d 20 6f | DataSav|eAck - o|
|000030d0| 74 68 65 72 20 74 61 73 | 6b 20 77 61 6e 74 73 20 |ther tas|k wants |
|000030e0| 61 20 74 72 61 6e 73 66 | 65 72 20 76 69 61 20 3c |a transf|er via <|
|000030f0| 57 69 6d 70 24 53 63 72 | 61 70 3e 20 72 61 74 68 |Wimp$Scr|ap> rath|
|00003100| 65 72 20 74 68 61 6e 20 | 52 41 4d 0d 0d 3e 1a 20 |er than |RAM..>. |
|00003110| 20 20 20 f2 57 69 6d 70 | 53 63 72 61 70 54 72 61 |   .Wimp|ScrapTra|
|00003120| 6e 73 6d 69 74 0d 0d 48 | 4c 20 20 c9 20 34 20 3a |nsmit..H|L  . 4 :|
|00003130| 20 f4 20 41 20 72 65 63 | 6f 72 64 65 64 20 6d 65 | . A rec|orded me|
|00003140| 73 73 61 67 65 20 69 73 | 20 62 65 69 6e 67 20 61 |ssage is| being a|
|00003150| 63 6b 6e 6f 77 6c 65 64 | 67 65 64 2c 20 6f 72 20 |cknowled|ged, or |
|00003160| 61 6e 20 75 6e 61 63 6b | 6e 6f 77 6c 65 64 67 65 |an unack|nowledge|
|00003170| 64 0d 0d 52 3b 20 20 20 | 20 20 20 20 20 20 20 20 |d..R;   |        |
|00003180| f4 20 6d 65 73 73 61 67 | 65 20 69 73 20 62 65 69 |. messag|e is bei|
|00003190| 6e 67 20 62 6f 75 6e 63 | 65 64 20 62 61 63 6b 20 |ng bounc|ed back |
|000031a0| 62 79 20 74 68 65 20 57 | 69 6d 70 2e 0d 0d 5c 19 |by the W|imp...\.|
|000031b0| 20 20 20 20 e7 20 42 6c | 6f 63 6b 21 38 3d 4d 79 |    . Bl|ock!8=My|
|000031c0| 52 65 66 20 8c 0d 0d 66 | 4d 20 20 20 20 20 20 f4 |Ref ...f|M      .|
|000031d0| 20 57 65 27 76 65 20 73 | 61 76 65 64 20 74 6f 20 | We've s|aved to |
|000031e0| 3c 57 69 6d 70 24 53 63 | 72 61 70 3e 2c 20 62 75 |<Wimp$Sc|rap>, bu|
|000031f0| 74 20 68 61 76 65 20 72 | 65 63 65 69 76 65 64 20 |t have r|eceived |
|00003200| 6e 6f 20 61 63 6b 6e 6f | 77 6c 65 64 67 65 6d 65 |no ackno|wledgeme|
|00003210| 6e 74 0d 0d 70 22 20 20 | 20 20 20 20 ff 28 22 44 |nt..p"  |    .("D|
|00003220| 65 6c 65 74 65 20 3c 57 | 69 6d 70 24 53 63 72 61 |elete <W|imp$Scra|
|00003230| 70 3e 22 29 0d 0d 7a 4c | 20 20 20 20 20 20 85 20 |p>")..zL|      . |
|00003240| 39 39 39 39 2c a4 4d 65 | 73 73 61 67 65 4c 6f 6f |9999,.Me|ssageLoo|
|00003250| 6b 75 70 28 22 45 72 72 | 6f 72 5f 39 22 2c 54 61 |kup("Err|or_9",Ta|
|00003260| 73 6b 6e 61 6d 65 24 29 | 3a f4 20 27 52 65 63 65 |skname$)|:. 'Rece|
|00003270| 69 76 65 72 20 64 69 65 | 64 27 20 65 72 72 6f 72 |iver die|d' error|
|00003280| 0d 0d 84 09 20 20 20 20 | cd 0d 0d 8e 37 20 20 c9 |....    |....7  .|
|00003290| 20 36 20 3a 20 f4 20 52 | 41 4d 20 46 65 74 63 68 | 6 : . R|AM Fetch|
|000032a0| 20 2d 20 6f 74 68 65 72 | 20 74 61 73 6b 20 69 73 | - other| task is|
|000032b0| 20 61 73 6b 69 6e 67 20 | 66 6f 72 20 64 61 74 61 | asking |for data|
|000032c0| 0d 0d 98 14 20 20 20 20 | f2 52 41 4d 54 72 61 6e |....    |.RAMTran|
|000032d0| 73 6d 69 74 0d 0d a2 2e | 20 20 c9 20 31 30 3a 20 |smit....|  . 10: |
|000032e0| f4 20 54 68 65 20 64 65 | 73 6b 74 6f 70 20 73 74 |. The de|sktop st|
|000032f0| 61 74 65 20 69 73 20 62 | 65 69 6e 67 20 73 61 76 |ate is b|eing sav|
|00003300| 65 64 0d 0d ac 25 20 20 | 20 20 20 20 20 20 20 20 |ed...%  |        |
|00003310| 20 f2 53 61 76 65 44 65 | 73 6b 74 6f 70 28 42 6c | .SaveDe|sktop(Bl|
|00003320| 6f 63 6b 21 32 30 29 0d | 0d b6 14 20 20 c9 20 26 |ock!20).|...  . &|
|00003330| 35 30 32 20 3a 20 f2 48 | 65 6c 70 0d 0d c0 1c 20 |502 : .H|elp.... |
|00003340| 20 c9 20 26 34 30 30 43 | 31 20 3a 20 f2 4d 6f 64 | . &400C|1 : .Mod|
|00003350| 65 43 68 61 6e 67 65 0d | 0d ca 39 20 20 c9 20 26 |eChange.|..9  . &|
|00003360| 34 30 30 43 30 20 3a 20 | f2 4d 65 6e 75 57 61 72 |400C0 : |.MenuWar|
|00003370| 6e 69 6e 67 28 42 6c 6f | 63 6b 21 33 32 2c 42 6c |ning(Blo|ck!32,Bl|
|00003380| 6f 63 6b 21 32 34 2c 42 | 6c 6f 63 6b 21 32 38 29 |ock!24,B|lock!28)|
|00003390| 0d 0d d4 05 cb 0d 0d de | 05 e1 0d 0d e8 05 3a 0d |........|......:.|
|000033a0| 0d f2 18 dd 20 f2 53 61 | 76 65 44 65 73 6b 74 6f |.... .Sa|veDeskto|
|000033b0| 70 28 46 69 6c 65 29 0d | 0d fc 07 ea 20 85 0d 0e |p(File).|.... ...|
|000033c0| 06 47 ee 20 85 20 ea 20 | 42 6c 6f 63 6b 21 31 32 |.G. . . |Block!12|
|000033d0| 3d 42 6c 6f 63 6b 21 38 | 3a c8 99 20 22 57 69 6d |=Block!8|:.. "Wim|
|000033e0| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 31 |p_SendMe|ssage",1|
|000033f0| 39 2c 42 6c 6f 63 6b 2c | 42 6c 6f 63 6b 21 34 3a |9,Block,|Block!4:|
|00003400| f7 20 85 3a e1 0d 0e 10 | 49 f4 20 54 68 65 20 61 |. .:....|I. The a|
|00003410| 62 6f 76 65 20 6c 69 6e | 65 20 61 63 6b 6e 6f 77 |bove lin|e acknow|
|00003420| 6c 65 64 67 65 73 20 74 | 68 65 20 6d 65 73 73 61 |ledges t|he messa|
|00003430| 67 65 20 69 66 20 61 6e | 20 65 72 72 6f 72 20 6f |ge if an| error o|
|00003440| 63 63 75 72 73 2c 20 74 | 68 65 72 65 62 79 0d 0e |ccurs, t|hereby..|
|00003450| 1a 20 f4 20 61 62 6f 72 | 74 69 6e 67 20 74 68 65 |. . abor|ting the|
|00003460| 20 64 65 73 6b 74 6f 70 | 20 73 61 76 65 2e 0d 0e | desktop| save...|
|00003470| 24 47 c8 99 20 22 4f 53 | 5f 52 65 61 64 56 61 72 |$G.. "OS|_ReadVar|
|00003480| 56 61 6c 22 2c 22 43 68 | 61 72 67 65 73 24 44 69 |Val","Ch|arges$Di|
|00003490| 72 22 2c 42 6c 6f 63 6b | 2c 32 35 36 2c 30 2c 30 |r",Block|,256,0,0|
|000034a0| 20 b8 20 2c 2c 6c 65 6e | 3a 42 6c 6f 63 6b 3f 6c | . ,,len|:Block?l|
|000034b0| 65 6e 3d 31 33 0d 0e 2e | 18 d5 23 46 69 6c 65 2c |en=13...|..#File,|
|000034c0| 22 52 75 6e 20 22 2b 24 | 42 6c 6f 63 6b 0d 0e 38 |"Run "+$|Block..8|
|000034d0| 05 e1 0d 0e 42 05 3a 0d | 0e 4c 12 dd 20 f2 52 41 |....B.:.|.L.. .RA|
|000034e0| 4d 54 72 61 6e 73 6d 69 | 74 0d 0e 56 57 4f 74 68 |MTransmi|t..VWOth|
|000034f0| 65 72 54 61 73 6b 48 61 | 6e 64 6c 65 3d 42 6c 6f |erTaskHa|ndle=Blo|
|00003500| 63 6b 21 34 3a 4d 79 52 | 65 66 3d 42 6c 6f 63 6b |ck!4:MyR|ef=Block|
|00003510| 21 38 3a 54 72 61 6e 73 | 6d 69 74 42 75 66 66 65 |!8:Trans|mitBuffe|
|00003520| 72 3d 42 6c 6f 63 6b 21 | 32 30 3a 42 75 66 66 65 |r=Block!|20:Buffe|
|00003530| 72 4c 65 6e 67 74 68 3d | 42 6c 6f 63 6b 21 32 34 |rLength=|Block!24|
|00003540| 0d 0e 60 12 c8 8e 20 44 | 72 61 67 67 69 6e 67 24 |..`... D|ragging$|
|00003550| 20 ca 0d 0e 6a 34 20 20 | c9 20 22 54 6f 74 61 6c | ...j4  |. "Total|
|00003560| 22 3a 54 72 61 6e 73 6d | 69 73 73 69 6f 6e 3d 54 |":Transm|ission=T|
|00003570| 6f 74 61 6c 54 72 61 6e | 73 6d 69 74 2b 42 79 74 |otalTran|smit+Byt|
|00003580| 65 73 53 65 6e 74 0d 0e | 74 3b 20 20 c9 20 22 43 |esSent..|t;  . "C|
|00003590| 6f 6e 76 65 72 73 69 6f | 6e 22 3a 54 72 61 6e 73 |onversio|n":Trans|
|000035a0| 6d 69 73 73 69 6f 6e 3d | 43 6f 6e 76 65 72 74 54 |mission=|ConvertT|
|000035b0| 72 61 6e 73 6d 69 74 2b | 42 79 74 65 73 53 65 6e |ransmit+|BytesSen|
|000035c0| 74 0d 0e 7e 4b 20 20 7f | 20 85 20 39 39 39 39 2c |t..~K  .| . 9999,|
|000035d0| a4 4d 65 73 73 61 67 65 | 4c 6f 6f 6b 75 70 28 22 |.Message|Lookup("|
|000035e0| 45 72 72 6f 72 5f 37 22 | 2c 54 61 73 6b 6e 61 6d |Error_7"|,Tasknam|
|000035f0| 65 24 29 3a f4 20 55 6e | 6b 6e 6f 77 6e 20 64 72 |e$):. Un|known dr|
|00003600| 61 67 20 68 61 70 70 65 | 6e 69 6e 67 0d 0e 88 05 |ag happe|ning....|
|00003610| cb 0d 0e 92 59 c8 99 20 | 22 57 69 6d 70 5f 54 72 |....Y.. |"Wimp_Tr|
|00003620| 61 6e 73 66 65 72 42 6c | 6f 63 6b 22 2c 54 61 73 |ansferBl|ock",Tas|
|00003630| 6b 2c 54 72 61 6e 73 6d | 69 73 73 69 6f 6e 2c 4f |k,Transm|ission,O|
|00003640| 74 68 65 72 54 61 73 6b | 48 61 6e 64 6c 65 2c 54 |therTask|Handle,T|
|00003650| 72 61 6e 73 6d 69 74 42 | 75 66 66 65 72 2c 42 75 |ransmitB|uffer,Bu|
|00003660| 66 66 65 72 4c 65 6e 67 | 74 68 0d 0e 9c 28 42 6c |fferLeng|th...(Bl|
|00003670| 6f 63 6b 21 30 3d 32 38 | 3a 42 6c 6f 63 6b 21 31 |ock!0=28|:Block!1|
|00003680| 36 3d 37 3a f4 20 52 41 | 4d 20 54 72 61 6e 73 6d |6=7:. RA|M Transm|
|00003690| 69 74 0d 0e a6 2a 42 6c | 6f 63 6b 21 31 32 3d 4d |it...*Bl|ock!12=M|
|000036a0| 79 52 65 66 3a 42 6c 6f | 63 6b 21 32 30 3d 54 72 |yRef:Blo|ck!20=Tr|
|000036b0| 61 6e 73 6d 69 74 42 75 | 66 66 65 72 0d 0e b0 17 |ansmitBu|ffer....|
|000036c0| e7 20 42 75 66 66 65 72 | 4c 65 6e 67 74 68 3c 32 |. Buffer|Length<2|
|000036d0| 32 20 8c 0d 0e ba 1b 20 | 20 42 6c 6f 63 6b 21 32 |2 ..... | Block!2|
|000036e0| 34 3d 42 75 66 66 65 72 | 4c 65 6e 67 74 68 0d 0e |4=Buffer|Length..|
|000036f0| c4 34 20 20 c8 99 20 22 | 57 69 6d 70 5f 53 65 6e |.4  .. "|Wimp_Sen|
|00003700| 64 4d 65 73 73 61 67 65 | 22 2c 31 38 2c 42 6c 6f |dMessage|",18,Blo|
|00003710| 63 6b 2c 4f 74 68 65 72 | 54 61 73 6b 48 61 6e 64 |ck,Other|TaskHand|
|00003720| 6c 65 0d 0e ce 1d 20 20 | 42 79 74 65 73 53 65 6e |le....  |BytesSen|
|00003730| 74 2b 3d 42 75 66 66 65 | 72 4c 65 6e 67 74 68 0d |t+=Buffe|rLength.|
|00003740| 0e d8 05 cc 0d 0e e2 1f | 20 20 42 6c 6f 63 6b 21 |........|  Block!|
|00003750| 32 34 3d a9 28 24 54 72 | 61 6e 73 6d 69 73 73 69 |24=.($Tr|ansmissi|
|00003760| 6f 6e 29 0d 0e ec 34 20 | 20 c8 99 20 22 57 69 6d |on)...4 | .. "Wim|
|00003770| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 31 |p_SendMe|ssage",1|
|00003780| 37 2c 42 6c 6f 63 6b 2c | 4f 74 68 65 72 54 61 73 |7,Block,|OtherTas|
|00003790| 6b 48 61 6e 64 6c 65 0d | 0e f6 1e 20 20 42 79 74 |kHandle.|...  Byt|
|000037a0| 65 73 53 65 6e 74 3d 30 | 3a 44 72 61 67 67 69 6e |esSent=0|:Draggin|
|000037b0| 67 24 3d 22 22 0d 0f 00 | 05 cd 0d 0f 0a 05 e1 0d |g$=""...|........|
|000037c0| 0f 14 05 3a 0d 0f 1e 18 | dd 20 f2 57 69 6d 70 53 |...:....|. .WimpS|
|000037d0| 63 72 61 70 54 72 61 6e | 73 6d 69 74 0d 0f 28 29 |crapTran|smit..()|
|000037e0| 4f 74 68 65 72 54 61 73 | 6b 48 61 6e 64 6c 65 3d |OtherTas|kHandle=|
|000037f0| 42 6c 6f 63 6b 21 34 3a | 4d 79 52 65 66 3d 42 6c |Block!4:|MyRef=Bl|
|00003800| 6f 63 6b 21 38 0d 0f 32 | 32 53 61 76 65 46 69 6c |ock!8..2|2SaveFil|
|00003810| 65 6e 61 6d 65 24 3d c0 | 24 28 42 6c 6f 63 6b 2b |ename$=.|$(Block+|
|00003820| 34 34 29 2c a7 24 28 42 | 6c 6f 63 6b 2b 34 34 29 |44),.$(B|lock+44)|
|00003830| 2c bd 30 29 2d 31 29 0d | 0f 3c 12 c8 8e 20 44 72 |,.0)-1).|.<... Dr|
|00003840| 61 67 67 69 6e 67 24 20 | ca 0d 0f 46 2a 20 20 c9 |agging$ |...F*  .|
|00003850| 20 22 54 6f 74 61 6c 22 | 3a 54 72 61 6e 73 6d 69 | "Total"|:Transmi|
|00003860| 73 73 69 6f 6e 3d 54 6f | 74 61 6c 54 72 61 6e 73 |ssion=To|talTrans|
|00003870| 6d 69 74 0d 0f 50 31 20 | 20 c9 20 22 43 6f 6e 76 |mit..P1 | . "Conv|
|00003880| 65 72 73 69 6f 6e 22 3a | 54 72 61 6e 73 6d 69 73 |ersion":|Transmis|
|00003890| 73 69 6f 6e 3d 43 6f 6e | 76 65 72 74 54 72 61 6e |sion=Con|vertTran|
|000038a0| 73 6d 69 74 0d 0f 5a 4b | 20 20 7f 20 85 20 39 39 |smit..ZK|  . . 99|
|000038b0| 39 39 2c a4 4d 65 73 73 | 61 67 65 4c 6f 6f 6b 75 |99,.Mess|ageLooku|
|000038c0| 70 28 22 45 72 72 6f 72 | 5f 37 22 2c 54 61 73 6b |p("Error|_7",Task|
|000038d0| 6e 61 6d 65 24 29 3a f4 | 20 55 6e 6b 6e 6f 77 6e |name$):.| Unknown|
|000038e0| 20 64 72 61 67 20 68 61 | 70 70 65 6e 69 6e 67 0d | drag ha|ppening.|
|000038f0| 0f 64 05 cb 0d 0f 6e 07 | ea 20 85 0d 0f 78 38 ee |.d....n.|. ...x8.|
|00003900| 20 85 20 ea 20 f7 20 85 | 3a 85 20 39 39 39 39 2c | . . . .|:. 9999,|
|00003910| a4 4d 65 73 73 61 67 65 | 4c 6f 6f 6b 75 70 28 22 |.Message|Lookup("|
|00003920| 45 72 72 6f 72 5f 38 22 | 2c 54 61 73 6b 6e 61 6d |Error_8"|,Tasknam|
|00003930| 65 24 29 0d 0f 82 18 44 | 61 74 61 3d ae 20 53 61 |e$)....D|ata=. Sa|
|00003940| 76 65 46 69 6c 65 6e 61 | 6d 65 24 0d 0f 8c 1a d5 |veFilena|me$.....|
|00003950| 23 44 61 74 61 2c 24 28 | 54 72 61 6e 73 6d 69 73 |#Data,$(|Transmis|
|00003960| 73 69 6f 6e 29 0d 0f 96 | 0a d9 23 44 61 74 61 0d |sion)...|..#Data.|
|00003970| 0f a0 27 ff 28 22 53 65 | 74 54 79 70 65 20 22 2b |..'.("Se|tType "+|
|00003980| 53 61 76 65 46 69 6c 65 | 6e 61 6d 65 24 2b 22 20 |SaveFile|name$+" |
|00003990| 54 65 78 74 22 29 0d 0f | aa 54 42 6c 6f 63 6b 21 |Text")..|.TBlock!|
|000039a0| 30 3d 28 34 34 2b a9 28 | 53 61 76 65 46 69 6c 65 |0=(44+.(|SaveFile|
|000039b0| 6e 61 6d 65 24 29 29 3a | 42 6c 6f 63 6b 21 30 3d |name$)):|Block!0=|
|000039c0| 28 42 6c 6f 63 6b 21 30 | 29 2b 28 34 2d 28 28 42 |(Block!0|)+(4-((B|
|000039d0| 6c 6f 63 6b 21 30 29 20 | 83 20 34 29 29 3a f4 20 |lock!0) |. 4)):. |
|000039e0| 57 6f 72 64 20 61 6c 69 | 67 6e 0d 0f b4 28 42 6c |Word ali|gn...(Bl|
|000039f0| 6f 63 6b 21 31 32 3d 4d | 79 52 65 66 3a 42 6c 6f |ock!12=M|yRef:Blo|
|00003a00| 63 6b 21 31 36 3d 33 3a | f4 20 44 61 74 61 4c 6f |ck!16=3:|. DataLo|
|00003a10| 61 64 0d 0f be 33 42 6c | 6f 63 6b 21 32 30 3d 44 |ad...3Bl|ock!20=D|
|00003a20| 72 61 67 67 65 64 54 6f | 57 69 6e 64 6f 77 3a 42 |raggedTo|Window:B|
|00003a30| 6c 6f 63 6b 21 32 34 3d | 44 72 61 67 67 65 64 54 |lock!24=|DraggedT|
|00003a40| 6f 49 63 6f 6e 0d 0f c8 | 2b 42 6c 6f 63 6b 21 32 |oIcon...|+Block!2|
|00003a50| 38 3d 44 72 61 67 67 65 | 64 54 6f 58 3a 42 6c 6f |8=Dragge|dToX:Blo|
|00003a60| 63 6b 21 33 32 3d 44 72 | 61 67 67 65 64 54 6f 59 |ck!32=Dr|aggedToY|
|00003a70| 0d 0f d2 2a 42 6c 6f 63 | 6b 21 33 36 3d 32 32 3a |...*Bloc|k!36=22:|
|00003a80| f4 20 4e 65 76 65 72 20 | 6d 6f 72 65 20 74 68 61 |. Never |more tha|
|00003a90| 6e 20 32 32 20 62 79 74 | 65 73 0d 0f dc 24 42 6c |n 22 byt|es...$Bl|
|00003aa0| 6f 63 6b 21 34 30 3d 26 | 46 46 46 3a f4 20 46 69 |ock!40=&|FFF:. Fi|
|00003ab0| 6c 65 74 79 70 65 20 6f | 66 20 54 65 78 74 0d 0f |letype o|f Text..|
|00003ac0| e6 2d 24 28 42 6c 6f 63 | 6b 2b 34 34 29 3d 53 61 |.-$(Bloc|k+44)=Sa|
|00003ad0| 76 65 46 69 6c 65 6e 61 | 6d 65 24 2b bd 30 3a 44 |veFilena|me$+.0:D|
|00003ae0| 72 61 67 67 69 6e 67 24 | 3d 22 22 0d 0f f0 32 c8 |ragging$|=""...2.|
|00003af0| 99 20 22 57 69 6d 70 5f | 53 65 6e 64 4d 65 73 73 |. "Wimp_|SendMess|
|00003b00| 61 67 65 22 2c 31 38 2c | 42 6c 6f 63 6b 2c 4f 74 |age",18,|Block,Ot|
|00003b10| 68 65 72 54 61 73 6b 48 | 61 6e 64 6c 65 0d 0f fa |herTaskH|andle...|
|00003b20| 05 e1 0d 10 04 05 3a 0d | 10 0e 11 dd 20 f2 4b 65 |......:.|.... .Ke|
|00003b30| 79 50 72 65 73 73 65 64 | 0d 10 18 32 57 69 6e 64 |yPressed|...2Wind|
|00003b40| 6f 77 3d 42 6c 6f 63 6b | 21 30 3a 49 63 6f 6e 3d |ow=Block|!0:Icon=|
|00003b50| 42 6c 6f 63 6b 21 34 3a | 43 68 61 72 61 63 74 65 |Block!4:|Characte|
|00003b60| 72 3d 42 6c 6f 63 6b 21 | 32 34 0d 10 22 0f c8 8e |r=Block!|24.."...|
|00003b70| 20 57 69 6e 64 6f 77 20 | ca 0d 10 2c 10 20 20 c9 | Window |...,.  .|
|00003b80| 20 43 6f 6e 76 65 72 74 | 3a 0d 10 36 18 20 20 20 | Convert|:..6.   |
|00003b90| 20 e7 20 43 68 61 72 61 | 63 74 65 72 3d 31 33 20 | . Chara|cter=13 |
|00003ba0| 8c 0d 10 40 17 20 20 20 | 20 20 20 f2 44 6f 43 6f |...@.   |   .DoCo|
|00003bb0| 6e 76 65 72 73 69 6f 6e | 0d 10 4a 09 20 20 20 20 |nversion|..J.    |
|00003bc0| cc 0d 10 54 28 20 20 20 | 20 20 20 c8 99 20 22 57 |...T(   |   .. "W|
|00003bd0| 69 6d 70 5f 50 72 6f 63 | 65 73 73 4b 65 79 22 2c |imp_Proc|essKey",|
|00003be0| 43 68 61 72 61 63 74 65 | 72 0d 10 5e 09 20 20 20 |Characte|r..^.   |
|00003bf0| 20 cd 0d 10 68 10 20 20 | c9 20 45 61 72 6e 69 6e | ...h.  |. Earnin|
|00003c00| 67 73 0d 10 72 18 20 20 | 20 20 e7 20 43 68 61 72 |gs..r.  |  . Char|
|00003c10| 61 63 74 65 72 3d 31 33 | 20 8c 0d 10 7c 43 20 20 |acter=13| ...|C  |
|00003c20| 20 20 20 20 f4 20 53 65 | 74 20 75 70 20 42 6c 6f |    . Se|t up Blo|
|00003c30| 63 6b 20 61 73 20 69 66 | 20 74 68 65 72 65 20 68 |ck as if| there h|
|00003c40| 61 64 20 62 65 65 6e 20 | 61 20 53 65 6c 65 63 74 |ad been |a Select|
|00003c50| 2d 63 6c 69 63 6b 20 6f | 6e 20 4f 4b 2c 0d 10 86 |-click o|n OK,...|
|00003c60| 33 20 20 20 20 20 20 f4 | 20 74 68 65 6e 20 63 61 |3      .| then ca|
|00003c70| 6c 6c 20 50 52 4f 43 4d | 6f 75 73 65 42 75 74 74 |ll PROCM|ouseButt|
|00003c80| 6f 6e 20 74 6f 20 68 61 | 6e 64 6c 65 20 69 74 2e |on to ha|ndle it.|
|00003c90| 0d 10 90 30 20 20 20 20 | 20 20 42 6c 6f 63 6b 21 |...0    |  Block!|
|00003ca0| 38 3d 34 3a 42 6c 6f 63 | 6b 21 31 32 3d 45 61 72 |8=4:Bloc|k!12=Ear|
|00003cb0| 6e 69 6e 67 73 3a 42 6c | 6f 63 6b 21 31 36 3d 39 |nings:Bl|ock!16=9|
|00003cc0| 0d 10 9a 16 20 20 20 20 | 20 20 f2 4d 6f 75 73 65 |....    |  .Mouse|
|00003cd0| 42 75 74 74 6f 6e 0d 10 | a4 09 20 20 20 20 cc 0d |Button..|..    ..|
|00003ce0| 10 ae 28 20 20 20 20 20 | 20 c8 99 20 22 57 69 6d |..(     | .. "Wim|
|00003cf0| 70 5f 50 72 6f 63 65 73 | 73 4b 65 79 22 2c 43 68 |p_Proces|sKey",Ch|
|00003d00| 61 72 61 63 74 65 72 0d | 10 b8 09 20 20 20 20 cd |aracter.|...    .|
|00003d10| 0d 10 c2 0f 20 20 c9 20 | 4f 70 74 69 6f 6e 73 0d |....  . |Options.|
|00003d20| 10 cc 11 20 20 20 20 c8 | 8e 20 49 63 6f 6e 20 ca |...    .|. Icon .|
|00003d30| 0d 10 d6 0e 20 20 20 20 | 20 20 c9 20 33 3a 0d 10 |....    |  . 3:..|
|00003d40| e0 1a 20 20 20 20 20 20 | 20 20 c8 8e 20 43 68 61 |..      |  .. Cha|
|00003d50| 72 61 63 74 65 72 20 ca | 0d 10 ea 4a 20 20 20 20 |racter .|...J    |
|00003d60| 20 20 20 20 20 20 c9 20 | 26 31 38 45 2c 26 31 39 |      . |&18E,&19|
|00003d70| 45 2c 26 31 41 45 2c 26 | 31 42 45 2c 26 31 38 46 |E,&1AE,&|1BE,&18F|
|00003d80| 2c 26 31 39 46 2c 26 31 | 41 46 2c 26 31 42 46 3a |,&19F,&1|AF,&1BF:|
|00003d90| f4 20 44 6f 77 6e 20 6f | 72 20 55 70 20 61 72 72 |. Down o|r Up arr|
|00003da0| 6f 77 0d 10 f4 47 20 20 | 20 20 20 20 20 20 20 20 |ow...G  |        |
|00003db0| e7 20 a4 52 65 61 64 49 | 63 6f 6e 53 74 72 28 4f |. .ReadI|conStr(O|
|00003dc0| 70 74 69 6f 6e 73 2c 33 | 29 3d 22 22 20 8c 20 f2 |ptions,3|)="" . .|
|00003dd0| 75 70 64 61 74 65 49 63 | 6f 6e 28 4f 70 74 69 6f |updateIc|on(Optio|
|00003de0| 6e 73 2c 33 2c 22 30 22 | 29 0d 10 fe 54 20 20 20 |ns,3,"0"|)...T   |
|00003df0| 20 20 20 20 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |       .|. "Wimp_|
|00003e00| 53 65 74 43 61 72 65 74 | 50 6f 73 69 74 69 6f 6e |SetCaret|Position|
|00003e10| 22 2c 4f 70 74 69 6f 6e | 73 2c 35 2c 30 2c 30 2c |",Option|s,5,0,0,|
|00003e20| 2d 31 2c a9 28 a4 52 65 | 61 64 49 63 6f 6e 53 74 |-1,.(.Re|adIconSt|
|00003e30| 72 28 4f 70 74 69 6f 6e | 73 2c 35 29 29 0d 11 08 |r(Option|s,5))...|
|00003e40| 0d 20 20 20 20 20 20 20 | 20 cb 0d 11 12 0e 20 20 |.       | .....  |
|00003e50| 20 20 20 20 c9 20 35 3a | 0d 11 1c 1a 20 20 20 20 |    . 5:|....    |
|00003e60| 20 20 20 20 c8 8e 20 43 | 68 61 72 61 63 74 65 72 |    .. C|haracter|
|00003e70| 20 ca 0d 11 26 4a 20 20 | 20 20 20 20 20 20 20 20 | ...&J  |        |
|00003e80| c9 20 26 31 38 45 2c 26 | 31 39 45 2c 26 31 41 45 |. &18E,&|19E,&1AE|
|00003e90| 2c 26 31 42 45 2c 26 31 | 38 46 2c 26 31 39 46 2c |,&1BE,&1|8F,&19F,|
|00003ea0| 26 31 41 46 2c 26 31 42 | 46 3a f4 20 44 6f 77 6e |&1AF,&1B|F:. Down|
|00003eb0| 20 6f 72 20 55 70 20 61 | 72 72 6f 77 0d 11 30 5b | or Up a|rrow..0[|
|00003ec0| 20 20 20 20 20 20 20 20 | 20 20 e7 20 a4 52 65 61 |        |  . .Rea|
|00003ed0| 64 49 63 6f 6e 28 4f 70 | 74 69 6f 6e 73 2c 35 29 |dIcon(Op|tions,5)|
|00003ee0| 3e 35 39 20 8c 20 f2 75 | 70 64 61 74 65 49 63 6f |>59 . .u|pdateIco|
|00003ef0| 6e 28 4f 70 74 69 6f 6e | 73 2c 35 2c c3 28 a4 52 |n(Option|s,5,.(.R|
|00003f00| 65 61 64 49 63 6f 6e 28 | 4f 70 74 69 6f 6e 73 2c |eadIcon(|Options,|
|00003f10| 35 29 2d 36 30 29 29 0d | 11 3a 48 20 20 20 20 20 |5)-60)).|.:H     |
|00003f20| 20 20 20 20 20 e7 20 a4 | 52 65 61 64 49 63 6f 6e |     . .|ReadIcon|
|00003f30| 28 4f 70 74 69 6f 6e 73 | 2c 35 29 3c 31 30 20 80 |(Options|,5)<10 .|
|00003f40| 20 a9 28 a4 52 65 61 64 | 49 63 6f 6e 53 74 72 28 | .(.Read|IconStr(|
|00003f50| 4f 70 74 69 6f 6e 73 2c | 35 29 29 3c 32 20 8c 0d |Options,|5))<2 ..|
|00003f60| 11 44 2a 20 20 20 20 20 | 20 20 20 20 20 20 20 e7 |.D*     |       .|
|00003f70| 20 a4 52 65 61 64 49 63 | 6f 6e 28 4f 70 74 69 6f | .ReadIc|on(Optio|
|00003f80| 6e 73 2c 35 29 3d 30 20 | 8c 0d 11 4e 2d 20 20 20 |ns,5)=0 |...N-   |
|00003f90| 20 20 20 20 20 20 20 20 | 20 20 20 f2 75 70 64 61 |        |   .upda|
|00003fa0| 74 65 49 63 6f 6e 28 4f | 70 74 69 6f 6e 73 2c 35 |teIcon(O|ptions,5|
|00003fb0| 2c 22 30 30 22 29 0d 11 | 58 11 20 20 20 20 20 20 |,"00")..|X.      |
|00003fc0| 20 20 20 20 20 20 cc 0d | 11 62 44 20 20 20 20 20 |      ..|.bD     |
|00003fd0| 20 20 20 20 20 20 20 20 | 20 f2 75 70 64 61 74 65 |        | .update|
|00003fe0| 49 63 6f 6e 28 4f 70 74 | 69 6f 6e 73 2c 35 2c 22 |Icon(Opt|ions,5,"|
|00003ff0| 30 22 2b a4 52 65 61 64 | 49 63 6f 6e 53 74 72 28 |0"+.Read|IconStr(|
|00004000| 4f 70 74 69 6f 6e 73 2c | 35 29 29 0d 11 6c 11 20 |Options,|5))..l. |
|00004010| 20 20 20 20 20 20 20 20 | 20 20 20 cd 0d 11 76 0f |        |   ...v.|
|00004020| 20 20 20 20 20 20 20 20 | 20 20 cd 0d 11 80 54 20 |        |  ....T |
|00004030| 20 20 20 20 20 20 20 20 | 20 c8 99 20 22 57 69 6d |        | .. "Wim|
|00004040| 70 5f 53 65 74 43 61 72 | 65 74 50 6f 73 69 74 69 |p_SetCar|etPositi|
|00004050| 6f 6e 22 2c 4f 70 74 69 | 6f 6e 73 2c 33 2c 30 2c |on",Opti|ons,3,0,|
|00004060| 30 2c 2d 31 2c a9 28 a4 | 52 65 61 64 49 63 6f 6e |0,-1,.(.|ReadIcon|
|00004070| 53 74 72 28 4f 70 74 69 | 6f 6e 73 2c 33 29 29 0d |Str(Opti|ons,3)).|
|00004080| 11 8a 0d 20 20 20 20 20 | 20 20 20 cb 0d 11 94 09 |...     |   .....|
|00004090| 20 20 20 20 cb 0d 11 9e | 18 20 20 20 20 e7 20 43 |    ....|.    . C|
|000040a0| 68 61 72 61 63 74 65 72 | 3d 31 33 20 8c 0d 11 a8 |haracter|=13 ....|
|000040b0| 43 20 20 20 20 20 20 f4 | 20 53 65 74 20 75 70 20 |C      .| Set up |
|000040c0| 42 6c 6f 63 6b 20 61 73 | 20 69 66 20 74 68 65 72 |Block as| if ther|
|000040d0| 65 20 68 61 64 20 62 65 | 65 6e 20 61 20 53 65 6c |e had be|en a Sel|
|000040e0| 65 63 74 2d 63 6c 69 63 | 6b 20 6f 6e 20 4f 4b 2c |ect-clic|k on OK,|
|000040f0| 0d 11 b2 33 20 20 20 20 | 20 20 f4 20 74 68 65 6e |...3    |  . then|
|00004100| 20 63 61 6c 6c 20 50 52 | 4f 43 4d 6f 75 73 65 42 | call PR|OCMouseB|
|00004110| 75 74 74 6f 6e 20 74 6f | 20 68 61 6e 64 6c 65 20 |utton to| handle |
|00004120| 69 74 2e 0d 11 bc 30 20 | 20 20 20 20 20 42 6c 6f |it....0 |     Blo|
|00004130| 63 6b 21 38 3d 34 3a 42 | 6c 6f 63 6b 21 31 32 3d |ck!8=4:B|lock!12=|
|00004140| 4f 70 74 69 6f 6e 73 3a | 42 6c 6f 63 6b 21 31 36 |Options:|Block!16|
|00004150| 3d 31 30 0d 11 c6 16 20 | 20 20 20 20 20 f2 4d 6f |=10.... |     .Mo|
|00004160| 75 73 65 42 75 74 74 6f | 6e 0d 11 d0 09 20 20 20 |useButto|n....   |
|00004170| 20 cc 0d 11 da 28 20 20 | 20 20 20 20 c8 99 20 22 | ....(  |    .. "|
|00004180| 57 69 6d 70 5f 50 72 6f | 63 65 73 73 4b 65 79 22 |Wimp_Pro|cessKey"|
|00004190| 2c 43 68 61 72 61 63 74 | 65 72 0d 11 e4 09 20 20 |,Charact|er....  |
|000041a0| 20 20 cd 0d 11 ee 0d 20 | 20 c9 20 51 75 65 72 79 |  ..... | . Query|
|000041b0| 0d 11 f8 28 20 20 20 20 | e7 20 43 68 61 72 61 63 |...(    |. Charac|
|000041c0| 74 65 72 3d 31 32 31 20 | 84 20 43 68 61 72 61 63 |ter=121 |. Charac|
|000041d0| 74 65 72 3d 38 39 20 8c | 0d 12 02 44 20 20 20 20 |ter=89 .|...D    |
|000041e0| 20 20 f4 20 53 65 74 20 | 75 70 20 42 6c 6f 63 6b |  . Set |up Block|
|000041f0| 20 61 73 20 69 66 20 74 | 68 65 72 65 20 68 61 64 | as if t|here had|
|00004200| 20 62 65 65 6e 20 61 20 | 53 65 6c 65 63 74 2d 63 | been a |Select-c|
|00004210| 6c 69 63 6b 20 6f 6e 20 | 59 65 73 2c 0d 12 0c 33 |lick on |Yes,...3|
|00004220| 20 20 20 20 20 20 f4 20 | 74 68 65 6e 20 63 61 6c |      . |then cal|
|00004230| 6c 20 50 52 4f 43 4d 6f | 75 73 65 42 75 74 74 6f |l PROCMo|useButto|
|00004240| 6e 20 74 6f 20 68 61 6e | 64 6c 65 20 69 74 2e 0d |n to han|dle it..|
|00004250| 12 16 2d 20 20 20 20 20 | 20 42 6c 6f 63 6b 21 38 |..-     | Block!8|
|00004260| 3d 34 3a 42 6c 6f 63 6b | 21 31 32 3d 51 75 65 72 |=4:Block|!12=Quer|
|00004270| 79 3a 42 6c 6f 63 6b 21 | 31 36 3d 31 0d 12 20 16 |y:Block!|16=1.. .|
|00004280| 20 20 20 20 20 20 f2 4d | 6f 75 73 65 42 75 74 74 |      .M|ouseButt|
|00004290| 6f 6e 0d 12 2a 09 20 20 | 20 20 cd 0d 12 34 28 20 |on..*.  |  ...4( |
|000042a0| 20 20 20 e7 20 43 68 61 | 72 61 63 74 65 72 3d 31 |   . Cha|racter=1|
|000042b0| 31 30 20 84 20 43 68 61 | 72 61 63 74 65 72 3d 37 |10 . Cha|racter=7|
|000042c0| 38 20 8c 0d 12 3e 43 20 | 20 20 20 20 20 f4 20 53 |8 ...>C |     . S|
|000042d0| 65 74 20 75 70 20 42 6c | 6f 63 6b 20 61 73 20 69 |et up Bl|ock as i|
|000042e0| 66 20 74 68 65 72 65 20 | 68 61 64 20 62 65 65 6e |f there |had been|
|000042f0| 20 61 20 53 65 6c 65 63 | 74 2d 63 6c 69 63 6b 20 | a Selec|t-click |
|00004300| 6f 6e 20 4e 6f 2c 0d 12 | 48 33 20 20 20 20 20 20 |on No,..|H3      |
|00004310| f4 20 74 68 65 6e 20 63 | 61 6c 6c 20 50 52 4f 43 |. then c|all PROC|
|00004320| 4d 6f 75 73 65 42 75 74 | 74 6f 6e 20 74 6f 20 68 |MouseBut|ton to h|
|00004330| 61 6e 64 6c 65 20 69 74 | 2e 0d 12 52 2d 20 20 20 |andle it|...R-   |
|00004340| 20 20 20 42 6c 6f 63 6b | 21 38 3d 34 3a 42 6c 6f |   Block|!8=4:Blo|
|00004350| 63 6b 21 31 32 3d 51 75 | 65 72 79 3a 42 6c 6f 63 |ck!12=Qu|ery:Bloc|
|00004360| 6b 21 31 36 3d 32 0d 12 | 5c 16 20 20 20 20 20 20 |k!16=2..|\.      |
|00004370| f2 4d 6f 75 73 65 42 75 | 74 74 6f 6e 0d 12 66 09 |.MouseBu|tton..f.|
|00004380| 20 20 20 20 cd 0d 12 70 | 07 20 20 7f 0d 12 7a 26 |    ...p|.  ...z&|
|00004390| 20 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 50 72 6f |    .. "|Wimp_Pro|
|000043a0| 63 65 73 73 4b 65 79 22 | 2c 43 68 61 72 61 63 74 |cessKey"|,Charact|
|000043b0| 65 72 0d 12 84 05 cb 0d | 12 8e 05 e1 0d 12 98 05 |er......|........|
|000043c0| 3a 0d 12 a2 12 dd 20 f2 | 4d 6f 75 73 65 42 75 74 |:..... .|MouseBut|
|000043d0| 74 6f 6e 0d 12 ac 31 4d | 6f 75 73 65 58 3d 42 6c |ton...1M|ouseX=Bl|
|000043e0| 6f 63 6b 21 30 3a 4d 6f | 75 73 65 59 3d 42 6c 6f |ock!0:Mo|useY=Blo|
|000043f0| 63 6b 21 34 3a 42 75 74 | 74 6f 6e 73 3d 42 6c 6f |ck!4:But|tons=Blo|
|00004400| 63 6b 21 38 0d 12 b6 21 | 57 69 6e 64 6f 77 3d 42 |ck!8...!|Window=B|
|00004410| 6c 6f 63 6b 21 31 32 3a | 49 63 6f 6e 3d 42 6c 6f |lock!12:|Icon=Blo|
|00004420| 63 6b 21 31 36 0d 12 c0 | 0f c8 8e 20 57 69 6e 64 |ck!16...|... Wind|
|00004430| 6f 77 20 ca 0d 12 ca 22 | 20 20 c9 20 2d 32 3a f4 |ow ...."|  . -2:.|
|00004440| 20 49 63 6f 6e 20 62 61 | 72 20 69 63 6f 6e 20 63 | Icon ba|r icon c|
|00004450| 6c 69 63 6b 65 64 0d 12 | d4 14 20 20 20 20 c8 8e |licked..|..    ..|
|00004460| 20 42 75 74 74 6f 6e 73 | 20 ca 0d 12 de 18 20 20 | Buttons| .....  |
|00004470| 20 20 20 20 c9 20 31 20 | 3a 20 f4 20 41 64 6a 75 |    . 1 |: . Adju|
|00004480| 73 74 0d 12 e8 1a 20 20 | 20 20 20 20 20 20 e7 20 |st....  |      . |
|00004490| ac 20 43 6f 75 6e 74 69 | 6e 67 20 8c 0d 12 f2 1a |. Counti|ng .....|
|000044a0| 20 20 20 20 20 20 20 20 | 20 20 d4 20 31 2c 2d 37 |        |  . 1,-7|
|000044b0| 2c 31 37 37 2c 32 0d 12 | fc 30 20 20 20 20 20 20 |,177,2..|.0      |
|000044c0| 20 20 20 20 48 6f 75 72 | 73 3d 53 74 61 72 74 48 |    Hour|s=StartH|
|000044d0| 6f 75 72 73 3a 4d 69 6e | 75 74 65 73 3d 53 74 61 |ours:Min|utes=Sta|
|000044e0| 72 74 4d 69 6e 73 0d 13 | 06 39 20 20 20 20 20 20 |rtMins..|.9      |
|000044f0| 20 20 20 20 53 65 63 6f | 6e 64 73 3d 28 28 53 74 |    Seco|nds=((St|
|00004500| 61 72 74 48 6f 75 72 73 | 2a 36 30 29 2a 36 30 29 |artHours|*60)*60)|
|00004510| 2b 28 53 74 61 72 74 4d | 69 6e 73 2a 36 30 29 0d |+(StartM|ins*60).|
|00004520| 13 10 64 20 20 20 20 20 | 20 20 20 20 20 c8 99 20 |..d     |     .. |
|00004530| 22 4f 53 5f 52 65 61 64 | 4d 6f 6e 6f 74 6f 6e 69 |"OS_Read|Monotoni|
|00004540| 63 54 69 6d 65 22 20 b8 | 20 43 6c 6f 63 6b 25 3a |cTime" .| Clock%:|
|00004550| 70 6f 6c 6c 74 69 6d 65 | 25 3d 43 6c 6f 63 6b 25 |polltime|%=Clock%|
|00004560| 2b 31 30 30 3a 43 6c 6f | 63 6b 25 3d 43 6c 6f 63 |+100:Clo|ck%=Cloc|
|00004570| 6b 25 2f 31 30 30 3a 54 | 69 6d 65 25 3d 43 6c 6f |k%/100:T|ime%=Clo|
|00004580| 63 6b 25 0d 13 1a 1d 20 | 20 20 20 20 20 20 20 20 |ck%.... |        |
|00004590| 20 e7 20 49 42 53 68 6f | 77 43 6c 6f 63 6b 20 8c | . IBSho|wClock .|
|000045a0| 0d 13 24 48 20 20 20 20 | 20 20 20 20 20 20 20 20 |..$H    |        |
|000045b0| 42 6c 6f 63 6b 21 30 3d | 2d 31 3a 42 6c 6f 63 6b |Block!0=|-1:Block|
|000045c0| 21 34 3d 49 63 6f 6e 42 | 61 72 3a c8 99 20 22 57 |!4=IconB|ar:.. "W|
|000045d0| 69 6d 70 5f 47 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_GetI|conState|
|000045e0| 22 2c 2c 42 6c 6f 63 6b | 0d 13 2e 3c 20 20 20 20 |",,Block|...<    |
|000045f0| 20 20 20 20 20 20 20 20 | 54 45 4d 50 24 3d c3 28 |        |TEMP$=.(|
|00004600| 48 6f 75 72 73 29 2b 22 | 3a 22 3a e7 20 4d 69 6e |Hours)+"|:":. Min|
|00004610| 75 74 65 73 3c 31 30 20 | 8c 20 54 45 4d 50 24 2b |utes<10 |. TEMP$+|
|00004620| 3d 22 30 22 0d 13 38 4d | 20 20 20 20 20 20 20 20 |="0"..8M|        |
|00004630| 20 20 20 20 54 45 4d 50 | 24 2b 3d c3 28 4d 69 6e |    TEMP|$+=.(Min|
|00004640| 75 74 65 73 29 3a e7 20 | a9 28 54 45 4d 50 24 29 |utes):. |.(TEMP$)|
|00004650| 3c 37 20 8c 20 54 45 4d | 50 24 3d c4 37 2d a9 28 |<7 . TEM|P$=.7-.(|
|00004660| 54 45 4d 50 24 29 2c 22 | 30 22 29 2b 54 45 4d 50 |TEMP$),"|0")+TEMP|
|00004670| 24 0d 13 42 22 20 20 20 | 20 20 20 20 20 20 20 20 |$..B"   |        |
|00004680| 20 24 49 42 43 6c 6f 63 | 6b 54 65 78 74 3d 54 45 | $IBCloc|kText=TE|
|00004690| 4d 50 24 0d 13 4c 2d 20 | 20 20 20 20 20 20 20 20 |MP$..L- |        |
|000046a0| 20 20 20 f2 55 70 64 61 | 74 65 49 42 53 70 72 69 |   .Upda|teIBSpri|
|000046b0| 74 65 28 24 49 42 43 6c | 6f 63 6b 54 65 78 74 29 |te($IBCl|ockText)|
|000046c0| 0d 13 56 0f 20 20 20 20 | 20 20 20 20 20 20 cc 0d |..V.    |      ..|
|000046d0| 13 60 3d 20 20 20 20 20 | 20 20 20 20 20 20 20 f2 |.`=     |       .|
|000046e0| 44 6f 45 61 72 6e 69 6e | 67 73 3a f4 20 54 68 69 |DoEarnin|gs:. Thi|
|000046f0| 73 20 77 69 6c 6c 20 75 | 70 64 61 74 65 20 69 63 |s will u|pdate ic|
|00004700| 6f 6e 20 62 61 72 20 69 | 63 6f 6e 2e 0d 13 6a 0f |on bar i|con...j.|
|00004710| 20 20 20 20 20 20 20 20 | 20 20 cd 0d 13 74 49 20 |        |  ...tI |
|00004720| 20 20 20 20 20 20 20 20 | 20 e7 20 ac 20 a4 53 61 |        | . . .Sa|
|00004730| 76 65 4a 6f 62 28 4a 6f | 62 24 29 20 8c 20 85 20 |veJob(Jo|b$) . . |
|00004740| 39 39 39 39 2c a4 4d 65 | 73 73 61 67 65 4c 6f 6f |9999,.Me|ssageLoo|
|00004750| 6b 75 70 28 22 45 72 72 | 6f 72 5f 31 32 22 2c 4a |kup("Err|or_12",J|
|00004760| 6f 62 24 29 0d 13 7e 0d | 20 20 20 20 20 20 20 20 |ob$)..~.|        |
|00004770| cd 0d 13 88 16 20 20 20 | 20 20 20 c9 20 32 20 3a |.....   |   . 2 :|
|00004780| 20 f4 20 4d 65 6e 75 0d | 13 92 39 20 20 20 20 20 | . Menu.|..9     |
|00004790| 20 20 20 4d 25 3d 4d 65 | 6e 75 31 3a 4d 65 6e 75 |   M%=Me|nu1:Menu|
|000047a0| 58 3d 4d 6f 75 73 65 58 | 3a 4d 65 6e 75 59 3d 4d |X=MouseX|:MenuY=M|
|000047b0| 6f 75 73 65 59 3a f2 6d | 61 6b 65 5f 6d 65 6e 75 |ouseY:.m|ake_menu|
|000047c0| 0d 13 9c 18 20 20 20 20 | 20 20 c9 20 34 20 3a 20 |....    |  . 4 : |
|000047d0| f4 20 53 65 6c 65 63 74 | 0d 13 a6 18 20 20 20 20 |. Select|....    |
|000047e0| 20 20 20 20 d4 20 31 2c | 2d 37 2c 31 34 39 2c 32 |    . 1,|-7,149,2|
|000047f0| 0d 13 b0 1f 20 20 20 20 | 20 20 20 20 43 6f 75 6e |....    |    Coun|
|00004800| 74 69 6e 67 3d ac 20 43 | 6f 75 6e 74 69 6e 67 0d |ting=. C|ounting.|
|00004810| 13 ba 18 20 20 20 20 20 | 20 20 20 e7 20 43 6f 75 |...     |   . Cou|
|00004820| 6e 74 69 6e 67 20 8c 0d | 13 c4 2c 20 20 20 20 20 |nting ..|..,     |
|00004830| 20 20 20 20 20 f4 20 53 | 68 61 64 65 20 6f 75 74 |     . S|hade out|
|00004840| 20 4a 6f 62 20 6d 61 6e | 61 67 65 72 20 6f 70 74 | Job man|ager opt|
|00004850| 69 6f 6e 0d 13 ce 2c 20 | 20 20 20 20 20 20 20 20 |ion..., |        |
|00004860| 20 21 28 4d 65 6e 75 31 | 2b 32 38 2b 28 34 2a 32 | !(Menu1|+28+(4*2|
|00004870| 34 29 2b 38 29 3d 26 30 | 37 34 30 33 31 32 31 0d |4)+8)=&0|7403121.|
|00004880| 13 d8 49 20 20 20 20 20 | 20 20 20 20 20 e7 20 ac |..I     |     . .|
|00004890| 20 a4 53 61 76 65 4a 6f | 62 28 4a 6f 62 24 29 20 | .SaveJo|b(Job$) |
|000048a0| 8c 20 85 20 39 39 39 39 | 2c a4 4d 65 73 73 61 67 |. . 9999|,.Messag|
|000048b0| 65 4c 6f 6f 6b 75 70 28 | 22 45 72 72 6f 72 5f 31 |eLookup(|"Error_1|
|000048c0| 32 22 2c 4a 6f 62 24 29 | 0d 13 e2 0d 20 20 20 20 |2",Job$)|....    |
|000048d0| 20 20 20 20 cc 0d 13 ec | 2a 20 20 20 20 20 20 20 |    ....|*       |
|000048e0| 20 20 20 f4 20 55 6e 73 | 68 61 64 65 20 4a 6f 62 |   . Uns|hade Job|
|000048f0| 20 6d 61 6e 61 67 65 72 | 20 6f 70 74 69 6f 6e 0d | manager| option.|
|00004900| 13 f6 2c 20 20 20 20 20 | 20 20 20 20 20 21 28 4d |..,     |     !(M|
|00004910| 65 6e 75 31 2b 32 38 2b | 28 34 2a 32 34 29 2b 38 |enu1+28+|(4*24)+8|
|00004920| 29 3d 26 30 37 30 30 33 | 31 32 31 0d 14 00 49 20 |)=&07003|121...I |
|00004930| 20 20 20 20 20 20 20 20 | 20 e7 20 ac 20 a4 53 61 |        | . . .Sa|
|00004940| 76 65 4a 6f 62 28 4a 6f | 62 24 29 20 8c 20 85 20 |veJob(Jo|b$) . . |
|00004950| 39 39 39 39 2c a4 4d 65 | 73 73 61 67 65 4c 6f 6f |9999,.Me|ssageLoo|
|00004960| 6b 75 70 28 22 45 72 72 | 6f 72 5f 31 32 22 2c 4a |kup("Err|or_12",J|
|00004970| 6f 62 24 29 0d 14 0a 0d | 20 20 20 20 20 20 20 20 |ob$)....|        |
|00004980| cd 0d 14 14 09 20 20 20 | 20 cb 0d 14 1e 1c 20 20 |.....   | .....  |
|00004990| c9 20 45 61 72 6e 69 6e | 67 73 20 80 20 42 75 74 |. Earnin|gs . But|
|000049a0| 74 6f 6e 73 3c 38 0d 14 | 28 11 20 20 20 20 c8 8e |tons<8..|(.    ..|
|000049b0| 20 49 63 6f 6e 20 ca 0d | 14 32 20 20 20 20 20 20 | Icon ..|.2      |
|000049c0| 20 c9 20 32 2c 36 3a f4 | 20 43 75 72 72 65 6e 63 | . 2,6:.| Currenc|
|000049d0| 79 20 69 63 6f 6e 73 0d | 14 3c 1e 20 20 20 20 20 |y icons.|.<.     |
|000049e0| 20 20 20 f2 6d 61 6b 65 | 5f 43 75 72 72 65 6e 63 |   .make|_Currenc|
|000049f0| 79 4d 65 6e 75 0d 14 46 | 2e 20 20 20 20 20 20 c9 |yMenu..F|.      .|
|00004a00| 20 33 3a f4 20 49 63 6f | 6e 20 74 61 6b 69 6e 67 | 3:. Ico|n taking|
|00004a10| 20 68 6f 75 72 6c 79 20 | 72 61 74 65 20 61 6d 6f | hourly |rate amo|
|00004a20| 75 6e 74 0d 14 50 3b 20 | 20 20 20 20 20 20 20 f2 |unt..P; |       .|
|00004a30| 75 70 64 61 74 65 49 63 | 6f 6e 28 45 61 72 6e 69 |updateIc|on(Earni|
|00004a40| 6e 67 73 2c 37 2c 22 30 | 2e 30 30 22 29 3a 45 61 |ngs,7,"0|.00"):Ea|
|00004a50| 72 6e 57 69 6e 64 6f 77 | 4f 70 65 6e 3d a3 0d 14 |rnWindow|Open=...|
|00004a60| 5a 4b 20 20 20 20 20 20 | 20 20 f4 20 49 66 20 61 |ZK      |  . If a|
|00004a70| 20 6e 65 77 20 68 6f 75 | 72 6c 79 20 72 61 74 65 | new hou|rly rate|
|00004a80| 20 69 73 20 65 6e 74 65 | 72 65 64 2c 20 74 68 65 | is ente|red, the|
|00004a90| 20 65 61 72 6e 65 64 20 | 61 6d 6f 75 6e 74 20 69 | earned |amount i|
|00004aa0| 73 20 7a 65 72 6f 65 64 | 2c 0d 14 64 4e 20 20 20 |s zeroed|,..dN   |
|00004ab0| 20 20 20 20 20 f4 20 61 | 6e 64 20 74 68 65 20 70 |     . a|nd the p|
|00004ac0| 72 6f 67 72 61 6d 20 6d | 75 73 74 20 62 65 20 66 |rogram m|ust be f|
|00004ad0| 6f 6f 6c 65 64 20 69 6e | 74 6f 20 74 68 69 6e 6b |ooled in|to think|
|00004ae0| 69 6e 67 20 74 68 65 20 | 45 61 72 6e 69 6e 67 73 |ing the |Earnings|
|00004af0| 20 77 69 6e 64 6f 77 0d | 14 6e 47 20 20 20 20 20 | window.|.nG     |
|00004b00| 20 20 20 f4 20 69 73 20 | 63 6c 6f 73 65 64 20 28 |   . is |closed (|
|00004b10| 74 68 65 72 65 62 79 20 | 64 69 73 61 62 6c 69 6e |thereby |disablin|
|00004b20| 67 20 74 68 65 20 63 6f | 6e 74 69 6e 75 6f 75 73 |g the co|ntinuous|
|00004b30| 20 63 61 6c 63 75 6c 61 | 74 69 6f 6e 29 2e 0d 14 | calcula|tion)...|
|00004b40| 78 16 20 20 20 20 20 20 | c9 20 38 3a f4 20 43 61 |x.      |. 8:. Ca|
|00004b50| 6e 63 65 6c 0d 14 82 2c | 20 20 20 20 20 20 20 20 |ncel...,|        |
|00004b60| c8 99 20 22 49 6e 74 65 | 72 66 61 63 65 5f 53 6c |.. "Inte|rface_Sl|
|00004b70| 61 62 42 75 74 74 6f 6e | 22 2c 2c 42 6c 6f 63 6b |abButton|",,Block|
|00004b80| 0d 14 8c 55 20 20 20 20 | 20 20 20 20 f2 75 70 64 |...U    |    .upd|
|00004b90| 61 74 65 49 63 6f 6e 28 | 45 61 72 6e 69 6e 67 73 |ateIcon(|Earnings|
|00004ba0| 2c 32 2c 46 72 6f 6d 45 | 61 72 6e 43 75 72 72 24 |,2,FromE|arnCurr$|
|00004bb0| 29 3a f2 75 70 64 61 74 | 65 49 63 6f 6e 28 45 61 |):.updat|eIcon(Ea|
|00004bc0| 72 6e 69 6e 67 73 2c 36 | 2c 54 6f 45 61 72 6e 43 |rnings,6|,ToEarnC|
|00004bd0| 75 72 72 24 29 0d 14 96 | 41 20 20 20 20 20 20 20 |urr$)...|A       |
|00004be0| 20 f2 75 70 64 61 74 65 | 49 63 6f 6e 28 45 61 72 | .update|Icon(Ear|
|00004bf0| 6e 69 6e 67 73 2c 33 2c | c3 28 46 72 6f 6d 45 61 |nings,3,|.(FromEa|
|00004c00| 72 6e 41 6d 6f 75 6e 74 | 29 29 3a f2 44 6f 45 61 |rnAmount|)):.DoEa|
|00004c10| 72 6e 69 6e 67 73 0d 14 | a0 33 20 20 20 20 20 20 |rnings..|.3      |
|00004c20| 20 20 e7 20 42 75 74 74 | 6f 6e 73 3c 3e 31 20 8c |  . Butt|ons<>1 .|
|00004c30| 20 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 | .. "Wim|p_Create|
|00004c40| 4d 65 6e 75 22 2c 2c 2d | 31 0d 14 aa 53 20 20 20 |Menu",,-|1...S   |
|00004c50| 20 20 20 20 20 42 6c 6f | 63 6b 21 38 3d 30 3a 42 |     Blo|ck!8=0:B|
|00004c60| 6c 6f 63 6b 21 31 32 3d | 45 61 72 6e 69 6e 67 73 |lock!12=|Earnings|
|00004c70| 3a 42 6c 6f 63 6b 21 31 | 36 3d 38 3a c8 99 20 22 |:Block!1|6=8:.. "|
|00004c80| 49 6e 74 65 72 66 61 63 | 65 5f 53 6c 61 62 42 75 |Interfac|e_SlabBu|
|00004c90| 74 74 6f 6e 22 2c 2c 42 | 6c 6f 63 6b 0d 14 b4 12 |tton",,B|lock....|
|00004ca0| 20 20 20 20 20 20 c9 20 | 39 3a f4 20 4f 4b 0d 14 |      . |9:. OK..|
|00004cb0| be 2c 20 20 20 20 20 20 | 20 20 c8 99 20 22 49 6e |.,      |  .. "In|
|00004cc0| 74 65 72 66 61 63 65 5f | 53 6c 61 62 42 75 74 74 |terface_|SlabButt|
|00004cd0| 6f 6e 22 2c 2c 42 6c 6f | 63 6b 0d 14 c8 33 20 20 |on",,Blo|ck...3  |
|00004ce0| 20 20 20 20 20 20 e7 20 | 42 75 74 74 6f 6e 73 3c |      . |Buttons<|
|00004cf0| 3e 31 20 8c 20 c8 99 20 | 22 57 69 6d 70 5f 43 72 |>1 . .. |"Wimp_Cr|
|00004d00| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 2d 31 0d 14 d2 |eateMenu|",,-1...|
|00004d10| 36 20 20 20 20 20 20 20 | 20 42 6c 6f 63 6b 21 38 |6       | Block!8|
|00004d20| 3d 30 3a c8 99 20 22 49 | 6e 74 65 72 66 61 63 65 |=0:.. "I|nterface|
|00004d30| 5f 53 6c 61 62 42 75 74 | 74 6f 6e 22 2c 2c 42 6c |_SlabBut|ton",,Bl|
|00004d40| 6f 63 6b 0d 14 dc 44 20 | 20 20 20 20 20 20 20 42 |ock...D |       B|
|00004d50| 6c 6f 63 6b 21 30 3d 45 | 61 72 6e 69 6e 67 73 3a |lock!0=E|arnings:|
|00004d60| 42 6c 6f 63 6b 21 34 3d | 32 3a c8 99 20 22 57 69 |Block!4=|2:.. "Wi|
|00004d70| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00004d80| 2c 2c 42 6c 6f 63 6b 0d | 14 e6 4b 20 20 20 20 20 |,,Block.|..K     |
|00004d90| 20 20 20 45 61 72 6e 5f | 46 72 6f 6d 45 61 72 6e |   Earn_|FromEarn|
|00004da0| 43 75 72 72 24 3d 24 28 | 42 6c 6f 63 6b 21 32 38 |Curr$=$(|Block!28|
|00004db0| 29 3a 46 72 6f 6d 45 61 | 72 6e 43 75 72 72 24 3d |):FromEa|rnCurr$=|
|00004dc0| 45 61 72 6e 5f 46 72 6f | 6d 45 61 72 6e 43 75 72 |Earn_Fro|mEarnCur|
|00004dd0| 72 24 0d 14 f0 44 20 20 | 20 20 20 20 20 20 42 6c |r$...D  |      Bl|
|00004de0| 6f 63 6b 21 30 3d 45 61 | 72 6e 69 6e 67 73 3a 42 |ock!0=Ea|rnings:B|
|00004df0| 6c 6f 63 6b 21 34 3d 36 | 3a c8 99 20 22 57 69 6d |lock!4=6|:.. "Wim|
|00004e00| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00004e10| 2c 42 6c 6f 63 6b 0d 14 | fa 45 20 20 20 20 20 20 |,Block..|.E      |
|00004e20| 20 20 45 61 72 6e 5f 54 | 6f 45 61 72 6e 43 75 72 |  Earn_T|oEarnCur|
|00004e30| 72 24 3d 24 28 42 6c 6f | 63 6b 21 32 38 29 3a 54 |r$=$(Blo|ck!28):T|
|00004e40| 6f 45 61 72 6e 43 75 72 | 72 24 3d 45 61 72 6e 5f |oEarnCur|r$=Earn_|
|00004e50| 54 6f 45 61 72 6e 43 75 | 72 72 24 0d 15 04 58 20 |ToEarnCu|rr$...X |
|00004e60| 20 20 20 20 20 20 20 45 | 61 72 6e 5f 46 72 6f 6d |       E|arn_From|
|00004e70| 45 61 72 6e 41 6d 6f 75 | 6e 74 3d a4 52 65 61 64 |EarnAmou|nt=.Read|
|00004e80| 49 63 6f 6e 28 45 61 72 | 6e 69 6e 67 73 2c 33 29 |Icon(Ear|nings,3)|
|00004e90| 3a 46 72 6f 6d 45 61 72 | 6e 41 6d 6f 75 6e 74 3d |:FromEar|nAmount=|
|00004ea0| 45 61 72 6e 5f 46 72 6f | 6d 45 61 72 6e 41 6d 6f |Earn_Fro|mEarnAmo|
|00004eb0| 75 6e 74 0d 15 0e 55 20 | 20 20 20 20 20 20 20 f2 |unt...U |       .|
|00004ec0| 75 70 64 61 74 65 49 63 | 6f 6e 28 45 61 72 6e 69 |updateIc|on(Earni|
|00004ed0| 6e 67 73 2c 32 2c 46 72 | 6f 6d 45 61 72 6e 43 75 |ngs,2,Fr|omEarnCu|
|00004ee0| 72 72 24 29 3a f2 75 70 | 64 61 74 65 49 63 6f 6e |rr$):.up|dateIcon|
|00004ef0| 28 45 61 72 6e 69 6e 67 | 73 2c 36 2c 54 6f 45 61 |(Earning|s,6,ToEa|
|00004f00| 72 6e 43 75 72 72 24 29 | 0d 15 18 53 20 20 20 20 |rnCurr$)|...S    |
|00004f10| 20 20 20 20 f2 75 70 64 | 61 74 65 49 63 6f 6e 28 |    .upd|ateIcon(|
|00004f20| 43 6f 6e 76 65 72 74 2c | 33 2c 46 72 6f 6d 45 61 |Convert,|3,FromEa|
|00004f30| 72 6e 43 75 72 72 24 29 | 3a f2 75 70 64 61 74 65 |rnCurr$)|:.update|
|00004f40| 49 63 6f 6e 28 43 6f 6e | 76 65 72 74 2c 35 2c 54 |Icon(Con|vert,5,T|
|00004f50| 6f 45 61 72 6e 43 75 72 | 72 24 29 0d 15 22 5a 20 |oEarnCur|r$).."Z |
|00004f60| 20 20 20 20 20 20 20 20 | 20 f4 20 5e 20 54 68 69 |        | . ^ Thi|
|00004f70| 73 20 6c 69 6e 65 20 61 | 6c 74 65 72 73 20 74 68 |s line a|lters th|
|00004f80| 65 20 63 6f 72 72 65 73 | 70 6f 6e 64 69 6e 67 20 |e corres|ponding |
|00004f90| 63 75 72 72 65 6e 63 69 | 65 73 20 69 6e 20 74 68 |currenci|es in th|
|00004fa0| 65 20 43 6f 6e 76 65 72 | 73 69 6f 6e 73 20 77 69 |e Conver|sions wi|
|00004fb0| 6e 64 6f 77 2e 0d 15 2c | 5d 20 20 20 20 20 20 20 |ndow...,|]       |
|00004fc0| 20 20 20 f4 20 54 68 69 | 73 20 66 65 61 74 75 72 |   . Thi|s featur|
|00004fd0| 65 20 77 61 73 20 63 68 | 61 6e 67 65 64 20 61 74 |e was ch|anged at|
|00004fe0| 20 74 68 65 20 73 61 6d | 65 20 74 69 6d 65 20 61 | the sam|e time a|
|00004ff0| 73 20 74 68 65 20 65 78 | 63 68 61 6e 67 65 20 64 |s the ex|change d|
|00005000| 61 74 61 62 61 73 65 20 | 77 61 73 20 61 64 64 65 |atabase |was adde|
|00005010| 64 2e 0d 15 36 41 20 20 | 20 20 20 20 20 20 f2 75 |d...6A  |      .u|
|00005020| 70 64 61 74 65 49 63 6f | 6e 28 45 61 72 6e 69 6e |pdateIco|n(Earnin|
|00005030| 67 73 2c 33 2c c3 28 46 | 72 6f 6d 45 61 72 6e 41 |gs,3,.(F|romEarnA|
|00005040| 6d 6f 75 6e 74 29 29 3a | f2 44 6f 45 61 72 6e 69 |mount)):|.DoEarni|
|00005050| 6e 67 73 0d 15 40 4b 20 | 20 20 20 20 20 20 20 e7 |ngs..@K |       .|
|00005060| 20 ac 20 a4 72 65 61 64 | 45 78 63 68 61 6e 67 65 | . .read|Exchange|
|00005070| 20 8c 20 85 20 39 39 39 | 39 2c a4 4d 65 73 73 61 | . . 999|9,.Messa|
|00005080| 67 65 4c 6f 6f 6b 75 70 | 28 22 45 72 72 6f 72 5f |geLookup|("Error_|
|00005090| 32 30 22 2c 54 61 73 6b | 6e 61 6d 65 24 29 0d 15 |20",Task|name$)..|
|000050a0| 4a 09 20 20 20 20 cb 0d | 15 54 1e 20 20 c9 20 45 |J.    ..|.T.  . E|
|000050b0| 61 72 6e 69 6e 67 73 20 | 80 20 42 75 74 74 6f 6e |arnings |. Button|
|000050c0| 73 3e 3d 31 36 0d 15 5e | 11 20 20 20 20 c8 8e 20 |s>=16..^|.    .. |
|000050d0| 49 63 6f 6e 20 ca 0d 15 | 68 1f 20 20 20 20 20 20 |Icon ...|h.      |
|000050e0| c9 20 37 2c 35 3a f4 20 | 52 75 6e 6e 69 6e 67 20 |. 7,5:. |Running |
|000050f0| 54 6f 74 61 6c 0d 15 72 | 34 20 20 20 20 20 20 20 |Total..r|4       |
|00005100| 20 44 72 61 67 67 69 6e | 67 24 3d 22 54 6f 74 61 | Draggin|g$="Tota|
|00005110| 6c 22 3a f2 44 72 61 67 | 42 6f 78 28 45 61 72 6e |l":.Drag|Box(Earn|
|00005120| 69 6e 67 73 2c 35 2c 35 | 29 0d 15 7c 2a 20 20 20 |ings,5,5|)..|*   |
|00005130| 20 20 20 20 20 f4 20 55 | 73 65 20 72 65 64 2d 62 |     . U|se red-b|
|00005140| 6f 72 64 65 72 20 69 63 | 6f 6e 20 66 6f 72 20 64 |order ic|on for d|
|00005150| 72 61 67 0d 15 86 09 20 | 20 20 20 cb 0d 15 90 1b |rag.... |   .....|
|00005160| 20 20 c9 20 43 6f 6e 76 | 65 72 74 20 80 20 42 75 |  . Conv|ert . Bu|
|00005170| 74 74 6f 6e 73 3c 38 0d | 15 9a 11 20 20 20 20 c8 |ttons<8.|...    .|
|00005180| 8e 20 49 63 6f 6e 20 ca | 0d 15 a4 4e 20 20 20 20 |. Icon .|...N    |
|00005190| 20 20 f4 20 49 63 6f 6e | 73 20 33 20 26 20 35 2c |  . Icon|s 3 & 5,|
|000051a0| 20 74 68 65 20 63 75 72 | 72 65 6e 63 79 20 69 63 | the cur|rency ic|
|000051b0| 6f 6e 73 2c 20 75 73 65 | 20 74 6f 20 6c 65 61 64 |ons, use| to lead|
|000051c0| 20 74 6f 20 74 68 65 20 | 63 75 72 72 65 6e 63 79 | to the |currency|
|000051d0| 20 6d 65 6e 75 2e 0d 15 | ae 4a 20 20 20 20 20 20 | menu...|.J      |
|000051e0| f4 20 48 6f 77 65 76 65 | 72 2c 20 73 69 6e 63 65 |. Howeve|r, since|
|000051f0| 20 74 68 65 20 61 64 64 | 69 74 69 6f 6e 20 6f 66 | the add|ition of|
|00005200| 20 74 68 65 20 73 74 6f | 72 65 64 20 65 78 63 68 | the sto|red exch|
|00005210| 61 6e 67 65 20 72 61 74 | 65 73 2c 20 74 68 69 73 |ange rat|es, this|
|00005220| 0d 15 b8 25 20 20 20 20 | 20 20 f4 20 66 65 61 74 |...%    |  . feat|
|00005230| 75 72 65 20 68 61 73 20 | 62 65 65 6e 20 72 65 6d |ure has |been rem|
|00005240| 6f 76 65 64 2e 0d 15 c2 | 15 20 20 20 20 20 20 c9 |oved....|.      .|
|00005250| 20 32 3a f4 20 41 72 72 | 6f 77 0d 15 cc 19 20 20 | 2:. Arr|ow....  |
|00005260| 20 20 20 20 20 20 f2 44 | 6f 43 6f 6e 76 65 72 73 |      .D|oConvers|
|00005270| 69 6f 6e 0d 15 d6 2d 20 | 20 20 20 20 20 c9 20 34 |ion...- |     . 4|
|00005280| 3a f4 20 49 63 6f 6e 20 | 74 61 6b 69 6e 67 20 63 |:. Icon |taking c|
|00005290| 6f 6e 76 65 72 73 69 6f | 6e 20 61 6d 6f 75 6e 74 |onversio|n amount|
|000052a0| 0d 15 e0 52 20 20 20 20 | 20 20 20 20 f2 75 70 64 |...R    |    .upd|
|000052b0| 61 74 65 49 63 6f 6e 28 | 43 6f 6e 76 65 72 74 2c |ateIcon(|Convert,|
|000052c0| 36 2c 22 30 2e 30 30 22 | 29 3a f4 20 43 6c 65 61 |6,"0.00"|):. Clea|
|000052d0| 72 20 6f 75 74 70 75 74 | 20 77 68 65 6e 20 75 73 |r output| when us|
|000052e0| 65 72 20 63 6c 69 63 6b | 73 20 6f 6e 20 69 6e 70 |er click|s on inp|
|000052f0| 75 74 0d 15 ea 09 20 20 | 20 20 cb 0d 15 f4 1d 20 |ut....  |  ..... |
|00005300| 20 c9 20 43 6f 6e 76 65 | 72 74 20 80 20 42 75 74 | . Conve|rt . But|
|00005310| 74 6f 6e 73 3e 3d 31 36 | 0d 15 fe 11 20 20 20 20 |tons>=16|....    |
|00005320| c8 8e 20 49 63 6f 6e 20 | ca 0d 16 08 24 20 20 20 |.. Icon |....$   |
|00005330| 20 20 20 c9 20 36 2c 35 | 2c 31 3a f4 20 43 6f 6e |   . 6,5|,1:. Con|
|00005340| 76 65 72 74 65 64 20 61 | 6d 6f 75 6e 74 0d 16 12 |verted a|mount...|
|00005350| 57 20 20 20 20 20 20 20 | 20 44 72 61 67 67 69 6e |W       | Draggin|
|00005360| 67 24 3d 22 43 6f 6e 76 | 65 72 73 69 6f 6e 22 3a |g$="Conv|ersion":|
|00005370| f2 44 72 61 67 42 6f 78 | 28 43 6f 6e 76 65 72 74 |.DragBox|(Convert|
|00005380| 2c 31 2c 35 29 3a f4 20 | 55 73 65 20 72 65 64 2d |,1,5):. |Use red-|
|00005390| 62 6f 72 64 65 72 20 69 | 63 6f 6e 20 66 6f 72 20 |border i|con for |
|000053a0| 64 72 61 67 0d 16 1c 09 | 20 20 20 20 cb 0d 16 26 |drag....|    ...&|
|000053b0| 1b 20 20 c9 20 4f 70 74 | 69 6f 6e 73 20 80 20 42 |.  . Opt|ions . B|
|000053c0| 75 74 74 6f 6e 73 3c 38 | 0d 16 30 11 20 20 20 20 |uttons<8|..0.    |
|000053d0| c8 8e 20 49 63 6f 6e 20 | ca 0d 16 3a 13 20 20 20 |.. Icon |...:.   |
|000053e0| 20 20 20 c9 20 37 3a f4 | 20 47 65 74 0d 16 44 2c |   . 7:.| Get..D,|
|000053f0| 20 20 20 20 20 20 20 20 | c8 99 20 22 49 6e 74 65 |        |.. "Inte|
|00005400| 72 66 61 63 65 5f 53 6c | 61 62 42 75 74 74 6f 6e |rface_Sl|abButton|
|00005410| 22 2c 2c 42 6c 6f 63 6b | 0d 16 4e 36 20 20 20 20 |",,Block|..N6    |
|00005420| 20 20 20 20 42 6c 6f 63 | 6b 21 38 3d 30 3a c8 99 |    Bloc|k!8=0:..|
|00005430| 20 22 49 6e 74 65 72 66 | 61 63 65 5f 53 6c 61 62 | "Interf|ace_Slab|
|00005440| 42 75 74 74 6f 6e 22 2c | 2c 42 6c 6f 63 6b 0d 16 |Button",|,Block..|
|00005450| 58 2b 20 20 20 20 20 20 | 20 20 f2 75 70 64 61 74 |X+      |  .updat|
|00005460| 65 49 63 6f 6e 28 4f 70 | 74 69 6f 6e 73 2c 33 2c |eIcon(Op|tions,3,|
|00005470| c3 28 48 6f 75 72 73 29 | 29 0d 16 62 32 20 20 20 |.(Hours)|)..b2   |
|00005480| 20 20 20 20 20 41 24 3d | c3 28 4d 69 6e 75 74 65 |     A$=|.(Minute|
|00005490| 73 29 3a e7 20 4d 69 6e | 75 74 65 73 3c 31 30 20 |s):. Min|utes<10 |
|000054a0| 8c 20 41 24 3d 22 30 22 | 2b 41 24 0d 16 6c 25 20 |. A$="0"|+A$..l% |
|000054b0| 20 20 20 20 20 20 20 f2 | 75 70 64 61 74 65 49 63 |       .|updateIc|
|000054c0| 6f 6e 28 4f 70 74 69 6f | 6e 73 2c 35 2c 41 24 29 |on(Optio|ns,5,A$)|
|000054d0| 0d 16 76 14 20 20 20 20 | 20 20 c9 20 38 3a f4 20 |..v.    |  . 8:. |
|000054e0| 53 61 76 65 0d 16 80 2c | 20 20 20 20 20 20 20 20 |Save...,|        |
|000054f0| c8 99 20 22 49 6e 74 65 | 72 66 61 63 65 5f 53 6c |.. "Inte|rface_Sl|
|00005500| 61 62 42 75 74 74 6f 6e | 22 2c 2c 42 6c 6f 63 6b |abButton|",,Block|
|00005510| 0d 16 8a 36 20 20 20 20 | 20 20 20 20 42 6c 6f 63 |...6    |    Bloc|
|00005520| 6b 21 38 3d 30 3a c8 99 | 20 22 49 6e 74 65 72 66 |k!8=0:..| "Interf|
|00005530| 61 63 65 5f 53 6c 61 62 | 42 75 74 74 6f 6e 22 2c |ace_Slab|Button",|
|00005540| 2c 42 6c 6f 63 6b 0d 16 | 94 32 20 20 20 20 20 20 |,Block..|.2      |
|00005550| 20 20 42 6c 6f 63 6b 21 | 38 3d 31 3a 42 6c 6f 63 |  Block!|8=1:Bloc|
|00005560| 6b 21 31 32 3d 4f 70 74 | 69 6f 6e 73 3a 42 6c 6f |k!12=Opt|ions:Blo|
|00005570| 63 6b 21 31 36 3d 31 30 | 0d 16 9e 18 20 20 20 20 |ck!16=10|....    |
|00005580| 20 20 20 20 f2 4d 6f 75 | 73 65 42 75 74 74 6f 6e |    .Mou|seButton|
|00005590| 0d 16 a8 3d 20 20 20 20 | 20 20 20 20 f4 20 5e 20 |...=    |    . ^ |
|000055a0| 59 65 73 21 21 20 43 61 | 6c 6c 20 74 68 69 73 20 |Yes!! Ca|ll this |
|000055b0| 70 72 6f 63 65 64 75 72 | 65 20 66 72 6f 6d 20 69 |procedur|e from i|
|000055c0| 6e 73 69 64 65 20 69 74 | 73 65 6c 66 21 0d 16 b2 |nside it|self!...|
|000055d0| 3c 20 20 20 20 20 20 20 | 20 f4 20 49 6e 20 6f 72 |<       | . In or|
|000055e0| 64 65 72 20 74 6f 20 61 | 76 6f 69 64 20 63 6f 6e |der to a|void con|
|000055f0| 66 75 73 69 6f 6e 2c 20 | 69 74 27 73 20 62 65 73 |fusion, |it's bes|
|00005600| 74 20 66 6f 72 20 74 68 | 65 0d 16 bc 3f 20 20 20 |t for th|e...?   |
|00005610| 20 20 20 20 20 f4 20 27 | 53 61 76 65 20 73 65 74 |     . '|Save set|
|00005620| 74 69 6e 67 73 27 20 62 | 75 74 74 6f 6e 20 74 6f |tings' b|utton to|
|00005630| 20 64 6f 20 61 6e 20 27 | 4f 4b 27 20 70 72 65 73 | do an '|OK' pres|
|00005640| 73 20 66 69 72 73 74 2e | 0d 16 c6 47 20 20 20 20 |s first.|...G    |
|00005650| 20 20 20 20 f4 20 28 49 | 6e 20 66 61 63 74 2c 20 |    . (I|n fact, |
|00005660| 77 65 20 77 61 6e 74 20 | 61 6e 20 41 64 6a 75 73 |we want |an Adjus|
|00005670| 74 2d 63 6c 69 63 6b 20 | 74 6f 20 6b 65 65 70 20 |t-click |to keep |
|00005680| 74 68 65 20 6d 65 6e 75 | 20 6f 70 65 6e 2e 29 0d |the menu| open.).|
|00005690| 16 d0 1e 20 20 20 20 20 | 20 20 20 c8 8e 20 a4 53 |...     |   .. .S|
|000056a0| 61 76 65 53 65 74 74 69 | 6e 67 73 20 ca 0d 16 da |aveSetti|ngs ....|
|000056b0| 20 20 20 20 20 20 20 20 | 20 20 20 c9 20 30 3a ef |        |   . 0:.|
|000056c0| 20 37 3a f4 20 53 61 76 | 65 64 20 4f 4b 0d 16 e4 | 7:. Sav|ed OK...|
|000056d0| 3c 20 20 20 20 20 20 20 | 20 20 20 c9 20 31 3a 85 |<       |   . 1:.|
|000056e0| 20 39 39 39 39 2c a4 4d | 65 73 73 61 67 65 4c 6f | 9999,.M|essageLo|
|000056f0| 6f 6b 75 70 28 22 45 72 | 72 6f 72 5f 33 22 2c 54 |okup("Er|ror_3",T|
|00005700| 61 73 6b 6e 61 6d 65 24 | 29 0d 16 ee 3c 20 20 20 |askname$|)...<   |
|00005710| 20 20 20 20 20 20 20 c9 | 20 32 3a 85 20 39 39 39 |       .| 2:. 999|
|00005720| 39 2c a4 4d 65 73 73 61 | 67 65 4c 6f 6f 6b 75 70 |9,.Messa|geLookup|
|00005730| 28 22 45 72 72 6f 72 5f | 34 22 2c 54 61 73 6b 6e |("Error_|4",Taskn|
|00005740| 61 6d 65 24 29 0d 16 f8 | 0d 20 20 20 20 20 20 20 |ame$)...|.       |
|00005750| 20 cb 0d 17 02 4b 20 20 | 20 20 20 20 20 20 e7 20 | ....K  |      . |
|00005760| ac 20 a4 52 65 63 6f 72 | 64 57 68 69 63 68 4a 6f |. .Recor|dWhichJo|
|00005770| 62 3a 85 20 39 39 39 39 | 2c a4 4d 65 73 73 61 67 |b:. 9999|,.Messag|
|00005780| 65 4c 6f 6f 6b 75 70 28 | 22 45 72 72 6f 72 5f 31 |eLookup(|"Error_1|
|00005790| 38 22 2c 54 61 73 6b 6e | 61 6d 65 24 29 0d 17 0c |8",Taskn|ame$)...|
|000057a0| 16 20 20 20 20 20 20 c9 | 20 39 3a f4 20 43 61 6e |.      .| 9:. Can|
|000057b0| 63 65 6c 0d 17 16 2c 20 | 20 20 20 20 20 20 20 c8 |cel..., |       .|
|000057c0| 99 20 22 49 6e 74 65 72 | 66 61 63 65 5f 53 6c 61 |. "Inter|face_Sla|
|000057d0| 62 42 75 74 74 6f 6e 22 | 2c 2c 42 6c 6f 63 6b 0d |bButton"|,,Block.|
|000057e0| 17 20 3d 20 20 20 20 20 | 20 20 20 4f 70 74 5f 43 |. =     |   Opt_C|
|000057f0| 6f 75 6e 74 72 79 24 3d | 43 6f 75 6e 74 72 79 24 |ountry$=|Country$|
|00005800| 3a 4f 70 74 5f 49 42 53 | 68 6f 77 43 6c 6f 63 6b |:Opt_IBS|howClock|
|00005810| 3d 49 42 53 68 6f 77 43 | 6c 6f 63 6b 0d 17 2a 35 |=IBShowC|lock..*5|
|00005820| 20 20 20 20 20 20 20 20 | f2 75 70 64 61 74 65 53 |        |.updateS|
|00005830| 65 6c 65 63 74 65 64 46 | 6c 61 67 28 4f 70 74 69 |electedF|lag(Opti|
|00005840| 6f 6e 73 2c 30 2c 57 68 | 6f 6c 65 48 6f 75 72 73 |ons,0,Wh|oleHours|
|00005850| 29 0d 17 34 30 20 20 20 | 20 20 20 20 20 f2 75 70 |)..40   |     .up|
|00005860| 64 61 74 65 49 63 6f 6e | 28 4f 70 74 69 6f 6e 73 |dateIcon|(Options|
|00005870| 2c 33 2c c3 28 53 74 61 | 72 74 48 6f 75 72 73 29 |,3,.(Sta|rtHours)|
|00005880| 29 0d 17 3e 3f 20 20 20 | 20 20 20 20 20 54 65 78 |)..>?   |     Tex|
|00005890| 74 24 3d c3 28 53 74 61 | 72 74 4d 69 6e 73 29 3a |t$=.(Sta|rtMins):|
|000058a0| e7 20 53 74 61 72 74 4d | 69 6e 73 3c 31 30 20 8c |. StartM|ins<10 .|
|000058b0| 20 54 65 78 74 24 3d 22 | 30 22 2b 54 65 78 74 24 | Text$="|0"+Text$|
|000058c0| 0d 17 48 28 20 20 20 20 | 20 20 20 20 f2 75 70 64 |..H(    |    .upd|
|000058d0| 61 74 65 49 63 6f 6e 28 | 4f 70 74 69 6f 6e 73 2c |ateIcon(|Options,|
|000058e0| 35 2c 54 65 78 74 24 29 | 0d 17 52 2c 20 20 20 20 |5,Text$)|..R,    |
|000058f0| 20 20 20 20 f2 75 70 64 | 61 74 65 49 63 6f 6e 28 |    .upd|ateIcon(|
|00005900| 4f 70 74 69 6f 6e 73 2c | 31 31 2c 43 6f 75 6e 74 |Options,|11,Count|
|00005910| 72 79 24 29 0d 17 5c 4f | 20 20 20 20 20 20 20 20 |ry$)..\O|        |
|00005920| f2 75 70 64 61 74 65 49 | 63 6f 6e 28 4f 70 74 69 |.updateI|con(Opti|
|00005930| 6f 6e 73 2c 31 35 2c a4 | 4d 65 73 73 61 67 65 4c |ons,15,.|MessageL|
|00005940| 6f 6f 6b 75 70 28 22 49 | 42 53 68 6f 77 5f 22 2b |ookup("I|BShow_"+|
|00005950| c3 28 49 42 53 68 6f 77 | 43 6c 6f 63 6b 29 2c 22 |.(IBShow|Clock),"|
|00005960| 22 29 29 0d 17 66 33 20 | 20 20 20 20 20 20 20 e7 |"))..f3 |       .|
|00005970| 20 42 75 74 74 6f 6e 73 | 3c 3e 31 20 8c 20 c8 99 | Buttons|<>1 . ..|
|00005980| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00005990| 75 22 2c 2c 2d 31 0d 17 | 70 52 20 20 20 20 20 20 |u",,-1..|pR      |
|000059a0| 20 20 42 6c 6f 63 6b 21 | 38 3d 30 3a 42 6c 6f 63 |  Block!|8=0:Bloc|
|000059b0| 6b 21 31 32 3d 4f 70 74 | 69 6f 6e 73 3a 42 6c 6f |k!12=Opt|ions:Blo|
|000059c0| 63 6b 21 31 36 3d 39 3a | c8 99 20 22 49 6e 74 65 |ck!16=9:|.. "Inte|
|000059d0| 72 66 61 63 65 5f 53 6c | 61 62 42 75 74 74 6f 6e |rface_Sl|abButton|
|000059e0| 22 2c 2c 42 6c 6f 63 6b | 0d 17 7a 1b 20 20 20 20 |",,Block|..z.    |
|000059f0| 20 20 20 20 e7 20 49 42 | 53 68 6f 77 43 6c 6f 63 |    . IB|ShowCloc|
|00005a00| 6b 20 8c 0d 17 84 1a 20 | 20 20 20 20 20 20 20 20 |k ..... |        |
|00005a10| 20 f2 53 68 6f 77 49 42 | 43 6c 6f 63 6b 0d 17 8e | .ShowIB|Clock...|
|00005a20| 0d 20 20 20 20 20 20 20 | 20 cc 0d 17 98 3a 20 20 |.       | ....:  |
|00005a30| 20 20 20 20 20 20 20 20 | f2 44 6f 45 61 72 6e 69 |        |.DoEarni|
|00005a40| 6e 67 73 3a f4 20 54 68 | 69 73 20 77 69 6c 6c 20 |ngs:. Th|is will |
|00005a50| 75 70 64 61 74 65 20 69 | 63 6f 6e 20 62 61 72 20 |update i|con bar |
|00005a60| 74 65 78 74 0d 17 a2 0d | 20 20 20 20 20 20 20 20 |text....|        |
|00005a70| cd 0d 17 ac 13 20 20 20 | 20 20 20 c9 20 31 30 3a |.....   |   . 10:|
|00005a80| f4 20 4f 4b 0d 17 b6 2c | 20 20 20 20 20 20 20 20 |. OK...,|        |
|00005a90| c8 99 20 22 49 6e 74 65 | 72 66 61 63 65 5f 53 6c |.. "Inte|rface_Sl|
|00005aa0| 61 62 42 75 74 74 6f 6e | 22 2c 2c 42 6c 6f 63 6b |abButton|",,Block|
|00005ab0| 0d 17 c0 33 20 20 20 20 | 20 20 20 20 e7 20 42 75 |...3    |    . Bu|
|00005ac0| 74 74 6f 6e 73 3c 3e 31 | 20 8c 20 c8 99 20 22 57 |ttons<>1| . .. "W|
|00005ad0| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00005ae0| 2c 2d 31 0d 17 ca 36 20 | 20 20 20 20 20 20 20 42 |,-1...6 |       B|
|00005af0| 6c 6f 63 6b 21 38 3d 30 | 3a c8 99 20 22 49 6e 74 |lock!8=0|:.. "Int|
|00005b00| 65 72 66 61 63 65 5f 53 | 6c 61 62 42 75 74 74 6f |erface_S|labButto|
|00005b10| 6e 22 2c 2c 42 6c 6f 63 | 6b 0d 17 d4 45 20 20 20 |n",,Bloc|k...E   |
|00005b20| 20 20 20 20 20 e7 20 a4 | 53 65 6c 65 63 74 65 64 |     . .|Selected|
|00005b30| 53 74 61 74 65 28 4f 70 | 74 69 6f 6e 73 2c 30 29 |State(Op|tions,0)|
|00005b40| 20 8c 20 57 68 6f 6c 65 | 48 6f 75 72 73 3d b9 20 | . Whole|Hours=. |
|00005b50| 8b 20 57 68 6f 6c 65 48 | 6f 75 72 73 3d a3 0d 17 |. WholeH|ours=...|
|00005b60| de 56 20 20 20 20 20 20 | 20 20 e7 20 28 a4 52 65 |.V      |  . (.Re|
|00005b70| 61 64 49 63 6f 6e 28 4f | 70 74 69 6f 6e 73 2c 33 |adIcon(O|ptions,3|
|00005b80| 29 3c 3e 53 74 61 72 74 | 48 6f 75 72 73 29 20 84 |)<>Start|Hours) .|
|00005b90| 20 28 a4 52 65 61 64 49 | 63 6f 6e 28 4f 70 74 69 | (.ReadI|con(Opti|
|00005ba0| 6f 6e 73 2c 35 29 3c 3e | 53 74 61 72 74 4d 69 6e |ons,5)<>|StartMin|
|00005bb0| 73 29 20 8c 0d 17 e8 25 | 20 20 20 20 20 20 20 20 |s) ....%|        |
|00005bc0| 20 20 f4 20 53 74 61 72 | 74 69 6e 67 20 74 69 6d |  . Star|ting tim|
|00005bd0| 65 20 61 6c 74 65 72 65 | 64 0d 17 f2 4c 20 20 20 |e altere|d...L   |
|00005be0| 20 20 20 20 20 20 20 53 | 74 61 72 74 48 6f 75 72 |       S|tartHour|
|00005bf0| 73 3d a4 52 65 61 64 49 | 63 6f 6e 28 4f 70 74 69 |s=.ReadI|con(Opti|
|00005c00| 6f 6e 73 2c 33 29 3a 53 | 74 61 72 74 4d 69 6e 73 |ons,3):S|tartMins|
|00005c10| 3d a4 52 65 61 64 49 63 | 6f 6e 28 4f 70 74 69 6f |=.ReadIc|on(Optio|
|00005c20| 6e 73 2c 35 29 0d 17 fc | 35 20 20 20 20 20 20 20 |ns,5)...|5       |
|00005c30| 20 20 20 e7 20 53 74 61 | 72 74 4d 69 6e 73 3e 35 |   . Sta|rtMins>5|
|00005c40| 39 20 8c 20 53 74 61 72 | 74 4d 69 6e 73 3d 53 74 |9 . Star|tMins=St|
|00005c50| 61 72 74 4d 69 6e 73 2d | 36 30 0d 18 06 32 20 20 |artMins-|60...2  |
|00005c60| 20 20 20 20 20 20 20 20 | f2 75 70 64 61 74 65 49 |        |.updateI|
|00005c70| 63 6f 6e 28 4f 70 74 69 | 6f 6e 73 2c 33 2c c3 28 |con(Opti|ons,3,.(|
|00005c80| 53 74 61 72 74 48 6f 75 | 72 73 29 29 0d 18 10 41 |StartHou|rs))...A|
|00005c90| 20 20 20 20 20 20 20 20 | 20 20 54 65 78 74 24 3d |        |  Text$=|
|00005ca0| c3 28 53 74 61 72 74 4d | 69 6e 73 29 3a e7 20 53 |.(StartM|ins):. S|
|00005cb0| 74 61 72 74 4d 69 6e 73 | 3c 31 30 20 8c 20 54 65 |tartMins|<10 . Te|
|00005cc0| 78 74 24 3d 22 30 22 2b | 54 65 78 74 24 0d 18 1a |xt$="0"+|Text$...|
|00005cd0| 2a 20 20 20 20 20 20 20 | 20 20 20 f2 75 70 64 61 |*       |   .upda|
|00005ce0| 74 65 49 63 6f 6e 28 4f | 70 74 69 6f 6e 73 2c 35 |teIcon(O|ptions,5|
|00005cf0| 2c 54 65 78 74 24 29 0d | 18 24 1c 20 20 20 20 20 |,Text$).|.$.     |
|00005d00| 20 20 20 20 20 e7 20 ac | 20 43 6f 75 6e 74 69 6e |     . .| Countin|
|00005d10| 67 20 8c 0d 18 2e 47 20 | 20 20 20 20 20 20 20 20 |g ....G |        |
|00005d20| 20 20 20 f4 20 4d 6f 64 | 69 66 79 20 69 63 6f 6e |   . Mod|ify icon|
|00005d30| 20 62 61 72 20 6f 6e 6c | 79 20 69 66 20 63 6c 6f | bar onl|y if clo|
|00005d40| 63 6b 20 69 73 20 6e 6f | 74 20 61 6c 72 65 61 64 |ck is no|t alread|
|00005d50| 79 20 63 6f 75 6e 74 69 | 6e 67 0d 18 38 43 20 20 |y counti|ng..8C  |
|00005d60| 20 20 20 20 20 20 20 20 | 20 20 48 6f 75 72 73 3d |        |  Hours=|
|00005d70| 53 74 61 72 74 48 6f 75 | 72 73 3a 4d 69 6e 75 74 |StartHou|rs:Minut|
|00005d80| 65 73 3d 53 74 61 72 74 | 4d 69 6e 73 3a 43 6c 6f |es=Start|Mins:Clo|
|00005d90| 63 6b 25 3d 30 3a 54 69 | 6d 65 25 3d 30 0d 18 42 |ck%=0:Ti|me%=0..B|
|00005da0| 3b 20 20 20 20 20 20 20 | 20 20 20 20 20 53 65 63 |;       |     Sec|
|00005db0| 6f 6e 64 73 3d 28 28 53 | 74 61 72 74 48 6f 75 72 |onds=((S|tartHour|
|00005dc0| 73 2a 36 30 29 2a 36 30 | 29 2b 28 53 74 61 72 74 |s*60)*60|)+(Start|
|00005dd0| 4d 69 6e 73 2a 36 30 29 | 0d 18 4c 1f 20 20 20 20 |Mins*60)|..L.    |
|00005de0| 20 20 20 20 20 20 20 20 | e7 20 49 42 53 68 6f 77 |        |. IBShow|
|00005df0| 43 6c 6f 63 6b 20 8c 0d | 18 56 4a 20 20 20 20 20 |Clock ..|.VJ     |
|00005e00| 20 20 20 20 20 20 20 20 | 20 42 6c 6f 63 6b 21 30 |        | Block!0|
|00005e10| 3d 2d 31 3a 42 6c 6f 63 | 6b 21 34 3d 49 63 6f 6e |=-1:Bloc|k!4=Icon|
|00005e20| 42 61 72 3a c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |Bar:.. "|Wimp_Get|
|00005e30| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 42 6c 6f 63 |IconStat|e",,Bloc|
|00005e40| 6b 0d 18 60 3e 20 20 20 | 20 20 20 20 20 20 20 20 |k..`>   |        |
|00005e50| 20 20 20 54 45 4d 50 24 | 3d c3 28 48 6f 75 72 73 |   TEMP$|=.(Hours|
|00005e60| 29 2b 22 3a 22 3a e7 20 | 4d 69 6e 75 74 65 73 3c |)+":":. |Minutes<|
|00005e70| 31 30 20 8c 20 54 45 4d | 50 24 2b 3d 22 30 22 0d |10 . TEM|P$+="0".|
|00005e80| 18 6a 4f 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.jO     |        |
|00005e90| 20 54 45 4d 50 24 2b 3d | c3 28 4d 69 6e 75 74 65 | TEMP$+=|.(Minute|
|00005ea0| 73 29 3a e7 20 a9 28 54 | 45 4d 50 24 29 3c 37 20 |s):. .(T|EMP$)<7 |
|00005eb0| 8c 20 54 45 4d 50 24 3d | c4 37 2d a9 28 54 45 4d |. TEMP$=|.7-.(TEM|
|00005ec0| 50 24 29 2c 22 30 22 29 | 2b 54 45 4d 50 24 0d 18 |P$),"0")|+TEMP$..|
|00005ed0| 74 24 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |t$      |        |
|00005ee0| 24 49 42 43 6c 6f 63 6b | 54 65 78 74 3d 54 45 4d |$IBClock|Text=TEM|
|00005ef0| 50 24 0d 18 7e 2f 20 20 | 20 20 20 20 20 20 20 20 |P$..~/  |        |
|00005f00| 20 20 20 20 f2 55 70 64 | 61 74 65 49 42 53 70 72 |    .Upd|ateIBSpr|
|00005f10| 69 74 65 28 24 49 42 43 | 6c 6f 63 6b 54 65 78 74 |ite($IBC|lockText|
|00005f20| 29 0d 18 88 11 20 20 20 | 20 20 20 20 20 20 20 20 |)....   |        |
|00005f30| 20 cd 0d 18 92 0f 20 20 | 20 20 20 20 20 20 20 20 | .....  |        |
|00005f40| cd 0d 18 9c 0d 20 20 20 | 20 20 20 20 20 cd 0d 18 |.....   |     ...|
|00005f50| a6 27 20 20 20 20 20 20 | 20 20 49 42 53 68 6f 77 |.'      |  IBShow|
|00005f60| 43 6c 6f 63 6b 3d 4f 70 | 74 5f 49 42 53 68 6f 77 |Clock=Op|t_IBShow|
|00005f70| 43 6c 6f 63 6b 0d 18 b0 | 4f 20 20 20 20 20 20 20 |Clock...|O       |
|00005f80| 20 f2 75 70 64 61 74 65 | 49 63 6f 6e 28 4f 70 74 | .update|Icon(Opt|
|00005f90| 69 6f 6e 73 2c 31 35 2c | a4 4d 65 73 73 61 67 65 |ions,15,|.Message|
|00005fa0| 4c 6f 6f 6b 75 70 28 22 | 49 42 53 68 6f 77 5f 22 |Lookup("|IBShow_"|
|00005fb0| 2b c3 28 49 42 53 68 6f | 77 43 6c 6f 63 6b 29 2c |+.(IBSho|wClock),|
|00005fc0| 22 22 29 29 0d 18 ba 1b | 20 20 20 20 20 20 20 20 |""))....|        |
|00005fd0| e7 20 49 42 53 68 6f 77 | 43 6c 6f 63 6b 20 8c 0d |. IBShow|Clock ..|
|00005fe0| 18 c4 1a 20 20 20 20 20 | 20 20 20 20 20 f2 53 68 |...     |     .Sh|
|00005ff0| 6f 77 49 42 43 6c 6f 63 | 6b 0d 18 ce 0d 20 20 20 |owIBCloc|k....   |
|00006000| 20 20 20 20 20 cc 0d 18 | d8 3a 20 20 20 20 20 20 |     ...|.:      |
|00006010| 20 20 20 20 f2 44 6f 45 | 61 72 6e 69 6e 67 73 3a |    .DoE|arnings:|
|00006020| f4 20 54 68 69 73 20 77 | 69 6c 6c 20 75 70 64 61 |. This w|ill upda|
|00006030| 74 65 20 69 63 6f 6e 20 | 62 61 72 20 74 65 78 74 |te icon |bar text|
|00006040| 0d 18 e2 0d 20 20 20 20 | 20 20 20 20 cd 0d 18 ec |....    |    ....|
|00006050| 26 20 20 20 20 20 20 20 | 20 e7 20 4f 70 74 5f 43 |&       | . Opt_C|
|00006060| 6f 75 6e 74 72 79 24 3c | 3e 43 6f 75 6e 74 72 79 |ountry$<|>Country|
|00006070| 24 20 8c 0d 18 f6 1f 20 | 20 20 20 20 20 20 20 20 |$ ..... |        |
|00006080| 20 f4 20 43 6f 75 6e 74 | 72 79 20 61 6c 74 65 72 | . Count|ry alter|
|00006090| 65 64 0d 19 00 26 20 20 | 20 20 20 20 20 20 20 20 |ed...&  |        |
|000060a0| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 4d |.. "Wimp|_CreateM|
|000060b0| 65 6e 75 22 2c 2c 2d 31 | 0d 19 0a 23 20 20 20 20 |enu",,-1|...#    |
|000060c0| 20 20 20 20 20 20 43 6f | 75 6e 74 72 79 24 3d 4f |      Co|untry$=O|
|000060d0| 70 74 5f 43 6f 75 6e 74 | 72 79 24 0d 19 14 1c 20 |pt_Count|ry$.... |
|000060e0| 20 20 20 20 20 20 20 20 | 20 f2 43 6c 6f 73 65 4d |        | .CloseM|
|000060f0| 65 73 73 61 67 65 73 0d | 19 1e 25 20 20 20 20 20 |essages.|..%     |
|00006100| 20 20 20 20 20 f2 4c 6f | 61 64 4d 65 73 73 61 67 |     .Lo|adMessag|
|00006110| 65 73 28 43 6f 75 6e 74 | 72 79 24 29 0d 19 28 35 |es(Count|ry$)..(5|
|00006120| 20 20 20 20 20 20 20 20 | 20 20 54 61 73 6b 6e 61 |        |  Taskna|
|00006130| 6d 65 24 3d a4 4d 65 73 | 73 61 67 65 4c 6f 6f 6b |me$=.Mes|sageLook|
|00006140| 75 70 28 22 54 61 73 6b | 6e 61 6d 65 22 2c 22 22 |up("Task|name",""|
|00006150| 29 0d 19 32 1d 20 20 20 | 20 20 20 20 20 20 20 f2 |)..2.   |       .|
|00006160| 52 65 6c 61 62 65 6c 57 | 69 6e 64 6f 77 73 0d 19 |RelabelW|indows..|
|00006170| 3c 19 20 20 20 20 20 20 | 20 20 20 20 f2 42 75 69 |<.      |    .Bui|
|00006180| 6c 64 4d 65 6e 75 73 0d | 19 46 0d 20 20 20 20 20 |ldMenus.|.F.     |
|00006190| 20 20 20 cd 0d 19 50 22 | 20 20 20 20 20 20 c9 20 |   ...P"|      . |
|000061a0| 31 31 3a f4 20 43 6f 75 | 6e 74 72 79 20 73 65 6c |11:. Cou|ntry sel|
|000061b0| 65 63 74 69 6f 6e 0d 19 | 5a 1d 20 20 20 20 20 20 |ection..|Z.      |
|000061c0| 20 20 f2 6d 61 6b 65 5f | 43 6f 75 6e 74 72 79 4d |  .make_|CountryM|
|000061d0| 65 6e 75 0d 19 64 1b 20 | 20 20 20 20 20 c9 20 31 |enu..d. |     . 1|
|000061e0| 32 3a f4 20 4d 65 6e 75 | 20 61 72 72 6f 77 0d 19 |2:. Menu| arrow..|
|000061f0| 6e 2c 20 20 20 20 20 20 | 20 20 c8 99 20 22 49 6e |n,      |  .. "In|
|00006200| 74 65 72 66 61 63 65 5f | 53 6c 61 62 42 75 74 74 |terface_|SlabButt|
|00006210| 6f 6e 22 2c 2c 42 6c 6f | 63 6b 0d 19 78 1d 20 20 |on",,Blo|ck..x.  |
|00006220| 20 20 20 20 20 20 f2 6d | 61 6b 65 5f 43 6f 75 6e |      .m|ake_Coun|
|00006230| 74 72 79 4d 65 6e 75 0d | 19 82 36 20 20 20 20 20 |tryMenu.|..6     |
|00006240| 20 20 20 42 6c 6f 63 6b | 21 38 3d 30 3a c8 99 20 |   Block|!8=0:.. |
|00006250| 22 49 6e 74 65 72 66 61 | 63 65 5f 53 6c 61 62 42 |"Interfa|ce_SlabB|
|00006260| 75 74 74 6f 6e 22 2c 2c | 42 6c 6f 63 6b 0d 19 8c |utton",,|Block...|
|00006270| 28 20 20 20 20 20 20 c9 | 20 31 35 3a f4 20 49 63 |(      .| 15:. Ic|
|00006280| 6f 6e 20 62 61 72 20 64 | 69 73 70 6c 61 79 20 6f |on bar d|isplay o|
|00006290| 70 74 69 6f 6e 0d 19 96 | 2c 20 20 20 20 20 20 20 |ption...|,       |
|000062a0| 20 c8 99 20 22 49 6e 74 | 65 72 66 61 63 65 5f 53 | .. "Int|erface_S|
|000062b0| 6c 61 62 42 75 74 74 6f | 6e 22 2c 2c 42 6c 6f 63 |labButto|n",,Bloc|
|000062c0| 6b 0d 19 a0 2d 20 20 20 | 20 20 20 20 20 4f 70 74 |k...-   |     Opt|
|000062d0| 5f 49 42 53 68 6f 77 43 | 6c 6f 63 6b 3d ac 20 4f |_IBShowC|lock=. O|
|000062e0| 70 74 5f 49 42 53 68 6f | 77 43 6c 6f 63 6b 0d 19 |pt_IBSho|wClock..|
|000062f0| aa 53 20 20 20 20 20 20 | 20 20 f2 75 70 64 61 74 |.S      |  .updat|
|00006300| 65 49 63 6f 6e 28 4f 70 | 74 69 6f 6e 73 2c 31 35 |eIcon(Op|tions,15|
|00006310| 2c a4 4d 65 73 73 61 67 | 65 4c 6f 6f 6b 75 70 28 |,.Messag|eLookup(|
|00006320| 22 49 42 53 68 6f 77 5f | 22 2b c3 28 4f 70 74 5f |"IBShow_|"+.(Opt_|
|00006330| 49 42 53 68 6f 77 43 6c | 6f 63 6b 29 2c 22 22 29 |IBShowCl|ock),"")|
|00006340| 29 0d 19 b4 53 20 20 20 | 20 20 20 20 20 42 6c 6f |)...S   |     Blo|
|00006350| 63 6b 21 38 3d 30 3a 42 | 6c 6f 63 6b 21 31 32 3d |ck!8=0:B|lock!12=|
|00006360| 4f 70 74 69 6f 6e 73 3a | 42 6c 6f 63 6b 21 31 36 |Options:|Block!16|
|00006370| 3d 31 35 3a c8 99 20 22 | 49 6e 74 65 72 66 61 63 |=15:.. "|Interfac|
|00006380| 65 5f 53 6c 61 62 42 75 | 74 74 6f 6e 22 2c 2c 42 |e_SlabBu|tton",,B|
|00006390| 6c 6f 63 6b 0d 19 be 09 | 20 20 20 20 cb 0d 19 c8 |lock....|    ....|
|000063a0| 18 20 20 c9 20 4a 6f 62 | 73 20 80 20 42 75 74 74 |.  . Job|s . Butt|
|000063b0| 6f 6e 73 3c 38 0d 19 d2 | 11 20 20 20 20 c8 8e 20 |ons<8...|.    .. |
|000063c0| 49 63 6f 6e 20 ca 0d 19 | dc 23 20 20 20 20 20 20 |Icon ...|.#      |
|000063d0| c9 20 30 3a f4 20 4a 6f | 62 20 74 69 74 6c 65 20 |. 0:. Jo|b title |
|000063e0| 69 6e 64 69 63 61 74 6f | 72 0d 19 e6 32 20 20 20 |indicato|r...2   |
|000063f0| 20 20 20 20 20 f2 42 75 | 69 6c 64 4a 6f 62 73 4d |     .Bu|ildJobsM|
+--------+-------------------------+-------------------------+--------+--------+