Changeset - 7b031c50917a
Parent rev.
Child rev.
[Not reviewed]
default
0 3 0
Silverwing - 6 years ago 2019-01-04 12:56:46

chapter 2: deep temple code now retrievable
3 files changed with 25 insertions and 19 deletions:
items.lua
12
2
journey_temple.lua
8
13
startup.lua
5
4
0 comments (0 inline, 0 general)
items.lua
➞
Show inline comments
 
@@ -782,61 +782,71 @@ item_electric_lamp = obj {
 
                else
 
                    s.state = 1;
 
                    return [[Вы разбираете лампу. ]];
 
                end;
 
            end;
 
        elseif s.state == 1 then
 
            if o == item_dynamo and item_dynamo.state == 1 then
 
                if here().underwater then
 
                    return [[Вы не можете сделать это здесь. ]];
 
                else
 
                    s.state = 2;
 
                    remove(item_dynamo, pl);
 
                    return [[Вы собираете лампу с динамо-машиной в одном корпусе. Теперь батарею можно заряжать не разбирая лампу. Вождь навьяров будет рад такому подарку. ]]
 
                end;
 
            end;
 
        end;
 
    end;
 
};
 
 
item_shark_tooth = obj {
 
    nam = "item_shark_tooth";
 
    disp = "Зуб акулы";
 
    dsc = [[{Мертвая акула} лежит здесь, пронзенная вашим гарпуном. ]];
 
    inv = [[Острый зуб кровожадной акулы, жившей у храма Ираафаанотра. ]];
 
    tak = [[Вы вырываете у акулы из пасти зуб и забираете его себе. ]];
 
};
 
 
item_raybox = obj {
 
	nam = 'item_raybox';
 
	disp = 'Коробочка лучей';
 
	dsc = function(s)
 
		if stead.deref(here()) == 'ven_ravine_crypt' then
 
			return [[Среди множества приборов, расположенных вдоль стен комнаты, ваше внимание привлекает небольшая прозрачная {коробочка} с несколькими прорезями. Внутри ее непрерывно движутся тонкие лучики света. ]];
 
		else
 
			return [[В центре стола, опутанная паутиной проводов, установлена {коробочка лучей}. Внутри нее, в точности как там, в навьярском хранилище, движутся тонкие лучики света. ]];
 
		end;
 
	end;
 
	inv = [[Навьярский прибор, известный вам как "коробочка лучей". Осталось научиться пользоваться им. ]];
 
	act = function(s)
 
		if stead.deref(here()) == 'ven_ravine_crypt' then
 
			remove(item_raybox, where(item_raybox));
 
			take(item_raybox, pl);
 
			return [[Вы аккуратно извлекаете "коробочку лучей" из механизма, в который она установлена. Светящиеся линии в ее недрах мгновенно гаснут. ]];
 
		end;
 
	end;
 
	used = function(s, o)
 
		if o == item_map_disc then
 
			deep_temple_found = true;
 
			remove(item_map_disc, pl);
 
			return [[Вы помещаете диск внутрь коробочки и он тут же опутывается лучами, которые начинают отражаться от него. Над поверхностью коробочки возникает полупрозрачное изображение -- это очень детальная навьярская карта, описывающая какое-то место, находящееся очень далеко отсюда. Цветные полосы, возникшие над изображением гласят "храм". ]];
 
		end;
 
	end
 
}
 
 
item_map_disc = obj {
 
	nam = "item_temple_disk";
 
	disp = "Светодиск из катакомб";
 
	dsc = [[У стены лежит небольшой блестящий {диск}. ]];
 
	tak = [[Вы поднимаете диск. ]];
 
	inv = [[Найденный в катакомбах Нлейисланотра блестящий гладкий диск из неизвестного материала. Диаметр около 10 сантиметров. В центре небольшое треугольное отверстие. Вдоль внешней кромки тянутся цветные полосы. ]];
 
	inv = function(s)
 
		local dt ='';
 
 
		for i = 1, #dt_code do
 
			dt = dt .. dt_wire_colors[dt_code[i]];
 
			if i < #dt_code then
 
				dt = dt .. ', ';
 
			end;
 
		end;
 
 
		return([[Найденный в катакомбах Нлейисланотра блестящий гладкий диск из неизвестного материала. Диаметр около 10 сантиметров. В центре небольшое треугольное отверстие. Вдоль внешней кромки тянутся цветные полосы: ]] .. dt .. [[. ]]);
 
	end;
 
}
 
\ No newline at end of file
journey_temple.lua
➞
Show inline comments
 
@@ -580,207 +580,202 @@ dt_terminal_room = room {
 
        if (#s.code == 0) then
 
            r = "Вы стоите перед небольшим пультом. На экране пусто. ";
 
        else
 
            r = "Вы стоите перед небольшим пультом. На экране вы видите следующую последовательность цветов: ";
 
            for i = 1, #s.code - 1 do
 
                r = r .. dt_wire_colors[s.code[i]] .. ", ";
 
            end;
 
            r = r .. dt_wire_colors[s.code[#s.code]] .. ". ";
 
        end;
 
        r = r .. "Под экраном расположены шесть кнопок. "
 
        return r;
 
    end;
 
    way = {
 
        kh_vroom("Отойти от терминала", "dt_temple_entrance");
 
    };
 
    obj = {
 
        "dt_term1",
 
        "dt_term2",
 
        "dt_term3",
 
        "dt_term4",
 
        "dt_term5",
 
        "dt_term6"
 
    };
 
    check = function(s)
 
        if (#s.code == 4) then
 
            local test = true;
 
            for i = 1, #s.code do
 
                test = test and (s.code[i] == dt_code[i]);
 
            end;
 
            s.code = {};
 
            if (test) then
 
                dt_temple_entrance.open = true;
 
                pr [[ Через несколько мгновений дисплей гаснет. Дверь открывается почти бесшумно, открывая вам доступ к внутреннему залу древнего святилища. ]];
 
            else
 
                pr [[ Через несколько мгновений дисплей гаснет. ]];
 
            end;
 
        end;
 
    end;
 
};
 

			




	
	
	
		
 
dt_term1 = obj {

			




	
	
	
		
 
    nam = "dt_term1";

			




	
	
	
		
 
    dsc = "{Нажать фиолетовую кнопку}^";

			




	
	
	
		
 
    act = function(s)

			




	
	
	
		
 
        if (ArrayUtils.indexOf(dt_buttons, 1) ~= 0 or not dt_wires_room.connections[1]) then

			




	
	
	
		
 
            return "Вы нажимаете на кнопку, но ничего не происходит. ";

			




	
	
	
		
 
        else

			




	
	
	
		
 
            table.insert(dt_terminal_room.code, dt_wires_room.connections[1]);

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
            dt_terminal_room:check();

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
        end;

			




	
	
	
		
 
    end;

			




	
	
	
		
 
};

			




	
	
	
		
 

			




	
	
	
		
 
dt_term2 = obj {

			




	
	
	
		
 
    nam = "dt_term2";

			




	
	
	
		
 
    dsc = "{Нажать синюю кнопку}^";

			




	
	
	
		
 
    act = function(s)

			




	
	
	
		
 
        if (ArrayUtils.indexOf(dt_buttons, 2) ~= 0 or not dt_wires_room.connections[2]) then

			




	
	
	
		
 
            return "Вы нажимаете на кнопку, но ничего не происходит. ";

			




	
	
	
		
 
        else

			




	
	
	
		
 
            table.insert(dt_terminal_room.code, dt_wires_room.connections[2]);

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
            dt_terminal_room:check();

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
        end;

			




	
	
	
		
 
    end;

			




	
	
	
		
 
};

			




	
	
	
		
 

			




	
	
	
		
 
dt_term3 = obj {

			




	
	
	
		
 
    nam = "dt_term3";

			




	
	
	
		
 
    dsc = "{Нажать зеленую кнопку}^";

			




	
	
	
		
 
    act = function(s)

			




	
	
	
		
 
        if (ArrayUtils.indexOf(dt_buttons, 3) ~= 0 or not dt_wires_room.connections[3]) then

			




	
	
	
		
 
            return "Вы нажимаете на кнопку, но ничего не происходит. ";

			




	
	
	
		
 
        else

			




	
	
	
		
 
            table.insert(dt_terminal_room.code, dt_wires_room.connections[3]);

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
            dt_terminal_room:check();

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
        end;

			




	
	
	
		
 
    end;

			




	
	
	
		
 
};

			




	
	
	
		
 

			




	
	
	
		
 
dt_term4 = obj {

			




	
	
	
		
 
    nam = "dt_term4";

			




	
	
	
		
 
    dsc = "{Нажать желтую кнопку}^";

			




	
	
	
		
 
    act = function(s)

			




	
	
	
		
 
        if (ArrayUtils.indexOf(dt_buttons, 4) ~= 0 or not dt_wires_room.connections[4]) then

			




	
	
	
		
 
            return "Вы нажимаете на кнопку, но ничего не происходит. ";

			




	
	
	
		
 
        else

			




	
	
	
		
 
            table.insert(dt_terminal_room.code, dt_wires_room.connections[4]);

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
            dt_terminal_room:check();

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
        end;

			




	
	
	
		
 
    end;

			




	
	
	
		
 
};

			




	
	
	
		
 

			




	
	
	
		
 
dt_term5 = obj {

			




	
	
	
		
 
    nam = "dt_term5";

			




	
	
	
		
 
    dsc = "{Нажать оранжевую кнопку}^";

			




	
	
	
		
 
    act = function(s)

			




	
	
	
		
 
        if (ArrayUtils.indexOf(dt_buttons, 5) ~= 0 or not dt_wires_room.connections[5]) then

			




	
	
	
		
 
            return "Вы нажимаете на кнопку, но ничего не происходит. ";

			




	
	
	
		
 
        else

			




	
	
	
		
 
            table.insert(dt_terminal_room.code, dt_wires_room.connections[5]);

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
            dt_terminal_room:check();

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
        end;

			




	
	
	
		
 
    end;

			




	
	
	
		
 
};

			




	
	
	
		
 

			




	
	
	
		
 
dt_term6 = obj {

			




	
	
	
		
 
    nam = "dt_term6";

			




	
	
	
		
 
    dsc = "{Нажать красную кнопку}^";

			




	
	
	
		
 
    act = function(s)

			




	
	
	
		
 
        if (ArrayUtils.indexOf(dt_buttons, 6) ~= 0 or not dt_wires_room.connections[6]) then

			




	
	
	
		
 
            return "Вы нажимаете на кнопку, но ничего не происходит. ";

			




	
	
	
		
 
        else

			




	
	
	
		
 
            table.insert(dt_terminal_room.code, dt_wires_room.connections[6]);

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
            dt_terminal_room:check();

			




	
	
	
		
 
            pr "Вы нажимаете на кнопку, и на экране зажигается соответствующая ей цветная полоса. ";

			




	
	
	
		
 
        end;

			




	
	
	
		
 
    end;

			




	
	
	
		
 
};

			




	
	
	
		
 

			




	
	
	
		
 
dt_wire_colors = {

			




	
	
	
		
 
    "фиолетовый",

			




	
	
	
		
 
    "синий",

			




	
	
	
		
 
    "зеленый",

			




	
	
	
		
 
    "желтый",

			




	
	
	
		
 
    "оранжевый",

			




	
	
	
		
 
    "красный"

			




	
	
	
		
 
};

			




	
	
	
		
 

			




	
	
	
		
 
dt_wires_room = dlg {

			




	
	
	
		
 
    var {

			




	
	
	
		
 
        connections = {

			




	
	
	
		
 
            1,

			




	
	
	
		
 
            2,

			




	
	
	
		
 
            3,

			




	
	
	
		
 
            4,

			




	
	
	
		
 
            5,

			




	
	
	
		
 
            6

			




	
	
	
		
 
        };

			




	
	
	
		
 
        selected = nil;

			




	
	
	
		
 
    };

			




	
	
	
		
 
    not_follow = true;

			




	
	
	
		
 
    nam = "dt_wires_room";

			




	
	
	
		
 
    disp = "У входа в храм, панель";

			




	
	
	
		
 
    dsc = [[

			




	
	
	
		
 
        Перед вами открытая панель, за которой находятся шесть проводов, подключенные к своим разъемам. Провода отличаются цветами. 

			




	
	
	
		
 
    ]]; 

			




	
	
	
		
 
    choose_socket = function(s)

			




	
	
	
		
 
        pon("s0");

			




	
	
	
		
 
        pon("s1");

			




	
	
	
		
 
        pon("s2");

			




	
	
	
		
 
        pon("s3");

			




	
	
	
		
 
        pon("s4");

			




	
	
	
		
 
        pon("s5");

			




	
	
	
		
 
        for conn = 1, #dt_wires_room.connections do

			




	
	
	
		
 
        pon("s0", "s1", "s2", "s3", "s4", "s5");

			




	
	
	
		
 
        for conn = 1, 6 do

			




	
	
	
		
 
            if (dt_wires_room.connections[conn] == 1) then

			




	
	
	
		
 
                poff("s0");

			




	
	
	
		
 
            elseif (dt_wires_room.connections[conn] == 2) then

			




	
	
	
		
 
                poff("s1");

			




	
	
	
		
 
            elseif (dt_wires_room.connections[conn] == 3) then

			




	
	
	
		
 
                poff("s2");

			




	
	
	
		
 
            elseif (dt_wires_room.connections[conn] == 4) then

			




	
	
	
		
 
                poff("s3");

			




	
	
	
		
 
            elseif (dt_wires_room.connections[conn] == 5) then

			




	
	
	
		
 
                poff("s4");

			




	
	
	
		
 
            elseif (dt_wires_room.connections[conn] == 6) then

			




	
	
	
		
 
                poff("s5");

			




	
	
	
		
 
            end;

			




	
	
	
		
 
        end;

			




	
	
	
		
 
        psub("socket");

			




	
	
	
		
 
    end;

			




	
	
	
		
 
    phr = { 

			




	
	
	
		
 
        {tag="wire"};

			




	
	
	
		
 
        {

			




	
	
	
		
 
            tag = "w0", always = true, 

			




	
	
	
		
 
            function(s)

			




	
	
	
		
 
                local connect = "не подключен";

			




	
	
	
		
 
                if (dt_wires_room.connections[1] ~= nil) then

			




	
	
	
		
 
                    connect = dt_wire_colors[dt_wires_room.connections[1]] .. " разъем";

			




	
	
	
		
 
                    return "Отсоединить фиолетовый провод (".. connect .. ")";

			




	
	
	
		
 
                else

			




	
	
	
		
 
                    return "Выбрать фиолетовый провод (".. connect .. ")";

			




	
	
	
		
 
                end;

			




	
	
	
		
 
                

			




	
	
	
		
 
            end, function(s)

			




	
	
	
		
 
                if (dt_wires_room.connections[1] ~= nil) then

			




	
	
	
		
 
                    dt_wires_room.connections[1] = nil;

			




	
	
	
		
 
                    return "Вы отсоединяете провод";

			




	
	
	
		
 
                else

			




	
	
	
		
 
                    dt_wires_room.selected = 1;

			




	
	
	
		
 
                    dt_wires_room:choose_socket();

			




	
	
	
		
 
                    return "Куда подключить?";

			




	
	
	
		
 
                end;

			




	
	
	
		
 
            end

			




	
	
	
		
 
        };

			




	
	
	
		
 
        {

			




	
	
	
		
 
            tag = "w1", always = true, 

			




	
	
	
		
 
            function(s)

			




	
	
	
		
 
                local connect = "не подключен";

			




	
	
	
		
 
                if (dt_wires_room.connections[2] ~= nil) then

			




	
	
	
		
 
                    connect = dt_wire_colors[dt_wires_room.connections[2]] .. " разъем";

			




	
	
	
		
 
                    return "Отсоединить синий провод (".. connect .. ")";

			




	
	
	
		
 
                else

			




        

    


    
    

    

        

                

                    startup.lua
                

                

                  
                      
                        

                      ➞

                      
                        
                  

                  
                      
                  
                      
                  
                      
                  
                      
                  
                  
                

                

                    Show inline comments
                    
                

        

        

            



	
	
		
 
@@ -116,77 +116,78 @@ game.dsc = [[

			




	
	
	
		
 

			




	
	
	
		
 
game_act_phrases = {

			




	
	
	
		
 
    "Вы не знаете, что с этим делать. ";

			




	
	
	
		
 
    "Вам нет смысла это трогать. ";

			




	
	
	
		
 
    "Вам это ничем не поможет. ";

			




	
	
	
		
 
    "Это бессмысленно. ";

			




	
	
	
		
 
    "Незачем это трогать. ";

			




	
	
	
		
 
};

			




	
	
	
		
 

			




	
	
	
		
 
game_use_phrases = {

			




	
	
	
		
 
    "Вам это ничем не поможет. ";

			




	
	
	
		
 
    "Это бессмысленно. ";

			




	
	
	
		
 
    "Вы не знаете, как это сделать. "

			




	
	
	
		
 
};

			




	
	
	
		
 

			




	
	
	
		
 
game.act = function(s)

			




	
	
	
		
 
    return game_act_phrases[rnd(#game_act_phrases)];

			




	
	
	
		
 
end;

			




	
	
	
		
 

			




	
	
	
		
 
game.use = function(s)

			




	
	
	
		
 
    return game_use_phrases[rnd(#game_use_phrases)];

			




	
	
	
		
 
end;

			




	
	
	
		
 
game.inv = "INV: Если вы видите это сообщение -- это баг. ";

			




	
	
	
		
 

			




	
	
	
		
 
preview_unavailable_learr = game_over("preview_unavailable_learr", [[Спасти Леарр у обитателей Атлантиды не получилось. Гибель навьярессы поставила под угрозу многое, чего удалось добиться персоналу станции за долгие годы под водой. ^^Узнать, что произошло дальше, вы сможете в полной версии игры.^^Вы можете загрузить игру и попробовать спасти Леарр самостоятельно. ^^Мы ждем ваших отзывов на почту: inbox@silverwing.one^Следите за выходом новых версий на нашем сайте: awakening.silverwing.one]]);

			




	
	
	
		
 

			




	
	
	
		
 
preview_unavailable_rayfish = game_over("preview_unavailable_rayfish", [[Убив ската, вы восстанавливаете против себя всех навьяров из Дипатреанотра и Ираафаанотра. В ваших дальнейших поисках вам придется рассчитывать только на себя.^^Узнать, что произошло дальше, вы сможете в полной версии игры.^^Вы можете загрузить игру и попробовать обойтись без убийства ската. ^^Мы ждем ваших отзывов на почту: inbox@silverwing.one^Следите за выходом новых версий на нашем сайте: awakening.silverwing.one]]);

			




	
	
	
		
 

			




	
	
	
		
 
preview_unavailable_venaedanotrr = cutscene("preview_unavailable_venaedanotrr", "Предварительная версия", [[Левиафан полным ходом несется вдаль, к невиданным доселе навьярским поселениям. Кто знает, какие приключения ждут вас и остальных членов экипажа субмарины?^^Узнать, что произошло дальше, вы сможете в полной версии игры. Если вы не собрали оба фрагмента карты, то вы можете продолжить игру. ^^Мы ждем ваших отзывов на почту: inbox@silverwing.one^Следите за выходом новых версий на нашем сайте: awakening.silverwing.one]], "leviathan_wheelhouse");

			




	
	
	
		
 

			




	
	
	
		
 
preview_unavailable_dypatreanotrr = cutscene("preview_unavailable_dypatreanotrr", "Предварительная версия", [[Вы входите в пещеру в поисках очередного фрагмента карты. Какие испытания предстоит вам преодолеть, прежде, чем вы найдете его? Вы узнаете это в полной версии игры. Если вы не собрали оба фрагмента карты, то вы можете продолжить игру. ^^Мы ждем ваших отзывов на почту: inbox@silverwing.one^Следите за выходом новых версий на нашем сайте: awakening.silverwing.one]], "dyp_temple_cave_entrance");

			




	
	
	
		
 

			




	
	
	
		
 
function init()

			




	
	
	
		
 
    ---modules init

			




	
	
	
		
 
    pl = player_drake;

			




	
	
	
		
 
    --putf("debug_tool", stead.me())

			




	
	
	
		
 
    atlantis_init();

			




	
	
	
		
 
    leviathan_init();

			




	
	
	
		
 
    warehouse18_init();

			




	
	
	
		
 
    warehouse32_init();

			




	
	
	
		
 

			




	
	
	
		
 
    if prefs.language then

			




	
	
	
		
 
        language = prefs.language;

			




	
	
	
		
 
    else

			




	
	
	
		
 
        prefs.language = language;

			




	
	
	
		
 
    end;

			




	
	
	
		
 
    

			




	
	
	
		
 
    local nums = {1,2,3,4,5,6};

			




	
	
	
		
 
    for i = 1, 4 do 

			




	
	
	
		
 
        local index = rnd(#nums);

			




	
	
	
		
 
        table.insert(dt_code, nums[index]);

			




	
	
	
		
 
        table.remove(nums, index);

			




	
	
	
		
 
    if #dt_code == 0 then

			




	
	
	
		
 
        for i = 1, 4 do

			




	
	
	
		
 
            local index = rnd(#nums);

			




	
	
	
		
 
            table.insert(dt_code, nums[index]);

			




	
	
	
		
 
        end;

			




	
	
	
		
 
    end;

			




	
	
	
		
 
    nums = {1,2,3,4,5,6};

			




	
	
	
		
 
    for i = 1, 3 do 

			




	
	
	
		
 
        local index = rnd(#nums);

			




	
	
	
		
 
        table.insert(dt_buttons, nums[index]);

			




	
	
	
		
 
        table.remove(nums, index);

			




	
	
	
		
 
    end;

			




	
	
	
		
 
    ---game init

			




	
	
	
		
 
    pl.where = intro;

			




	
	
	
		
 
    ---debug

			




	
	
	
		
 
    --[[nley_cave_entrance.state = 1;

			




	
	
	
		
 
    pl.where = "nley_phaetlarr_dlg_join";

			




	
	
	
		
 
    move("submarine_leviathan", "ven_temple_entrance");

			




	
	
	
		
 

			




	
	
	
		
 
    take(ven_item_green_key);

			




	
	
	
		
 
    take(ven_item_red_key);

			




	
	
	
		
 
    take(ven_item_tablet);

			




	
	
	
		
 
    ven_temple_labyrinth_l1.position = '17';

			




	
	
	
		
 

			




	
	
	
		
 
    -- leviathan

			




	
	
	
		
 
    submarine_leviathan.circuit_breaks = 0;

			




	
	
	
		
 
    submarine_leviathan.battery = true;

			




	
	
	
		
 
    submarine_leviathan.power_on = true;

			




	
	
	
		
 
    submarine_leviathan.air_level = 500000;]]

			




	
	
	
		
 
end; 

			




        

    



    


    



    



      

      





    
    0 comments (0 inline, 0 general)
    





    


  

  







  


    




    








    
        Server instance: silverwing-692242
    
    
        This site is powered by
            Kallithea,
        which is
        © 2010–2023 by various authors & licensed under GPLv3.
            – Support