QUELLTEXT

FILE INFORMATION

FILENAME(S): QUELLTEXT

FILE TYPE(S): PRG

FILE SIZE: 1.8K

FIRST SEEN: 2025-11-02 16:39:12

APPEARS ON: 3 disk(s)

FILE HASH

615c836b236a7a80048b6e75e262c3f600ed3b42c27c4f17824ff6785dc8dacf

FOUND ON DISKS (3 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
10010 SEITE B	QUELLTEXT	PRG	Treasure Chest - Plattfuss	20	13	DOWNLOAD FILE
10010 SEITE B	QUELLTEXT	PRG	Treasure Chest - Plattfuss	20	13	DOWNLOAD FILE
10010 SEITE B	QUELLTEXT	PRG	BrainSkull, Sammlung, C64er, DuncanTwain	20	13	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 1C 0E 1C E8 03 AC B2  20 24 43 30 30 30 00 14  |........ $C000..|
00000010: 1C F2 03 3B 00 33 1C FC  03 3B 20 44 49 47 49 AB  |...;.3...; DIGI.|
00000020: FE 04 45 52 20 34 20 42  49 54 20 4C 4F 57 AD 48  |..ER 4 BIT LOW.H|
00000030: 49 47 48 00 45 1C 06 04  3B 20 42 59 20 53 45 53  |IGH.E...; BY SES|
00000040: AD 46 45 41 52 00 54 1C  10 04 3B 20 28 43 29 20  |.FEAR.T...; (C) |
00000050: 31 39 39 30 00 5A 1C 1A  04 3B 00 6E 1C 24 04 4E  |1990.Z...;.n.$.N|
00000060: 4D 49 56 45 43 A4 52 20  B2 20 24 33 31 38 00 A4  |MIVEC.R . $318..|
00000070: 1C 2E 04 3B 20 28 4F 44  45 52 20 24 46 46 46 41  |...; (ODER $FFFA|
00000080: 2C 20 57 45 4E 4E 20 52  4F 4D 20 24 45 30 30 30  |, WENN ROM $E000|
00000090: 20 41 55 53 47 45 53 43  48 41 4C 54 45 54 20 49  | AUSGESCHALTET I|
000000A0: 53 54 21 29 00 AA 1C 38  04 3B 00 B8 1C 42 04 4A  |ST!)...8.;...B.J|
000000B0: 4D 50 20 53 54 41 52 54  00 C2 1C 4C 04 4A 4D 50  |MP START...L.JMP|
000000C0: 20 90 00 C8 1C 56 04 3B  00 DE 1C 60 04 53 54 41  | ....V.;...`.STA|
000000D0: 52 54 41 44 52 20 2E 42  59 54 20 24 32 30 00 F0  |RTADR .BYT $20..|
000000E0: 1C 6A 04 80 41 44 52 20  2E 42 59 54 20 24 35 30  |.j..ADR .BYT $50|
000000F0: 00 06 1D 74 04 4E 4D 49  53 50 45 45 44 20 2E 42  |...t.NMISPEED .B|
00000100: 59 54 20 24 38 30 00 0C  1D 7E 04 3B 00 1D 1D 88  |YT $80...~.;....|
00000110: 04 3B 20 AC 20 41 44 52  45 53 53 45 4E 00 4E 1D  |.; . ADRESSEN.N.|
00000120: 92 04 3B 20 20 53 54 41  52 54 20 AD 20 52 45 53  |..;  START . RES|
00000130: 54 41 52 54 20 20 20 20  20 20 20 20 20 20 20 20  |TART            |
00000140: 20 34 39 31 35 32 20 AD  20 24 43 30 30 30 00 7C  | 49152 . $C000.||
00000150: 1D 9C 04 3B 20 20 90 20  20 20 20 20 20 20 20 20  |...;  .         |
00000160: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 34  |               4|
00000170: 39 31 35 35 20 AD 20 24  43 30 30 33 00 8E 1D A6  |9155 . $C003....|
00000180: 04 3B 20 AC 20 50 41 52  41 4D 45 54 45 52 00 BF  |.; . PARAMETER..|
00000190: 1D B0 04 3B 20 20 48 49  47 48 AB 42 59 54 45 20  |...;  HIGH.BYTE |
000001A0: 44 45 52 20 53 54 41 52  54 41 44 52 45 53 53 45  |DER STARTADRESSE|
000001B0: 20 20 34 39 31 35 38 20  AD 20 24 43 30 30 36 00  |  49158 . $C006.|
000001C0: EE 1D BA 04 3B 20 20 48  49 47 48 AB 42 59 54 45  |....;  HIGH.BYTE|
000001D0: 20 44 45 52 20 80 41 44  52 45 53 53 45 20 20 20  | DER .ADRESSE   |
000001E0: 20 34 39 31 35 39 20 AD  20 24 43 30 30 37 00 1F  | 49159 . $C007..|
000001F0: 1E C4 04 3B 20 20 4E 4D  49 AB 53 50 45 45 44 20  |...;  NMI.SPEED |
00000200: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000210: 20 20 34 39 31 36 30 20  AD 20 24 43 30 30 38 00  |  49160 . $C008.|
00000220: 25 1E CE 04 3B 00 3B 1E  D8 04 3B 20 AC 20 53 54  |%...;.;...; . ST|
00000230: 41 52 54 AB 52 4F 55 54  49 4E 45 00 45 1E E2 04  |ART.ROUTINE.E...|
00000240: 53 54 41 52 54 00 6D 1E  EC 04 4A 53 52 20 90 20  |START.m...JSR . |
00000250: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000260: 20 20 20 20 3B 20 4E 4D  49 20 41 55 53 00 73 1E  |    ; NMI AUS.s.|
00000270: F6 04 3B 00 A6 1E 00 05  4C 44 41 20 23 B3 4E 4D  |..;.....LDA #.NM|
00000280: 49 31 3A 53 54 41 20 4E  4D 49 56 45 43 A4 52 20  |I1:STA NMIVEC.R |
00000290: 20 20 20 20 3B 20 4E 4D  49 AB 56 45 43 A4 52 20  |    ; NMI.VEC.R |
000002A0: 53 45 54 5A 45 4E 00 C4  1E 0A 05 4C 44 41 20 23  |SETZEN.....LDA #|
000002B0: B1 4E 4D 49 31 3A 53 54  41 20 4E 4D 49 56 45 43  |.NMI1:STA NMIVEC|
000002C0: A4 52 AA 31 00 CA 1E 14  05 3B 00 01 1F 1E 05 53  |.R.1.....;.....S|
000002D0: 54 59 20 41 44 52 45 53  53 45 AA 31 20 20 20 20  |TY ADRESSE.1    |
000002E0: 20 20 20 20 20 20 20 20  20 20 20 20 3B 20 53 54  |            ; ST|
000002F0: 41 52 54 41 44 52 45 53  53 45 20 53 45 54 5A 45  |ARTADRESSE SETZE|
00000300: 4E 00 20 1F 28 05 4C 44  41 20 53 54 41 52 54 41  |N. .(.LDA STARTA|
00000310: 44 52 3A 53 54 41 20 41  44 52 45 53 53 45 AA 32  |DR:STA ADRESSE.2|
00000320: 00 34 1F 32 05 53 54 41  20 53 54 41 52 54 4D 45  |.4.2.STA STARTME|
00000330: 52 4B AA 31 00 63 1F 3C  05 4C 44 41 20 80 41 44  |RK.1.c.<.LDA .AD|
00000340: 52 3A 53 54 41 20 80 4D  45 52 4B AA 31 20 20 20  |R:STA .MERK.1   |
00000350: 20 20 3B 20 80 41 44 52  45 53 53 45 20 53 45 54  |  ; .ADRESSE SET|
00000360: 5A 45 4E 00 69 1F 46 05  3B 00 99 1F 50 05 4C 44  |ZEN.i.F.;...P.LD|
00000370: 41 20 4E 4D 49 53 50 45  45 44 3A 53 54 41 20 24  |A NMISPEED:STA $|
00000380: 44 44 30 34 20 20 20 20  20 20 20 3B 20 53 50 45  |DD04       ; SPE|
00000390: 45 44 20 53 45 54 5A 45  4E 00 A7 1F 5A 05 53 54  |ED SETZEN...Z.ST|
000003A0: 59 20 24 44 44 30 35 00  D2 1F 64 05 4C 44 41 20  |Y $DD05...d.LDA |
000003B0: 23 24 38 31 20 20 20 20  20 20 20 20 20 20 20 20  |#$81            |
000003C0: 20 20 20 20 20 20 20 20  20 3B 20 4E 4D 49 20 45  |         ; NMI E|
000003D0: 49 4E 00 EE 1F 6E 05 53  54 41 20 24 44 44 30 44  |IN...n.STA $DD0D|
000003E0: 3A 53 54 41 20 24 44 44  30 45 3A 52 54 53 00 F4  |:STA $DD0E:RTS..|
000003F0: 1F 78 05 3B 00 06 20 82  05 3B 20 AC 20 90 AB 52  |.x.;.. ..; . ..R|
00000400: 4F 55 54 49 4E 45 00 13  20 8C 05 90 20 4C 44 59  |OUTINE.. ... LDY|
00000410: 20 23 30 00 3E 20 96 05  53 54 59 20 24 44 44 30  | #0.> ..STY $DD0|
00000420: 45 3A 4C 44 41 20 24 44  44 30 44 20 20 20 20 20  |E:LDA $DD0D     |
00000430: 20 20 20 20 20 3B 20 4E  4D 49 20 41 55 53 00 46  |     ; NMI AUS.F|
00000440: 20 A0 05 52 54 53 00 4C  20 AA 05 3B 00 62 20 B4  | ..RTS.L ..;.b .|
00000450: 05 3B 20 AC 20 4E 4D 49  AB 52 4F 55 54 49 4E 45  |.; . NMI.ROUTINE|
00000460: 20 31 00 6F 20 BE 05 4E  4D 49 31 20 50 48 41 00  | 1.o ..NMI1 PHA.|
00000470: 75 20 C8 05 3B 00 9B 20  D2 05 41 44 52 45 53 53  |u ..;.. ..ADRESS|
00000480: 45 20 4C 44 41 20 24 32  30 30 30 20 20 20 20 20  |E LDA $2000     |
00000490: 3B 20 42 59 54 45 20 48  4F C3 2C 00 CF 20 DC 05  |; BYTE HO.,.. ..|
000004A0: 53 54 41 20 42 59 54 45  4D 45 52 4B AA 31 20 20  |STA BYTEMERK.1  |
000004B0: 20 20 20 20 20 20 3B 20  41 4E 20 52 4F 55 54 49  |      ; AN ROUTI|
000004C0: 4E 45 20 32 20 55 45 42  45 52 47 45 42 45 4E 00  |NE 2 UEBERGEBEN.|
000004D0: FE 20 E6 05 AF 20 23 31  35 3A 53 54 41 20 24 44  |. ... #15:STA $D|
000004E0: 34 31 38 20 20 20 20 20  3B 20 55 4E 44 20 4C 4F  |418     ; UND LO|
000004F0: 57 AB 4E 49 42 42 4C 45  20 53 50 49 45 C3 00 04  |W.NIBBLE SPIE...|
00000500: 21 F0 05 3B 00 3A 21 FA  05 49 4E 43 20 41 44 52  |!..;.:!..INC ADR|
00000510: 45 53 53 45 AA 31 3A 42  4E 45 20 4E 4D 49 31 41  |ESSE.1:BNE NMI1A|
00000520: 3A 49 4E 43 20 41 44 52  45 53 53 45 AA 32 20 3B  |:INC ADRESSE.2 ;|
00000530: 20 41 44 52 45 53 53 45  AA 31 00 40 21 04 06 3B  | ADRESSE.1.@!..;|
00000540: 00 74 21 0E 06 4C 44 41  20 41 44 52 45 53 53 45  |.t!..LDA ADRESSE|
00000550: AA 32 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.2              |
00000560: 20 20 20 20 20 20 3B 20  41 55 46 20 80 41 44 52  |      ; AUF .ADR|
00000570: 45 53 53 45 00 AA 21 18  06 80 4D 45 52 4B 20 43  |ESSE..!...MERK C|
00000580: 4D 50 20 23 24 35 30 3A  42 43 43 20 4E 4D 49 31  |MP #$50:BCC NMI1|
00000590: 41 20 20 20 20 20 20 20  3B 20 50 52 55 45 46 45  |A       ; PRUEFE|
000005A0: 4E 20 55 4E 44 20 47 47  46 2E 00 DD 21 22 06 53  |N UND GGF...!".S|
000005B0: 54 41 52 54 4D 45 52 4B  20 4C 44 41 20 23 24 32  |TARTMERK LDA #$2|
000005C0: 30 3A 53 54 41 20 41 44  52 45 53 53 45 AA 32 20  |0:STA ADRESSE.2 |
000005D0: 3B 20 52 55 45 43 4B 53  45 54 5A 45 4E 00 E3 21  |; RUECKSETZEN..!|
000005E0: 2C 06 3B 00 ED 21 36 06  4E 4D 49 31 41 00 F3 21  |,.;..!6.NMI1A..!|
000005F0: 40 06 3B 00 1D 22 4A 06  4C 44 41 20 23 B3 4E 4D  |@.;.."J.LDA #.NM|
00000600: 49 32 20 20 20 20 20 20  20 20 20 20 20 3B 20 56  |I2           ; V|
00000610: 45 43 A4 52 20 41 55 46  20 4E 4D 49 32 00 23 22  |EC.R AUF NMI2.#"|
00000620: 54 06 3B 00 2D 22 5E 06  4E 4D 49 80 45 00 3E 22  |T.;.-"^.NMI.E.>"|
00000630: 68 06 53 54 41 20 4E 4D  49 56 45 43 A4 52 00 63  |h.STA NMIVEC.R.c|
00000640: 22 72 06 4C 44 41 20 24  44 44 30 44 3A 50 4C 41  |"r.LDA $DD0D:PLA|
00000650: 3A 52 54 49 20 20 20 20  3B 20 52 55 45 43 4B 53  |:RTI    ; RUECKS|
00000660: 50 8A 47 00 69 22 7C 06  3B 00 7F 22 86 06 3B 20  |P.G.i"|.;.."..; |
00000670: AC 20 4E 4D 49 AB 52 4F  55 54 49 4E 45 20 32 00  |. NMI.ROUTINE 2.|
00000680: 8C 22 90 06 4E 4D 49 32  20 50 48 41 00 92 22 9A  |."..NMI2 PHA..".|
00000690: 06 3B 00 D4 22 A4 06 42  59 54 45 4D 45 52 4B 20  |.;.."..BYTEMERK |
000006A0: 4C 44 41 20 23 30 3A 4C  53 52 3A 4C 53 52 3A 4C  |LDA #0:LSR:LSR:L|
000006B0: 53 52 3A 4C 53 52 3A 53  54 41 20 24 44 34 31 38  |SR:LSR:STA $D418|
000006C0: 20 3B 20 48 49 47 48 AB  4E 49 42 42 4C 45 20 53  | ; HIGH.NIBBLE S|
000006D0: 50 49 45 C3 00 DA 22 AE  06 3B 00 05 23 B8 06 4C  |PIE..."..;..#..L|
000006E0: 44 41 20 23 B3 4E 4D 49  31 3A 42 4E 45 20 4E 4D  |DA #.NMI1:BNE NM|
000006F0: 49 80 45 20 20 3B 20 56  45 43 A4 52 20 41 55 46  |I.E  ; VEC.R AUF|
00000700: 20 4E 4D 49 31 00 00 00                           | NMI1...        |

........ $C000.....;.3...; DIGI...ER 4 B
IT LOW.HIGH.E...; BY SES.FEAR.T...; (C) 
1990.Z...;.N.$.NMIVEC.R . $318.....; (OD
ER $FFFA, WENN ROM $E000 AUSGESCHALTET I
ST!)...8.;...B.JMP START.B.L.JMP ..H.V.;
...`.STARTADR .BYT $20...J..ADR .BYT $50
...T.NMISPEED .BYT $80...~.;.....; . ADR
ESSEN.N...;  START . RESTART            
 49152 . $C000.|...;  .                 
       49155 . $C003.....; . PARAMETER..
...;  HIGH.BYTE DER STARTADRESSE  49158 
. $C006.....;  HIGH.BYTE DER .ADRESSE   
 49159 . $C007...D.;  NMI.SPEED         
          49160 . $C008.%.N.;.;.X.; . ST
ART.ROUTINE.E...START.M...JSR .         
            ; NMI AUS.S...;.....LDA #.NM
I1:STA NMIVEC.R     ; NMI.VEC.R SETZEN.D
...LDA #.NMI1:STA NMIVEC.R.1.J...;.....S
TY ADRESSE.1                ; STARTADRES
SE SETZEN. .(.LDA STARTADR:STA ADRESSE.2
.4.2.STA STARTMERK.1.C.<.LDA .ADR:STA .M
ERK.1     ; .ADRESSE SETZEN.I.F.;...P.LD
A NMISPEED:STA $DD04       ; SPEED SETZE
N...Z.STY $DD05.R.D.LDA #$81            
         ; NMI EIN...N.STA $DD0D:STA $DD
0E:RTS...X.;.. ..; . ..ROUTINE.. ... LDY
 #0.> ..STY $DD0E:LDA $DD0D          ; N
MI AUS.F  .RTS.L ..;.B ..; . NMI.ROUTINE
 1.O ..NMI1 PHA.U H.;.. R.ADRESSE LDA $2
000     ; BYTE HOC,.O ..STA BYTEMERK.1  
      ; AN ROUTINE 2 UEBERGEBEN.. ... #1
5:STA $D418     ; UND LOW.NIBBLE SPIEC..
!..;.:!..INC ADRESSE.1:BNE NMI1A:INC ADR
ESSE.2 ; ADRESSE.1.@!..;.T!..LDA ADRESSE
.2                    ; AUF .ADRESSE..!.
..MERK CMP #$50:BCC NMI1A       ; PRUEFE
N UND GGF...!".STARTMERK LDA #$20:STA AD
RESSE.2 ; RUECKSETZEN..!,.;..!6.NMI1A..!
@.;.."J.LDA #.NMI2           ; VEC.R AUF
 NMI2.#"T.;.-"^.NMI.E.>"H.STA NMIVEC.R.C
"R.LDA $DD0D:PLA:RTI    ; RUECKSP.G.I"|.
;."..; . NMI.ROUTINE 2.."..NMI2 PHA..".
.;.T"..BYTEMERK LDA #0:LSR:LSR:LSR:LSR:S
TA $D418 ; HIGH.NIBBLE SPIEC.Z"..;..#..L
DA #.NMI1:BNE NMI.E  ; VEC.R AUF NMI1...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL