数制转换（hubian)

寄信人: aaaaatiger (CS03.|^_^^_^^_^^_^^_^^_^)
标  题: 数制转换（hubian)
发信站: 郁金香BBS站 (Mon Nov 22 17:10:23 2004)
来  源: 10.10.82.85

DSEG SEGMENT
DATA DW 23456;假设的二进制数
BUFFER DB 5 DUP(0)；准备存放十进制数
JM DW 10000,1000,100,10,1；5个除数
DSEG ENDS

CSEG SEGMENT
     ASSUME CS:CSEG,DS:DSEG

START:MOV AX,SEG DATA
      MOV DS,AX
      mov offset jm;置指向除数的缓冲区
      MOV DI,OFFSET BUFFER； 置缓冲区指针初直
      MOV CX,5
      MOV AX,DATA；取二进知数
      XOR DX,DX；矿展为32位

NEXT: MOV BX,[DI]；取除数
      ADD DI,2
      DIV BX
      MOV [SI],AL；保存商
      INC SI
      MOV AX,DX；调整余数为新的被除数
      XOR DX,DX
      LOOP NEXT
      MOV AX,4C00H；
      INT 21H
      CSEG ENDS
      END START

--
虚心进取，韬光养晦。
借我三千虎贲、复我浩荡中华，
剑指天山西、马踏黑海北；
贝加尔湖面张弓、库页岛上赏雪；
中南半岛访古、东京废墟祭烈，
旌旗指处、望尘逃遁，