> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 01 00 20 3B 20 20 2B 2B 2B 2B 2B 2B |..'... ; ++++++|
00000010: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B |++++++++++++++++|
00000020: 2B 2B 2B 2B 2B 2B 2B 00 4D 08 02 00 20 3B 20 20 |+++++++.M... ; |
00000030: 2B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |+ |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 2B 00 73 08 | +.s.|
00000050: 03 00 20 3B 20 20 2B 20 20 2D 2D 2D 20 54 48 45 |.. ; + --- THE|
00000060: 20 43 48 41 52 2D 4B 49 4C 4C 45 52 20 2D 2D 2D | CHAR-KILLER ---|
00000070: 20 20 2B 00 99 08 04 00 20 3B 20 20 2B 20 20 20 | +..... ; + |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 20 20 20 20 2B 00 BF 08 05 00 20 3B | +..... ;|
000000A0: 20 20 2B 20 28 43 29 20 39 2F 38 39 20 42 59 20 | + (C) 9/89 BY |
000000B0: 41 4C 45 58 20 47 45 56 41 54 54 45 52 20 2B 00 |ALEX GEVATTER +.|
000000C0: E5 08 06 00 20 3B 20 20 2B 20 20 20 20 20 20 20 |.... ; + |
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000E0: 20 20 20 20 2B 00 0B 09 07 00 20 3B 20 20 2B 2B | +..... ; ++|
000000F0: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B |++++++++++++++++|
00000100: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 00 31 09 08 00 |+++++++++++.1...|
00000110: 20 3B 20 20 2B 20 20 20 20 20 20 20 20 20 20 20 | ; + |
00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000130: 2B 00 57 09 09 00 20 3B 20 20 2B 20 54 45 49 4C |+.W... ; + TEIL|
00000140: 50 52 47 2E 3A 20 55 4D 4B 4F 50 49 45 52 52 4F |PRG.: UMKOPIERRO|
00000150: 55 54 49 4E 45 20 2B 00 7D 09 0A 00 20 3B 20 20 |UTINE +.}... ; |
00000160: 2B 20 20 53 50 45 49 43 48 45 52 42 45 4C 2E 3A |+ SPEICHERBEL.:|
00000170: 20 32 30 38 37 2D 32 31 32 34 20 20 2B 00 A3 09 | 2087-2124 +...|
00000180: 0B 00 20 3B 20 20 2B 20 20 20 20 20 20 51 55 45 |.. ; + QUE|
00000190: 4C 4C 54 45 58 54 20 46 55 45 52 3A 20 20 20 20 |LLTEXT FUER: |
000001A0: 20 20 2B 00 C9 09 0C 00 20 3B 20 20 2B 20 4B 49 | +..... ; + KI|
000001B0: 4E 47 53 4F 46 54 20 20 50 4F 57 45 52 20 41 53 |NGSOFT POWER AS|
000001C0: 53 45 4D 42 4C 45 52 20 2B 00 EF 09 0D 00 20 3B |SEMBLER +..... ;|
000001D0: 20 20 2B 20 20 20 20 20 20 20 20 20 20 20 20 20 | + |
000001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2B 00 | +.|
000001F0: 15 0A 0E 00 20 3B 20 20 2B 2B 2B 2B 2B 2B 2B 2B |.... ; ++++++++|
00000200: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B |++++++++++++++++|
00000210: 2B 2B 2B 2B 2B 00 1C 0A 0F 00 20 3B 00 3C 0A 10 |+++++..... ;.<..|
00000220: 00 20 2A 3D 32 30 38 37 20 20 20 20 20 20 20 3B |. *=2087 ;|
00000230: 53 54 41 52 54 41 44 52 45 53 53 45 00 49 0A 11 |STARTADRESSE.I..|
00000240: 00 20 26 3D 34 39 31 35 32 00 50 0A 12 00 20 3B |. &=49152.P... ;|
00000250: 00 70 0A 13 00 20 4C 44 41 20 23 3C 32 31 32 35 |.p... LDA #<2125|
00000260: 20 20 20 3B 48 49 2F 4C 4F 20 41 4E 46 41 4E 47 | ;HI/LO ANFANG|
00000270: 00 8D 0A 14 00 20 53 54 41 20 32 35 31 20 20 20 |..... STA 251 |
00000280: 20 20 20 3B 5A 55 20 4B 4F 50 49 45 2D 00 AB 0A | ;ZU KOPIE-...|
00000290: 15 00 20 4C 44 41 20 23 3E 32 31 32 35 20 20 20 |.. LDA #>2125 |
000002A0: 3B 52 45 4E 44 45 52 20 42 45 2D 00 C4 0A 16 00 |;RENDER BE-.....|
000002B0: 20 53 54 41 20 32 35 32 20 20 20 20 20 20 3B 52 | STA 252 ;R|
000002C0: 45 49 43 48 00 E4 0A 17 00 20 4C 44 41 20 23 3C |EICH..... LDA #<|
000002D0: 34 30 31 39 32 20 20 3B 48 49 2F 4C 4F 20 41 4E |40192 ;HI/LO AN|
000002E0: 46 41 4E 47 00 03 0B 18 00 20 53 54 41 20 32 35 |FANG..... STA 25|
000002F0: 33 20 20 20 20 20 20 3B 5A 49 45 4C 42 45 52 45 |3 ;ZIELBERE|
00000300: 49 43 48 00 14 0B 19 00 20 4C 44 41 20 23 3E 34 |ICH..... LDA #>4|
00000310: 30 31 39 32 00 21 0B 1A 00 20 53 54 41 20 32 35 |0192.!... STA 25|
00000320: 34 00 28 0B 1B 00 20 3B 00 47 0B 1C 00 20 4C 44 |4.(... ;.G... LD|
00000330: 58 20 23 33 20 20 20 20 20 20 20 3B 33 2A 32 35 |X #3 ;3*25|
00000340: 36 20 42 59 54 45 53 00 63 0B 1D 00 20 4C 44 59 |6 BYTES.c... LDY|
00000350: 20 23 30 20 20 20 20 20 20 20 3B 4B 4F 50 49 45 | #0 ;KOPIE|
00000360: 52 45 4E 00 7B 0B 1E 00 20 4C 4F 4F 50 20 20 20 |REN.{... LOOP |
00000370: 4C 44 41 20 28 32 35 31 29 2C 59 00 8C 0B 1F 00 |LDA (251),Y.....|
00000380: 20 53 54 41 20 28 32 35 33 29 2C 59 00 95 0B 20 | STA (253),Y... |
00000390: 00 20 49 4E 59 00 A3 0B 21 00 20 42 4E 45 20 4C |. INY...!. BNE L|
000003A0: 4F 4F 50 00 B0 0B 22 00 20 49 4E 43 20 32 35 32 |OOP...". INC 252|
000003B0: 00 BD 0B 23 00 20 49 4E 43 20 32 35 34 00 C6 0B |...#. INC 254...|
000003C0: 24 00 20 44 45 58 00 D4 0B 25 00 20 42 4E 45 20 |$. DEX...%. BNE |
000003D0: 4C 4F 4F 50 00 DB 0B 26 00 20 3B 00 F8 0B 27 00 |LOOP...&. ;...'.|
000003E0: 20 4A 4D 50 20 34 30 31 39 32 20 20 20 20 3B 48 | JMP 40192 ;H|
000003F0: 41 55 50 54 50 52 47 2E 00 1A 0C 28 00 20 3B 20 |AUPTPRG....(. ; |
00000400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000410: 20 20 3B 53 54 41 52 54 45 4E 00 21 0C 29 00 20 | ;STARTEN.!.). |
00000420: 3B 00 3E 0C 2A 00 20 3B 20 20 20 20 20 20 20 20 |;.>.*. ; |
00000430: 20 20 2D 2D 2D 20 45 4E 44 45 20 2D 2D 2D 00 00 | --- ENDE ---..|
00000440: 00 |. |
..'... ; +++++++++++++++++++++++++++++.
M... ; + +.S.
.. ; + --- THE CHAR-KILLER --- +.....
; + +..... ;
+ (C) 9/89 BY ALEX GEVATTER +..... ;
+ +..... ; ++
+++++++++++++++++++++++++++.1... ; +
+.W... ; + TEIL
PRG.: UMKOPIERROUTINE +.}... ; + SPEIC
HERBEL.: 2087-2124 +..... ; + QUE
LLTEXT FUER: +.I... ; + KINGSOFT
POWER ASSEMBLER +..... ; +
+..... ; ++++++++++++++++
+++++++++++++..... ;.<... *=2087 ;
STARTADRESSE.I... &=49152.P... ;.P... LD
A #<2125 ;HI/LO ANFANG..... STA 251
;ZU KOPIE-..... LDA #>2125 ;RENDER
BE-.D... STA 252 ;REICH..... LDA #<
40192 ;HI/LO ANFANG..... STA 253 ;
ZIELBEREICH..... LDA #>40192.!... STA 25
4.(... ;.G... LDX #3 ;3*256 BYTES.
C... LDY #0 ;KOPIEREN.{... LOOP
LDA (251),Y..... STA (253),Y... . INY...
!. BNE LOOP...". INC 252...#. INC 254.F.
$. DEX.T.%. BNE LOOP...&. ;...'. JMP 401
92 ;HAUPTPRG....(. ;
;STARTEN.!.). ;.>.*. ; --- EN
DE ---...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL