Структурне програмування на асемблері, Детальна інформація

; Пiдготовка i друк даних:

; --------------------------

proc printing

cld ;напрям злiва направо

lea si,[sector] ;початкова установка

g20:

lea di,[disarea]

mov [count],00

g30:

lea dx,[sector+512]

cmp si,dx ;кiнець сектора?

jne g40

call readsector ;так - читати наступний

cmp [endcde],00 ;кiнець файлу?

je g80 ;так - вийти

lea si,[sector]

g40:

mov bx,[count]

cmp bx,80 ;кiнець областi виводу?

jb g50 ;нi - обiйти,

mov [Word bx+di],0d0ah ;так - записати CR/LF

call print

lea di,[disarea] ;початок областi вивлду

g50:

lodsb ;записати [SI] в AL, збiльшити SI

mov bx,[count]

mov [di+bx],al ;записати символ

inc bx

cmp al,1ah ;кiнець файлу

je g80 ;так - вийти