Skip to content
Snippets Groups Projects
Unverified Commit 9cf0ad34 authored by Leon Dietrich's avatar Leon Dietrich
Browse files

add: Grundlage für Umlenkrollen

parent 723d64da
No related branches found
No related tags found
No related merge requests found
/*
* Umlenkrollen. Wie immer sind alle Angaben in mm
*/
include <lib/BasicFunctions.scad>;
module spool(diameter, lenght, stone) {
$fn = get_render_correctness();
rotate_extrude(angle = 360, convexity = 2) {
difference () {
translate ([diameter / 4, 0, 0])
square([diameter / 2, lenght - 2 * stone], true);
translate ([(lenght - 2 * stone) +
((lenght - 2 * stone) / diameter) +
(diameter/(lenght - 2 * stone)),
0, 0])
circle(lenght - 2 * stone);
}
}
translate ([0, 0, (lenght / 2) - (stone / 2)])
linear_extrude(height=stone, center = true)
circle(diameter / 4);
translate ([0, 0, 0 - (lenght / 2) + (stone / 2)])
linear_extrude(height=stone, center = true)
circle(diameter / 4);
}
spool(30, 50, 5);
\ No newline at end of file
function get_render_correctness() = ($preview == true) ? 15 : 360;
\ No newline at end of file
include <BasicFunctions.scad>;
module full_double_round_rect(size, radius) {
$fn = get_render_correctness() ;
x = size[0] - radius / 2;
y = size[1] - radius / 2;
z = size[2] - radius / 2;
translate([radius, radius, radius])
minkowski() {
cube(size=[x,y,z]);
sphere(r=radius);
}
}
module flat_round_rect(size, radius) {
$fn = get_render_correctness() ;
x = size[0] - radius / 2;
y = size[1] - radius / 2;
z = size[2];
translate ([radius, radius, 0])
minkowski () {
cube(size=[x, y, z]);
cylinder(r=radius);
}
}
module half_double_round_rect(size, radius) {
union() {
full_double_round_rect(size, radius);
flat_round_rect([size[0], size[1], size[2] / 2], radius);
}
}
half_double_round_rect ([30, 40, 10], 5);
\ No newline at end of file
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment