READOUT RTC64
FILE INFORMATION
FILENAME(S): READOUT RTC64
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-10-20 14:30:51
APPEARS ON: 1 disk(s)
FILE HASH
55833cb99bcf7ad6ace1f2b6c82fb566a8fa32c8ab78d78db46654dc514abcd6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RTC64 PROGRAMME | READOUT RTC64 | PRG | Treasure Chest - Klaus Der Suhler | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 15 08 64 00 8F 20 52 45 41 44 4F 55 54 20 |....d.. READOUT | 00000010: 52 54 43 36 34 00 3A 08 6E 00 8F 20 28 43 29 20 |RTC64.:.n.. (C) | 00000020: 31 39 39 30 20 42 59 20 4A 45 4E 53 2D 4D 49 43 |1990 BY JENS-MIC| 00000030: 48 41 45 4C 20 47 52 4F 53 53 00 4F 08 78 00 8F |HAEL GROSS.O.x..| 00000040: 20 31 30 30 30 20 42 45 52 4C 49 4E 20 32 37 00 | 1000 BERLIN 27.| 00000050: 69 08 82 00 8F 20 4E 45 48 45 49 4D 45 52 20 53 |i.... NEHEIMER S| 00000060: 54 52 41 53 53 45 20 34 37 00 7F 08 8C 00 8F 20 |TRASSE 47...... | 00000070: 28 30 33 30 29 20 34 33 32 20 39 37 20 32 32 00 |(030) 432 97 22.| 00000080: 85 08 96 00 8F 00 A9 08 A0 00 8F 20 41 43 48 54 |........... ACHT| 00000090: 55 4E 47 21 20 42 45 49 20 55 4E 54 45 52 42 52 |UNG! BEI UNTERBR| 000000A0: 45 43 48 45 4E 20 44 45 53 00 CC 08 AA 00 8F 20 |ECHEN DES...... | 000000B0: 50 52 4F 47 52 41 4D 4D 53 20 57 49 52 44 20 44 |PROGRAMMS WIRD D| 000000C0: 49 45 20 55 48 52 20 4E 49 43 48 54 00 EF 08 B4 |IE UHR NICHT....| 000000D0: 00 8F 20 41 42 47 45 53 43 48 41 4C 54 45 54 2E |.. ABGESCHALTET.| 000000E0: 20 5A 55 4D 20 41 42 53 43 48 41 4C 54 45 4E 00 | ZUM ABSCHALTEN.| 000000F0: 13 09 BE 00 8F 20 4D 55 53 53 20 27 50 4F 4B 45 |..... MUSS 'POKE| 00000100: 20 53 44 2C 32 35 35 27 20 45 49 4E 47 45 47 45 | SD,255' EINGEGE| 00000110: 42 45 4E 00 20 09 C8 00 8F 20 57 45 52 44 45 4E |BEN. .... WERDEN| 00000120: 00 26 09 D2 00 8F 00 2C 09 DC 00 8F 00 4E 09 F0 |.&.....,.....N..| 00000130: 00 43 32 B2 35 36 35 37 36 20 3A 8F 20 42 41 53 |.C2.56576 :. BAS| 00000140: 49 53 41 44 52 45 53 53 45 20 43 49 41 32 00 91 |ISADRESSE CIA2..| 00000150: 09 FA 00 50 42 B2 43 32 AA 31 20 20 3A 8F 20 41 |...PB.C2.1 :. A| 00000160: 44 52 45 53 53 45 20 50 4F 52 54 20 42 20 20 20 |DRESSE PORT B | 00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000180: 20 20 20 20 20 20 20 28 55 53 45 52 50 4F 52 54 | (USERPORT| 00000190: 29 00 D9 09 04 01 44 42 B2 43 32 AA 33 20 20 3A |).....DB.C2.3 :| 000001A0: 8F 20 41 44 52 45 53 53 45 20 52 49 43 48 54 55 |. ADRESSE RICHTU| 000001B0: 4E 47 53 52 45 2D 20 20 20 20 20 20 20 20 20 20 |NGSRE- | 000001C0: 20 20 20 20 20 20 20 20 20 20 47 49 53 54 45 52 | GISTER| 000001D0: 20 55 53 45 52 50 4F 52 54 00 16 0A 18 01 53 44 | USERPORT.....SD| 000001E0: B2 43 32 AB 32 34 34 3A 8F 20 53 45 52 49 45 4C |.C2.244:. SERIEL| 000001F0: 4C 45 53 20 52 45 47 49 53 54 45 52 20 20 20 20 |LES REGISTER | 00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000210: 20 20 43 49 41 31 00 3B 0A 22 01 43 41 B2 43 32 | CIA1.;.".CA.C2| 00000220: AB 32 34 32 3A 8F 20 42 45 46 45 48 4C 53 52 45 |.242:. BEFEHLSRE| 00000230: 47 49 53 54 45 52 20 43 49 41 31 00 60 0A 36 01 |GISTER CIA1.`.6.| 00000240: 41 57 25 B2 32 AE 34 20 20 3A 8F 20 42 49 54 20 |AW%.2.4 :. BIT | 00000250: 46 55 45 52 20 41 44 52 45 53 53 57 52 49 54 45 |FUER ADRESSWRITE| 00000260: 00 83 0A 40 01 52 44 25 B2 32 AE 35 20 20 3A 8F |...@.RD%.2.5 :.| 00000270: 20 42 49 54 20 46 55 45 52 20 44 41 54 41 20 52 | BIT FUER DATA R| 00000280: 45 41 44 00 A7 0A 4A 01 57 52 25 B2 32 AE 36 20 |EAD...J.WR%.2.6 | 00000290: 20 3A 8F 20 42 49 54 20 46 55 45 52 20 44 41 54 | :. BIT FUER DAT| 000002A0: 41 20 57 52 49 54 45 00 B4 0A 5E 01 86 20 54 41 |A WRITE...^.. TA| 000002B0: 24 28 37 29 00 F6 0A A4 01 97 20 43 41 2C 36 35 |$(7)...... CA,65| 000002C0: 3A 8F 20 53 45 52 49 45 4C 4C 45 53 20 52 45 47 |:. SERIELLES REG| 000002D0: 49 53 54 45 52 20 20 20 20 20 20 20 20 20 20 20 |ISTER | 000002E0: 20 20 20 20 20 20 20 20 20 20 20 41 55 46 20 41 | AUF A| 000002F0: 55 53 47 41 42 45 00 3E 0B AE 01 97 20 53 44 2C |USGABE.>.... SD,| 00000300: 30 3A 8F 20 4E 41 43 48 20 31 2F 36 30 20 53 45 |0:. NACH 1/60 SE| 00000310: 4B 55 4E 44 45 20 49 53 54 20 20 20 20 20 20 20 |KUNDE IST | 00000320: 20 20 20 20 20 20 20 20 20 20 20 20 44 49 45 20 | DIE | 00000330: 55 48 52 20 53 45 4C 45 4B 54 49 45 52 54 00 8B |UHR SELEKTIERT..| 00000340: 0B B3 01 3A 20 20 20 20 20 20 20 20 3A 8F 20 41 |...: :. A| 00000350: 42 53 43 48 41 4C 54 55 4E 47 20 4D 49 54 20 32 |BSCHALTUNG MIT 2| 00000360: 35 35 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 |55; | 00000370: 20 20 20 20 20 20 20 55 4D 53 43 48 41 4C 54 55 | UMSCHALTU| 00000380: 4E 47 20 4E 55 52 20 41 4C 4C 45 00 CC 0B B4 01 |NG NUR ALLE.....| 00000390: 3A 20 20 20 20 20 20 20 20 3A 8F 20 31 2F 38 20 |: :. 1/8 | 000003A0: 53 45 4B 55 4E 44 45 20 4D 4F 45 47 4C 49 43 48 |SEKUNDE MOEGLICH| 000003B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000003C0: 20 20 20 20 49 4E 20 42 41 53 49 43 00 E4 0B B8 | IN BASIC....| 000003D0: 01 8D 32 30 30 30 3A 8F 20 49 4E 49 54 2D 46 45 |..2000:. INIT-FE| 000003E0: 4C 44 45 52 00 FB 0B C2 01 99 22 13 11 11 11 11 |LDER......".....| 000003F0: 11 11 11 11 11 11 22 A3 36 29 3B 00 1B 0C CC 01 |......".6);.....| 00000400: 52 25 B2 36 3A 8D 31 30 30 30 3A 99 54 41 24 28 |R%.6:.1000:.TA$(| 00000410: 44 25 29 22 20 44 45 4E 20 22 3B 00 30 0C D6 01 |D%)" DEN ";.0...| 00000420: 52 25 B2 37 3A 8D 31 30 30 30 3A 54 25 B2 44 25 |R%.7:.1000:T%.D%| 00000430: 00 5F 0C E0 01 52 25 B2 38 3A 8D 31 30 30 30 3A |._...R%.8:.1000:| 00000440: 54 25 B2 54 25 AA 28 44 25 AF 37 29 AC 31 30 3A |T%.T%.(D%.7).10:| 00000450: 99 C9 28 C4 28 54 25 29 2C 32 29 22 2E 22 3B 00 |..(.(T%),2)".";.| 00000460: 74 0C EA 01 52 25 B2 39 3A 8D 31 30 30 30 3A 4D |t...R%.9:.1000:M| 00000470: 25 B2 44 25 00 A4 0C F4 01 52 25 B2 31 30 3A 8D |%.D%.....R%.10:.| 00000480: 31 30 30 30 3A 4D 25 B2 4D 25 AA 28 44 25 AF 31 |1000:M%.M%.(D%.1| 00000490: 29 AC 31 30 3A 99 C9 28 C4 28 4D 25 29 2C 32 29 |).10:..(.(M%),2)| 000004A0: 22 2E 22 3B 00 BA 0C FE 01 52 25 B2 31 31 3A 8D |".";.....R%.11:.| 000004B0: 31 30 30 30 3A 4A 25 B2 44 25 00 E2 0C 08 02 52 |1000:J%.D%.....R| 000004C0: 25 B2 31 32 3A 8D 31 30 30 30 3A 4A 25 B2 4A 25 |%.12:.1000:J%.J%| 000004D0: AA 44 25 AC 31 30 3A 99 C9 28 C4 28 4A 25 29 2C |.D%.10:..(.(J%),| 000004E0: 32 29 00 06 0D 12 02 99 22 13 11 11 11 11 11 11 |2)......".......| 000004F0: 11 11 11 11 11 11 22 A3 31 30 29 22 45 53 20 49 |......".10)"ES I| 00000500: 53 54 3A 20 22 3B 00 14 0D 1C 02 81 49 B2 35 A4 |ST: ";......I.5.| 00000510: 30 A9 AB 31 00 33 0D 26 02 52 25 B2 49 3A 8D 31 |0..1.3.&.R%.I:.1| 00000520: 30 30 30 3A 8B 49 B2 35 A7 44 25 B2 44 25 AA 38 |000:.I.5.D%.D%.8| 00000530: AF 31 35 00 44 0D 30 02 99 C9 28 C4 28 44 25 29 |.15.D.0...(.(D%)| 00000540: 2C 31 29 3B 00 57 0D 3A 02 8B 49 B2 34 B0 49 B2 |,1);.W.:..I.4.I.| 00000550: 32 A7 99 22 3A 22 3B 00 5E 0D 44 02 82 49 00 67 |2..":";.^.D..I.g| 00000560: 0D 4E 02 89 34 35 30 00 6D 0D E6 03 90 00 73 0D |.N..450.m.....s.| 00000570: E7 03 3A 00 98 0D E8 03 8F 20 2A 20 52 45 47 49 |..:...... * REGI| 00000580: 53 54 45 52 20 52 25 20 49 4E 20 44 25 20 45 49 |STER R% IN D% EI| 00000590: 4E 4C 45 53 45 4E 20 2A 00 B8 0D 06 04 97 20 44 |NLESEN *...... D| 000005A0: 42 2C 32 35 35 3A 8F 20 50 4F 52 54 20 41 55 46 |B,255:. PORT AUF| 000005B0: 20 41 55 53 47 41 42 45 00 D7 0D 10 04 97 20 50 | AUSGABE...... P| 000005C0: 42 2C 52 25 20 3A 8F 20 52 45 47 49 53 54 45 52 |B,R% :. REGISTER| 000005D0: 41 44 52 45 53 53 45 00 1A 0E 1A 04 97 20 50 42 |ADRESSE...... PB| 000005E0: 2C 52 25 B0 41 57 25 3A 8F 20 53 54 52 4F 42 45 |,R%.AW%:. STROBE| 000005F0: 20 46 55 45 52 20 20 20 20 20 20 20 20 20 20 20 | FUER | 00000600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 44 | AD| 00000610: 52 45 53 53 20 57 52 49 54 45 00 39 0E 24 04 97 |RESS WRITE.9.$..| 00000620: 20 50 42 2C 52 25 20 3A 8F 20 53 54 52 4F 42 45 | PB,R% :. STROBE| 00000630: 20 4C 4F 45 53 43 48 45 4E 00 78 0E 2E 04 97 20 | LOESCHEN.x.... | 00000640: 44 42 2C 32 34 30 3A 8F 20 44 41 54 45 4E 4C 45 |DB,240:. DATENLE| 00000650: 49 54 55 4E 47 45 4E 20 41 55 46 20 20 20 20 20 |ITUNGEN AUF | 00000660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000670: 20 45 49 4E 47 41 4E 47 00 B4 0E 38 04 97 20 50 | EINGANG...8.. P| 00000680: 42 2C 52 44 25 3A 8F 20 53 54 52 4F 42 45 20 46 |B,RD%:. STROBE F| 00000690: 55 45 52 20 44 41 54 41 20 20 20 20 20 20 20 20 |UER DATA | 000006A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000006B0: 52 45 41 44 00 D5 0E 42 04 44 25 B2 C2 28 50 42 |READ...B.D%..(PB| 000006C0: 29 AF 31 35 3A 8F 20 44 41 54 45 4E 20 45 49 4E |).15:. DATEN EIN| 000006D0: 4C 45 53 45 4E 00 DB 0E 4C 04 8E 00 E1 0E 56 04 |LESEN...L.....V.| 000006E0: 3A 00 FB 0E D0 07 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |:...... --------| 000006F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 15 0F DA 07 |-----------.....| 00000700: 8F 20 2A 20 46 45 4C 44 45 52 20 45 49 4E 4C 45 |. * FELDER EINLE| 00000710: 53 45 4E 20 2A 00 2F 0F E4 07 8F 20 2D 2D 2D 2D |SEN *./.... ----| 00000720: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.| 00000730: 35 0F EE 07 8C 00 4A 0F F8 07 81 49 B2 30 A4 36 |5.....J....I.0.6| 00000740: 3A 87 54 41 24 28 49 29 3A 82 00 7D 0F 02 08 99 |:.TA$(I):..}....| 00000750: 22 93 11 11 0E 08 20 20 2A 2A 2A 20 D2 D4 C3 20 |"..... *** ... | 00000760: 36 34 20 42 59 20 CA 45 4E 53 2D CD 49 43 48 41 |64 BY .ENS-.ICHA| 00000770: 45 4C 20 C7 52 4F 53 53 20 2A 2A 2A 22 00 83 0F |EL .ROSS ***"...| 00000780: 0C 08 8E 00 89 0F 16 08 3A 00 A2 0F 60 EA 8F 20 |........:...`.. | 00000790: 2A 2A 2A 20 57 4F 43 48 45 4E 54 41 47 45 20 2A |*** WOCHENTAGE *| 000007A0: 2A 2A 00 B5 0F 6A EA 83 20 22 20 20 20 20 4D 4F |**...j.. " MO| 000007B0: 4E 54 41 47 22 00 C8 0F 74 EA 83 20 22 20 20 44 |NTAG"...t.. " D| 000007C0: 49 45 4E 53 54 41 47 22 00 DB 0F 7E EA 83 20 22 |IENSTAG"...~.. "| 000007D0: 20 20 4D 49 54 54 57 4F 43 48 22 00 EE 0F 88 EA | MITTWOCH".....| 000007E0: 83 20 22 44 4F 4E 4E 45 52 53 54 41 47 22 00 01 |. "DONNERSTAG"..| 000007F0: 10 92 EA 83 20 22 20 20 20 46 52 45 49 54 41 47 |.... " FREITAG| 00000800: 22 00 14 10 9C EA 83 20 22 20 20 20 53 41 4D 53 |"...... " SAMS| 00000810: 54 41 47 22 00 27 10 A6 EA 83 20 22 20 20 20 53 |TAG".'.... " S| 00000820: 4F 4E 4E 54 41 47 22 00 2D 10 B0 EA 3A 00 00 00 |ONNTAG".-...:...|
....D.. READOUT RTC64.:.N.. (C) 1990 BY
JENS-MICHAEL GROSS.O.X.. 1000 BERLIN 27.
I.... NEHEIMER STRASSE 47..... (030) 43
2 97 22......... .. ACHTUNG! BEI UNTERBR
ECHEN DES.L.... PROGRAMMS WIRD DIE UHR N
ICHT...... ABGESCHALTET. ZUM ABSCHALTEN.
..... MUSS 'POKE SD,255' EINGEGEBEN. .H.
. WERDEN.&.R...,.....N...C2.56576 :. BAS
ISADRESSE CIA2.....PB.C2.1 :. ADRESSE P
ORT B (USERPORT
).Y...DB.C2.3 :. ADRESSE RICHTUNGSRE-
GISTER USERPORT.....SD
.C2.244:. SERIELLES REGISTER
CIA1.;.".CA.C2.242:. BEFEHLSRE
GISTER CIA1.`.6.AW%.2.4 :. BIT FUER ADR
ESSWRITE...@.RD%.2.5 :. BIT FUER DATA R
EAD...J.WR%.2.6 :. BIT FUER DATA WRITE.
..^.. TA$(7)...... CA,65:. SERIELLES REG
ISTER AUF AUSGABE.>
.... SD,0:. NACH 1/60 SEKUNDE IST
DIE UHR SELEKTIERT.....:
:. ABSCHALTUNG MIT 255;
UMSCHALTUNG NUR ALLE.L...:
:. 1/8 SEKUNDE MOEGLICH
IN BASIC......2000:. INIT-FELDER...B
.."...........".6);...L.R%.6:.1000:.TA$(
D%)" DEN ";.0.V.R%.7:.1000:T%.D%._...R%.
8:.1000:T%.T%.(D%.7).10:.I(D(T%),2)".";.
T...R%.9:.1000:M%.D%.....R%.10:.1000:M%.
M%.(D%.1).10:.I(D(M%),2)".";.....R%.11:.
1000:J%.D%.....R%.12:.1000:J%.J%.D%.10:.
I(D(J%),2)......".............".10)"ES I
ST: ";......I.5.0..1.3.&.R%.I:.1000:.I.5
.D%.D%.8.15.D.0..I(D(D%),1);.W.:..I.4.I.
2..":";.^.D..I.G.N..450.M.....S...:.....
. * REGISTER R% IN D% EINLESEN *...... D
B,255:. PORT AUF AUSGABE.W.... PB,R% :.
REGISTERADRESSE...... PB,R%.AW%:. STROBE
FUER ADRESS WRI
TE.9.$.. PB,R% :. STROBE LOESCHEN.X....
DB,240:. DATENLEITUNGEN AUF
EINGANG...8.. PB,RD%:. STROBE F
UER DATA READ.U.B
.D%.B(PB).15:. DATEN EINLESEN...L.....V.
:...P.. -------------------...Z.. * FELD
ER EINLESEN *./.... -------------------.
5.....J....I.0.6:.TA$(I):..}....".....
*** RTC 64 BY JENS-MICHAEL GROSS ***"...
........:...`.. *** WOCHENTAGE ***...J..
" MONTAG".H.T.. " DIENSTAG"...~.. "
MITTWOCH"...... "DONNERSTAG"...... "
FREITAG"...... " SAMSTAG".'.... " S
ONNTAG".-...:...
> CLICK IMAGE PREVIEW FOR FULL MODAL