00000000: 20 20 20 20 20 20 20 20 20 2A 3D 20 24 31 30 30 | *= $100|
00000010: 30 0D 0D 5A 45 52 4F 20 20 20 20 20 3D 20 24 35 |0..ZERO = $5|
00000020: 30 20 20 20 20 20 20 20 3B 20 D7 20 C9 20 C3 20 |0 ; . . . |
00000030: C8 20 D4 20 C9 20 C7 20 21 0D 4C 41 45 4E 47 45 |. . . . !.LAENGE|
00000040: 20 20 20 3D 20 32 30 32 0D 45 4E 44 45 20 20 20 | = 202.ENDE |
00000050: 20 20 3D 20 24 45 41 33 31 0D 0D 46 41 52 42 45 | = $EA31..FARBE|
00000060: 4E 20 20 20 3D 20 24 43 44 30 30 3B 20 20 5F 20 |N = $CD00; _ |
00000070: 20 46 49 4C 45 20 22 C4 C5 CD CF 20 C3 CF CC CF | FILE ".... ....|
00000080: D2 D3 22 0D 20 20 20 20 20 20 20 20 20 20 3B B8 |..". ;.|
00000090: B8 B8 B8 B8 20 20 20 20 20 20 4D 55 53 53 20 56 |.... MUSS V|
000000A0: 4F 52 20 44 45 4D 20 53 54 41 52 54 0D 20 20 20 |OR DEM START. |
000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000C0: 20 20 3B 47 45 4C 41 44 45 4E 20 57 45 52 44 45 | ;GELADEN WERDE|
000000D0: 4E 0D 20 20 20 20 20 20 20 20 20 53 45 49 0D 20 |N. SEI. |
000000E0: 20 20 20 20 20 20 20 20 4C 44 41 20 23 3C 49 52 | LDA #<IR|
000000F0: 51 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 |Q. LDX #|
00000100: 3E 49 52 51 0D 20 20 20 20 20 20 20 20 20 53 54 |>IRQ. ST|
00000110: 41 20 24 30 33 31 34 0D 20 20 20 20 20 20 20 20 |A $0314. |
00000120: 20 53 54 58 20 24 30 33 31 35 0D 20 20 20 20 20 | STX $0315. |
00000130: 20 20 20 20 4C 44 41 20 23 24 30 31 0D 20 20 20 | LDA #$01. |
00000140: 20 20 20 20 20 20 53 54 41 20 24 44 30 31 41 0D | STA $D01A.|
00000150: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 | LDA #$0|
00000160: 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |0. STA $|
00000170: 44 43 30 45 0D 20 20 20 20 20 20 20 20 20 4C 44 |DC0E. LD|
00000180: 41 20 23 24 31 42 0D 20 20 20 20 20 20 20 20 20 |A #$1B. |
00000190: 53 54 41 20 24 44 30 31 31 0D 20 20 20 20 20 20 |STA $D011. |
000001A0: 20 20 20 43 4C 49 0D 20 20 20 20 20 20 20 20 20 | CLI. |
000001B0: 52 54 53 0D 0D 49 52 51 20 20 20 20 20 20 49 4E |RTS..IRQ IN|
000001C0: 43 20 24 44 30 31 39 0D 49 52 51 51 20 20 20 20 |C $D019.IRQQ |
000001D0: 20 4A 4D 50 20 49 52 51 31 0D 0D 49 52 51 31 20 | JMP IRQ1..IRQ1 |
000001E0: 20 20 20 20 4C 44 58 20 23 35 0D 57 41 49 54 20 | LDX #5.WAIT |
000001F0: 20 20 20 20 44 45 58 0D 20 20 20 20 20 20 20 20 | DEX. |
00000200: 20 42 4E 45 20 57 41 49 54 0D 20 20 20 20 20 20 | BNE WAIT. |
00000210: 20 20 20 4C 44 59 20 23 30 0D 42 52 41 4E 43 48 | LDY #0.BRANCH|
00000220: 31 20 20 4C 44 58 20 23 38 0D 42 52 41 4E 43 48 |1 LDX #8.BRANCH|
00000230: 32 20 20 4C 44 41 20 46 41 52 42 45 4E 2C 59 0D |2 LDA FARBEN,Y.|
00000240: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 44 30 | STA $D0|
00000250: 32 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |20. STA |
00000260: 24 44 30 32 31 0D 0D 20 20 20 20 20 20 20 20 20 |$D021.. |
00000270: 49 4E 59 0D 20 20 20 20 20 20 20 20 20 44 45 58 |INY. DEX|
00000280: 0D 20 20 20 20 20 20 20 20 20 42 45 51 20 42 52 |. BEQ BR|
00000290: 41 4E 43 48 31 0D 20 20 20 20 20 20 20 20 20 53 |ANCH1. S|
000002A0: 54 58 20 5A 45 52 4F 0D 20 20 20 20 20 20 20 20 |TX ZERO. |
000002B0: 20 4C 44 58 20 23 36 0D 4C 4F 4F 50 0D 20 20 20 | LDX #6.LOOP. |
000002C0: 20 20 20 20 20 20 44 45 58 0D 20 20 20 20 20 20 | DEX. |
000002D0: 20 20 20 42 4E 45 20 4C 4F 4F 50 0D 20 20 20 20 | BNE LOOP. |
000002E0: 20 20 20 20 20 4C 44 58 20 5A 45 52 4F 0D 20 20 | LDX ZERO. |
000002F0: 20 20 20 20 20 20 20 42 49 54 20 24 30 32 0D 0D | BIT $02..|
00000300: 20 20 20 20 20 20 20 20 20 43 50 59 20 23 4C 41 | CPY #LA|
00000310: 45 4E 47 45 0D 20 20 20 20 20 20 20 20 20 42 43 |ENGE. BC|
00000320: 43 20 42 52 41 4E 43 48 32 0D 20 20 20 20 20 20 |C BRANCH2. |
00000330: 20 20 20 4C 44 41 20 23 24 33 32 0D 20 20 20 20 | LDA #$32. |
00000340: 20 20 20 20 20 53 54 41 20 24 44 30 31 32 0D 20 | STA $D012. |
00000350: 20 20 20 20 20 20 20 20 4A 4D 50 20 45 4E 44 45 | JMP ENDE|
00000360: 0D 0D |.. |
*= $1000..ZERO = $50
; W I C H T I G !.LAENGE = 202.ENDE
= $EA31..FARBEN = $CD00; _ FILE "D
EMO COLORS". ;..... MUSS V
OR DEM START. ;GELAD
EN WERDEN. SEI. LDA #<IR
Q. LDX #>IRQ. STA $0314.
STX $0315. LDA #$01.
STA $D01A. LDA #$00.
STA $DC0E. LDA #$1B.
STA $D011. CLI. RTS..IRQ
INC $D019.IRQQ JMP IRQ1..IRQ1
LDX #5.WAIT DEX. BNE WAI
T. LDY #0.BRANCH1 LDX #8.BRANCH
2 LDA FARBEN,Y. STA $D020.
STA $D021.. INY. DEX
. BEQ BRANCH1. STX ZERO.
LDX #6.LOOP. DEX.
BNE LOOP. LDX ZERO. B
IT $02.. CPY #LAENGE. BC
C BRANCH2. LDA #$32. STA
$D012. JMP ENDE..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL