diff --git a/atlantis_intro.lua b/atlantis_intro.lua
--- a/atlantis_intro.lua
+++ b/atlantis_intro.lua
@@ -70,7 +70,7 @@ end, 'atlantis_intro_dominus');
 
 atlantis_intro_skip = cutscene("Атлантида", "Атлантида", function(s)
     if (ArrayUtils.indexOf(pl.party, 'wright') ~= 0) then
-        return [[Майкл кивает: _"Хорошо, я буду в мастерской. Возможно у меня будет для вас несколько поручений, так что заходите"_. Затем он снова обращается к сыну: _"Пошли. Нам есть что обсудить, да и помощь мне не помешает"_. Джек молча кивает. Они уходят и вы остаетесь в одиночестве. ]];
+        return [[Майкл кивает: _"Хорошо, я буду в мастерской. Возможно у меня будет для вас несколько поручений, так что заходите"_. Затем он снова обращается к сыну: _"Пошли. Нам есть что обсудить, да и помощь мне не помешает"_. Джек молча кивает. Они уходят, и вы остаетесь в одиночестве. ]];
     else
         return [[Майкл пожимает плечами: _"Хорошо, я буду в мастерской. Возможно у меня будет для вас несколько поручений, так что заходите"_. Он уходит и вы остаетесь один. ]];
     end;
diff --git a/stealth.lua b/stealth.lua
--- a/stealth.lua
+++ b/stealth.lua
@@ -11,6 +11,7 @@ function getDirName(dir)
 end;
 
 stealthroom = function(tab)
+    local rm;
     tab.nolamp = true;
     tab.pic = function(s)
         local pl_y = math.floor(tonumber(s.pos) / 10);
@@ -217,8 +218,65 @@ stealthroom = function(tab)
             return rm;
         end);
     };
-
-    local rm = room(tab);
+    
+    tab.ways_print = function(s, o)
+        local n, e, sth, w;
+        
+        if isDisabled(s.way[1]) then
+            n = 'N';
+        else
+            n = stead.xref('N', s.way[1]);
+        end;
+        if isDisabled(s.way[2]) then
+            sth = 'S';
+        else
+            sth = stead.xref('S', s.way[2]);
+        end;
+        if isDisabled(s.way[3]) then
+            w = 'W';
+        else
+            w = stead.xref('W', s.way[3]);
+        end;
+        if isDisabled(s.way[3]) then
+            e = 'E';
+        else
+            e = stead.xref('E', s.way[4]);
+        end;
+        
+        local left = '45%';
+        local right = '55%';
+        local il = '^';
+        if theme.name() == '.mobile' then
+            print('x');
+            left = '40%';
+            right = '60%';
+        end;
+        
+        local wait;
+        if isDisabled(s.way[5]) then
+            wait = txtnb(stead.dispof(s.way[5]));
+        else
+            wait = stead.xref(txtnb(stead.dispof(s.way[5])), s.way[5]);
+        end;
+        local hide;
+        if isDisabled(s.way[6]) then
+            hide = txtnb(stead.dispof(s.way[6]));
+        else
+            hide = stead.xref(txtnb(stead.dispof(s.way[6])), s.way[6]);
+        end;
+        local unhide;
+        if isDisabled(s.way[7]) then
+            unhide = txtnb(stead.dispof(s.way[7]));
+        else
+            unhide = stead.xref(txtnb(stead.dispof(s.way[7])), s.way[7]);
+        end;
+        
+        return txttab('50%', 'center') .. n .. il 
+            .. txttab(left, 'center') .. w .. txttab(right, 'center') .. e .. il 
+            .. txttab('50%', 'center') .. sth .. '^' .. wait .. ' | '.. hide .. ' | '.. unhide;
+    end;
+    
+    rm = room(tab);
 
     return rm;
 end;
\ No newline at end of file
diff --git a/utils.lua b/utils.lua
--- a/utils.lua
+++ b/utils.lua
@@ -979,19 +979,6 @@ suit = function(tab)
 	return obj(tab);
 end;
 
-stead.list_str = function(self)
-    local v, vv
-    for i, o in stead.opairs(self) do
-        o = stead.ref(o);
-        if isObject(o) and not isDisabled(o) then
-            vv = stead.dispof(o)
-            vv = stead.xref(vv, o);
-            v = stead.par(stead.delim, v, vv);
-        end
-    end
-    return v;
-end
-
 old_player_ways = stead.player_ways;
 
 stead.player_ways = function(s)