Add slate, conglomerate, sandstone, claystone, clay, sand sedimentaries.

Sed.txt

@@ -6,7 +6,12 @@ Sedimentary layer
 
 typy = časticovce(45%), Bio-vce(30%),  Chemo-vce(18%), Vulkano-vce(7%) (order?)
 
-Noise1( 70)= typ
+| X      | N4<0.7 | N4>0.7 |
+| N1<0.4 |   čast |   chem |
+| N1>0.4 |   bio  |   vulk |
+
+Noise1( 70)= typ1
+Noise4( 70)= typ2
 Noise2(100)= veľkosť častíc, BioTyp
 Noise3(220)= miera spevnenia, kvalita
 

rocks/gensed.lua

@@ -1,11 +1,17 @@
 -- experimental sedimentary layer generator
 
-local np_typ = {
+local np_typ1 = {
  offset = 0, octaves = 2, persist = 0.33,
  scale = 1,
  spread = {x=70, y=70, z=70},
  seed = -5500,
 }
+local np_typ2 = {
+ offset = 0, octaves = 2, persist = 0.33,
+ scale = 1,
+ spread = {x=70, y=70, z=70},
+ seed = -5472,
+}
 local np_vc = {
  offset = 0, octaves = 2, persist = 0.33,
  scale = 1,
@@ -15,7 +21,7 @@ local np_vc = {
 local np_sp = {
  offset = 0, octaves = 2, persist = 0.33,
  scale = 1,
- spread = {x=220, y=220, z=220},
+ spread = {x=100, y=100, z=100},
  seed = -1284,
 }
 
@@ -29,42 +35,84 @@ rocksl.gensed = function (minp, maxp, seed)
  local pmapsize = {x = chunksize, y = chunksize, z = chunksize}
  local pmapminpxz = {x = minp.x, y = minp.z}
  local c_stone= minetest.get_content_id("rocks:mudstone")
- local c_dwg= minetest.get_content_id("default:dirt_with_grass")
+ local c_dwg= c_stone
+ --DEBUG: c_dwg= minetest.get_content_id("default:dirt_with_grass")
 
- local n_typ= minetest.get_perlin_map(np_typ, pmapsize) : get2dMap_flat(pmapminpxz)
+ local n_tp1= minetest.get_perlin_map(np_typ1, pmapsize) : get2dMap_flat(pmapminpxz)
+ local n_tp2= minetest.get_perlin_map(np_typ2, pmapsize) : get2dMap_flat(pmapminpxz)
  local n_vc= minetest.get_perlin_map(np_vc, pmapsize) : get2dMap_flat(pmapminpxz)
  local n_sp= minetest.get_perlin_map(np_sp, pmapsize) : get2dMap_flat(pmapminpxz)
  
- layers = {
-  { node="default:sand" },
-  { node="default:dirt" },
-  { node="default:wood" },
-  { node="default:obsidian" },
+ local layers = {
+  dirt={ mod="default" },
+  gravel={ mod="default" },
+  sand={ mod="default" },
+  sandstone={ mod="default" },
+  clay={ mod="default" },
+  claystone={ mod="rocks" },
+  slate={ mod="rocks" },
+  conglomerate={ mod="rocks" },
  }
  for k,v in pairs(layers) do
-  v.ctx=minetest.get_content_id(v.node)
+  v.ctx=minetest.get_content_id(v.mod..":"..k)
  end
  
  local nixz= 1
  for z=minp.z, maxp.z do for x=minp.x, maxp.x do
   -- loop
-  local tpv= math.abs(n_typ[nixz])
+  local li
   local vcv= math.abs(n_vc[nixz])
-  local spv= math.abs(n_sp[nixz])
-  local tp=1
-  if tpv>0.45 then tp=2 end
-  if tpv>0.78 then tp=3 end
-  if tpv>0.94 then tp=4 end
-  li=tp
+  local spv= n_sp[nixz]
+  local tp=1 --=particulates, 2=biosediments, 3=chemosediments, 4=vulcanosediments
+  if n_tp1[nixz]>0.5 then tp=2
+   if n_tp2[nixz]>0.7 then tp=4 end
+  elseif n_tp2[nixz]>0.7 then tp=3 end
+
+  if tp==1 then
+   -- particulates
+   if vcv>0.4 then
+    -- clay-(0,stone,slate)
+    if spv>0.28 then li="slate"
+    elseif spv>-0.31 then li="claystone"
+    else li="clay" end
+   elseif vcv>0.2 then
+    -- sand-(0,stone)
+    if spv>-0.3 then li="sandstone" else li="sand" end
+   else
+    -- gravel/conglomerate
+    if spv>-0.34 then li="conglomerate" else li="gravel" end
+   end
+  end
+
   for y=minp.y, maxp.y do
    local di=area:index(x,y,z)
-   if (data[di]==c_stone) or (data[di]==c_dwg) then
+   if ((data[di]==c_stone) or (data[di]==c_dwg)) and li then
     data[di]=layers[li].ctx
    end
   end
   nixz= nixz+1
  end end
  vm:set_data(data)
- vm:write_to_map(data)
  minetest.log("action", "rocks/gensed/ "..math.ceil((os.clock() - t1) * 1000).." ms ")
+ vm:write_to_map(data)
 end
+
+minetest.register_node( "rocks:slate", {
+	description = S("Slate"),
+	tiles = { "rocks_Slate.png" },
+	is_ground_content = true, sounds = default.node_sound_dirt_defaults(),
+	groups = {cracky=3},
+})
+minetest.register_node( "rocks:claystone", {
+	description = S("Claystone"),
+	tiles = { "rocks_claystone.png" },
+	is_ground_content = true, sounds = default.node_sound_dirt_defaults(),
+	groups = {crumbly=1, cracky=3},
+})
+
+minetest.register_node( "rocks:conglomerate", {
+	description = S("Conglomerate"),
+	tiles = { "rocks_conglomerate.png" },
+	is_ground_content = true, sounds = default.node_sound_dirt_defaults(),
+	groups = {crumbly=3},
+})

rocks/sed.lua

@@ -178,7 +178,7 @@ rocks.register_sedimentary=reg
  --reg("rocks:limestone",    { spread=64, height=32, treshold=0.35 })
  --reg("rocks:breccia",  { spread=64, height=32, treshold=0.6 })
  --reg("rocks:conglomerate", { spread=64, height=32, treshold=0.6 })
- reg("default:stone_with_coal", { spread=64, height=14, treshold=0.58 })
- reg("default:clay",{ spread=48, height=14, treshold=0.55 })
+ --reg("default:stone_with_coal", { spread=64, height=14, treshold=0.58 })
+ --reg("default:clay",{ spread=48, height=14, treshold=0.55 })
 
 -- ~ Tomas Brod