home *** CD-ROM | disk | FTP | other *** search
Unknown | 1991-03-01 | 5.3 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| file
| data
| default
| |
100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1d f4 20 3e 20 | 3c 52 6f 75 67 68 24 44 |..... > |<Rough$D|
|00000010| 69 72 3e 2e 21 52 75 6e | 69 6d 61 67 65 0d 00 14 |ir>.!Run|image...|
|00000020| 37 f4 20 57 72 69 74 74 | 65 6e 20 6f 6e 65 20 65 |7. Writt|en one e|
|00000030| 76 65 6e 69 6e 67 20 77 | 68 69 6c 65 20 77 61 74 |vening w|hile wat|
|00000040| 63 68 69 6e 67 20 54 77 | 69 6e 20 50 65 61 6b 73 |ching Tw|in Peaks|
|00000050| 20 3a 2d 3e 0d 00 1e 41 | f4 20 57 69 6d 70 20 62 | :->...A|. Wimp b|
|00000060| 69 74 20 61 64 64 65 64 | 20 74 68 65 20 6e 65 78 |it added| the nex|
|00000070| 74 20 64 61 79 2e 20 28 | 6d 6f 72 65 20 6c 69 6b |t day. (|more lik|
|00000080| 65 20 61 20 77 65 65 6b | 20 72 65 61 6c 6c 79 20 |e a week| really |
|00000090| 3a 2d 5b 20 29 0d 00 28 | 1a f4 20 42 79 20 52 69 |:-[ )..(|.. By Ri|
|000000a0| 63 68 61 72 64 20 48 20 | 48 65 79 77 6f 6f 64 0d |chard H |Heywood.|
|000000b0| 00 32 40 f4 20 54 68 69 | 73 20 70 72 6f 67 72 61 |.2@. Thi|s progra|
|000000c0| 6d 20 69 73 20 50 75 62 | 6c 69 63 20 44 6f 6d 61 |m is Pub|lic Doma|
|000000d0| 69 6e 20 61 6e 64 20 6d | 61 79 20 62 65 20 63 6f |in and m|ay be co|
|000000e0| 70 69 65 64 20 61 73 20 | 6d 75 63 68 20 61 73 0d |pied as |much as.|
|000000f0| 00 3c 3e f4 20 79 6f 75 | 20 6c 69 6b 65 20 61 73 |.<>. you| like as|
|00000100| 20 6c 6f 6e 67 20 61 73 | 20 61 6c 6c 20 74 68 65 | long as| all the|
|00000110| 20 66 69 6c 65 73 20 61 | 72 65 20 73 75 70 70 6c | files a|re suppl|
|00000120| 69 65 64 20 75 6e 63 68 | 61 6e 67 65 64 0d 00 46 |ied unch|anged..F|
|00000130| 1a f4 20 54 68 65 20 73 | 70 69 63 65 20 6d 75 73 |.. The s|pice mus|
|00000140| 74 20 66 6c 6f 77 2e 0d | 00 50 04 0d 00 5a 04 0d |t flow..|.P...Z..|
|00000150| 00 64 43 de 20 57 69 6e | 64 6f 77 20 35 31 32 2c |.dC. Win|dow 512,|
|00000160| 20 53 70 61 72 65 20 35 | 31 32 2c 20 49 6e 64 69 | Spare 5|12, Indi|
|00000170| 72 20 32 30 30 2c 20 70 | 6f 6c 6c 62 6c 6f 63 6b |r 200, p|ollblock|
|00000180| 25 20 32 35 36 2c 20 62 | 6c 6f 63 6b 25 20 32 30 |% 256, b|lock% 20|
|00000190| 34 38 0d 00 6e 0e de 20 | 54 65 78 74 20 31 30 30 |48..n.. |Text 100|
|000001a0| 0d 00 78 05 20 0d 00 82 | 32 24 54 65 78 74 20 3d |..x. ...|2$Text =|
|000001b0| 20 22 54 68 69 73 20 6d | 69 67 68 74 20 62 65 20 | "This m|ight be |
|000001c0| 52 69 6b 27 73 20 52 6f | 75 67 68 20 43 6c 6f 63 |Rik's Ro|ugh Cloc|
|000001d0| 6b 20 20 3b 2d 29 22 0d | 00 8c 04 0d 00 96 13 f4 |k ;-)".|........|
|000001e0| 20 69 6e 69 74 20 74 68 | 65 20 77 69 6d 70 0d 00 | init th|e wimp..|
|000001f0| a0 04 0d 00 aa 45 c8 99 | 20 22 57 69 6d 70 5f 49 |.....E..| "Wimp_I|
|00000200| 6e 69 74 69 61 6c 69 73 | 65 22 2c 32 30 30 2c 20 |nitialis|e",200, |
|00000210| 26 34 42 35 33 34 31 35 | 34 2c 20 22 52 6f 75 67 |&4B53415|4, "Roug|
|00000220| 68 20 43 6c 6f 63 6b 22 | 20 b8 20 2c 54 61 73 6b |h Clock"| . ,Task|
|00000230| 5f 48 61 6e 64 6c 65 0d | 00 b4 33 c8 99 20 22 57 |_Handle.|..3.. "W|
|00000240| 69 6d 70 5f 4f 70 65 6e | 54 65 6d 70 6c 61 74 65 |imp_Open|Template|
|00000250| 22 2c 2c 22 3c 52 6f 75 | 67 68 24 44 69 72 3e 2e |",,"<Rou|gh$Dir>.|
|00000260| 54 65 6d 70 6c 61 74 65 | 73 22 0d 00 be 45 c8 99 |Template|s"...E..|
|00000270| 20 22 57 69 6d 70 5f 4c | 6f 61 64 54 65 6d 70 6c | "Wimp_L|oadTempl|
|00000280| 61 74 65 22 2c 2c 20 57 | 69 6e 64 6f 77 2c 20 49 |ate",, W|indow, I|
|00000290| 6e 64 69 72 2c 20 49 6e | 64 69 72 2b 32 30 30 2c |ndir, In|dir+200,|
|000002a0| 20 2d 31 2c 20 22 43 6c | 6f 63 6b 22 2c 20 30 0d | -1, "Cl|ock", 0.|
|000002b0| 00 c8 1b c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |..... "W|imp_Clos|
|000002c0| 65 54 65 6d 70 6c 61 74 | 65 22 0d 00 d2 14 57 69 |eTemplat|e"....Wi|
|000002d0| 6e 64 6f 77 21 37 32 20 | 3d 20 54 65 78 74 0d 00 |ndow!72 |= Text..|
|000002e0| dc 12 57 69 6e 64 6f 77 | 21 37 36 20 3d 20 2d 31 |..Window|!76 = -1|
|000002f0| 0d 00 e6 18 57 69 6e 64 | 6f 77 21 38 30 20 3d 20 |....Wind|ow!80 = |
|00000300| a9 28 24 54 65 78 74 29 | 0d 00 f0 2f c8 99 20 22 |.($Text)|.../.. "|
|00000310| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|00000320| 77 22 2c 2c 57 69 6e 64 | 6f 77 20 b8 20 77 69 6e |w",,Wind|ow . win|
|00000330| 68 61 6e 64 6c 65 25 0d | 00 fa 35 57 69 6e 64 6f |handle%.|..5Windo|
|00000340| 77 21 31 36 20 3d 20 57 | 69 6e 64 6f 77 21 31 32 |w!16 = W|indow!12|
|00000350| 3a 20 20 20 20 20 20 20 | 57 69 6e 64 6f 77 21 31 |: |Window!1|
|00000360| 32 20 3d 20 57 69 6e 64 | 6f 77 21 38 0d 01 04 35 |2 = Wind|ow!8...5|
|00000370| 57 69 6e 64 6f 77 21 38 | 20 20 3d 20 57 69 6e 64 |Window!8| = Wind|
|00000380| 6f 77 21 34 3a 20 20 20 | 20 20 20 20 20 57 69 6e |ow!4: | Win|
|00000390| 64 6f 77 21 34 20 20 3d | 20 57 69 6e 64 6f 77 21 |dow!4 =| Window!|
|000003a0| 30 0d 01 0e 19 57 69 6e | 64 6f 77 21 30 20 3d 20 |0....Win|dow!0 = |
|000003b0| 77 69 6e 68 61 6e 64 6c | 65 25 0d 01 18 20 c8 99 |winhandl|e%... ..|
|000003c0| 20 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f | "Wimp_O|penWindo|
|000003d0| 77 22 2c 2c 57 69 6e 64 | 6f 77 0d 01 22 04 0d 01 |w",,Wind|ow.."...|
|000003e0| 2c 09 f2 69 6e 69 74 0d | 01 36 05 20 0d 01 40 05 |,..init.|.6. ..@.|
|000003f0| f5 0d 01 4a 3c 20 20 f4 | 20 54 68 65 20 70 6f 6c |...J< .| The pol|
|00000400| 6c 20 6c 6f 6f 70 20 66 | 6f 72 20 74 68 65 20 66 |l loop f|or the f|
|00000410| 69 72 73 74 20 35 20 73 | 65 63 6f 6e 64 73 20 6f |irst 5 s|econds o|
|00000420| 66 20 74 68 65 20 70 72 | 6f 67 72 61 6d 0d 01 54 |f the pr|ogram..T|
|00000430| 04 0d 01 5e 3f 20 20 c8 | 99 20 22 57 69 6d 70 5f |...^? .|. "Wimp_|
|00000440| 50 6f 6c 6c 49 64 6c 65 | 22 2c 20 6d 61 73 6b 25 |PollIdle|", mask%|
|00000450| 2c 20 70 6f 6c 6c 62 6c | 6f 63 6b 25 2c 20 6f 6c |, pollbl|ock%, ol|
|00000460| 64 74 69 6d 65 25 20 b8 | 20 72 65 61 73 6f 6e 25 |dtime% .| reason%|
|00000470| 0d 01 68 12 20 20 c8 8e | 20 72 65 61 73 6f 6e 25 |..h. ..| reason%|
|00000480| 20 ca 0d 01 72 14 20 20 | 20 20 c9 20 30 20 3a 20 | ...r. | . 0 : |
|00000490| f2 63 6c 6f 63 6b 0d 01 | 7c 2e 20 20 20 20 c9 20 |.clock..||. . |
|000004a0| 32 20 3a 20 c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 |2 : .. "|Wimp_Ope|
|000004b0| 6e 57 69 6e 64 6f 77 22 | 2c 2c 70 6f 6c 6c 62 6c |nWindow"|,,pollbl|
|000004c0| 6f 63 6b 25 0d 01 86 39 | 20 20 20 20 c9 20 33 20 |ock%...9| . 3 |
|000004d0| 3a 20 c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |: .. "Wi|mp_Close|
|000004e0| 44 6f 77 6e 22 2c 20 54 | 61 73 6b 5f 48 61 6e 64 |Down", T|ask_Hand|
|000004f0| 6c 65 2c 20 26 34 42 35 | 33 34 31 35 34 0d 01 90 |le, &4B5|34154...|
|00000500| 10 20 20 20 20 c9 20 31 | 37 2c 20 31 38 0d 01 9a |. . 1|7, 18...|
|00000510| 1f 20 20 20 20 20 20 20 | 20 20 c8 8e 20 70 6f 6c |. | .. pol|
|00000520| 6c 62 6c 6f 63 6b 25 21 | 31 36 20 ca 0d 01 a4 40 |lblock%!|16 ....@|
|00000530| 20 20 20 20 20 20 20 20 | 20 20 20 c9 20 30 20 3a | | . 0 :|
|00000540| 20 c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 | .. "Wim|p_CloseD|
|00000550| 6f 77 6e 22 2c 20 54 61 | 73 6b 5f 48 61 6e 64 6c |own", Ta|sk_Handl|
|00000560| 65 2c 20 26 34 42 35 33 | 34 31 35 34 0d 01 ae 0e |e, &4B53|4154....|
|00000570| 20 20 20 20 20 20 20 20 | 20 cb 0d 01 b8 07 20 20 | | ..... |
|00000580| cb 0d 01 c2 2a 20 20 c8 | 99 20 22 4f 53 5f 52 65 |....* .|. "OS_Re|
|00000590| 61 64 4d 6f 6e 6f 74 6f | 6e 69 63 54 69 6d 65 22 |adMonoto|nicTime"|
|000005a0| 20 b8 20 6e 65 77 74 69 | 6d 65 25 0d 01 cc 1d fd | . newti|me%.....|
|000005b0| 20 6e 65 77 74 69 6d 65 | 25 20 3e 3d 20 6f 6c 64 | newtime|% >= old|
|000005c0| 74 69 6d 65 25 2d 35 30 | 0d 01 d6 04 0d 01 e0 0a |time%-50|........|
|000005d0| f2 63 6c 6f 63 6b 0d 01 | ea 2b 6f 6c 64 74 69 6d |.clock..|.+oldtim|
|000005e0| 65 25 20 3d 20 6e 65 77 | 74 69 6d 65 25 20 2b 20 |e% = new|time% + |
|000005f0| 28 31 30 30 20 2a 20 28 | 36 30 2d 73 65 63 25 29 |(100 * (|60-sec%)|
|00000600| 29 0d 01 f4 04 0d 01 fe | 04 0d 02 08 05 f5 0d 02 |).......|........|
|00000610| 12 3f 20 20 c8 99 20 22 | 57 69 6d 70 5f 50 6f 6c |.? .. "|Wimp_Pol|
|00000620| 6c 49 64 6c 65 22 2c 20 | 6d 61 73 6b 25 2c 20 70 |lIdle", |mask%, p|
|00000630| 6f 6c 6c 62 6c 6f 63 6b | 25 2c 20 6f 6c 64 74 69 |ollblock|%, oldti|
|00000640| 6d 65 25 20 b8 20 72 65 | 61 73 6f 6e 25 0d 02 1c |me% . re|ason%...|
|00000650| 04 0d 02 26 2a 20 20 c8 | 99 20 22 4f 53 5f 52 65 |...&* .|. "OS_Re|
|00000660| 61 64 4d 6f 6e 6f 74 6f | 6e 69 63 54 69 6d 65 22 |adMonoto|nicTime"|
|00000670| 20 b8 20 6e 65 77 74 69 | 6d 65 25 0d 02 30 22 20 | . newti|me%..0" |
|00000680| 20 c8 95 20 28 6e 65 77 | 74 69 6d 65 25 20 2d 20 | .. (new|time% - |
|00000690| 6f 6c 64 74 69 6d 65 25 | 29 20 3e 20 30 0d 02 3a |oldtime%|) > 0..:|
|000006a0| 18 20 20 20 20 6f 6c 64 | 74 69 6d 65 25 20 2b 3d |. old|time% +=|
|000006b0| 20 36 30 30 30 0d 02 44 | 07 20 20 ce 0d 02 4e 04 | 6000..D|. ...N.|
|000006c0| 0d 02 58 12 20 20 c8 8e | 20 72 65 61 73 6f 6e 25 |..X. ..| reason%|
|000006d0| 20 ca 0d 02 62 2d 20 20 | 20 20 c9 20 30 20 3a 20 | ...b- | . 0 : |
|000006e0| f2 63 6c 6f 63 6b 20 20 | 20 20 20 20 20 3a 20 f4 |.clock | : .|
|000006f0| 20 52 65 64 6f 20 74 68 | 65 20 63 6c 6f 63 6b 0d | Redo th|e clock.|
|00000700| 02 6c 2f 20 20 20 20 c9 | 20 32 20 3a 20 c8 99 20 |.l/ .| 2 : .. |
|00000710| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00000720| 22 2c 20 2c 70 6f 6c 6c | 62 6c 6f 63 6b 25 0d 02 |", ,poll|block%..|
|00000730| 76 39 20 20 20 20 c9 20 | 33 20 3a 20 c8 99 20 22 |v9 . |3 : .. "|
|00000740| 57 69 6d 70 5f 43 6c 6f | 73 65 44 6f 77 6e 22 2c |Wimp_Clo|seDown",|
|00000750| 20 54 61 73 6b 5f 48 61 | 6e 64 6c 65 2c 20 26 34 | Task_Ha|ndle, &4|
|00000760| 42 35 33 34 31 35 34 0d | 02 80 10 20 20 20 20 c9 |B534154.|... .|
|00000770| 20 31 37 2c 20 31 38 0d | 02 8a 1f 20 20 20 20 20 | 17, 18.|... |
|00000780| 20 20 20 20 c8 8e 20 70 | 6f 6c 6c 62 6c 6f 63 6b | .. p|ollblock|
|00000790| 25 21 31 36 20 ca 0d 02 | 94 40 20 20 20 20 20 20 |%!16 ...|.@ |
|000007a0| 20 20 20 20 20 c9 20 30 | 20 3a 20 c8 99 20 22 57 | . 0| : .. "W|
|000007b0| 69 6d 70 5f 43 6c 6f 73 | 65 44 6f 77 6e 22 2c 20 |imp_Clos|eDown", |
|000007c0| 54 61 73 6b 5f 48 61 6e | 64 6c 65 2c 20 26 34 42 |Task_Han|dle, &4B|
|000007d0| 35 33 34 31 35 34 0d 02 | 9e 0e 20 20 20 20 20 20 |534154..|.. |
|000007e0| 20 20 20 cb 0d 02 a8 07 | 20 20 cb 0d 02 b2 07 fd | .....| ......|
|000007f0| 20 a3 0d 02 bc 05 e0 0d | 02 c6 04 0d 02 d0 04 0d | .......|........|
|00000800| 02 da 04 0d 02 e4 0c dd | 20 f2 63 6c 6f 63 6b 0d |........| .clock.|
|00000810| 02 ee 0e 20 20 f2 67 65 | 74 74 69 6d 65 0d 02 f8 |... .ge|ttime...|
|00000820| 15 20 20 e7 20 68 6f 75 | 72 25 20 3c 3d 20 31 32 |. . hou|r% <= 12|
|00000830| 20 8c 0d 03 02 3c 20 20 | 20 20 68 6f 75 72 31 32 | ....< | hour12|
|00000840| 25 20 3d 20 68 6f 75 72 | 25 20 20 20 20 20 20 20 |% = hour|% |
|00000850| 20 20 20 3a 20 f4 20 63 | 68 61 6e 67 65 20 74 6f | : . c|hange to|
|00000860| 20 31 32 20 68 6f 75 72 | 20 63 6c 6f 63 6b 0d 03 | 12 hour| clock..|
|00000870| 0c 07 20 20 cc 0d 03 16 | 1c 20 20 20 20 68 6f 75 |.. ....|. hou|
|00000880| 72 31 32 25 20 3d 20 68 | 6f 75 72 25 20 2d 20 31 |r12% = h|our% - 1|
|00000890| 32 0d 03 20 07 20 20 cd | 0d 03 2a 04 0d 03 34 13 |2.. . .|..*...4.|
|000008a0| 20 20 e7 20 6d 69 6e 35 | 25 20 3d 20 30 20 8c 0d | . min5|% = 0 ..|
|000008b0| 03 3e 4d 20 20 20 20 6d | 65 73 73 24 20 3d 20 69 |.>M m|ess$ = i|
|000008c0| 74 73 24 28 32 29 2b 22 | 20 22 2b 68 6f 75 72 73 |ts$(2)+"| "+hours|
|000008d0| 24 28 68 6f 75 72 31 32 | 25 29 2b 22 20 28 69 73 |$(hour12|%)+" (is|
|000008e0| 68 29 22 20 20 20 3a 20 | f4 20 73 70 65 63 69 61 |h)" : |. specia|
|000008f0| 6c 20 61 74 20 4f 27 63 | 6c 6f 63 6b 0d 03 48 07 |l at O'c|lock..H.|
|00000900| 20 20 cc 0d 03 52 22 20 | 20 20 20 e7 20 6d 69 6e | ...R" | . min|
|00000910| 35 25 20 3d 20 36 20 80 | 20 6d 69 6e 25 20 3e 3d |5% = 6 .| min% >=|
|00000920| 20 33 30 20 8c 0d 03 5c | 47 20 20 20 20 20 20 6d | 30 ...\|G m|
|00000930| 65 73 73 24 20 3d 20 69 | 74 73 24 28 33 29 20 2b |ess$ = i|ts$(3) +|
|00000940| 20 22 20 22 20 20 20 20 | 20 20 20 20 20 20 20 20 | " " | |
|00000950| 20 20 20 3a 20 f4 20 73 | 70 65 63 69 61 6c 20 66 | : . s|pecial f|
|00000960| 6f 72 20 68 61 6c 66 20 | 70 61 73 74 0d 03 66 09 |or half |past..f.|
|00000970| 20 20 20 20 cc 0d 03 70 | 1f 20 20 20 20 20 20 6d | ...p|. m|
|00000980| 65 73 73 24 20 3d 20 69 | 74 73 24 28 31 29 20 2b |ess$ = i|ts$(1) +|
|00000990| 20 22 20 22 0d 03 7a 09 | 20 20 20 20 cd 0d 03 84 | " "..z.| ....|
|000009a0| 05 20 0d 03 8e 1a 20 20 | 20 20 e7 20 6d 69 6e 25 |. .... | . min%|
|000009b0| 20 3c 20 35 2a 6d 69 6e | 35 25 20 8c 0d 03 98 45 | < 5*min|5% ....E|
|000009c0| 20 20 20 20 20 20 6d 65 | 73 73 24 20 3d 20 6d 65 | me|ss$ = me|
|000009d0| 73 73 24 20 2b 20 72 6f | 75 67 68 24 28 31 29 20 |ss$ + ro|ugh$(1) |
|000009e0| 2b 20 22 20 22 20 20 20 | 20 20 3a 20 f4 20 61 6c |+ " " | : . al|
|000009f0| 6d 6f 73 74 20 6f 72 20 | 6a 75 73 74 20 67 6f 6e |most or |just gon|
|00000a00| 65 0d 03 a2 09 20 20 20 | 20 cc 0d 03 ac 29 20 20 |e.... | ....) |
|00000a10| 20 20 20 20 6d 65 73 73 | 24 20 3d 20 6d 65 73 73 | mess|$ = mess|
|00000a20| 24 20 2b 20 72 6f 75 67 | 68 24 28 32 29 20 2b 20 |$ + roug|h$(2) + |
|00000a30| 22 20 22 0d 03 b6 09 20 | 20 20 20 cd 0d 03 c0 04 |" ".... | .....|
|00000a40| 0d 03 ca 16 20 20 20 20 | e7 20 6d 69 6e 35 25 20 |.... |. min5% |
|00000a50| 3d 20 31 32 20 8c 0d 03 | d4 45 20 20 20 20 20 20 |= 12 ...|.E |
|00000a60| 6d 65 73 73 24 20 3d 20 | 6d 65 73 73 24 20 2b 20 |mess$ = |mess$ + |
|00000a70| 68 6f 75 72 73 24 28 28 | 68 6f 75 72 31 32 25 2b |hours$((|hour12%+|
|00000a80| 31 29 20 83 20 31 32 29 | 20 2b 20 22 20 22 20 2b |1) . 12)| + " " +|
|00000a90| 20 6f 63 6c 6f 63 6b 24 | 28 31 29 0d 03 de 09 20 | oclock$|(1).... |
|00000aa0| 20 20 20 cc 0d 03 e8 2c | 20 20 20 20 20 20 6d 65 | ....,| me|
|00000ab0| 73 73 24 20 3d 20 6d 65 | 73 73 24 20 2b 20 6d 69 |ss$ = me|ss$ + mi|
|00000ac0| 6e 73 24 28 6d 69 6e 35 | 25 29 20 2b 20 22 20 22 |ns$(min5|%) + " "|
|00000ad0| 0d 03 f2 17 20 20 20 20 | 20 20 e7 20 6d 69 6e 35 |.... | . min5|
|00000ae0| 25 20 3c 20 37 20 8c 0d | 03 fc 3d 20 20 20 20 20 |% < 7 ..|..= |
|00000af0| 20 20 20 6d 65 73 73 24 | 20 3d 20 6d 65 73 73 24 | mess$| = mess$|
|00000b00| 20 2b 20 64 69 72 65 63 | 24 28 31 29 20 2b 20 22 | + direc|$(1) + "|
|00000b10| 20 22 20 2b 20 68 6f 75 | 72 73 24 28 68 6f 75 72 | " + hou|rs$(hour|
|00000b20| 31 32 25 29 0d 04 06 0b | 20 20 20 20 20 20 cc 0d |12%)....| ..|
|00000b30| 04 10 46 20 20 20 20 20 | 20 20 20 6d 65 73 73 24 |..F | mess$|
|00000b40| 20 3d 20 6d 65 73 73 24 | 20 2b 20 64 69 72 65 63 | = mess$| + direc|
|00000b50| 24 28 32 29 20 2b 20 22 | 20 22 20 2b 20 68 6f 75 |$(2) + "| " + hou|
|00000b60| 72 73 24 28 28 68 6f 75 | 72 31 32 25 2b 31 29 20 |rs$((hou|r12%+1) |
|00000b70| 83 20 31 32 29 0d 04 1a | 0b 20 20 20 20 20 20 cd |. 12)...|. .|
|00000b80| 0d 04 24 09 20 20 20 20 | cd 0d 04 2e 07 20 20 cd |..$. |..... .|
|00000b90| 0d 04 38 04 0d 04 42 35 | 20 20 6d 65 73 73 24 20 |..8...B5| mess$ |
|00000ba0| 3d 20 6d 65 73 73 24 20 | 2b 20 20 22 2e 22 20 20 |= mess$ |+ "." |
|00000bb0| 20 20 20 20 20 3a 20 f4 | 20 41 64 64 20 61 20 66 | : .| Add a f|
|00000bc0| 75 6c 6c 20 73 74 6f 70 | 21 0d 04 4c 04 0d 04 56 |ull stop|!..L...V|
|00000bd0| 45 20 20 f2 73 70 65 63 | 69 61 6c 20 20 20 20 20 |E .spec|ial |
|00000be0| 20 20 20 20 20 20 20 20 | 20 20 20 3a 20 f4 20 74 | | : . t|
|00000bf0| 72 79 20 66 6f 72 20 73 | 6f 6d 65 20 73 70 65 63 |ry for s|ome spec|
|00000c00| 69 61 6c 20 73 70 65 63 | 69 61 6c 20 63 61 73 65 |ial spec|ial case|
|00000c10| 73 21 0d 04 60 04 0d 04 | 6a 35 20 20 f2 63 68 61 |s!..`...|j5 .cha|
|00000c20| 6e 67 65 54 69 74 6c 65 | 28 6d 65 73 73 24 29 20 |ngeTitle|(mess$) |
|00000c30| 20 20 20 20 3a 20 f4 20 | 63 68 61 6e 67 65 20 77 | : . |change w|
|00000c40| 69 6e 64 6f 77 20 74 69 | 74 6c 65 0d 04 74 05 e1 |indow ti|tle..t..|
|00000c50| 0d 04 7e 04 0d 04 88 04 | 0d 04 92 04 0d 04 9c 1a |..~.....|........|
|00000c60| dd 20 f2 63 68 61 6e 67 | 65 54 69 74 6c 65 28 74 |. .chang|eTitle(t|
|00000c70| 69 74 6c 65 24 29 0d 04 | a6 44 20 20 f4 20 4e 6f |itle$)..|.D . No|
|00000c80| 77 20 74 6f 20 63 68 61 | 6e 67 65 20 74 68 65 20 |w to cha|nge the |
|00000c90| 77 69 6e 64 6f 77 20 74 | 69 74 6c 65 20 74 6f 20 |window t|itle to |
|00000ca0| 74 68 65 20 6d 65 73 73 | 61 67 65 20 61 6e 64 20 |the mess|age and |
|00000cb0| 72 65 6f 70 65 6e 20 69 | 74 2e 0d 04 b0 05 20 0d |reopen i|t..... .|
|00000cc0| 04 ba 14 20 20 24 54 65 | 78 74 20 3d 20 74 69 74 |... $Te|xt = tit|
|00000cd0| 6c 65 24 0d 04 c4 1a 20 | 20 53 70 61 72 65 21 30 |le$.... | Spare!0|
|00000ce0| 20 3d 20 77 69 6e 68 61 | 6e 64 6c 65 25 0d 04 ce | = winha|ndle%...|
|00000cf0| 1b 20 20 57 69 6e 64 6f | 77 21 30 20 3d 20 77 69 |. Windo|w!0 = wi|
|00000d00| 6e 68 61 6e 64 6c 65 25 | 0d 04 d8 26 20 20 c8 99 |nhandle%|...& ..|
|00000d10| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|00000d20| 53 74 61 74 65 22 2c 2c | 57 69 6e 64 6f 77 0d 04 |State",,|Window..|
|00000d30| e2 1a 20 20 57 69 6e 64 | 6f 77 21 38 34 20 3d 20 |.. Wind|ow!84 = |
|00000d40| a9 28 24 54 65 78 74 29 | 0d 04 ec 22 20 20 c8 99 |.($Text)|..." ..|
|00000d50| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 | "Wimp_C|loseWind|
|00000d60| 6f 77 22 2c 2c 53 70 61 | 72 65 0d 04 f6 22 20 20 |ow",,Spa|re..." |
|00000d70| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |.. "Wimp|_OpenWin|
|00000d80| 64 6f 77 22 2c 2c 57 69 | 6e 64 6f 77 0d 05 00 05 |dow",,Wi|ndow....|
|00000d90| e1 0d 05 0a 04 0d 05 14 | 04 0d 05 1e 04 0d 05 28 |........|.......(|
|00000da0| 0e dd 20 f2 67 65 74 74 | 69 6d 65 0d 05 32 31 20 |.. .gett|ime..21 |
|00000db0| 20 62 6c 6f 63 6b 25 21 | 30 20 3d 20 30 20 20 20 | block%!|0 = 0 |
|00000dc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a 20 f4 | | : .|
|00000dd0| 20 72 65 61 73 6f 6e 20 | 63 6f 64 65 0d 05 3c 38 | reason |code..<8|
|00000de0| 20 20 c8 99 20 22 4f 53 | 5f 57 6f 72 64 22 2c 31 | .. "OS|_Word",1|
|00000df0| 34 2c 20 62 6c 6f 63 6b | 25 20 20 20 20 3a 20 f4 |4, block|% : .|
|00000e00| 20 54 69 6d 65 20 70 6c | 65 61 73 65 20 6d 61 74 | Time pl|ease mat|
|00000e10| 65 79 21 21 0d 05 46 05 | 20 0d 05 50 3d 20 20 68 |ey!!..F.| ..P= h|
|00000e20| 6f 75 72 25 20 3d 20 bb | 28 c1 24 62 6c 6f 63 6b |our% = .|(.$block|
|00000e30| 25 2c 20 31 37 2c 20 32 | 29 29 20 20 20 20 20 20 |%, 17, 2|)) |
|00000e40| 20 3a 20 f4 20 65 78 74 | 72 61 63 74 20 74 68 65 | : . ext|ract the|
|00000e50| 20 68 6f 75 72 73 0d 05 | 5a 05 20 0d 05 64 1f 20 | hours..|Z. ..d. |
|00000e60| 20 6d 69 6e 25 20 20 3d | 20 bb 28 c1 24 62 6c 6f | min% =| .(.$blo|
|00000e70| 63 6b 25 2c 32 30 2c 32 | 29 29 0d 05 6e 04 0d 05 |ck%,20,2|))..n...|
|00000e80| 78 38 20 20 6d 69 6e 35 | 25 20 3d 20 28 6d 69 6e |x8 min5|% = (min|
|00000e90| 25 2b 32 2e 35 29 20 81 | 20 35 20 20 20 20 3a 20 |%+2.5) .| 5 : |
|00000ea0| f4 20 6d 69 6e 75 74 65 | 73 20 74 6f 20 6e 65 61 |. minute|s to nea|
|00000eb0| 72 65 73 74 20 35 0d 05 | 82 05 20 0d 05 8c 1c 20 |rest 5..|.. .... |
|00000ec0| 20 73 65 63 25 20 3d 20 | bb 28 c2 24 62 6c 6f 63 | sec% = |.(.$bloc|
|00000ed0| 6b 25 2c 20 32 29 29 0d | 05 96 04 0d 05 a0 1c 20 |k%, 2)).|....... |
|00000ee0| 20 64 61 79 24 20 3d 20 | c1 24 62 6c 6f 63 6b 25 | day$ = |.$block%|
|00000ef0| 2c 20 30 2c 20 33 29 0d | 05 aa 05 e1 0d 05 b4 05 |, 0, 3).|........|
|00000f00| 20 0d 05 be 04 0d 05 c8 | 04 0d 05 d2 0e dd 20 f2 | .......|...... .|
|00000f10| 73 70 65 63 69 61 6c 0d | 05 dc 43 20 20 f4 20 41 |special.|..C . A|
|00000f20| 20 62 75 6e 63 68 20 6f | 66 20 73 70 65 63 69 61 | bunch o|f specia|
|00000f30| 6c 20 63 61 73 65 73 20 | 74 68 61 74 20 63 6f 6d |l cases |that com|
|00000f40| 70 6c 65 74 6c 79 20 63 | 68 61 6e 67 65 20 74 68 |pletly c|hange th|
|00000f50| 65 20 6d 65 73 73 61 67 | 65 2e 0d 05 e6 43 20 20 |e messag|e....C |
|00000f60| f4 20 54 68 6f 75 67 68 | 20 63 6f 75 6c 64 20 65 |. Though| could e|
|00000f70| 78 74 65 6e 64 20 6d 65 | 73 73 61 67 65 20 61 73 |xtend me|ssage as|
|00000f80| 20 74 69 6d 65 20 68 61 | 73 20 61 6c 72 65 61 64 | time ha|s alread|
|00000f90| 79 20 62 65 65 6e 20 62 | 75 69 6c 74 2e 0d 05 f0 |y been b|uilt....|
|00000fa0| 22 20 20 f4 20 41 64 64 | 20 61 6e 79 20 75 73 65 |" . Add| any use|
|00000fb0| 66 75 6c 20 72 65 6d 69 | 6e 64 65 72 73 21 21 0d |ful remi|nders!!.|
|00000fc0| 05 fa 04 0d 06 04 2f 20 | 20 e7 20 64 61 79 24 20 |....../ | . day$ |
|00000fd0| 3d 20 22 54 75 65 22 20 | 80 20 68 6f 75 72 25 20 |= "Tue" |. hour% |
|00000fe0| 3d 20 32 31 20 80 20 6d | 69 6e 35 25 20 3d 20 30 |= 21 . m|in5% = 0|
|00000ff0| 20 8c 0d 06 0e 38 20 20 | 20 20 6d 65 73 73 24 20 | ....8 | mess$ |
|00001000| 3d 20 22 51 75 69 63 6b | 21 20 49 74 27 73 20 61 |= "Quick|! It's a|
|00001010| 62 6f 75 74 20 74 69 6d | 65 20 66 6f 72 20 54 77 |bout tim|e for Tw|
|00001020| 69 6e 20 50 65 61 6b 73 | 21 22 0d 06 18 07 20 20 |in Peaks|!".... |
|00001030| cd 0d 06 22 04 0d 06 2c | 22 20 20 e7 20 68 6f 75 |..."...,|" . hou|
|00001040| 72 25 20 3e 3d 20 32 30 | 20 80 20 68 6f 75 72 25 |r% >= 20| . hour%|
|00001050| 20 3c 20 32 33 20 8c 0d | 06 36 27 20 20 20 20 6d | < 23 ..|.6' m|
|00001060| 65 73 73 24 20 3d 20 6d | 65 73 73 24 20 2b 20 22 |ess$ = m|ess$ + "|
|00001070| 20 28 42 61 72 73 20 6f | 70 65 6e 21 29 22 0d 06 | (Bars o|pen!)"..|
|00001080| 40 07 20 20 cd 0d 06 4a | 04 0d 06 54 1f 20 20 e7 |@. ...J|...T. .|
|00001090| 20 68 6f 75 72 25 20 3d | 20 32 20 80 20 6d 69 6e | hour% =| 2 . min|
|000010a0| 35 25 20 3d 20 30 20 8c | 0d 06 5e 2b 20 20 20 20 |5% = 0 .|..^+ |
|000010b0| 6d 65 73 73 24 20 3d 20 | 22 4d 75 73 74 20 62 65 |mess$ = |"Must be|
|000010c0| 20 62 65 64 74 69 6d 65 | 20 73 6f 6f 6e 2d 69 73 | bedtime| soon-is|
|000010d0| 68 21 22 0d 06 68 07 20 | 20 cd 0d 06 72 04 0d 06 |h!"..h. | ...r...|
|000010e0| 7c 1f 20 20 e7 20 68 6f | 75 72 25 20 3e 20 35 20 ||. . ho|ur% > 5 |
|000010f0| 80 20 68 6f 75 72 25 20 | 3c 20 38 20 8c 0d 06 86 |. hour% |< 8 ....|
|00001100| 26 20 20 20 20 6d 65 73 | 73 24 20 3d 20 6d 65 73 |& mes|s$ = mes|
|00001110| 73 24 20 2b 20 22 20 28 | 75 70 20 65 61 72 6c 79 |s$ + " (|up early|
|00001120| 21 29 22 0d 06 90 07 20 | 20 cd 0d 06 9a 04 0d 06 |!)".... | .......|
|00001130| a4 16 20 20 e7 20 b3 28 | 31 30 30 30 30 29 20 3d |.. . .(|10000) =|
|00001140| 20 31 20 8c 0d 06 ae 3a | 20 20 20 20 6d 65 73 73 | 1 ....:| mess|
|00001150| 24 20 3d 20 22 57 68 61 | 74 20 73 6f 72 74 20 6f |$ = "Wha|t sort o|
|00001160| 66 20 74 69 6d 65 20 64 | 6f 20 79 6f 75 20 63 61 |f time d|o you ca|
|00001170| 6c 6c 20 74 68 69 73 20 | 74 68 65 6e 3f 22 0d 06 |ll this |then?"..|
|00001180| b8 07 20 20 cd 0d 06 c2 | 05 e1 0d 06 cc 05 20 0d |.. ....|...... .|
|00001190| 06 d6 04 0d 06 e0 04 0d | 06 ea 0b dd 20 f2 69 6e |........|.... .in|
|000011a0| 69 74 0d 06 f4 0f 20 20 | 6d 61 73 6b 25 20 3d 20 |it.... |mask% = |
|000011b0| 30 0d 06 fe 2a 20 20 c8 | 99 20 22 4f 53 5f 52 65 |0...* .|. "OS_Re|
|000011c0| 61 64 4d 6f 6e 6f 74 6f | 6e 69 63 54 69 6d 65 22 |adMonoto|nicTime"|
|000011d0| 20 b8 20 6f 6c 64 74 69 | 6d 65 25 0d 07 08 19 20 | . oldti|me%.... |
|000011e0| 20 6f 6c 64 74 69 6d 65 | 25 20 2b 3d 20 31 30 30 | oldtime|% += 100|
|000011f0| 20 2a 20 35 0d 07 12 04 | 0d 07 1c 31 20 20 de 20 | * 5....|...1 . |
|00001200| 69 74 73 24 28 33 29 2c | 20 72 6f 75 67 68 24 28 |its$(3),| rough$(|
|00001210| 32 29 2c 20 64 69 72 65 | 63 24 28 32 29 2c 20 6f |2), dire|c$(2), o|
|00001220| 63 6c 6f 63 6b 24 28 31 | 29 0d 07 26 1d 20 20 de |clock$(1|)..&. .|
|00001230| 20 68 6f 75 72 73 24 28 | 31 32 29 2c 20 6d 69 6e | hours$(|12), min|
|00001240| 73 24 28 31 32 29 0d 07 | 30 05 20 0d 07 3a 30 20 |s$(12)..|0. ..:0 |
|00001250| 20 f4 20 46 69 6c 6c 20 | 74 68 65 20 61 72 72 61 | . Fill |the arra|
|00001260| 79 73 20 66 72 6f 6d 20 | 74 68 65 20 64 61 74 61 |ys from |the data|
|00001270| 20 73 74 61 74 65 6d 65 | 6e 74 73 0d 07 44 21 20 | stateme|nts..D! |
|00001280| 20 f3 20 69 74 73 24 28 | 31 29 2c 20 69 74 73 24 | . its$(|1), its$|
|00001290| 28 32 29 2c 20 69 74 73 | 24 28 33 29 0d 07 4e 1c |(2), its|$(3)..N.|
|000012a0| 20 20 f3 20 72 6f 75 67 | 68 24 28 31 29 2c 20 72 | . roug|h$(1), r|
|000012b0| 6f 75 67 68 24 28 32 29 | 0d 07 58 1c 20 20 f3 20 |ough$(2)|..X. . |
|000012c0| 64 69 72 65 63 24 28 31 | 29 2c 20 64 69 72 65 63 |direc$(1|), direc|
|000012d0| 24 28 32 29 0d 07 62 12 | 20 20 f3 20 6f 63 6c 6f |$(2)..b.| . oclo|
|000012e0| 63 6b 24 28 31 29 0d 07 | 6c 13 20 20 e3 20 6e 25 |ck$(1)..|l. . n%|
|000012f0| 20 3d 20 30 20 b8 20 31 | 32 0d 07 76 14 20 20 20 | = 0 . 1|2..v. |
|00001300| 20 f3 20 68 6f 75 72 73 | 24 28 6e 25 29 0d 07 80 | . hours|$(n%)...|
|00001310| 07 20 20 ed 0d 07 8a 04 | 0d 07 94 13 20 20 e3 20 |. .....|.... . |
|00001320| 6e 25 20 3d 20 31 20 b8 | 20 31 31 0d 07 9e 13 20 |n% = 1 .| 11.... |
|00001330| 20 20 20 f3 20 6d 69 6e | 73 24 28 6e 25 29 0d 07 | . min|s$(n%)..|
|00001340| a8 07 20 20 ed 0d 07 b2 | 04 0d 07 bc 05 e1 0d 07 |.. ....|........|
|00001350| c6 05 20 0d 07 d0 04 0d | 07 da 0c dd 20 f2 65 72 |.. .....|.... .er|
|00001360| 72 6f 72 0d 07 e4 0c 20 | 20 ee 20 85 20 c8 98 0d |ror.... | . . ...|
|00001370| 07 ee 10 20 20 62 6c 6f | 63 6b 25 21 30 3d 9f 0d |... blo|ck%!0=..|
|00001380| 07 f8 26 20 20 24 28 62 | 6c 6f 63 6b 25 2b 34 29 |..& $(b|lock%+4)|
|00001390| 3d f6 24 2b 22 20 61 74 | 20 6c 69 6e 65 20 22 2b |=.$+" at| line "+|
|000013a0| c3 9e 2b bd 30 0d 08 02 | 34 20 20 c8 99 20 22 57 |..+.0...|4 .. "W|
|000013b0| 69 6d 70 5f 52 65 70 6f | 72 74 45 72 72 6f 72 22 |imp_Repo|rtError"|
|000013c0| 2c 42 6c 6f 63 6b 2c 25 | 30 31 30 2c 22 52 6f 75 |,Block,%|010,"Rou|
|000013d0| 67 68 20 63 6c 6f 63 6b | 22 0d 08 0c 2f 20 20 c8 |gh clock|".../ .|
|000013e0| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 44 6f 77 |. "Wimp_|CloseDow|
|000013f0| 6e 22 2c 54 61 73 6b 5f | 48 61 6e 64 6c 65 2c 26 |n",Task_|Handle,&|
|00001400| 34 42 35 33 34 31 35 34 | 0d 08 16 05 e1 0d 08 20 |4B534154|....... |
|00001410| 05 20 0d 08 2a 41 f4 20 | 54 68 65 20 64 61 74 61 |. ..*A. |The data|
|00001420| 20 66 6f 72 20 61 6c 6c | 20 74 68 65 20 62 69 74 | for all| the bit|
|00001430| 73 20 6f 66 20 74 65 78 | 74 20 75 73 65 64 20 74 |s of tex|t used t|
|00001440| 6f 20 62 75 69 6c 64 20 | 74 68 65 20 6d 65 73 73 |o build |the mess|
|00001450| 61 67 65 0d 08 34 04 0d | 08 3e 20 dc 20 49 74 27 |age..4..|.> . It'|
|00001460| 73 2c 42 6f 6e 67 21 20 | 49 74 27 73 2c 42 69 6e |s,Bong! |It's,Bin|
|00001470| 67 21 20 49 74 27 73 0d | 08 48 16 dc 20 61 6c 6d |g! It's.|.H.. alm|
|00001480| 6f 73 74 2c 6a 75 73 74 | 20 67 6f 6e 65 0d 08 52 |ost,just| gone..R|
|00001490| 0d dc 20 70 61 73 74 2c | 74 6f 0d 08 5c 0d dc 20 |.. past,|to..\.. |
|000014a0| 6f 27 63 6c 6f 63 6b 0d | 08 66 4e dc 20 6d 69 64 |o'clock.|.fN. mid|
|000014b0| 6e 69 67 68 74 2c 6f 6e | 65 2c 74 77 6f 2c 74 68 |night,on|e,two,th|
|000014c0| 72 65 65 2c 66 6f 75 72 | 2c 66 69 76 65 2c 73 69 |ree,four|,five,si|
|000014d0| 78 2c 73 65 76 65 6e 2c | 65 69 67 68 74 2c 6e 69 |x,seven,|eight,ni|
|000014e0| 6e 65 2c 74 65 6e 2c 65 | 6c 65 76 65 6e 2c 74 77 |ne,ten,e|leven,tw|
|000014f0| 65 6c 65 76 65 0d 08 70 | 41 dc 20 66 69 76 65 2c |eleve..p|A. five,|
|00001500| 74 65 6e 2c 71 75 61 72 | 74 65 72 2c 74 77 65 6e |ten,quar|ter,twen|
|00001510| 74 79 2c 74 77 65 6e 74 | 79 20 66 69 76 65 2c 68 |ty,twent|y five,h|
|00001520| 61 6c 66 2c 74 77 65 6e | 74 79 20 66 69 76 65 2c |alf,twen|ty five,|
|00001530| 74 77 65 6e 74 79 0d 08 | 7a 16 dc 20 71 75 61 72 |twenty..|z.. quar|
|00001540| 74 65 72 2c 74 65 6e 2c | 66 69 76 65 0d 08 84 05 |ter,ten,|five....|
|00001550| 20 0d ff | | .. | |
+--------+-------------------------+-------------------------+--------+--------+