Added stalactite Object

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/DefCore.txt

@@ -0,0 +1,8 @@
+[DefCore]
+id=Stalactite1
+Version=5,2,0,1
+Category=C4D_StaticBack
+Width=15
+Height=60
+Offset=-4,-4
+

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/Scene1.material

@@ -0,0 +1,28 @@
+// Stalactite1 genrated by blender2ogre 0.6.0
+
+material stalactite1_3Mat
+{
+    receive_shadows on 
+
+    technique
+    {
+        pass stalactite1_3Mat
+        {
+            cull_hardware none
+            scene_blend alpha_blend
+
+            ambient 1.0 1.0 1.0 1.0
+            diffuse 1.0 1.0 1.0 1.0
+            specular 0.0 0.0 0.0 0.0 12.5
+            emissive 0.0 0.0 0.0 0.0
+
+
+            texture_unit 
+            {
+                texture stalactite.png
+                tex_address_mode wrap
+                filtering trilinear
+            }
+        }
+    }
+}

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/Scene2.material

@@ -0,0 +1,28 @@
+// Stalactite1 genrated by blender2ogre 0.6.0
+
+material stalactite1_1Mat
+{
+    receive_shadows on 
+
+    technique
+    {
+        pass stalactite1_1Mat
+        {
+            cull_hardware none
+            scene_blend alpha_blend
+
+            ambient 1.0 1.0 1.0 1.0
+            diffuse 1.0 1.0 1.0 1.0
+            specular 0.0 0.0 0.0 0.0 12.5
+            emissive 0.0 0.0 0.0 0.0
+
+
+            texture_unit 
+            {
+                texture stalactite.png
+                tex_address_mode wrap
+                filtering trilinear
+            }
+        }
+    }
+}

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/Scene3.material

@@ -0,0 +1,28 @@
+// Stalactite1 genrated by blender2ogre 0.6.0
+
+material stalactite1_2Mat
+{
+    receive_shadows on 
+
+    technique
+    {
+        pass stalactite1_2Mat
+        {
+            cull_hardware none
+            scene_blend alpha_blend
+
+            ambient 1.0 1.0 1.0 1.0
+            diffuse 1.0 1.0 1.0 1.0
+            specular 0.0 0.0 0.0 0.0 12.5
+            emissive 0.0 0.0 0.0 0.0
+
+
+            texture_unit 
+            {
+                texture stalactite.png
+                tex_address_mode wrap
+                filtering trilinear
+            }
+        }
+    }
+}

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/Scene4.material

@@ -0,0 +1,28 @@
+// Stalactite1 genrated by blender2ogre 0.6.0
+
+material stalactite1_4Mat
+{
+    receive_shadows on 
+
+    technique
+    {
+        pass stalactite1_4Mat
+        {
+            cull_hardware none
+            scene_blend alpha_blend
+
+            ambient 1.0 1.0 1.0 1.0
+            diffuse 1.0 1.0 1.0 1.0
+            specular 0.0 0.0 0.0 0.0 12.5
+            emissive 0.0 0.0 0.0 0.0
+
+
+            texture_unit 
+            {
+                texture stalactite.png
+                tex_address_mode wrap
+                filtering trilinear
+            }
+        }
+    }
+}

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/Scene5.material

@@ -0,0 +1,28 @@
+// Stalactite1 genrated by blender2ogre 0.6.0
+
+material stalactite1_5Mat
+{
+    receive_shadows on 
+
+    technique
+    {
+        pass stalactite1_5Mat
+        {
+            cull_hardware none
+            scene_blend alpha_blend
+
+            ambient 1.0 1.0 1.0 1.0
+            diffuse 1.0 1.0 1.0 1.0
+            specular 0.0 0.0 0.0 0.0 12.5
+            emissive 0.0 0.0 0.0 0.0
+
+
+            texture_unit 
+            {
+                texture stalactite.png
+                tex_address_mode wrap
+                filtering trilinear
+            }
+        }
+    }
+}

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/Script.c

@@ -0,0 +1,25 @@
+/**
+	Stalactite1
+	Hangs from the ceiling
+
+	@author 
+*/
+
+local Name = "$Name$";
+local Description = "$Description$";
+
+func Initialize()
+{
+	SetGraphics(Format("%d",Random(5)));
+	
+	SetProperty("MeshTransformation", Trans_Mul(Trans_Scale(600+Random(900)), Trans_Rotate(-25+Random(50),0,1,0)));
+	
+	var tinys = CreateObject(TinyStalactite, 0, 0);
+	tinys->SetProperty("MeshTransformation", Trans_Mul(Trans_Scale(1000), Trans_Rotate(180,0,0,1)));
+	tinys->SetParent(this);
+}
+
+func SetStalagmite()
+{
+	SetProperty("MeshTransformation", Trans_Mul(Trans_Scale(1000), Trans_Rotate(180,0,0,1)));
+}

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/StringTblDE.txt

@@ -0,0 +1,2 @@
+Name=Stalactite1
+Description=Hangs from the ceiling

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/StringTblUS.txt

@@ -0,0 +1,2 @@
+Name=Stalactite1
+Description=Hangs from the ceiling

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/TinyStalactite.ocd/DefCore.txt

@@ -0,0 +1,9 @@
+[DefCore]
+id=TinyStalactite
+Version=5,2,0,1
+Category=C4D_StaticBack
+Width=15
+Height=16
+Offset=-4,-4
+
+

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/TinyStalactite.ocd/Scene.material

@@ -0,0 +1,26 @@
+material stalactiteTinyMat
+{
+    receive_shadows on 
+
+    technique
+    {
+        pass stalactiteTinyMat
+        {
+            cull_hardware none
+            scene_blend alpha_blend
+
+            ambient 1.0 1.0 1.0 1.0
+            diffuse 1.0 1.0 1.0 1.0
+            specular 0.0 0.0 0.0 0.0 12.5
+            emissive 0.0 0.0 0.0 0.0
+
+
+            texture_unit 
+            {
+                texture tinystalactite.png
+                tex_address_mode wrap
+                filtering trilinear
+            }
+        }
+    }
+}

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/TinyStalactite.ocd/Script.c

@@ -0,0 +1,25 @@
+/**
+	TinyStalactite
+	Covers up the base of stalactites
+
+	@author 
+*/
+
+local Name = "$Name$";
+local Description = "$Description$";
+local parent;
+
+func Initialize()
+{
+}
+
+func SetParent(object target)
+{
+	parent = target;
+	AddEffect("Parent",this,1,1,this);
+}
+
+func FxParentTimer(object target, effect, int time)
+{
+	SetPosition(parent->GetX(), parent->GetY());
+}

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/TinyStalactite.ocd/StringTblDE.txt

@@ -0,0 +1,2 @@
+Name=TinyStalactite
+Description=Covers up the base of stalactites

planet/Objects.ocd/Environment.ocd/Stalactite1.ocd/TinyStalactite.ocd/StringTblUS.txt

@@ -0,0 +1,2 @@
+Name=TinyStalactite
+Description=Covers up the base of stalactites