/ Really Useful CD 1 / ReallyUsefulCD1.iso / extras / apps / _worldtime / _runimage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1b f4 20 3c 57 | 6f 72 6c 64 24 44 69 72 |..... <W|orld$Dir|
|00000010| 3e 2e 21 52 75 6e 49 6d | 61 67 65 0d 00 14 1b f4 |>.!RunIm|age.....|
|00000020| 20 30 2e 30 30 20 31 39 | 2f 31 2f 39 32 20 43 72 | 0.00 19|/1/92 Cr|
|00000030| 65 61 74 65 64 2e 0d 00 | 1e 04 0d 00 28 28 ee 20 |eated...|....((. |
|00000040| 85 20 ff 28 22 2a 53 45 | 54 20 45 52 52 20 22 2b |. .("*SE|T ERR "+|
|00000050| f6 24 2b 22 20 22 2b c3 | 28 9e 2f 31 30 29 29 3a |.$+" "+.|(./10)):|
|00000060| c8 98 0d 00 32 04 0d 00 | 3c 12 f2 73 65 74 5f 75 |....2...|<..set_u|
|00000070| 70 5f 6d 65 6d 6f 72 79 | 0d 00 46 16 f2 67 6f 6f |p_memory|..F..goo|
|00000080| 64 5f 6d 6f 72 6e 69 6e | 67 5f 77 69 6d 70 0d 00 |d_mornin|g_wimp..|
|00000090| 50 13 f2 6c 6f 61 64 5f | 74 65 6d 70 6c 61 74 65 |P..load_|template|
|000000a0| 73 0d 00 5a 0e f2 66 65 | 74 63 68 64 61 74 61 0d |s..Z..fe|tchdata.|
|000000b0| 00 64 30 f2 73 65 74 5f | 69 6e 64 5f 69 63 6f 6e |.d0.set_|ind_icon|
|000000c0| 28 21 69 6e 66 6f 25 2c | 34 2c 22 30 2e 30 31 20 |(!info%,|4,"0.01 |
|000000d0| 28 32 35 2d 4a 61 6e 2d | 31 39 39 32 29 22 29 0d |(25-Jan-|1992)").|
|000000e0| 00 6e 0f f2 62 75 69 6c | 64 5f 6d 65 6e 75 0d 00 |.n..buil|d_menu..|
|000000f0| 78 0a 71 75 69 74 3d a3 | 0d 00 82 05 f5 0d 00 8c |x.quit=.|........|
|00000100| 0d f2 74 69 63 6b 74 69 | 63 6b 0d 00 96 0a fd 20 |..tickti|ck..... |
|00000110| 71 75 69 74 0d 00 a0 2c | c8 99 20 22 57 69 6d 70 |quit...,|.. "Wimp|
|00000120| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 2c 74 61 73 6b |_CloseDo|wn",task|
|00000130| 68 61 6e 64 6c 65 2c 26 | 34 42 35 33 34 31 35 34 |handle,&|4B534154|
|00000140| 0d 00 aa 06 c8 98 0d 00 | b4 04 0d 00 be 2e f4 20 |........|....... |
|00000150| 2b 2b 2b 2b 2b 2b 2b 2b | 2b 2b 2b 2b 2b 2b 2b 2b |++++++++|++++++++|
|00000160| 2b 2b 2b 2b 2b 2b 2b 2b | 2b 20 50 72 6f 63 65 64 |++++++++|+ Proced|
|00000170| 75 72 65 73 2e 2e 2e 2e | 0d 00 c8 04 0d 00 d2 13 |ures....|........|
|00000180| dd f2 73 65 74 5f 75 70 | 5f 6d 65 6d 6f 72 79 0d |..set_up|_memory.|
|00000190| 00 dc 19 f4 20 66 6f 72 | 20 74 68 65 20 6e 61 6d |.... for| the nam|
|000001a0| 65 20 73 65 61 72 63 68 | 0d 00 e6 11 de 20 63 6f |e search|..... co|
|000001b0| 6d 70 61 72 65 31 20 36 | 30 0d 00 f0 11 de 20 63 |mpare1 6|0..... c|
|000001c0| 6f 6d 70 61 72 65 32 20 | 36 30 0d 00 fa 1b f4 20 |ompare2 |60..... |
|000001d0| 69 73 20 74 68 65 20 77 | 69 6e 64 6f 77 20 76 69 |is the w|indow vi|
|000001e0| 73 69 62 6c 65 0d 01 04 | 0f 6f 6e 5f 73 63 72 65 |sible...|.on_scre|
|000001f0| 65 6e 3d a3 0d 01 0e 1a | f4 20 66 6f 72 20 77 69 |en=.....|. for wi|
|00000200| 6e 64 6f 77 20 74 65 6d | 70 6c 61 74 65 73 0d 01 |ndow tem|plates..|
|00000210| 18 13 77 6f 72 6c 64 69 | 6e 64 73 69 7a 65 3d 37 |..worldi|ndsize=7|
|00000220| 34 0d 01 22 20 77 6f 72 | 6c 64 73 69 7a 65 3d 32 |4.." wor|ldsize=2|
|00000230| 34 38 2b 77 6f 72 6c 64 | 69 6e 64 73 69 7a 65 2b |48+world|indsize+|
|00000240| 34 0d 01 2c 32 de 20 77 | 6f 72 6c 64 74 69 6d 65 |4..,2. w|orldtime|
|00000250| 25 20 77 6f 72 6c 64 73 | 69 7a 65 2c 20 77 6f 72 |% worlds|ize, wor|
|00000260| 6c 64 69 6e 64 25 20 77 | 6f 72 6c 64 69 6e 64 73 |ldind% w|orldinds|
|00000270| 69 7a 65 0d 01 36 13 69 | 6e 66 6f 69 6e 64 73 69 |ize..6.i|nfoindsi|
|00000280| 7a 65 3d 31 30 39 0d 01 | 40 1e 69 6e 66 6f 73 69 |ze=109..|@.infosi|
|00000290| 7a 65 3d 69 6e 66 6f 69 | 6e 64 73 69 7a 65 2b 33 |ze=infoi|ndsize+3|
|000002a0| 37 36 2b 34 0d 01 4a 2a | de 20 69 6e 66 6f 25 20 |76+4..J*|. info% |
|000002b0| 69 6e 66 6f 73 69 7a 65 | 2c 20 69 6e 66 6f 69 6e |infosize|, infoin|
|000002c0| 64 25 20 69 6e 66 6f 69 | 6e 64 73 69 7a 65 0d 01 |d% infoi|ndsize..|
|000002d0| 54 1a f4 20 66 6f 72 20 | 70 6f 6c 6c 69 6e 67 20 |T.. for |polling |
|000002e0| 74 68 65 20 77 69 6d 70 | 0d 01 5e 0f de 20 70 6f |the wimp|..^.. po|
|000002f0| 6c 6c 25 20 32 35 36 0d | 01 68 18 f4 20 66 6f 72 |ll% 256.|.h.. for|
|00000300| 20 74 69 6d 65 2f 64 61 | 74 65 20 77 6f 72 6b 0d | time/da|te work.|
|00000310| 01 72 10 de 20 72 65 61 | 6c 74 69 6d 65 20 35 0d |.r.. rea|ltime 5.|
|00000320| 01 7c 10 de 20 74 69 6d | 65 64 69 66 66 20 35 0d |.|.. tim|ediff 5.|
|00000330| 01 86 0c de 20 44 61 79 | 20 31 30 0d 01 90 0c de |.... Day| 10.....|
|00000340| 20 54 69 6d 65 20 37 0d | 01 9a 05 e1 0d 01 a4 04 | Time 7.|........|
|00000350| 0d 01 ae 14 dd f2 6c 6f | 61 64 5f 74 65 6d 70 6c |......lo|ad_templ|
|00000360| 61 74 65 73 0d 01 b8 33 | c8 99 20 22 57 69 6d 70 |ates...3|.. "Wimp|
|00000370| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|00000380| 22 3c 57 6f 72 6c 64 24 | 44 69 72 3e 2e 54 65 6d |"<World$|Dir>.Tem|
|00000390| 70 6c 61 74 65 73 22 0d | 01 c2 63 c8 99 20 22 57 |plates".|..c.. "W|
|000003a0| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|000003b0| 22 2c 2c 77 6f 72 6c 64 | 74 69 6d 65 25 2b 34 2c |",,world|time%+4,|
|000003c0| 77 6f 72 6c 64 69 6e 64 | 25 2c 77 6f 72 6c 64 69 |worldind|%,worldi|
|000003d0| 6e 64 25 2b 77 6f 72 6c | 64 69 6e 64 73 69 7a 65 |nd%+worl|dindsize|
|000003e0| 2c 2d 31 2c 22 77 6f 72 | 6c 64 74 69 6d 65 22 2b |,-1,"wor|ldtime"+|
|000003f0| bd 30 2b bd 30 2b bd 30 | 2c 30 0d 01 cc 46 c8 99 |.0+.0+.0|,0...F..|
|00000400| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e | "Wimp_C|reateWin|
|00000410| 64 6f 77 22 2c 2c 77 6f | 72 6c 64 74 69 6d 65 25 |dow",,wo|rldtime%|
|00000420| 2b 34 20 b8 20 77 68 61 | 6e 64 6c 65 3a 21 77 6f |+4 . wha|ndle:!wo|
|00000430| 72 6c 64 74 69 6d 65 25 | 3d 77 68 61 6e 64 6c 65 |rldtime%|=whandle|
|00000440| 0d 01 d6 54 c8 99 20 22 | 57 69 6d 70 5f 4c 6f 61 |...T.. "|Wimp_Loa|
|00000450| 64 54 65 6d 70 6c 61 74 | 65 22 2c 2c 69 6e 66 6f |dTemplat|e",,info|
|00000460| 25 2b 34 2c 69 6e 66 6f | 69 6e 64 25 2c 69 6e 66 |%+4,info|ind%,inf|
|00000470| 6f 69 6e 64 25 2b 69 6e | 66 6f 69 6e 64 73 69 7a |oind%+in|foindsiz|
|00000480| 65 2c 2d 31 2c 22 69 6e | 66 6f 22 2b c4 38 2c bd |e,-1,"in|fo"+.8,.|
|00000490| 30 29 2c 30 0d 01 e0 3c | c8 99 20 22 57 69 6d 70 |0),0...<|.. "Wimp|
|000004a0| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|000004b0| 69 6e 66 6f 25 2b 34 20 | b8 20 69 68 61 6e 64 6c |info%+4 |. ihandl|
|000004c0| 65 3a 21 69 6e 66 6f 25 | 3d 69 68 61 6e 64 6c 65 |e:!info%|=ihandle|
|000004d0| 0d 01 ea 1b c8 99 20 22 | 57 69 6d 70 5f 43 6c 6f |...... "|Wimp_Clo|
|000004e0| 73 65 54 65 6d 70 6c 61 | 74 65 22 0d 01 f4 05 e1 |seTempla|te".....|
|000004f0| 0d 01 fe 04 0d 02 08 28 | dd f2 73 65 74 5f 69 6e |.......(|..set_in|
|00000500| 64 5f 69 63 6f 6e 28 77 | 68 61 6e 64 6c 65 2c 77 |d_icon(w|handle,w|
|00000510| 69 63 6f 6e 2c 77 74 65 | 78 74 24 29 0d 02 12 13 |icon,wte|xt$)....|
|00000520| 70 6f 6c 6c 25 21 30 3d | 77 68 61 6e 64 6c 65 0d |poll%!0=|whandle.|
|00000530| 02 1c 11 70 6f 6c 6c 25 | 21 34 3d 77 69 63 6f 6e |...poll%|!4=wicon|
|00000540| 0d 02 26 21 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |..&!.. "|Wimp_Get|
|00000550| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 70 6f 6c 6c |IconStat|e",,poll|
|00000560| 25 0d 02 30 11 74 65 78 | 74 3d 70 6f 6c 6c 25 21 |%..0.tex|t=poll%!|
|00000570| 32 38 0d 02 3a 10 24 74 | 65 78 74 3d 77 74 65 78 |28..:.$t|ext=wtex|
|00000580| 74 24 0d 02 44 0d 70 6f | 6c 6c 25 21 38 3d 30 0d |t$..D.po|ll%!8=0.|
|00000590| 02 4e 0e 70 6f 6c 6c 25 | 21 31 32 3d 30 0d 02 58 |.N.poll%|!12=0..X|
|000005a0| 21 c8 99 20 22 57 69 6d | 70 5f 53 65 74 49 63 6f |!.. "Wim|p_SetIco|
|000005b0| 6e 53 74 61 74 65 22 2c | 2c 70 6f 6c 6c 25 0d 02 |nState",|,poll%..|
|000005c0| 62 05 e1 0d 02 6c 04 0d | 02 76 10 dd f2 62 75 69 |b....l..|.v...bui|
|000005d0| 6c 64 5f 6d 65 6e 75 0d | 02 80 0d de 20 6d 65 6e |ld_menu.|.... men|
|000005e0| 75 20 37 36 0d 02 8a 04 | 0d 02 94 10 24 6d 65 6e |u 76....|....$men|
|000005f0| 75 3d 22 54 69 6d 65 22 | 0d 02 9e 0d 6d 65 6e 75 |u="Time"|....menu|
|00000600| 3f 31 32 3d 37 0d 02 a8 | 0d 6d 65 6e 75 3f 31 33 |?12=7...|.menu?13|
|00000610| 3d 32 0d 02 b2 0d 6d 65 | 6e 75 3f 31 34 3d 37 0d |=2....me|nu?14=7.|
|00000620| 02 bc 0d 6d 65 6e 75 3f | 31 35 3d 30 0d 02 c6 10 |...menu?|15=0....|
|00000630| 6d 65 6e 75 21 31 36 3d | 32 30 2a 34 0d 02 d0 0e |menu!16=|20*4....|
|00000640| 6d 65 6e 75 21 32 30 3d | 34 34 0d 02 da 0d 6d 65 |menu!20=|44....me|
|00000650| 6e 75 21 32 34 3d 30 0d | 02 e4 04 0d 02 ee 0d 6d |nu!24=0.|.......m|
|00000660| 65 6e 75 21 32 38 3d 30 | 0d 02 f8 12 6d 65 6e 75 |enu!28=0|....menu|
|00000670| 21 33 32 3d 21 69 6e 66 | 6f 25 0d 03 02 14 6d 65 |!32=!inf|o%....me|
|00000680| 6e 75 21 33 36 3d 26 37 | 30 30 39 30 30 31 0d 03 |nu!36=&7|009001..|
|00000690| 0c 15 24 28 6d 65 6e 75 | 2b 34 30 29 3d 22 49 6e |..$(menu|+40)="In|
|000006a0| 66 6f 22 0d 03 16 04 0d | 03 20 0f 6d 65 6e 75 21 |fo".....|. .menu!|
|000006b0| 35 32 3d 26 38 30 0d 03 | 2a 0e 6d 65 6e 75 21 35 |52=&80..|*.menu!5|
|000006c0| 36 3d 2d 31 0d 03 34 14 | 6d 65 6e 75 21 36 30 3d |6=-1..4.|menu!60=|
|000006d0| 26 37 30 30 39 30 30 31 | 0d 03 3e 15 24 28 6d 65 |&7009001|..>.$(me|
|000006e0| 6e 75 2b 36 34 29 3d 22 | 51 75 69 74 22 0d 03 48 |nu+64)="|Quit"..H|
|000006f0| 04 0d 03 52 05 e1 0d 03 | 5c 04 0d 03 66 17 dd f2 |...R....|\...f...|
|00000700| 67 6f 6f 64 5f 6d 6f 72 | 6e 69 6e 67 5f 77 69 6d |good_mor|ning_wim|
|00000710| 70 0d 03 70 40 c8 99 20 | 22 57 69 6d 70 5f 49 6e |p..p@.. |"Wimp_In|
|00000720| 69 74 69 61 6c 69 73 65 | 22 2c 32 30 30 2c 26 34 |itialise|",200,&4|
|00000730| 42 35 33 34 31 35 34 2c | 22 57 6f 72 6c 64 74 69 |B534154,|"Worldti|
|00000740| 6d 65 22 20 b8 20 2c 74 | 61 73 6b 68 61 6e 64 6c |me" . ,t|askhandl|
|00000750| 65 0d 03 7a 0d 21 70 6f | 6c 6c 25 3d 2d 31 0d 03 |e..z.!po|ll%=-1..|
|00000760| 84 0d 70 6f 6c 6c 25 21 | 34 3d 30 0d 03 8e 0d 70 |..poll%!|4=0....p|
|00000770| 6f 6c 6c 25 21 38 3d 30 | 0d 03 98 0f 70 6f 6c 6c |oll%!8=0|....poll|
|00000780| 25 21 31 32 3d 36 38 0d | 03 a2 0f 70 6f 6c 6c 25 |%!12=68.|...poll%|
|00000790| 21 31 36 3d 36 38 0d 03 | ac 16 70 6f 6c 6c 25 21 |!16=68..|..poll%!|
|000007a0| 32 30 3d 32 2b 28 33 3c | 3c 31 32 29 0d 03 b6 1c |20=2+(3<|<12)....|
|000007b0| 24 28 70 6f 6c 6c 25 2b | 32 34 29 3d 22 21 77 6f |$(poll%+|24)="!wo|
|000007c0| 72 6c 64 74 69 6d 65 22 | 0d 03 c0 2f c8 99 20 22 |rldtime"|.../.. "|
|000007d0| 57 69 6d 70 5f 43 72 65 | 61 74 65 49 63 6f 6e 22 |Wimp_Cre|ateIcon"|
|000007e0| 2c 2c 70 6f 6c 6c 25 20 | b8 20 69 63 6f 6e 62 61 |,,poll% |. iconba|
|000007f0| 72 68 61 6e 64 6c 65 0d | 03 ca 05 e1 0d 03 d4 04 |rhandle.|........|
|00000800| 0d 03 de 0f dd f2 66 65 | 74 63 68 64 61 74 61 0d |......fe|tchdata.|
|00000810| 03 e8 15 c8 99 20 22 48 | 6f 75 72 67 6c 61 73 73 |..... "H|ourglass|
|00000820| 5f 4f 6e 22 0d 03 f2 0b | 69 74 65 6d 73 3d 30 0d |_On"....|items=0.|
|00000830| 03 fc 0d 63 75 72 72 65 | 6e 74 3d 31 0d 04 06 1e |...curre|nt=1....|
|00000840| 68 61 6e 64 6c 65 3d 8e | 22 3c 77 6f 72 6c 64 24 |handle=.|"<world$|
|00000850| 64 69 72 3e 2e 64 61 74 | 61 22 0d 04 10 05 f5 0d |dir>.dat|a"......|
|00000860| 04 1a 1e 20 20 e7 20 9a | 23 68 61 6e 64 6c 65 3d |...  . .|#handle=|
|00000870| 31 30 20 8c 20 69 74 65 | 6d 73 2b 3d 31 0d 04 24 |10 . ite|ms+=1..$|
|00000880| 0e fd 20 c5 23 68 61 6e | 64 6c 65 0d 04 2e 0e cf |.. .#han|dle.....|
|00000890| 23 68 61 6e 64 6c 65 3d | 30 0d 04 38 21 de 20 6e |#handle=|0..8!. n|
|000008a0| 61 6d 65 24 28 69 74 65 | 6d 73 29 2c 6f 66 66 73 |ame$(ite|ms),offs|
|000008b0| 65 74 24 28 69 74 65 6d | 73 29 0d 04 42 12 e3 20 |et$(item|s)..B.. |
|000008c0| 46 25 3d 31 20 b8 20 69 | 74 65 6d 73 0d 04 4c 2e |F%=1 . i|tems..L.|
|000008d0| 20 20 c8 99 20 22 48 6f | 75 72 67 6c 61 73 73 5f |  .. "Ho|urglass_|
|000008e0| 50 65 72 63 65 6e 74 61 | 67 65 22 2c 31 30 30 2a |Percenta|ge",100*|
|000008f0| 28 46 25 2f 69 74 65 6d | 73 29 0d 04 56 15 20 20 |(F%/item|s)..V.  |
|00000900| 6e 61 6d 65 24 28 46 25 | 29 3d a4 72 65 61 64 0d |name$(F%|)=.read.|
|00000910| 04 60 17 20 20 6f 66 66 | 73 65 74 24 28 46 25 29 |.`.  off|set$(F%)|
|00000920| 3d a4 72 65 61 64 0d 04 | 6a 05 ed 0d 04 74 0d d9 |=.read..|j....t..|
|00000930| 20 23 68 61 6e 64 6c 65 | 0d 04 7e 16 c8 99 20 22 | #handle|..~... "|
|00000940| 48 6f 75 72 67 6c 61 73 | 73 5f 4f 66 66 22 0d 04 |Hourglas|s_Off"..|
|00000950| 88 0f f2 73 65 74 75 70 | 5f 74 69 6d 65 0d 04 92 |...setup|_time...|
|00000960| 05 e1 0d 04 9c 04 0d 04 | a6 10 dd f2 73 65 74 75 |........|....setu|
|00000970| 70 5f 74 69 6d 65 0d 04 | b0 2f f2 73 65 74 5f 69 |p_time..|./.set_i|
|00000980| 6e 64 5f 69 63 6f 6e 28 | 21 77 6f 72 6c 64 74 69 |nd_icon(|!worldti|
|00000990| 6d 65 25 2c 30 2c 6e 61 | 6d 65 24 28 63 75 72 72 |me%,0,na|me$(curr|
|000009a0| 65 6e 74 29 29 0d 04 ba | 0d f2 63 61 6c 63 74 69 |ent))...|..calcti|
|000009b0| 6d 65 0d 04 c4 05 e1 0d | 04 ce 04 0d 04 d8 0e dd |me......|........|
|000009c0| f2 63 61 6c 63 74 69 6d | 65 0d 04 e2 0f 3f 72 65 |.calctim|e....?re|
|000009d0| 61 6c 74 69 6d 65 3d 33 | 0d 04 ec 1c c8 99 20 22 |altime=3|...... "|
|000009e0| 4f 53 5f 57 6f 72 64 22 | 2c 31 34 2c 72 65 61 6c |OS_Word"|,14,real|
|000009f0| 74 69 6d 65 0d 04 f6 04 | 0d 05 00 1b 6f 66 66 3d |time....|....off=|
|00000a00| bb 28 6f 66 66 73 65 74 | 24 28 63 75 72 72 65 6e |.(offset|$(curren|
|00000a10| 74 29 29 0d 05 0a 34 6f | 66 66 3d 6f 66 66 2a 36 |t))...4o|ff=off*6|
|00000a20| 30 2a 36 30 2a 31 30 30 | 20 3a 20 f4 20 66 72 6f |0*60*100| : . fro|
|00000a30| 6d 20 68 6f 75 72 73 20 | 74 6f 20 63 65 6e 74 69 |m hours |to centi|
|00000a40| 73 65 63 6f 6e 64 73 0d | 05 14 04 0d 05 1e 21 21 |seconds.|......!!|
|00000a50| 74 69 6d 65 64 69 66 66 | 3d 94 28 6f 66 66 29 3a |timediff|=.(off):|
|00000a60| 74 69 6d 65 64 69 66 66 | 3f 34 3d 30 0d 05 28 04 |timediff|?4=0..(.|
|00000a70| 0d 05 32 21 e7 20 6f 66 | 66 3e 30 20 8c 20 f2 61 |..2!. of|f>0 . .a|
|00000a80| 64 64 66 69 76 65 20 8b | 20 f2 73 75 62 66 69 76 |ddfive .| .subfiv|
|00000a90| 65 0d 05 3c 04 0d 05 46 | 1f 6f 6c 64 64 61 79 24 |e..<...F|.oldday$|
|00000aa0| 3d 24 44 61 79 3a 6f 6c | 64 74 69 6d 65 24 3d 24 |=$Day:ol|dtime$=$|
|00000ab0| 54 69 6d 65 0d 05 50 04 | 0d 05 5a 3b c8 99 20 22 |Time..P.|..Z;.. "|
|00000ac0| 4f 53 5f 43 6f 6e 76 65 | 72 74 44 61 74 65 41 6e |OS_Conve|rtDateAn|
|00000ad0| 64 54 69 6d 65 22 2c 72 | 65 61 6c 74 69 6d 65 2c |dTime",r|ealtime,|
|00000ae0| 44 61 79 2c 31 30 2c 22 | 25 77 65 22 20 b8 20 2c |Day,10,"|%we" . ,|
|00000af0| 65 6e 64 0d 05 64 0d 3f | 28 65 6e 64 29 3d 31 33 |end..d.?|(end)=13|
|00000b00| 0d 05 6e 3f c8 99 20 22 | 4f 53 5f 43 6f 6e 76 65 |..n?.. "|OS_Conve|
|00000b10| 72 74 44 61 74 65 41 6e | 64 54 69 6d 65 22 2c 72 |rtDateAn|dTime",r|
|00000b20| 65 61 6c 74 69 6d 65 2c | 54 69 6d 65 2c 37 2c 22 |ealtime,|Time,7,"|
|00000b30| 25 32 34 3a 25 6d 69 22 | 20 b8 20 2c 65 6e 64 0d |%24:%mi"| . ,end.|
|00000b40| 05 78 0d 3f 28 65 6e 64 | 29 3d 31 33 0d 05 82 04 |.x.?(end|)=13....|
|00000b50| 0d 05 8c 37 e7 20 24 44 | 61 79 3c 3e 6f 6c 64 64 |...7. $D|ay<>oldd|
|00000b60| 61 79 24 20 8c 20 f2 73 | 65 74 5f 69 6e 64 5f 69 |ay$ . .s|et_ind_i|
|00000b70| 63 6f 6e 28 21 77 6f 72 | 6c 64 74 69 6d 65 25 2c |con(!wor|ldtime%,|
|00000b80| 33 2c 24 44 61 79 29 0d | 05 96 3a e7 20 24 54 69 |3,$Day).|..:. $Ti|
|00000b90| 6d 65 3c 3e 6f 6c 64 74 | 69 6d 65 24 20 8c 20 f2 |me<>oldt|ime$ . .|
|00000ba0| 73 65 74 5f 69 6e 64 5f | 69 63 6f 6e 28 21 77 6f |set_ind_|icon(!wo|
|00000bb0| 72 6c 64 74 69 6d 65 25 | 2c 34 2c 24 54 69 6d 65 |rldtime%|,4,$Time|
|00000bc0| 29 0d 05 a0 05 e1 0d 05 | aa 04 0d 05 b4 0d dd f2 |).......|........|
|00000bd0| 61 64 64 66 69 76 65 0d | 05 be 12 70 72 65 3d 72 |addfive.|...pre=r|
|00000be0| 65 61 6c 74 69 6d 65 3f | 33 0d 05 c8 21 21 72 65 |ealtime?|3...!!re|
|00000bf0| 61 6c 74 69 6d 65 3d 21 | 72 65 61 6c 74 69 6d 65 |altime=!|realtime|
|00000c00| 2b 21 74 69 6d 65 64 69 | 66 66 0d 05 d2 32 e7 20 |+!timedi|ff...2. |
|00000c10| 72 65 61 6c 74 69 6d 65 | 3f 33 20 3c 20 70 72 65 |realtime|?3 < pre|
|00000c20| 20 8c 20 72 65 61 6c 74 | 69 6d 65 3f 34 3d 31 2b | . realt|ime?4=1+|
|00000c30| 28 72 65 61 6c 74 69 6d | 65 3f 34 29 0d 05 dc 05 |(realtim|e?4)....|
|00000c40| e1 0d 05 e6 04 0d 05 f0 | 0d dd f2 73 75 62 66 69 |........|...subfi|
|00000c50| 76 65 0d 05 fa 12 70 72 | 65 3d 72 65 61 6c 74 69 |ve....pr|e=realti|
|00000c60| 6d 65 3f 33 0d 06 04 21 | 21 72 65 61 6c 74 69 6d |me?3...!|!realtim|
|00000c70| 65 3d 21 72 65 61 6c 74 | 69 6d 65 2d 21 74 69 6d |e=!realt|ime-!tim|
|00000c80| 65 64 69 66 66 0d 06 0e | 32 e7 20 72 65 61 6c 74 |ediff...|2. realt|
|00000c90| 69 6d 65 3f 33 20 3e 20 | 70 72 65 20 8c 20 72 65 |ime?3 > |pre . re|
|00000ca0| 61 6c 74 69 6d 65 3f 34 | 3d 28 72 65 61 6c 74 69 |altime?4|=(realti|
|00000cb0| 6d 65 3f 34 29 2d 31 0d | 06 18 05 e1 0d 06 22 04 |me?4)-1.|......".|
|00000cc0| 0d 06 2c 0a dd a4 72 65 | 61 64 0d 06 36 0a ea 20 |..,...re|ad..6.. |
|00000cd0| 41 24 2c 41 0d 06 40 09 | 41 24 3d 22 22 0d 06 4a |A$,A..@.|A$=""..J|
|00000ce0| 05 f5 0d 06 54 10 20 20 | 41 3d 9a 23 68 61 6e 64 |....T.  |A=.#hand|
|00000cf0| 6c 65 0d 06 5e 2a 20 20 | e7 20 41 3c 3e 31 30 20 |le..^*  |. A<>10 |
|00000d00| 80 20 41 3c 3e 31 33 20 | 80 20 41 3c 3e 97 22 2c |. A<>13 |. A<>.",|
|00000d10| 22 20 8c 20 41 24 3d 41 | 24 2b bd 41 0d 06 68 1c |" . A$=A|$+.A..h.|
|00000d20| fd 20 28 41 3d 31 30 20 | 84 20 41 3d 31 33 20 84 |. (A=10 |. A=13 .|
|00000d30| 20 41 3d 97 22 2c 22 29 | 0d 06 72 07 3d 41 24 0d | A=.",")|..r.=A$.|
|00000d40| 06 7c 04 0d 06 86 0e dd | f2 74 69 63 6b 74 69 63 |.|......|.ticktic|
|00000d50| 6b 0d 06 90 22 c8 99 20 | 22 57 69 6d 70 5f 50 6f |k...".. |"Wimp_Po|
|00000d60| 6c 6c 22 2c 2c 70 6f 6c | 6c 25 20 b8 20 72 65 61 |ll",,pol|l% . rea|
|00000d70| 73 6f 6e 0d 06 9a 0f c8 | 8e 20 72 65 61 73 6f 6e |son.....|. reason|
|00000d80| 20 ca 0d 06 a4 07 c9 20 | 30 0d 06 ae 0f 20 20 f2 | ...... |0....  .|
|00000d90| 63 61 6c 63 74 69 6d 65 | 0d 06 b8 07 c9 20 32 0d |calctime|..... 2.|
|00000da0| 06 c2 21 20 20 c8 99 20 | 22 57 69 6d 70 5f 4f 70 |..!  .. |"Wimp_Op|
|00000db0| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 70 6f 6c 6c 25 |enWindow|",,poll%|
|00000dc0| 0d 06 cc 07 c9 20 33 0d | 06 d6 22 20 20 c8 99 20 |..... 3.|.."  .. |
|00000dd0| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|00000de0| 77 22 2c 2c 70 6f 6c 6c | 25 0d 06 e0 11 20 20 6f |w",,poll|%....  o|
|00000df0| 6e 5f 73 63 72 65 65 6e | 3d a3 0d 06 ea 07 c9 20 |n_screen|=...... |
|00000e00| 36 0d 06 f4 13 20 20 c8 | 8e 20 70 6f 6c 6c 25 21 |6....  .|. poll%!|
|00000e10| 31 32 20 ca 0d 06 fe 0a | 20 20 c9 20 2d 32 0d 07 |12 .....|  . -2..|
|00000e20| 08 14 20 20 20 20 c8 8e | 20 70 6f 6c 6c 25 21 38 |..    ..| poll%!8|
|00000e30| 20 ca 0d 07 12 38 20 20 | 20 20 c9 20 32 3a c8 99 | ....8  |  . 2:..|
|00000e40| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00000e50| 75 22 2c 2c 6d 65 6e 75 | 2c 21 70 6f 6c 6c 25 2d |u",,menu|,!poll%-|
|00000e60| 36 34 2c 39 36 2b 32 2a | 34 34 0d 07 1c 38 20 20 |64,96+2*|44...8  |
|00000e70| 20 20 c9 20 34 3a c8 99 | 20 22 57 69 6d 70 5f 4f |  . 4:..| "Wimp_O|
|00000e80| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 77 6f 72 6c |penWindo|w",,worl|
|00000e90| 64 74 69 6d 65 25 3a 6f | 6e 5f 73 63 72 65 65 6e |dtime%:o|n_screen|
|00000ea0| 3d b9 0d 07 26 09 20 20 | 20 20 cb 0d 07 30 13 20 |=...&.  |  ...0. |
|00000eb0| 20 c9 20 21 77 6f 72 6c | 64 74 69 6d 65 25 0d 07 | . !worl|dtime%..|
|00000ec0| 3a 15 20 20 20 20 c8 8e | 20 70 6f 6c 6c 25 21 31 |:.    ..| poll%!1|
|00000ed0| 36 20 ca 0d 07 44 0b 20 | 20 20 20 c9 20 31 0d 07 |6 ...D. |   . 1..|
|00000ee0| 4e 30 20 20 20 20 20 20 | 63 75 72 72 65 6e 74 2b |N0      |current+|
|00000ef0| 3d 31 3a e7 20 63 75 72 | 72 65 6e 74 3e 69 74 65 |=1:. cur|rent>ite|
|00000f00| 6d 73 20 8c 20 63 75 72 | 72 65 6e 74 3d 31 0d 07 |ms . cur|rent=1..|
|00000f10| 58 15 20 20 20 20 20 20 | f2 73 65 74 75 70 5f 74 |X.      |.setup_t|
|00000f20| 69 6d 65 0d 07 62 17 20 | 20 20 20 20 20 f2 64 69 |ime..b. |     .di|
|00000f30| 73 6f 77 6e 5f 63 61 72 | 65 74 0d 07 6c 0b 20 20 |sown_car|et..l.  |
|00000f40| 20 20 c9 20 32 0d 07 76 | 30 20 20 20 20 20 20 63 |  . 2..v|0      c|
|00000f50| 75 72 72 65 6e 74 2d 3d | 31 3a e7 20 63 75 72 72 |urrent-=|1:. curr|
|00000f60| 65 6e 74 3c 31 20 8c 20 | 63 75 72 72 65 6e 74 3d |ent<1 . |current=|
|00000f70| 69 74 65 6d 73 0d 07 80 | 15 20 20 20 20 20 20 f2 |items...|.      .|
|00000f80| 73 65 74 75 70 5f 74 69 | 6d 65 0d 07 8a 17 20 20 |setup_ti|me....  |
|00000f90| 20 20 20 20 f2 64 69 73 | 6f 77 6e 5f 63 61 72 65 |    .dis|own_care|
|00000fa0| 74 0d 07 94 09 20 20 20 | 20 cb 0d 07 9e 07 20 20 |t....   | .....  |
|00000fb0| cb 0d 07 a8 07 c9 20 38 | 0d 07 b2 1c 20 20 e7 20 |...... 8|....  . |
|00000fc0| 21 70 6f 6c 6c 25 3d 21 | 77 6f 72 6c 64 74 69 6d |!poll%=!|worldtim|
|00000fd0| 65 25 20 8c 0d 07 bc 18 | 20 20 20 20 20 e7 20 70 |e% .....|     . p|
|00000fe0| 6f 6c 6c 25 21 32 34 3d | 31 33 20 8c 0d 07 c6 12 |oll%!24=|13 .....|
|00000ff0| 20 20 20 20 20 20 20 f2 | 73 65 61 72 63 68 0d 07 |       .|search..|
|00001000| d0 0a 20 20 20 20 20 cc | 0d 07 da 28 20 20 20 20 |..     .|...(    |
|00001010| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 50 72 6f 63 |   .. "W|imp_Proc|
|00001020| 65 73 73 4b 65 79 22 2c | 70 6f 6c 6c 25 21 32 34 |essKey",|poll%!24|
|00001030| 0d 07 e4 0a 20 20 20 20 | 20 cd 0d 07 ee 07 20 20 |....    | .....  |
|00001040| cd 0d 07 f8 07 c9 20 39 | 0d 08 02 19 20 20 e7 20 |...... 9|....  . |
|00001050| 21 70 6f 6c 6c 25 3d 31 | 20 8c 20 71 75 69 74 3d |!poll%=1| . quit=|
|00001060| b9 0d 08 0c 0b c9 20 31 | 37 2c 31 38 0d 08 16 1b |...... 1|7,18....|
|00001070| 20 20 e7 20 70 6f 6c 6c | 25 21 31 36 3d 30 20 8c |  . poll|%!16=0 .|
|00001080| 20 71 75 69 74 3d b9 0d | 08 20 05 cb 0d 08 2a 05 | quit=..|. ....*.|
|00001090| e1 0d 08 34 04 0d 08 3e | 12 dd f2 64 69 73 6f 77 |...4...>|...disow|
|000010a0| 6e 5f 63 61 72 65 74 0d | 08 48 25 c8 99 20 22 57 |n_caret.|.H%.. "W|
|000010b0| 69 6d 70 5f 47 65 74 43 | 61 72 65 74 50 6f 73 69 |imp_GetC|aretPosi|
|000010c0| 74 69 6f 6e 22 2c 2c 70 | 6f 6c 6c 25 0d 08 52 39 |tion",,p|oll%..R9|
|000010d0| e7 20 70 6f 6c 6c 25 21 | 30 3d 21 77 6f 72 6c 64 |. poll%!|0=!world|
|000010e0| 74 69 6d 65 25 20 8c 20 | c8 99 20 22 57 69 6d 70 |time% . |.. "Wimp|
|000010f0| 5f 53 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_SetCare|tPositio|
|00001100| 6e 22 2c 2d 31 0d 08 5c | 05 e1 0d 08 66 04 0d 08 |n",-1..\|....f...|
|00001110| 70 12 dd a4 72 65 61 64 | 66 72 6f 6d 69 63 6f 6e |p...read|fromicon|
|00001120| 0d 08 7a 08 ea 20 41 24 | 0d 08 84 09 41 24 3d 22 |..z.. A$|....A$="|
|00001130| 22 0d 08 8e 17 70 6f 6c | 6c 25 21 30 3d 21 77 6f |"....pol|l%!0=!wo|
|00001140| 72 6c 64 74 69 6d 65 25 | 0d 08 98 0d 70 6f 6c 6c |rldtime%|....poll|
|00001150| 25 21 34 3d 30 0d 08 a2 | 21 c8 99 20 22 57 69 6d |%!4=0...|!.. "Wim|
|00001160| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00001170| 2c 70 6f 6c 6c 25 0d 08 | ac 11 74 65 78 74 3d 70 |,poll%..|..text=p|
|00001180| 6f 6c 6c 25 21 32 38 0d | 08 b6 05 f5 0d 08 c0 26 |oll%!28.|.......&|
|00001190| 20 20 74 3d 3f 74 65 78 | 74 3a e7 20 74 3e 36 34 |  t=?tex|t:. t>64|
|000011a0| 20 80 20 74 3c 39 36 20 | 8c 20 74 3d 74 20 84 20 | . t<96 |. t=t . |
|000011b0| 33 32 0d 08 ca 0e 20 20 | 41 24 3d 41 24 2b bd 74 |32....  |A$=A$+.t|
|000011c0| 0d 08 d4 0d 20 20 74 65 | 78 74 2b 3d 31 0d 08 de |....  te|xt+=1...|
|000011d0| 10 fd 20 28 3f 74 65 78 | 74 29 3c 33 32 0d 08 e8 |.. (?tex|t)<32...|
|000011e0| 07 3d 41 24 0d 08 f2 04 | 0d 08 fc 0c dd f2 73 65 |.=A$....|......se|
|000011f0| 61 72 63 68 0d 09 06 15 | c8 99 20 22 48 6f 75 72 |arch....|.. "Hour|
|00001200| 67 6c 61 73 73 5f 4f 6e | 22 0d 09 10 11 f2 64 69 |glass_On|".....di|
|00001210| 73 6f 77 6e 5f 63 61 72 | 65 74 0d 09 1a 12 77 61 |sown_car|et....wa|
|00001220| 73 5f 61 74 3d 63 75 72 | 72 65 6e 74 0d 09 24 04 |s_at=cur|rent..$.|
|00001230| 0d 09 2e 2a 63 75 72 72 | 65 6e 74 2b 3d 31 3a e7 |...*curr|ent+=1:.|
|00001240| 20 63 75 72 72 65 6e 74 | 3e 69 74 65 6d 73 20 8c | current|>items .|
|00001250| 20 63 75 72 72 65 6e 74 | 3d 31 0d 09 38 04 0d 09 | current|=1..8...|
|00001260| 42 0e 73 65 61 72 63 68 | 65 64 3d 31 0d 09 4c 04 |B.search|ed=1..L.|
|00001270| 0d 09 56 1b 24 63 6f 6d | 70 61 72 65 31 3d a4 72 |..V.$com|pare1=.r|
|00001280| 65 61 64 66 72 6f 6d 69 | 63 6f 6e 0d 09 60 04 0d |eadfromi|con..`..|
|00001290| 09 6a 0b 6d 61 74 63 68 | 3d a3 0d 09 74 0b 65 6e |.j.match|=...t.en|
|000012a0| 64 65 64 3d a3 0d 09 7e | 05 f5 0d 09 88 34 20 20 |ded=...~|.....4  |
|000012b0| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 50 65 |.. "Hour|glass_Pe|
|000012c0| 72 63 65 6e 74 61 67 65 | 22 2c 28 73 65 61 72 63 |rcentage|",(searc|
|000012d0| 68 65 64 2f 69 74 65 6d | 73 29 2a 31 30 30 0d 09 |hed/item|s)*100..|
|000012e0| 92 25 20 20 f2 6c 6f 77 | 65 72 28 63 6f 6d 70 61 |.%  .low|er(compa|
|000012f0| 72 65 32 2c 6e 61 6d 65 | 24 28 63 75 72 72 65 6e |re2,name|$(curren|
|00001300| 74 29 29 0d 09 9c 21 20 | 20 e7 20 a7 24 63 6f 6d |t))...! | . .$com|
|00001310| 70 61 72 65 32 2c 24 63 | 6f 6d 70 61 72 65 31 29 |pare2,$c|ompare1)|
|00001320| 3e 30 20 8c 0d 09 a6 18 | 20 20 20 20 20 6d 61 74 |>0 .....|     mat|
|00001330| 63 68 3d b9 3a 65 6e 64 | 65 64 3d b9 0d 09 b0 07 |ch=.:end|ed=.....|
|00001340| 20 20 cc 0d 09 ba 3b 20 | 20 20 20 20 63 75 72 72 |  ....; |    curr|
|00001350| 65 6e 74 2b 3d 31 3a 73 | 65 61 72 63 68 65 64 2b |ent+=1:s|earched+|
|00001360| 3d 31 3a e7 20 63 75 72 | 72 65 6e 74 3e 69 74 65 |=1:. cur|rent>ite|
|00001370| 6d 73 20 8c 20 63 75 72 | 72 65 6e 74 3d 31 0d 09 |ms . cur|rent=1..|
|00001380| c4 23 20 20 20 20 20 e7 | 20 63 75 72 72 65 6e 74 |.#     .| current|
|00001390| 3d 77 61 73 5f 61 74 20 | 8c 20 65 6e 64 65 64 3d |=was_at |. ended=|
|000013a0| b9 0d 09 ce 07 20 20 cd | 0d 09 d8 0b fd 20 65 6e |.....  .|..... en|
|000013b0| 64 65 64 0d 09 e2 16 c8 | 99 20 22 48 6f 75 72 67 |ded.....|. "Hourg|
|000013c0| 6c 61 73 73 5f 4f 66 66 | 22 0d 09 ec 0f f2 73 65 |lass_Off|".....se|
|000013d0| 74 75 70 5f 74 69 6d 65 | 0d 09 f6 05 e1 0d 0a 00 |tup_time|........|
|000013e0| 04 0d 0a 0a 13 dd f2 6c | 6f 77 65 72 28 6d 65 6d |.......l|ower(mem|
|000013f0| 2c 5a 24 29 0d 0a 14 0b | 24 6d 65 6d 3d 5a 24 0d |,Z$)....|$mem=Z$.|
|00001400| 0a 1e 14 e3 20 46 25 3d | 30 20 b8 20 a9 28 5a 24 |.... F%=|0 . .(Z$|
|00001410| 29 2d 31 0d 0a 28 41 20 | 20 e7 20 28 28 6d 65 6d |)-1..(A | . ((mem|
|00001420| 3f 46 25 29 3e 36 34 20 | 80 20 28 6d 65 6d 3f 46 |?F%)>64 |. (mem?F|
|00001430| 25 29 3c 28 36 35 2b 32 | 36 29 29 20 8c 20 6d 65 |%)<(65+2|6)) . me|
|00001440| 6d 3f 46 25 3d 28 33 32 | 20 84 20 28 6d 65 6d 3f |m?F%=(32| . (mem?|
|00001450| 46 25 29 29 0d 0a 32 05 | ed 0d 0a 3c 05 e1 0d ff |F%))..2.|...<....|
+--------+-------------------------+-------------------------+--------+--------+