DEV Community

arinak1017
arinak1017

Posted on

Modifying the 6502 Assembly Program

Hello, Blog!

As promised, in this post, I’ll share the small tweaks I made to modify the functionality of the screen colouring 6502 assembly program.

If you have just stumbled upon my SPO600 series of blog posts, it has been created to document and share my learnings as I progress through my Software Portability and Optimization college course.

Taking a look at the given program

The following code fills the emulator's display with the yellow colour:

 lda #$00    ; set a pointer in memory location $40 to point to $0200
    sta $40     ; ... low byte ($00) goes in address $40
    lda #$02    
    sta $41     ; ... high byte ($02) goes into address $41
    lda #$07    ; colour number
    ldy #$00    ; set index to 0
 loop:  sta ($40),y ; set pixel colour at the address (pointer)+Y
    iny     ; increment index
    bne loop    ; continue until done the page (256 pixels)
    inc $41     ; increment the page
    ldx $41     ; get the current page number
    cpx #$06    ; compare with 6
    bne loop    ; continue until done all pages
Enter fullscreen mode Exit fullscreen mode

Image description

Filling the display with a different colour

To fill the display with the colour of choice I just needed to load the value associated with the colour into the accumulator.

  • You can find information about the colour values by clicking the "Notes" button in the emulator and scrolling down to the "Bitmapped Display" section.

We can see that light blue = $e

Image description

lda #$00
    sta $40 
    lda #$02    
    sta $41
    lda #$0e  ; load $0e (light blue) instead of $07 (yellow) into the accumulator
    ldy #$00
 loop:  sta ($40),y
    iny
    bne loop
    inc $41
    ldx $41
    cpx #$06
    bne loop
Enter fullscreen mode Exit fullscreen mode

Image description

Filling the display with different colour on each page

To colour each of the four pages with different colours, I decided to increment the colour value stored in the accumulator each time a page gets filled.

    lda #$00
    sta $40 
    lda #$02    
    sta $41
    lda #$07
    ldy #$00
 loop:  sta ($40),y
    iny
    bne loop
    inc $41
        adc #$01  ; increment the value in the accumulator, so the next page is coloured with different colour
    ldx $41
    cpx #$06
    bne loop
Enter fullscreen mode Exit fullscreen mode

Image description

Making each pixel a random colour

Achieving this was a bit trickier, as getting random colour values involved using pseudo-random number generator located at address $FE in the emulator's Zero Page.

    lda #$00
    sta $40 
    lda #$02    
    sta $41
    ldy #$00
 loop: lda $fe ; load colour value from the pseudo-random number generator on each loop iteration
        sta ($40),y
    iny
    bne loop
    inc $41
    ldx $41
    cpx #$06
    bne loop
Enter fullscreen mode Exit fullscreen mode

Image description

P. S.

Playing around with the Assembly code provided by the professor was fun. I found that the key to effectively tweaking the code was a solid understanding of the logic behind the original program.

Thank you for reading my post!

Top comments (0)