Differences

This shows you the differences between two versions of the page.

--- lua:scripting:firetemple [2015/01/01 09:38] – vodur
+++ lua:scripting:firetemple [2015/01/01 09:50] (current) – vodur
@@ Line 99: / Line 99: @@
 do
-local cols=5
+local function revdir( dir )
-local rows=5
+    if dir == "north" then return "south"
-local basevnum=501
+    elseif dir == "south" then return "north"
+    elseif dir == "east" then return "west"
-local function getvnum( col, row)
+    elseif dir == "west" then return "east"
-    return basevnum-1 + (row-1)*cols + col
+    end
 end
-local function setexflag( dir, flg)
+--Randomized Prim's algorithm http://en.wikipedia.org/wiki/Maze_generation_algorithm
-    if not(mob.room[dir]:flag(flg)) then
+local walls={}
-        olc(dir.." "..flg)
+local maze={}
-    end
+for k,v in pairs(getroom(501).exits) do
+    table.insert(walls, { dir=v, exit=getroom(501)[v]} )
 end
-local out={}
+while #walls>0 do
+    local wallind=randnum(1,#walls)
-for row=1,rows do
+    local wall=walls[wallind]
-    local second={}
+    table.remove(walls, wallind)
-    for col=1,cols do
-        table.insert(out, "#")
+    if not maze[wall.exit.toroom] then
-        local room=getroom(getvnum(col,row))
+        wall.exit:setflag("dormant", false)
+        wall.exit:setflag("door", false)
-        if room.east then
+        wall.exit.toroom[revdir(wall.dir)]:setflag("dormant", false)
-            table.insert(out, room.east:flag("dormant") and " " or "-")
+        wall.exit.toroom[revdir(wall.dir)]:setflag("door", false)
-        end
+        maze[wall.exit.toroom]=true
+        for k,v in pairs(wall.exit.toroom.exits) do
-        if room.south then
+            table.insert(walls, { dir=v, exit=wall.exit.toroom[v]} )
-            table.insert(second, room.south:flag("dormant") and "  " or  "| ")
         end
     end
-    table.insert(out,"\n\r"..table.concat(second).."\n\r")
 end
-sendtochar(mob, table.concat(out))
 end
 </code>