PRG2.S4
FILE INFORMATION
FILENAME(S): PRG2.S4
FILE TYPE(S): PRG
FILE SIZE: 659b
FIRST SEEN: 2025-11-30 01:13:10
APPEARS ON: 2 disk(s)
FILE HASH
aed864f650b13856a06f8fd7881c119d36acb106e9c8f6fcfbd18da2aef4850b
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 11906 SONDERDISK | PRG2.S4 | PRG | C64er | 12 | 16 | DOWNLOAD FILE |
| 10906 SEITE B | PRG2.S4 | PRG | DuncanTwain | 12 | 16 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 15 08 64 00 9F 31 2C 38 2C 31 2C 22 50 52 |....d..1,8,1,"PR| 00000010: 47 32 2F 41 22 00 3B 08 6E 00 9E 37 AC 34 30 39 |G2/A".;.n..7.409| 00000020: 36 3A 20 20 20 20 20 3B 20 41 53 53 45 4D 42 4C |6: ; ASSEMBL| 00000030: 45 52 20 41 55 46 52 55 46 45 4E 00 62 08 78 00 |ER AUFRUFEN.b.x.| 00000040: 42 44 4F 53 20 B2 24 41 30 30 30 20 20 20 20 3B |BDOS .$A000 ;| 00000050: 20 53 54 41 52 54 41 44 52 45 53 53 45 20 42 44 | STARTADRESSE BD| 00000060: 4F 53 00 8A 08 82 00 50 52 47 20 20 B2 31 20 20 |OS.....PRG .1 | 00000070: 20 20 20 20 20 20 3B 20 46 55 45 52 20 49 4E 43 | ; FUER INC| 00000080: 4C 55 44 45 AB 44 41 54 45 49 00 AA 08 8C 00 2E |LUDE.DATEI......| 00000090: 49 43 4C 20 38 2C 22 42 44 53 2A 20 20 20 3B 20 |ICL 8,"BDS* ; | 000000A0: 53 54 52 55 4B 54 55 52 45 4E 00 CC 08 96 00 2E |STRUKTUREN......| 000000B0: 49 43 4C 20 38 2C 22 42 44 4A 2A 20 20 20 3B 20 |ICL 8,"BDJ* ; | 000000C0: 4A 55 4D 50 2D 54 41 42 45 4C 4C 45 00 DA 08 A0 |JUMP-TABELLE....| 000000D0: 00 5A 45 49 20 20 B2 24 31 38 00 FE 08 AA 00 2E |.ZEI .$18......| 000000E0: 4F 50 54 20 4F 31 20 20 20 20 20 20 20 20 3B 20 |OPT O1 ; | 000000F0: 43 4F 44 45 20 49 4E 20 46 49 4C 45 20 31 00 24 |CODE IN FILE 1.$| 00000100: 09 B4 00 AC B2 24 37 30 30 30 20 20 20 20 20 20 |.....$7000 | 00000110: 20 20 3B 20 53 54 41 52 54 41 44 52 45 53 53 45 | ; STARTADRESSE| 00000120: 20 50 52 47 00 2A 09 BE 00 3B 00 51 09 C8 00 53 | PRG.*...;.Q...S| 00000130: 54 41 20 5A 45 49 20 20 20 20 20 20 20 20 3B 20 |TA ZEI ; | 00000140: 41 44 52 45 53 53 45 20 53 50 45 49 43 48 45 52 |ADRESSE SPEICHER| 00000150: 4E 00 5F 09 D2 00 53 54 59 20 5A 45 49 AA 31 00 |N._...STY ZEI.1.| 00000160: 65 09 DC 00 3B 00 7D 09 E6 00 4C 44 41 20 23 31 |e...;.}...LDA #1| 00000170: 33 20 20 20 20 20 20 20 20 3B 20 43 52 00 9B 09 |3 ; CR...| 00000180: F0 00 4A 53 52 20 24 46 46 44 32 20 20 20 20 20 |..JSR $FFD2 | 00000190: 20 3B 20 41 55 53 47 45 42 45 4E 00 A1 09 FA 00 | ; AUSGEBEN.....| 000001A0: 3B 00 BC 09 04 01 4C 44 59 20 23 30 20 20 20 20 |;.....LDY #0 | 000001B0: 20 20 20 20 20 3B 20 49 4E 44 45 58 00 C5 09 0E | ; INDEX....| 000001C0: 01 4C 4F 4F 50 00 E4 09 18 01 4C 44 41 20 28 5A |.LOOP.....LDA (Z| 000001D0: 45 49 29 2C 59 20 20 20 20 3B 20 50 41 52 41 4D |EI),Y ; PARAM| 000001E0: 45 54 45 52 00 FF 09 22 01 42 45 51 20 80 50 52 |ETER...".BEQ .PR| 000001F0: 47 20 20 20 20 20 3B 20 4E 55 4C 4C B2 80 45 00 |G ; NULL..E.| 00000200: 1D 0A 2C 01 4A 53 52 20 24 46 46 44 32 20 20 20 |..,.JSR $FFD2 | 00000210: 20 20 20 3B 20 41 55 53 47 45 42 45 4E 00 25 0A | ; AUSGEBEN.%.| 00000220: 36 01 49 4E 59 00 32 0A 40 01 42 4E 45 20 4C 4F |6.INY.2.@.BNE LO| 00000230: 4F 50 00 3B 0A 4A 01 80 50 52 47 00 53 0A 54 01 |OP.;.J..PRG.S.T.| 00000240: 4C 44 41 20 23 31 33 20 20 20 20 20 20 20 20 3B |LDA #13 ;| 00000250: 20 43 52 00 61 0A 5E 01 4A 53 52 20 24 46 46 44 | CR.a.^.JSR $FFD| 00000260: 32 00 88 0A 68 01 4C 44 41 20 23 30 20 20 20 20 |2...h.LDA #0 | 00000270: 20 20 20 20 20 3B 20 4D 45 4C 44 55 4E 47 20 41 | ; MELDUNG A| 00000280: 4E 20 50 52 4F 4D 50 54 00 90 0A 72 01 52 54 53 |N PROMPT...r.RTS| 00000290: 00 00 00 |... |
....D..1,8,1,"PRG2/A".;.N..7.4096: ; ASSEMBLER AUFRUFEN.B.X.BDOS .$A000 ; STARTADRESSE BDOS.....PRG .1 ; FUER INCLUDE.DATEI......ICL 8,"BDS* ; STRUKTUREN.L....ICL 8,"BDJ* ; JUMP-TAB ELLE.Z. .ZEI .$18......OPT O1 ; CODE IN FILE 1.$.....$7000 ; STAR TADRESSE PRG.*...;.Q.H.STA ZEI ; ADRESSE SPEICHERN._.R.STY ZEI.1.E...;.}. ..LDA #13 ; CR.....JSR $FFD2 ; AUSGEBEN.....;.....LDY #0 ; I NDEX.E...LOOP.....LDA (ZEI),Y ; PARAM ETER...".BEQ .PRG ; NULL..E...,.JSR $FFD2 ; AUSGEBEN.%.6.INY.2.@.BNE LO OP.;.J..PRG.S.T.LDA #13 ; CR.A.^. JSR $FFD2...H.LDA #0 ; MELDUNG A N PROMPT...R.RTS...
> CLICK IMAGE PREVIEW FOR FULL MODAL