1985-07-26 11:56:24 +00:00
|
|
|
.define .sts
|
1987-01-16 16:49:46 +00:00
|
|
|
.sect .text
|
|
|
|
|
.sect .rom
|
|
|
|
|
.sect .data
|
|
|
|
|
.sect .bss
|
|
|
|
|
.sect .text
|
1985-07-26 11:56:24 +00:00
|
|
|
|
1987-01-16 16:49:46 +00:00
|
|
|
.sect .text
|
1985-07-26 11:56:24 +00:00
|
|
|
|
|
|
|
|
.sts:
|
|
|
|
|
movd tos, r7
|
|
|
|
|
movd tos, r0
|
|
|
|
|
movd tos, r1
|
|
|
|
|
cmpqd 1, r0
|
|
|
|
|
beq 1f
|
|
|
|
|
cmpqd 2, r0
|
|
|
|
|
beq 2f
|
|
|
|
|
3:
|
|
|
|
|
movd tos, 0(r1)
|
|
|
|
|
addqd 4, r1
|
|
|
|
|
acbd -4, r0, 3b
|
|
|
|
|
4:
|
|
|
|
|
movd r7, tos
|
|
|
|
|
ret 0
|
|
|
|
|
1:
|
|
|
|
|
movb tos, 0(r1)
|
|
|
|
|
adjspd -3
|
|
|
|
|
br 4b
|
|
|
|
|
2:
|
|
|
|
|
movw tos, 0(r1)
|
|
|
|
|
adjspd -2
|
|
|
|
|
br 4b
|
