e7_6.asm

ZHUYAO ZSHI LAI JIECHUADE LAIDE

STACK SEGMENT  STACK 'STACK'
      DW 64 DUP(0)
STACK ENDS
DATA  SEGMENT
      N   DB 8
      FUN DW ?
DATA  ENDS
CODE  SEGMENT
      ASSUME CS:CODE,DS:DATA,SS:STACK
MAIN  PROC  FAR
STAR: PUSH  DS
      MOV   AX,0
      PUSH  AX
      MOV   AX,DATA
      MOV   DS,AX
      PUSH  CX
      MOV   AH,0
      MOV   AL,N
      CALL  FAC
      MOV   FUN,AX
      POP   CX
      RET
MAIN  ENDP
FAC   PROC  NEAR
      PUSH  AX
      SUB   AX,1
      JNE   AGA
      POP   AX
      JMP   FIN
AGA:  CALL  FAC
      POP   CX
      MUL   CL
FIN:  RET
FAC   ENDP
CODE	ENDS
	END	 STAR