depositgen/veins.lua

   1 -- experimental fast vein generator
   2
   3 local l=depositgen.l
   4 local print=l.print
   5
   6 -- the public table of registered veins
   7 depositgen.veins={}
   8 local regs=depositgen.veins
   9
  10 depositgen.register_vein= function(descr)
  11  local vein={
  12   ymin=(descr.ymin or -10000),
  13   ymax=(descr.ymax or 200),
  14   scarcity=descr.scarcity,
  15   content={ name=descr.content },
  16   scatter={}
  17  }
  18  table.insert(depositgen.l.ToResolve,vein.content)
  19  for _,sc in pairs(descr.scatter) do
  20   local psc={
  21    scarcity=sc.scarcity,
  22    size=(sc.size or vein.width),
  23    density=sc.density,
  24    content={ name=sc.content }
  25   }
  26   table.insert(depositgen.l.ToResolve,psc.content)
  27   table.insert(vein.scatter,psc)
  28  end
  29  return table.insert(regs,vein)
  30 end
  31
  32 do
  33 local sample_vein_def={
  34  ymin=-200, ymax=-6,
  35  scarcity=80,
  36  content="default:dirt",
  37  scatter={
  38   --{ scarcity=7, density=4, content="default:mese", size=2 }
  39  }
  40 }
  41 depositgen.register_vein(sample_vein_def)
  42 end
  43
  44 rocksl.genvein=function(minp,maxp,pr,vm,area)
  45  local t1 = os.clock()
  46  local data = vm:get_data()
  47
  48  local chunksizer = maxp.x - minp.x + 1
  49  local chunksize = chunksizer + 1
  50  local pmapsize = {x = chunksize, y = chunksize, z = chunksize}
  51  local minpxz = {x = minp.x, y = minp.z}
  52  local c_sample=minetest.get_content_id("default:stone")
  53  local c_sample_ore=minetest.get_content_id("default:mese")
  54
  55
  56   local A=vector.new(pr:next(0,chunksizer)+minp.x,pr:next(0,chunksizer)+minp.y,pr:next(0,chunksizer)+minp.z)
  57   local B=vector.new(pr:next(0,chunksizer)+minp.x,pr:next(0,chunksizer)+minp.y,pr:next(0,chunksizer)+minp.z)
  58   local C=vector.new(pr:next(0,chunksizer)+minp.x,pr:next(0,chunksizer)+minp.y,pr:next(0,chunksizer)+minp.z)
  59   local D=vector.new(pr:next(0,chunksizer)+minp.x,pr:next(0,chunksizer)+minp.y,pr:next(0,chunksizer)+minp.z)
  60   local l1=vector.distance(A,C)+vector.distance(C,B)
  61   local l2=vector.distance(A,D)+vector.distance(D,B)
  62   local step=1.4/math.max(l1,l2)
  63   print("step="..step.." l1="..l1.." l2="..l2)
  64   local scarcity=6
  65   local ocn=pr:next(0,scarcity)+(scarcity/2)
  66   for t=0, 1, step do
  67    local P=vector.multiply(A,(1-t)^2)
  68    P=vector.add(P, vector.multiply(B,t*t) )
  69    local Q=vector.add(P, vector.multiply(D,2*t*(1-t)) )
  70    P=vector.add(P, vector.multiply(C,2*t*(1-t)) )
  71    local step2=1/vector.distance(P,Q)
  72    for u=0, 1, step2 do
  73     local R=vector.add(vector.multiply(P,(1-u)), vector.multiply(Q,u) )
  74     local di=area:indexp(vector.round(R))
  75     if ocn<1 then
  76      data[di]=c_sample_ore
  77      ocn=pr:next(0,scarcity)+(scarcity/2)
  78     else
  79      data[di]=c_sample
  80      ocn=ocn-1
  81     end
  82    end
  83   end
  84
  85  vm:set_data(data)
  86  minetest.log("action", "rocks/genvein/ "..math.ceil((os.clock() - t1) * 1000).." ms ")
  87 end