assume cs:code, ds:data
data segment
  db 'zwz_good'
data ends

code segment
start:
  mov ax, data
  mov ds, ax
  mov si, 0
  mov cx, 8
s:
  mov al, [si]
  call showbyte
  call delay
  inc si
  loop s
  mov ax, 4c00h
  int 21h
delay:
  push ax
  push dx
  mov ax, 0h
  mov dx, 1000h
delay0:
  sub ax, 1
  sbb dx, 0
  cmp ax, 0
  jne delay0
  cmp dx, 0
  jne delay0
  pop dx
  pop ax
  ret
;用al传送要显示的数据
showbyte:
  jmp short show
  table db '0123456789ABCDEF'
show:
  push bx
  push es
  mov ah, al
  shr ah, 1
  shr ah, 1
  shr ah, 1
  shr ah, 1
  and al, 00001111b
  
  mov bl, ah
  mov bh, 0
  mov ah, table[bx]
  mov bx, 0b800h
  mov es, bx
  mov es:[160*12+40*2], ah

  mov bl, al
  mov bh, 0
  mov al, table[bx]
  mov es:[160*12+40*2+2], al
  
  pop es
  pop bx
  ret
code ends
end start