nam = "Атлантида, Аква, центральный коридор";

    dsc = [[Широкий коридор, заполненный ярким светом электрических ламп. В одном конце коридора расположена шлюзовая дверь, ведущая, в секцию _"Доминус"_. По бокам коридора находятся еще несколько дверей, ведущих в другие помещения секции -- по большей части это склады. Еще две двери ведут в коридоры A и B. ]];

    way = {

        kh_vroom("На склад A", function()

            pr("Люк наглухо задраен. Вы не сможете его открыть. ");

            return false;

        end);

        kh_vroom("На склад B", function()

            if atl_nih_state == 1 then

                return "atl_aqua_warehouse_b";

            else

                pr("Люк наглухо задраен. Вы не сможете его открыть. ");

                return false;

            end;

        end);

        kh_vroom("На склад C", function()

            pr("Люк наглухо задраен. Вы не сможете его открыть. ");

            return false;

        end);

        kh_vroom("На склад D", function()

            pr("Люк наглухо задраен. Вы не сможете его открыть. ");

            return false;

        end);

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

        kh_vroom("В коридор B", "atl_aqua_corridor_b");

        kh_vroom("В секцию \"Доминус\"", "atl_intersection_aqua_dom");

    };

    obj = {

        "atl_illuminators",

        "atl_nih_tubes_aqua"

    };

};

atl_aqua_warehouse_b = darkroom {

    var {

        has_light = false;

    };

    nam = "Атлантида, Аква, склад B";

    dsc_dark = [[Большое помещение без окон погружено в кромешный мрак. В темноте вы с трудом различаете очертания предметов. ]];

    dsc_halflit = [[Слабый свет лампы позволяет вам с трудом ориентироваться в помещении,заставленном различными ящиками. ]];

    dsc_lit = [[Большое помещение без окон освещено яркими лектрическим лампами. По всему помещению аккуратно расставлено множество ящиков с различными материалами, необходимыми для поддержания жизнедеятельности станции. ]];

    way = {

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

    };

    obj = {

        "atl_aqua_warehouse_b_lightswitch";

        "atl_nih_tube_container2";

    };

};

