QUELLTEXT 2
FILE INFORMATION
FILENAME(S): QUELLTEXT 2
FILE TYPE(S): PRG
FILE SIZE: 1.4K
FIRST SEEN: 2025-11-30 01:12:46
APPEARS ON: 2 disk(s)
FILE HASH
7ff1536f149a9d6d3ef2655b48eb75dc3f371795b59c25ab681b76904f290ea8
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10001 SEITE 1 | QUELLTEXT 2 | PRG | C64er | 25 | 12 | DOWNLOAD FILE |
| 10001 SEITE 1 | QUELLTEXT 2 | PRG | DuncanTwain | 25 | 12 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 64 00 3A 20 20 20 20 20 20 20 20 20 |....d.: |
00000010: 20 20 9E 20 33 36 38 36 34 00 33 08 6E 00 3A 20 | . 36864.3.n.: |
00000020: 20 20 20 20 20 20 20 20 20 20 2E 4F 50 54 20 20 | .OPT |
00000030: 20 4F 4F 00 4B 08 78 00 3A 20 20 20 20 20 20 20 | OO.K.x.: |
00000040: 20 20 20 20 AC B2 24 30 34 30 30 00 52 08 82 00 | ..$0400.R...|
00000050: 3A 3B 00 77 08 8C 00 3A 3B AC AC AC 20 41 55 53 |:;.w...:;... AUS|
00000060: 4C 45 53 55 4E 47 20 44 45 52 20 8F 2D 5A 45 49 |LESUNG DER .-ZEI|
00000070: 4C 45 4E 20 2A 2A 2A 00 7E 08 96 00 3A 3B 00 97 |LEN ***.~...:;..|
00000080: 08 A0 00 3A 20 20 20 20 20 20 20 20 20 20 20 4C |...: L|
00000090: 44 41 20 23 24 46 46 00 AF 08 AA 00 3A 20 20 20 |DA #$FF.....: |
000000A0: 20 20 20 20 20 20 20 20 53 54 41 20 24 35 41 00 | STA $5A.|
000000B0: C8 08 B4 00 3A 20 20 20 20 20 20 20 20 20 20 20 |....: |
000000C0: 4C 44 41 20 23 24 42 46 00 E0 08 BE 00 3A 20 20 |LDA #$BF.....: |
000000D0: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 35 42 | STA $5B|
000000E0: 00 F8 08 C8 00 3A 20 20 20 20 20 20 20 20 20 20 |.....: |
000000F0: 20 4C 44 41 20 24 37 41 00 10 09 D2 00 3A 20 20 | LDA $7A.....: |
00000100: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 35 46 | STA $5F|
00000110: 00 28 09 DC 00 3A 20 20 20 20 20 20 20 20 20 20 |.(...: |
00000120: 20 4C 44 41 20 24 37 42 00 40 09 E6 00 3A 20 20 | LDA $7B.@...: |
00000130: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 36 30 | STA $60|
00000140: 00 55 09 F0 00 82 4C 49 4E 45 20 20 20 20 4C 44 |.U....LINE LD|
00000150: 41 20 24 35 42 00 6E 09 FA 00 3A 20 20 20 20 20 |A $5B.n...: |
00000160: 20 20 20 20 20 20 43 4D 50 20 23 24 43 34 00 84 | CMP #$C4..|
00000170: 09 04 01 3A 20 20 20 20 20 20 20 20 20 20 20 42 |...: B|
00000180: 43 43 20 87 00 9E 09 06 01 3A 20 20 20 20 20 20 |CC ......: |
00000190: 20 20 20 20 20 4A 4D 50 20 24 43 30 30 30 00 A5 | JMP $C000..|
000001A0: 09 13 01 3A 3B 00 B9 09 18 01 87 20 20 20 20 20 |...:;...... |
000001B0: 20 20 20 4C 44 41 20 23 37 00 D1 09 22 01 52 30 | LDA #7...".R0|
000001C0: 20 20 20 20 20 20 20 20 20 20 41 44 43 20 24 35 | ADC $5|
000001D0: 46 00 E9 09 36 01 3A 20 20 20 20 20 20 20 20 20 |F...6.: |
000001E0: 20 20 53 54 41 20 24 35 46 00 00 0A 40 01 3A 20 | STA $5F...@.: |
000001F0: 20 20 20 20 20 20 20 20 20 20 42 43 43 20 52 31 | BCC R1|
00000200: 00 18 0A 4A 01 3A 20 20 20 20 20 20 20 20 20 20 |...J.: |
00000210: 20 49 4E 43 20 24 36 30 00 2F 0A 54 01 52 31 20 | INC $60./.T.R1 |
00000220: 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 38 00 | LDY #8.|
00000230: 4B 0A 5E 01 3A 20 20 20 20 20 20 20 20 20 20 20 |K.^.: |
00000240: 4C 44 41 20 28 24 35 46 29 2C 59 00 66 0A 68 01 |LDA ($5F),Y.f.h.|
00000250: 3A 20 20 20 20 20 20 20 20 20 20 20 4A 53 52 20 |: JSR |
00000260: 44 45 43 4F 44 45 00 7C 0A 72 01 3A 20 20 20 20 |DECODE.|.r.: |
00000270: 20 20 20 20 20 20 20 53 54 41 20 32 00 90 0A 90 | STA 2....|
00000280: 01 3A 20 20 20 20 20 20 20 20 20 20 20 44 45 59 |.: DEY|
00000290: 00 AC 0A 9A 01 52 32 20 20 20 20 20 20 20 20 20 |.....R2 |
000002A0: 20 4C 44 41 20 28 24 35 46 29 2C 59 00 C6 0A 9C | LDA ($5F),Y....|
000002B0: 01 3A 20 20 20 20 20 20 20 20 20 20 20 42 45 51 |.: BEQ|
000002C0: 20 82 4C 49 4E 45 00 E1 0A 9F 01 3A 20 20 20 20 | .LINE.....: |
000002D0: 20 20 20 20 20 20 20 4A 53 52 20 44 45 43 4F 44 | JSR DECOD|
000002E0: 45 00 F5 0A A1 01 3A 20 20 20 20 20 20 20 20 20 |E.....: |
000002F0: 20 20 52 4F 4C 00 0B 0B A4 01 3A 20 20 20 20 20 | ROL.....: |
00000300: 20 20 20 20 20 20 4C 53 52 20 32 00 1E 0B AE 01 | LSR 2.....|
00000310: 3A 20 20 20 20 20 20 20 20 20 20 20 52 B0 00 3A |: R..:|
00000320: 0B CC 01 3A 20 20 20 20 20 20 20 20 20 20 20 53 |...: S|
00000330: 54 41 20 28 24 35 41 29 2C 59 00 4E 0B D6 01 3A |TA ($5A),Y.N...:|
00000340: 20 20 20 20 20 20 20 20 20 20 20 44 45 59 00 65 | DEY.e|
00000350: 0B DB 01 3A 20 20 20 20 20 20 20 20 20 20 20 42 |...: B|
00000360: 4E 45 20 52 32 00 79 0B E0 01 3A 20 20 20 20 20 |NE R2.y...: |
00000370: 20 20 20 20 20 20 43 4C 43 00 91 0B EA 01 3A 20 | CLC.....: |
00000380: 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 35 | LDA $5|
00000390: 41 00 A8 0B F4 01 3A 20 20 20 20 20 20 20 20 20 |A.....: |
000003A0: 20 20 41 44 43 20 23 37 00 C0 0B FE 01 3A 20 20 | ADC #7.....: |
000003B0: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 35 41 | STA $5A|
000003C0: 00 D7 0B 03 02 3A 20 20 20 20 20 20 20 20 20 20 |.....: |
000003D0: 20 4C 44 41 20 23 38 00 EE 0B 08 02 3A 20 20 20 | LDA #8.....: |
000003E0: 20 20 20 20 20 20 20 20 42 43 43 20 52 30 00 06 | BCC R0..|
000003F0: 0C 12 02 3A 20 20 20 20 20 20 20 20 20 20 20 49 |...: I|
00000400: 4E 43 20 24 35 42 00 1A 0C 1C 02 3A 20 20 20 20 |NC $5B.....: |
00000410: 20 20 20 20 20 20 20 43 4C 43 00 31 0C 30 02 3A | CLC.1.0.:|
00000420: 20 20 20 20 20 20 20 20 20 20 20 42 43 43 20 52 | BCC R|
00000430: 30 00 38 0C 58 02 3A 3B 00 51 0C 62 02 44 45 43 |0.8.X.:;.Q.b.DEC|
00000440: 4F 44 45 20 20 20 20 20 20 43 4D 50 20 23 31 36 |ODE CMP #16|
00000450: 30 00 69 0C 6C 02 3A 20 20 20 20 20 20 20 20 20 |0.i.l.: |
00000460: 20 20 42 43 43 20 44 45 31 00 81 0C 71 02 3A 20 | BCC DE1...q.: |
00000470: 20 20 20 20 20 20 20 20 20 20 53 42 43 20 23 36 | SBC #6|
00000480: 34 00 95 0C 76 02 3A 20 20 20 20 20 20 20 20 20 |4...v.: |
00000490: 20 20 52 54 53 00 AD 0C 7B 02 44 45 31 20 20 20 | RTS...{.DE1 |
000004A0: 20 20 20 20 20 20 43 4D 50 20 23 39 36 00 C5 0C | CMP #96...|
000004B0: 80 02 3A 20 20 20 20 20 20 20 20 20 20 20 42 43 |..: BC|
000004C0: 43 20 44 45 32 00 DD 0C 85 02 3A 20 20 20 20 20 |C DE2.....: |
000004D0: 20 20 20 20 20 20 53 42 43 20 23 33 32 00 F1 0C | SBC #32...|
000004E0: 8A 02 3A 20 20 20 20 20 20 20 20 20 20 20 52 54 |..: RT|
000004F0: 53 00 09 0D 8F 02 44 45 32 20 20 20 20 20 20 20 |S.....DE2 |
00000500: 20 20 43 4D 50 20 23 36 34 00 21 0D 94 02 3A 20 | CMP #64.!...: |
00000510: 20 20 20 20 20 20 20 20 20 20 42 43 43 20 44 45 | BCC DE|
00000520: 33 00 39 0D 99 02 3A 20 20 20 20 20 20 20 20 20 |3.9...: |
00000530: 20 20 53 42 43 20 23 36 34 00 51 0D 9E 02 44 45 | SBC #64.Q...DE|
00000540: 33 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 35 |3 CMP #5|
00000550: 33 00 69 0D A3 02 3A 20 20 20 20 20 20 20 20 20 |3.i...: |
00000560: 20 20 42 4E 45 20 44 45 34 00 81 0D A8 02 3A 20 | BNE DE4.....: |
00000570: 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 33 | LDA #3|
00000580: 34 00 95 0D AD 02 44 45 34 20 20 20 20 20 20 20 |4.....DE4 |
00000590: 20 20 52 54 53 00 00 00 20 4A 54 | RTS... JT |
....D.: . 36864.3.N.:
.OPT OO.K.X.: ..$0400.R...
:;.W...:;... AUSLESUNG DER .-ZEILEN ***.
~...:;... .: LDA #$FF.....:
STA $5A.H...: LDA #$BF
.....: STA $5B...H.:
LDA $7A...R.: STA $5F.(...:
LDA $7B.@...: STA $60
.U....LINE LDA $5B.N...: CM
P #$C4.....: BCC ......:
JMP $C000.....:;...... LDA #
7.Q.".R0 ADC $5F...6.:
STA $5F...@.: BCC R1...J.:
INC $60./.T.R1 LDY #8.
K.^.: LDA ($5F),Y.F.H.:
JSR DECODE.|.R.: STA 2....
.: DEY.....R2 LDA ($5
F),Y.F...: BEQ .LINE.....:
JSR DECODE.....: ROL...
..: LSR 2.....: R..:
.L.: STA ($5A),Y.N.V.:
DEY.E...: BNE R2.Y...:
CLC.....: LDA $5A.....:
ADC #7.....: STA $5A
.W...: LDA #8.....:
BCC R0.....: INC $5B.....:
CLC.1.0.: BCC R0.8.X.:;
.Q.B.DECODE CMP #160.I.L.:
BCC DE1...Q.: SBC #64...V.:
RTS...{.DE1 CMP #96.E.
..: BCC DE2.....: SB
C #32.....: RTS.....DE2
CMP #64.!...: BCC DE3.9...:
SBC #64.Q...DE3 CMP #5
3.I...: BNE DE4.....:
LDA #34.....DE4 RTS... JT
> CLICK IMAGE PREVIEW FOR FULL MODAL