cpu 6502 nam Bitmap2 page 128,128 vidmem = $4000 colmem = $4400 * = $4800 ;Where main code lies code sei lda #$01 ; border ldx #$01 ; bkgnd sta $d020 stx $d021 lda #$3b ;<--- Turn on bitmap mode ldx #$18 ;<--- Turn on all bitmap characters ldy #$03 sta $d011 stx $d018 stx $d016 sty $dd00 ldx #$00 .setpic lda vidmem,x sta $0400,x lda vidmem+$100,x sta $0500,x lda vidmem+$200,x sta $0600,x lda vidmem+$2e8,x sta $06e8,x lda colmem,x sta $d800,x lda colmem+$100,x sta $d900,x lda colmem+$200,x sta $da00,x lda colmem+$2e8,x sta $dae8,x inx bne .setpic ;; set colours (4?) and dots ldx #$00 lda #$04 .top cpx #$FF beq .done sta $4400,x sta $4500,x sta $4600,x sta $4700,x sta $4000,x sta $4100,x sta $4200,x sta $4300,x jmp .top .done nop .hold lda $dc01 cmp #$ef bne .hold rts nop nop nop code