atl_lfc_crane_ns_inc = obj {

    nam = "atl_lfc_crane_ns_inc";

    dsc = "{Сдвинуть рычаг \"с<->ю\" вправо}^";

    act = function(s)

        if atl_nd_crane.px == 3 then

            return [[Рычаг заклинило. ]];

        end;

        atl_nd_crane.py = atl_nd_crane.py + 1;

        return "Кран сдвигается на юг. ";

    end;

};

atl_lfc_crane_ud_tgl = obj {

    nam = "atl_lfc_crane_ud_tgl";

    dsc = "{Повернуть рычаг \"Верх-низ\"}";

    act = "Вам это сейчас не нужно. ";

};

atl_nd_barrel = obj {

	nam = "Бочка";

	dsc = [[На крюке крана висит {бочка}, судя по всему -- пустая. ]];

	canshoot = function(s)

		return where(atl_lfc_sab) == atl_lfc_bridge_w and atl_nd_crane.px == 1 and atl_nd_crane.py == 2;

	end;

	onshoot = function(s)

		remove(atl_nd_barrel);

		remove(char_leroy, where('char_leroy'));

		remove(char_goldman, where('char_goldman'));

		walkin(atl_lfc_dock_end_barreled);

	end;

};

atl_lfc_dock_s = room {

    nam = "Атлантида, Аква, док Наутилуса, южная часть, у входа";

    dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Наутилус.  Снизу, под водой, расположен огромный люк, закрывающий доступ внутрь дока. Несколько легких мостиков сконструированы таким образом, чтобы их расположение легко можно было изменить для удобства работы и обслуживания субмарин. У западной стены вы видите пульт управления краном. У северной стены составлены какие-то ящики. ]];

    way = {

        kh_vroom("В коридор A", "atl_aqua_corridor_a");

        kh_vroom("К западной стене", "atl_lfc_dock_w");

        kh_vroom("К восточной стене", "atl_lfc_dock_e");

        kh_vroom("На мостик", "atl_lfc_bridge_s");

    };

    obj = {

        "atl_nd_crane";

        "atl_nd_barrel";

    };

};

atl_lfc_dock_w = room {

	nam = "Атлантида, Аква, док Наутилуса, западная часть";

	dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Наутилус.  Снизу, под водой, расположен огромный люк, закрывающий доступ внутрь дока. Несколько легких мостиков сконструированы таким образом, чтобы их расположение легко можно было изменить для удобства работы и обслуживания субмарин. Вы находитесь у западной стороны. На небольшом расстоянии от вас вы видите пульт управления краном. У северной стены дока составлено несколько ящиков. ]];

	way = {

		kh_vroom("К северной стене", "atl_lfc_dock_n");

		kh_vroom("К южной стене", "atl_lfc_dock_s");

		kh_vroom("На мостик", "atl_lfc_bridge_w");

		kh_vroom("К пульту управления", "atl_lfc_control");

	};

    obj = {

        "atl_nd_crane";

        "atl_nd_barrel";

    };

};

atl_lfc_dock_n = room {

	nam = "Атлантида, Аква, док Наутилуса, северная часть";

	dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Наутилус.  Снизу, под водой, расположен огромный люк, закрывающий доступ внутрь дока. Несколько легких мостиков сконструированы таким образом, чтобы их расположение легко можно было изменить для удобства работы и обслуживания субмарин. Вы находитесь в северной части помещения. У западной стены вы видите пульт управления краном. ]];

	way = {

		kh_vroom("К восточной стене", "atl_lfc_dock_e");

		kh_vroom("К западной стене", "atl_lfc_dock_w");

	};

	obj = {

        "atl_nd_crane";

        "atl_nd_barrel";

		"atl_lfc_boxes";

	};

};

atl_lfc_dock_e = room {

    nam = "Атлантида, Аква, док Наутилуса, восточная стена";

    dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Наутилус.  Снизу, под водой, расположен огромный люк, закрывающий доступ внутрь дока. Несколько легких мостиков сконструированы таким образом, чтобы их расположение легко можно было изменить для удобства работы и обслуживания субмарин. Вы находитесь в восточной части помещения. ]];

    way = {

        kh_vroom("К южной стене", "atl_lfc_dock_s");

        kh_vroom("К северной стене", "atl_lfc_dock_n");

        kh_vroom("На мостик", "atl_lfc_bridge_s");

    };

    obj = {

        "atl_nd_crane";

        "atl_nd_barrel";

    };

};

