ции могут вкладываться до уровня
компилируются,а операторы между $ELSE и $ENDIF не компилируются.
Если Константа нулевая (FALSE),то операторы между $IF и $ELSE
игнорируются,а находящиеся между $ELSE и $ENDIF компилируюся.$ELSE устанав-
ливается опционально,но $ENDIF требуется всегда.Операторы условной компиля-
ции могут вкладываться до уровня глубиной 256.
Пример %ЦветнойЭкран=1 'установка именованной константы на ненулевое
'значение указывает работу на цветном экране
'установка нулевого значения указывает работу в монохромной системе
$if %ЦветнойЭкран
def seg=&HB800 'адрес памяти графического экрана
$else
def seg=&HB000 'адрес памяти монохромного экрана
for i%=0 to 4000 step 2
poke i%,asc("A") 'заполнить экран буквами "A"
next i%
'хранить все 4000 байтов видео-прогона
bsave "$if.dta",0,4000
end
Метаоператор $INCLUDE
---------------------
Функция $INCLUDE включает текстовый файл
--------
Синтаксис $INCLUDE файласпец.литерал
---------
Замечания Используйте $INCLUDE для компилирования текста другого файла
--------- вместе с текущим файлом.ФайлаСпец.литерал это строчная констан-
та,а представляемый его файл должен следовать соглашениям DOS об имени фай-
ла и в то же время представлять собой исходный файл Турбо Бейсика.Если для
включенного файла не специфицируется его имя,предполагается расширение .BAS.
Механизм $INCLUDE вызывает трактовку компилятором включаемого файла таким
опбразом,как если бы он физически существовал в первоначальном тексте в
данной точке.Это дает вам возможность разрывать вашу программу на управляе-
мые куски.Принцип рабочий файл/главный файл Турбо Бейсика относится к
$INCLUDE.В иллюстративных целях рассмотрим файлы CALCAREA.BAS и CONST.BAS:
Файл CALCAREA.BAS
Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий