Курсовая работа: Програма для перегляду великих текстових файлів, розмір яких більший за 64 кілобайти

mov ds,dx

mov dx,offset fileblock

int 21h

;EOF - заповнити 0

cmp ax,0

jne read_ne

mov ah,42h

mov al,0

mov bx,word ptr ds:[filehandle]

xor cx,cx

xor dx,dx

int 21h ;==> на початок

jmp retry_n

read_ne:

mov dx,seg blocklength

mov ds,dx

mov word ptr ds:[blocklength],ax ;довжина блоку

popa

ret

readnextblock endp

;===================читання попереднього блоку з файла

readprevblock proc

pusha

mov ax,seg filehandle

mov ds,ax

mov ax,word ptr fs:[block_num]

dec ax

mov word ptr fs:[block_num],ax

;seek - спочатку поточне змiщення