From 0dae80073937096222adfb2b280cde1752da4f62 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Tom=C3=A1=C5=A1=20Brada?= <tomasbrod@azet.sk>
Date: Sun, 12 Apr 2015 13:18:48 +0200
Subject: [PATCH] Pegmatite vein def.

---
 mapgen.lua                   |   4 ++--
 pegmatite.lua                |  23 +++++++++++++++++++++--
 textures/rocks_Pegmatite.png | Bin 0 -> 893 bytes
 3 files changed, 23 insertions(+), 4 deletions(-)
 create mode 100644 textures/rocks_Pegmatite.png

diff --git a/mapgen.lua b/mapgen.lua
index 6531b7d..bc036fa 100644
--- a/mapgen.lua
+++ b/mapgen.lua
@@ -153,7 +153,7 @@ rocksl.veingen=function(veins,minp,maxp,seed)
     local noise_ix=1
     local posi = area:index(x0, y0, z0)
     if ignore_wherein or wherein_set[nodes[posi]] then
-     print("vein "..vein.primary.." @ "..x0..","..y0..","..z0.." vrm="..vrm)
+     print("[rocks] vein "..vein.primary.." @ "..x0..","..y0..","..z0.." vrm="..vrm)
      did_generate=1
      for x=-vrm, vrm do
       for y=-vrm, vrm do
@@ -184,7 +184,7 @@ rocksl.veingen=function(veins,minp,maxp,seed)
   manipulator:set_data(nodes)
   --manipulator:calc_lighting()
   manipulator:write_to_map()
-  print("end veingen "..(os.clock()-timebefore))
+  print2("end veingen "..(os.clock()-timebefore))
  else
   --print("end veingen (nothin generated)")
  end
diff --git a/pegmatite.lua b/pegmatite.lua
index 9762b2b..e5e9bf8 100644
--- a/pegmatite.lua
+++ b/pegmatite.lua
@@ -2,8 +2,8 @@
 -- Pegmatite vein
 --
 
-local CommonRarity=0.02 --too high... should be like 0.013
-local CommonRadius=10
+local CommonRarity=0.024
+local CommonRadius=8
 local CommonWherein={ "rocks:granite" }
 
 minetest.register_node( "rocks:pegmatite", {
@@ -15,4 +15,23 @@ minetest.register_node( "rocks:pegmatite", {
 
 -- ores have to be redefined for pegmatite background
 
+-- Lepidolite         Li    Medium Pegmatite (2.5%)
+-- Cassiterite        Sn    Strong Granite, Pegmatite (1.5%)
+-- Pollucite          Cs    Strong Pegmatite (0.1%)
+-- Scheelite          W     Medium SEDEX, Pegmatite (2%), Skarn
+-- Spodumene          Li    Strong Pegmatite (7%)
+-- Tantalite          Ta    Strong Pegmatite (2%)
+-- Wolframite         W     Medium Pegmatite (1%)
+-- Spodumene        7%
+-- Muscovite (mica) 7%
+-- Kyanite          5%
 
+-- pegmatites are only 1 kind
+rocks.register_vein("rocks:pegmatite",{
+  wherein={ "rocks:granite" },
+  miny=-160, maxy=20,
+  radius={ average=8, amplitude=4, frequency=5 },
+  density=80, rarity=CommonRarity,
+  ores={
+  }
+ })
diff --git a/textures/rocks_Pegmatite.png b/textures/rocks_Pegmatite.png
new file mode 100644
index 0000000000000000000000000000000000000000..eb8804765a4fef89639dbca8b06df84bdd27387f
GIT binary patch
literal 893
zcmV-@1A_dCP)<h;3K|Lk000e1NJLTq000mG000mO1^@s6AM^iV00006VoOIv0Nw!1
z0Fp^E=L-M;010qNS#tmY3ljhU3ljkVnw%H_000McNliru-U|s5E*E)DQjq`v03~Tu
zSad^gZEa<4bN~PV002XBWnpw>WFTUBAVFhebyII<bRa`-a&RuC7-Gi&00P-bL_t(I
z%O%t8ZktvBfZ_KXJ`WfJiE&6KCGDhXyZ?*WG%4+(O#M+Q)tV-5oY-K44F(P$`;mKi
z9&vwnJ3T!<FbbQQ?_*mQp0DV&raT-`N>S{0r0J4=m}r^?<+=>xNY{19m-Q>&EMgia
zlEoQe6md8l*=#mAwuNaLTwJ7#qvTZAIF8HubxU2h_}&b0_v!D6X~6S+vOH%TdZuxp
z9|oFMQ<fEJy1-XHi{+B4I$~QEW8Z<0m=6zM`FQgS+qaT&9Izda{l3C+EG{on;<&@M
zOg350Cd&!ubA*7)%arx{74gsQU(@;d8M|GMl#)~1quUd%t8kS|UDa5&jcFKcvz)5T
zh~gM&m>jDLnP(eTt0#mI{9OH{sY;S$N#75=y=_^qU$9Jp)(ux_LJ)+s-AG-xD91&P
zNXAicI<+WI(d(Y?|9!)dBc5`I;}|JzJTKsFv&Hol$LfgdI)w28arf!ZX+oeoP2hVV
z1)H}G$ueOWCx*Ub_51=tkSt<G4CcX%wyBYF!o2_Y3xE9n8}ncW!e9ax$$~uJ5r!dQ
z7-L8i+i~f;8m%?QBFA+d%A!DCBxkg3%i&P4dj0{^$S@4dd_`3q`26{nx+<|9o3<O!
z!^kjAeEa^y;aFqV%|Mz4<oTYeZus%|$TUq<rxx3oIFAEN(_+1PLKrqhS#p^!xpsWA
zY>PScJ@;R}5=R04Y)0SrxVFM{6pRDGJYu`e7!e>EJmryR`8y)hz>K2+;~?LqC1?2l
zjQZ4&XInf!W?vQzNPhkJ0Va4|KjSLJ>7=Ra7Sj*r^uvg&T-sJ+SsL9oWLb{wIC!37
zxlHJ_e*fVpq_nuczM!gW%wBhdQAAnpkwTL1wn$-cb#;Z-9Z?i>sw-T_!Llu$SI;Di
zgsyAQdcahk2MF3mb9I$+I36)glcFft?RFp}OcO=1XFd=4aC5`4s+fln%JcXiWW9wU
T0@Y1h00000NkvXXu0mjfb2gRY

literal 0
HcmV?d00001