1
0
mirror of https://gitlab.com/camelot/kickc.git synced 2024-11-20 02:32:36 +00:00
kickc/src/test/ref/forclassicmin.asm

18 lines
230 B
NASM

// Minimal classic for() loop
.pc = $801 "Basic"
:BasicUpstart(main)
.pc = $80d "Program"
.label SCREEN = $400
main: {
ldx #0
__b1:
cpx #$64
bne __b2
rts
__b2:
txa
sta SCREEN,x
inx
jmp __b1
}