-- Test map for meta-circle dungeon building

dofile("data/scripts/metacircle.lua")




-- Build the field
local n

SeedFractal()
for n=1, 400, 1 do
  --GrowCircle()
  AccreteCircle()
end

BuildField()


Builder:ResetMap()
--LoadGrasslandsTileset()
LoadAshlandsTileset()

--Builder:WallEdges(1)

--file=openfile("junk.txt", "w")

local i,j
for i=0, MW-1, 1 do
  for j=0, MH-1, 1 do
    local inten = FieldMap[i+1][j+1]
    if inten == 0.0 then 
      Builder:SetFloor(i,j,DirtType)
      Builder:SetWall(i,j,1)
      Builder:SetFlag(i,j,TF_BLOCKWALK)
    else 
      Builder:SetFloor(i,j,GrassType)
    end
    --write(file, inten.." ")
  end
end

Builder:WallEdges(1)

--closefile(file)

Builder:FinalizeMap()