累減實現除法--松瀚匯編

//***************************************
// 函數名稱: FDIV
// 函數功能: 4字節除2字節除法
// 入口參數: 被除數 Z1 Z0 X1 X0 除數 Y1 Y0 
// 出口參數: 結果在 X1 X0 中
// 松瀚匯編算法  以上排在左邊的為數據高字節
//***************************************
FDIV:
	CLR	I
L_DIV:
	MOV	A,Z0
	SUB	A,Y0
	MOV	A,Z1
	SBC	A,Y1
	
	B0BTS1	FC
	JMP	DIV_BACK
	
DIV_CAC:
	MOV	A,Z0
	SUB	A,Y0
	MOV	Z0,A
	MOV	A,Z1
	SBC	A,Y1
	MOV	Z1,A
	
	B0BSET	FC
DIV_BACK:
	RLCM	X0
	RLCM	X1

	INCMS	I
	MOV	A,#17
	XOR	A,I
	B0BTS0	FZ
	RET
	
	RLCM	Z0
	RLCM	Z1
	B0BTS1	FC
	JMP	L_DIV
	JMP	DIV_CAC		

DIV_EXIT:
	RLCM	Z0
	RLCM	Z1
	RET