26 lines
245 B
ArmAsm
26 lines
245 B
ArmAsm
.org $8000
|
|
reset:
|
|
;; set output register
|
|
lda #$ff
|
|
sta $6002
|
|
|
|
;; flash the lights
|
|
;; lda #$50
|
|
;; sta $6000
|
|
|
|
;; start at 0
|
|
lda #$00
|
|
|
|
loop:
|
|
sta $6000
|
|
;; increment
|
|
adc #$1
|
|
|
|
jmp loop
|
|
|
|
|
|
.org $fffc
|
|
.word reset
|
|
.word $0000
|
|
|
|
|