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

19 lines
329 B
ArmAsm

.define Zrl, Zro
! The subroutine Zrl makes a local zero which offset is to big.
! The offset of the local is in registerpair AX.
! The subroutine Zro is used if the address is already in zeropage.
Zrl:
jsr Locaddr ! get address of local
Zro:
lda #0
tay
sta (ADDR),y ! lowbyte = 0
iny
sta (ADDR),y ! highbyte = 0
rts