DATAS SEGMENT
  bin dw 10 dup(?)  ;存放二進制結(jié)果
  buf db 5 dup(?)   ;存放十進制數(shù) 各個數(shù)位上的數(shù)值 如100，存放為 1,0,0
  msg1 db 'please input a hex number',13,10,'$'
  msg2 db 'the dec number:',13,10,'$'
  crlf db 13,10,'$'  ;回車換行
DATAS ENDS

CODES SEGMENT
  ASSUME CS:CODES,DS:DATAS
START:
  MOV AX,DATAS
  MOV DS,AX
  
    mov bx,0    ;初始化bx
    
    LEA dx,msg1    ;輸出提示字符串
    mov ah,9
    int 21h
    
 input:
    mov ah,1    ;輸入一個字符
    int 21h
    
    sub al,30h    ;把al中的ascii碼轉(zhuǎn)換成數(shù)值
    jl init
  
    cmp al,10    ;輸入的數(shù)在0-9之間跳轉(zhuǎn)
    jl toBin
    
    sub al,27h    ;再轉(zhuǎn)換為a-f
    cmp al,0ah    ;輸入的字符比a小
    jl init      ;結(jié)束輸入
    cmp al,10h    ;輸入的字符比f大
    jge init    ;結(jié)束輸入
    
 toBin:      ;轉(zhuǎn)換為二進制，把輸入組合成意義上的數(shù)值
    mov cl,4    
    shl bx,cl    ;bx左移4位
    mov ah,0    
    add bx,ax    ;把輸入后并從ascii碼轉(zhuǎn)換來的值與bx相加
    mov bin,bx    ;轉(zhuǎn)換成二進制數(shù)后存到內(nèi)存bin
    jmp input    ;繼續(xù)輸入
    
 init:        ;初始化,準備轉(zhuǎn)換
   mov ax,bin    
   mov bx,10    
   mov si,4    ;循環(huán)四次，最大到萬位
   
 toDec:      ;轉(zhuǎn)為各個數(shù)位上的數(shù)值，如100轉(zhuǎn)換為1,0,0 百位為1...
   mov dx,0    
   div bx      ;除10法得到各個位上的數(shù)值
   mov [buf+si],dl  ;余數(shù)為該位上的值，第一次循環(huán)為個位，第二次為十位...；存到內(nèi)存中
   dec si      
   cmp ax,0    ;商是否為0，為0算法結(jié)束
   ja toDec
 

   lea dx,crlf      ;顯示提示
   mov ah,9
   int 21h
   lea dx,msg2
   mov ah,9
   int 21h
   
 output:        ;輸出內(nèi)存中存放的各個數(shù)位上的數(shù)值
   inc si
   mov dl,[buf+si]
   add dl,30h      ;轉(zhuǎn)為ascii
   mov ah,2
   int 21h
   cmp si,4
   jb output
   
  
  mov ah,1
  int 21h
  MOV AH,4CH
  INT 21H
CODES ENDS
  END START