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

18 lines
293 B
ArmAsm

.define Sbi4
! This subroutine subtracts two fourbyte signed integers.
Sbi4:
jsr Addsub ! initiate addresses
sec
1: lda (ADDR+2),y ! get lowbyte+y first operand
sbc (ADDR),y ! subtract lowbyte+y second operand
sta (ADDR+2),y ! put on stack lowbyte+y result
iny
inx
bne 1b
rts