mirror of
https://gitlab.com/Oreolek/duel.git
synced 2024-06-30 22:05:07 +03:00
234 lines
6.6 KiB
Lua
234 lines
6.6 KiB
Lua
--$Author:Alexander Yakolev, 2017
|
||
--$Version:1.0
|
||
require "format"
|
||
require "dlg"
|
||
require 'dbg' -- ПОЧЕМУ-ТО НЕ РАБОТАЕТ
|
||
require 'tools'
|
||
declare "char" ({})
|
||
-- require 'hideinv'
|
||
format.dash = true
|
||
format.quotes = true
|
||
format.para = true
|
||
-- https://www.google.ru/maps/place/%D0%9C%D0%B5%D0%BA%D1%81%D0%B8%D0%BA%D0%B0/@22.8355052,-105.0808555,16z/data=!4m5!3m4!1s0x84043a3b88685353:0xed64b4be6b099811!8m2!3d23.634501!4d-102.552784
|
||
init = function ()
|
||
map = obj {
|
||
nam = "Карта",
|
||
inv = function()
|
||
walk('map')
|
||
end
|
||
}
|
||
take(map)
|
||
end
|
||
|
||
local markers = {
|
||
chos = "626,666",
|
||
}
|
||
room {
|
||
nam = 'map',
|
||
disp = "Карта",
|
||
hideinv = true,
|
||
enter = function (here, from)
|
||
char.lastroom = from.nam
|
||
end,
|
||
pic = function()
|
||
local map = 'images/satellite.jpg'
|
||
if markers[char.lastroom] then
|
||
map = map .. ';images/marker.png@' .. markers[char.lastroom]
|
||
end
|
||
return map
|
||
end,
|
||
decor = [[
|
||
Вы сверяетесь с картой.^^
|
||
|
||
{back|Назад}
|
||
]],
|
||
obj = {
|
||
obj {
|
||
nam = 'back',
|
||
act = function()
|
||
return walkout()
|
||
end
|
||
}
|
||
}
|
||
}
|
||
|
||
dlg {
|
||
nam = 'main',
|
||
dsc = [[
|
||
От автобусной остановки до дома Чо было полтора километра.
|
||
По пути вы осматривали окрестности: высокая гора, бесконечные пашни
|
||
и маленькое село вокруг единственной колонки с водой.^^
|
||
|
||
Семья Чо отгородилась от села широкой полосой деревьев.
|
||
Их пашня не отличалась от остальных: такое же чёрное поле с рядами
|
||
роботов, которые молча копались в земле. Перед полем стоял
|
||
невысокий красновато-чёрный дом с двумя окнами.^^
|
||
|
||
На стук в дверь открыла низенькая черноволосая девушка.^^
|
||
|
||
-- А, так вы тот инженер из города? Проходите, мы сейчас всё покажем.
|
||
Я же правильно говорю, вы же инженер?
|
||
]],
|
||
obj = {
|
||
{
|
||
{
|
||
'Инженер (она)',
|
||
function()
|
||
char.gender = "she";
|
||
char.plural = false;
|
||
walk('start2');
|
||
return true;
|
||
end
|
||
},
|
||
{
|
||
'Инженер (он)',
|
||
function()
|
||
char.gender = "he";
|
||
char.plural = false;
|
||
walk('start2');
|
||
return true;
|
||
end
|
||
},
|
||
{
|
||
'Инженер (оно)',
|
||
function()
|
||
char.gender = "it";
|
||
char.plural = false;
|
||
walk('start2');
|
||
return true;
|
||
end
|
||
},
|
||
{
|
||
'Инженер (они)',
|
||
function()
|
||
char.gender = "they";
|
||
char.plural = false;
|
||
walk('start2');
|
||
return true;
|
||
end
|
||
},
|
||
{
|
||
'Инженеры (они)',
|
||
function()
|
||
char.gender = "they";
|
||
char.plural = true;
|
||
walk('start2');
|
||
return true;
|
||
end
|
||
}
|
||
}
|
||
}
|
||
}
|
||
dlg {
|
||
nam = 'start2',
|
||
dsc = function()
|
||
return [[
|
||
-- А, это хорошо что ]]..engineer()..[[.
|
||
Мы уже думали, что наша гарантия всё.
|
||
Это же такие старые роботы, всё время в поле.^^
|
||
|
||
Она вышла из дома и пригласила вас за собой.
|
||
Вы шли вдоль поля; металлические рабочие не обращали на вас внимания.
|
||
|
||
-- Вы знаете, у нас же нет других машин.
|
||
Когда-то хотели купить что-нибудь для дома, но тут эта война с Луной…
|
||
Вы были на войне?
|
||
]]
|
||
end,
|
||
obj = {
|
||
{
|
||
{
|
||
function()
|
||
return [[Цех РБ-23, с первого до последнего дня. Чинил]]..endings()..[[ ремонтных ботов.]]
|
||
end,
|
||
function()
|
||
char.earth = 1;
|
||
walk('start3');
|
||
return '-- Доблесть рабочих, конечно.';
|
||
end
|
||
}, -- + к симпатизирующим Земле
|
||
{function()
|
||
return 'Нет, '..pronoun_1()..' не был'..endings()..'.'
|
||
end, function() char.earth = 0; walk('start3'); return '-- А вы не… Хотя это не моё дело.'; end},
|
||
-- нет эффекта
|
||
{'Да, но Луна проиграла.',
|
||
function() char.earth = -1; walk('start3'); return "-- Ой, вы из этих… Извините." end},
|
||
-- + к симпатизирующим Луне
|
||
},
|
||
},
|
||
}
|
||
room {
|
||
nam = 'start3',
|
||
enter = 'Сюда, пожалуйста.',
|
||
decor = [[
|
||
Продолжение^^
|
||
|
||
И тут внезапно {out|диалоги заканчиваются.}
|
||
]],
|
||
obj = {
|
||
obj {
|
||
nam = 'out',
|
||
act = function()
|
||
walk('chos')
|
||
end
|
||
}
|
||
}
|
||
}
|
||
room {
|
||
nam = 'exit_west',
|
||
title = 'Дорога на запад',
|
||
disp = 'Дорога на запад',
|
||
way = {'intersection'},
|
||
dsc = [[
|
||
Вы стоите на окраине Жестианы.
|
||
Прямая автодорога идёт на запад, где начинается лес.
|
||
В лесу она тут же делает крутой поворот.
|
||
]]
|
||
}
|
||
room {
|
||
nam = 'exit_north',
|
||
disp = 'Дорога на север',
|
||
title = 'Дорога на север',
|
||
way = {'town'},
|
||
dsc = [[
|
||
Вы стоите на окраине Жестианы.
|
||
Прямая автодорога идёт на север.
|
||
|
||
Здесь от неё отходит небольшой заезд на запад.
|
||
]]
|
||
}
|
||
room {
|
||
nam = 'chos',
|
||
disp = 'Дом Чо',
|
||
title = 'Дом Чо',
|
||
way = {'town', 'intersection'},
|
||
dsc = [[
|
||
Небольшой дом с большой пашней.
|
||
]]
|
||
}
|
||
room {
|
||
nam = 'intersection',
|
||
title = 'Перекрёсток',
|
||
disp = 'Перекрёсток',
|
||
decor = [[]],
|
||
way = {'exit_west', 'chos', 'town'}
|
||
}
|
||
room {
|
||
nam = 'town',
|
||
title = 'Жестиана',
|
||
disp = 'Жестиана',
|
||
way = {'exit_north', 'chos', 'intersection', 'factory'},
|
||
decor = [[]]
|
||
}
|
||
room {
|
||
nam = 'factory',
|
||
title = [[Здание на горе]],
|
||
disp = [[Здание на горе]],
|
||
way = {'town'},
|
||
dsc = [[
|
||
Вы забираетесь на склон горы. Здесь стоит
|
||
|
||
Отсюда хорошо видна вся Жестиана.
|
||
]]
|
||
}
|