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

Початковою позицією міток і самостійних коментарів буде стовпчик 1.

Початковою позицією структурних операторів і мнемокодів команд буде стовпчик 9.

Початковою позицією операндів буде стовпчик 17.

Початковою позицією коментарів буде стовпчик 41.

Всередині структур оператори зміщуються на чотири позиції вправо. При бажанні можна задати інші початкові позиції.

ПЕРЕФОРМАТУВАННЯ НЕСТРУКТУРОВАНИХ ПРОГРАМ

Потрібно врахувати що в програми SALUT функція переформатування відділена від функції опрацювання структур. Отже, якщо ми і не користуємося структурами, проте можемо викликати програму SALUT для переформатування своєї програми, написаної на мові асемблера. Для цього потрібно набрати текст програми як звичайно (скажемо, розділяючи елементи операторів одним пропуском або символом табуляції), потім зберегти його у файлі і ввести команду виду

С>с:salut ім'я_файлу.asm, ім'я_файлу. asm, nul

Програма SALUT переформатує файл ім'я_файлу.АSМ і перейменує неформатовану версію в ім'я_файлу.ВАК.

ЛІСТИНГ ПРОГРАМИ ДРУКУ ASCII ФАЙЛІВ print

; ДРУК ДИСКОВИХ ASCII ФАЙЛІВ

; ТЕХНIЧНI ЗАСОБИ, ЩО ВИКОРИСТОВУЮТЬСЯ:

;Програма виконується на ПК сумiсному з IBM PC базової конфiгурацiї ;монiтор, клавiатура).Мiнiмальнi вимоги: процесор фiрми Intel 8086 i ;старший , наявнiсть 3,5"дисковода або наявнiсть HDD, наявність EPSON-;сумісного матричного принтера.

;Програмне забезпечення: базова версія DOS.

; Для використання програми необхiдно запустити файл print.exe

;і на запрошення до вводу ввести повний шлях до файлу, який потрібно ;роздрукувати. Якщо задати тільки ім’я файлу, то програма шукатиме ;його в текучому каталозі.

ideal

model small

stack 256

;_______________________________________________________________

dataseg

filenam db 32 dup(' ') ;список параметрiв для

maxlen db 32 ;вводу

namelen db 0 ;iменi файлу

sector db 512 dup(' ') ;область вводу файлу

disarea db 120 dup(' ') ;область виводу

count dw 00

endcde dw 00

handle dw 0

openmsg db '***Open error***',10,13