Ensamblador - Introducir cadena sin limite en ensamblador e invertirla

hola me podrian ayudar con un problema que tengo en lenguaje ensamblador, es el siguiente: tengo que hacer un programa que lea una cadena de caracteres que no tenga limite, a que me refiero, a que dada la cadena, esta sea tan grande que no tenga problemas el ensamblador para leerla y despues de ser ingresada, el ensamblador la iniverta completamente. este es mi codigo pero no me realiza la ejecucion espero puedan ayudarme.

.model small
.stack
.data

mensaje db 10,13,'Ecribe un texto: $'
texto1 db ? dup ()
texto2 db ? dup ()

.code

inicio proc

mov ax,@data
mov ds,ax

lea dx, mensaje
mov ah,09
int 21h

lea bx, texto1
mov ah,0ah
int 21h
add bx, LENGTH texto1
mov cx, LENGTH texto1

ciclo: mov dl, [bx]
mov ah,02
int 21h
dec bx
loop ciclo

mov ax, 4c00h
int 21h
inicio endp
end inicio

apreciaria mucho que me pudiesen ayudar usando directivas simplificadas o no simplificadas