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

; GetRec - извлекает следующую запись

GetRec Proc Near

Push ES

Push CX

Push SI

Push DI

GetR: Test Switch1,Eor

Jz GetR0

Mov AX,Last

Mov Index,AX

Call ReadBlk

Jnz GetR0

Jmp GetRd

GetR0: Sub DI,DI

Mov Word Ptr NumLF,DI

And Switch2,0FFh-Nodata

Mov ES,RecAddr

GetR2: Mov SI,Index

Mov AL,ES:[SI]

Cmp AL,Eof

Jne GetR3

Mov Reclen,DI

Or Switch1,Eor

Jmp GetR

GetR3: And AL,char_msk

Cmp AL,09h

Jne GetR4

Mov CX,DI

Add CX,8