atl_lfc_behind_boxes = room {

    nam = "Ящики";

    nosave = true;

    noautosave = true;

    dsc = function(s)

        local f = [[Док хорошо просматривается из вашего укрытия. ]];

    end;

    way = {

        kh_vroom("Выйти из укрытия", function(s)

             if (where(atl_lfc_sab) == atl_lfc_dock_s) or (where(atl_lfc_sab) == atl_lfc_dock_w) then

                return 'game_over_lfc_shot';

             else

                return 'atl_lfc_dock_n';

             end;

        end);

    };

    obj = {

        "atl_nd_crane";

        "atl_nd_barrel";

    };

};

atl_lfc_boxes = obj {

	var {

		state = 0;

	};

	nam = "Ящики";

	dsc = function(s)

		if (s.state == 0) then

			return [[У стены составлено несколько {ящиков}. ]];

		elseif (s.state == 1) then

			return [[У стены составлено несколько {ящиков}, за которыми вы сможете спрятаться, поджидая саботажника. ]];

		elseif (s.state == 2) then

			return [[У стены составлено несколько {ящиков}. ]];

		end;

	end;

	act = function(s)

		if (s.state == 0) then

			s.state = 1;

			return [[За этими ящиками можно спрятаться! ]];

		elseif (s.state == 1) then

			s.state = 2;

			walk("atl_lfc_behind_boxes");

            move("atl_lfc_sab", "atl_lfc_dock_s");

            lifeon("atl_lfc_sab");

			return [[Вы прячетесь за ящиками. Через некоторое время дверь дока открывается и кто-то входит. В полумраке издалека вы не можете разглядеть кто это, но скорее всего, это саботажник. ]];

		else

			return [[Вам это больше не нужно. ]];

		end;

	end;

};

atl_lfc_bridge_s = room {

	nam = "Атлантида, Аква, док Наутилуса, южная часть, мостик";

	dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Наутилус.  Снизу, под водой, расположен огромный люк, закрывающий доступ внутрь дока. Несколько легких мостиков сконструированы таким образом, чтобы их расположение легко можно было изменить для удобства работы и обслуживания субмарин. Вы находитесь на одном из этих мостиков, в южной части дока. ]];

	way = {

		kh_vroom("Ко входу", "atl_lfc_dock_s");

		kh_vroom("На соседний мостик", "atl_lfc_bridge_e");

	};

    obj = {

        "atl_nd_crane";

        "atl_nd_barrel";

    };   

};

atl_lfc_bridge_e = room {

	nam = "Атлантида, Аква, док Наутилуса, восточная часть, мостик";

	dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Наутилус.  Снизу, под водой, расположен огромный люк, закрывающий доступ внутрь дока. Несколько легких мостиков сконструированы таким образом, чтобы их расположение легко можно было изменить для удобства работы и обслуживания субмарин. Вы находитесь на одном из этих мостиков, в восточной части дока. ]];

	way = {

		kh_vroom("К стене", "atl_lfc_dock_e");

		kh_vroom("На соседний мостик", "atl_lfc_bridge_s");

	};

    obj = {

        "atl_nd_crane";

        "atl_nd_barrel";

    };   

};

atl_lfc_bridge_w = room {

	nam = "Атлантида, Аква, док Наутилуса, западная часть, мостик";

	dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Наутилус.  Снизу, под водой, расположен огромный люк, закрывающий доступ внутрь дока. Несколько легких мостиков сконструированы таким образом, чтобы их расположение легко можно было изменить для удобства работы и обслуживания субмарин. Вы находитесь на одном из этих мостиков, в западной части дока. ]];

	way = {

		kh_vroom("К стене", "atl_lfc_dock_w");

		kh_vroom("К субмарине", function(s)

			pr [[Вам там нечего делать. ]];

			return false;

		end);

	};

    obj = {

        "atl_nd_crane";

        "atl_nd_barrel";

    };   

};

