OPTION M510 ;MASM6.15编译器编译需输入此行,否则不兼容
assume cs:code
code segment
 s1:  db  'Good,better,best,','$'
 s2:  db  'Never let it rest,','$'
 s3:  db  'Till good is better,','$'
 s4:  db  'And Better,best.','$'
 s:   dw  offset s1,offset s2,offset s3,offset s4
 row: db  2,4,6,8

start:mov ax,cs
  mov ds,ax
  mov bx,offset s
  mov si,offset row
  mov cx,4
ok:mov bh,0
  mov dh,[si]
  mov dl,0
  mov ah,2
  int 10h

  mov dx,[bx]
  mov ah,9
  int 21h
  add bx,2
  inc si
  loop ok

  mov ax,4c00h
  int 21h
code ends
end start