base:rasterbars_with_screen_on
no way to compare when less than two revisions
Differences
This shows you the differences between two versions of the page.
— | base:rasterbars_with_screen_on [2015-04-17 04:33] (current) – created - external edit 127.0.0.1 | ||
---|---|---|---|
Line 1: | Line 1: | ||
+ | ====== Rasterbars 2 source ====== | ||
+ | <code 6502acme> | ||
+ | ;coded by Bitbreaker Oxyron ^ Nuance ^ Arsenic | ||
+ | ;feel free to change $d020/$d021 to other registers like $d022/$d023 for effects with multicolor charsets | ||
+ | ;as you see, there are plenty of cycles free for more action. | ||
+ | |||
+ | * = $2000 | ||
+ | |||
+ | tmpa = $22 | ||
+ | tmpx = $23 | ||
+ | tmpy = $24 | ||
+ | tmp_1 = $25 | ||
+ | |||
+ | sei | ||
+ | lda #$7f | ||
+ | sta $dc0d | ||
+ | lda $dc0d | ||
+ | lda #$01 | ||
+ | sta $d01a | ||
+ | sta $d019 | ||
+ | lda #$32 | ||
+ | sta $d012 | ||
+ | lda $d011 | ||
+ | and #$3f | ||
+ | sta $d011 | ||
+ | lda #$34 | ||
+ | sta $01 | ||
+ | lda #<irq1 | ||
+ | sta $fffe | ||
+ | lda #>irq1 | ||
+ | sta $ffff | ||
+ | cli | ||
+ | jmp * | ||
+ | |||
+ | irq1 | ||
+ | ;irq enter stuff | ||
+ | sta tmpa | ||
+ | stx tmpx | ||
+ | sty tmpy | ||
+ | lda $01 | ||
+ | sta tmp_1 | ||
+ | lda #$35 | ||
+ | sta $01 | ||
+ | dec $d019 | ||
+ | |||
+ | ldx #$01 | ||
+ | dex | ||
+ | bpl *-1 | ||
+ | |||
+ | ;do raster | ||
+ | jsr raster | ||
+ | |||
+ | ;exit irq | ||
+ | lda tmp_1 | ||
+ | sta $01 | ||
+ | ldy tmpy | ||
+ | ldx tmpx | ||
+ | lda tmpa | ||
+ | rti | ||
+ | |||
+ | raster | ||
+ | ldx #$00 | ||
+ | -- | ||
+ | ldy #$07 ;2 | ||
+ | |||
+ | lda tab,x ;4 | ||
+ | sta $d020 ;4 | ||
+ | sta $d021 ;4 | ||
+ | | ||
+ | cpx #$c8 ;2 | ||
+ | beq + ;2 | ||
+ | | ||
+ | - | ||
+ | lda tab,x ;4 | ||
+ | sta $d020 ;4 | ||
+ | sta $d021 ;4 | ||
+ | jsr + ;12 | ||
+ | jsr + ;12 | ||
+ | jsr + ;12 _48 | ||
+ | | ||
+ | | ||
+ | cpx #$c8 ;2 | ||
+ | beq + ;2 | ||
+ | | ||
+ | beq -- ;2 / 3 _61 (+2) | ||
+ | bne - ;3 _63 | ||
+ | + | ||
+ | rts | ||
+ | |||
+ | !align 255, 0 | ||
+ | |||
+ | ;your colors go here | ||
+ | tab | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | !text " | ||
+ | </ |
base/rasterbars_with_screen_on.txt · Last modified: 2015-04-17 04:33 by 127.0.0.1