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

Call GetRec

Mov AX,Index

Down3: Call Scroll_Dn

Mov AX,Index

Mov First,AX

Mov AX,Current

Mov Index,AX

Mov Row,24

Mov Col,1

Jmp GetNext

; Scroll Up one page

Back1 Proc Near

Mov CX,23

Back0: Call UpOne

Loop Back0

Mov Col,1

Ret

Back1 Endp

; Scroll up one line

UpOne Proc Near

Push CX

Mov CX,2

Cmp Index,0 ;Уже на верху?

Je Up1d ; да, не изменяем

Up1a: Mov ES,Recaddr

Up1b: Mov DI,Index

Cmp ES:Byte Ptr[DI],LF

Je Up1c

Dec Index