GBA - Pretty xmas colors

.arm
.text
.global main
main:
    ldr r1, =0x04000000
    ldr r2, =0x03
    str r2,[r1]
    ldr r1,=((255)+(0<<5)+(0<<10))
    ldr r2,=((0)+(255<<5)+(0<<10))
    ldr r4, =0x06000000
    add r4, r4, #0x20
    mov r6, #0x0
    mov r7, #0x0
firstPass:
    mov r5, r1
    mov r1, r2
    mov r2, r5
    mov r5, #0x0
    add r4, r4, #0x08
    str r1,[r4]
    str r2, [r5]
    add r6, r6, #0x01
    cmp r6, #0x3B
    bne firstPass
    mov r6, #0x0
    add r4, r4, #0x02
    add r7, r7, #0x01
    cmp r7, #0xFF
    beq endLoop
    bne firstPass

endLoop:
    b endLoop