1
0
mirror of https://github.com/sehugg/8bitworkshop.git synced 2024-10-31 23:09:49 +00:00
8bitworkshop/presets/williams/test.xasm
2019-08-06 17:16:47 -04:00

29 lines
414 B
Plaintext

palette equ $c000
vidmem equ $0
wdogx39 equ $cbff
Start:
ldx #0
Loop:
lda >PALCONST,x
sta palette,x
leax 1,x
cpx #16
bne Loop
ldx #0
Loop2:
lda #$39
sta wdogx39
stx ,x
leax 1,x
cpx #$9800
bne Loop2
jmp Loop ; endless loop
PALCONST:
fcb $1,$2,$4,$8,$10,$20,$40,$80
fcb $88,$c0,$e0,$f0,$f8,$fc,$fe,$ff