huibian.txt

从键盘输入数字N（N为1～9之一）

.386
DATAS SEGMENT USE16  
    BUF DB 0AH, 0DH, 'PLEASE IPUT A NUMBER BETWEEN 0-9 :$'
    BUF2 DB 0AH, 0DH, 'THE ANSWER IS : $'
    BUF3 DB 0AH,0DH,'IPUT A ERROR NUMBER !$'  
DATAS ENDS

STACKS SEGMENT
    DB 200 DUP(0)
STACKS ENDS

CODES SEGMENT USE16
    ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
    MOV AX,DATAS
    MOV DS,AX
    
    LEA DX, BUF
    MOV AH, 9
    INT 21H
    
    MOV AH, 1
    INT 21H
    
    CMP AL,'0'
    JB ERR
    CMP AL,'9'
    JA ERR
    
    XOR ECX, ECX
    MOV CL, AL
    
    LEA DX, BUF2
    MOV AH, 9
    INT 21H
    
    SUB ECX, 30H
    
    XOR EAX, EAX
    MOV EAX, 1
    
L:	MUL ECX
	DEC ECX
	JNZ L
	
	CALL RADIX  
	  
    MOV AH,4CH
    INT 21H

ERR: MOV DX ,OFFSET BUF3
     MOV AH,9
     INT 21H
	
RADIX PROC
	  MOV ECX, 0
	  XOR EBX, EBX
	  MOV BL, 10
	
L2:	DIV EBX
	PUSH EDX
	INC ECX
	XOR EDX, EDX
	CMP EAX, 0
	JA L2

L3:	POP EDX
	ADD DL, 30H
	MOV AH, 2
	INT 21H
	DEC CX
	JNZ L3	
	RET
RADIX ENDP
    
CODES ENDS
    END START