layers
This commit is contained in:
parent
8378d8d105
commit
64f4c01d71
221
SurfFins.scad
221
SurfFins.scad
@ -1,30 +1,10 @@
|
||||
|
||||
include <BOSL2/std.scad>;
|
||||
include <BOSL2/beziers.scad>;
|
||||
include <BOSL2/rounding.scad>;
|
||||
include <BOSL2/skin.scad>;
|
||||
|
||||
|
||||
if (false) {
|
||||
|
||||
bez = [[0,0], [30,30], [80,0]];
|
||||
debug_bezier(bez, N=len(bez)-1);
|
||||
translate(bezier_points(bez, 0.3)) color("red") sphere(1);
|
||||
}
|
||||
|
||||
|
||||
if (false) {
|
||||
bez = [[0,0], [5,35], [60,-25], [80,0]];
|
||||
debug_bezier(bez, N=len(bez)-1);
|
||||
pts = bezier_points(bez, [0:0.2:1]);
|
||||
rainbow(pts) move($item) sphere(1.5, $fn=12);
|
||||
}
|
||||
|
||||
if (false) {
|
||||
|
||||
bez = [[0,0], [5,15], [40,20], [60,-15], [80,0]];
|
||||
move_copies(bezier_curve(bez, 8)) sphere(r=1.5, $fn=12);
|
||||
debug_bezier(bez, N=len(bez)-1);
|
||||
}
|
||||
|
||||
|
||||
fin_height = 250; // 10 inches in mm
|
||||
fin_width = 240; // Width at the base in mm
|
||||
@ -54,15 +34,88 @@ fin_back_widthdraw = 20; // Percent height
|
||||
fin_back_angle = 20; // back angle
|
||||
fin_back_strength=30;
|
||||
|
||||
base_tickness=9.2;
|
||||
base_extra_thickness=40;
|
||||
|
||||
|
||||
pt1_x = adj_ang_to_opp(fin_height,fin_sweep)+fin_base/2;
|
||||
pt1_y = fin_height;
|
||||
|
||||
$fn=32;
|
||||
|
||||
|
||||
pt = [100,0];
|
||||
bez = [
|
||||
|
||||
control_points_new = [
|
||||
// *****************
|
||||
// Under POINT
|
||||
// *****************
|
||||
[0,-13], //Point init
|
||||
[0,0], // Handle init point
|
||||
// [0,0],
|
||||
//[0,-13],
|
||||
//[0,-13],
|
||||
// *****************
|
||||
// Init POINT
|
||||
// *****************
|
||||
|
||||
//[opp_ang_to_adj(fin_height/3,fin_start_angle),-fin_height/3],
|
||||
|
||||
//[-50,0], // Point 0
|
||||
|
||||
|
||||
//[0,50], // Start handle Init
|
||||
[0,-13], // Start handle Init
|
||||
[0,0], // Init point
|
||||
[0,30], //
|
||||
[0,50],
|
||||
|
||||
|
||||
//[0,0],
|
||||
//[0,0],
|
||||
[opp_ang_to_adj(fin_height/3,fin_start_angle) , fin_height/3], //Point init
|
||||
// Handle 0
|
||||
|
||||
// *****************
|
||||
// TOP
|
||||
// *****************
|
||||
[pt1_x-100,pt1_y], // Handle 1 ()
|
||||
[pt1_x,pt1_y], // Point 1
|
||||
[pt1_x+30,pt1_y], // Handle 1 (End)
|
||||
|
||||
// *****************
|
||||
// COUNTER POINT
|
||||
// *****************
|
||||
handleStart(fin_width,fin_top_withdraw,fin_counter_angle,fin_counter_strength),
|
||||
counterTop(fin_width,fin_top_withdraw), // [250,220], // Point 2
|
||||
handleEnd(fin_width,fin_top_withdraw,fin_counter_angle,fin_counter_strength),
|
||||
|
||||
// *****************
|
||||
// BACK POINT
|
||||
// *****************
|
||||
handle(backPoint(),fin_back_angle,fin_back_strength),
|
||||
backPoint(),
|
||||
handle(backPoint(),-fin_back_angle,fin_back_strength),
|
||||
|
||||
// *****************
|
||||
// END POINT
|
||||
// *****************
|
||||
endHandle(fin_end_angle), // End Handle
|
||||
[fin_base,0], // End point
|
||||
[fin_base,0],
|
||||
// [fin_base,-20],
|
||||
|
||||
// *****************
|
||||
// BASE LAST
|
||||
// *****************
|
||||
/*
|
||||
[fin_base,-13],
|
||||
[fin_base,-13],
|
||||
[fin_base,-13]
|
||||
*/
|
||||
|
||||
];
|
||||
|
||||
control_points = [
|
||||
[0,0], // Point 0
|
||||
[opp_ang_to_adj(fin_height/3,fin_start_angle),fin_height/3], // Handle 0
|
||||
|
||||
@ -99,28 +152,12 @@ bez = [
|
||||
endHandle(fin_end_angle), // End Handle
|
||||
[fin_base,0] // End point
|
||||
];
|
||||
pos = bezpath_closest_point(bez, pt);
|
||||
xy = bezpath_points(bez,pos[0],pos[1]);
|
||||
debug_bezier(bez, N=3);
|
||||
color("red") translate(pt) sphere(r=1);
|
||||
color("blue") translate(xy) sphere(r=1);
|
||||
|
||||
|
||||
echo ("pt1_x",pt1_x);
|
||||
|
||||
|
||||
function counterTop(x,withdraw) = [x, x-withdraw ];
|
||||
function handleStart(x,withdraw,angle,strength) =
|
||||
[
|
||||
x+adj_ang_to_opp(strength,angle),
|
||||
x-withdraw +strength
|
||||
];
|
||||
|
||||
function handleEnd(x,withdraw,angle,strength) =
|
||||
[
|
||||
x-adj_ang_to_opp(strength,angle),
|
||||
x-withdraw -strength
|
||||
];
|
||||
function counterTop(x,withdraw) = [x, x-withdraw ];
|
||||
function handleStart(x,withdraw,angle,strength) = [x+adj_ang_to_opp(strength,angle), x-withdraw +strength];
|
||||
function handleEnd(x,withdraw,angle,strength) = [x-adj_ang_to_opp(strength,angle), x-withdraw -strength];
|
||||
|
||||
|
||||
function endHandle(angle)=
|
||||
@ -129,24 +166,92 @@ function endHandle(angle)=
|
||||
:
|
||||
[fin_base - adj_ang_to_opp(fin_end_strength,angle-90),fin_end_strength]
|
||||
;
|
||||
|
||||
|
||||
//function backPoint() = [fin_base-fin_base * fin_back_widthdraw/100]; //[155,80];
|
||||
function backPoint() = [fin_base-(fin_back_widthdraw/100*fin_base),fin_back_height/100*fin_height];
|
||||
function handle(point,angle,strength) = [point[0] + adj_ang_to_opp(strength,angle),point[1] + (angle>0 ? strength :-strength)];
|
||||
function decrease_y(points, percentage) = [ for (p = points) [p[0], p[1] * (1 - percentage/100)]];
|
||||
|
||||
|
||||
function handle(point,angle,strength)=
|
||||
[
|
||||
point[0] + adj_ang_to_opp(strength,angle) ,
|
||||
point[1] + (angle>0 ? strength : -strength)
|
||||
];
|
||||
|
||||
|
||||
//echo ("*** EndHandle",endHandle(70));
|
||||
/**
|
||||
* Draw Profile
|
||||
*
|
||||
*/
|
||||
module drawProfile( points,debug = true ){
|
||||
pt = [100,0];
|
||||
pos = bezpath_closest_point(points, pt);
|
||||
xy = bezpath_points(points,pos[0],pos[1]);
|
||||
debug_bezier(points, N=3);
|
||||
//color("red") translate(pt) sphere(r=6);
|
||||
//color("blue") translate(xy) sphere(r=6);
|
||||
}
|
||||
|
||||
//echo ("*** test",[fin_base-(fin_back_widthdraw/100*fin_base),(fin_back_height/100*fin_height)]);
|
||||
// Draw fin profile
|
||||
drawProfile( control_points, true );
|
||||
|
||||
echo ("*** handle 0",handle(backPoint(),0,fin_back_strength));
|
||||
echo ("*** handle +30",handle(backPoint(),fin_back_angle,fin_back_strength));
|
||||
echo ("*** handle -30",handle(backPoint(),-fin_back_angle,fin_back_strength));
|
||||
function pathProfile(points) = bezpath_curve(points,N=3);
|
||||
|
||||
|
||||
|
||||
//path = bezpath_curve(control_points,N=3);
|
||||
pathProfile = pathProfile( control_points );
|
||||
|
||||
//base = square([fin_base,13 ], center=true);
|
||||
base = [[0,0],[fin_base,0],[fin_base,-base_extra_thickness],[0,-base_extra_thickness]];
|
||||
path = concat(pathProfile, base);
|
||||
|
||||
//up (40) polygon(path,);
|
||||
//up (40) color("Red") polygon(base);
|
||||
up (40) color("Red") polygon(path);
|
||||
|
||||
|
||||
//stroke(path,dots=true,dots_color="red");
|
||||
|
||||
//up (0) polygon(path);
|
||||
|
||||
path2 = offset(path,delta=-10,chamfer=true);
|
||||
path3 = offset(path2,delta=-10,chamfer=true);
|
||||
|
||||
//path2[0][1] = 0;
|
||||
|
||||
path2b = concat(
|
||||
[[0, 0]], // New first point
|
||||
[for (i = [1:len(path2)-1]) path2[i]] // Rest of the points unchanged
|
||||
);
|
||||
path3b = concat(
|
||||
[[0, 0]], // New first point
|
||||
[for (i = [1:len(path3)-1]) path3[i]] // Rest of the points unchanged
|
||||
);
|
||||
echo("path2",path2);
|
||||
echo("path2b",path2b);
|
||||
|
||||
//path2 = bezpath_curve(decrease_y(control_points,10),N=3);
|
||||
|
||||
//path2 = offset_path(path, -20, closed=true);
|
||||
|
||||
|
||||
if (false) up (10) color("Red") %polygon(path2);
|
||||
if (false) up (12) color("Blue") %polygon(path3);
|
||||
|
||||
|
||||
if (false) up(50) color("Green") offset_sweep(path, height=20, bottom=os_circle(r=10), top=os_circle(r=10), steps=15);
|
||||
|
||||
sinwave = os_profile(points=[for(theta=[0:5:720]) [4*sin(theta), theta/700*15]]);
|
||||
|
||||
if (false) up(80) color("Yellow") offset_sweep(path, height=20, top=sinwave, $fn=32);
|
||||
|
||||
|
||||
lin_path=[[300,0,0],[300,20,0],[300,100,0]];
|
||||
//lin_path = [ [0, 0, 0], [33, 33, 33], [66, 33, 40], [100, 0, 0], [150,0,0] ];
|
||||
|
||||
//up(80) path_extrude(lin_path) circle(r=30, $fn=6); //path;
|
||||
//up(80) path_extrude(lin_path) [polygon(path),polygon(path2)]; //path;
|
||||
|
||||
//skin([octagon(4), circle($fn=70,r=2)], z=[0,3], slices=10);
|
||||
skin([path,path2/*,path3*/],slices=0,z=[0,base_tickness/2/*,6*/]);
|
||||
|
||||
|
||||
|
||||
/*
|
||||
path_extrude2d(path, caps=true, closed=false)
|
||||
move_copies([[-3.5,1.5],[0.0,3.0],[3.5,1.5]])
|
||||
circle(r=1.5);
|
||||
*/
|
||||
Loading…
x
Reference in New Issue
Block a user