6.asm

此程序是微机与接口技术的课程设计源程序

;6.ASM
PUBLIC CHANGE5
DATA 	SEGMENT
BINARY DW 7FFFH,50H
       	N=($-BINARY)/2
BUF  	DB 7 DUP(0)
INFO1 	DB 0AH,0DH,'THIS IS THE CHANGE FROM HEXNUMBER TO DECIMAL:$'
INFO2 	DB 0AH,0DH,'THE NUMBER IS:7FFFH,50H$',0AH,0DH
INFO3 	DB 0AH,0DH,'THE RESULT IS:$'
DATA 	ENDS
STACK 	SEGMENT STACK
      	DB 200 DUP(0)
STACK 	ENDS     
CODE 	SEGMENT
     	ASSUME CS:CODE,DS:DATA,SS:STACK
F2TO10 PROC NEAR
      	PUSH BX
      	PUSH DX
      	PUSH SI
      	PUSH CX
DISP  	MACRO M
      	LEA DX,M
      	MOV AH,9
      	INT 21H
      	ENDM
      	LEA SI,BUF
      	OR  AX,AX
      	JNS PLUS
      	NEG AX
      	MOV [SI],BYTE PTR '-'
      	INC SI
PLUS: 	MOV BX,10
      	MOV CX,0
LOP1: 	MOV DX,0
      	DIV BX
      	PUSH DX
      	INC CX
      	OR AX,AX
      	JNE LOP1
LOP2: 	POP AX
      	CMP AL,10
      	JB L1
      	ADD AL,7
L1:   	ADD AL,30H
      	MOV [SI],AL
      	INC SI
      	DEC CX
      	JNE LOP2
      	MOV [SI],BYTE PTR 'D'
      	INC SI
      	MOV [SI],BYTE PTR '$'
      	DISP  INFO3
      	DISP BUF
      	POP CX
      	POP SI
      	POP DX
      	POP BX
      	RET
F2TO10 ENDP
CHANGE5 PROC FAR
START: MOV AX,DATA
       	MOV DS,AX
       	DISP INFO1
       	DISP INFO2
       	MOV CX,N
       	LEA DI,BINARY
LOPA:  MOV AX,[DI]
       	CALL F2TO10
       	ADD DI,2
       	LOOP LOPA
       	RET
CHANGE5 ENDP
CODE 	ENDS
      	END