atl_lfc_sab = obj {

	var {

		tick = 3;

	};

	nam = "Мишель Леруа";

	canshoot = true;

	dsc = function(s)

        if (where(s) == where(pl)) then

            return [[В нескольких метрах от вас стоит {Мишель Леруа}. Он обращен к вам спиной и не видит вас. ]];

        else

        end;

    end;

	act = function(s)

		walkin("atl_lfc_sab_dlg");

	end;

	life = function(s)

            move(atl_lfc_sab_vis, where(pl));

        end;   

		if (s.tick > 0) then

			s.tick = s.tick - 1;

		else

			s.tick = 3;

			pr("Вы видите, как Мишель медленно крадется по доку ");

			if (where(s) == atl_lfc_dock_s) then

                pr("вдоль западной стены. ");

				move(s, atl_lfc_dock_w);

			elseif (where(s) == atl_lfc_dock_w) then

                pr("и поднимается на мостик в его западной части. Он не смотрит в вашу сторону. ");         

				move(s, atl_lfc_bridge_w);

			elseif (where(s) == atl_lfc_bridge_w) then

				pr("Леруа что-то делает рядом с субмариной. ");

			end;

		end;

	end;

};

atl_lfc_sab_vis = obj {

	var {

		shot = 0;

	};

	nam = "Мишель Леруа";

	canshoot = true;

	onshoot = function(s)

		if (s.shot == 0) then

			s.shot = 1;

			return [[Вы стреляете в силуэт, но промахиваетесь. Через мгновение, где-то рядом пролетает пуля. ]];

		else

			remove(char_leroy, where('char_leroy'));

			walk("atl_lfc_dock_end_shot");

			return [[Вы повторно стреляете в саботажника и, судя по всему, попадаете. Леруа хватается за грудь и медленно оседает на пол. ]];

		end;

	end;

	dsc = function(s)

		if (where(pl) == atl_lfc_behind_boxes and where(atl_lfc_sab) == atl_lfc_bridge_w) then

			return [[Вы видите {Мишеля Леруа}, идущего по мостику, ведущему к Наутилусу. ]];

		elseif (where(pl) == atl_lfc_behind_boxes and where(atl_lfc_sab) == atl_lfc_dock_w) then

			return [[Вы видите {Мишеля Леруа}, идущего вдоль западной стены дока. ]];

        elseif (where(pl) == atl_lfc_behind_boxes and where(atl_lfc_sab) == atl_lfc_dock_s) then

            return [[Вы видите {Мишеля Леруа}, идущего вдоль южной стены дока. ]];

		elseif (where(atl_lfc_sab) == atl_lfc_bridge_w) then

			return [[Вы видите {Мишеля Леруа}, идущего по мостику в западной части дока. Он не видит вас. ]];

		end;

	end;

};

atl_lfc_sab_dlg = dlg {

	nam = "Мишель Леруа";

	dsc = [[Мишель Леруа стоит спиной к вам и не видит вашего приближения. Вы можете воспользоваться этим. ]];

	phr = {

		{"Застрелить его", [[Вы стреляете саботажнику в спину и, не успев понять, что произошло, он падает в воду, пронзенный пулей. ]], code [[ 

			remove(char_leroy, where('char_leroy'));

			walk("atl_lfc_dock_end_shot");

		]]};

		{"Попытаться оглушить его", [[Вы оглушаете саботажника. ]], code [[ 

			walk("atl_lfc_dock_end_ko");

		]]};

	};

};

atl_lfc_dock_end_shot = room {

	nam = "Атлантида, Аква, док Наутилуса";

	obj = {

		vway("Продолжить", "{Продолжить}", "atl_luna_drake_room");

	};

	entered = function(s)

		leroy_state = 4;

        remove(char_leroy, where('char_leroy'));

        if (atl_lfc_goldman_exposed) then

            atl_lfc_state = 3;

            remove(char_goldman, where('char_goldman'));

            return [[Через несколько минут в помещение входит охрана станции во главе с Винсентом Даркстаром. Винсент отдает приказ охранникам унести тело, а сам обращается к вам: "Хорошая работа. Вскоре мы сообщим о том, когда вы сможете забрать Левиафан". ^Вы возвращаетесь в свою комнату, чтобы отдохнуть после тяжелой ночи.^Вы просыпаетесь от телефонного звонка. Подняв трубку вы слышите голос Даркстара: "Дрейк, зайдите ко мне". ]];

        else

            atl_lfc_state = 5;

            return [[Через несколько минут в помещение входит охрана станции во главе с Винсентом Даркстаром. Винсент отдает приказ охранникам унести тело, а сам обращается к вам: "Хорошая работа. Вскоре мы сообщим о том, когда вы сможете забрать Левиафан". ^Вы возвращаетесь в свою комнату, чтобы отдохнуть после тяжелой ночи.^Вы просыпаетесь от телефонного звонка. Подняв трубку вы слышите голос Моро: "Дрейк, жду вас в моем кабинете". ]];

        end;

	end;

};

