KALENDER
FILE INFORMATION
FILENAME(S): KALENDER
FILE TYPE(S): PRG
FILE SIZE: 1.5K
FIRST SEEN: 2025-10-20 14:30:08
APPEARS ON: 3 disk(s)
FILE HASH
c974290bd93a68ca4b0c35c8aaee5e4d5cb7d18daffdc843712a46e84a4cc069
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 1 | KALENDER | PRG | Treasure Chest - Klaus Der Suhler | 17 | 1 | DOWNLOAD FILE |
| HEIKO M | KALENDER | PRG | Treasure Chest - Klaus Der Suhler | 17 | 1 | DOWNLOAD FILE |
| FREESOFT DISK NR | KALENDER | PRG | Treasure Chest - Wolfgang Rauprich | 6 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3C 08 0A 00 97 35 33 32 37 32 2C 32 31 3A |..<....53272,21:| 00000010: 97 35 33 32 38 30 2C 31 3A 97 35 33 32 38 31 2C |.53280,1:.53281,| 00000020: 31 3A 8F 20 20 20 20 20 43 36 34 20 4D 4F 44 53 |1:. C64 MODS| 00000030: 20 31 39 38 33 20 42 59 20 57 49 4D 00 69 08 14 | 1983 BY WIM.i..| 00000040: 00 8F 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 |.. THIS PROGRAM | 00000050: 57 41 53 20 57 52 49 54 54 45 4E 20 42 59 20 4A |WAS WRITTEN BY J| 00000060: 2E 52 20 52 4F 53 53 55 4D 00 9D 08 1E 00 8F 20 |.R ROSSUM...... | 00000070: 53 55 47 47 45 53 54 45 44 20 42 59 20 27 4A 55 |SUGGESTED BY 'JU| 00000080: 4C 49 41 4E 27 20 49 4E 20 54 48 45 20 48 50 20 |LIAN' IN THE HP | 00000090: 42 41 53 49 43 20 4C 49 42 52 41 52 59 00 B4 08 |BASIC LIBRARY...| 000000A0: 28 00 8F 20 52 45 56 49 53 45 44 20 4F 43 54 20 |(.. REVISED OCT | 000000B0: 31 39 37 39 00 E2 08 32 00 99 22 93 90 11 11 11 |1979...2..".....| 000000C0: 11 11 1D 1D 1D 50 52 4F 47 52 41 4D 20 54 4F 20 |.....PROGRAM TO | 000000D0: 47 45 4E 45 52 41 54 45 20 43 41 4C 45 4E 44 45 |GENERATE CALENDE| 000000E0: 52 22 00 04 09 3C 00 99 3A 99 22 20 20 20 20 20 |R"...<..:." | 000000F0: 20 20 20 20 20 46 4F 52 20 41 4E 59 20 4D 4F 4E | FOR ANY MON| 00000100: 54 48 20 22 00 2E 09 46 00 99 3A 99 20 22 20 20 |TH "...F..:. " | 00000110: 20 20 20 20 53 49 4E 43 45 20 54 48 45 20 42 49 | SINCE THE BI| 00000120: 52 54 48 20 4F 46 20 43 48 52 49 53 54 22 00 43 |RTH OF CHRIST".C| 00000130: 09 50 00 9C 3A 86 20 4D 24 28 32 34 29 3A 54 30 |.P..:. M$(24):T0| 00000140: B2 54 49 00 83 09 5A 00 99 3A 99 22 54 59 50 45 |.TI...Z..:."TYPE| 00000150: 20 41 4C 4C 20 46 4F 55 52 20 44 49 47 49 54 53 | ALL FOUR DIGITS| 00000160: 20 4F 46 20 44 45 53 49 52 45 44 20 59 45 41 52 | OF DESIRED YEAR| 00000170: 22 3A 99 3A 85 22 20 20 20 20 20 20 20 20 20 20 |":.:." | 00000180: 22 3B 47 00 98 09 64 00 85 22 4D 4F 4E 54 48 28 |";G...d.."MONTH(| 00000190: 31 2D 31 32 29 22 3B 4D 00 AB 09 6E 00 8B 20 47 |1-12)";M...n.. G| 000001A0: B3 31 39 30 30 20 A7 20 31 38 30 00 BE 09 78 00 |.1900 . 180...x.| 000001B0: 44 B2 28 47 AB 31 39 30 30 29 AC 33 36 35 00 D1 |D.(G.1900).365..| 000001C0: 09 82 00 81 20 51 B2 31 39 30 31 20 A4 20 47 AB |.... Q.1901 . G.| 000001D0: 31 00 EA 09 8C 00 8B 20 51 AD 34 B2 B5 28 51 AD |1...... Q.4..(Q.| 000001E0: 34 29 20 A7 20 44 B2 44 AA 31 00 F0 09 96 00 82 |4) . D.D.1......| 000001F0: 00 FA 09 A0 00 44 B2 44 AA 32 00 04 0A AA 00 89 |.....D.D.2......| 00000200: 20 32 36 30 00 3F 0A B4 00 99 20 22 93 11 11 11 | 260.?.... "....| 00000210: 11 11 11 11 11 11 59 4F 55 20 57 49 4C 4C 20 48 |......YOU WILL H| 00000220: 41 56 45 20 54 4F 20 57 41 49 54 20 41 20 42 49 |AVE TO WAIT A BI| 00000230: 54 20 46 4F 52 20 54 48 41 54 20 4F 4E 45 22 00 |T FOR THAT ONE".| 00000240: 4B 0A BE 00 44 B2 47 AC 33 36 35 00 5B 0A C8 00 |K...D.G.365.[...| 00000250: 81 20 51 B2 31 20 A4 20 47 AB 31 00 76 0A D2 00 |. Q.1 . G.1.v...| 00000260: 8B 20 51 AD 34 30 30 B2 B5 28 51 AD 34 30 30 29 |. Q.400..(Q.400)| 00000270: 20 A7 20 32 33 30 00 90 0A DC 00 8B 20 51 AD 31 | . 230...... Q.1| 00000280: 30 30 B2 B5 28 51 AD 31 30 30 29 A7 20 32 34 30 |00..(Q.100). 240| 00000290: 00 A9 0A E6 00 8B 20 51 AD 34 B2 B5 28 51 AD 34 |...... Q.4..(Q.4| 000002A0: 29 20 A7 20 44 B2 44 AA 31 00 AF 0A F0 00 82 00 |) . D.D.1.......| 000002B0: B9 0A FA 00 44 B2 44 AA 31 00 E2 0A 04 01 99 22 |....D.D.1......"| 000002C0: 93 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 000002D0: 1D 1D 4A 55 4C 49 41 4E 20 43 41 4C 45 4E 44 41 |..JULIAN CALENDA| 000002E0: 52 22 00 FB 0A 0E 01 81 20 4A B2 31 20 A4 20 32 |R"...... J.1 . 2| 000002F0: 34 3A 87 20 4D 24 28 4A 29 3A 82 00 11 0B 18 01 |4:. M$(J):......| 00000300: 81 20 4A B2 31 A4 37 3A 87 20 44 24 28 4A 29 3A |. J.1.7:. D$(J):| 00000310: 82 00 26 0B 22 01 99 20 4D 24 28 32 AC 4D AB 31 |..&.".. M$(2.M.1| 00000320: 29 A3 33 35 29 47 00 50 0B 2C 01 99 3A 99 3A 81 |).35)G.P.,..:.:.| 00000330: 20 4A B2 31 20 A4 20 37 3A 99 20 A3 36 AC 28 4A | J.1 . 7:. .6.(J| 00000340: 29 AB 36 29 44 24 28 4A 29 3B 22 20 22 3B 3A 82 |).6)D$(J);" ";:.| 00000350: 00 6A 0B 36 01 8B 20 47 AD 34 30 30 B2 B5 28 47 |.j.6.. G.400..(G| 00000360: AD 34 30 30 29 A7 20 33 33 30 00 85 0B 40 01 8B |.400). 330...@..| 00000370: 20 47 AD 31 30 30 B2 B5 28 47 AD 31 30 30 29 20 | G.100..(G.100) | 00000380: A7 20 33 34 30 00 A3 0B 4A 01 8B 20 47 AD 34 B2 |. 340...J.. G.4.| 00000390: B5 28 47 AD 34 29 20 A7 20 4D 24 28 34 29 B2 22 |.(G.4) . M$(4)."| 000003A0: 32 39 22 00 CA 0B 54 01 81 20 4A B2 32 20 A4 20 |29"...T.. J.2 . | 000003B0: 32 AC 4D AB 32 20 A9 20 32 3A 53 31 B2 53 31 AA |2.M.2 . 2:S1.S1.| 000003C0: C5 28 4D 24 28 4A 29 29 3A 82 00 DB 0B 5E 01 8B |.(M$(J)):....^..| 000003D0: 20 4D B2 31 20 A7 20 53 31 B2 30 00 F4 0B 68 01 | M.1 . S1.0...h.| 000003E0: 53 B2 53 31 AA 44 AB 37 AC B5 28 28 53 31 AA 44 |S.S1.D.7..((S1.D| 000003F0: 29 AD 37 29 00 05 0C 72 01 56 B2 C5 28 4D 24 28 |).7)...r.V..(M$(| 00000400: 32 AC 4D 29 29 00 1D 0C 7C 01 53 B2 53 AA 37 3A |2.M))...|.S.S.7:| 00000410: 8B 20 53 B1 37 20 A7 20 53 B2 53 AB 37 00 31 0C |. S.7 . S.S.7.1.| 00000420: 86 01 54 B2 31 AA 36 AC 28 53 AB 31 29 3A 55 B2 |..T.1.6.(S.1):U.| 00000430: 35 00 3F 0C 90 01 99 3A 99 A3 54 AB 31 29 3B 00 |5.?....:..T.1);.| 00000440: 50 0C 9A 01 8B 20 54 B2 33 37 20 A7 20 34 33 30 |P.... T.37 . 430| 00000450: 00 60 0C A4 01 81 44 B2 31 A4 56 3A 89 34 34 30 |.`....D.1.V:.440| 00000460: 00 70 0C AE 01 99 20 31 3A 81 20 44 B2 32 A4 56 |.p.... 1:. D.2.V| 00000470: 00 85 0C B8 01 99 20 44 3B A6 55 AB C3 28 C4 28 |...... D;.U..(.(| 00000480: 44 29 29 29 3B 00 99 0C C2 01 8B 20 B9 28 30 29 |D)));...... .(0)| 00000490: B1 33 34 20 A7 20 55 B2 33 00 AD 0C CC 01 8B 20 |.34 . U.3...... | 000004A0: B9 28 30 29 B3 33 34 20 A7 20 55 B2 35 00 B3 0C |.(0).34 . U.5...| 000004B0: D6 01 82 00 E6 0C E0 01 99 3A 99 3A 99 3A 99 20 |.........:.:.:. | 000004C0: A3 31 30 29 22 54 49 4D 45 3D 22 B5 28 28 54 49 |.10)"TIME=".((TI| 000004D0: AB 54 30 29 AD 33 36 29 AD 31 30 30 20 22 4D 49 |.T0).36).100 "MI| 000004E0: 4E 55 54 45 53 22 00 FB 0C EA 01 99 3A 85 20 22 |NUTES"......:. "| 000004F0: 41 4E 4F 54 48 45 52 22 3B 4B 24 00 12 0D F4 01 |ANOTHER";K$.....| 00000500: 8B 20 C8 28 4B 24 2C 31 29 B2 22 59 22 20 A7 20 |. .(K$,1)."Y" . | 00000510: 38 30 00 28 0D FE 01 8B 20 C8 28 4B 24 2C 31 29 |80.(.... .(K$,1)| 00000520: B2 22 4E 22 20 A7 20 80 00 32 0D 08 02 89 20 34 |."N" . ..2.... 4| 00000530: 39 30 00 77 0D 12 02 83 20 4A 41 4E 55 41 52 59 |90.w.... JANUARY| 00000540: 2C 33 31 2C 46 45 42 55 41 52 59 2C 32 38 2C 4D |,31,FEBUARY,28,M| 00000550: 41 52 43 48 2C 33 31 2C 41 50 52 49 4C 2C 33 30 |ARCH,31,APRIL,30| 00000560: 2C 4D 41 59 2C 33 31 2C 4A 55 4E 45 2C 33 30 2C |,MAY,31,JUNE,30,| 00000570: 4A 55 4C 59 2C 33 31 00 B7 0D 1C 02 83 20 41 55 |JULY,31...... AU| 00000580: 47 55 53 54 2C 33 31 2C 53 45 50 54 45 4D 42 45 |GUST,31,SEPTEMBE| 00000590: 52 2C 33 30 2C 4F 43 54 4F 42 45 52 2C 33 31 2C |R,30,OCTOBER,31,| 000005A0: 4E 4F 56 45 4D 42 45 52 2C 33 30 2C 44 45 43 45 |NOVEMBER,30,DECE| 000005B0: 4D 42 45 52 2C 33 31 00 DD 0D 26 02 83 20 53 55 |MBER,31...&.. SU| 000005C0: 4E 2C 4D 4F 4E 2C 54 55 45 2C 57 45 44 2C 54 48 |N,MON,TUE,WED,TH| 000005D0: 55 2C 46 52 49 2C 53 41 54 2C 53 55 4E 00 00 00 |U,FRI,SAT,SUN...|
..<....53272,21:.53280,1:.53281,1:.
C64 MODS 1983 BY WIM.I.... THIS PROGRAM
WAS WRITTEN BY J.R ROSSUM...... SUGGESTE
D BY 'JULIAN' IN THE HP BASIC LIBRARY...
(.. REVISED OCT 1979...2.."..........PRO
GRAM TO GENERATE CALENDER"...<..:."
FOR ANY MONTH "...F..:. " SINC
E THE BIRTH OF CHRIST".C.P..:. M$(24):T0
.TI...Z..:."TYPE ALL FOUR DIGITS OF DESI
RED YEAR":.:." ";G...D.."MONTH(
1-12)";M...N.. G.1900 . 180...X.D.(G.190
0).365.Q.... Q.1901 . G.1...... Q.4..(Q.
4) . D.D.1......... .D.D.2...... 260.?..
.. "..........YOU WILL HAVE TO WAIT A BI
T FOR THAT ONE".K...D.G.365.[.H.. Q.1 .
G.1.V.R.. Q.400..(Q.400) . 230...... Q.1
00..(Q.100). 240...... Q.4..(Q.4) . D.D.
1...........D.D.1......"................
..JULIAN CALENDAR"...... J.1 . 24:. M$(J
):....... J.1.7:. D$(J):..&.".. M$(2.M.1
).35)G.P.,..:.:. J.1 . 7:. .6.(J).6)D$(J
);" ";:..J.6.. G.400..(G.400). 330...@..
G.100..(G.100) . 340...J.. G.4..(G.4) .
M$(4)."29".J.T.. J.2 . 2.M.2 . 2:S1.S1.
E(M$(J)):....^.. M.1 . S1.0...H.S.S1.D.7
..((S1.D).7)...R.V.E(M$(2.M))...|.S.S.7:
. S.7 . S.S.7.1...T.1.6.(S.1):U.5.?....:
..T.1);.P.... T.37 . 430.`....D.1.V:.440
.P.... 1:. D.2.V...... D;.U.C(D(D)));...
B.. .(0).34 . U.3...L.. .(0).34 . U.5...
V........:.:.:. .10)"TIME=".((TI.T0).36)
.100 "MINUTES"......:. "ANOTHER";K$.....
. H(K$,1)."Y" . 80.(.... H(K$,1)."N" . .
.2.... 490.W.... JANUARY,31,FEBUARY,28,M
ARCH,31,APRIL,30,MAY,31,JUNE,30,JULY,31.
..... AUGUST,31,SEPTEMBER,30,OCTOBER,31,
NOVEMBER,30,DECEMBER,31...&.. SUN,MON,TU
E,WED,THU,FRI,SAT,SUN...
> CLICK IMAGE PREVIEW FOR FULL MODAL