codigo ensamblador para exe y com

Hola, tengo este codigo (lo compilo con masm 4 y con masm 6.15 y ok)

cr equ 13
lf equ 10

datos segment
texto db 'hola',cr,lf
db '$'
mensa1 db 'que tal estamos?$'
datos ends

pila segment stack
db 128 dup('pila')
pila ends

codigo segment
ejemplo proc far
assume cs:codigo,ds:datos,ss:pila
push ds
sub ax,ax
push ax
mov ax,datos
mov ds,ax
lea dx,texto
call escribir
lea dx,mensa1
call escribir
ret
ejemplo endp

escribir proc
push ax
mov ah,9
int 21h
pop ax
ret
escribir endp
codigo ends
end ejemplo

Que cambios tendria que hacer para crear un .com?

Yo supongo algo asi:

cr equ 13
lf equ 10

datos segment
texto db 'hola',cr,lf
db '$'
mensa1 db 'que tal estamos?$'
datos ends

codigo segment
ejemplo proc far
assume cs:codigo,ds:datos
org 100h
lea dx,texto
call escribir
lea dx,mensa1
call escribir
ret
ejemplo endp

escribir proc
push ax
mov ah,9
int 21h
pop ax
ret
escribir endp
codigo ends
end ejemplo

La cosa es que una vez creado el com, me hace cosas raras... beep's y
codigos asci...

Gracias