80X86 汇编语言程序设计（杨季文）习题答案 习题3-23

dseg  segment
vara  db  60h
dseg  ends

cseg  segment
  assume cs:cseg, ds:dseg
 
start:  mov ax, dseg
    mov ds, ax
    mov al, vara
    xor dx, dx
    mov cx, 8h
next: mov bx, 0h
    rol al, 1h
    jnc skip
    mov bx, 3h
skip: push cx
    dec cl
    add cl, cl
    shl bx, cl
    pop cx
    or dx, bx
    loop next
   
    mov ah, 4ch
    int 21h
cseg  ends
    end start