请问下面程序有什么错误啊？怎么不能输出数组？

data1 segment
      even
      array dw 12,13,14
      msg   db 5 dup('0'),0dh,0ah,"$"
      
data1 ends
code1 segment
      assume cs:code1,ds:data1
start:
      mov ax,data1
      mov ds,ax
      
      lea si,array
      mov bx,10d
      mov di ,4d
      mov cx,3d
again:
      mov ax,word ptr [si]
part:
      xor dx,dx
      div bx
      add dl,30h
      mov msg[di],dl
      dec di
      cmp ax,0
      jg part
      
      mov ah,09h
      lea dx,msg
      int 21h
      add si,2
      loop again

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