JULIAN DATE
FILE INFORMATION
FILENAME(S): JULIAN DATE
FILE TYPE(S): PRG
FILE SIZE: 2.4K
FIRST SEEN: 2025-10-20 14:30:51
APPEARS ON: 1 disk(s)
FILE HASH
544adc1fc909ee8a0a28c1c34ebf21c92ae6a5d848519d832215ae335b0a7a8c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 0047ED | JULIAN DATE | PRG | Treasure Chest - Klaus Der Suhler | 11 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 4B 1C 64 00 83 20 4A 41 4E 55 41 52 59 2C |..K.d.. JANUARY,| 00000010: 46 45 42 52 55 41 52 59 2C 4D 41 52 43 48 2C 41 |FEBRUARY,MARCH,A| 00000020: 50 52 49 4C 2C 4D 41 59 2C 4A 55 4E 45 2C 4A 55 |PRIL,MAY,JUNE,JU| 00000030: 4C 59 2C 41 55 47 55 53 54 2C 53 45 50 54 45 4D |LY,AUGUST,SEPTEM| 00000040: 42 45 52 2C 4F 43 54 4F 42 45 52 00 63 1C 6E 00 |BER,OCTOBER.c.n.| 00000050: 83 20 4E 4F 56 45 4D 42 45 52 2C 44 45 43 45 4D |. NOVEMBER,DECEM| 00000060: 42 45 52 00 A2 1C 78 00 83 20 53 55 4E 44 41 59 |BER...x.. SUNDAY| 00000070: 2C 4D 4F 4E 44 41 59 2C 54 55 45 53 44 41 59 2C |,MONDAY,TUESDAY,| 00000080: 57 45 44 4E 45 53 44 41 59 2C 54 48 55 52 53 44 |WEDNESDAY,THURSD| 00000090: 41 59 2C 46 52 49 44 41 59 2C 53 41 54 55 52 44 |AY,FRIDAY,SATURD| 000000A0: 41 59 00 B7 1C 82 00 86 20 4D 4F 24 28 31 32 29 |AY...... MO$(12)| 000000B0: 2C 44 41 24 28 37 29 00 D1 1C 8C 00 81 20 49 B2 |,DA$(7)...... I.| 000000C0: 31 20 A4 20 31 32 3A 87 20 4D 4F 24 28 49 29 3A |1 . 12:. MO$(I):| 000000D0: 82 00 EA 1C 96 00 81 20 49 B2 31 20 A4 20 37 3A |....... I.1 . 7:| 000000E0: 87 20 44 41 24 28 49 29 3A 82 00 F4 1C A0 00 89 |. DA$(I):.......| 000000F0: 20 31 39 30 00 02 1D AA 00 99 C7 28 31 34 37 29 | 190.......(147)| 00000100: 3A 99 00 35 1D B4 00 99 22 20 49 4E 43 4F 52 52 |:..5...." INCORR| 00000110: 45 43 54 20 49 4E 50 55 54 2C 20 54 52 59 20 41 |ECT INPUT, TRY A| 00000120: 47 41 49 4E 2E 22 3A 81 20 49 B2 31 20 A4 20 32 |GAIN.":. I.1 . 2| 00000130: 30 30 30 3A 82 00 50 1D BE 00 99 C7 28 31 34 37 |000:..P.....(147| 00000140: 29 3A 8F 20 43 4C 45 41 52 20 53 43 52 45 45 4E |):. CLEAR SCREEN| 00000150: 00 76 1D C8 00 99 3A 99 22 20 20 20 20 20 20 20 |.v....:." | 00000160: 20 20 20 4A 55 4C 49 41 4E 20 44 41 59 20 4E 55 | JULIAN DAY NU| 00000170: 4D 42 45 52 53 22 00 A8 1D D2 00 99 3A 99 3A 99 |MBERS"......:.:.| 00000180: 22 20 20 20 20 20 20 41 53 54 52 4F 4E 4F 4D 45 |" ASTRONOME| 00000190: 52 53 20 48 41 56 45 20 43 48 4F 53 45 4E 20 44 |RS HAVE CHOSEN D| 000001A0: 41 59 20 5A 45 52 4F 22 00 D9 1D DC 00 99 3A 99 |AY ZERO"......:.| 000001B0: 22 20 41 53 20 4D 49 44 44 41 59 20 41 53 20 4D |" AS MIDDAY AS M| 000001C0: 45 41 53 55 52 45 44 20 4F 4E 20 54 48 45 20 47 |EASURED ON THE G| 000001D0: 52 45 45 4E 57 49 43 48 22 00 09 1E E6 00 99 3A |REENWICH"......:| 000001E0: 99 22 20 4D 45 52 49 44 49 41 4E 20 4F 4E 20 4A |." MERIDIAN ON J| 000001F0: 41 4E 55 41 52 59 20 31 2C 20 34 37 31 33 20 42 |ANUARY 1, 4713 B| 00000200: 2E 43 2E 20 20 54 48 45 22 00 38 1E F0 00 99 3A |.C. THE".8....:| 00000210: 99 22 20 4E 55 4D 42 45 52 20 4F 46 20 44 41 59 |." NUMBER OF DAY| 00000220: 53 20 45 4C 41 50 53 45 44 20 53 49 4E 43 45 20 |S ELAPSED SINCE | 00000230: 54 48 45 4E 20 49 53 22 00 68 1E FA 00 99 3A 99 |THEN IS".h....:.| 00000240: 22 20 54 48 45 20 4A 55 4C 49 41 4E 20 44 41 59 |" THE JULIAN DAY| 00000250: 20 4E 55 4D 42 45 52 20 4F 52 20 4A 55 4C 49 41 | NUMBER OR JULIA| 00000260: 4E 20 44 41 54 45 2E 22 00 98 1E 04 01 99 3A 99 |N DATE."......:.| 00000270: 22 20 54 48 45 20 4D 4F 44 49 46 49 45 44 20 4A |" THE MODIFIED J| 00000280: 55 4C 49 41 4E 20 44 41 54 45 20 42 45 47 41 4E |ULIAN DATE BEGAN| 00000290: 20 41 54 20 30 2E 30 22 00 C3 1E 0E 01 99 3A 99 | AT 0.0"......:.| 000002A0: 22 20 48 4F 55 52 53 20 28 55 54 29 20 4F 4E 20 |" HOURS (UT) ON | 000002B0: 4E 4F 56 45 4D 42 45 52 20 31 37 2C 20 31 38 35 |NOVEMBER 17, 185| 000002C0: 38 2E 22 00 F3 1E 18 01 99 3A 99 3A 99 3A 99 22 |8."......:.:.:."| 000002D0: 20 41 4E 44 20 53 4F 3A 20 20 4A 44 2D 4D 4A 44 | AND SO: JD-MJD| 000002E0: 3D 32 2C 34 30 30 2C 30 30 30 2E 35 20 44 41 59 |=2,400,000.5 DAY| 000002F0: 53 2E 22 00 FB 1E 22 01 99 3A 99 00 35 1F 2C 01 |S."..."..:..5.,.| 00000300: 99 22 20 20 20 20 20 20 20 22 3B C7 28 31 38 29 |." ";.(18)| 00000310: 3B 22 48 49 54 20 41 4E 59 20 4B 45 59 20 54 4F |;"HIT ANY KEY TO| 00000320: 20 43 4F 4E 54 49 4E 55 45 22 3A 8F 20 52 45 56 | CONTINUE":. REV| 00000330: 20 43 48 41 52 00 4C 1F 36 01 A1 20 41 24 3A 8B | CHAR.L.6.. A$:.| 00000340: 20 41 24 B2 22 22 20 A7 20 33 31 30 00 5C 1F 40 | A$."" . 310.\.@| 00000350: 01 99 C7 28 31 34 37 29 3A 99 3A 99 00 86 1F 4A |...(147):.:....J| 00000360: 01 99 22 20 20 50 52 45 53 53 20 3C 31 3E 20 49 |.." PRESS <1> I| 00000370: 46 20 59 4F 55 20 57 49 53 48 20 54 4F 20 43 4F |F YOU WISH TO CO| 00000380: 4E 56 45 52 54 22 00 B6 1F 54 01 99 3A 99 3A 99 |NVERT"...T..:.:.| 00000390: 22 20 20 46 52 4F 4D 20 43 41 4C 45 4E 44 41 52 |" FROM CALENDAR| 000003A0: 20 44 41 54 45 20 54 4F 20 4A 55 4C 49 41 4E 20 | DATE TO JULIAN | 000003B0: 44 41 54 45 2E 22 00 C4 1F 5E 01 99 3A 99 3A 99 |DATE."...^..:.:.| 000003C0: 3A 99 3A 99 00 EE 1F 68 01 99 22 20 20 50 52 45 |:.:....h.." PRE| 000003D0: 53 53 20 3C 32 3E 20 49 46 20 59 4F 55 20 57 49 |SS <2> IF YOU WI| 000003E0: 53 48 20 54 4F 20 43 4F 4E 56 45 52 54 22 00 1E |SH TO CONVERT"..| 000003F0: 20 72 01 99 3A 99 3A 99 22 20 20 46 52 4F 4D 20 | r..:.:." FROM | 00000400: 4A 55 4C 49 41 4E 20 44 41 54 45 20 54 4F 20 43 |JULIAN DATE TO C| 00000410: 41 4C 45 4E 44 41 52 20 44 41 54 45 2E 22 00 37 |ALENDAR DATE.".7| 00000420: 20 7C 01 A1 20 4E 4E 24 3A 8B 20 4E 4E 24 B2 22 | |.. NN$:. NN$."| 00000430: 22 20 A7 20 33 38 30 00 57 20 86 01 8B 20 4E 4E |" . 380.W ... NN| 00000440: 24 B3 B1 22 31 22 20 AF 20 4E 4E 24 B3 B1 22 32 |$.."1" . NN$.."2| 00000450: 22 20 A7 20 33 38 30 00 6B 20 90 01 8B 20 4E 4E |" . 380.k ... NN| 00000460: 24 B2 22 32 22 20 A7 20 36 30 30 00 9F 20 9A 01 |$."2" . 600.. ..| 00000470: 99 C7 28 31 34 37 29 3A 99 3A 99 22 20 45 4E 54 |..(147):.:." ENT| 00000480: 45 52 20 59 45 41 52 53 20 42 43 20 41 53 20 4E |ER YEARS BC AS N| 00000490: 45 47 41 54 49 56 45 20 59 45 41 52 53 2E 22 00 |EGATIVE YEARS.".| 000004A0: BA 20 A4 01 99 3A 85 22 20 45 4E 54 45 52 20 54 |. ...:." ENTER T| 000004B0: 48 45 20 59 45 41 52 22 3B 59 00 DD 20 AE 01 99 |HE YEAR";Y.. ...| 000004C0: 3A 85 22 20 45 4E 54 45 52 20 54 48 45 20 4D 4F |:." ENTER THE MO| 000004D0: 4E 54 48 20 4E 55 4D 42 45 52 22 3B 4D 00 F7 20 |NTH NUMBER";M.. | 000004E0: B8 01 99 3A 85 22 20 45 4E 54 45 52 20 54 48 45 |...:." ENTER THE| 000004F0: 20 44 41 59 22 3B 44 00 25 21 C2 01 8B 20 44 B1 | DAY";D.%!... D.| 00000500: 33 31 20 B0 20 44 B3 31 20 B0 20 4D B1 31 32 20 |31 . D.1 . M.12 | 00000510: B0 20 4D B3 31 20 B0 20 59 B3 AB 34 37 31 33 20 |. M.1 . Y..4713 | 00000520: A7 20 31 37 30 00 37 21 CC 01 8B 20 59 B3 30 20 |. 170.7!... Y.0 | 00000530: A7 20 59 B2 59 AA 31 00 56 21 D6 01 8B 20 4D B2 |. Y.Y.1.V!... M.| 00000540: 31 20 B0 20 4D B2 32 20 A7 20 59 B2 59 AB 31 3A |1 . M.2 . Y.Y.1:| 00000550: 4D B2 4D AA 31 32 00 69 21 E0 01 8B 20 59 B1 31 |M.M.12.i!... Y.1| 00000560: 35 38 32 20 A7 20 35 30 30 00 77 21 EA 01 42 B2 |582 . 500.w!..B.| 00000570: 30 3A 89 20 35 32 30 00 86 21 F4 01 41 B2 B5 28 |0:. 520..!..A..(| 00000580: 59 AD 31 30 30 29 00 97 21 FE 01 42 B2 32 AB 41 |Y.100)..!..B.2.A| 00000590: AA B5 28 41 AD 34 29 00 A9 21 08 02 43 B2 B5 28 |..(A.4)..!..C..(| 000005A0: 33 36 35 2E 32 35 AC 59 29 00 C0 21 12 02 45 B2 |365.25.Y)..!..E.| 000005B0: B5 28 33 30 2E 36 30 30 31 AC 28 4D AA 31 29 29 |.(30.6001.(M.1))| 000005C0: 00 D9 21 1C 02 4A 44 B2 42 AA 43 AA 45 AA 44 AA |..!..JD.B.C.E.D.| 000005D0: 31 37 32 30 39 39 34 2E 35 00 E9 21 26 02 99 3A |1720994.5..!&..:| 000005E0: 99 3A 99 3A 99 3A 99 3A 99 00 03 22 30 02 99 22 |.:.:.:.:..."0.."| 000005F0: 20 4A 55 4C 49 41 4E 20 44 41 54 45 20 3A 20 22 | JULIAN DATE : "| 00000600: 3B 4A 44 00 17 22 3A 02 4D 4A B2 4A 44 AB 32 34 |;JD..":.MJ.JD.24| 00000610: 30 30 30 30 30 2E 35 00 3E 22 44 02 99 3A 99 3A |00000.5.>"D..:.:| 00000620: 99 22 20 4D 4F 44 49 46 49 45 44 20 4A 55 4C 49 |." MODIFIED JULI| 00000630: 41 4E 20 44 41 54 45 20 3A 20 22 3B 4D 4A 00 48 |AN DATE : ";MJ.H| 00000640: 22 4E 02 99 3A 99 3A 80 00 58 22 58 02 99 C7 28 |"N..:.:..X"X...(| 00000650: 31 34 37 29 3A 99 3A 99 00 80 22 62 02 99 22 20 |147):.:..."b.." | 00000660: 20 50 52 45 53 53 20 3C 31 3E 20 49 46 20 59 4F | PRESS <1> IF YO| 00000670: 55 20 57 49 53 48 20 54 4F 20 45 4E 54 45 52 22 |U WISH TO ENTER"| 00000680: 00 A0 22 6C 02 99 3A 99 3A 99 22 20 20 4E 4F 52 |.."l..:.:." NOR| 00000690: 4D 41 4C 20 4A 55 4C 49 41 4E 20 44 41 54 45 22 |MAL JULIAN DATE"| 000006A0: 00 D2 22 76 02 99 3A 99 3A 99 3A 99 3A 99 3A 99 |.."v..:.:.:.:.:.| 000006B0: 22 20 20 50 52 45 53 53 20 3C 32 3E 20 49 46 20 |" PRESS <2> IF | 000006C0: 59 4F 55 20 57 49 53 48 20 54 4F 20 45 4E 54 45 |YOU WISH TO ENTE| 000006D0: 52 22 00 F4 22 80 02 99 3A 99 3A 99 22 20 20 4D |R".."...:.:." M| 000006E0: 4F 44 49 46 49 45 44 20 4A 55 4C 49 41 4E 20 44 |ODIFIED JULIAN D| 000006F0: 41 54 45 22 00 0D 23 8A 02 A1 20 41 42 24 3A 8B |ATE"..#... AB$:.| 00000700: 20 41 42 24 B2 22 22 20 A7 20 36 35 30 00 2D 23 | AB$."" . 650.-#| 00000710: 94 02 8B 20 41 42 24 B3 B1 22 31 22 20 AF 20 41 |... AB$.."1" . A| 00000720: 42 24 B3 B1 22 32 22 20 A7 20 36 35 30 00 3F 23 |B$.."2" . 650.?#| 00000730: 9E 02 99 C7 28 31 34 37 29 3A 99 3A 99 3A 99 00 |....(147):.:.:..| 00000740: 6F 23 A8 02 8B 20 41 42 24 B2 22 32 22 20 A7 20 |o#... AB$."2" . | 00000750: 99 22 49 4E 50 55 54 20 4D 4F 44 49 46 49 45 44 |."INPUT MODIFIED| 00000760: 20 4A 55 4C 49 41 4E 20 44 41 54 45 20 3A 22 00 | JULIAN DATE :".| 00000770: 96 23 B2 02 8B 20 41 42 24 B2 22 31 22 20 A7 20 |.#... AB$."1" . | 00000780: 99 22 49 4E 50 55 54 20 4A 55 4C 49 41 4E 20 44 |."INPUT JULIAN D| 00000790: 41 54 45 20 3A 22 00 9E 23 BC 02 99 3A 99 00 A7 |ATE :"..#...:...| 000007A0: 23 C6 02 85 20 4A 44 00 C7 23 D0 02 8B 20 41 42 |#... JD..#... AB| 000007B0: 24 B2 22 32 22 20 A7 20 4A 44 B2 4A 44 AA 32 34 |$."2" . JD.JD.24| 000007C0: 30 30 30 30 30 2E 35 00 D9 23 DA 02 41 58 B2 28 |00000.5..#..AX.(| 000007D0: 4A 44 AA 31 2E 35 29 AD 37 00 F6 23 E4 02 42 58 |JD.1.5).7..#..BX| 000007E0: B2 B5 28 28 41 58 AB B5 28 41 58 29 29 AC 37 AA |..((AX..(AX)).7.| 000007F0: 30 2E 35 29 AA 31 00 04 24 EE 02 4A 44 B2 4A 44 |0.5).1..$..JD.JD| 00000800: AA 30 2E 35 00 10 24 F8 02 49 B2 B5 28 4A 44 29 |.0.5..$..I..(JD)| 00000810: 00 1B 24 02 03 46 B2 4A 44 AB 49 00 27 24 0C 03 |..$..F.JD.I.'$..| 00000820: 41 B2 49 3A 42 B2 30 00 65 24 16 03 8B 20 49 B1 |A.I:B.0.e$... I.| 00000830: 32 32 39 39 31 36 30 20 A7 20 41 B2 B5 28 28 49 |2299160 . A..((I| 00000840: AB 31 38 36 37 32 31 36 2E 32 35 29 AD 33 36 35 |.1867216.25).365| 00000850: 32 34 2E 32 35 29 3A 42 B2 49 AA 31 AA 41 AB B5 |24.25):B.I.1.A..| 00000860: 28 41 AD 34 29 00 72 24 20 03 43 B2 42 AA 31 35 |(A.4).r$ .C.B.15| 00000870: 32 34 00 8C 24 2A 03 44 B2 B5 28 28 43 AB 31 32 |24..$*.D..((C.12| 00000880: 32 2E 31 29 AD 33 36 35 2E 32 35 29 00 9E 24 34 |2.1).365.25)..$4| 00000890: 03 45 B2 B5 28 33 36 35 2E 32 35 AC 44 29 00 B5 |.E..(365.25.D)..| 000008A0: 24 3E 03 47 B2 B5 28 28 43 AB 45 29 AD 33 30 2E |$>.G..((C.E).30.| 000008B0: 36 30 30 31 29 00 CF 24 48 03 44 44 B2 43 AB 45 |6001)..$H.DD.C.E| 000008C0: AA 46 AB B5 28 33 30 2E 36 30 30 31 AC 47 29 00 |.F..(30.6001.G).| 000008D0: DB 24 52 03 4D 4D B2 47 AB 31 33 00 F1 24 5C 03 |.$R.MM.G.13..$\.| 000008E0: 8B 20 47 B3 31 33 2E 35 20 A7 20 4D 4D B2 47 AB |. G.13.5 . MM.G.| 000008F0: 31 00 FF 24 66 03 59 59 B2 44 AB 34 37 31 36 00 |1..$f.YY.D.4716.| 00000900: 18 25 70 03 8B 20 4D 4D B3 32 2E 35 20 A7 20 59 |.%p.. MM.2.5 . Y| 00000910: 59 B2 44 AB 34 37 31 35 00 22 25 7A 03 99 3A 99 |Y.D.4715."%z..:.| 00000920: 3A 99 00 46 25 84 03 99 20 22 20 20 20 20 20 20 |:..F%... " | 00000930: 20 54 48 45 20 43 41 4C 45 4E 44 41 52 20 44 41 | THE CALENDAR DA| 00000940: 54 45 20 49 53 22 00 4C 25 8E 03 99 00 72 25 98 |TE IS".L%....r%.| 00000950: 03 99 20 22 20 20 22 3B 4D 4F 24 28 4D 4D 29 3B |.. " ";MO$(MM);| 00000960: 44 44 3B 22 2C 20 22 3B 59 59 2C 44 41 24 28 42 |DD;", ";YY,DA$(B| 00000970: 58 29 00 00 00 |X)... |
..K.D.. JANUARY,FEBRUARY,MARCH,APRIL,MAY ,JUNE,JULY,AUGUST,SEPTEMBER,OCTOBER.C.N. . NOVEMBER,DECEMBER...X.. SUNDAY,MONDAY, TUESDAY,WEDNESDAY,THURSDAY,FRIDAY,SATURD AY...... MO$(12),DA$(7).Q.... I.1 . 12:. MO$(I):....... I.1 . 7:. DA$(I):.... .. 190......G(147):..5...." INCORRECT INPU T, TRY AGAIN.":. I.1 . 2000:..P....G(147 ):. CLEAR SCREEN.V.H..:." JULIA N DAY NUMBERS"...R..:.:." ASTRONOME RS HAVE CHOSEN DAY ZERO".Y....:." AS MID DAY AS MEASURED ON THE GREENWICH"......: ." MERIDIAN ON JANUARY 1, 4713 B.C. THE ".8....:." NUMBER OF DAYS ELAPSED SINCE THEN IS".H....:." THE JULIAN DAY NUMBER OR JULIAN DATE."......:." THE MODIFIED J ULIAN DATE BEGAN AT 0.0".C....:." HOURS (UT) ON NOVEMBER 17, 1858."......:.:.:." AND SO: JD-MJD=2,400,000.5 DAYS."...". .:..5.,.." ";G(18);"HIT ANY KEY TO CONTINUE":. REV CHAR.L.6.. A$:. A$."" . 310.\.@..G(147):.:....J.." PRESS <1> I F YOU WISH TO CONVERT"...T..:.:." FROM CALENDAR DATE TO JULIAN DATE.".D.^..:.:. :.:....H.." PRESS <2> IF YOU WISH TO CO NVERT".. R..:.:." FROM JULIAN DATE TO C ALENDAR DATE.".7 |.. NN$:. NN$."" . 380. W ... NN$.."1" . NN$.."2" . 380.K ... NN $."2" . 600.. ...G(147):.:." ENTER YEARS BC AS NEGATIVE YEARS.".. ...:." ENTER T HE YEAR";Y.. ...:." ENTER THE MONTH NUMB ER";M.. ...:." ENTER THE DAY";D.%!B.. D. 31 . D.1 . M.12 . M.1 . Y..4713 . 170.7! L.. Y.0 . Y.Y.1.V!V.. M.1 . M.2 . Y.Y.1: M.M.12.I!... Y.1582 . 500.W!..B.0:. 520. .!..A..(Y.100)..!..B.2.A..(A.4)..!..C..( 365.25.Y)..!..E..(30.6001.(M.1)).Y!..JD. B.C.E.D.1720994.5..!&..:.:.:.:.:..."0.." JULIAN DATE : ";JD..":.MJ.JD.2400000.5. >"D..:.:." MODIFIED JULIAN DATE : ";MJ.H "N..:.:..X"X..G(147):.:..."B.." PRESS < 1> IF YOU WISH TO ENTER". "L..:.:." NOR MAL JULIAN DATE".R"V..:.:.:.:.:." PRESS <2> IF YOU WISH TO ENTER".."...:.:." M ODIFIED JULIAN DATE"..#... AB$:. AB$."" . 650.-#... AB$.."1" . AB$.."2" . 650.?# ...G(147):.:.:..O#... AB$."2" . ."INPUT MODIFIED JULIAN DATE :"..#... AB$."1" . ."INPUT JULIAN DATE :"..#...:...#F.. JD. G#P.. AB$."2" . JD.JD.2400000.5.Y#Z.AX.( JD.1.5).7..#..BX..((AX..(AX)).7.0.5).1.. $..JD.JD.0.5..$..I..(JD)..$..F.JD.I.'$.. A.I:B.0.E$... I.2299160 . A..((I.1867216 .25).36524.25):B.I.1.A..(A.4).R$ .C.B.15 24..$*.D..((C.122.1).365.25)..$4.E..(365 .25.D)..$>.G..((C.E).30.6001).O$H.DD.C.E .F..(30.6001.G)..$R.MM.G.13..$\.. G.13.5 . MM.G.1..$F.YY.D.4716..%P.. MM.2.5 . Y Y.D.4715."%Z..:.:..F%... " THE CAL ENDAR DATE IS".L%....R%... " ";MO$(MM); DD;", ";YY,DA$(BX)...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL