PROGRAM (Объявить программу)
PROGRAM
[MAP
прототипы
.]
глобальные данные
CODE
операторы
[RETURN]
процедуры или функции
| MAP | Описание глобальных процедур и функций. |
| прототипы | Объявления PROCEDURE или FUNCTION. |
| глобальные данные | Объявление Глобальных Статических данных, которые могут использоваться всеми процедурами и функциями. |
| CODE | Начало блока выполнимых операторов. |
| операторы | Выполнимые инструкции программы. |
| RETURN | Завершает выполнение программы. Возвращает управление операционной системе. |
| Процедуры или Функции | Исходный текст для процедур и функций в Модуле PROGRAM. |
Оператор PROGRAM - первое описание в исходном модуле Кларион- программы.
Ему могут предшествовать либо комментарии к исходному тексту, либо директивы компилятора TITLE & SUBTITLE. Имя файла исходного текста ПРОГРАММЫ используется как имя файла для объектного (.OBJ) и исполняемого (.EXE) модулей при компиляции. Оператор PROGRAM может иметь метку, но метка игнорируется компилятором.
ПРОГРАММА с PROCEDURE и-или FUNCTION должна иметь MAP-структуру. MAP объявляет прототипы функций и-или процедур. Любая PROCEDURE или FUNCTION содержащаяся в отдельном файле исходного текста должна быть объявлена в структуре MODULE в пределах MAP.
Данные объявленные в модуле PROGRAM, между PROGRAM и CODE, является "Глобальными Статическими данными" и доступны из любой ПРОЦЕДУРЫ или ФУНКЦИИ в ПРОГРАММЕ.
Пример:
PROGRAM !Пробное описание программы
Fahrenheit REAL !Описание глобальных данных
Centigrade REAL
CODE !Hачало выполняемого кода
SETCOLOR(7)
BLANK
SHOW(4,20,'Введи температуру по Фаренгейту: ')
Fahrenheit = ENTRY(4,50.@N-04)
Centigrade = (Fahrenheit - 32) / 1.8
SHOW(6,20,'Температура по Цельсию: ')
SHOW(6,50,Centigrade,@N-04)
SHOW(8,20,'Press any key to exit')
ASK
См. Также: , , , ,
