Forum.iFiction.Ru

introduction: function
{
    local hero;
    local ask = true;

    "Здесь вставляем текст интро. И приглашаем выбрать персонажа (Энжи, Бильбо, Фродо)>";

    while (ask)
    {
        ask := nil;
        hero := upper (input());
        hero := loweru (hero);
        
        if (hero = 'энжи')
            ParserSetMe (Angy);
        else
        if (hero = 'бильбо')
            ParserSetMe (Bilbo);
        else
        if (hero = 'фродо')
            ParserSetMe (Frodo);
        else
        {
            "\bВыбери ЭНЖИ, БИЛЬБО или ФРОДО >";
            ask := true;
        }

    }
}


Angy: basicMe
    ldesc = "Описание Энжи.";
;

Bilbo: basicMe
    ldesc = "Описание Бильбо.";
;

Frodo: basicMe
    ldesc = "Описание Фродо.";
;