atl_aqua_warehouse_b_lightswitch = obj {

    nam = "atl_aqua_warehouse_b_lightswitch";

    dsc = [[Рядом со входом расположен {выключатель}. ]];

    act = function(s)

        atl_aqua_warehouse_b.has_light = not atl_aqua_warehouse_b.has_light;

        if atl_aqua_warehouse_b.has_light then

            return [[Вы щелкаете выключателем и яркий свет электрических ламп заливает помещение. ]];

        else

            return [[Вы щелкаете выключателем и лампы гаснут, погружая помещение в кромешную тьму. ]];

        end;

    end;

    nam = "Атлантида, Терра, главный коридор";

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

    way = {

        kh_vroom("В мастерскую A", "atl_terra_workshop_a");

        kh_vroom("В мастерскую B", "atl_terra_workshop_b");

        kh_vroom("В мастерскую C", "atl_terra_workshop_c");

        kh_vroom("В мастерскую D", "atl_terra_workshop_d");

        kh_vroom("В секцию Солис", function()

            if (atl_fta_state == 1) then

                return "atl_fta_is_terra_solis";

            else

                pr("Люк наглухо задраен. Вы не сможете его открыть. ");

                return false;

            end;

        end);

kh_vroom("В секцию Доминус", "atl_intersection_terra_dom");

    };

    obj = {

        "atl_nih_tube_container";

        "atl_nih_boxes_terra";

    };

atl_nih_tubes_gen = function(nam, dsc, tube_type, tube_len, tube_d)

    return obj {

        var {

            broken = false;

            fixed = false;

        };

        tube_type = tube_type;

        tube_len = tube_len;

        tube_d = tube_d;

        nam = nam;

        dsc = dsc;

        act = function(s)

            if (s.fixed) then

                return "Трубы в порядке. ";

            elseif (s.broken) then

                return "Трубы повреждены и воздух со слабым шипением вырывается из них. На трубе имеется маркировка: " .. tube_type .. "-" .. tube_len .. "-" .. tube_d;

            else

                return "Трубы в порядке. ";

            end;

        end;

        used = function(s, o)

            if s.broken and not s.fixed and o.is_tube and o.l == s.tube_len then

                --KT -> RT Диаметр на 1 меньше

                --NF -> KT Диаметр на 1 больше

                --TQ -> NF Диаметр на 2 больше

                print(s.tube_type, s.tube_d, o.t, o.d);

                if o.t == s.tube_type and o.d == s.tube_d then

                    remove(o);

                    s.fixed = true;

                    return "Вы заменяете поврежденный фрагмент трубы. ";

                elseif s.tube_type == "KT" and o.t == "RT" and o.d + 1 == s.tube_d then

                    remove(o, pl);

                    s.fixed = true;

                    return "Вы заменяете поврежденный фрагмент трубы. ";

                elseif s.tube_type == "NF" and o.t == "KT" and o.d - 1 == s.tube_d then

                    remove(o, pl);

                    s.fixed = true;

                    return "Вы заменяете поврежденный фрагмент трубы. ";

                elseif s.tube_type == "TQ" and o.t == "NF" and o.d - 2 == s.tube_d then

                    remove(o, pl);

                    s.fixed = true;

                    return "Вы заменяете поврежденный фрагмент трубы. ";

                end;

            end;

            --if (o == item_ducttape and s.broken and not s.fixed) then

            --    s.fixed = true;

            --    atl_nih_state = 2;

            --    return [[

            --        Вы заматываете разрыв изолентой. На какое-то время такое решение сгодится. 

            --    ]];

            --end;

        end;

    };

atl_nih_tubes_near_aqua = atl_nih_tubes_gen("atl_nih_tubes_near_aqua", [[Рядом со шлюзом из стены выходят несколько {труб}, по которым подается воздух. ]], "RT", 12, 8);

atl_nih_tubes_near_a = atl_nih_tubes_gen("atl_nih_tubes_near_a", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "RT", 11, 9);

atl_nih_tubes_near_admin = atl_nih_tubes_gen("atl_nih_tubes_near_admin", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "RT", 15, 7);

atl_nih_tubes_near_luna = atl_nih_tubes_gen("atl_nih_tubes_near_luna", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "KT", 12, 6);

atl_nih_tubes_near_oculus = atl_nih_tubes_gen("atl_nih_tubes_near_oculus", [[Вдоль стены протянуто несколько {труб}, по которым подается воздух. ]], "NF", 13, 7);

atl_nih_tubes_near_terra = atl_nih_tubes_gen("atl_nih_tubes_near_terra", [[Вдоль стены протянуто несколько {труб}, по которым подается воздух. ]], "NF", 13, 9);

atl_nih_tubes_near_arctos = atl_nih_tubes_gen("atl_nih_tubes_near_arctos", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "KT", 13, 7);

atl_nih_tubes_oculus = atl_nih_tubes_gen("atl_nih_tubes_oculus", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "NF", 9, 8);

atl_nih_tubes_terra = atl_nih_tubes_gen("atl_nih_tubes_terra", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "NF", 12, 6);

atl_nih_tubes_luna = atl_nih_tubes_gen("atl_nih_tubes_luna", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]], "KT", 11, 5);

atl_nih_tubes_arctos = atl_nih_tubes_gen("atl_nih_tubes_arctos", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]], "KT", 11, 7);

atl_nih_tubes_aqua = atl_nih_tubes_gen("atl_nih_tubes_aqua", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]], "TQ", 11, 7);

atl_nih_tubes_aqua_a = atl_nih_tubes_gen("atl_nih_tubes_aqua_a", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]], "TQ", 14, 4);

atl_nih_tubes_aqua_b = atl_nih_tubes_gen("atl_nih_tubes_aqua_b", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]], "TQ", 10, 5);

atl_nih_tube_container = obj {

    nam = "atl_nih_tube_container";

    dsc = [[Крышка одного из {ящиков} снята и вы видите внутри несколько труб. ]];

    act = function (s)

        walkin("atl_nih_tube_container_inv");

    end;

};

atl_nih_tube_container2 = obj {

    nam = "atl_nih_tube_container2";

    dsc = [[У одной из стен аккуратно сложены несколько {труб}. ]];

    act = function (s)

        walkin("atl_nih_tube_container2_inv");

    end;

};

tube = function(table)

    table.is_tube = true;

    table.dsc = "{" .. table.t .. "-" .. table.l .. "-" .. table.d .. "}^";

    table.inv = "Труба маркированная " .. table.t .. "-" .. table.l .. "-" .. table.d ;

    table.disp = "Труба " .. table.t .. "-" .. table.l .. "-" .. table.d ;

    table.tak = "Вы забираете трубу. ";

    return obj(table);

end;

