decor = function(s)

        pr [[

            Я вытаскиваю из кармашка своего походного костюма [cut маленькие изящные часики]маленькие изящные часики -- подарок Виджета на мой двенадцатый день рождения. Короткая стрелка почти достигла цифры семь. ^

            "Ребята, мне пора!" -- Кричу я. В ответ доносится: "До завтра, Асти!"^

            [cut Я делаю несколько шагов]Я делаю несколько шагов, как вдруг замечаю сидящего неподалеку и грустно смотрящего куда-то вдаль Уилла.^

            [cut "Что случилось?"]"Что случилось?" -- спрашиваю я, свалившись в траву рядом с другом. ^

    decor = function(s)

        pr [[

            Гремлин стоял передо мной, пытаясь отдышаться -- он с трудом догнал меня, спешащую в библиотеку. ^

            [cut "Виджет, успокойся..."]"Виджет, успокойся, отдышись и расскажи все как следует", -- медленно говорю я, пытаясь успокоить друга.^

            "Успею, не переживай", -- отвечаю я. Виджет убегает по своим делам, а я направляюсь дальше в библиотеку. ^

            [cut Продолжить]

            [code walk('intro4')]

    decor = function(s)

        pr [[

            [cut "Вот, держи..."]"Вот, держи. Только, пожалуйста, верни мне его завтра до 11 часов, иначе у меня будут большие проблемы", -- прошептал Таггарт, протягивая мне [cut небольшой сверточек]небольшой сверточек. В сверточке был ключ от одной из неиспользуемых кладовых дворца. Там я устроила [cut алхимическую лабораторию]алхимическую лабораторию для себя. Если родители прознают про нее, мне конец -- родители запрещают мне заниматься алхимией.^

            [cut Продолжить]

            [code walk('intro5')]

        ]];

    decor = function(s)

        pr [[

            Я вхожу в кабинет отца. Он молча указывает на кресло, стоящее в углу, рядом с камином. Я сажусь и [cut жду]жду. ^

            Так он продолжает довольно долго, но главное. что я уяснила -- завтра, в 12 часов мне необходимо явиться в главный обеденный зал дворца.^

            [cut Продолжить]

            [code walk('intro6')]

            [cut Итак...]

            В 12 часов дня у меня званый обед. Если я опоздаю, папа будет очень недоволен. Мне обязательно нужно одеться, сделать макияж и уложить волосы к этому времени.^

            [cut Далее...]

            [cut Кроме того...]

            [cut И наконец...]

            До 11:00 мне нужно успеть вернуть Таггарту ключ, иначе у него будут проблемы.^

            [cut Продолжить]

    nam = 'notebook';

    disp = 'Записная книжка';

    dsc = 'Из-под кровати торчит уголок {блокнота}. ';

    inv = 'Здесь я держу заметки по поводу различных механизмов придуманных мной, или показанных мне Флинном и Виджетом. ';

}:disable();

                if have('clothes_dress') then

                    makeup = 1;

                    timestamp = timestamp + 30 * MINUTE;

                else

                    return 'Сперва надо одеться как подобает. ';

                end;

                take('trinket');

                return 'В ней хранятся мои драгоценности. Посмотрим, что отсюда можно отдать друзьям. Вот это колечко подойдет. Я забираю из шкатулки серебряное колечко. ';

            else

            end;

        end;

    };

            walkout();

            return 'Я переодеваюсь. ';

        end};

            remove('clothes_dress', me());

            remove('clothes_travel', me());

            take('clothes_mech');

                makeup = 0;

                return 'Пока переодевалась, я испортила прическу и макияж. Придется делать все заново. ';

            else

            end;

        end};

        {cond=function(s) return have('clothes_dress') or have('clothes_mech') or have('clothes_travel') end, 'Не переодеваться', function(s)

    state = 0;

    nam = 'clothes_mech';

    disp = 'Костюм механика';

}

obj {

            return false;

        end;

        if have('clothes_travel', me()) then

        end;

        if not have('clothes_travel', me()) and not have('clothes_mech', me()) then

            pr 'Не пойду я никуда пока не оденусь!';

    obj {

        nam = '#machinery';

        dsc = 'В зале установлено несколько {станков}.';

    };

}

    disp = 'Виджет';

    noinv = true;

    notime = true;

    phr = {

        {'Виджет! Я пришла!', function(s)

            if timestamp >= 150 * MINUTE then

                remove('notebook', me());

                walk('widgets_lesson');

            end};

        };

        {'[Уйти]', function(s) walkout(); end};

    };

    noinv = true;

    notime = true;

    decor = function(s)

        local duration = 120 * MINUTE;

        if intime then

            widget_status = 2;

            pr [[

                "Тогда за работу, Асти!" -- отвечает гремлин, указывая мне на заботливо подготовленный верстак, и тут же осекся: "Простите, Ваше высочество". ^

                "Все в порядке, Виджет, спасибо" -- благодарю я мастера и подхожу к рабочему месту. ^

            ]];

        else

            widget_status = 1;

            pr [[

                "Асти, ты слегка опоздала, поэтому, проследи за временем, договорились?", -- отвечает гремлин, указывая мне на заботливо подготовленный верстак, и тут же осекся: "Простите, Ваше высочество".  ^

                "Разумеется, я закончу вовремя, спасибо, Виджет", -- благодарю я мастера и подхожу к рабочему месту. ^

            ]];

        end;

        pr [[

            Я открываю записную книжку на нужной странице и начинаю вспоминать, какие детали мне понадобятся. ^

            [cut Вырвав лист из книжки]

            Вырвав лист из книжки, я выписываю на него список необходимых деталей и передаю его гремлину: "Собери, пожалуйста, вот это. Я все-таки хочу собрать этот счетчик".

            Виджет, откланявшись, [cut удаляется]удаляется, а я погружаюсь в процесс. Вернувшись с коробочкой, полной разнообразных деталюшек, 

            [cut "Вы сомневаетесь в моих способностях?"]

            "Ты сомневаешься в моих способностях?" -- шутливо спрашиваю я, на что Виджет совершенно серьезно отвечает: "Нет-нет, ни в коем разе! Я буду поблизости, если понадоблюсь вашему высочеству". ^

            [cut И я погрузилась в работу]И я погрузилась в работу.^

        end;

        if have('clothes_mech', me()) then

            pr 'Увы, но приходить на обед придется именно в праздничном платье и никак иначе. ';

        end;

        if makeup == 0 then

            pr 'Появляться на обеде с неуложенными волосами и ненакрашенным лицом будет по меньшей мере опрометчиво. ';

        end;

        if not have('clothes_dress', me()) and not have('clothes_mech', me()) then

            pr 'Не пойду я никуда пока не оденусь!';

    disp = 'Сторожевой пост';

    onenter = function(s)

        if have('clothes_dress', me()) or have('clothes_mech', me()) then

            return false;

        end;

        if not have('clothes_travel') then

            walkin('taggart_dlg');

        end;

    end;

    way = {

        ppath {'В спальню', 'guard_post', 'bedroom'};

        ppath {'В мастерскую', 'guard_post', 'workshop'};

    disp = 'Таггарт';

    noinv = true;

    notime = true;

    phr = {

        {cond=function(s) return have('key'); end, "[Отдать ключ] Да, конечно. ", function(s)

            taggart_status = 1;

    dsc = 'Западные ворота дворца. Через них мне проще всего будет добраться до места встречи с Фредом и Уиллом. ';

    onenter = function(s)

        if have('clothes_dress', me()) or have('clothes_mech', me()) then

            return false;

        end;

        if not have('clothes_travel') then

    obj {

        nam = '#gate';

        dsc = '{Ворота} открыты. ';

    };

    obj {

        nam = '#servants';

    obj {

        nam = '#grass';

        dsc = '{Трава} здесь совершенно вытоптана. ';

    };

    obj {

        nam = '#boys';

    };

    obj {

        nam = '#thoughts';

    };

    obj {

        nam = '#fred_and_will';

        {'Что увидели?', function(s)

            if s.state == 0 then

                s.state = 1;

            else

            end;

        end};

        {cond=function(s) return have('trinket') end, '[Отдать колечко] Я принесла то, что обещала.', function(s)