From b00f17c62b5a53800bca00eea05c3c5aaf87bc36 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 29 Dec 2018 14:54:17 +0000
Subject: [PATCH] hotel-piece-model: wip

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 hotel-piecemodel.scad | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 hotel-piecemodel.scad

diff --git a/hotel-piecemodel.scad b/hotel-piecemodel.scad
new file mode 100644
index 0000000..a3ed6f4
--- /dev/null
+++ b/hotel-piecemodel.scad
@@ -0,0 +1,28 @@
+// -*- C -*-
+
+h = 15;
+w = 20;
+l = 30;
+roof = 10;
+eave = 1;
+peakw = 1;
+overhang = 3;
+chimnd= 7;
+chimnhr = 1.00;
+
+$fs = 0.1;
+
+module Hotel(){
+  cube([w,l,h + 0.1]);
+  hull(){
+    translate([0,0, h] + overhang * [-1,-1,0])
+      cube([w,l,eave] + overhang * [2,2,0]);
+    translate([0,0, h] + overhang * [0,-1,0]
+	      + (w-peakw) * 0.5 * [1,0,0])
+      cube([peakw, l, roof] + overhang * [0,2,0]);
+  }
+  translate([w/4, l/2, h] + overhang * [-0.5, 0,0])
+    cylinder(r= chimnd/2, h = roof * chimnhr);
+}
+
+Hotel();
-- 
2.30.2