Loading

bin_bcd

  1. .model tiny
  2. .data
  3. bin equ 150
  4. res dw 0
  5. .code
  6. .startup
  7.     mov bx, bin
  8.     mov ax, 0h
  9.     mov cx, 0h
  10. x1: cmp bx, 0h
  11.     jz x2
  12.     dec bx
  13.     mov al, cl
  14.     add al, 01h
  15.     daa
  16.     mov cl, al
  17.     mov al, ch
  18.     adc al, 00h
  19.     daa
  20.     mov ch, al
  21.     jmp x1
  22. x2: mov res, cx
  23. .exit
  24. end