*=$1000 sei lda #$0b sta $d011 ldy #$01 loop ldx #$01 dex bne *-1 nop sty $d020 ldx #$01 dex bne *-1 nop stx $d020 jmp loop
//Set up a 16x16 charset.. ldy #$0f !loop: clc tya ldx #0 ss: sta screen+$0354,x inx adc #$10 bcc ss lda ss+1 sbc #40 sta ss+1 bcs !+ dec ss+2 !: dey bpl !loop-
start: sei lda #$01 sta $de01 lda #$00 sta $d011 loop: lda $de08 lda $de09 sta $d418 sta $d020 jmp loop
;Example of code with way too many comments... lda #$00 ;load the CPU's "accumulator" register with the value 0 sta $d020 ;store it to the VIC-II chip's border color register, ;thus making the border color black sta $d021 ;also store the same value (0) to the VIC-II chip's background ;color register, thus having the same effect as before, namely ;to produce black color, except that this time it's for the ;screen's background color
*=$1000 lda #$3b sta $d011 lda #$18 sta $d018 lda #<$2000 ldy #>$2000 sta $f0 sty $f1 lda #%01010101 sta $f2 ldx #31 fillhires ldy #$00 loop1 sta ($f0),y eor #%10101010 iny bne loop1 inc $f1 dex bpl fillhires mainloop lda #>$0400 sta $f1 ldx #3 fillscreen ldy #$00 loop2 tya eor $f2 sta ($f0),y iny bne loop2 inc $f2 inc $f1 dex bpl fillscreen jmp mainloop
*=$1000 lda $00 sta $d011 sei loop ldy #$70 lda $02 cpy $d012 bne *-3 sta $d020 ldy #$80 lda $01 cpy $d012 bne *-3 sta $d020 ldy #$90 lda $06 cpy $d012 bne *-3 sta $d020 ldy #$80 lda $00 cpy $d012 bne *-3 sta $d020 jmp loop
;Flag of Libya... =) lda #$00 sta $d011 lda #$05 sta $d020
*=$1000 sei lda #$0b sta $d011 lda #$00 ldy #$07 ldx #$02 loop sta $d020 nop sty $d020 nop stx $d020 nop jmp loop
so the bits of collision register gives you info which fonts/cahrs are used by your vector and these chars should be clear :)))
