Подсчёт количества букв "a" в файле и вывод на экран [tasm]

.486
model small
Data SEGMENT use16
    ASSUME ds: Data
mess1 db 'Source file name: ','$'
mess3 db 0dh, 0ah, 'Error open source file!$'
mess5 db 0dh, 0ah, 'Read file error!$'
mess db 'Hello world!',0    ;Описание строки
file1 db 100, 100 dup(0)
 
hand1 dw 0
buff db 1 dup(?)
num db 0
Strk db 7 dup(0),0
 
Data ENDS
Stk  SEGMENT use16 STACK
    ASSUME ss: Stk
    db 256 dup(0)
Stk  ENDS
Code SEGMENT use16
    ASSUME cs: Code
start:
    mov ax, data                ;В AX адрес сегмента данных
    mov ds, ax                  ;DS устанавливаем на AX
                ;------ Ввод имени и открытие исходного файла -------
    mov ah, 09h                 ;Вывод приглашения ввода имени
    mov dx, offset mess1        ;исходного файла
    int 21h
    mov ah, 0ah                 ;Ввод имени файла
    mov dx, offset file1
    mov si, dx
    inc si
    int 21h
    xor ax, ax                  ;Запись вместо 0dh значения 0
    mov al, ds:[si]
    add si, ax
    mov byte ptr ds:[si+1], 0
    mov ah, 3dh                 ;Открытие файла для чтения
    add dx, 2
    xor al, al
    int 21h
    jnc next0
    mov ah, 09h                 ;Если файл открыть не удалось
    mov dx, offset mess3
    int 21h
    jmp exit0
next0:                          ;Успешное открытие файла
    mov word ptr hand1, ax
                
                ;------ Цикл чтения -----------
loop0: 
    mov ah, 3fh             ;Чтение из исходного файла
    mov bx, hand1
    mov dx, offset buff
    mov cx, 1
    int 21h
    jnc next2
    mov ah, 09h                 ;Вывод сообщения, если ошибка
    mov dx, offset mess5
    int 21h
    jmp next4
 
next2:  
    
    cmp buff,'.'
    jmp num0
    
    
    
    jmp next3
num0: inc num   
 
next3: 
    cmp ax, 1               ;Проверка на конец файла
    jne next4
    jmp loop0                   ;Переход к следующей итерации
next4:                          ;Закрытие файла
    mov ah, 3eh
    mov bx, hand1
    int 21h
    
    
    
    
    mov ax,num
      ;вывод на экран
next5:
    lea si, Strk        ;Загружаем в SI смещение Strk
    add si, 6       ;Переходим в конец строки
    mov cx, 10      ;Заносим в CX значение 10
next6:
    xor dx, dx      ;Очистка DX
    div cx          ;Деление DX:AX / CX
    add dl, 48      ;Суммируем остаток с кодом ‘0’
    mov ds:[si], dl     ;Записываем в строку
    or ax, ax       ;Проверка AX на ноль
    jz next6        ;Если ноль, то переходим на next6
    dec si          ;Уменьшаем SI на 1
    jmp next5       ;Переход на next5
next7:
    mov ax, 0b800h      ;Заносим в AX адрес сегмента видеобуфера
    mov es, ax      ;Устанавливаем ES на видеобуфер
    xor di, di      ;Очистка DI
    mov ah, 0Fh         ;В AH записываем код цвета
    
next8:
    lodsb           ;Загрузка в AL из DS:[SI]
    or al, al       ;Проверка AL на ноль
    jz next7        ;Если ноль, то переход на next7
    stosw           ;Запись AX в ES:[DI]
    jmp next8       ;Переход на next8    
        
exit0:                          ;Завершение программы
    mov ax, 4c00h
    int 21h
Code ENDS
end start

 cmp buff,'.'
    jmp num0
    
    jmp next3
num0: inc num

.486
model small
Data SEGMENT use16
    ASSUME ds: Data
mess1 db 'Source file name: ','$'
mess3 db 0dh, 0ah, 'Error open source file!$'
mess5 db 0dh, 0ah, 'Read file error!$'
mess db 'Hello world!',0    ;Описание строки
file1 db 100, 100 dup(0)
 
hand1 dw 0
buff db 1 dup(?)
num dw 0
Strk db 7 dup(0),0
 
Data ENDS
Stk  SEGMENT use16 STACK
    ASSUME ss: Stk
    db 256 dup(0)
Stk  ENDS
Code SEGMENT use16
    ASSUME cs: Code
start:
    mov ax, data                ;В AX адрес сегмента данных
    mov ds, ax                  ;DS устанавливаем на AX
                ;------ Ввод имени и открытие исходного файла -------
    mov ah, 09h                 ;Вывод приглашения ввода имени
    mov dx, offset mess1        ;исходного файла
    int 21h
    mov ah, 0ah                 ;Ввод имени файла
    mov dx, offset file1
    mov si, dx
    inc si
    int 21h
    xor ax, ax                  ;Запись вместо 0dh значения 0
    mov al, ds:[si]
    add si, ax
    mov byte ptr ds:[si+1], 0
    mov ah, 3dh                 ;Открытие файла для чтения
    add dx, 2
    xor al, al
    int 21h
    jnc next0
    mov ah, 09h                 ;Если файл открыть не удалось
    mov dx, offset mess3
    int 21h
    jmp exit0
next0:                          ;Успешное открытие файла
    mov word ptr hand1, ax
                
                ;------ Цикл чтения -----------
loop0: 
    mov ah, 3fh             ;Чтение из исходного файла
    mov bx, hand1
    mov dx, offset buff
    mov cx, 1
    int 21h
    jnc next2
    mov ah, 09h                 ;Вывод сообщения, если ошибка
    mov dx, offset mess5
    int 21h
    jmp next4
 
next2:  
    cmp buff,'.'
    jmp num0
    
    
    
    jmp next3
num0: inc num   
 
next3: 
    cmp ax, 1               ;Проверка на конец файла
    jne next4
    jmp loop0                   ;Переход к следующей итерации
next4:                          ;Закрытие файла
    mov ah, 3eh
    mov bx, hand1
    int 21h
    
    
    mov ax,num
      ;вывод на экран
next5:
    lea si, Strk        ;Загружаем в SI смещение Strk
    add si, 6       ;Переходим в конец строки
    mov cx, 10      ;Заносим в CX значение 10
next6:
    xor dx, dx      ;Очистка DX
    div cx          ;Деление DX:AX / CX
    add dl, 48      ;Суммируем остаток с кодом ‘0’
    mov ds:[si], dl     ;Записываем в строку
    or ax, ax       ;Проверка AX на ноль
    jz next7        ;Если ноль, то переходим на next6
    dec si          ;Уменьшаем SI на 1
    jmp next6       ;Переход на next5
next7:
    mov ax, 0b880h      ;Заносим в AX адрес сегмента видеобуфера
    mov es, ax      ;Устанавливаем ES на видеобуфер
    xor di, di      ;Очистка DI
    mov ah, 0Fh         ;В AH записываем код цвета
next8:
    lodsb           ;Загрузка в AL из DS:[SI]
    or al, al       ;Проверка AL на ноль
    jz exit0        ;Если ноль, то переход на next7
    stosw           ;Запись AX в ES:[DI]
    jmp next8       ;Переход на next8    
        
exit0:                          ;Завершение программы
    mov ax, 4c00h
    int 21h
Code ENDS
end start

next2:  
    cmp buff,'.'
    jmp num0