01.asm

汇编程序十进制到十六进制数的转换的程序实现

decihex  segment                     ; 10?16
              assume  cs: decihex

main       proc   far
repeat:   call     decibin    ; 10?2
              call     crlf
              call     binihex   ; 2?16
              call     crlf
              jmp    repeat
              ret
main      endp
decibin    proc  near            ; 10?2
               mov  bx, 0
newchar: mov  ah, 1
          int    21h
          sub   al, 30h         
          jl       exit              ; <0退出
          cmp  al, 9d
          jg      exit              ; >9退出
          cbw
          xchg  ax, bx	      ；处理BX高位数据
          mov   cx, 10d
          mul   cx		      ;高位数据*10
          xchg  ax, bx
          add    bx, ax	      ;高+低位=2进制
          jmp    newchar	      ;允许输入多个数据
exit:        ret
decibin   endp
binihex   proc   near            ; 2?16
              mov   ch, 4
rotate:    mov   cl, 4
              rol     bx, cl
              mov  al, bl
              and   al, 0fh
              add   al, 30h
              cmp  al, 3ah
              jl       printit
              add   al, 7h
printit:   mov   dl, al
             mov   ah, 2
             int     21h
             dec    ch
             jnz    rotate
             ret
binihex  endp
crlf    proc   near
         mov   dl, 0dh
         mov   ah, 2
         int     21h         ;输出回车
         mov   dl, 0ah
         mov   ah, 2
         int     21h	     ;输出换行
         ret
crlf    endp

decihex  ends
              end  main