;--------------------------------------------
;NAME : F_Div
;INPUT : R_opA,R_opB
;OUTPUT : R_opRes,R_opMod(余数)
;FUN :
;--------------------------------------------
.IF J_DivOpera
F_Div:
LDA R_opB
BEQ END_DIV
LDA R_opA
STA R_opMod
LDA #00H
STA R_opRes
DIV_LOOP:
%ClearWDT
SEC
LDA R_opMod
SBC R_opB
BCC END_DIV
STA R_opMod
INC R_opRes
JMP DIV_LOOP
END_DIV:
LDA R_opMod
RTS
『本文转载自网络,版权归原作者所有,如有侵权请联系删除』