INSTEAD dynamic labyrinth

-- $Name:Нанотест$
-- $Version:0.02$
-- $Name(ru):Нанотест$
instead_version "1.8.0"

require "xact"                  -- подключаем модуль xact
require "hideinv"               -- подключаем модуль hideinv
require "para"                  -- догадайтесь, что мы подключили в этот раз ;)
require "dash"                  -- подключаем dash
require "quotes"                -- подключаем quotes

game.codepage="UTF-8";

game.act = 'Не получается.';
game.inv = 'Хм, странная штука.';
game.use = 'Не сработает.';

global {
x = 0;
y = 0;
z = 0;
roomname = 'room0_0_0';
myrooms = {};
};

function generate_room(s,t)
    pn("Идем " .. t.nam);
    roomname = 'room'..x..'_'..y..'_'..z;
    if myrooms[roomname] then
        p 'Все гут';
    else
        myrooms[roomname] = new('myconstructor()');
    end;
    walk(myrooms[roomname]);
end


function myconstructor()
        local v = {};
        v.nam = roomname;
--в dsc выводится номер текущей комнаты, но также можно генерировать сюда любое описание.
        v.dsc = roomname;
        v.disp = 'Название';
        v.way = {vroom('Север', north), vroom('Восток', east), vroom('Юг', south), vroom('Запад', west), vroom('Вверх', up), vroom('Вниз', down)};
        v.exit = function(s, t)
                if t == north then
                        y = y + 1;
                elseif t == east then
                        x = x + 1;
                elseif t == south then
                        y = y - 1;
                elseif t == west then
                        x = x - 1;
                elseif t == up then
                        z = z + 1;
                elseif t == down then
                        z = z - 1;
                end;
                generate_room(s,t);
        end;
        return room(v);
end;

---Начало---------------------------------------------------------------------------------------------------------------

main = room {
        forcedsc = true;
        nam = 'Начало';
        enter = function()
                myrooms['room0_0_0'] = new('myconstructor()');
                start = myrooms['room0_0_0'];
        end;
        dsc = '';
        way = {vroom('Играть', 'start')};
};

--пачка комнат-заглушек, т.к. vroom надо ссылаться на реальную комнату.

north = room {
        nam = 'на север';
};

east = room {
        nam = 'на восток';
};

south = room {
        nam = 'на юг';
};

west = room {
        nam = 'на запад';
};

up = room {
        nam = 'вверх';
};

down = room {
        nam = 'вниз';
};