qasm/lup.s
2023-02-04 15:34:50 -08:00

23 lines
175 B
ArmAsm

lst on
xc off
xc
xc
org $2000
macro mac
lup 4
lda #$00
eom
start pha
lup 5
]1 asl
bcs ]1
--^
pla
macro
end