Hi Kinder ;),
ich hab mit den Rastern weiter gemacht und bin jetzt soweit Sie zu animieren bzw. als Vorstufe nen ColorCycler zu machen !
Teilweise funzt das auch so wie ich mir das vorgestellt habe aber eben nur teilweise denn die Farbe scrollt weg.
Aber eigentlich soll sie mit jeder Farbe die unten rausscrollt oben eine neue setzen !
Hier ist mein source :
Code
- !to "rasterinterrupt-12.prg",cbm
- *= $0800
- !byte $00,$0c,$08,$0a,$00,$9e,$32,$31,$32,$38,$00,$00,$00,$00
- *=$0850
- sei ;2
- lda #$7f ;2
- sta $dc0d ;4
- lda $dc0d ;4
- lda $d011 ;4
- and #$7f ;2
- sta $d011 ;4
- lda #$01 ;2
- sta $d01a ;4 28
- ;---------------------------------------------------------
- ldx #<irq ;2
- ldy #>irq ;2
- stx $0314 ;4
- sty $0315 ;4
- cli ;2
- .verzögern rts ;6
- irq
- lda #$82 ; ist eine Character - Zeile ;2
- sta $d012 ;4
- dec $d019 ;4 10
- ;---------------------------------------------------------
- jsr .verzögern ;--- 26
- jsr .verzögern ;---
- nop;--------------- 64
- ;-------------------------------------------------------------------
- ldy #$00
- ;-----------------
- .loop1 ldx #$08 ;2
- .loop2 lda color,y ;4
- sta $d020 ;4
- sta $d021 ;4
- iny ;2
- dex ;2
- beq .loop1 ;3
- ;------------------------------------------------------------------
- lda .verzögern ;4
- jsr .verzögern ;12
- jsr .verzögern ;12
- jsr .verzögern ;12
- cpy #$47 ;2
- bcc .loop2 ;3 bei Verzweigung sonst 2 -------------------------------------------------------------------
- lda #$0e
- sta $d020
- lda #$06
- sta $d021
- .loop3 lda color,y
- sta color+1,y
- dey
- bpl .loop3
- jmp $ea31
- color
- !byte $0b, $09, $02, $08, $0a, $0f, $07, $01
- !byte $06, $04, $0e, $05, $03, $0d, $01
- !byte $06, $0b, $04, $0e, $03, $0d, $07, $01
- !byte $0b, $09, $08, $05, $03, $0d, $07, $01
- !byte $0b, $02, $0c, $0a, $0f, $0d, $07, $01
- !byte $0b, $09, $08, $0c, $0f, $07, $01
- !byte $02, $04, $0c, $0a, $0f, $07, $01
- !byte $09, $0b, $08, $0c, $0a, $0f, $0d, $07, $01
- !byte $09, $0b, $08, $0c, $0a, $0f, $0d, $07, $01
hoffe ihr könnt mir helfen und DANKE schon mal vorab !!!
Spindizzy