+ archi things

architecture.inc

@@ -0,0 +1,38 @@
+/*
+ *	H E X A C O N E   -   A R C H I T E C T U R E
+ *   nouveau projet du Thu Dec  5 11:37:05 AM UTC 2024
+ *
+ *   file created on   Sat Jan 31 07:07:28 AM UTC 2026
+ */
+
+// ===========================================================
+#local Sz = 0.3;
+#macro Base_Col_A ()
+merge {
+	box { <-Sz, 0, -Sz>,     <Sz, 0.222, Sz>	}
+	#local B = Sz * 0.7;
+	box { <-B, 0, -B>, <B, 0.333, B>	}
+	}
+#end
+// -----------------------------------------------------------
+#macro Haut_Col_A ()
+object {
+	box { <-1, 0, -1>, <1, 0.333, 1> }
+	}
+#end
+// -----------------------------------------------------------
+#macro Fut_Col_A (H)
+object {
+cylinder { 0, H*y, 0.42 }
+}
+#end
+// -----------------------------------------------------------
+#macro Colonne_A (H)
+union	{
+	object { Haut_Col_A () translate y*H	}
+	object { Fut_Col_A  (H)			}
+	object { Base_Col_A ()			}
+	}
+#end
+// ===========================================================
+// ===========================================================