circle_oper.asm

holtek mouse .asm firewave

INCLUDE	REG_DEF.INC

PUBLIC	DRAW_CIRCLE


DRAW_CIRCLE_CODE	.SECTION	'CODE'

DRAW_CIRCLE:

		SNZ		VALID_FSP
		JMP		NOT_INC_TABLE_INDEX

		SZ		RESEND_DATA_REQUIRED
		JMP		NOT_INC_TABLE_INDEX
		

	INC_TABLE_INDEX:	

		CLR		CARRY
		MOV		A, 172
		INC		TABLE_INDEX
		SUB		A, TABLE_INDEX
		SZ		CARRY
		JMP		NOT_RST_TABLE_INDEX

		CLR		TABLE_INDEX		

	NOT_RST_TABLE_INDEX:
	NOT_INC_TABLE_INDEX:

		CALL	GET_X
		CALL	GET_Y

	

		RET

GET_X_CODE	.SECTION AT 0A00H	'CODE'

GET_X:
		MOV		A, X_TABLE
		MOV		TBLP, A

		MOV		A, TABLE_INDEX
		ADDM	A, TBLP

		TABRDC	MONTION_X

		RET

X_TABLE:
DC		000H, 0FFH, 000H, 0FFH, 0FEH, 0FFH, 0FDH, 0FEH, 0FEH, 0FDH, 0FCH, 0FDH, 0FCH, 0FCH, 0FBH, 0FBH
DC		0FBH, 0FAH, 0FAH, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H
DC		0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H
DC		0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H
DC		0F8H, 0F8H, 0F8H, 0FAH, 0FAH, 0FBH, 0FBH, 0FBH, 0FCH, 0FCH, 0FDH, 0FCH, 0FDH, 0FEH, 0FEH, 0FDH
DC		0FFH, 0FEH, 0FFH, 000H, 0FFH, 000H, 000H, 001H, 000H, 001H, 002H, 001H, 003H, 002H, 002H, 003H
DC		004H, 003H, 004H, 004H, 005H, 005H, 005H, 006H, 006H, 008H, 008H, 008H, 008H, 008H, 008H, 008H
DC		008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H
DC		008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H
DC		008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 006H, 006H, 005H, 005H, 005H, 004H, 004H 
DC		003H, 004H, 003H, 002H, 002H, 003H, 001H, 002H, 001H, 000H, 001H, 001H, 001H

GET_Y_CODE	.SECTION AT 0B00H	'CODE'		

GET_Y:
		MOV		A, Y_TABLE
		MOV		TBLP, A

		MOV		A, TABLE_INDEX
		ADDM	A, TBLP

		TABRDC	MONTION_Y

		RET

Y_TABLE:
DC		0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H
DC		0F8H, 0F8H, 0F8H, 0F8H, 0F6H, 0F9H, 0F9H, 0FAH, 0FAH, 0FBH, 0FBH, 0FCH, 0FCH, 0FCH, 0FDH, 0FDH
DC		0FDH, 0FDH, 0FEH, 0FEH, 0FEH, 0FEH, 0FFH, 0FFH, 0FFH, 000H, 000H, 000H, 001H, 000H, 001H, 001H
DC		002H, 002H, 002H, 002H, 003H, 003H, 003H, 003H, 004H, 004H, 004H, 005H, 005H, 006H, 006H, 007H
DC		007H, 00AH, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H
DC		008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H
DC 		008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 008H, 00AH, 007H, 007H, 006H, 006H, 005H
DC		005H, 004H, 004H, 004H, 003H, 003H, 003H, 003H, 002H, 002H, 002H, 002H, 001H, 001H, 000H, 001H
DC		000H, 000H, 0FFH, 000H, 0FFH, 0FFH, 0FEH, 0FEH, 0FEH, 0FEH, 0FDH, 0FDH, 0FDH, 0FDH, 0FCH, 0FCH
DC		0FCH, 0FBH, 0FBH, 0FAH, 0FAH, 0F9H, 0F9H, 0F6H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H 
DC		0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0F8H, 0FFH