Чтение строки из файла

opening macro 
    mov ah,3Dh
    mov al,0
    int 21h
endm
 
 
reading macro str2,hndle
 
    xor dx,dx                ;переместили указатель в начало 
    xor cx,cx
    mov ax,4200h
    int 21h
    
    mov bx,Hndle ;дескриптор в bx
    mov ah,3fh
    mov cx,10 
    mov dx,offset str2
    int 21h
 jc errorr
    mov AH, 9 ; выводим строку, считанную из файла
    mov DX, offset str2
    int 21h
 
endm
 
closing macro hndle
mov ah, 3eh
mov bx,hndle
int 21h     
    
endm
 
exit macro 
    mov ah,4Ch ; вернуть управление родительскому процессу
    int 21h
endm 
 
clrscr macro 
    mov ah, 00h
    mov al,7
    int 10h 
endm 
 
proverka macro string1,string2,string3,string4
lea si,string1
mov cx,10
loopcom:
push cx
les di,string2;введенная строка
mov cx,3
repe cmpsb
cmp cx,0
je nezel
sub si,2
pop cx
loop loopcom
jmp net
nezel:;нашел
mov ah,9
    mov dx,OFFSET string3
    int 21h
jmp exitt
net:
mov ah,9
    mov dx,OFFSET string4
    int 21h
jmp exitt
 
 
endm

model small
stack 256
include mac.inc
public start
.data
handle dw 0 ;дескриптор файла
filename db '123.txt',0h
mes1 db  'vvedite 3 elementa dlya poiska= ', '$'
failed db  'takogo elementa net','$'
succes db  'takoi element prisutstvuet', '$'
errorik db 'error!','$'
buf  db   11 dup(0) 
incstr dd 3 dup (?)
.code
assume ds:@data, es:@data
 start:
 mov ax, @data ; кинуть data в регистр ax
    mov ds,ax ; кинуть ax в регистр ds
kok:
clrscr
mov dx,offset filename
opening 
mov ax,handle
jnc allready
mov ah,9
mov dx, offset errorik
int 21h
jmp kok
allready:
reading buf,handle
jnc rr
errorr:
mov ah,9
mov dx, offset errorik
int 21h
 
rr:
 push ax
    push dx
    mov ah,07h
    int 21h
    pop dx
    pop ax
mov ah,9
    mov dx,OFFSET mes1
    int 21h
mov ah,0ah        
lea dx,incstr     
int 21h 
 
clrscr
proverka buf,incstr,succes,failed
exitt:
closing handle
exit
end start