-- meta_lava.lua
-- Test map for meta-circle dungeon building, with example
-- of using field strengths for lava placement

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
      if inten >= 0.5 then
        if inten >= 0.7 then
          Builder:SetFloor(i,j, WaterType)
          Builder:SetFlag(i,j,TF_BLOCKWALK)
        else
          Builder:SetFloor(i,j, ShallowType)
          Builder:SetFlag(i,j, TF_BLOCKWALK)
        end
      else
        Builder:SetFloor(i,j,GrassType)
      end
    end
    --write(file, inten.." ")
  end
end

Builder:WallEdges(1)

--closefile(file)

Builder:FinalizeMap()