atl_lfc_dock_end_barreled = room {

	nam = "Атлантида, Аква, док Наутилуса";

	dsc = [[Вы попадаете в один из тросов, на который крепилась бочка и она с грохотом катится вниз, сбивая с ног саботажника. Тот падает в воду. Он не успевает придти в себя, как в помещение входит охрана станции, привлеченная шумом, во главе с Винсентом Даркстаром. Винсент отдает приказ охранникам увести Мишеля, а сам обращается к вам: "Хорошая работа. Нам надо будет немного поработать с ним". ^Вы возвращаетесь в свою комнату и сразу же засыпаете. ^Вы просыпаетесь от телефонного звонка. Подняв трубку вы слышите голос Даркстара: "Дрейк, зайдите ко мне". ]];

	obj = {

		vway("Продолжить", "{Продолжить}", "atl_luna_drake_room");

	};

	entered = function(s)

		atl_lfc_state = 3;

        atl_lfc_leroy_goldman = true;      

        atl_lfc_goldman_exposed = true;      

        remove(char_leroy, where('char_leroy'));

        remove(char_goldman, where('char_goldman'));

	end;

};

atl_lfc_dock_end_ko = room {

	nam = "Атлантида, Аква, док Наутилуса";

	dsc = [[Вы оглушаете саботажника и ждете, когда в помещение придут охранники. ^Они приходят через несколько минут вместе с Винсентом Даркстаром. Охранники уносят неподвижного Леруа, а Даркстар обращается к вам: "Хорошая работа. Нам надо будет немного поработать с ним". ^Вы возвращаетесь в свою комнату и сразу же засыпаете. ^Вы просыпаетесь от телефонного звонка. Подняв трубку вы слышите голос Даркстара: "Дрейк, зайдите ко мне". ]];

	obj = {

		vway("Продолжить", "{Продолжить}", "atl_luna_drake_room");

	};

	entered = function(s)

		atl_lfc_state = 3;

        atl_lfc_goldman_exposed = true;

        atl_lfc_leroy_goldman = true;

        remove(char_leroy, where('char_leroy'));

        remove(char_goldman, where('char_goldman'));

	end;

};

atl_lfc_outro_expose = cutscene("Атлантида", "Атлантида", [[Даркстар поднимает трубку телефона и отдает приказ: "Приведите ко мне Леруа и Голдмана". Вас он просит отойти в угол комнаты и ждать там. ^Допрос продолжался недолго. Сперва Леруа упирался, но подельник сдал его с потрохами и в итоге ему осталось только признать свою вину. ^Подозреваемых заперли в их комнатах, а вас Даркстар отпустил отдыхать. Придя в свою комнату, вы тут же ложитесь спать. ^Вы просыпаетесь от телефонного звонка. Подняв трубку вы слышите голос Даркстара: "Дрейк, зайдите ко мне". ]], "atl_luna_drake_room", function(s)

    atl_lfc_state = 3;

    atl_rep_moreau = atl_rep_moreau + 1;

    atl_rep_darkstar = atl_rep_darkstar + 1;

    rel_walter = rel_walter + 1;

    remove(char_leroy, where('char_leroy'));

    remove(char_goldman, where('char_goldman'));

end);

