Создание модуля завершения работы
Назначение Данный модуль предназначен для обеспечения завершения работы с экспертной системой
Подготовительный этап На этом этапе необходимо выполнить следующие действия : Запустить оболочку ESTA Используя меню File выбрать New в открывшемся окне выбрать knowledge Base
Подготовительный этап Проводится также как и в первом пункте За исключением того, что в заголовки не вводится картинка, а текст набирается прямо в окне. Sub knowledge base (end.kb) _______________________________________ | |Ending of consultation | |______________________________________|
Создание параметра Выполните команду Parameter – New Parameter.
Создание параметра В диалоговом окне выбрать тип bolean в окне Type а в строке Name введите имя параметра например again
Шаблон В результате появляется шаблон В полях которого вводятся соответствующие записи
Параметр again В полях для параметра again следует записать parameter again type boolean question 'Хотите ли ВЫ продолжить консультацию ?'
Секция Start После этого создается секция Start. Для этого В меню Section выбрать New section Появится окно New section
Создание секции В появившемся окне в строке Name введите имя секции. В данном случае это должна быть секция Start
Текст в шаблоне section start Это модуль завершения консультации ' call save_values('1aid.dat') /* Clear datafile */ if again chain 'experts.kb' if not again (advice До свидания', call clear_dialog() )
Завершение этапа Сохранить данный модуль. Для этого в меню файл выбирается команда Save as… нажимается кнопка Ok В папке должен появится файл end.kb Закройте оболочку ESTA