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,cx
          mov ds,ax
          mov bx,offset s
          mov si,offset row
          mov cx,4
       ok:mov bh,0
          mov dh,byte ptr [si]
          mov dl,0
          mov ah,2
          int 10h
         
          mov dx,[bx]
          mov ah,9
          inc si
          add bx,2
          loop ok
          mov ax,4c00h
          int 21h
code ends
end start

改了半天，把cs写成cx硬是没查出来
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
          inc si
          add bx,2
          loop ok
          mov ax,4c00h
          int 21h
code ends
end start

学完了《汇编语言》还是有很多指令没见过，比如版主程序里的lodsb，stosb,两个@@组成的地址标号，还有类似这个的跳转jz @f ，书上好像并没有。
还有楼上提到的程序里很多都看不懂，尤其是宏定义。
算了暂时不深究了，去学其他的课程去了。谢谢版主大神热心的讲解。