From f0f1edc94e883c12c5554493d404cf08195bcf6d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Tom=C3=A1=C5=A1=20Brada?= <tomasbrod@azet.sk>
Date: Sun, 10 May 2015 13:59:05 +0200
Subject: [PATCH] Straight line veins.

---
 rocks/init.lua  |  2 ++
 rocks/veins.lua | 34 ++++++++++++++++++++++++++++++++++
 2 files changed, 36 insertions(+)
 create mode 100644 rocks/veins.lua

diff --git a/rocks/init.lua b/rocks/init.lua
index 70795cb..b5f7a9f 100644
--- a/rocks/init.lua
+++ b/rocks/init.lua
@@ -30,12 +30,14 @@ dofile(modpath.."/ign.lua")
 dofile(modpath.."/skarn.lua")
 dofile(modpath.."/pegmatite.lua")
 dofile(modpath.."/gensed.lua")
+dofile(modpath.."/veins.lua")
 
 minetest.register_on_generated(function(minp,maxp,seed)
  local vm, emin, emax = minetest.get_mapgen_object("voxelmanip")
  local area = VoxelArea:new{MinEdge=emin, MaxEdge=emax}
  rocksl.gensed(minp,maxp,seed,vm,area)
  --rocksl.genign
+ rocksl.genvein(minp,maxp,seed,vm,area)
  vm:write_to_map(data)
 end)
 
diff --git a/rocks/veins.lua b/rocks/veins.lua
new file mode 100644
index 0000000..fd2ab79
--- /dev/null
+++ b/rocks/veins.lua
@@ -0,0 +1,34 @@
+-- experimental fast vein generator
+
+rocksl.genvein=function(minp,maxp,seed,vm,area)
+ local t1 = os.clock()
+ local data = vm:get_data()
+
+ local chunksize = maxp.x - minp.x + 1
+ local pmapsize = {x = chunksize, y = chunksize, z = chunksize}
+ local minpxz = {x = minp.x, y = minp.z}
+ local pr=PseudoRandom(seed)
+ local c_sample=minetest.get_content_id("default:mese")
+ 
+ local numveins_raw=(chunksize/8)
+ local numveins = numveins_raw + (pr:next(-100,100)/100)
+ local numveins = 1
+ print("numveins="..numveins)
+
+ for vc=1, numveins do
+  local pointA=vector.new(pr:next(minp.x,maxp.x),pr:next(minp.x,maxp.x),pr:next(minp.x,maxp.x))
+  local pointB=vector.new(pr:next(minp.x,maxp.x),pr:next(minp.x,maxp.x),pr:next(minp.x,maxp.x))
+  local dir=vector.subtract(pointB,pointA)
+  local step=(1/vector.length(dir))
+  --vectorA=vector.add(pointA,minp)
+  for t=0, 1, step do
+   local p=vector.add(pointA, vector.multiply(dir,t) )
+   p=vector.round(p)
+   local di=area:index(p.x,p.y,p.z)
+   data[di]=c_sample
+  end
+ end
+
+ vm:set_data(data)
+ minetest.log("action", "rocks/genvein/ "..math.ceil((os.clock() - t1) * 1000).." ms ")
+end
\ No newline at end of file