atl_lfc_court = dlg {

    var {

        goldman = 0;

        leroy = 0;

    };

    nam = "Атлантида";

    entered = function(s)

        if atl_lfc_goldman_exposed then

            p([[В комнату входят руководители станции. Даркстар встает из-за стола и сообщает: "Дорогие друзья, сегодня мы обсуждаем важный вопрос. Как вы все знаете, мы поймали саботажников -- ими оказались Леонард Голдман и Мишель Леруа. Мы будем следовать обычной процедуры, однако, решено, что в этом заседании будет участвовать Дэвид Дрейк, оказавший неоценимую помощь в поимке преступников. ]]);

        else

            p([[В комнату входят руководители станции. Даркстар встает из-за стола и сообщает: "Дорогие друзья, сегодня мы обсуждаем важный вопрос. Как вы все знаете, мы поймали саботажника -- им оказался Мишель Леруа. Мы будем следовать обычной процедуры, однако, решено, что в этом заседании будет участвовать Дэвид Дрейк, оказавший неоценимую помощь в поимке преступников. ]]);

        end;

        p([[Фредерик Моро, вам слово". ^Фредерик Моро начинает говорить: "Ситуация экстраординарная и требует экстраординарных мер]]);

        --[[

            lfc_goldman_execute = 0;

            lfc_goldman_imprison = 0;

            lfc_goldman_banish = 1;

            lfc_leroy_execute = 0;

            lfc_leroy_imprison = 0;

            lfc_leroy_banish = 1;

        ]]

        if atl_lfc_goldman_exposed then

            if char_moreau_dlg.lfc_goldman_imprison > 0 then

                p([[, к которым мы пока не готовы. Я считаю, что Леонарда Голдмана следует посадить под арест, как минимум до того времени, как не вернется экспедиция Уильяма. ]]);

                if leroy_state ~= 4 then

                    if char_moreau_dlg.lfc_leroy_imprison > 0 then

                        p([[Что касается Мишеля Леруа, то его так же следует взять под стражу. ]]);

                    else

                        p([[Мишеля Леруа же слишком опасно держать здесь. Стоит высадить его где-нибудь на побережье Северной Америки. ]]);

                    end;

                end;

            else

                p([[. Единственным разумным решением, на мой взгляд, будет изгнать Леонарда Голдмана с Атлантиды. Высадить его где-нибудь неподалеку от какого-нибудь городка. ]]);

                if leroy_state ~= 4 then

                    if char_moreau_dlg.lfc_leroy_imprison > 0 then

                        p([[Что касается Мишеля Леруа, то его следует взять под стражу. Такого как он отпускать на поверхность слишком опасно. ]]);

                    else

                        p([[Мишеля Леруа следует отправить вместе с ним. Преступникам не место на станции. ]]);

                    end;

                end;

            end;

        else

            if char_moreau_dlg.lfc_leroy_imprison > 0 then

                p([[, к которым мы пока не готовы. Я считаю, что Мишеля Леруа следует посадить под арест, как минимум до того времени, как не вернется экспедиция Уильяма.]]);

            else

                p([[. Мишеля Леруа же слишком опасно держать здесь. Стоит высадить его где-нибудь на побережье Северной Америки. ]]);

            end;

        end;

        p([[ У меня все". ^Даркстар передает слово Екатерине Светловой и она предлагает свое решение:"]]);

        if atl_lfc_goldman_exposed then

            if leroy_state == 4 then

                if char_svetlova_dlg.lfc_goldman_banish > 0 then

                    p([[Я считаю, что Голдмана стоит выслать отсюда. Увезти куда подальше, только и всего. ]]);

                else

                    p([[Голдману стоит посидеть немного взаперти и подумать. Думаю, он не до конца потерян. ]]);

                end;

            else

                if char_svetlova_dlg.lfc_goldman_banish > 0 then

                    if char_svetlova_dlg.lfc_leroy_banish > 0 then

                        p([[Я считаю, что обоих стоит выслать отсюда. Увезти куда подальше, только и всего. ]]);

                    else

                        p([[Голдмана можно просто выслать на поверхность, но Леруа слишком опасен. Этот пусть остается здесь, под надзором. ]]);

                    end;

                else

                    if char_svetlova_dlg.lfc_leroy_banish > 0 then

                        p([[Голдману стоит посидеть немного взаперти и подумать. Думаю, он не до конца потерян. А вот Леруа не место на Атлантиде. ]]);

                    else

                        p([[Я считаю, что обоих нужно запереть и держать так, пока они не поймут свою ошибку. ]]);

                    end;

                end;

            end;

        else

            if char_svetlova_dlg.lfc_leroy_banish > 0 then

                p([[Леруа не место на Атлантиде. ]]);

            else

                p([[Пусть Леруа немного посидит взаперти, а потом посмотрим. ]]);

            end;

        end;

        p([[Это все". ^Даркстар передает слово Майклу Райту и он говорит следующее: "]]);

        if atl_lfc_goldman_exposed then

            if leroy_state == 4 then

                if char_michael_wright_dlg.lfc_goldman_banish > 0 then

                    p([[Голдману не место на Атлантиде. ]]);

                else

                    p([[Голдмана следует изолировать. ]]);

                end;

            else

                if char_michael_wright_dlg.lfc_goldman_banish > 0 then

                    if char_michael_wright_dlg.lfc_leroy_banish > 0 then

                        p([[Им не место на Атлантиде. ]]);

                    else

                        p([[Голдману не место на Атлантиде, а Леруа следует изолировать. ]]);

                    end;

                else

                    if char_michael_wright_dlg.lfc_leroy_banish > 0 then

                        p([[Голдмана следует изолировать, а вот Леруа не место на Атлантиде. ]]);