Тема закрыта
Язык Разметки Интерактивной Литературы (ЯРИЛ) версии 2.0 проходит стадию формирования и развития. На данный момент существует некий вариант #001 как первая предварительная реализация языка. Приведу пример:
------------------------------------------------------------------//Пример №1 редакция 2
ярил 2.0
//И. Р. Д. В. Т. П.
//ж-женский род, с-средний, <пусто>-мужской
локация Камера "Одиночная камера" ("одиночн"+"ая","ой",р,"ую",р,р) ("камер"+"а","ы","е","у","ой",д) ж:
"Мокрая, холодная камера. Стены в полумраке кажутся серыми. В одной из них виднеется тяжёлая металлическая дверь."
/локация
//*-множественное число
предмет Стены "Стены" ("") ("стен"+"ы",,"е","у","ой",д) * - Камера:
"Серые сырые стены. Полуотваливающаяся штукатурка имеет мерзкий вид. На одной из стен проступает какая-то надпись."
(неподвижен)
/предмет
предмет Надпись "Надпись на стене" ("") ("надпис"+"ь",и,"и",и,"ью",д) ж - Камера:
"С трудом можно прочесть: 'Проба пера... Привет от Соника! '"
(неподвижен)
(читаем)
/предмет
локация Выход "Выход из тюрьмы" ("") ("выход"+,"а","у",,"ом","е"):
"Узкий серый коридор упирается в каменную стену. Массивные металлические ворота приоткрыты..."
/локация
//сказать_з - сказать_заглавная
функция Взять
если неподвижен тогда
сказать_з ип+" неподвиж"+(выбор пол=м:"ен",ж:"на",с:"но",*:"ны")
иначе
переместить сам в инв
сказать_з "Вы взяли "+вп
/если
/функция
функция Читать
если читаем тогда
Описать
иначе
сказать_з ип+" нечитаем"+(выбор пол=ж:"а",с:"о",*:"ы")
/если
/функция
функция Описать
сказать " "+ип
сказать " "+Описание
/функция
функция ПоказатьИнвентарь
сказать "У вас с собой:"
если инв.колво=0 тогда
сказать " (пусто)"
иначе
для а=1 до колво(инв)
сказать " "+инв(а).ип
/для
/если
/функция
//и,р,д,в,т,п - предметы в падежах; "" - неизменяемая часть
команда "взять", "возьми", "забрать", "забери"
* в: Взять
/команда
команда "читать", "читай", "прочесть", "прочти"
* в: Читать
/команда
команда "осмотреться", "осмотрись", "оглядеться", "оглядись"
Описать(ТекЛок)
/команда
команда "осмотреть", "осмотри", "исследовать", "исследуй"
* в: Описать
/команда
команда "осм"
* в: Описать
Описать(ТекЛок)
/команда
команда "инвентарь", "инвентарий", "инв", "и"
ПоказатьИнвентарь
/команда
функция Среда.Нераспознаваема
сказать "Простите, я не понимаю эту фразу."
/функция
функция Среда.Предначало
сказать "Это тестовая история на 'ЯРИЛ 2.0. Релиз #001.'"
/функция
------------------------------------------------------------------
Мне интересно, насколько данный пример понятен IF-писателям - непрограммистам?
Неактивен
Как всегда, Rar3.
Неужели из-зи выигрыша в 3% качать новые версии?
Лень...
Неактивен
Тема закрыта