Курсовая работа: Розробка програми призначеної для перегляду текстових файлів різного розміру

Init: Mov BX,1000h

GetMem: Mov AH,48h

Int 21h

Jc GetMem

Mov RecAddr,AX

Mov AX,BX

Sub AX,32

Mul Psize

Mov Blksize,AX

Call InitCrt

Call Set1

Call Set25

Read1: Call ReadBlk ;Загружаем следующий блок

Mov BL,Normal

Mov Attr,BL

Jnz Read2

Jmp AtEnd

Read2: Dec Row

Cmp Numlf,0

Je GetNext

Inc Row

Mov Col,1

GetNext:

Mov AX,Index ;Есть запись в буфере?

Cmp AX,Last

Jb GotNext

Jmp AtEnd

GotNext:

Call ListOne ;Выводим следующую запись