00000000: 00 40 52 45 49 43 48 20 4B 4F 50 49 45 52 54 2C |.@REICH KOPIERT,|
00000010: 20 57 4F 20 45 52 20 45 54 57 41 53 20 53 49 43 | WO ER ETWAS SIC|
00000020: 48 45 52 45 52 20 20 41 55 46 47 45 48 4F 42 45 |HERER AUFGEHOBE|
00000030: 4E 20 20 49 53 54 2C 4E 85 4D 4C 49 43 48 20 20 |N IST,N.MLICH |
00000040: 49 4E 20 20 44 45 4E 20 20 C2 45 52 45 49 43 48 |IN DEN .EREICH|
00000050: 20 20 24 43 42 41 46 20 20 42 49 53 20 20 20 24 | $CBAF BIS $|
00000060: 43 46 46 30 2E 20 20 20 C4 49 45 53 47 45 53 43 |CFF0. .IESGESC|
00000070: 48 49 45 48 54 20 4D 49 54 20 C8 49 4C 46 45 20 |HIEHT MIT .ILFE |
00000080: 45 49 4E 45 52 20 D2 4F 55 54 49 4E 45 20 41 55 |EINER .OUTINE AU|
00000090: 53 20 44 45 4D 20 20 C2 C1 D3 C9 C3 2D D2 CF CD |S DEM .....-...|
000000A0: 2C 4E 85 4D 4C 49 43 48 20 44 45 52 20 D2 4F 55 |,N.MLICH DER .OU|
000000B0: 54 49 4E 45 20 20 CD CF D6 C5 2E 20 20 D3 49 45 |TINE ..... .IE|
000000C0: 20 20 57 49 52 44 20 20 46 4F 4C 47 45 4E 44 45 | WIRD FOLGENDE|
000000D0: 52 4D 41 88 45 4E 41 55 46 47 45 52 55 46 45 4E |RMA.ENAUFGERUFEN|
000000E0: 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |: |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000110: 20 20 20 20 20 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: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000140: 24 35 46 2F 24 36 30 20 3A 20 D3 54 41 52 54 41 |$5F/$60 : .TARTA|
00000150: 44 52 45 53 53 45 20 44 45 53 20 5A 55 20 4B 4F |DRESSE DES ZU KO|
00000160: 50 49 45 52 45 4E 44 45 4E 20 C2 4C 4F 43 4B 53 |PIERENDEN .LOCKS|
00000170: 20 20 20 20 20 24 35 41 2F 24 35 42 20 3A 20 C5 | $5A/$5B : .|
00000180: 4E 44 41 44 52 45 53 53 45 20 44 45 53 20 5A 55 |NDADRESSE DES ZU|
00000190: 20 4B 4F 50 49 45 52 45 4E 44 45 4E 20 C2 4C 4F | KOPIERENDEN .LO|
000001A0: 43 4B 53 20 20 20 20 20 20 20 24 35 38 2F 24 35 |CKS $58/$5|
000001B0: 39 20 3A 20 CE 45 55 45 20 C5 4E 44 41 44 52 45 |9 : .EUE .NDADRE|
000001C0: 53 53 45 20 44 45 53 20 5A 55 20 4B 4F 50 49 45 |SSE DES ZU KOPIE|
000001D0: 52 45 4E 44 45 4E 20 C2 4C 4F 43 4B 53 20 20 D3 |RENDEN .LOCKS .|
000001E0: 54 41 52 54 41 44 52 45 53 53 45 3A 20 24 41 33 |TARTADRESSE: $A3|
000001F0: 42 46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |BF |
00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000240: 20 20 20 20 20 20 20 20 20 CE 41 43 48 44 45 4D | .ACHDEM|
00000250: 20 44 45 52 20 D6 49 52 55 53 20 4B 4F 50 49 45 | DER .IRUS KOPIE|
00000260: 52 54 20 49 53 54 2C 20 4D 55 88 20 44 49 45 53 |RT IST, MU. DIES|
00000270: 45 52 20 20 44 41 53 20 20 49 4E 46 49 2D 5A 49 |ER DAS INFI-ZI|
00000280: 45 52 54 45 20 D0 52 4F 47 52 41 4D 4D 20 57 49 |ERTE .ROGRAMM WI|
00000290: 45 44 45 52 20 4E 41 43 48 20 55 4E 54 45 4E 20 |EDER NACH UNTEN |
000002A0: 20 4B 4F 50 49 45 52 45 4E 2C 20 20 4E 85 4D 4C | KOPIEREN, N.ML|
000002B0: 49 43 48 41 4E 20 44 45 4E 20 4E 4F 52 4D 41 4C |ICHAN DEN NORMAL|
000002C0: 45 4E 20 C2 41 53 49 43 2D D3 54 41 52 54 20 20 |EN .ASIC-.TART |
000002D0: 24 30 38 30 31 2E 20 20 C4 49 45 53 20 20 4D 41 |$0801. .IES MA|
000002E0: 43 48 54 20 20 44 49 45 46 4F 4C 47 45 4E 44 45 |CHT DIEFOLGENDE|
000002F0: 20 D2 4F 55 54 49 4E 45 3A 20 20 20 20 20 20 20 | .OUTINE: |
00000300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000350: 20 20 33 35 30 20 20 2D 53 54 41 52 54 20 20 20 | 350 -START |
00000360: 20 4C 44 41 20 23 24 33 36 20 20 20 20 20 20 20 | LDA #$36 |
00000370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000380: 20 20 20 20 20 20 20 33 36 30 20 20 2D 20 20 20 | 360 - |
00000390: 20 20 20 20 20 20 53 54 41 20 24 30 31 20 20 20 | STA $01 |
000003A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003B0: 20 20 20 20 20 20 20 20 20 20 20 20 33 37 30 20 | 370 |
000003C0: 20 2D 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 | -; |
000003D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003F0: 20 33 37 31 20 20 2D 20 20 20 20 20 20 20 20 20 | 371 - |
00000400: 4C 44 58 20 23 30 30 20 20 20 20 20 20 20 20 20 |LDX #00 |
00000410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000420: 20 20 20 20 20 20 33 37 32 20 20 2D 20 20 20 20 | 372 - |
00000430: 20 20 20 20 20 4C 44 59 20 23 30 38 20 20 20 20 | LDY #08 |
00000440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000450: 20 20 20 20 20 20 20 20 20 20 20 33 37 33 20 20 | 373 |
00000460: 2D 20 20 20 20 20 20 20 20 20 53 54 58 20 4C 41 |- STX LA|
00000470: 42 35 2B 31 20 20 20 20 20 20 20 20 20 20 20 20 |B5+1 |
00000480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000490: 33 37 34 20 20 2D 20 20 20 20 20 20 20 20 20 53 |374 - S|
000004A0: 54 59 20 4C 41 42 35 2B 32 20 20 20 20 20 20 20 |TY LAB5+2 |
000004B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004C0: 20 20 20 20 20 | |
.@REICH KOPIERT, WO ER ETWAS SICHERER A
UFGEHOBEN IST,N.MLICH IN DEN BEREICH
$CBAF BIS $CFF0. DIESGESCHIEHT MI
T HILFE EINER ROUTINE AUS DEM BASIC-ROM
,N.MLICH DER ROUTINE MOVE. SIE WIRD
FOLGENDERMA.ENAUFGERUFEN:
$5F/$60 : STARTADRESSE DES ZU KOPIERENDE
N BLOCKS $5A/$5B : ENDADRESSE DES ZU
KOPIERENDEN BLOCKS $58/$59 : NEUE
ENDADRESSE DES ZU KOPIERENDEN BLOCKS S
TARTADRESSE: $A3BF
NACHDEM DER VIR
US KOPIERT IST, MU. DIESER DAS INFI-ZI
ERTE PROGRAMM WIEDER NACH UNTEN KOPIERE
N, N.MLICHAN DEN NORMALEN BASIC-START
$0801. DIES MACHT DIEFOLGENDE ROUTINE
:
350 -START LDA #$36
360 - ST
A $01 370
-;
371 - LDX #00
372 - LDY
#08 373
- STX LAB5+1
374 - STY LAB5+2
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL