From 75638b1b746fe16b041adfecfb7ee92c901e2be6 Mon Sep 17 00:00:00 2001
From: Josh Holtrop <jholtrop+git@gmail.com>
Date: Thu, 7 Oct 2010 21:07:08 +0000
Subject: [PATCH] added scenes/dw-circle.fart

git-svn-id: svn://anubis/fart/trunk@365 7f9b0f55-74a9-4bce-be96-3c2cd072584d
---
 scenes/dw-circle.fart | 129 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 129 insertions(+)
 create mode 100644 scenes/dw-circle.fart

diff --git a/scenes/dw-circle.fart b/scenes/dw-circle.fart
new file mode 100644
index 0000000..26995f9
--- /dev/null
+++ b/scenes/dw-circle.fart
@@ -0,0 +1,129 @@
+
+scene
+{
+    define material dw_blue {
+        color <0.000, 0.520, 0.546>
+        specular <0.5, 0.5, 0.5>
+    }
+
+    define material dw_brown {
+        color <0.634, 0.628, 0.126>
+        specular <0.5, 0.5, 0.5>
+    }
+
+    define material grey_ground {
+        color <0.3, 0.3, 0.3>
+        shininess 30
+    }
+
+    define shape dw_logo union {
+        subtract {
+            intersect {
+                cyl {
+                    size <3.055, 3.055, 0.5>
+                    translate <-4.454, 0.074, -0.25>
+                }
+                box {
+                    size <6.01, 5.94, 1>
+                    translate <-1.782, 0, 0>
+                }
+            }
+            cyl {
+                size <0.738, 0.738, 2>
+                translate <-3.645, 0.041, -1>
+            }
+            box {
+                size <1.96, 0.456, 2>
+                translate <-2.212, 0.048, 0>
+            }
+            material dw_blue
+        }
+        cyl {
+            size <0.307, 0.307, 0.5>
+            translate <-3.645, 0.041, -0.25>
+            material dw_brown
+        }
+        subtract {
+            extrude {
+                offset 0.5
+                polygon {
+                    <4.787, -2.971>
+                    <4.787, 1.565>
+                    <4.196, 1.565>
+                    <2.756, -2.375>
+                    <1.367, 1.052>
+                    <0.007, -2.40192>
+                    <-0.891, -0.174>
+                    <-3, -0.174>
+                    <-3, -2.971>
+                }
+                translate <0, 0, -0.25>
+            }
+            cyl {
+                size <3.488, 3.488, 2>
+                translate <-4.454, 0.074, -1>
+            }
+            material dw_blue
+        }
+        subtract {
+            extrude {
+                offset 0.5
+                polygon {
+                    <4.787, 2.025>
+                    <4.787, 2.971>
+                    <-3, 2.971>
+                    <-3, 0.283>
+                    <-0.588, 0.283>
+                    <0.000, -1.179>
+                    <1.368, 2.273>
+                    <2.728, -1.083>
+                    <3.877, 2.025>
+                }
+                translate <0, 0, -0.25>
+            }
+            cyl {
+                size <3.488, 3.488, 2>
+                translate <-4.454, 0.074, -1>
+            }
+            material dw_brown
+        }
+        scale 0.104
+    }
+
+    camera
+    {
+        position <0, 0, 10>
+        look_at <0, 0, 0>
+        up <0, 1, 0>
+    }
+
+    light
+    {
+        position <100, -100, 100>
+    }
+
+    plane
+    {
+        position <0, 0, 1>, 0
+        material grey_ground
+    }
+
+    for (local $i = 0; $i < 4; $i = $i + 1)
+    {
+        local $n_logos = 2 ^ ($i + 2)
+        for (local $j = 0; $j < $n_logos; $j = $j + 1)
+        {
+            shape dw_logo
+            {
+                rotate $j * 360 / $n_logos, <0, 0, 1>
+                translate <1.5 * ($i + 1), 0, 0.1>
+                if ($i > 0 && ($j + $i) % 2 == 1)
+                {
+                    rotate 90, <0, 0, 1>
+                }
+                rotate -90, <0, 0, 1>
+            }
+        }
+    }
+    shape dw_logo { translate <0, 0, 0.1> }
+}