.model small
.Stack
      dw 2 dup (?) 

.data
t1    db  41h
t2    dw  3461h
msg   db 'test for exchange output ',0dh,0ah,'$'
.code
;
      push ds
      xor  ax,ax
      push ax
;
      mov  ax,@data
      mov  ds,ax
;
      xchg dl,t1
      mov  ax,0200h
      int  21h
;
      xchg dx,t2
      mov  ax,0200h
      int  21h
;
      mov dl,0dh
      mov ah,02
      int  21h
;
      mov dl,0ah
      mov ah,02
      int  21h
;
      lea  dx,msg
      mov  ah,09h
      int  21h
;
      mov  ah,4ch
      int  21h
      end