From 9aaf8fcce0182a4c8ff8a3122a6f1a6253d63b1c Mon Sep 17 00:00:00 2001
From: hjp <hjp@41646610-1e7d-41f5-9080-4b43bf584971>
Date: Sat, 9 Feb 2008 23:01:16 +0000
Subject: [PATCH] Feldschirmprojektoren.

---
 pr/schneller_kreuzer/deck_13.pov      | 126 ++++++++++++++++++++++++--
 pr/schneller_kreuzer/test-deck_13.pov |   4 +-
 2 files changed, 122 insertions(+), 8 deletions(-)

diff --git a/pr/schneller_kreuzer/deck_13.pov b/pr/schneller_kreuzer/deck_13.pov
index 3c9405b..417208e 100644
--- a/pr/schneller_kreuzer/deck_13.pov
+++ b/pr/schneller_kreuzer/deck_13.pov
@@ -82,6 +82,7 @@
 	    #local A0 = A0 + 90;
 	#end
 
+	/*
 	difference {
 	    intersection {
 		cone {
@@ -134,6 +135,106 @@
 	    }
 	    #end
 	}
+	*/
+    }
+
+#declare feldschirm_projektor = 
+    union {
+	intersection {
+	    union {
+		difference {
+		    sphere {
+			<0, 0, 0>, 47.5
+		    }
+		    sphere {
+			<0, 0, 0>, 47
+		    }
+		}
+		difference {
+		    sphere {
+			<0, 0, 0>, 46.5
+		    }
+		    sphere {
+			<0, 0, 0>, 46
+		    }
+		}
+		difference {
+		    sphere {
+			<0, 0, 0>, 45.5
+		    }
+		    sphere {
+			<0, 0, 0>, 45
+		    }
+		}
+		texture { pigment { rgb < 0.2, 0.2, 0.4 > } }
+	    }
+	    cone {
+		<0,0,0>, 0
+		<-50, 0, 0>, 5
+		scale <1, 0.5, 1>
+		rotate <0, 0, -17.5>
+		texture { pigment { rgb < 0.2, 0.2, 0.2 > } }
+	    }
+	}
+	#local fsp_r1 = 0.5;
+	#local fsp_r2 = 0.3;
+	#local fsp_sa = 3;
+	cone {
+	    <-43,0,0>, fsp_r2
+	    <-47, 0, 0>, fsp_r1
+	    rotate <0, 0, -fsp_sa>
+	    scale <1, 0.5, 1>
+	    rotate <0, 0, -17.5>
+	    texture { pigment { rgb < 1, 0.9, 1 > } }
+	}
+	cone {
+	    <-43,0,0>, fsp_r2
+	    <-47, 0, 0>, fsp_r1
+	    rotate <0, 0, -fsp_sa>
+	    rotate <120, 0, 0>
+	    scale <1, 0.5, 1>
+	    rotate <0, 0, -17.5>
+	    texture { pigment { rgb < 1, 0.9, 1 > } }
+	}
+	cone {
+	    <-43,0,0>, fsp_r2
+	    <-47, 0, 0>, fsp_r1
+	    rotate <0, 0, -fsp_sa>
+	    rotate <-120, 0, 0>
+	    scale <1, 0.5, 1>
+	    rotate <0, 0, -17.5>
+	    texture { pigment { rgb < 1, 0.9, 1 > } }
+	}
+	sphere {
+	    <-41.5, 15, 0>, 1
+	    texture { T_Copper_3D }
+	}
+	cone {
+	    <-0, 4.8, 0>, 1
+	    <-0, 0, 0>, 1.5
+	    matrix <
+		1,       0, 0,
+		0.5/4.8, 1, 0,
+		0,       0, 1,
+		0,       0, 0
+	    >
+
+	    translate <-42, 10.2, 0>
+	    texture { pigment { rgb < 1, 0.9, 1 > } }
+	}
+	cone {
+	    <-41.5, 12, -3>, 0.5
+	    <-41.5, 12, +3>, 0.5
+	    texture { pigment { rgb < 1, 0.8, 1 > } }
+	}
+	sphere {
+	    <-41.5, 12, -3>, 0.6
+	    texture { T_Copper_3D }
+	}
+	sphere {
+	    <-41.5, 12, +3>, 0.6
+	    texture { T_Copper_3D }
+	}
     }
 
 #declare deck_13 = 
@@ -154,11 +255,12 @@
 	    }
 	}
 	#end
-	difference {
+	difference {	// XXX
 	    cone {
-		<0, 10.2, 0> 46.6
-		<0, 9.8, 0> 46.7
-		texture { T_arkonstahl }
+		<0, 10.2, 0> 46.9
+		<0, 9.8, 0> 47.0
+		// texture { T_arkonstahl }
+		texture { T_bodenbelag }
 	    }
 	    torus {
 		(15+6)/2, (15-6)/2
@@ -166,8 +268,9 @@
 	    }
 	    #ifdef (SCHNITT_1)
 	    intersection {
-		torus {
-		    23, 23
+		cone {
+		<0, -0.3, 0> 47.1
+		<0,  0.3, 0> 47.1
 		}
 		plane { 
 		    <0, 0, -1> 0
@@ -179,6 +282,7 @@
 		}
 		rotate <0, 135, 0>
 		translate <0, 10.0, 0>
+		texture { pigment { rgb < 1, 0, 0 > } }
 	    }
 	    #end
 	}
@@ -286,5 +390,15 @@
 	#end
 
 
+	#local a = 0;
+	#while (a < 360) 
+	    #if (!SCHNITT_1 | a <= 270) 
+		object {
+		    feldschirm_projektor
+		    rotate <0, a, 0>
+		}
+	    #end
+	    #local a = a + 20;
+	#end
     }
 
diff --git a/pr/schneller_kreuzer/test-deck_13.pov b/pr/schneller_kreuzer/test-deck_13.pov
index 91e8f67..aea59b5 100644
--- a/pr/schneller_kreuzer/test-deck_13.pov
+++ b/pr/schneller_kreuzer/test-deck_13.pov
@@ -17,14 +17,14 @@ light_source {
     color White
 }
 
-#local CP = <-16,  10, -10>;
+#local CP = <-105, 100, -105>;
 light_source {
     CP
     color White*0.5
 }
 camera {
         location CP
-        look_at <-6, 10, -0>
+        look_at <-15, 15, -0>
 	angle 20
 }