WORLD CLOCK
FILE INFORMATION
FILENAME(S): WORLD CLOCK
FILE TYPE(S): PRG
FILE SIZE: 4.8K
FIRST SEEN: 2025-10-20 14:30:37
APPEARS ON: 1 disk(s)
FILE HASH
11d2ae3f4c6c745a1f34947b4bec470c5405a7d101d656a455bde5c4f2bcb884
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PB DOMAIN 0001UT | WORLD CLOCK | PRG | Treasure Chest - Klaus Der Suhler | 8 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2B 08 01 00 43 49 54 59 24 B2 22 20 3D 20 |..+...CITY$." = |
00000010: 50 55 42 4C 49 43 20 44 4F 4D 41 49 4E 20 42 59 |PUBLIC DOMAIN BY|
00000020: 20 50 4F 50 20 43 4F 52 4E 20 22 00 36 08 02 00 | POP CORN ".6...|
00000030: 44 4F 57 4E B2 37 00 43 08 03 00 41 43 52 4F 53 |DOWN.7.C...ACROS|
00000040: 53 B2 37 00 5F 08 04 00 97 35 33 32 38 30 2C 31 |S.7._....53280,1|
00000050: 3A 97 35 33 32 38 31 2C 31 3A 8F 20 20 36 34 00 |:.53281,1:. 64.|
00000060: 8A 08 05 00 99 22 90 93 11 11 11 11 11 11 11 1D |....."..........|
00000070: 1D 1D 1D 1D 1D 1D 1D 1D 50 4C 45 41 53 45 20 45 |........PLEASE E|
00000080: 4E 54 45 52 20 44 41 54 45 22 00 93 08 09 00 9F |NTER DATE"......|
00000090: 31 2C 33 00 BF 08 0A 00 86 20 44 4D 28 31 32 29 |1,3...... DM(12)|
000000A0: 3A 43 43 24 B2 22 13 11 11 11 11 11 11 11 11 11 |:CC$."..........|
000000B0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 |..............".|
000000C0: E3 08 0B 00 99 3A 99 3A 99 22 4D 4F 4E 54 48 20 |.....:.:."MONTH |
000000D0: 20 20 20 20 20 44 41 59 20 20 20 20 20 20 20 59 | DAY Y|
000000E0: 45 41 52 00 01 09 0C 00 99 22 20 DD 20 DD 20 20 |EAR......" . . |
000000F0: 20 20 20 20 20 DD DD 20 20 20 20 20 20 20 DD A0 | .. ..|
00000100: DD 00 1F 09 0D 00 99 22 20 DD 20 CA C0 C0 C0 C0 |......." . .....|
00000110: C0 C0 C9 DD DD D5 C0 C0 C0 C0 C0 C0 CB 20 DD 00 |............. ..|
00000120: 3D 09 0E 00 99 22 20 CA C0 C0 C0 C0 C0 C0 C0 C9 |=...." .........|
00000130: DD DD DD DD D5 C0 C0 C0 C0 C0 C0 C0 CB 00 53 09 |..............S.|
00000140: 0F 00 99 22 20 20 20 20 20 20 20 20 20 DD DD DD |..." ...|
00000150: DD DD DD 00 5A 09 10 00 99 22 00 64 09 11 00 99 |....Z....".d....|
00000160: A6 37 29 3A 00 6D 09 12 00 85 44 54 24 00 97 09 |.7):.m....DT$...|
00000170: 64 00 99 22 93 11 11 11 11 11 11 11 1D 1D 1D 1D |d.."............|
00000180: 1D 1D 1D 1D 1D 50 4C 45 41 53 45 20 45 4E 54 45 |.....PLEASE ENTE|
00000190: 52 20 54 49 4D 45 22 00 BC 09 6E 00 99 3A 99 3A |R TIME"...n..:.:|
000001A0: 99 22 48 4F 55 52 53 20 20 20 20 4D 49 4E 55 54 |."HOURS MINUT|
000001B0: 45 53 20 20 20 53 45 43 4F 4E 44 53 00 DA 09 78 |ES SECONDS...x|
000001C0: 00 99 22 20 DD 20 DD 20 20 20 20 20 20 20 DD DD |.." . . ..|
000001D0: 20 20 20 20 20 20 20 DD A0 DD 00 F8 09 82 00 99 | .........|
000001E0: 22 20 DD 20 CA C0 C0 C0 C0 C0 C0 C9 DD DD D5 C0 |" . ............|
000001F0: C0 C0 C0 C0 C0 CB 20 DD 00 16 0A 8C 00 99 22 20 |...... ......." |
00000200: CA C0 C0 C0 C0 C0 C0 C0 C9 DD DD DD DD D5 C0 C0 |................|
00000210: C0 C0 C0 C0 C0 CB 00 2C 0A 96 00 99 22 20 20 20 |.......,...." |
00000220: 20 20 20 20 20 20 DD DD DD DD DD DD 00 33 0A A0 | .......3..|
00000230: 00 99 22 00 3D 0A AA 00 99 A6 37 29 3A 00 46 0A |..".=.....7):.F.|
00000240: B4 00 85 4C 54 24 00 52 0A B9 00 8D 20 31 32 30 |...LT$.R.... 120|
00000250: 30 30 00 5D 0A BE 00 8D 31 31 30 30 30 00 74 0A |00.]....11000.t.|
00000260: E1 00 A1 20 42 24 3A 8B 20 42 24 B2 22 22 20 89 |... B$:. B$."" .|
00000270: 20 32 32 35 00 8A 0A E6 00 8B 20 42 24 B2 22 45 | 225...... B$."E|
00000280: 22 A7 20 42 B2 35 30 30 30 30 00 A0 0A EB 00 8B |". B.50000......|
00000290: 20 42 24 B2 22 43 22 A7 20 42 B2 36 30 30 30 30 | B$."C". B.60000|
000002A0: 00 B6 0A F0 00 8B 20 42 24 B2 22 4D 22 A7 20 42 |...... B$."M". B|
000002B0: B2 37 30 30 30 30 00 CC 0A F5 00 8B 20 42 24 B2 |.70000...... B$.|
000002C0: 22 50 22 A7 20 42 B2 38 30 30 30 30 00 E1 0A F7 |"P". B.80000....|
000002D0: 00 8B 42 24 B2 22 4F 22 20 A7 20 8D 31 31 30 35 |..B$."O" . .1105|
000002E0: 30 00 0E 0B FA 00 54 B2 C5 28 4C 54 24 29 AA 42 |0.....T..(LT$).B|
000002F0: AB 44 53 AC 31 30 30 30 30 3A 8B 54 B1 32 34 30 |.DS.10000:.T.240|
00000300: 30 30 30 A7 54 B2 54 AB 32 34 30 30 30 30 00 1D |000.T.T.240000..|
00000310: 0B FF 00 42 58 B2 42 AD 31 30 30 30 30 00 37 0B |...BX.B.10000.7.|
00000320: 04 01 54 24 B2 22 30 30 30 30 30 30 22 AA CA 28 |..T$."000000"..(|
00000330: C4 28 54 29 2C 32 29 00 47 0B 09 01 54 49 24 B2 |.(T),2).G...TI$.|
00000340: C9 28 54 24 2C 36 29 00 74 0B 2C 01 4D 4D 24 B2 |.(T$,6).t.,.MM$.|
00000350: C8 28 44 54 24 2C 32 29 3A 44 44 24 B2 CA 28 44 |.(DT$,2):DD$..(D|
00000360: 54 24 2C 33 2C 32 29 3A 59 59 24 B2 C9 28 44 54 |T$,3,2):YY$..(DT|
00000370: 24 2C 32 29 00 96 0B 36 01 4D 4D B2 C5 28 4D 4D |$,2)...6.MM..(MM|
00000380: 24 29 3A 44 44 B2 C5 28 44 44 24 29 3A 59 59 B2 |$):DD..(DD$):YY.|
00000390: C5 28 59 59 24 29 00 A4 0B 40 01 8B 4D 4D B2 31 |.(YY$)...@..MM.1|
000003A0: A7 33 39 30 00 B0 0B 4A 01 81 49 B2 31 A4 31 32 |.390...J..I.1.12|
000003B0: 00 BC 0B 54 01 87 20 44 4D 28 49 29 00 C3 0B 59 |...T.. DM(I)...Y|
000003C0: 01 82 49 00 DE 0B 5E 01 8B 20 59 AD 34 B2 B5 28 |..I...^.. Y.4..(|
000003D0: 59 AD 34 29 A7 20 44 4D 28 32 29 B2 32 39 00 ED |Y.4). DM(2).29..|
000003E0: 0B 68 01 81 20 49 B2 31 A4 4D 4D AB 31 00 FD 0B |.h.. I.1.MM.1...|
000003F0: 72 01 4A 44 B2 4A 44 AA 44 4D 28 49 29 00 04 0C |r.JD.JD.DM(I)...|
00000400: 7C 01 82 49 00 11 0C 86 01 4A 44 B2 4A 44 AA 44 ||..I.....JD.JD.D|
00000410: 44 00 3B 0C 90 01 83 20 33 31 2C 32 38 2C 33 31 |D.;.... 31,28,31|
00000420: 2C 33 30 2C 33 31 2C 33 30 2C 33 31 2C 33 31 2C |,30,31,30,31,31,|
00000430: 33 30 2C 33 31 2C 33 30 2C 33 31 00 4A 0C 9A 01 |30,31,30,31.J...|
00000440: 8B 4D 4D B2 36 A7 51 B2 31 31 00 63 0C A4 01 8B |.MM.6.Q.11.c....|
00000450: 20 28 4D 4D B2 37 29 B0 28 4D 4D B2 35 29 A7 51 | (MM.7).(MM.5).Q|
00000460: B2 31 32 00 7C 0C AE 01 8B 20 28 4D 4D B2 38 29 |.12.|.... (MM.8)|
00000470: B0 28 4D 4D B2 34 29 A7 51 B2 31 33 00 95 0C B8 |.(MM.4).Q.13....|
00000480: 01 8B 20 28 4D 4D B2 39 29 B0 28 4D 4D B2 33 29 |.. (MM.9).(MM.3)|
00000490: A7 51 B2 31 34 00 AF 0C C2 01 8B 20 28 4D 4D B2 |.Q.14...... (MM.|
000004A0: 31 30 29 B0 28 4D 4D B2 32 29 A7 51 B2 31 35 00 |10).(MM.2).Q.15.|
000004B0: C9 0C CC 01 8B 20 28 4D 4D B2 31 31 29 B0 28 4D |..... (MM.11).(M|
000004C0: 4D B2 31 29 A7 51 B2 31 36 00 DC 0C D6 01 8B 20 |M.1).Q.16...... |
000004D0: 28 4D 4D B2 31 32 29 A7 51 B2 31 37 00 EA 0C E0 |(MM.12).Q.17....|
000004E0: 01 8B 20 28 51 B2 30 29 A7 90 00 F2 0C 88 13 99 |.. (Q.0)........|
000004F0: 22 93 00 23 0D B0 13 99 22 A4 A4 A4 CE 20 20 CD |"..#....".... .|
00000500: 20 20 CD 20 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 | . ............|
00000510: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 20 20 20 20 20 |........... |
00000520: 20 22 3B 00 56 0D BA 13 99 22 A5 20 20 20 20 20 | ";.V....". |
00000530: A7 20 20 20 CD A1 20 20 20 20 20 57 4F 52 4C 44 |. .. WORLD|
00000540: 20 20 43 4C 4F 43 4B 20 20 20 20 12 A1 92 20 20 | CLOCK ... |
00000550: 20 20 20 20 22 3B 00 82 0D C4 13 99 22 A5 20 20 | ";......". |
00000560: 20 20 20 20 A5 BA A3 CD 12 A2 A2 A2 A2 A2 A2 A2 | ............|
00000570: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00000580: 92 22 00 B3 0D CE 13 99 22 A5 20 20 20 20 20 20 |."......". |
00000590: 20 20 20 A7 20 20 20 D1 20 3D 20 53 55 4E 20 20 | . . = SUN |
000005A0: 20 20 CE A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ..............|
000005B0: D0 22 3B 00 E4 0D D8 13 99 22 A5 20 20 20 20 20 |.";......". |
000005C0: 20 20 20 20 A7 20 20 20 20 20 20 20 20 20 20 20 | . |
000005D0: 20 20 CE 20 A7 D0 20 20 20 20 20 20 20 20 20 20 | . .. |
000005E0: 20 CE 22 3B 00 12 0E E2 13 99 22 A5 20 20 20 20 | .";......". |
000005F0: 20 20 20 20 20 A7 20 20 20 20 20 20 20 20 20 20 | . |
00000600: 20 20 20 CC 20 A7 20 D0 20 20 20 20 20 20 20 20 | . . . |
00000610: 20 CE 00 3F 0E EC 13 99 22 A5 20 20 20 20 20 20 | ..?....". |
00000620: 20 20 20 CE 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00000630: 20 20 CC CE CE A3 20 20 20 20 20 20 20 20 CE 00 | .... ..|
00000640: 6B 0E F6 13 99 22 CD 20 20 20 20 20 20 20 20 CE |k....". .|
00000650: 20 20 20 20 20 20 20 20 20 20 AE 20 20 BA DD A4 | . ...|
00000660: CE 20 20 20 20 20 20 20 20 20 CE 00 96 0E 00 14 |. ......|
00000670: 99 22 20 CD 20 20 20 20 20 20 CE 20 20 20 20 20 |." . . |
00000680: 20 20 20 20 20 CB B3 20 CE 20 20 20 20 20 20 20 | .. . |
00000690: 20 20 20 20 20 CE 00 C0 0E 0A 14 99 22 20 20 CD | ......." .|
000006A0: 20 20 20 A4 CE 20 20 20 20 20 20 20 20 20 20 20 | .. |
000006B0: 20 BD CE 20 20 20 20 20 20 20 20 20 20 20 20 A7 | .. .|
000006C0: 00 EA 0E 14 14 99 22 5F 20 20 CD CF A3 C2 A5 20 |......"_ ..... |
000006D0: 20 20 20 20 20 20 20 20 20 20 20 CF 20 20 20 20 | . |
000006E0: 20 20 20 20 20 20 20 20 20 A7 00 17 0F 1E 14 99 | .......|
000006F0: 22 48 4F 4E 2E CD 20 27 20 20 20 20 20 20 20 20 |"HON.. ' |
00000700: 20 20 20 B0 CB CE CD CD CE D0 20 20 20 20 20 20 | ....... |
00000710: 20 20 20 20 CD 20 AE 00 44 0F 28 14 99 22 20 20 | . ..D.(.." |
00000720: 20 20 20 CF A3 A3 CD 20 20 20 20 20 20 20 20 20 | .... |
00000730: AD BD 20 27 20 20 CE 20 20 20 20 20 20 20 20 20 |.. ' . |
00000740: 20 A7 A7 C7 00 72 0F 32 14 99 22 2D 20 2D 20 A5 | ....r.2.."- - .|
00000750: 2D 20 2D 20 CD 20 2D 20 2D 20 2D 20 2D A5 2D 20 |- - . - - - -.- |
00000760: 2D 20 2D A7 CD 2D 20 2D 20 2D 20 2D 20 2D BA A7 |- -..- - - - -..|
00000770: C8 2D 00 9F 0F 3C 14 99 22 20 20 20 20 A5 20 20 |.-...<.." . |
00000780: 20 20 20 CD 20 20 20 20 20 20 20 A5 20 20 20 20 | . . |
00000790: 20 A7 CD 20 20 20 20 20 20 20 20 20 BA A7 C8 00 | .. ....|
000007A0: CC 0F 46 14 99 22 20 20 20 20 A5 20 20 20 20 20 |..F.." . |
000007B0: A7 20 20 20 20 20 20 20 CD 20 20 20 20 20 20 CD |. . .|
000007C0: CD CE A3 CD 20 20 CE CD BA 20 20 BD 00 F6 0F 50 |.... ... ....P|
000007D0: 14 99 22 20 20 20 20 CD 20 20 20 20 20 CE 20 20 |.." . . |
000007E0: 20 20 20 20 20 20 D0 20 20 20 20 20 CE 20 20 20 | . . |
000007F0: 20 CD CE 20 20 CD 00 23 10 5A 14 99 22 20 20 20 | .. ..#.Z.." |
00000800: 20 20 CD 20 20 20 CE 20 20 20 20 20 20 20 20 20 | . . |
00000810: A7 20 20 20 20 CE 20 20 20 20 20 20 20 20 20 CD |. . .|
00000820: A4 20 A4 00 51 10 64 14 99 22 20 20 20 20 20 A7 |. ..Q.d.." .|
00000830: 20 20 CE 20 20 20 20 20 20 20 20 20 20 20 CD 20 | . . |
00000840: 20 A7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00000850: CD 00 7E 10 6E 14 99 22 20 20 20 20 20 A7 20 CE |..~.n.." . .|
00000860: 20 20 20 20 20 20 20 20 20 20 20 20 20 CD 20 CE | . .|
00000870: 20 20 20 20 20 20 20 20 20 20 CE A3 A3 CD 00 B1 | ......|
00000880: 10 78 14 99 22 20 20 20 20 20 A7 CE 20 20 20 20 |.x.." .. |
00000890: 20 20 20 20 20 20 20 20 20 20 20 A3 20 20 20 20 | . |
000008A0: 20 20 20 20 20 20 20 CD A4 A4 CE CE 22 3B 22 13 | .....";".|
000008B0: 22 00 EE 10 B4 14 99 22 13 11 11 11 11 11 11 11 |"......"........|
000008C0: 11 1D 53 2E 46 2E 91 1D 1D 1D 1D 1D 4E 2E 59 20 |..S.F.......N.Y |
000008D0: 1D 1D 1D 1D 11 4C 4F 4E 44 4F 4E 1D 1D 1D 1D 1D |.....LONDON.....|
000008E0: 1D 1D 1D 1D 1D 1D 11 11 11 54 4F 4B 59 4F 00 34 |.........TOKYO.4|
000008F0: 11 BE 14 99 22 13 11 11 11 11 11 11 11 11 11 11 |...."...........|
00000900: 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000910: 1D 52 49 4F 1D 1D 1D 1D 1D 1D 1D 11 11 43 41 50 |.RIO.........CAP|
00000920: 45 20 54 4F 57 4E 1D 1D 1D 1D 1D 1D 11 11 53 59 |E TOWN........SY|
00000930: 44 4E 45 59 00 6E 11 C8 14 99 22 13 11 11 11 11 |DNEY.n....".....|
00000940: 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000950: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 4A 45 52 |.............JER|
00000960: 55 53 41 4C 45 4D 11 11 11 44 41 43 43 41 00 A1 |USALEM...DACCA..|
00000970: 11 7C 15 48 30 24 B2 C8 28 54 49 24 2C 32 29 3A |.|.H0$..(TI$,2):|
00000980: 48 30 B2 C5 28 48 30 24 29 3A 48 31 B2 48 30 AA |H0..(H0$):H1.H0.|
00000990: 31 39 3A 8B 48 31 B3 30 A7 48 31 B2 48 31 AA 32 |19:.H1.0.H1.H1.2|
000009A0: 33 00 D1 11 81 15 48 31 B2 48 30 AA 31 36 AA 44 |3.....H1.H0.16.D|
000009B0: 53 3A 8B 48 31 B1 32 33 A7 48 31 B2 48 31 AB 32 |S:.H1.23.H1.H1.2|
000009C0: 34 3A 8F 20 53 41 4E 20 46 52 41 4E 43 49 53 43 |4:. SAN FRANCISC|
000009D0: 4F 00 F5 11 83 15 48 48 B2 48 30 AA 31 34 3A 8B |O.....HH.H0.14:.|
000009E0: 48 48 B1 32 33 A7 48 48 B2 48 48 AB 32 34 3A 8F |HH.23.HH.HH.24:.|
000009F0: 20 48 49 4C 4F 00 1C 12 84 15 48 58 B2 48 30 AB | HILO.....HX.H0.|
00000A00: 42 58 AA 44 53 3A 8B 48 58 B3 30 A7 48 58 B2 48 |BX.DS:.HX.0.HX.H|
00000A10: 58 AA 32 34 3A 8F 20 4C 4F 43 41 4C 00 47 12 86 |X.24:. LOCAL.G..|
00000A20: 15 48 32 B2 48 30 AA 31 39 AA 44 53 3A 8B 48 32 |.H2.H0.19.DS:.H2|
00000A30: B1 32 33 A7 48 32 B2 48 32 AB 32 34 3A 8F 20 4E |.23.H2.H2.24:. N|
00000A40: 45 57 20 59 4F 52 4B 00 6A 12 8B 15 48 33 B2 48 |EW YORK.j...H3.H|
00000A50: 30 AA 32 31 3A 8B 48 33 B1 32 33 A7 48 33 B2 48 |0.21:.H3.23.H3.H|
00000A60: 33 AB 32 34 3A 8F 20 52 49 4F 00 9E 12 90 15 48 |3.24:. RIO.....H|
00000A70: 34 B2 48 30 AA 32 3A 8B 48 34 B1 32 33 A7 48 34 |4.H0.2:.H4.23.H4|
00000A80: B2 48 34 AB 32 34 3A 8F 20 4A 45 52 55 53 41 4C |.H4.24:. JERUSAL|
00000A90: 45 4D 20 4F 52 20 43 41 50 45 54 4F 57 4E 00 C2 |EM OR CAPETOWN..|
00000AA0: 12 95 15 48 36 B2 48 30 AA 39 3A 8B 48 36 B1 32 |...H6.H0.9:.H6.2|
00000AB0: 33 A7 48 36 B2 48 36 AB 32 34 3A 8F 20 54 4F 4B |3.H6.H6.24:. TOK|
00000AC0: 59 4F 00 E8 12 9A 15 48 37 B2 48 30 AA 31 30 3A |YO.....H7.H0.10:|
00000AD0: 8B 48 37 B1 32 33 A7 48 37 B2 48 37 AB 32 34 3A |.H7.23.H7.H7.24:|
00000AE0: 8F 20 53 59 44 4E 45 59 00 0C 13 9F 15 48 38 B2 |. SYDNEY.....H8.|
00000AF0: 48 30 AA 36 3A 8B 48 38 B1 32 33 A7 48 38 B2 48 |H0.6:.H8.23.H8.H|
00000B00: 38 AB 32 34 3A 8F 20 44 41 43 43 41 00 2F 13 A2 |8.24:. DACCA./..|
00000B10: 15 48 39 B2 48 30 3A 8B 48 39 B1 32 33 A7 48 39 |.H9.H0:.H9.23.H9|
00000B20: B2 48 39 AB 32 34 3A 8F 20 4C 4F 4E 44 4F 4E 00 |.H9.24:. LONDON.|
00000B30: 59 13 A3 15 48 31 24 B2 C4 28 48 31 29 3A 48 31 |Y...H1$..(H1):H1|
00000B40: 24 B2 C9 28 48 31 24 2C 32 29 3A 48 4F 24 B2 C9 |$..(H1$,2):HO$..|
00000B50: 28 C4 28 48 30 29 2C 32 29 00 8A 13 A4 15 48 32 |(.(H0),2).....H2|
00000B60: 24 B2 C9 28 C4 28 48 32 29 2C 32 29 3A 48 33 24 |$..(.(H2),2):H3$|
00000B70: B2 C9 28 C4 28 48 33 29 2C 32 29 3A 48 34 24 B2 |..(.(H3),2):H4$.|
00000B80: C9 28 C4 28 48 34 29 2C 32 29 00 9D 13 A9 15 48 |.(.(H4),2).....H|
00000B90: 48 24 B2 C9 28 C4 28 48 48 29 2C 32 29 00 B0 13 |H$..(.(HH),2)...|
00000BA0: AC 15 48 58 24 B2 C9 28 C4 28 48 58 29 2C 32 29 |..HX$..(.(HX),2)|
00000BB0: 00 E1 13 AE 15 48 35 24 B2 C9 28 C4 28 48 35 29 |.....H5$..(.(H5)|
00000BC0: 2C 32 29 3A 48 36 24 B2 C9 28 C4 28 48 36 29 2C |,2):H6$..(.(H6),|
00000BD0: 32 29 3A 48 37 24 B2 C9 28 C4 28 48 37 29 2C 32 |2):H7$..(.(H7),2|
00000BE0: 29 00 F4 13 B3 15 48 38 24 B2 C9 28 C4 28 48 38 |).....H8$..(.(H8|
00000BF0: 29 2C 32 29 00 07 14 B6 15 48 39 24 B2 C9 28 C4 |),2).....H9$..(.|
00000C00: 28 48 39 29 2C 32 29 00 27 14 B8 15 4D 4D 24 B2 |(H9),2).'...MM$.|
00000C10: CA 28 54 49 24 2C 33 2C 32 29 3A 53 53 24 B2 C9 |.(TI$,3,2):SS$..|
00000C20: 28 54 49 24 2C 32 29 00 57 14 70 17 99 22 13 12 |(TI$,2).W.p.."..|
00000C30: 11 11 11 11 11 11 11 22 3B 48 31 24 3B 22 3A 22 |.......";H1$;":"|
00000C40: 3B 4D 4D 24 3B 22 11 1D 1D 1D 22 3B 48 32 24 3B |;MM$;"....";H2$;|
00000C50: 22 3A 22 3B 4D 4D 24 00 71 14 84 17 99 A3 31 38 |":";MM$.q.....18|
00000C60: 29 3B 22 12 22 3B 48 39 24 3B 22 3A 22 3B 4D 4D |);".";H9$;":";MM|
00000C70: 24 00 8E 14 85 17 99 A3 33 35 29 3B 22 11 11 12 |$.......35);"...|
00000C80: 22 3B 48 36 24 3B 22 3A 22 3B 4D 4D 24 3B 00 9F |";H6$;":";MM$;..|
00000C90: 14 86 17 99 48 48 24 3B 22 3A 22 3B 4D 4D 24 00 |....HH$;":";MM$.|
00000CA0: CB 14 87 17 99 22 13 11 11 11 11 11 11 11 11 11 |....."..........|
00000CB0: 11 11 11 11 11 11 11 11 12 22 3B A3 39 29 3B 48 |.........";.9);H|
00000CC0: 33 24 3B 22 3A 22 3B 4D 4D 24 3B 00 EC 14 88 17 |3$;":";MM$;.....|
00000CD0: 99 22 12 1D 1D 1D 1D 1D 1D 1D 11 11 11 11 22 3B |."............";|
00000CE0: 48 34 24 3B 22 3A 22 3B 4D 4D 24 3B 00 0F 15 89 |H4$;":";MM$;....|
00000CF0: 17 99 22 12 11 11 1D 1D 1D 1D 1D 1D 1D 1D 22 3B |.."...........";|
00000D00: 48 37 24 3B 22 3A 22 3B 4D 4D 24 3B 22 92 22 00 |H7$;":";MM$;".".|
00000D10: 38 15 8A 17 99 22 13 11 11 11 11 11 11 11 11 11 |8...."..........|
00000D20: 11 11 11 11 12 22 3B A3 32 33 29 3B 48 34 24 3B |.....";.23);H4$;|
00000D30: 22 3A 22 3B 4D 4D 24 3B 00 55 15 8B 17 99 22 11 |":";MM$;.U....".|
00000D40: 11 11 1D 1D 22 3B 48 38 24 3B 22 3A 22 3B 4D 4D |....";H8$;":";MM|
00000D50: 24 3B 22 92 22 00 5F 15 8C 17 8D 38 30 30 30 00 |$;"."._....8000.|
00000D60: 75 15 8E 17 42 42 B2 28 48 30 B3 30 29 B0 28 48 |u...BB.(H0.0).(H|
00000D70: 30 B1 B2 33 29 00 8A 15 8F 17 42 B2 28 48 30 B1 |0..3).....B.(H0.|
00000D80: B2 30 29 AF 28 48 30 B3 33 29 00 A3 15 90 17 99 |.0).(H0.3)......|
00000D90: 22 13 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 11 11 11 11 |"...............|
00000DA0: 11 22 3B 00 D0 15 91 17 8B 20 28 48 30 B1 B2 32 |.";...... (H0..2|
00000DB0: 30 29 B0 28 42 29 A7 20 99 22 28 4F 56 45 52 20 |0).(B). ."(OVER |
00000DC0: 50 41 43 49 46 49 43 29 22 3A 89 20 36 30 33 35 |PACIFIC)":. 6035|
00000DD0: 00 E6 15 92 17 99 22 A7 20 20 20 20 20 20 20 20 |......". |
00000DE0: 20 20 20 20 20 22 00 26 16 93 17 8B 20 28 48 30 | ".&.... (H0|
00000DF0: B3 32 30 29 AF 28 42 42 29 A7 20 99 22 13 1D 1D |.20).(BB). ."...|
00000E00: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 20 20 20 20 20 |.......... |
00000E10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E20: 20 20 20 20 20 22 00 35 16 98 17 59 B2 32 AC 28 | ".5...Y.2.(|
00000E30: 48 30 AB 33 29 00 45 16 99 17 8B 59 B2 30 A7 20 |H0.3).E....Y.0. |
00000E40: 59 B2 59 AA 31 00 57 16 9A 17 8B 59 B1 B2 31 32 |Y.Y.1.W....Y..12|
00000E50: A7 20 59 B2 59 AA 32 00 6A 16 9B 17 8B 59 B1 B2 |. Y.Y.2.j....Y..|
00000E60: 33 32 20 A7 20 59 B2 59 AA 33 00 7B 16 9C 17 8B |32 . Y.Y.3.{....|
00000E70: 20 59 B2 33 37 A7 20 59 B2 33 38 00 87 16 9D 17 | Y.37. Y.38.....|
00000E80: 58 32 B2 33 39 AB 59 00 A4 16 BC 17 8B 20 28 48 |X2.39.Y...... (H|
00000E90: 48 B3 B1 48 30 29 AF 28 58 32 B1 33 39 29 A7 20 |H..H0).(X2.39). |
00000EA0: 35 35 30 30 00 D4 16 BD 17 8B 20 28 48 48 B3 B1 |5500...... (HH..|
00000EB0: 48 30 29 AF 20 28 58 32 B3 B2 30 29 A7 99 C8 28 |H0). (X2..0)...(|
00000EC0: 43 43 24 2C 51 AA 31 29 22 1D 22 54 4B 24 3A 89 |CC$,Q.1)"."TK$:.|
00000ED0: 35 35 30 30 00 E4 16 BE 17 8B 58 31 B2 58 32 89 |5500......X1.X2.|
00000EE0: 36 30 39 35 00 08 17 BF 17 8B 58 31 B3 B1 30 A7 |6095......X1..0.|
00000EF0: 99 C8 28 43 43 24 2C 51 AA 31 29 A3 58 31 29 54 |..(CC$,Q.1).X1)T|
00000F00: 4B 24 3A 99 22 91 22 3B 00 2A 17 C0 17 99 C8 28 |K$:.".";.*.....(|
00000F10: 43 43 24 2C 51 AA 31 29 A6 58 32 29 3B 3A A1 23 |CC$,Q.1).X2);:.#|
00000F20: 31 2C 54 4B 24 3A 99 22 91 22 00 42 17 CF 17 99 |1,TK$:.".".B....|
00000F30: C8 28 43 43 24 2C 51 AA 31 29 A6 58 32 29 22 D7 |.(CC$,Q.1).X2)".|
00000F40: 22 3B 00 54 17 58 1B 81 20 5A 5A B2 31 A4 35 30 |";.T.X.. ZZ.1.50|
00000F50: 3A 82 5A 5A 00 5F 17 62 1B 99 22 9D D1 22 3B 00 |:.ZZ._.b.."..";.|
00000F60: 69 17 63 1B 58 31 B2 58 32 00 73 17 64 1B 48 48 |i.c.X1.X2.s.d.HH|
00000F70: B2 48 30 00 7D 17 BC 1B 89 35 35 30 30 00 9B 17 |.H0.}....5500...|
00000F80: 40 1F 99 C8 28 43 43 24 2C 44 4F 57 4E AA 31 29 |@...(CC$,DOWN.1)|
00000F90: A3 41 43 52 4F 53 53 29 22 2A 22 00 C2 17 4A 1F |.ACROSS)"*"...J.|
00000FA0: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00000FB0: 11 11 11 11 11 11 11 11 11 11 2A 22 3B 43 49 54 |..........*";CIT|
00000FC0: 59 24 00 ED 17 54 1F 99 22 1D 12 22 3B 48 58 24 |Y$...T.."..";HX$|
00000FD0: 3B 22 3A 22 3B 4D 4D 24 3B 22 3A 22 3B 53 53 24 |;":";MM$;":";SS$|
00000FE0: 3B 22 92 22 3B 22 20 28 22 3B 42 24 3B 00 06 18 |;".";" (";B$;...|
00000FF0: 5E 1F 8B 20 44 53 20 A7 99 22 44 54 29 22 3B 3A |^.. DS .."DT)";:|
00001000: 89 20 38 30 35 30 00 12 18 68 1F 99 22 53 54 29 |. 8050...h.."ST)|
00001010: 22 3B 00 1C 18 72 1F 99 22 13 11 22 00 22 18 7C |";...r.."..".".||
00001020: 1F 8E 00 29 18 38 27 85 4E 00 37 18 42 27 42 B2 |...).8'.N.7.B'B.|
00001030: 4E AC 31 30 30 30 30 00 3D 18 4C 27 8E 00 61 18 |N.10000.=.L'..a.|
00001040: F8 2A 99 22 93 11 11 11 12 1D 1D 1D 1D 1D 1D 1D |.*."............|
00001050: 45 4E 54 45 52 20 54 49 4D 45 20 5A 4F 4E 45 92 |ENTER TIME ZONE.|
00001060: 22 00 8F 18 02 2B 99 3A 99 22 54 59 50 45 20 12 |"....+.:."TYPE .|
00001070: 45 92 20 49 46 20 49 4E 20 45 41 53 54 45 52 4E |E. IF IN EASTERN|
00001080: 20 55 2E 53 2E 20 54 49 4D 45 20 5A 4F 4E 45 00 | U.S. TIME ZONE.|
00001090: BD 18 0C 2B 99 3A 99 22 54 59 50 45 20 12 43 92 |...+.:."TYPE .C.|
000010A0: 20 49 46 20 49 4E 20 43 45 4E 54 52 41 4C 20 55 | IF IN CENTRAL U|
000010B0: 2E 53 2E 20 54 49 4D 45 20 5A 4F 4E 45 00 E2 18 |.S. TIME ZONE...|
000010C0: 16 2B 99 3A 99 22 54 59 50 45 20 12 4D 92 20 49 |.+.:."TYPE .M. I|
000010D0: 46 20 49 4E 20 4D 4F 55 4E 54 41 49 4E 20 54 49 |F IN MOUNTAIN TI|
000010E0: 4D 45 00 06 19 20 2B 99 3A 99 22 54 59 50 45 20 |ME... +.:."TYPE |
000010F0: 12 50 92 20 49 46 20 49 4E 20 50 41 43 49 46 49 |.P. IF IN PACIFI|
00001100: 43 20 54 49 4D 45 00 3A 19 25 2B 99 3A 99 22 49 |C TIME.:.%+.:."I|
00001110: 46 20 4E 4F 54 20 49 4E 20 43 4F 4E 54 2E 20 55 |F NOT IN CONT. U|
00001120: 2E 53 2E 2C 20 54 59 50 45 20 12 4F 92 20 46 4F |.S., TYPE .O. FO|
00001130: 52 20 4F 54 48 45 52 22 3A 8E 00 58 19 2A 2B 99 |R OTHER":..X.*+.|
00001140: 22 93 12 49 46 20 4F 55 54 53 49 44 45 20 43 4F |"..IF OUTSIDE CO|
00001150: 4E 54 2E 20 55 2E 53 2E 00 82 19 34 2B 99 3A 99 |NT. U.S....4+.:.|
00001160: 22 45 4E 54 45 52 20 4E 55 4D 42 45 52 20 4F 46 |"ENTER NUMBER OF|
00001170: 20 48 4F 55 52 20 59 4F 55 20 4D 55 53 54 20 41 | HOUR YOU MUST A|
00001180: 44 44 00 B0 19 3E 2B 99 3A 99 22 54 4F 20 4C 4F |DD...>+.:."TO LO|
00001190: 43 41 4C 20 54 49 4D 45 20 54 4F 20 45 51 55 41 |CAL TIME TO EQUA|
000011A0: 4C 20 47 52 45 45 4E 57 49 43 48 20 54 49 4D 45 |L GREENWICH TIME|
000011B0: 00 D6 19 48 2B 99 3A 99 22 43 4F 55 4E 54 20 57 |...H+.:."COUNT W|
000011C0: 45 53 54 20 46 52 4F 4D 20 45 4E 47 4C 41 4E 44 |EST FROM ENGLAND|
000011D0: 20 28 49 2E 45 2E 00 F4 19 52 2B 99 3A 99 22 47 | (I.E....R+.:."G|
000011E0: 52 45 45 4E 4C 41 4E 44 3D 33 20 4A 41 50 41 4E |REENLAND=3 JAPAN|
000011F0: 3D 31 35 29 00 FB 19 5C 2B 85 4E 00 09 1A 66 2B |=15)...\+.N...f+|
00001200: 42 B2 4E AC 31 30 30 30 30 00 0F 1A 70 2B 8E 00 |B.N.10000...p+..|
00001210: 26 1A E0 2E 8F 20 44 41 59 4C 49 47 48 54 20 53 |&.... DAYLIGHT S|
00001220: 41 56 49 4E 47 53 00 31 1A EA 2E 99 22 11 11 11 |AVINGS.1...."...|
00001230: 22 00 54 1A F4 2E 99 22 44 41 59 4C 49 47 48 54 |".T...."DAYLIGHT|
00001240: 20 53 41 56 49 4E 47 53 20 54 49 4D 45 20 28 59 | SAVINGS TIME (Y|
00001250: 2F 4E 29 22 00 6E 1A FE 2E A1 20 44 53 24 3A 8B |/N)".n.... DS$:.|
00001260: 20 44 53 24 B2 22 22 20 89 31 32 30 33 30 00 77 | DS$."" .12030.w|
00001270: 1A 08 2F 44 53 B2 30 00 8B 1A 12 2F 8B 20 44 53 |../DS.0..../. DS|
00001280: 24 B2 22 59 22 A7 20 44 53 B2 31 00 91 1A 1C 2F |$."Y". DS.1..../|
00001290: 8E 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000012A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000012B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000012C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000012D0: 00 00 00 00 00 00 00 00 00 00 0D 00 00 00 00 00 |................|
000012E0: 00 00 00 00 00 00 22 00 00 00 00 00 00 00 00 00 |......".........|
000012F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00001300: C7 |. |
..+...CITY$." = PUBLIC DOMAIN BY POP COR
N ".6...DOWN.7.C...ACROSS.7._....53280,1
:.53281,1:. 64......"..................
PLEASE ENTER DATE"......1,3...... DM(12)
:CC$."........................"......:.:
."MONTH DAY YEAR......" . .
.. . ......." . J......I..U..
....K ..=...." J.......I....U.......K.S.
..." .......Z....".D.....7):.M..
..DT$...D..".................PLEASE ENTE
R TIME"...N..:.:."HOURS MINUTES SEC
ONDS.Z.X.." . . .. . .......
" . J......I..U......K ......." J.......
I....U.......K.,...." .......3.
..".=.....7):.F....LT$.R.... 12000.]....
11000.T.... B$:. B$."" . 225...... B$."E
". B.50000. .... B$."C". B.60000...... B
$."M". B.70000.L.... B$."P". B.80000....
..B$."O" . .11050.....T.E(LT$).B.DS.1000
0:.T.240000.T.T.240000.....BX.B.10000.7.
..T$."000000".J(D(T),2).G...TI$.I(T$,6).
T.,.MM$.H(DT$,2):DD$.J(DT$,3,2):YY$.I(DT
$,2)...6.MM.E(MM$):DD.E(DD$):YY.E(YY$)..
.@..MM.1.390...J..I.1.12...T.. DM(I).C.Y
..I...^.. Y.4..(Y.4). DM(2).29...H.. I.1
.MM.1...R.JD.JD.DM(I)...|..I.....JD.JD.D
D.;.... 31,28,31,30,31,30,31,31,30,31,30
,31.J....MM.6.Q.11.C.... (MM.7).(MM.5).Q
.12.|.... (MM.8).(MM.4).Q.13...... (MM.9
).(MM.3).Q.14...B.. (MM.10).(MM.2).Q.15.
I.L.. (MM.11).(MM.1).Q.16...V.. (MM.12).
Q.17...... (Q.0)........"..#...."...N M
M ....................... ";.V...
.". . M. WORLD CLOCK ...
";...D..". ...M................
........."...N..". . Q = SUN
N.............P";...X..". .
N .P N";......".
. L . P N.?....
". N LNN. N.
K...."M N . ...N
N......" M N K. N
N......" M .N .N
......."_ MO.B. O
......."HON.M ' .KNMM
NP M ..D.(.." O..M
.. ' N ..G.R.2.."- - .- - M -
- - -.- - -.M- - - - -..H-...<.." .
M . .M ..H.L.F.."
. . M MMN.M NM. ....P
.." M N P N MN M.#
.Z.." M N . N M
. ..Q.D.." . N M .
M.~.N.." . N M N
N..M...X.." .N
. M..NN";"."......"........
..S.F.......N.Y .....LONDON.............
.TOKYO.4...."...........................
.RIO.........CAPE TOWN........SYDNEY.N.H
.."..................................JER
USALEM...DACCA...|.H0$.H(TI$,2):H0.E(H0$
):H1.H0.19:.H1.0.H1.H1.23.Q...H1.H0.16.D
S:.H1.23.H1.H1.24:. SAN FRANCISCO.....HH
.H0.14:.HH.23.HH.HH.24:. HILO.....HX.H0.
BX.DS:.HX.0.HX.HX.24:. LOCAL.G...H2.H0.1
9.DS:.H2.23.H2.H2.24:. NEW YORK.J...H3.H
0.21:.H3.23.H3.H3.24:. RIO.....H4.H0.2:.
H4.23.H4.H4.24:. JERUSALEM OR CAPETOWN.B
...H6.H0.9:.H6.23.H6.H6.24:. TOKYO.....H
7.H0.10:.H7.23.H7.H7.24:. SYDNEY.....H8.
H0.6:.H8.23.H8.H8.24:. DACCA./...H9.H0:.
H9.23.H9.H9.24:. LONDON.Y...H1$.D(H1):H1
$.I(H1$,2):HO$.I(D(H0),2).....H2$.I(D(H2
),2):H3$.I(D(H3),2):H4$.I(D(H4),2).....H
H$.I(D(HH),2).....HX$.I(D(HX),2).....H5$
.I(D(H5),2):H6$.I(D(H6),2):H7$.I(D(H7),2
).....H8$.I(D(H8),2).....H9$.I(D(H9),2).
'...MM$.J(TI$,3,2):SS$.I(TI$,2).W.P.."..
.......";H1$;":";MM$;"....";H2$;":";MM$.
Q.....18);".";H9$;":";MM$.......35);"...
";H6$;":";MM$;......HH$;":";MM$.K...."..
.................";.9);H3$;":";MM$;.....
."............";H4$;":";MM$;......".....
......";H7$;":";MM$;".".8...."..........
.....";.23);H4$;":";MM$;.U....".....";H8
$;":";MM$;"."._....8000.U...BB.(H0.0).(H
0..3).....B.(H0..0).(H0.3)......".......
.........";.P.... (H0..20).(B). ."(OVER
PACIFIC)":. 6035......". ".&
.... (H0.20).(BB). .".............
".5...Y.2.(H0.3).E.
...Y.0. Y.Y.1.W....Y..12. Y.Y.2.J....Y..
32 . Y.Y.3.{.... Y.37. Y.38.....X2.39.Y.
..... (HH..H0).(X2.39). 5500.T.... (HH..
H0). (X2..0)..H(CC$,Q.1)"."TK$:.5500....
..X1.X2.6095......X1..0..H(CC$,Q.1).X1)T
K$:.".";.*....H(CC$,Q.1).X2);:.#1,TK$:."
.".B.O..H(CC$,Q.1).X2)"W";.T.X.. ZZ.1.50
:.ZZ._.B..".Q";.I.C.X1.X2.S.D.HH.H0.}...
.5500...@..H(CC$,DOWN.1).ACROSS)"*".B.J.
."........................*";CITY$...T..
"..";HX$;":";MM$;":";SS$;".";" (";B$;...
^.. DS .."DT)";:. 8050...H.."ST)";...R..
"..".".|...).8'.N.7.B'B.N.10000.=.L'..A.
.*."............ENTER TIME ZONE."....+.:
."TYPE .E. IF IN EASTERN U.S. TIME ZONE.
...+.:."TYPE .C. IF IN CENTRAL U.S. TIME
ZONE....+.:."TYPE .M. IF IN MOUNTAIN TI
ME... +.:."TYPE .P. IF IN PACIFIC TIME.:
.%+.:."IF NOT IN CONT. U.S., TYPE .O. FO
R OTHER":..X.*+."..IF OUTSIDE CONT. U.S.
...4+.:."ENTER NUMBER OF HOUR YOU MUST A
DD...>+.:."TO LOCAL TIME TO EQUAL GREENW
ICH TIME.V.H+.:."COUNT WEST FROM ENGLAND
(I.E....R+.:."GREENLAND=3 JAPAN=15)...\
+.N...F+B.N.10000...P+..&.... DAYLIGHT S
AVINGS.1...."...".T...."DAYLIGHT SAVINGS
TIME (Y/N)".N.... DS$:. DS$."" .12030.W
../DS.0..../. DS$."Y". DS.1..../........
........................................
......................................".
........................G
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL