Написать программу удваивающую текст в файлах

rep movsw

.model tiny
.286
.code
org 100h
start:
 
mov ax,3d02h
mov dx,offset nfile
int 21h
mov bx,ax
 
mov ah,3fh
mov dx,offset buffer
int 21h
mov cx,ax
 
mov ah,40h
int 21h
 
ret
nfile db 'any.txt',0
buffer db ?
end start

mov cx,-1

PSP_Cmd     =   80h     ; смещение до командной строки
    org 100h
    cmp byte [cs:PSP_Cmd],0     ; есть командная строка?
    jz  gtfo
    push    cs
    pop es
    mov bx, top
    shr bx, 4
    inc bx
    mov ah, 4Ah
    int 21h
    movzx   ebx, byte [cs:PSP_Cmd]
    mov cx, bx
    dec cx
    lea ebx, [ebx*2+ebx+top-cpy_+3]
    shr bx, 4
    inc bx
    mov ah, 48h
    int 21h
    jc  gtfo
    mov es, ax
    xor di ,di
    inc di
    mov si, cpy_
    mov bx,cx
    lodsb
    movzx   cx, al
    rep movsb
    mov cx, bx
    mov si, 82h
    rep movsb
    mov al,'+'
    stosb
    mov cx, bx
    mov si, 82h
    rep movsb
    mov si, tmp_
    lodsb
    movzx   cx, al
    rep movsb
;   mov cx, bx
;   mov si, 82h
;   rep movsb
    mov ax, di
    dec ax
    mov byte [es:0], al
    mov al,0Dh
    stosb
    push    es
    call    exec
_r_:    xor di ,di
    inc di
    mov si, ren_
    lodsb
    movzx   cx, al
    rep movsb
    mov cx, bx
    mov si, 82h
    rep movsb
    mov ax, di
    dec ax
    mov byte [es:0], al
    mov al,0Dh
    stosb
    call    exec
 
    xor ax,ax
    int 16h
    pop es
    mov ah,49h
    int 21h
gtfo:   int 20h
exec:
    xor si, si
    pusha
    push    ds
    push    es
    mov ax, ss
    mov [cs:_ss],ax
    mov [cs:_sp],sp
    push    es      ;; KL beware.
    pop ds              ;;
    int 2Eh
    mov sp,[cs:_sp]
    mov ax,[cs:_ss]
    mov ss, ax
    pop es
    pop ds
    popa
    ret
_ss dw  ?
_sp dw  ?
cpy_:   db  (tmp_-$)-1,'COPY /B '
tmp_:   db  ren_-$-1,' tmp.tmp'; && 
ren_:   db  (top-$)-1,'COPY /B tmp.tmp '
top:

.model small
.stack 20h
.data
 
.code
start:
 
end start

.model small
.stack 20h
.data
nfile db 'any.txt',0
buffer db 1000 dup(?)
 
.code
start:
mov ax,3d02h
mov dx,offset nfile
int 21h
mov bx,ax
 
mov cx,-1
mov ah,3fh
mov dx,offset buffer
int 21h
mov cx,ax
 
mov ah,40h
int 21h
 
end start

mov ax,@data
mov ds,ax ; в начале
..............
mov ax,4c00h ; в конце
int 21h