60 lines
1.1 KiB
NASM
60 lines
1.1 KiB
NASM
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
|
||
|
||
|