2-9-1.asm

来自「华工电信系汇编习题的编程实现」· 汇编 代码 · 共 39 行

stack   segment stack 'stack'
        dw 32 dup(0)
stack   ends
data    segment
      newword dw  0000H
      temp1 dw  0000H
      temp2 dw 0000H
data    ends

code    segment
begin   proc far
        assume ss:stack,cs:code,ds:data
        push ds
        sub ax,ax
        push ax
        mov ax,data
        mov ds,ax
        
        mov ax,1234H
        mov bx,5678H
        mov dx,0189H
      
        mov CL,4
        shl ax,CL

        mov byte ptr temp1,BL
        mov byte ptr temp1+1,DH
        mov CL,4
        rol temp1,CL

        mov aL,byte ptr temp1
        mov newword,ax
        ret

begin   endp
code    ends
        end begin