base:rasterbars_small_source
no way to compare when less than two revisions
Differences
This shows you the differences between two versions of the page.
— | base:rasterbars_small_source [2015-04-17 04:33] (current) – created - external edit 127.0.0.1 | ||
---|---|---|---|
Line 1: | Line 1: | ||
+ | ====== Rasterbars 3 source ====== | ||
+ | |||
+ | A minimalistic rasterbar routine. No timing tables used. | ||
+ | |||
+ | < | ||
+ | ;coded by Graham/ | ||
+ | |||
+ | *= $c000 | ||
+ | |||
+ | lda #$7f | ||
+ | sta $dc0d | ||
+ | and $d011 | ||
+ | sta $d011 | ||
+ | lda #$32 | ||
+ | sta $d012 | ||
+ | |||
+ | sei | ||
+ | lda #<irq | ||
+ | sta $0314 | ||
+ | lda #>irq | ||
+ | sta $0315 | ||
+ | lda #$01 | ||
+ | sta $d01a | ||
+ | cli | ||
+ | rts | ||
+ | |||
+ | irq: | ||
+ | lda #$ff | ||
+ | sta $d019 | ||
+ | |||
+ | ldx #$05 | ||
+ | d dex | ||
+ | bne d | ||
+ | |||
+ | ldx #$00 | ||
+ | c ldy #$08 | ||
+ | a lda colors,x | ||
+ | sta $d020 | ||
+ | sta $d021 | ||
+ | inx | ||
+ | dey | ||
+ | beq c | ||
+ | |||
+ | txa | ||
+ | ldx #$07 | ||
+ | b dex | ||
+ | bne b | ||
+ | tax | ||
+ | |||
+ | cpx #$8c | ||
+ | bcc a | ||
+ | |||
+ | jmp $ea34 | ||
+ | |||
+ | *= $c100 | ||
+ | colors: | ||
+ | .byte $09, | ||
+ | .byte $06, | ||
+ | .byte $09, | ||
+ | .byte $06, | ||
+ | .byte $09, | ||
+ | .byte $06, | ||
+ | .byte $09, | ||
+ | .byte $06, | ||
+ | .byte $09, | ||
+ | .byte $06, | ||
+ | </ | ||
base/rasterbars_small_source.txt · Last modified: 2015-04-17 04:33 by 127.0.0.1