smashtv/TEMP.ASM

60 lines
1.1 KiB
NASM
Raw Permalink Normal View History

2021-04-06 15:09:56 -07:00
CIRCL
MOVE A13,*A10(CIRCPTR),L
CRC1
SLEEP 3
MOVB *A10(CNTRXY),A0
INC A0
MOVB A0,*A10(CNTRXY)
CMPI 24,A0
JRC GO0
CLR A0
MOVB A0,*A10(CNTRXY)
GO0
SLL 5,A0
MOVI ADX2,A1
ADD A0,A1
MOVE *A1,A1,L
ADDI ADY2,A0
MOVE *A0,A0,L
MOVE *A8(OYVAL),A2,L
ADD A0,A2
MOVE A2,*A8(OYVAL),L
MOVE *A8(OXVAL),A2,L
ADD A1,A2
MOVE A2,*A8(OXVAL),L
JRUC CRC1
CIRCL2
MOVE A13,*A10(CIRCPTR),L
CRC2
SLEEP 2
MOVB *A10(CNTRXY),A0
INC A0
MOVB A0,*A10(CNTRXY)
CMPI 24,A0
JRC GO0
CLR A0
MOVB A0,*A10(CNTRXY)
GO1
SLL 5,A0
MOVI ADX2,A1
ADD A0,A1
MOVE *A1,A1,L
ADDI ADY2,A0
MOVE *A0,A0,L
MOVE *A8(OYVAL),A2,L
ADD A0,A2
MOVE A2,*A8(OYVAL),L
MOVE *A8(OXVAL),A2,L
ADD A1,A2
MOVE A2,*A8(OXVAL),L
JRUC CRC2
ADX
.LONG 10000H,8000H,8000H,8000H,8000H,4000H,0,-4000H,-8000H
.LONG -8000H,-8000H,-8000H,-10000H,-10000H,-8000H,-8000H,-8000H
.LONG -4000H,0,4000H,8000H,8000H,8000H,8000H
ADY
.LONG 0,4000H,4000H,4000H,4000H,8000H,10000H,8000H,4000H,4000H
.LONG 4000H,4000H,0,-4000H,-4000H,-4000H,-4000H,-8000H,-10000H
.LONG -8000H,-4000H,-4000H,-4000H,-4000H