mirrors/PseudoMakeMeKeyCapProfiles
1
0
Fork 0
mirror of https://github.com/pseudoku/PseudoMakeMeKeyCapProfiles.git synced 2024-05-20 01:08:12 +00:00
Code Issues Packages Projects Releases Wiki Activity
PseudoMakeMeKeyCapProfiles/Knob.scad
pseudoku 7bfc9bf2dd Knob and Lib 
added encoder knob and some instructions for end user.
2019-09-24 21:01:47 -05:00

408 lines
17 KiB
OpenSCAD
Raw Blame History

use <scad-utils/morphology.scad> //for cheaper minwoski
use <scad-utils/transformations.scad>
use <scad-utils/shapes.scad>
use <scad-utils/trajectory.scad>
use <scad-utils/trajectory_path.scad>
use <sweep.scad>
use <skin.scad>
//DP (Distored Pyramidal) [Double Penetration] Profile
//TODO add shift
difference(){
union(){
difference(){
translate([0, 0, 0])keycap(keyID = 0, cutLen = 0, knull = true, Dish = true, visualizeDish = true, crossSection = false, homeDot = false);
#translate([0, 0, 7.5])rotate([0, 180, 0])keycap(keyID = 2, cutLen = 0, Stem =false, Dish = false, visualizeDish = true, crossSection = false, homeDot = false, Legends = false);
}
rotate([180, 0, 0])keycap(keyID = 1, cutLen = 0, knull = true, Dish = false, visualizeDish = true, crossSection = false, homeDot = false, Legends = false);
}
translate([0,0,-4.5])
intersection(){
cylinder(d = stemR, 10);
translate([0,stemR-stemSlot,5])cube([stemR, stemR, 10],center = true);
}
#translate([0,0,-7])cylinder(d = 12, 2.5);
translate([0,0,-2]) rotate([90,0,0])cylinder(d = 4, 10);
}
//translate([0, 0, 5.5])keycap(keyID = 3, cutLen = 0, Stem =false, Dish = false, visualizeDish = true, crossSection = false, homeDot = false, Legends = false);
////fullsetee
RowHome = [0,2.5,5,2.5,0,0];
//Parameters
wallthickness = 1.95;
topthickness = 2.5;
stepsize = 50; //resolution of Trajectory
step = 30; //resolution of ellipes
fn = 32; //resolution of Rounded Rectangles: 60 for output
layers = 50; //resolution of vertical Sweep: 50 for output
knullNum = 24;
//---Stem param
slop = 0.3;
stemRot = 0;
stemWid = 7.2;
stemLen = 5.5;
stemCrossHeight = 4;
extra_vertical = 0.6;
StemBrimDep = 0;
stemLayers = 50; //resolution of stem to cap top transition
dishLayers = 30;
stemR = 6.2;
stemSlot = 4.6;
keyParameters = //keyParameters[KeyID][ParameterID]
[
// BotWid, BotLen, TWDif, TLDif, keyh, WSft, LSft XSkew, YSkew, ZSkew, WEx, LEx, CapR0i, CapR0f, CapR1i, CapR1f, CapREx, StemEx
//Column 0
[10, 17.16, 1.6, 5.5, 5, 0, 0, 0, 0, 30, 2, 2, .25, .25, .5, .5, 2, 2], //R4
[10, 17.16, 3, 5.5, 7, 0, 0, 0, 0, 30, 2, 2, .25, .25, .5, .5, 2, 2], //R3
[3.8, 17.16, 3.6, 5.5, 1, 0, 0, 0, 0, -0, 3, 2, 1, 3.399, 1, 5, 2, 2], //R2 Home
[4.4, 17.16, 1, 5.5, 3, 0, 0, 0, 0, -0, 3, 2, 1, 3.399, 1, 5, 2, 2], //R1
];
function BottomWidth(keyID) = keyParameters[keyID][0]; //
function BottomLength(keyID) = keyParameters[keyID][1]; //
function TopWidthDiff(keyID) = keyParameters[keyID][2]; //
function TopLenDiff(keyID) = keyParameters[keyID][3]; //
function KeyHeight(keyID) = keyParameters[keyID][4]; //
function TopWidShift(keyID) = keyParameters[keyID][5];
function TopLenShift(keyID) = keyParameters[keyID][6];
function XAngleSkew(keyID) = keyParameters[keyID][7];
function YAngleSkew(keyID) = keyParameters[keyID][8];
function ZAngleSkew(keyID) = keyParameters[keyID][9];
function WidExponent(keyID) = keyParameters[keyID][10];
function LenExponent(keyID) = keyParameters[keyID][11];
function KnullRound0i(keyID) = keyParameters[keyID][12];
function KnullRound0f(keyID) = keyParameters[keyID][13];
function KnullRound1i(keyID) = keyParameters[keyID][14];
function KnullRound1f(keyID) = keyParameters[keyID][15];
function ChamExponent(keyID) = keyParameters[keyID][16];
function StemExponent(keyID) = keyParameters[keyID][17];
dishParameters = //dishParameter[keyID][ParameterID]
[
// EdOf fn LEx WEx DshDep Ch0i, ch1i, Ch0f, Ch1f, DishExp
//Column 0
[ 1, 4, 0, 2, 2.5, .5, 1, .25, .5, 2], //R4
[ 1, 2, 0, 2, 1.0, 3.399, .25, 2, 2, 2], //R3
[ 1, 1, 0, .9, 1.0, 3.399, 5, .001, .001, 1.5], //R2
[ 1, .005, 3, 3, 2.0, 3.399, 5, .001, .001, 1.5], //R1
];
function EdgeOffset(keyID) = dishParameters[keyID][0]; //
function LenFinal(keyID) = dishParameters[keyID][1]; //
function LenExpo(keyID) = dishParameters[keyID][2]; //
function WidExpo(keyID) = dishParameters[keyID][3]; //
function DishDepth(keyID) = dishParameters[keyID][4]; //
function DishCham0i(keyID) = dishParameters[keyID][5]; //
function DishCham1i(keyID) = dishParameters[keyID][6]; //
function DishCham0f(keyID) = dishParameters[keyID][7]; //
function DishCham1f(keyID) = dishParameters[keyID][8]; //
function DishExpo(keyID) = dishParameters[keyID][9];
//function FrontTrajectory(keyID) =
// [
// trajectory(forward = FrontForward1(keyID), pitch = FrontPitch1(keyID)), //more param available: yaw, roll, scale
// trajectory(forward = FrontForward2(keyID), pitch = FrontPitch2(keyID)) //You can add more traj if you wish
// ];
//
//function BackTrajectory (keyID) =
// [
// trajectory(forward = BackForward1(keyID), pitch = BackPitch1(keyID)),
// trajectory(forward = BackForward2(keyID), pitch = BackPitch2(keyID)),
// ];
//------- function defining Dish Shapes
function ellipse(a, b, d = 0, rot1 = 0, rot2 = 360) = [for (t = [rot1:step:rot2]) [a*cos(t)+a, b*sin(t)*(1+d*cos(t))]]; //Centered at a apex to avoid inverted face
function DishShape (a,b,c,d) =
concat(
// [[c+a,b]],
ellipse(a, b, d = 0,rot1 = 90, rot2 = 270)
// [[c+a,-b]]
);
function oval_path(theta, phi, a, b, c, deform = 0) = [
a*cos(theta)*cos(phi), //x
c*sin(theta)*(1+deform*cos(theta)) , //
b*sin(phi),
];
path_trans2 = [for (t=[0:step:180]) translation(oval_path(t,0,10,15,2,0))*rotation([0,90,0])];
//--------------Function definng Cap
function CapTranslation(t, keyID) =
[
((t)/layers*TopWidShift(keyID)), //X shift
((t)/layers*TopLenShift(keyID)), //Y shift
(t/layers*KeyHeight(keyID)) //Z shift
];
function InnerTranslation(t, keyID) =
[
((t)/layers*TopWidShift(keyID)), //X shift
((t)/layers*TopLenShift(keyID)), //Y shift
(t/layers*(KeyHeight(keyID)-topthickness)) //Z shift
];
function CapRotation(t, keyID) =
[
((t)/layers*XAngleSkew(keyID)), //X shift
((t)/layers*YAngleSkew(keyID)), //Y shift
((t)/layers*ZAngleSkew(keyID)) //Z shift
];
function CapTransform(t, keyID) =
// [
pow(t/layers, WidExponent(keyID))*(BottomWidth(keyID) -TopWidthDiff(keyID)) + (1-pow(t/layers, WidExponent(keyID)))*BottomWidth(keyID);
// pow(t/layers, LenExponent(keyID))*(BottomLength(keyID)-TopLenDiff(keyID)) + (1-pow(t/layers, LenExponent(keyID)))*BottomLength(keyID)
// ];
function CapRoundness(t, keyID) =
[
pow(t/layers, ChamExponent(keyID))*(CapRound0f(keyID)) + (1-pow(t/layers, ChamExponent(keyID)))*CapRound0i(keyID),
pow(t/layers, ChamExponent(keyID))*(CapRound1f(keyID)) + (1-pow(t/layers, ChamExponent(keyID)))*CapRound1i(keyID)
];
function KnullTranslation(t, keyID) =
[
cos((t)/layers*ZAngleSkew(keyID))*(pow(t/layers, WidExponent(keyID))*(BottomWidth(keyID) -TopWidthDiff(keyID)) + (1-pow(t/layers, WidExponent(keyID)))*BottomWidth(keyID)),
sin((t)/layers*ZAngleSkew(keyID))*(pow(t/layers, WidExponent(keyID))*(BottomWidth(keyID) -TopWidthDiff(keyID)) + (1-pow(t/layers, WidExponent(keyID)))*BottomWidth(keyID)),
(t/layers*KeyHeight(keyID)) //Z shift
];
function KnullRotation(t, keyID) =
[
((t)/layers*XAngleSkew(keyID)), //X shift
((t)/layers*YAngleSkew(keyID)), //Y shift
((t)/layers*ZAngleSkew(keyID)) //Z shift
];
function KnullTransform(t, keyID) =
[
pow(t/layers, WidExponent(keyID))*(KnullRound0i(keyID)) + (1-pow(t/layers, WidExponent(keyID)))*KnullRound0f(keyID),
pow(t/layers, LenExponent(keyID))*(KnullRound1i(keyID)) + (1-pow(t/layers, LenExponent(keyID)))*KnullRound1f(keyID)
];
//function InnerTransform(t, keyID) =
// [
// pow(t/layers, WidExponent(keyID))*(BottomWidth(keyID) -TopLenDiff(keyID)-wallthickness*2) + (1-pow(t/layers, WidExponent(keyID)))*(BottomWidth(keyID) -wallthickness*2),
// pow(t/layers, LenExponent(keyID))*(BottomLength(keyID)-TopLenDiff(keyID)-wallthickness*2) + (1-pow(t/layers, LenExponent(keyID)))*(BottomLength(keyID)-wallthickness*2)
// ];
function StemTranslation(t, keyID) =
[
((t)/stemLayers*TopWidShift(keyID)), //X shift
((t)/stemLayers*TopLenShift(keyID)), //Y shift
stemCrossHeight+.1+StemBrimDep + (t/stemLayers*(KeyHeight(keyID)- topthickness - stemCrossHeight-.1 -StemBrimDep)) //Z shift
];
function StemRotation(t, keyID) =
[
((t)/stemLayers*XAngleSkew(keyID)), //X shift
((t)/stemLayers*YAngleSkew(keyID)), //Y shift
((t)/stemLayers*ZAngleSkew(keyID)) //Z shift
];
function StemTransform(t, keyID) =
[
pow(t/stemLayers, StemExponent(keyID))*(BottomWidth(keyID) -TopWidthDiff(keyID)-wallthickness) + (1-pow(t/stemLayers, StemExponent(keyID)))*(stemWid - 2*slop),
pow(t/stemLayers, StemExponent(keyID))*(BottomLength(keyID)-TopLenDiff(keyID)-wallthickness) + (1-pow(t/stemLayers, StemExponent(keyID)))*(stemLen - 2*slop)
];
function StemRadius(t, keyID) = pow(t/stemLayers,3)*3 + (1-pow(t/stemLayers, 3))*1;
//----- Distorted Pyramidal Dish
function DishTranslation(t, keyID) =
[
((t)/dishLayers*TopWidShift(keyID)), //X shift
((t)/dishLayers*TopLenShift(keyID)), //Y shift
KeyHeight(keyID)+DishDepth(keyID)-(t)/dishLayers*(DishDepth(keyID)) //Z shift
];
function DishRotation(t, keyID) =
[
(-XAngleSkew(keyID)), //X shift
(-YAngleSkew(keyID)), //Y shift
2*(ZAngleSkew(keyID))-((t)/dishLayers*ZAngleSkew(keyID)) //Z shift
];
function DishTransform(t, keyID) =
(BottomWidth(keyID) -TopWidthDiff(keyID)) - (1-pow(t/dishLayers, WidExpo(keyID)))*(LenFinal(keyID));
function DishRoundness(t, keyID) =
[
pow(t/dishLayers, DishExpo(keyID))*(DishCham0f(keyID)) + (1-pow(t/dishLayers, DishExpo(keyID)))*DishCham0i(keyID),
pow(t/dishLayers, DishExpo(keyID))*(DishCham1f(keyID)) + (1-pow(t/dishLayers, DishExpo(keyID)))*DishCham1i(keyID)
];
function KnullTranslation2(t, keyID) =
[
cos((t)/dishLayers*ZAngleSkew(keyID))*((BottomWidth(keyID) -TopWidthDiff(keyID)) - (1-pow(t/dishLayers, WidExpo(keyID)))*(LenFinal(keyID))),
sin((t)/dishLayers*ZAngleSkew(keyID))*((BottomWidth(keyID) -TopWidthDiff(keyID)) - (1-pow(t/dishLayers, WidExpo(keyID)))*(LenFinal(keyID))),
KeyHeight(keyID)+DishDepth(keyID)-(t)/dishLayers*(DishDepth(keyID)) //Z shift
];
function KnullRotation2(t, keyID) =
[
0, //X shift
0, //Y shift
((t)/dishLayers*ZAngleSkew(keyID)) //Z shift
];
function KnullTransform2(t, keyID) =
[
KnullRound0i(keyID)*1,
KnullRound0i(keyID)*2
// pow(t/layers, DishExpo(keyID))*(KnullRound0i(keyID)) + (1-pow(t/dishLayers, DishExpo(keyID)))*KnullRound0f(keyID),
// pow(t/layers, DishExpo(keyID))*(KnullRound1i(keyID)) + (1-pow(t/dishLayers, DishExpo(keyID)))*KnullRound1f(keyID)
];
///----- KEY Builder Module
module keycap(keyID = 0, cutLen = 0, visualizeDish = false, knull = false, rossSection = false, Dish = true, Stem = false, homeDot = false, Stab = false, Stab = 0) {
// //Set Parameters for dish shape
// FrontPath = quantize_trajectories(FrontTrajectory(keyID), steps = stepsize, loop=false, start_position= $t*4);
// BackPath = quantize_trajectories(BackTrajectory(keyID), steps = stepsize, loop=false, start_position= $t*4);
//
// //Scaling initial and final dim tranformation by exponents
// function FrontDishArc(t) = pow((t)/(len(FrontPath)),FrontArcExpo(keyID))*FrontFinArc(keyID) + (1-pow(t/(len(FrontPath)),FrontArcExpo(keyID)))*FrontInitArc(keyID);
// function BackDishArc(t) = pow((t)/(len(FrontPath)),BackArcExpo(keyID))*BackFinArc(keyID) + (1-pow(t/(len(FrontPath)),BackArcExpo(keyID)))*BackInitArc(keyID);
//
// FrontCurve = [ for(i=[0:len(FrontPath)-1]) transform(FrontPath[i], DishShape(DishDepth(keyID), FrontDishArc(i), 1, d = 0)) ];
// BackCurve = [ for(i=[0:len(BackPath)-1]) transform(BackPath[i], DishShape(DishDepth(keyID), BackDishArc(i), 1, d = 0)) ];
//builds
difference(){
union(){
skin([for (i=[0:layers]) transform(translation(CapTranslation(i, keyID)) * rotation(CapRotation(i, keyID)),
circle(CapTransform(i, keyID)))]); //second
if(Dish == true){
skin([for (i=[0:dishLayers]) transform(translation(DishTranslation(i, keyID)) * rotation(DishRotation(i, keyID)),
circle(DishTransform(i, keyID)))]); //top dome
}
}
//Cut
if(knull == true){
for(i = [0:knullNum]){
rotate([0,0,i*360/knullNum])#skin([for (i=[0:layers]) transform(translation(KnullTranslation(i, keyID)) * rotation(KnullRotation(i, keyID)),
ellipse(KnullTransform(i, keyID), d = 0))]); //second
rotate([0,0,i*360/knullNum])mirror([0,1,0])#skin([for (i=[0:layers]) transform(translation(KnullTranslation(i, keyID)) * rotation(KnullRotation(i, keyID)),
ellipse(KnullTransform(i, keyID), d = 0))]); //second
if(Dish == true){
rotate([0,0,i*360/knullNum])#skin([for (i=[0:dishLayers]) transform(translation(KnullTranslation2(i, keyID)) * rotation(KnullRotation2(i, keyID)),
ellipse(KnullTransform2(i, keyID), d = 0))]); //second
rotate([0,0,i*360/knullNum])mirror([0,1,0])#skin([for (i=[0:dishLayers]) transform(translation(KnullTranslation2(i, keyID)) * rotation(KnullRotation2(i, keyID)),
ellipse(KnullTransform2(i, keyID), d = 0))]); //second
}
}
}
}
}
//------------------stems
$fn = fn;
function outer_cherry_stem(slop) = [ stemWid - slop * 2, stemLen - slop * 2];
function outer_cherry_stabilizer_stem(slop) = [4.85 - slop * 2, 6.05 - slop * 2];
function outer_box_cherry_stem(slop) = [6 - slop, 6 - slop];
// .005 purely for aesthetics, to get rid of that ugly crosshatch
function cherry_cross(slop, extra_vertical = 0) = [
// horizontal tine
[4.03 + slop, 1.15 + slop / 3],
// vertical tine
[1.25 + slop / 3, 4.23 + extra_vertical + slop / 3 + .005],
];
module inside_cherry_cross(slop) {
// inside cross
// translation purely for aesthetic purposes, to get rid of that awful lattice
translate([0,0,-0.005]) {
linear_extrude(height = stemCrossHeight) {
square(cherry_cross(slop, extra_vertical)[0], center=true);
square(cherry_cross(slop, extra_vertical)[1], center=true);
}
}
// Guides to assist insertion and mitigate first layer squishing
{
for (i = cherry_cross(slop, extra_vertical)) hull() {
linear_extrude(height = 0.01, center = false) offset(delta = 0.4) square(i, center=true);
translate([0, 0, 0.5]) linear_extrude(height = 0.01, center = false) square(i, center=true);
}
}
}
module cherry_stem(depth, slop) {
D1=.15;
D2=.05;
H1=3.5;
CrossDist = 1.75;
difference(){
// outside shape
linear_extrude(height = depth) {
offset(r=1){
square(outer_cherry_stem(slop) - [2,2], center=true);
}
}
inside_cherry_cross(slop);
hull(){
translate([CrossDist,CrossDist-.1,0])cylinder(d1=D1, d2=D2, H1);
translate([-CrossDist,-CrossDist+.1,0])cylinder(d1=D1, d2=D2, H1);
}
hull(){
translate([-CrossDist,CrossDist-.1])cylinder(d1=D1, d2=D2, H1);
translate([CrossDist,-CrossDist+.1])cylinder(d1=D1, d2=D2, H1);
}
}
}
/// ----- helper functions
function rounded_rectangle_profile(size=[1,1],r=1,fn=32) = [
for (index = [0:fn-1])
let(a = index/fn*360)
r * [cos(a), sin(a)]
+ sign_x(index, fn) * [size[0]/2-r,0]
+ sign_y(index, fn) * [0,size[1]/2-r]
];
function ellipse(axis, d = 0) = [for (t = [0:step:360]) [axis[0]*cos(t), axis[1]*sin(t)*(1+d*cos(t))]]; //shape to
function elliptical_rectangle(a = [1,1], b =[1,1], fn=32) = [
for (index = [0:fn-1]) // section right
let(theta1 = -atan(a[1]/b[1])+ 2*atan(a[1]/b[1])*index/fn)
[b[1]*cos(theta1), a[1]*sin(theta1)]
+ [a[0]*cos(atan(b[0]/a[0])), 0]
- [b[1]*cos(atan(a[1]/b[1])), 0],
for(index = [0:fn-1]) // section Top
let(theta2 = atan(b[0]/a[0]) + (180 -2*atan(b[0]/a[0]))*index/fn)
[a[0]*cos(theta2), b[0]*sin(theta2)]
- [0, b[0]*sin(atan(b[0]/a[0]))]
+ [0, a[1]*sin(atan(a[1]/b[1]))],
for(index = [0:fn-1]) // section left
let(theta3 = -atan(a[1]/b[1])+180+ 2*atan(a[1]/b[1])*index/fn)
[b[1]*cos(theta3), a[1]*sin(theta3)]
- [a[0]*cos(atan(b[0]/a[0])), 0]
+ [b[1]*cos(atan(a[1]/b[1])), 0],
for(index = [0:fn-1]) // section Top
let(theta4 = atan(b[0]/a[0]) + 180 + (180 -2*atan(b[0]/a[0]))*index/fn)
[a[0]*cos(theta4), b[0]*sin(theta4)]
+ [0, b[0]*sin(atan(b[0]/a[0]))]
- [0, a[1]*sin(atan(a[1]/b[1]))]
]/2;
function sign_x(i,n) =
i < n/4 || i > n-n/4 ? 1 :
i > n/4 && i < n-n/4 ? -1 :
0;
function sign_y(i,n) =
i > 0 && i < n/2 ? 1 :
i > n/2 ? -1 :
0;
Reference in a new issue View git blame Copy permalink