JULIAN DAY
FILE INFORMATION
FILENAME(S): JULIAN DAY
FILE TYPE(S): PRG
FILE SIZE: 1.7K
FIRST SEEN: 2025-11-02 16:39:17
APPEARS ON: 2 disk(s)
FILE HASH
4e68fd289b48c5b44c87cc2a6d1f14f07effdb6ac5a95bbcdb8a64c4c2e4238d
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PD DISK NR | JULIAN DAY | PRG | Treasure Chest - Plattfuss | 8 | 5 | DOWNLOAD FILE |
| PD DISK NR | JULIAN DAY | PRG | Treasure Chest - Plattfuss | 8 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 0A 00 97 35 33 32 38 30 2C 39 3A 97 |.......53280,9:.|
00000010: 35 33 32 38 31 2C 39 3A 97 36 34 36 2C 33 00 27 |53281,9:.646,3.'|
00000020: 08 14 00 99 22 93 22 00 35 08 1E 00 99 20 3A 20 |....".".5.... : |
00000030: 99 20 3A 20 99 00 56 08 28 00 99 20 A3 31 30 29 |. : ..V.(.. .10)|
00000040: 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |"---------------|
00000050: 2D 2D 2D 2D 2D 22 00 78 08 32 00 99 20 A3 31 30 |-----".x.2.. .10|
00000060: 29 20 22 49 20 20 20 4A 55 4C 49 41 4E 20 44 41 |) "I JULIAN DA|
00000070: 59 20 20 20 20 20 49 22 00 9A 08 3C 00 99 20 A3 |Y I"...<.. .|
00000080: 31 30 29 20 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |10) "-----------|
00000090: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 A8 08 46 00 99 |---------"...F..|
000000A0: 20 3A 20 99 20 3A 20 99 00 C9 08 50 00 99 20 A3 | : . : ....P.. .|
000000B0: 31 30 29 22 41 4E 20 41 53 54 52 4F 4E 4F 4D 59 |10)"AN ASTRONOMY|
000000C0: 20 50 52 4F 47 52 41 4D 22 00 EF 08 5A 00 99 3A | PROGRAM"...Z..:|
000000D0: 99 20 A3 38 29 22 42 59 20 45 52 49 43 20 42 55 |. .8)"BY ERIC BU|
000000E0: 52 47 45 53 53 20 46 2E 52 2E 41 2E 53 2E 22 00 |RGESS F.R.A.S.".|
000000F0: F9 08 64 00 99 3A 99 3A 99 00 1C 09 6E 00 99 20 |..d..:.:....n.. |
00000100: A3 20 38 29 22 41 4C 4C 20 52 49 47 48 54 53 20 |. 8)"ALL RIGHTS |
00000110: 52 45 53 45 52 56 45 44 20 42 59 22 00 3F 09 78 |RESERVED BY".?.x|
00000120: 00 99 20 A3 20 38 29 22 53 20 26 20 54 20 53 4F |.. . 8)"S & T SO|
00000130: 46 54 57 41 52 45 20 53 45 52 56 49 43 45 22 00 |FTWARE SERVICE".|
00000140: 49 09 82 00 99 3A 99 3A 99 00 7A 09 8C 00 99 20 |I....:.:..z.... |
00000150: A3 20 31 29 22 54 48 49 53 20 50 52 4F 47 52 41 |. 1)"THIS PROGRA|
00000160: 4D 20 50 52 4F 56 49 44 45 53 20 54 48 45 20 4A |M PROVIDES THE J|
00000170: 55 4C 49 41 4E 20 44 41 59 22 00 A7 09 96 00 99 |ULIAN DAY"......|
00000180: 20 A3 20 33 29 22 46 4F 52 20 41 20 43 41 4C 45 | . 3)"FOR A CALE|
00000190: 4E 44 41 52 20 44 41 54 45 20 31 31 30 30 20 54 |NDAR DATE 1100 T|
000001A0: 4F 20 32 32 30 30 22 00 BE 09 A0 00 81 20 4B 20 |O 2200"...... K |
000001B0: B2 20 31 20 A4 20 35 30 30 30 3A 82 20 4B 00 DB |. 1 . 5000:. K..|
000001C0: 09 A5 00 97 35 33 32 38 30 2C 39 3A 97 35 33 32 |....53280,9:.532|
000001D0: 38 31 2C 39 3A 97 36 34 36 2C 31 00 EA 09 AA 00 |81,9:.646,1.....|
000001E0: 99 22 93 22 3A 99 3A 99 3A 99 00 FE 09 B4 00 85 |.".":.:.:.......|
000001F0: 20 22 20 20 20 59 45 41 52 20 22 3B 59 31 00 04 | " YEAR ";Y1..|
00000200: 0A BE 00 99 00 1A 0A C8 00 8B 20 59 31 B3 30 A7 |.......... Y1.0.|
00000210: 20 59 31 B2 59 31 AB 31 30 30 00 28 0A D2 00 59 | Y1.Y1.100.(...Y|
00000220: B2 59 31 AB 31 39 30 30 00 3D 0A DC 00 85 20 22 |.Y1.1900.=.... "|
00000230: 20 20 20 4D 4F 4E 54 48 20 22 3B 4D 31 00 43 0A | MONTH ";M1.C.|
00000240: E6 00 99 00 56 0A F0 00 85 20 22 20 20 20 44 41 |....V.... " DA|
00000250: 59 20 22 3B 44 31 00 60 0A FA 00 99 3A 99 3A 99 |Y ";D1.`....:.:.|
00000260: 00 6C 0A 04 01 4D 32 B2 4D 31 AB 31 00 81 0A 09 |.l...M2.M1.1....|
00000270: 01 8B 20 4D 32 20 B2 30 20 A7 20 44 59 20 B2 20 |.. M2 .0 . DY . |
00000280: 30 00 97 0A 0E 01 8B 20 4D 32 20 B2 31 20 A7 20 |0...... M2 .1 . |
00000290: 44 59 20 B2 20 33 31 00 AD 0A 18 01 8B 20 4D 32 |DY . 31...... M2|
000002A0: 20 B2 32 20 A7 20 44 59 20 B2 20 35 39 00 C3 0A | .2 . DY . 59...|
000002B0: 22 01 8B 20 4D 32 20 B2 33 20 A7 20 44 59 20 B2 |".. M2 .3 . DY .|
000002C0: 20 39 30 00 DA 0A 2C 01 8B 20 4D 32 20 B2 34 20 | 90...,.. M2 .4 |
000002D0: A7 20 44 59 20 B2 20 31 32 30 00 F1 0A 36 01 8B |. DY . 120...6..|
000002E0: 20 4D 32 20 B2 35 20 A7 20 44 59 20 B2 20 31 35 | M2 .5 . DY . 15|
000002F0: 31 00 08 0B 40 01 8B 20 4D 32 20 B2 36 20 A7 20 |1...@.. M2 .6 . |
00000300: 44 59 20 B2 20 31 38 31 00 1F 0B 4A 01 8B 20 4D |DY . 181...J.. M|
00000310: 32 20 B2 37 20 A7 20 44 59 20 B2 20 32 31 32 00 |2 .7 . DY . 212.|
00000320: 36 0B 54 01 8B 20 4D 32 20 B2 38 20 A7 20 44 59 |6.T.. M2 .8 . DY|
00000330: 20 B2 20 32 34 33 00 4D 0B 5E 01 8B 20 4D 32 20 | . 243.M.^.. M2 |
00000340: B2 39 20 A7 20 44 59 20 B2 20 32 37 33 00 64 0B |.9 . DY . 273.d.|
00000350: 68 01 8B 20 4D 32 B2 31 30 20 A7 20 44 59 20 B2 |h.. M2.10 . DY .|
00000360: 20 33 30 34 00 7B 0B 72 01 8B 20 4D 32 B2 31 31 | 304.{.r.. M2.11|
00000370: 20 A7 20 44 59 20 B2 20 33 33 34 00 88 0B 7C 01 | . DY . 334...|.|
00000380: 44 33 B2 44 31 AA 44 59 00 9E 0B 86 01 44 34 B2 |D3.D1.DY.....D4.|
00000390: 33 36 35 AC 59 AA 20 B5 20 28 59 AD 34 29 00 B7 |365.Y. . (Y.4)..|
000003A0: 0B 90 01 8B 20 59 31 20 B1 31 39 39 39 20 A7 20 |.... Y1 .1999 . |
000003B0: 44 34 B2 44 34 AB 32 00 CE 0B 9A 01 44 35 B2 31 |D4.D4.2.....D5.1|
000003C0: 35 30 32 30 AA B5 20 28 44 34 29 AA 44 33 00 D9 |5020.. (D4).D3..|
000003D0: 0B A4 01 4A 44 20 B2 44 35 00 FE 0B AE 01 8B 20 |...JD .D5...... |
000003E0: 59 AD 34 AB 20 B5 28 59 AD 34 29 B2 30 20 AF 20 |Y.4. .(Y.4).0 . |
000003F0: 4D 31 B3 33 20 A7 20 4A 44 B2 4A 44 AB 31 00 10 |M1.3 . JD.JD.1..|
00000400: 0C B8 01 4A 44 B2 4A 44 AA 32 34 30 30 30 30 30 |...JD.JD.2400000|
00000410: 00 2E 0C C2 01 4A 44 B2 4A 44 AB 20 B5 20 28 28 |.....JD.JD. . ((|
00000420: 59 31 AB 31 39 30 30 29 20 AD 31 30 30 29 00 5F |Y1.1900) .100)._|
00000430: 0C CC 01 8B 20 59 31 B3 31 35 38 33 20 A7 20 4A |.... Y1.1583 . J|
00000440: 44 20 B2 4A 44 20 AA 28 31 30 AB 20 B5 28 28 31 |D .JD .(10. .((1|
00000450: 35 38 33 AB 59 31 29 20 AD 20 31 30 30 29 29 00 |583.Y1) . 100)).|
00000460: 79 0C D6 01 8B 20 59 31 B1 31 39 39 39 20 A7 20 |y.... Y1.1999 . |
00000470: 4A 44 20 B2 4A 44 20 AA 33 00 96 0C E0 01 99 20 |JD .JD .3...... |
00000480: 22 20 20 4A 55 4C 49 41 4E 20 44 41 59 20 49 53 |" JULIAN DAY IS|
00000490: 20 20 22 3B 4A 44 00 A0 0C EA 01 99 3A 99 3A 99 | ";JD......:.:.|
000004A0: 00 CB 0C F4 01 85 20 22 20 20 44 4F 20 59 4F 55 |...... " DO YOU|
000004B0: 20 57 41 4E 54 20 41 4E 4F 54 48 45 52 20 44 41 | WANT ANOTHER DA|
000004C0: 54 45 20 59 2F 4E 20 22 3B 41 24 00 E0 0C FE 01 |TE Y/N ";A$.....|
000004D0: 8B 20 41 24 20 B2 20 22 59 22 20 A7 20 31 37 30 |. A$ . "Y" . 170|
000004E0: 00 11 0D 08 02 8B 20 41 24 20 B3 20 B1 20 22 4E |...... A$ . . "N|
000004F0: 22 20 A7 20 99 20 22 49 4E 56 41 4C 49 44 20 52 |" . . "INVALID R|
00000500: 45 53 50 4F 4E 53 45 22 3A 99 20 3A 89 20 35 30 |ESPONSE":. :. 50|
00000510: 30 00 1A 0D 12 02 99 22 93 22 00 44 0D 1C 02 99 |0......".".D....|
00000520: 22 20 20 20 20 20 12 20 20 20 20 20 20 20 20 20 |" . |
00000530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000540: 20 20 92 22 00 6E 0D 26 02 99 22 20 20 20 20 20 | .".n.&.." |
00000550: 12 20 20 44 49 45 53 45 53 20 50 52 4F 47 52 41 |. DIESES PROGRA|
00000560: 4D 4D 20 49 53 54 20 41 55 53 20 20 92 22 00 98 |MM IST AUS ."..|
00000570: 0D 30 02 99 22 20 20 20 20 20 12 20 20 44 45 4D |.0.." . DEM|
00000580: 20 42 55 43 48 20 43 45 4C 45 53 54 49 41 4C 20 | BUCH CELESTIAL |
00000590: 42 41 53 49 43 20 92 22 00 C2 0D 3A 02 99 22 20 |BASIC ."...:.." |
000005A0: 20 20 20 20 12 20 20 53 45 49 54 45 20 32 39 20 | . SEITE 29 |
000005B0: 2D 20 33 31 20 20 28 20 4A 55 4C 44 59 20 29 20 |- 31 ( JULDY ) |
000005C0: 92 22 00 EC 0D 3F 02 99 22 20 20 20 20 20 12 20 |."...?.." . |
000005D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005E0: 20 20 20 20 20 20 20 20 20 20 92 05 00 09 0E 44 | .....D|
000005F0: 02 81 20 58 B2 31 A4 20 35 30 30 30 3A 82 3A 99 |.. X.1. 5000:.:.|
00000600: 3A 99 3A 99 3A 99 22 93 22 00 33 0E 4E 02 99 22 |:.:.:.".".3.N.."|
00000610: 20 20 20 20 20 12 20 20 20 20 20 20 20 20 20 20 | . |
00000620: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000630: 20 92 22 00 5D 0E 58 02 99 22 20 20 20 20 20 12 | .".].X.." .|
00000640: 20 20 20 54 20 20 53 20 20 43 20 20 48 20 20 55 | T S C H U|
00000650: 20 20 45 20 20 53 20 20 53 20 20 92 22 00 87 0E | E S S ."...|
00000660: 62 02 99 22 20 20 20 20 20 12 20 20 20 20 20 20 |b.." . |
00000670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000680: 20 20 20 20 20 92 22 00 9D 0E 6C 02 81 20 5A B2 | ."...l.. Z.|
00000690: 31 A4 33 39 30 30 3A 82 3A 99 22 93 22 00 00 00 |1.3900:.:."."...|
.......53280,9:.53281,9:.646,3.'....".".
5.... : . : ..V.(.. .10)"---------------
-----".X.2.. .10) "I JULIAN DAY I"
...<.. .10) "--------------------"...F..
: . : ..I.P.. .10)"AN ASTRONOMY PROGRAM
"...Z..:. .8)"BY ERIC BURGESS F.R.A.S.".
..D..:.:....N.. . 8)"ALL RIGHTS RESERVED
BY".?.X.. . 8)"S & T SOFTWARE SERVICE".
I....:.:..Z.... . 1)"THIS PROGRAM PROVID
ES THE JULIAN DAY"...... . 3)"FOR A CALE
NDAR DATE 1100 TO 2200"... .. K . 1 . 50
00:. K......53280,9:.53281,9:.646,1.....
.".":.:.:....... " YEAR ";Y1.........H
.. Y1.0. Y1.Y1.100.(.R.Y.Y1.1900.=.... "
MONTH ";M1.C.....V.... " DAY ";D1.`
....:.:..L...M2.M1.1...... M2 .0 . DY .
0...... M2 .1 . DY . 31...... M2 .2 . DY
. 59.C.".. M2 .3 . DY . 90.Z.,.. M2 .4
. DY . 120...6.. M2 .5 . DY . 151...@..
M2 .6 . DY . 181...J.. M2 .7 . DY . 212.
6.T.. M2 .8 . DY . 243.M.^.. M2 .9 . DY
. 273.D.H.. M2.10 . DY . 304.{.R.. M2.11
. DY . 334...|.D3.D1.DY.....D4.365.Y. .
(Y.4)...... Y1 .1999 . D4.D4.2.N...D5.1
5020.. (D4).D3.Y...JD .D5...... Y.4. .(Y
.4).0 . M1.3 . JD.JD.1.....JD.JD.2400000
...B.JD.JD. . ((Y1.1900) .100)._.L.. Y1.
1583 . JD .JD .(10. .((1583.Y1) . 100)).
Y.V.. Y1.1999 . JD .JD .3...... " JULIA
N DAY IS ";JD. ....:.:..K.... " DO YOU
WANT ANOTHER DATE Y/N ";A$...... A$ . "
Y" . 170...... A$ . . "N" . . "INVALID R
ESPONSE":. :. 500......".".D...." .
.".N.&.."
. DIESES PROGRAMM IST AUS ."...0.."
. DEM BUCH CELESTIAL BASIC .".B.:.."
. SEITE 29 - 31 ( JULDY ) ."...?..
" . .....D
.. X.1. 5000:.:.:.:.:.".".3.N.." .
.".].X.." .
T S C H U E S S ."...B.."
. ."...L.. Z.
1.3900:.:."."...
> CLICK IMAGE PREVIEW FOR FULL MODAL