data segment
buffer dw 2,5,4,3,7,9,8
data ends
prognam segment
main  proc  far
assume cs:prognam,ds:data
start:
  push ds
  sub ax,ax
  push ax
  mov ax,data
  mov ds,ax
  mov si,0
  mov cx,7
s:mov bx,[si]
  call output
  add si,2
  loop s
  call paixu
   mov dl,13
  mov ah,2
  ...