Главная страница
Случайная страница
Разделы сайта
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника
|
Построение модели диалога
В соответствии с ЗОМ модель диалога для любой прикладной ИЭС затем описывается на ЯОСД, вследствие чего функционирование подсистемы общения будет являться результатом интерпретации построенной модели диалога.
Фрагменты сценариев диалога на ЯОСД приведены в таблице 3 (полное описание сценария диалога приведено в Приложении 2).
Таблица 3. Фрагменты сценариев диалога на ЯОСДСД
Сценарий
| Описание
| subscenario ЗапускОбъяснителя;
send '< message ProcName=" Run" > < /message> ' to Explainer;
end;
| Сценарий запуска объяснителя
| essage САзапуск to Asker;
line 'set Caption to $'Формирование начальной ситуации$'';
line 'output [$'Укажите наиболее подходящий вариант: применение языка общения$'] as Information';
line 'input $'не заставляет пользователя запоминать различные правила построения своих высказываний$' to #Объект1.Атрибут20# as Checked from $'да$' or $'нет$'';
line 'input $'требует от пользователя соблюдения явно выраженных ограничений$' to #Объект1.Атрибут19# as Checked from $'да$' or $'нет$'';
line 'input $'затрудняюсь ответить$' to #Объект1.Атрибут21# as Checked from $'да$' or $'нет$'';
line 'activate'
end;
message САОЕЯ to Asker;
line 'set Caption to $'ОЕЯ$'';
line 'output [$'Укажите какой из ОЕЯ Вы используете$'] as Information';
line 'input $'$' to #ОБЪЕКТ1.АТРИБУТ2# as Variant from [$'текстовые языки$', $'табличные языки$']';
line 'activate'
end;
message САУмКр2 to Asker;
line 'set Caption to $'Стилистика$'';
line 'output [$'Укажите, какие из следующих возможностей Вы включаете$'] as Information';
line 'input $'Распознавание системой орфографических ошибок, использование средств их блокировки$' to #ОБЪЕКТ1.АТРИБУТ8# as Checked from $'да$' or $'нет$'';
line 'input $'Понимание не совсем правильно построенных фраз$' to #ОБЪЕКТ1.АТРИБУТ7# as Checked from $'да$' or $'нет$'';
line 'activate'
end;
message САУмКр2_1 to Asker;
line 'set Caption to $'Стилистика$'';
line 'output [$'Укажите, какие из следующих возможностей Вы включаете$'] as Information';
line 'input $'Использование аббревиатур и сокращений$' to #ОБЪЕКТ1.АТРИБУТ9# as Checked from $'да$' or $'нет$'';
line 'activate'
end;
message САКритерий3 to Asker;
line 'set Caption to $'Разрешение конфликта$'';
line 'output [$'есть необходимость обеспечить возможность предсказывания значений и синтаксических функций неизвестных слов$'] as Information';
line 'input $'$' to #ОБЪЕКТ1.АТРИБУТ14# as IndefVariant from [$'да$']';
line 'activate'
end;
message САКритерий41 to Asker;
line 'set Caption to $'Разрешение конфликта$'';
line 'output [$'Используете ли вы при общении предложения длиной от 5 до 9 слов? $'] as Question';
line 'input $'$' to #ОБЪЕКТ1.АТРИБУТ15# as Variant from [$'да$', $'нет$']';
line 'activate'
end;
message САКритерий42 to Asker;
line 'set Caption to $'Разрешение конфликта$'';
line 'output [$'Используете ли Вы рабиение сложносочиненных предложений на отдельные фразы? $'] as Information';
line 'input $'$' to #ОБЪЕКТ1.АТРИБУТ16# as Variant from [$'да$', $'нет$']';
line 'activate'
end;
| Сценарий анализа на уместность разработки СОЗ
| message УместностьЗаключение to Asker;
line 'set Caption to $'Заключение анализа на уместность$'';
line concat('output ', text('Заключение: ', #ОБЪЕКТ1.АТРИБУТ11#, ''), 'as Information');
line 'activate';
end;
| Сценарий выдачи результата анализа на уместность
| subscenario ТекстовыйРедакторСД;
send concat('< message ProcName=" Run" > ',
' < func name=" OpenEM" module=" report" > ',
' < param type=" string" > diagnosis.dsf< /param> ',
' < /func> ',
'< /message> ') to Scripter;
end;
| Сценарий запуска редактора сценариев диалога
| subscenario СгенерироватьОбъяснения;
send '< message ProcName=" Generate" > < KBFileName> diagnosis.kbs< /KBFileName> < ExplFileName> genexp.xml< /ExplFileName> < /message> ' to Explainer;
send concat('< message ProcName=" Run" > ',
' < func name=" OpenXML" module=" report" > ',
' < param type=" string" > genexp.xml< /param> ',
' < /func> ',
'< /message> ') to Scripter;
end;
| Сценарий запуска демонстрации объяснений
|
|