atl_nih_tube_container_inv = room {

    nam = "atl_nih_tube_container_inv";

    disp = "Атлантида, Терра, главный коридор";

    dsc = [[В ящике сложены трубы различных диаметров и размеров. Все трубы промаркированы:]];

    way = {

        kh_vroom("Отойти от ящика", "atl_terra_main_corridor");

    };

    obj = {

        tube { nam = "tube_rt_12_8"; t = "RT"; l = 12; d = 8; };

        tube { nam = "tube_rt_11_9"; t = "RT"; l = 11; d = 9; };

        tube { nam = "tube_rt_15_7"; t = "RT"; l = 15; d = 7; };

        tube { nam = "tube_rt_12_5"; t = "RT"; l = 12; d = 5; };

        tube { nam = "tube_rt_13_6"; t = "RT"; l = 13; d = 6; };

        tube { nam = "tube_rt_11_4"; t = "RT"; l = 11; d = 4; };

        tube { nam = "tube_rt_11_6"; t = "RT"; l = 11; d = 6; };

        tube { nam = "tube_kt_13_8"; t = "KT"; l = 13; d = 8; };

        tube { nam = "tube_kt_15_10"; t = "KT"; l = 15; d = 10; };

        tube { nam = "tube_kt_9_9"; t = "KT"; l = 9; d = 9; };

        tube { nam = "tube_kt_12_7"; t = "KT"; l = 12; d = 7; };

        tube { nam = "tube_nf_16_7"; t = "NF"; l = 16; d = 7; };

        tube { nam = "tube_nf_11_7"; t = "NF"; l = 11; d = 7; };

        tube { nam = "tube_nf_12_9"; t = "NF"; l = 12; d = 9; };

        tube { nam = "tube_nf_15_7"; t = "NF"; l = 15; d = 7; };

        tube { nam = "tube_rt_12_6"; t = "RT"; l = 12; d = 6; };

    };

};

atl_nih_tube_container2_inv = room {

    nam = "atl_nih_tube_container2_inv";

    disp = "Атлантида, Аква, склад B";

    dsc = [[У стены сложены трубы различных диаметров и размеров. Все трубы промаркированы:]];

    way = {

        kh_vroom("Отойти от ящика", "atl_aqua_warehouse_b");

    };

    obj = {

        tube { nam = "tube_nf_14_6"; t = "NF"; l = 14; d = 6; };

        tube { nam = "tube_nf_10_7"; t = "NF"; l = 10; d = 7; };

        tube { nam = "tube_nf_11_9"; t = "NF"; l = 11; d = 9; };

        tube { nam = "tube_nf_14_7"; t = "NF"; l = 14; d = 7; };

        tube { nam = "tube_tq_14_6"; t = "TQ"; l = 14; d = 6; };

        tube { nam = "tube_tq_17_5"; t = "TQ"; l = 17; d = 5; };

        tube { nam = "tube_rt_12_7"; t = "RT"; l = 12; d = 7; };

        tube { nam = "tube_kt_13_9"; t = "KT"; l = 13; d = 9; };

    };

};

atl_nih_tube_container:disable();

atl_nih_tube_container2:disable();

    atl_nih_state = 1;

    local nih_array_rt = {

        atl_nih_tubes_near_aqua;

        atl_nih_tubes_near_a;

        atl_nih_tubes_near_admin;

    };

    local nih_array_kt = {

        atl_nih_tubes_near_luna;

        atl_nih_tubes_near_arctos;

        atl_nih_tubes_luna;

        atl_nih_tubes_arctos;

    };

    local nih_array_nf = {

        atl_nih_tubes_near_oculus;

        atl_nih_tubes_near_terra;

        atl_nih_tubes_oculus;

        atl_nih_tubes_terra;

    };

    local nih_array_tq = {

        atl_nih_tubes_aqua;

        atl_nih_tubes_aqua_a;

        atl_nih_tubes_aqua_b;

    };

    local nih_array2 = {

        atl_nih_tubes_near_aqua,

        atl_nih_panel_near_a,

        atl_nih_panel_near_admin,

        atl_nih_panel_near_luna,

        atl_nih_boxes_near_oculus,

        atl_nih_boxes_near_terra,

        atl_nih_tubes_near_arctos,

        atl_nih_panel_oculus,

        atl_nih_boxes_terra,

        atl_nih_tubes_luna,

        atl_nih_tubes_arctos,

        atl_nih_tubes_aqua,

        atl_nih_tubes_aqua_a,

        atl_nih_tubes_aqua_b,

        atl_nih_tube_container,

        atl_nih_tube_container2,

    };

    nih_array_rt[rnd(#nih_array_rt)].broken = true;

    nih_array_kt[rnd(#nih_array_kt)].broken = true;

    nih_array_nf[rnd(#nih_array_nf)].broken = true;

    nih_array_tq[rnd(#nih_array_tq)].broken = true;

    for i = 1, #nih_array2 do

        nih_array2[i]:enable();

    end;

    pl.where = "atl_terra_main_corridor";