prog6_24.asm

汇编语言-王爽 源代码 加 卜艳萍版源代码

stack  segment stack para stack 'stack'
       db  64 dup(?)
stack  ends
data  segment
    n  db  8
funcn  dw  ?
data  ends
code  segment
      assume  cs:code,ds:data,ss:stack
main  proc  far
start:push  ds
      mov  ax,0
      push  ax
      mov  ax,data
      mov  ds,ax
      push  cx
      mov  ah,0
      mov  al,n
      call  factor
      mov  funcn,ax
      pop  cx
      ret
main  endp
factor proc near
       push  ax
       sub  ax,1
       jne  again
       pop  ax
       jmp  fin
again: call  factor
       pop  cx
       mul  cl
fin:   ret
factor endp
code  ends
      end  start