Поменять в исходном файле буквы слов местами

_TEXT   segment word    public  'CODE'
        assume  cs:_TEXT, ds:_TEXT, ss:_TEXT
        org     100h
start:
        ;1.     открытие исходного файла (функция 3DH);
        mov     ah,     3Dh
        mov     al,     00h             ;открыть для чтения
        lea     dx,     InFileName
        int     21h
        jnc     @@InFileOpenOk
        mov     ah,     09h
        lea     dx,     errFileOpen
        int     21h
        jmp     @@Exit
@@InFileOpenOk:
        mov     InFileHandler,  ax
        ;2.     создание нового файла, куда будут помещаться результаты
        ;обработки исходного файла (функция 3CH);
        mov     ah,     3Ch             ;открыть для записи
        mov     cx,     00h             ;атрибут файла - обычный файл
        lea     dx,     OutFileName
        int     21h
        jnc     @@OutFileOpenOk
        mov     ah,     09h
        lea     dx,     errFileOpen
        int     21h
        jmp     @@CloseInFileAndExit
@@OutFileOpenOk:
        mov     OutFileHandler, ax
        ;3.     чтение исходного файла (функция 3FH);
        mov     ah,     3Fh
        mov     bx,     InFileHandler
        mov     cx,     SizeBuffer
        lea     dx,     FileBuffer
        int     21h
        jnc     @@InFileReadOk
        mov     ah,     09h
        lea     dx,     errFileRead
        int     21h
        jmp     @@CloseOutFileAndExit
@@InFileReadOk:
        mov     BufLength,      ax
        ;4.     обработка прочитанных данных;
        ;5.     запись обработанных данных в созданный файл (функция 40H);
        mov     ah,     40h
        mov     bx,     OutFileHandler
        mov     cx,     BufLength
        lea     dx,     FileBuffer
        int     21h
        ;6.     закрытие файла с результатами обработки (функция 3EH);
@@CloseOutFileAndExit:
        mov     ah,     3Eh
        mov     bx,     OutFileHandler
        int     21h
        jnc     @@Exit
        mov     ah,     09h
        lea     dx,     errFileClose
        int     21h
        ;7.     закрытие исходного файла (функция 3EH).
@@CloseInFileAndExit:
        mov     ah,     3Eh
        mov     bx,     InFileHandler
        int     21h
        jnc     @@Exit
        mov     ah,     09h
        lea     dx,     errFileClose
        int     21h
@@Exit:
        int     20h
;-----------------------------------------------------------------------
; данные
;-----------------------------------------------------------------------
        ;---------------------------------------------------------------
        ;сообщения программы
        ;---------------------------------------------------------------
        errFileOpen     db      0Dh, 0Ah, 'File open error', '$'
        errFileClose    db      0Dh, 0Ah, 'File close error', '$'
        errFileRead     db      0Dh, 0Ah, 'File read error', '$'
        CrLf            db      0Dh, 0Ah, '$'
        ;---------------------------------------------------------------
        ;файлы
        ;---------------------------------------------------------------
        InFileName      db      'InFile.txt', 0
        OutFileName     db      'OutFile.txt', 0
        InFileHandler   dw      ?
        OutFileHandler  dw      ?
        BufLength       dw      ?               ;количество байт, реально
                                                ;считанное из файла
        FileBuffer      db      512 dup(?)
        SizeBuffer      equ     $-FileBuffer
_TEXT   ends
 
        end     start

        ;4.     обработка прочитанных данных;
        lea     si,     FileBuffer
        mov     cx,     BufLength
        ;пропускаем все разделители
@@WhileDelimiter:
        mov     al,     [si]
        cmp     al,     DelimChar
        jne     @@NewWord
        inc     si
        loop    @@WhileDelimiter
 
        jcxz    @@Finish        ;если строка закончилась - выйти
        ;найдено новое слово
@@NewWord:
        mov     dx,     0       ;длина очередного слова пока равна 0
        mov     di,     si      ;сохраняем индекс (адрес) начала очередного слова
        ;пропускаем все буквы слова до разделителя
@@WhileWord:
        mov     al,     [si]
        cmp     al,     DelimChar
        je      @@Break
        inc     dx              ;увеличиваем длину слова
        inc     si              ;переходим к следующему символу
        loop    @@WhileWord
@@Break:
    ;обрабатываем найденное слово
    push    si
    dec si
    shr dx, 1
    jz  @@NoReverse
    @@ReverseChars:
        mov al, [si]
        xchg    al, [di]
        mov [si],   al
        inc di
        dec si
        dec dx
    jnz @@ReverseChars
@@NoReverse:
    pop si
        jcxz    @@Finish
        jmp     @@WhileDelimiter
@@Finish:

;-----------------------------------------------------------------------
; данные
;-----------------------------------------------------------------------
        ;---------------------------------------------------------------
        ;сообщения программы
        ;---------------------------------------------------------------
        errFileOpen     db      0Dh, 0Ah, 'File open error', '$'
        errFileClose    db      0Dh, 0Ah, 'File close error', '$'
        errFileRead     db      0Dh, 0Ah, 'File read error', '$'
        CrLf            db      0Dh, 0Ah, '$'
        ;---------------------------------------------------------------
        ;обрабатываемая строка
        ;---------------------------------------------------------------
        DelimChar       db      ' '             ;символ разделитель слов
                                                ;в строке
        ;---------------------------------------------------------------
        ;файлы
        ;---------------------------------------------------------------
        InFileName      db      'InFile.txt', 0
        OutFileName     db      'OutFile.txt', 0
        InFileHandler   dw      ?
        OutFileHandler  dw      ?
        BufLength       dw      ?               ;количество байт, реально
                                                ;считанное из файла
        FileBuffer      db      512 dup(?)
        SizeBuffer      equ     $-FileBuffer

a dw 5
b db 10 dup(0)
c dw $-b;  длина буфера b
d dw $-a; размер переменных a, b, c вместе взятых, т.е. d=2+10+2=14
e dw $  ;в e адрес переменной e. Сам адрес (значение) станет известен после компиляции.
f dw $-b; несмотря на то, что выражение похоже на переменную c, в этой
          ;переменной будет длина переменных b, c, d, e вместе взятых