X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=wine-vacuum-adapter.scad;h=5ce11a81d170ea055cfe56425a4d1e954f645476;hb=6dba99d4594590c1af949fbd0379d366a05c2ca6;hp=4e24a6ac38b08e3815ffed4365624596956ea769;hpb=43d2ae22cfff1829a4bab8d4684cd372aa50d301;p=reprap-play.git

diff --git a/wine-vacuum-adapter.scad b/wine-vacuum-adapter.scad
index 4e24a6a..5ce11a8 100644
--- a/wine-vacuum-adapter.scad
+++ b/wine-vacuum-adapter.scad
@@ -1,22 +1,42 @@
 // -*- C -*-
 
 india_nom = 27.0;
-india_slop = 0.35;
+india_slop = 0.63;
 
 middia_nom = 31.0;
-middia_slop = 0.5;
+middia_slop = 0.10;
 
 outdia = 44.0;
 
+wall = 4;
+
 htop = 5;
 hbot = 7;
 
+slope = 0.65;
+
+$fa=3;
+$fs=0.1;
+
 // calculated
 
-india_use = india_nom - india_slop;
-middia_use = middia_nom + middia_slop;
+india_use = india_nom + india_slop;
+middia_use = middia_nom - middia_slop;
+
+//echo("MIN WALL", (middia_use - india_use)/2);
+
+ppA = [middia_use/2, 0];
+ppB = ppA + [0, 1] * htop;
+ppC = ppB + [-1,0] * wall;
+ppD = [ppC[0], ppA[1] - wall/slope];
+ppE = [india_use/2, ppD[1] - (india_use/2 - ppD[0])/slope];
+ppF = ppE + [0,-1] * (htop + hbot);
+ppG = ppF + [1, 0] * wall;
+ppK = [outdia/2, ppA[1]];
+ppJ = ppK + [0,-1] * wall;
+ppH = [ppG[0], ppJ[1] - (ppJ[0]-ppG[0])/slope];
 
-module Plan() {
+module Plan1() {
   polygon([[ india_use/2,    -hbot ],
 	   [ outdia/2,       -hbot ],
 	   [ outdia/2,       0     ],
@@ -25,5 +45,30 @@ module Plan() {
 	   [ india_use/2,    htop  ]]);
 }
 
-Plan();
+module Plan3() {
+  p = [ ppA,
+	ppB,
+	ppC,
+	ppD,
+	ppE,
+	ppF,
+	ppG,
+	ppH,
+	ppJ,
+	ppK ];
+  echo(p);
+  polygon(p);
+}
+
+module Demo(){
+  color("blue") translate([0,0,1]) Plan1();
+  Plan3();
+}
+
+module Adapter(){
+  rotate_extrude(convexity=5)
+    Plan1();
+}
 
+//Demo();
+Adapter();