//use //for cheaper minwoski use use use use use use use use /*DES (Distorted Elliptical Saddle) Sculpted Profile for 6x3 and corne thumb Version 2: Eliptical Rectangle version 3: fine tune shapes TODOs: 1. cylinderical stem and transform to top surface 2. modify inner cut to have two thickness parameters 3. fragile things? cuts from knobs */ //#square([18.16, 18.16], center = true); //#difference(){ // translate([0,0,(KeyHeight(capID)+5)/2+.08])cube([30, 30, KeyHeight(capID)+5],center = true ); // translate([11,11,0])cylinder(d=4,20, center = true); // translate(-[11,11,0])cylinder(d=4,20, center = true); // translate([-11,11,0])cylinder(d=4,20, center = true); //} //#mirror([0,0,0])translate([0,0,1.95])keycap(keyID = capID, cutLen = 0, Stem =false, Dish = true, Stab = 0 , visualizeDish = false, crossSection = false, homeDot = false, Legends = false); //bottom cast param capID = 3; difference(){ mx_stem_cavity(name = "custom", xu=1, yu=1, sz = 11)translate([0,0,-.1])mirror([0,0,0]) keycap(keyID = capID, cutLen = 0, Stem =true, Dish = false, Stab = 0 , visualizeDish = false, crossSection = false, homeDot = false, Legends = false); translate([0,-30,-25]) cube([60,60,50]); // cut check } //#keycap(keyID = capID, cutLen = 0, Stem =false, Dish = false, Stab = 0 , visualizeDish = false, crossSection = false, homeDot = false, Legends = false); //Parameters wallthickness = 2; topthickness = 3; // stepsize = 30; //resolution of Trajectory step = 6; //resolution of ellipes fn = 16; //resolution of Rounded Rectangles: 60 for output layers = 50; //resolution of vertical Sweep: 50 for output dotRadius = 1.25; //home dot size //---Stem param slop = 0.3; stemRot = 0; stemWid = 7.2; stemLen = 5.5; stemCrossHeight = 5.0; extra_vertical = 0.6; StemBrimDep = 0.75; stemLayers = 20; //resolution of stem to cap top transition proHeight = 3.5; dishLayers = 30; Dcyl = 5.6; draftAngle = 0; //degree note:Stem Only stemsupportLimit = 8.5; keyParameters = //keyParameters[KeyID][ParameterID] [ // BotWid, BotLen, TWDif, TLDif, keyh, WSft, LSft XSkew, YSkew, ZSkew, WEx, LEx, CapR0i, CapR0f, CapR1i, CapR1f, CapREx, StemEx [17.16, 17.16, 8.0, 5.5, 8.5+proHeight, 0, 0, -5, 0, -0, 2, 2, 1, 3.999, 1, 5, 2, 2], //R5 [17.96, 17.96, 8.0, 8.0, 7.8+proHeight, 0, 0, 10, 0, -0, 2, 2, .1, 3.999, .1, 3.399, 2, 2], //R4 [17.96, 17.96, 8.0, 8.0, 7.8+proHeight, 0, .5, -10, 0, -0, 2, 2, .1, 3.399, .1, 3.399, 2, 2], //R3 [17.96, 17.96, 8.0, 8.0,10.8+proHeight, 0, 0, -16, 0, -0, 2, 2, .1, 3.399, .1, 3.399, 2, 2], //R2 [17.96, 17.96, 8.0, 8.0, 8.0+proHeight, 0, .5, -10, 0, -0, 2, 2, .1, 3.399, .1, 3.399, 2, 2], //R3 home ]; dishParameters = //dishParameter[keyID][ParameterID] [ //FFwd1 FFwd2 FPit1 FPit2 DshDep DshHDif FArcIn FArcFn FArcEx BFwd1 BFwd2 BPit1 BPit2 BArcIn BArcFn BArcEx //higt corne thumb [ 8, 4.5, 7, -39, 4, 1.8, 9.5, 15, 2, 10, 4, 8, -30, 9.5, 20, 2], //R5 [ 5, 4.3, 5, -48, 5, 2, 10.5, 10, 2, 6, 4, 13, -30, 10.5, 18, 2], //R5 [ 5, 4.3, 5, -48, 4, 1.9, 11, 12, 2, 6, 4, 13, -35, 11, 28, 2], //R5 [ 8, 5.0, 7, -39, 4, 1.9, 9.5, 15, 2, 10, 4, 8, -30, 9.5, 20, 2], //R5 [ 5, 4.8, 5, -48, 5, 2.2, 10.5, 10, 2, 6, 4, 13, -30, 10.5, 18, 2], //R5 [ 5, 4.8, 5, -48, 4, 2.0, 11, 12, 2, 6, 4, 13, -35, 11, 28, 2], //R5 // low pro 3 row system [ 6, 3, 18, -50, 5, 1.8, 8.8, 15, 2, 5, 4.4, 5, -55, 8.8, 15, 2], //R4 [ 6, 3, 18, -50, 5, 1.8, 8.5, 15, 2, 5, 3.5, 8, -55, 8.5, 15, 2], //R3 [ 6, 3, 10, -50, 5, 1.8, 8.8, 15, 2, 6, 4, 13, 30, 8.8, 16, 2], //R2 [ 5.5, 2.8, 23, -50, 5, 1.8, 8.5, 15, 2, 5, 3.3, 13, -55, 8.5, 15, 2], //R3 deep //kyria [ 13, 4.5, 7, -39, 4, 1.8, 9.5, 15, 2, 13, 4, 8, -30, 9.5, 20, 2], //T1R1 2u [ 5, 4.4, 5, -48, 5, 2, 10.5, 10, 2, 6, 4, 2, -30, 10.5, 18, 2], //T0R1 1u [ 5, 4.3, 5, -48, 5, 2, 10.5, 10, 2, 6, 4, 2, -30, 10.5, 18, 2], //T0R2 1u [ 13, 4.5, 7, -39, 4, 1.8, 9.5, 15, 2, 13, 4, 8, -30, 9.5, 20, 2], //T1R1 2u [ 5, 4.4, 5, -48, 4, 1.9, 11, 12, 2, 5.5, 3.5, 8, -50, 11, 28, 2], //T1R1 1u [ 5, 4.3, 5, -48, 5, 2, 10.5, 10, 2, 6, 4, 2, -30, 10.5, 18, 2], //T1R2 1u [ 5, 4.4, 5, -48, 4, 1.9, 11, 12, 2, 6, 4, 13, -35, 11, 28, 2], //T2R1 [ 5, 4.4, 5, -48, 4, 1.9, 11, 12, 2, 6, 4, 13, -35, 11, 28, 2], //T3R1 //heavy [ 6, 3, -5, -50, 5, 1.8, 8.8, 15, 2, 6, 3.5, 13, -50, 8.8, 16, 2], //R5 [ 6, 3, 18, -50, 5, 1.8, 8.8, 15, 2, 5, 4.4, 5, -55, 8.8, 15, 2], //R4 [ 6, 3, 18, -55, 5, 1.8, 8.8, 15, 2, 5, 3.5, 8, -55, 8.8, 15, 2], //R3 [ 6, 3, 10, -50, 5, 1.8, 8.8, 15, 2, 5, 4, 12, -55, 8.8, 16, 2], //R2 [ 5, 3.5, 8, -50, 5, 1.9, 8.8, 15, 2, 6, 4, 13, 30, 8.8, 16, 2], //R1 [ 5.5, 2.8, 23, -50, 5, 1.8, 8.5, 15, 2, 5, 3.3, 13, -55, 8.5, 15, 2], //R3 deep // 1.25 [ 6, 3, -5, -50, 5, 1.8, 12.4, 18, 2, 6, 3.5, 13, -50, 12.4, 19, 2], //R5 [ 6, 3, 18, -50, 5, 1.8, 12.4, 20, 2, 5, 4.4, 5, -55, 12.4, 19, 2], //R4 [ 6, 3, 18, -55, 5, 1.8, 12.4, 18, 2, 5, 3.7, 8, -55, 12.4, 19, 2], //R3 [ 6, 3, 10, -50, 5, 1.8, 12.4, 18, 2, 5, 4, 12, -55, 12.4, 19, 2], //R2 [ 5, 3.5, 8, -50, 5, 1.9, 12.5, 18, 2, 6, 4, 13, 30, 12.5, 19, 2], //R1 //1.5 [ 6, 3, -5, -50, 5, 1.8, 15.5, 22, 2, 6, 3.5, 13, -50, 15.5, 22, 2], //R5 [ 6, 3, 18, -50, 5, 1.8, 15.5, 27.2, 2, 5, 4.4, 5, -55, 15.5, 22, 2], //R4 [ 6, 3, 18, -55, 5, 1.8, 15.5, 22, 2, 5, 3.7, 8, -55, 15.5, 22, 2], //R3 [ 6, 3, 10, -50, 5, 1.8, 15.7, 22, 2, 5, 4, 12, -55, 15.7, 23, 2], //R2 [ 5, 3.5, 8, -50, 5, 1.9, 15.7, 22, 2, 6, 4, 13, 30, 15.7, 23.5, 2], //R1 //1.75 [ 6, 3, -5, -50, 5, 1.8, 18.7, 25, 2, 6, 3.5, 13, -50, 18.7, 25, 2], //R5 [ 6, 3, 17, -50, 5, 1.8, 18.7, 32, 2, 5, 4.4, 5, -55, 18.7, 25, 2], //R4 [ 6, 3, 17, -55, 5, 1.8, 18.7, 27, 2, 5, 3.8, 8, -55, 18.7, 25, 2], //R3 [ 6, 3, 10, -50, 5, 1.8, 18.7, 25, 2, 5, 4, 12, -55, 18.7, 28, 2], //R2 [ 5, 3.7, 8, -50, 5, 1.9, 18.8, 25, 2, 6, 4, 12, 30, 18.8, 28, 2], //R1 //2 [ 6, 3, -5, -50, 5, 1.8, 21.9, 30, 2, 6, 3.5, 13, -50, 21.9, 31, 2], //R5 [ 6, 3, 15, -50, 5, 1.8, 21.9, 34, 2, 5, 4.4, 5, -55, 21.9, 31, 2], //R4 [ 6, 3, 17, -55, 5, 1.8, 21.9, 32.5, 2, 5, 3.7, 8, -55, 21.9, 31, 2], //R3 [ 6, 3, 10, -50, 5, 1.8, 21.9, 30, 2, 5, 4, 11.5, -55, 21.9, 33, 2], //R2 [ 5, 3.7, 8, -50, 5, 1.9, 22.1, 30, 2, 6, 4, 12, 30, 22.1, 33.5, 2], //R1 //mild [ 6, 3, -5, -35, 5, 1.8, 8.8, 15, 2, 6, 3.5, 13, -50, 8.8, 16, 2], //R5 [ 6, 3, 15, -55, 5, 1.8, 8.8, 15, 2, 5, 4.4, 5, -55, 8.8, 15, 2], //R4 [ 5, 3.5, 8, -55, 5, 1.8, 8.8, 15, 2, 5, 3.8, 8, -55, 8.8, 15, 2], //R3 [ 5, 4.4, 5, -55, 5, 1.8, 8.8, 15, 2, 6, 3, 15, -55, 8.8, 15, 2], //R2 [ 5, 3.5, 8, -50, 5, 1.8, 8.8, 15, 2, 6, 4, 13, 30, 8.8, 16, 2], //R1 [ 5, 3.3, 15, -55, 5, 1.8, 8.5, 15, 2, 5, 3.3, 15, -55, 8.5, 15, 2], //R3 deep // 1.25 [ 6, 3, -5, -50, 5, 1.8, 12.4, 18, 2, 6, 3.5, 13, -50, 12.4, 19, 2], //R5 [ 6, 3, 18, -50, 5, 1.8, 12.4, 20, 2, 5, 4.6, 5, -55, 12.4, 19, 2], //R4 [ 6, 3, 18, -55, 5, 1.8, 12.4, 18, 2, 5, 3.9, 8, -55, 12.4, 19, 2], //R3 [ 6, 3, 10, -50, 5, 1.8, 12.4, 18, 2, 5, 4, 12, -55, 12.4, 19, 2], //R2 [ 5, 3.8, 8, -50, 5, 1.9, 12.5, 18, 2, 6, 4, 13, 30, 12.5, 19, 2], //R1 //1.5 [ 6, 3, -5, -50, 5, 1.8, 15.5, 22, 2, 6, 3.5, 13, -50, 15.5, 22, 2], //R5 [ 6, 3, 18, -50, 5, 1.8, 15.5, 27.2, 2, 5, 4.4, 5, -55, 15.5, 22, 2], //R4 [ 6, 3, 18, -55, 5, 1.8, 15.5, 22, 2, 5, 3.9, 8, -55, 15.5, 22, 2], //R3 [ 6, 3, 10, -50, 5, 1.8, 15.7, 22, 2, 5, 4, 12, -55, 15.7, 23, 2], //R2 [ 5, 3.9, 8, -50, 5, 1.9, 15.7, 22, 2, 6, 4, 13, 30, 15.7, 23.5, 2], //R1 //1.75 [ 6, 3.2, -5, -50, 5, 1.8, 18.7, 25, 2, 6, 3.5, 13, -50, 18.7, 25, 2], //R5 [ 6, 3, 17, -50, 5, 1.8, 18.7, 32, 2, 5, 4.4, 5, -55, 18.7, 25, 2], //R4 [ 6, 3, 17, -55, 5, 1.8, 18.7, 27, 2, 5, 3.9, 8, -55, 18.7, 25, 2], //R3 [ 6, 3, 10, -50, 5, 1.8, 18.7, 25, 2, 5, 4, 12, -55, 18.7, 28, 2], //R2 [ 5, 3.9, 8, -50, 5, 1.9, 18.8, 25, 2, 6, 4, 12, 30, 18.8, 28, 2], //R1 //2 [ 6, 3.1, -5, -50, 5, 1.8, 21.9, 30, 2, 6, 3.5, 13, -50, 21.9, 31, 2], //R5 [ 6, 3, 15, -50, 5, 1.8, 21.9, 34, 2, 5, 4.4, 5, -55, 21.9, 31, 2], //R4 [ 6, 3, 17, -55, 5, 1.8, 21.9, 32.5, 2, 5, 3.9, 8, -55, 21.9, 31, 2], //R3 [ 6, 3, 10, -50, 5, 1.8, 21.9, 30, 2, 5, 4, 11.5, -55, 21.9, 33, 2], //R2 [ 5, 3.9, 8, -50, 5, 1.9, 22.1, 30, 2, 6, 4, 12, 30, 22.1, 33.5, 2], //R1 ]; function FrontForward1(keyID) = dishParameters[keyID][0]; // function FrontForward2(keyID) = dishParameters[keyID][1]; // function FrontPitch1(keyID) = dishParameters[keyID][2]; // function FrontPitch2(keyID) = dishParameters[keyID][3]; // function DishDepth(keyID) = dishParameters[keyID][4]; // function DishHeightDif(keyID) = dishParameters[keyID][5]; // function FrontInitArc(keyID) = dishParameters[keyID][6]; function FrontFinArc(keyID) = dishParameters[keyID][7]; function FrontArcExpo(keyID) = dishParameters[keyID][8]; function BackForward1(keyID) = dishParameters[keyID][9]; // function BackForward2(keyID) = dishParameters[keyID][10]; // function BackPitch1(keyID) = dishParameters[keyID][11]; // function BackPitch2(keyID) = dishParameters[keyID][12]; // function BackInitArc(keyID) = dishParameters[keyID][13]; function BackFinArc(keyID) = dishParameters[keyID][14]; function BackArcExpo(keyID) = dishParameters[keyID][15]; 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 CapRound0i(keyID) = keyParameters[keyID][12]; function CapRound0f(keyID) = keyParameters[keyID][13]; function CapRound1i(keyID) = keyParameters[keyID][14]; function CapRound1f(keyID) = keyParameters[keyID][15]; function ChamExponent(keyID) = keyParameters[keyID][16]; function StemExponent(keyID) = keyParameters[keyID][17]; 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) = [ ((1-t)/layers*TopWidShift(keyID)), //X shift ((1-t)/layers*TopLenShift(keyID)), //Y shift (t/layers*KeyHeight(keyID)) //Z shift ]; function InnerTranslation(t, keyID) = [ ((1-t)/layers*TopWidShift(keyID)), //X shift ((1-t)/layers*TopLenShift(keyID)), //Y shift (t/layers*(KeyHeight(keyID)-topthickness)) //Z shift ]; function CapRotation(t, keyID) = [ ((1-t)/layers*XAngleSkew(keyID)), //X shift ((1-t)/layers*YAngleSkew(keyID)), //Y shift ((1-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 CapRadius(t, keyID) = pow(t/layers, ChamExponent(keyID))*ChamfFinRad(keyID) + (1-pow(t/layers, ChamExponent(keyID)))*ChamfInitRad(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+1.25), pow(t/layers, LenExponent(keyID))*(BottomLength(keyID)-TopLenDiff(keyID)-wallthickness*2) + (1-pow(t/layers, LenExponent(keyID)))*(BottomLength(keyID)-wallthickness*2+1.25) ]; function StemTranslation(t, keyID) = [ ((1-t)/stemLayers*TopWidShift(keyID)), //X shift ((1-t)/stemLayers*TopLenShift(keyID)), //Y shift stemCrossHeight+.1+StemBrimDep + (t/stemLayers*(KeyHeight(keyID)- topthickness - stemCrossHeight+.1 -StemBrimDep)) //Z shift ]; function StemRotation(t, keyID) = [ ((1-t)/stemLayers*XAngleSkew(keyID)), //X shift ((1-t)/stemLayers*YAngleSkew(keyID)), //Y shift ((1-t)/stemLayers*ZAngleSkew(keyID)) //Z shift ]; function StemTransform(t, keyID) = [ pow(t/stemLayers, WidExponent(keyID))*(BottomWidth(keyID) -TopLenDiff(keyID)-wallthickness*2) + (1-pow(t/stemLayers, WidExponent(keyID)))*(Dcyl+sin(draftAngle)*(StemBrimDep)), pow(t/stemLayers, LenExponent(keyID))*(BottomLength(keyID)-TopLenDiff(keyID)-wallthickness*2) + (1-pow(t/stemLayers, LenExponent(keyID)))*(Dcyl+sin(draftAngle)*(StemBrimDep)) ]; function StemRoundness(t, keyID) = [ pow(t/stemLayers, ChamExponent(keyID))*(CapRound0f(keyID)) + (1-pow(t/stemLayers, ChamExponent(keyID)))*Dcyl+sin(draftAngle)*(stemCrossHeight+.1+StemBrimDep), pow(t/stemLayers, ChamExponent(keyID))*(CapRound1f(keyID)) + (1-pow(t/stemLayers, ChamExponent(keyID)))*Dcyl+sin(draftAngle)*(stemCrossHeight+.1+StemBrimDep) ]; function periodic(a) = sign(a); function elliptical_rectangle_position(a = [1,1], b =[1,1], fn=32, phase = 0) = [ //x (phase > -atan(a[1]/b[1]) && phase <= atan(a[1]/b[1])) ? //IV->I quadtrant right (b[1]*cos(phase)+ a[0]*cos(atan(b[0]/a[0])) - b[1]*cos(atan(a[1]/b[1])))/2 : (phase > atan(a[1]/b[1]) && phase <= 3*atan(a[1]/b[1])) ? // I->II top (a[0]*cos(atan(b[0]/a[0])-atan(a[1]/b[1])+phase))/2: (phase > 3*atan(a[1]/b[1]) && phase <= 5*atan(a[1]/b[1])-atan(b[0]/a[0])) ? // II->III left (b[1]*cos(phase-2*atan(a[1]/b[1])+2*atan(b[0]/a[0]))-a[0]*cos(atan(b[0]/a[0]))+b[1]*cos(atan(a[1]/b[1])))/2: (phase > 5*atan(a[1]/b[1])-atan(b[0]/a[0]) && phase <= 7*atan(a[1]/b[1])) ? //III->IV (a[0]*cos(phase-3*atan(a[1]/b[1])+3*atan(b[0]/a[0])))/2:0, //y (phase > -atan(a[1]/b[1]) && phase <= atan(a[1]/b[1])) ? //IV->I quadtrant right (a[1]*sin(phase))/2 : (phase > atan(a[1]/b[1]) && phase <= atan(a[1]/b[1])*3) ? // I->II top (b[0]*sin(atan(b[0]/a[0])-atan(a[1]/b[1])+phase)-b[0]*sin(atan(b[0]/a[0]))+a[1]*sin(atan(a[1]/b[1])))/2: (phase > atan(a[1]/b[1])*3 && phase <= 5*atan(a[1]/b[1])-atan(b[0]/a[0])) ? // II->III left (a[1]*sin(phase-2*atan(a[1]/b[1])+2*atan(b[0]/a[0])))/2: (phase > 5*atan(a[1]/b[1])-atan(b[0]/a[0]) && phase <= 7*atan(a[1]/b[1])) ? //III->IV (b[0]*sin(phase-3*atan(a[1]/b[1])+3*atan(b[0]/a[0]))+b[0]*sin(atan(b[0]/a[0]))-a[1]*sin(atan(a[1]/b[1])))/2:0, //z 0 ]; function rotationMat(x,theta) = [ x[0],// + x[0]*cos(theta[1]) + x[2]*sin(theta[1]) + x[0]*cos(theta[2]) - x[1]*sin(theta[2]), //x x[1],// + x[1]*cos(theta[0]) - x[2]*sin(theta[0]) + + x[0]*sin(theta[2]) + x[1]*cos(theta[2]), //y x[1]*sin(theta[0]) + x[2]*cos(theta[0]) +-x[0]*sin(theta[1]) + x[2]*cos(theta[1])+ x[2], //z ]; function KurlPathTransform(t, keyID) = [ pow(t/layers, WidExponent(keyID))*(BottomWidth(keyID) -TopLenDiff(keyID)-wallthickness*2) + (1-pow(t/layers, WidExponent(keyID)))*(BottomWidth(keyID) -wallthickness*2+1.25), pow(t/layers, LenExponent(keyID))*(BottomLength(keyID)-TopLenDiff(keyID)-wallthickness*2) + (1-pow(t/layers, LenExponent(keyID)))*(BottomLength(keyID)-wallthickness*2+1.25) ]; function KurlTranslation(t, w, phi, keyID) = [//top surface translation ((1-t)/layers*TopWidShift(keyID)), ((1-t)/layers*TopLenShift(keyID)), (t/layers*(KeyHeight(keyID)-topthickness)) //Z shift ] + rotationMat( //rotation offset elliptical_rectangle_position( a = KurlPathTransform(t, keyID), b = CapRoundness(t, keyID), fn=fn, phase = phi+w*t ), KurlRotation(t, keyID) ); function KurlRotation(t, keyID) = //rotate shape [ ((1-t)/layers*XAngleSkew(keyID)), //X shift ((1-t)/layers*YAngleSkew(keyID)), //Y shift ((1-t)/layers*ZAngleSkew(keyID)) //Z shift ]; ///----- KEY Builder Module module keycap(keyID = 0, cutLen = 0, visualizeDish = false, rossSection = false, Dish = true, Stem = false, Kurl = true, crossSection = true,Legends = false, homeDot = 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 if(Stem == false){ difference(){ skin([for (i=[0:layers-1]) transform(translation(CapTranslation(i, keyID)) * rotation(CapRotation(i, keyID)), elliptical_rectangle(CapTransform(i, keyID), b = CapRoundness(i,keyID),fn=fn))]); //outer shell //cuts if(Dish == true){ if(visualizeDish == false){ translate([-TopWidShift(keyID),.00001-TopLenShift(keyID),KeyHeight(keyID)-DishHeightDif(keyID)])rotate([0,-YAngleSkew(keyID),0])rotate([0,-90+XAngleSkew(keyID),90-ZAngleSkew(keyID)])skin(FrontCurve); translate([-TopWidShift(keyID),-TopLenShift(keyID),KeyHeight(keyID)-DishHeightDif(keyID)])rotate([0,-YAngleSkew(keyID),0])rotate([0,-90-XAngleSkew(keyID),270-ZAngleSkew(keyID)])skin(BackCurve); } else { #translate([-TopWidShift(keyID),.00001-TopLenShift(keyID),KeyHeight(keyID)-DishHeightDif(keyID)]) rotate([0,-YAngleSkew(keyID),0])rotate([0,-90+XAngleSkew(keyID),90-ZAngleSkew(keyID)])skin(FrontCurve); #translate([-TopWidShift(keyID),-TopLenShift(keyID),KeyHeight(keyID)-DishHeightDif(keyID)])rotate([0,-YAngleSkew(keyID),0])rotate([0,-90-XAngleSkew(keyID),270-ZAngleSkew(keyID)])skin(BackCurve); } } if(crossSection == true) { translate([0,-15,-.1])cube([15,30,15]); } } //Homing dot if(homeDot == true)translate([0,0,KeyHeight(keyID)-DishHeightDif(keyID)-.25])sphere(d = dotRadius); } else { difference(){ union(){ translate([0,0,-.001])skin([for (i=[0:layers-1]) transform(translation(InnerTranslation(i, keyID)) * rotation(CapRotation(i, keyID)), elliptical_rectangle(InnerTransform(i, keyID), b = CapRoundness(i,keyID),fn=fn))]); // hull(){// cherry top housing // translate([0,0,-.0])cube([14.5, 14, .1],center = true); // translate([0,0,5.])cube([11,11, .1],center = true); // } } // #translate([0,0,StemBrimDep])cherry_stem(KeyHeight(keyID)-StemBrimDep, slop); // generate mx cherry stem if(KeyHeight(keyID) > stemsupportLimit) //only generate stem to top surface support when there is enough room translate([0,0,-.001])skin([for (i=[0:stemLayers-1]) transform(translation(StemTranslation(i,keyID))*rotation(StemRotation(i, keyID)), elliptical_rectangle(StemTransform(i, keyID), b = StemRoundness(i,keyID),fn=fn))]); // if(Kurl == true){//t, w, phi, keyID for(n = [-1:10]){ // #skin([for (i=[0:layers-1]) transform(translation(KurlTranslation(i,0/layers,70*n,keyID)) * rotation(CapRotation(i, keyID)),circle(.5/*+.1*sin(5*360/layers*i)*/))]); // skin([for (i=[0:layers-1]) transform(translation(KurlTranslation(i,-45/layers,500-50*n,keyID)) * rotation(CapRotation(i, keyID)),circle(.5/*+.1*sin(5*360/layers*i)*/))]); } // elliptical_rectangle_position(InnerTransform(i, keyID), b = CapRoundness(i,keyID), fn=fn, phase = i*5); // } } } } //------------------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.15) square(i, center=true); translate([0, 0, 0.15]) 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); // } // } cylinder(d1 = Dcyl, d2= Dcyl+sin(draftAngle)*depth, depth, $fn = fn*4); rotate([0,0,stemRot])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); // } } } module choc_stem() { translate([5.7/2,0,-3.4/2+2])difference(){ cube([1.25,3, 3.4], center= true); translate([3.9,0,0])cylinder(d=7,3.4,center = true); translate([-3.9,0,0])cylinder(d=7,3.4,center = true); } translate([-5.7/2,0,-3.4/2+2])difference(){ cube([1.25,3, 3.4], center= true); translate([3.9,0,0])cylinder(d=7,3.4,center = true); translate([-3.9,0,0])cylinder(d=7,3.4,center = true); } } /// ----- 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 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(theta2 = -atan(a[1]/b[1])+180+ 2*atan(a[1]/b[1])*index/fn) [b[1]*cos(theta2), a[1]*sin(theta2)] - [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 + (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]))] ]/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;