oushu.asm

来自「包括显示彩条、偶数求和、小数、加法、字母、显示字符等9个小程序,压缩包自带运行工」· 汇编 代码 · 共 53 行

data segment  ;从0开始100个偶数之和
  buf db '0123456789abcdef'
  sum dw 0
  sum1 db 0
  sum2 db 0
data ends
code segment
  assume ds:data,cs:code
  begin: mov ax,data
         mov ds,ax
         mov bx,2
         mov ax,0
         mov cx,63h
    next:add ax,bx
         add bx,2
         loop next
         mov sum,ax
         mov sum1,ah
         mov sum2,al
         mov al,ah
         lea bx,buf
         mov cl,4
         shr al,cl ;逻辑右移,大于一位时要先将右移位数送到cl中
         xlat      ;字节翻译指令
         mov ah,2  ;显示一字符,向量号21H，功能号2
         mov dl,al
         int 21h
         mov al,sum1
         and al,0fh
         xlat
         mov dl,al
         mov ah,2
         int 21h
         mov al,sum2
         shr al,cl
         xlat
         mov ah,2
         mov dl,al
         int 21h
         mov al,sum2
         and al,0fh
         xlat
         mov ah,2
         mov dl,al
         int 21h
       mov ah,2
       mov dl,'H'
       int 21h
       mov ah,4ch
       int 21h
code ends
   end begin