From f5d589e1e6a6541aaaef5bc5e6758f162d3c26fb Mon Sep 17 00:00:00 2001 From: Eggert Jung Date: Sat, 28 Nov 2020 01:08:03 +0100 Subject: [PATCH] initial commit origianl file from soeren --- hose_pump_parametric.scad | 337 ++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 337 insertions(+) create mode 100644 hose_pump_parametric.scad diff --git a/hose_pump_parametric.scad b/hose_pump_parametric.scad new file mode 100644 index 0000000..ab2a291 --- /dev/null +++ b/hose_pump_parametric.scad @@ -0,0 +1,337 @@ +// parametric hose pump for use with stepper motor +// ball bearings used as rollers +// red holes need thread cutting M4 (hole depth 10mm) +// green holes need thread cutting M3 (hole depth 11mm) + +$fn=100; +show_case = true; +show_disc = true; +show_lid = true; +show_motor_flange = true; + +// ##### PARAMETERS TO ADAPT ##### + +// GENERAL +clearance = 0.25; // clearence for moving parts + +// HOSE +d_hose_out = 5.0; // outer hose diameter +d_hose_in = 3.0; // inner hose diameter +r_bending_hose = 19; // outer radius auf bent hose +l_squeeze = 0.7; // distance the hose is squeezed + +// BALL BEARINGS +d_bb_out = 9; // outer diameter of ball bearing +d_bb_in = 4; // inner diameter of ball bearing +h_bb = 4; // thickness of ball bearing + +number_of_rollers = 6; // number of rollers used +wall_thickness = 6; // thickness of outer case wall +hose_angle = 15; // angle of hose outlet, 0=parallel +lid_thickness = 4; // thickness of lid +h_disc = 10; // heigth (thickness) of rotating disc. Change carefully screwholes migth stick out +d_lid_screw_borehole = 2.5; // bore hole diameter for lid screw thread cutting +d_lid_screw = 3; // diameter of lid screws (must match with bore hole diameter) + +// MOTOR +motor_width=42; // width of (stepper)motor +d_motor_shaft = 5; // diameter of the motors shaft +r_shaft_flattening = 0.6; // depth (radius) of flattening of motor shaft +d_motor_flange_excess = 22.5; // diameter of circular excess on motors flange +h_motor_flange_excess = 2.5; // thickness of circular excess on motors flange +d_motor_screws = 3; // diameter of screws to fit in motors threads +hole_in_lid = true; // puts a hole in the lid for motor shaft (when motors shaft is too long) +motor_thread_distance=31; // shortest distance between two screw_holes on motor + +// ############################ + + +// ##### CACULATED VALUES ##### +roller_angle=360/number_of_rollers; // roller offset angle +hose_wall_thickness = (d_hose_out-d_hose_in)/2; // wall thickness of hose +heigth_squeezed_hose = (d_hose_out*PI-hose_wall_thickness*4+hose_wall_thickness*2)/2+l_squeeze; //max width of the sueezed hose, used for caculating the heigth of rollers +d_hose_squeezed = hose_wall_thickness*2-l_squeeze; // thickness of squeezed hose +ballbearings_per_roller=ceil(heigth_squeezed_hose/h_bb); // number of ball bearings to stack per roller +echo("number of ball bearings to stack per roller", ballbearings_per_roller); +roller_height=h_bb*ballbearings_per_roller; // total heigth of roller +d_roller=d_bb_out; // outer diameter of roller +r_roller_shaft_position=r_bending_hose-d_roller/2-d_hose_squeezed; // radius of roller shaft position +d_motor_flange=motor_width*sqrt(2); // diameter of the motor flange, depends on motor width +d_case_top=r_bending_hose*2+wall_thickness*2; // diameter of case on top, also lid diameter +h_case=roller_height+clearance+h_disc; // total heigth of casing + +d_disc=r_bending_hose*2-clearance*2; // diameter of disc (rotating part) +r_motor_flange_screws = d_motor_flange/2-4.5; // + + + +// DISC +if(show_disc==true) +difference() +{ + cylinder(d=d_disc,h=h_disc); + // motor shaft hole + difference() + { + translate([0,0,-1]) + cylinder(d=d_motor_shaft,h=h_disc*2); + difference() + { + translate([d_motor_shaft*1.5-r_shaft_flattening,0,0]) + cylinder(d=d_motor_shaft*2,h=h_disc); + translate([h_disc/2,-h_disc,0]) + cube([h_disc*2,h_disc*2,h_disc*2]); + } + } + // holes for roller shafts + for(i=[0:1:number_of_rollers-1]) + { + rotate(roller_angle*i,[0,0,1]) + translate([r_roller_shaft_position,0,-1]) + cylinder(d=d_bb_in,h=h_disc*2); + } + + // rollers + %for(i=[0:1:number_of_rollers-1]) + { + rotate(roller_angle*i,[0,0,1]) + translate([r_roller_shaft_position,0,h_disc]) + cylinder(d=d_roller,h=roller_height); + } +} + +// CASE +if(show_case==true) +difference() +{ + union() + { + // case + translate([0,0,0]) + cylinder(d1=d_motor_flange,d2=d_case_top,h=h_case); + + // hose outlet blocks + rotate(hose_angle,[0,0,1]) + hull() + { + translate([r_bending_hose-d_hose_out/2,r_bending_hose,h_disc-d_hose_out/4]) + radius_chamfer_cube(d_hose_out+d_hose_out/2,d_hose_out+wall_thickness,d_hose_out+d_hose_out/2,1,1); + + translate([0,0,0]) + translate([r_bending_hose-d_hose_out/2,r_bending_hose,0]) + radius_chamfer_cube(d_hose_out+d_hose_out/2,1,1,0,1); + } + + rotate(-hose_angle,[0,0,1]) + hull() + { + translate([-(r_bending_hose-d_hose_out/2),r_bending_hose,h_disc-d_hose_out/4]) + radius_chamfer_cube(d_hose_out+d_hose_out/2,d_hose_out+wall_thickness,d_hose_out+d_hose_out/2,1,1); + + translate([0,0,0]) + translate([-(r_bending_hose-d_hose_out/2),r_bending_hose,0]) + radius_chamfer_cube(d_hose_out+d_hose_out/2,1,1,0,1); + } + } + + // case inside + translate([0,0,-1]) + cylinder(d=r_bending_hose*2,h=h_case+2); + + // hose outlet borings + rotate(hose_angle,[0,0,1]) + translate([r_bending_hose-d_hose_out/2,0,h_disc+d_hose_out/2]) + rotate(-90,[1,0,0]) + cylinder(d=d_hose_out,h=d_disc); + + rotate(-hose_angle,[0,0,1]) + translate([-r_bending_hose+d_hose_out/2,0,h_disc+d_hose_out/2]) + rotate(-90,[1,0,0]) + cylinder(d=d_hose_out,h=d_disc); + + // lid screw borings (for thread cutting) + for(i=[3:1:6]) + { + rotate((360/6)*i+0,[0,0,1]) + translate([r_bending_hose+3,0,h_case-11]) + cylinder(d=d_lid_screw_borehole,h=20); + } + color("red") + %for(i=[3:1:6]) + { + rotate((360/6)*i+0,[0,0,1]) + translate([r_bending_hose+3,0,h_case-11]) + cylinder(d=d_lid_screw_borehole,h=11); + } + // motor flange screw borings (for thread cutting) + for(i=[0:1:4]) + { + rotate(90*i,[0,0,1]) + translate([r_motor_flange_screws,0,-2]) + cylinder(d=3.25,h=10); + } + color("green") + %for(i=[0:1:4]) + { + rotate(90*i,[0,0,1]) + translate([r_motor_flange_screws,0,-2]) + cylinder(d=3.25,h=10); + } +} + +// LID +if(show_lid==true) +translate([0,0,1]) // offset to separate objects +difference() +{ + // lid + translate([0,0,h_case]) + cylinder(d=d_case_top,h=lid_thickness); + // lid screw holes + for(i=[3:1:6]) + { + rotate((360/6)*i+0,[0,0,1]) + translate([r_bending_hose+3,0,h_case+lid_thickness]) + screw_hole(d_lid_screw,lid_thickness+4,6,2,false); + } + // hole for motor shaft in lid + if(hole_in_lid==true) + { + translate([0,0,h_case-1]) + cylinder(d=d_motor_shaft+clearance,h=lid_thickness*2); + } +} + +// MOTOR FLANGE +if(show_motor_flange==true) +translate([0,0,-1]) // offset to separate objects +difference() +{ + union() + { + // motor flange + translate([0,0,-(wall_thickness)]) + cylinder(d=d_motor_flange,h=wall_thickness); + } + // recess for disc + translate([0,0,-clearance]) + cylinder(d=d_disc+1,h=h_disc); + + //steppermotor + translate([0,0,-motor_width-wall_thickness]) + %radius_chamfer_cube(motor_width,motor_width,motor_width,4,1); + + // screw holes for attaching the motor flange to the case + for(i=[0:1:4]) + { + rotate(90*i,[0,0,1]) + translate([r_motor_flange_screws,0,-wall_thickness]) + //cylinder(d=d_lid_screw_borehole,h=10); + rotate(180,[1,0,0]) + screw_hole(4,wall_thickness+4,8,2,false); + } + + // screw holes for attaching the motor to the motor flange + translate([0,0,0]) + for(i=[0:1:3]) + { + rotate(90*i,[0,0,1]) + translate([motor_thread_distance/2,motor_thread_distance/2,0]) + screw_hole(d_motor_screws,wall_thickness+4,6,2,false); + } + // recess for excess on stepper motor + translate([0,0,-(wall_thickness)]) + cylinder(d=d_motor_flange_excess,h=h_motor_flange_excess); + // hole for motor shaft + translate([0,0,-(wall_thickness)]) + cylinder(d=d_motor_shaft+clearance,h=wall_thickness); +} + + + + + + +// MODULES USED +module screw_hole(diameter,length,head_diameter,recess_length,flathead) +{ + head_length=head_diameter/2-diameter/2; + translate([0,0,-length]) + { + cylinder(d=diameter,h=length); + + if(flathead==false) + { + translate([0,0,length-head_length]) + cylinder(d1=diameter,d2=head_diameter,h=head_length); + } + else + { + translate([0,0,length-head_length]) + cylinder(d=head_diameter,h=head_length); + } + if(recess_length > 0) + { + translate([0,0,length]) + cylinder(d=head_diameter,h=recess_length); + } + } +} + +module radius_chamfer_cube(x,y,z,r,center) +{ + if(center == 0) + { + if(r>0) + { + translate([r,r,0]) + minkowski() + { + cube([x-2*r,y-2*r,z/2]); + cylinder(r=r,h=z/2); + } + } + else + { + cube([x,y,z]); + } + } + if(center == 1) + { + translate([-x/2,-y/2,0]) + { + if(r>0) + { + translate([r,r,0]) + minkowski() + { + cube([x-2*r,y-2*r,z/2]); + cylinder(r=r,h=z/2); + } + } + else + { + cube([x,y,z]); + } + } + } + if(center == 2) + { + translate([-x/2,-y/2,-z/2]) + { + if(r>0) + { + translate([r,r,0]) + minkowski() + { + cube([x-2*r,y-2*r,z/2]); + cylinder(r=r,h=z/2); + } + } + else + { + cube([x,y,z]); + } + } + } +} \ No newline at end of file