ack/mach/6500/libem/sti1.s
1984-12-17 11:03:13 +00:00

17 lines
266 B
ArmAsm

.define Sti1
! This subroutine stores an onebyte wordfractional at the address
! which is in registerpair AX.
Sti1:
stx ADDR ! address of byte (lowbyte)
sta ADDR+1 ! address of byte (highbyte)
jsr Pop ! get byte
ldy #0
txa
sta (ADDR),y ! store byte
rts