complete hull of shoulder, upper and forearm for 3030 spool holder

diff --git a/mk2-haribo-spool-holder.scad b/mk2-haribo-spool-holder.scad
index e7d28d2cb993322b938ab033000f3363cefff8fb..b409fd0b11d7ab02ba1d49a0f63134949bbde8b4 100644 (file)
--- a/mk2-haribo-spool-holder.scad
+++ b/mk2-haribo-spool-holder.scad
@@ -16,7 +16,7 @@ wall = 2;
 
 $fn = 100;
 
-module arm_half(){
+module 3030_arm_half(){
   // inner block
   square(inner_block / 2);
 
@@ -43,18 +43,74 @@ module 3030_profile(){
   arms = 4;
   for(arm = [0:arms - 1]) {
     rotate(arm * 360 / arms) {
-      arm_half();
-      mirror(){ arm_half(); } } } }
-
-linear_extrude(height = 35){
-  difference(){
-    minkowski(){
-      square(30, true);
-      circle(5);}
-    minkowski(){
+      3030_arm_half();
+      mirror(){ 3030_arm_half(); } } } }
+
+module 3030_sleeve_profile(){
+  difference() {
+    square(40, true);
+    minkowski() {
       3030_profile();
       circle(0.2);} } }
 
+module fillet(r) {
+   offset(-r) {
+     offset(r) {
+       children(); } } }
+
+module upper_arm_profile(){
+  square(40, true);
+
+  a = [20, -20];
+  b = [34.1, 0];
+  c = [6.25, 20];
+  points = [a, b, c];
+
+  arm_radius = 11.35;
+  arm_center = [61.8, 140.4];
+  hull() {
+    polygon(points);
+    translate(arm_center) {
+      circle(arm_radius); } } }
+
+module forearm_profile() {
+  fillet(-5) {
+    difference() {
+      upper_arm_profile();
+      translate([-20, -20]) {
+        square(151); } } } }
+
+module upper_arm_hull() {
+  linear_extrude(height = 15) {
+    upper_arm_profile(); } }
+
+module forearm_hull() {
+  linear_extrude(height = 120.5) {
+    forearm_profile(); } }
+
+module shoulder_hull() {
+  translate([-20, -20, 0]) {
+    cube([40, 40, 35]); } }
+
+shoulder_hull();
+upper_arm_hull();
+forearm_hull();
+
+original_spool_holder();
+
+module original_forearm_profile() {
+  %projection(true) {
+    translate([-315, 0, -80]) {
+      import("Spool-holder.stl"); } } }
+
+module original_upper_arm_profile() {
+  %projection(true) {
+    translate([-315, 0, -2]) {
+      import("Spool-holder.stl"); } } }
+
+module original_spool_holder() {
+  %translate([-315, 0, 0]) {
+    import("Spool-holder.stl"); } }
 
 /*
   This file is part of 3d-printables.