// Добавление элемента
    public static void Enter(string N, tCat C, tType T, int V)
    {
        Obj P = new Obj();

        P.Name = String.Copy(N);
        P.Cat  = C;
        P.Type = T;
        P.Val  = V;
        P.Prev = Top;
        Top    = P;
    }
    public static Obj NewName(string Name, tCat cat)
    {
        Obj obj = Top;

        while (obj.Cat != tCat.Guard && obj.Name != Name)
        {
            obj = obj.Prev;
        }
        if (obj.Cat == tCat.Guard)
        {
            obj      = new Obj();
            obj.Name = String.Copy(Name);
            obj.Cat  = cat;
            obj.Val  = 0;
            obj.Prev = Top;
            Top      = obj;
        }
        else
        {
            Error.Message("Повторное объявление имени");
        }
        return(obj);
    }