h202.asm

关于8086汇编的一些实验程序

stack segment stack'stack'
      dw 32 dup(?)
stack ends
data segment
B1 DB 36H
B2 DB 18H
BUF DB 11 DUP(?)
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 AL,B1
      SUB AL,B2
     
      MOV CX,4
      MOV SI,0
AGAIN1:MOV AH,0
      SHL AX,1
      ADD AH,30H
      MOV BUF[SI],AH
      INC SI
      LOOP AGAIN1

      MOV BUF+4,' '

      MOV CX,4
      MOV SI,5
AGAIN2:MOV AH,0
       SHL AX,1
       ADD AH,30H
       MOV BUF[SI],AH
       INC SI
       LOOP AGAIN2
       MOV BUF+9,'B'
       MOV BUF+10,'$'
       mov dx,offset buf
       mov ah,9
       int 21h
       ret
begin endp
code ends
     end begin