;根据欧几里得辗转相除法求两正整数M,N的最大公约数,步骤为
;1,求M/N的余数R
;2,若R=0,则N为最大公约数,退出循环
;3,用N更新M的值,用R更新N的值
DATA SEGMENT
M DW 18
N DW 7
DATA ENDS
STACK SEGMENT PARA STACK
DW 128 DUP(?)
TOP LABEL WORD
STACK ENDS
CODE SEGMENT
ASSUME CS:CODE,SS:STACK,DS:DATA
MAIN PROC FAR
START:
MOV AX,DATA
MOV DS,AX
MOV AX,STACK
MOV SS,AX
LEA SP,TOP
LEA SI,M
MOV AX,[SI]
ADD SI,2
MOV BX,[SI]
L4: XOR DX,DX
DIV BX
CMP DX,0
JE L1
MOV AX,BX
MOV BX,DX
JMP L4
L1: XOR CX,CX
MOV AX,BX
MOV BX,10
L2: XOR DX,DX
DIV BX
PUSH DX
INC CX
CMP AX,0
JNE L2
L3: POP DX
ADD DL,30H
MOV AH,2
INT 21H
LOOP L3
MOV AH,4CH
INT 21H
CODE ENDS
MAIN ENDP
END START
;1,求M/N的余数R
;2,若R=0,则N为最大公约数,退出循环
;3,用N更新M的值,用R更新N的值
DATA SEGMENT
M DW 18
N DW 7
DATA ENDS
STACK SEGMENT PARA STACK
DW 128 DUP(?)
TOP LABEL WORD
STACK ENDS
CODE SEGMENT
ASSUME CS:CODE,SS:STACK,DS:DATA
MAIN PROC FAR
START:
MOV AX,DATA
MOV DS,AX
MOV AX,STACK
MOV SS,AX
LEA SP,TOP
LEA SI,M
MOV AX,[SI]
ADD SI,2
MOV BX,[SI]
L4: XOR DX,DX
DIV BX
CMP DX,0
JE L1
MOV AX,BX
MOV BX,DX
JMP L4
L1: XOR CX,CX
MOV AX,BX
MOV BX,10
L2: XOR DX,DX
DIV BX
PUSH DX
INC CX
CMP AX,0
JNE L2
L3: POP DX
ADD DL,30H
MOV AH,2
INT 21H
LOOP L3
MOV AH,4CH
INT 21H
CODE ENDS
MAIN ENDP
END START