premier commit du printemps

hexacone.inc

@@ -154,10 +154,13 @@ merge	{
 		}
 	sphere { 0, DTb*1.65 translate -DTa*x }
 	sphere { 0, DTb*1.65 translate  DTa*x }
-	#if (rand(Rng1) < 0.8)
+	#local R = rand(Rng1);
+	#if (R < 0.4)
 	  texture { Orange_Glass }
-	#else
+	#elseif (R < 0.8)
 	  texture { Dark_Green_Glass }
+	#else
+	  texture { Flashy }
 	#end
 	}
 #end   // macro