00000000: 00 40 C4 49 45 20 DA 45 49 4C 45 4E 20 32 38 31 |.@.IE .EILEN 281|
00000010: 30 20 55 4E 44 20 32 38 31 32 20 4B 45 4E 4E 45 |0 UND 2812 KENNE|
00000020: 4E 20 D3 49 45 20 4A 41 20 4E 4F 43 48 20 20 41 |N .IE JA NOCH A|
00000030: 55 53 20 20 44 45 52 4C 45 54 5A 54 45 4E 20 C1 |US DERLETZTEN .|
00000040: 55 53 47 41 42 45 2C 20 44 45 53 48 41 4C 42 20 |USGABE, DESHALB |
00000050: 45 52 46 4F 4C 47 54 20 20 48 49 45 52 20 20 4B |ERFOLGT HIER K|
00000060: 45 49 4E 45 20 20 C5 52 4B 4C 85 2D 52 55 4E 47 |EINE .RKL.-RUNG|
00000070: 2E 20 C9 4E 20 DA 45 49 4C 45 20 32 38 33 30 20 |. .N .EILE 2830 |
00000080: 57 49 52 44 20 44 45 52 20 C9 4E 48 41 4C 54 20 |WIRD DER .NHALT |
00000090: 44 45 52 20 D3 50 45 49 43 48 45 52 5A 45 4C 4C |DER .PEICHERZELL|
000000A0: 45 C3 CF D0 D9 20 4E 41 43 48 20 4C 49 4E 4B 53 |E.... NACH LINKS|
000000B0: 20 52 4F 54 49 45 52 54 2E 20 C4 41 53 20 48 45 | ROTIERT. .AS HE|
000000C0: 49 88 54 2C 20 44 41 88 20 44 45 52 20 D3 54 41 |I.T, DA. DER .TA|
000000D0: 52 54 57 45 52 54 28 4E 85 4D 4C 49 43 48 20 31 |RTWERT(N.MLICH 1|
000000E0: 29 2C 20 44 45 4E 20 57 49 52 20 41 4D 20 20 C1 |), DEN WIR AM .|
000000F0: 4E 46 41 4E 47 20 20 56 4F 4E 20 20 C9 CE C9 D4 |NFANG VON ....|
00000100: 20 20 48 49 4E 45 49 4E 47 45 2D 53 43 48 52 49 | HINEINGE-SCHRI|
00000110: 45 42 45 4E 20 48 41 54 54 45 4E 2C 20 53 4F 4C |EBEN HATTEN, SOL|
00000120: 41 4E 47 45 20 57 45 49 54 45 52 47 45 53 43 48 |ANGE WEITERGESCH|
00000130: 4F 42 45 4E 20 20 57 49 52 44 2C 20 20 42 49 53 |OBEN WIRD, BIS|
00000140: 45 52 20 49 4E 53 20 C3 41 52 52 59 46 4C 41 47 |ER INS .ARRYFLAG|
00000150: 20 87 42 45 52 4C 85 55 46 54 2E 20 D5 4E 44 20 | .BERL.UFT. .ND |
00000160: 44 41 20 45 49 4E 20 C2 59 54 45 20 41 43 48 54 |DA EIN .YTE ACHT|
00000170: 20 20 C2 49 54 42 45 53 49 54 5A 54 2C 20 4D 55 | .ITBESITZT, MU|
00000180: 88 20 41 43 48 54 20 4D 41 4C 20 52 4F 54 49 45 |. ACHT MAL ROTIE|
00000190: 52 54 20 20 57 45 52 44 45 4E 2C 20 20 44 41 4D |RT WERDEN, DAM|
000001A0: 49 54 20 20 44 49 45 53 45 52 C6 41 4C 4C 20 45 |IT DIESER.ALL E|
000001B0: 49 4E 54 52 49 54 54 2E 20 20 20 20 20 20 20 20 |INTRITT. |
000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001D0: 20 20 20 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 20 20 | |
000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000210: 20 20 20 20 D7 45 4E 44 45 4E 20 57 49 52 20 55 | .ENDEN WIR U|
00000220: 4E 53 20 4E 55 4E 20 57 49 45 44 45 52 20 44 45 |NS NUN WIEDER DE|
00000230: 52 20 C9 CE C9 D4 2D D2 4F 55 54 49 4E 45 20 5A |R ....-.OUTINE Z|
00000240: 55 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |U: |
00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 30 | 20|
00000280: 38 30 20 2D 49 4E 49 54 32 20 20 20 20 4C 44 59 |80 -INIT2 LDY|
00000290: 20 23 30 33 20 20 20 20 20 3B DA 85 48 4C 45 52 | #03 ;..HLER|
000002A0: 20 4C 41 44 45 4E 20 20 20 20 20 20 20 20 20 20 | LADEN |
000002B0: 20 20 20 32 30 39 30 20 2D 4C 4F 4F 50 33 20 20 | 2090 -LOOP3 |
000002C0: 20 20 4C 44 41 20 54 41 42 2C 59 20 20 20 3B D6 | LDA TAB,Y ;.|
000002D0: 45 4B 54 4F 52 54 41 42 45 4C 4C 45 20 20 20 20 |EKTORTABELLE |
000002E0: 20 20 20 20 20 20 20 20 32 31 30 30 20 2D 20 20 | 2100 - |
000002F0: 20 20 20 20 20 20 20 53 54 41 20 24 30 33 33 30 | STA $0330|
00000300: 2C 59 20 3B 55 4D 4B 4F 50 49 45 52 45 4E 20 20 |,Y ;UMKOPIEREN |
00000310: 20 20 20 20 20 20 20 20 20 20 20 20 20 32 31 31 | 211|
00000320: 30 20 2D 20 20 20 20 20 20 20 20 20 44 45 59 20 |0 - DEY |
00000330: 20 20 20 20 20 20 20 20 3B DA 85 48 4C 45 52 20 | ;..HLER |
00000340: 48 45 52 55 4E 54 45 52 5A 85 48 4C 45 4E 20 20 |HERUNTERZ.HLEN |
00000350: 20 20 32 31 32 30 20 2D 20 20 20 20 20 20 20 20 | 2120 - |
00000360: 20 42 50 4C 20 4C 4F 4F 50 33 20 20 20 3B C6 45 | BPL LOOP3 ;.E|
00000370: 52 54 49 47 3F 20 20 20 20 20 20 20 20 20 20 20 |RTIG? |
00000380: 20 20 20 20 20 20 20 32 31 33 30 20 2D 3B 20 20 | 2130 -; |
00000390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
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 32 31 34 30 | 2140|
000003C0: 20 2D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 | - LDY #|
000003D0: 30 38 20 20 20 20 20 3B CA 41 20 2D 3E 20 DA 85 |08 ;.A -> ..|
000003E0: 48 4C 45 52 20 4C 41 44 45 4E 2E 20 20 20 20 20 |HLER LADEN. |
000003F0: 20 32 31 35 30 20 2D 4C 4F 4F 50 34 20 20 20 20 | 2150 -LOOP4 |
00000400: 4C 44 41 20 43 42 4D 2C 59 20 20 20 3B D2 45 53 |LDA CBM,Y ;.ES|
00000410: 45 54 2D CB 45 4E 4E 55 4E 47 20 20 20 20 20 20 |ET-.ENNUNG |
00000420: 20 20 20 20 20 20 32 31 36 30 20 2D 20 20 20 20 | 2160 - |
00000430: 20 20 20 20 20 53 54 41 20 24 38 30 30 30 2C 59 | STA $8000,Y|
00000440: 20 3B 55 4D 4B 4F 50 49 45 52 45 4E 20 20 20 20 | ;UMKOPIEREN |
00000450: 20 20 20 20 20 20 20 20 20 20 20 32 31 37 30 20 | 2170 |
00000460: 2D 20 20 20 20 20 20 20 20 20 44 45 59 20 20 20 |- DEY |
00000470: 20 20 20 20 20 20 3B DA 85 48 4C 45 52 20 48 45 | ;..HLER HE|
00000480: 52 55 4E 54 45 52 5A 85 48 4C 45 4E 20 20 20 20 |RUNTERZ.HLEN |
00000490: 32 31 38 30 20 2D 20 20 20 20 20 20 20 20 20 42 |2180 - B|
000004A0: 50 4C 20 4C 4F 4F 50 34 20 20 20 3B C6 45 52 54 |PL LOOP4 ;.ERT|
000004B0: 49 47 3F 20 20 20 20 20 20 20 20 20 20 20 20 20 |IG? |
000004C0: 20 20 20 20 20 | |
.@DIE ZEILEN 2810 UND 2812 KENNEN SIE JA
NOCH AUS DERLETZTEN AUSGABE, DESHALB
ERFOLGT HIER KEINE ERKL.-RUNG. IN ZEI
LE 2830 WIRD DER INHALT DER SPEICHERZELL
ECOPY NACH LINKS ROTIERT. DAS HEI.T, DA.
DER STARTWERT(N.MLICH 1), DEN WIR AM A
NFANG VON INIT HINEINGE-SCHRIEBEN HAT
TEN, SOLANGE WEITERGESCHOBEN WIRD, BIS
ER INS CARRYFLAG .BERL.UFT. UND DA EIN B
YTE ACHT BITBESITZT, MU. ACHT MAL ROTIE
RT WERDEN, DAMIT DIESERFALL EINTRITT.
WENDEN WIR UNS NUN WIEDER DE
R INIT-ROUTINE ZU:
20
80 -INIT2 LDY #03 ;Z.HLER LADEN
2090 -LOOP3 LDA TAB,Y ;V
EKTORTABELLE 2100 - S
TA $0330,Y ;UMKOPIEREN 211
0 - DEY ;Z.HLER HERUNTER
Z.HLEN 2120 - BPL LOOP3 ;FE
RTIG? 2130 -;
2140
- LDY #08 ;JA -> Z.HLER LAD
EN. 2150 -LOOP4 LDA CBM,Y ;RES
ET-KENNUNG 2160 - STA
$8000,Y ;UMKOPIEREN 2170
- DEY ;Z.HLER HERUNTERZ.
HLEN 2180 - BPL LOOP4 ;FERT
IG?
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL