mirror of
https://github.com/marketideas/qasm.git
synced 2024-12-28 21:30:37 +00:00
26 lines
195 B
ArmAsm
26 lines
195 B
ArmAsm
lst
|
|
xc
|
|
xc
|
|
|
|
mx %00
|
|
org $4000
|
|
|
|
getkey = $FF00
|
|
|
|
]myvar = getkey
|
|
|
|
start nop
|
|
ldy #$00
|
|
]loop sta $800,y
|
|
dey
|
|
;dw ]loop;]loop2
|
|
;bne ]myvar;
|
|
|
|
bcs ]loop
|
|
bpl ]loop
|
|
rts
|
|
|
|
;use var
|
|
lst on
|
|
|