discuss@lists.openscad.org

OpenSCAD general discussion Mailing-list

View all threads

Re: create a beveled edge - complicated?

SP
Sanjeev Prabhakar
Tue, Apr 26, 2022 3:23 PM

you can also try following code:

include<dependencies.scad>
sec=sqr([35,35]);
path=pts([[-1.5,1.5],[0,5],[1,1.5],[0,.5]]);
prism=prism(sec,path);
difference(){
cube([35,25,8]);
swp(prism);
}

dependencies.scad file can be downloaded from
https://github.com/sprabhakar2006/openSCAD

On Mon, 25 Apr 2022 at 15:50, Jan Öhman via Discuss <
discuss@lists.openscad.org> wrote:

---------- Forwarded message ----------
From: "Jan Öhman" jan_ohman@yahoo.com
To: OpenSCAD General Discussion discuss@lists.openscad.org
Cc:
Bcc:
Date: Mon, 25 Apr 2022 10:19:30 +0000 (UTC)
Subject: [OpenSCAD] create a beveled edge - complicated?
HI!
I want to create a bevelled edge on a wall.
at first I thought of making a rounded edge (easier), but then I got stuck
for a bevelled edge.
has created a small example below.

The problem I experience is the inside corner - it will not be good.

=====================

cubeD=25;
cubeW=35;
cubeH=8;
wall=3;
diff1=5;

difference()
{
// the Box
difference()
{  cube([cubeW, cubeD, cubeH]);
translate([wall/2, wall/2, wall/2])
cube([cubeW-wall, cubeD+wall, cubeH]);
}

// beveled edge1
translate([cubeW-wall/2, cubeD-wall/2, cubeH])
rotate([90, 90, 0])
cylinder(h=cubeD-wall, d=3, $fn=3);

// beveled edge2
translate([wall/2, cubeD-wall/2, cubeH])
rotate([90, 90, 0])
cylinder(h=cubeD-wall, d=3, $fn=3);

// beveled edge3
translate([wall/2, wall/2, cubeH])
rotate([0, 90, 0])
cylinder(h=cubeW-wall, d=3, $fn=3);
}

---==============

Have also tested a cylinder method - but the angles were awful to handle.

---==============
hull()
{
translate([10,0,10])

   rotate([45,0,0])
     rotate([90,90,0])
       cylinder(h=0.01, d=3, $fn=3);

 translate([10,30,10])
  rotate([45,0,0])
     rotate([90,90,0])
       cylinder(h=0.01, d=3, $fn=3);

}

---==============

the circle method below doesn't work at all

---==============
translate([10,10,10])
rotate([45,0,0])
rotate([90,90,0])
linear_extrude(cubeD-wall)
circle(d=3,$fn=3);

---------- Forwarded message ----------
From: "Jan Öhman via Discuss" discuss@lists.openscad.org
To: OpenSCAD General Discussion discuss@lists.openscad.org
Cc: "Jan Öhman" jan_ohman@yahoo.com
Bcc:
Date: Mon, 25 Apr 2022 10:19:30 +0000 (UTC)
Subject: [OpenSCAD] create a beveled edge - complicated?


OpenSCAD mailing list
To unsubscribe send an email to discuss-leave@lists.openscad.org

you can also try following code: include<dependencies.scad> sec=sqr([35,35]); path=pts([[-1.5,1.5],[0,5],[1,1.5],[0,.5]]); prism=prism(sec,path); difference(){ cube([35,25,8]); swp(prism); } dependencies.scad file can be downloaded from https://github.com/sprabhakar2006/openSCAD On Mon, 25 Apr 2022 at 15:50, Jan Öhman via Discuss < discuss@lists.openscad.org> wrote: > > > > ---------- Forwarded message ---------- > From: "Jan Öhman" <jan_ohman@yahoo.com> > To: OpenSCAD General Discussion <discuss@lists.openscad.org> > Cc: > Bcc: > Date: Mon, 25 Apr 2022 10:19:30 +0000 (UTC) > Subject: [OpenSCAD] create a beveled edge - complicated? > HI! > I want to create a bevelled edge on a wall. > at first I thought of making a rounded edge (easier), but then I got stuck > for a bevelled edge. > has created a small example below. > > The problem I experience is the inside corner - it will not be good. > > ===================== > > > cubeD=25; > cubeW=35; > cubeH=8; > wall=3; > diff1=5; > > > difference() > { > // the Box > difference() > { cube([cubeW, cubeD, cubeH]); > translate([wall/2, wall/2, wall/2]) > cube([cubeW-wall, cubeD+wall, cubeH]); > } > > // beveled edge1 > translate([cubeW-wall/2, cubeD-wall/2, cubeH]) > rotate([90, 90, 0]) > cylinder(h=cubeD-wall, d=3, $fn=3); > > // beveled edge2 > translate([wall/2, cubeD-wall/2, cubeH]) > rotate([90, 90, 0]) > cylinder(h=cubeD-wall, d=3, $fn=3); > > // beveled edge3 > translate([wall/2, wall/2, cubeH]) > rotate([0, 90, 0]) > cylinder(h=cubeW-wall, d=3, $fn=3); > } > =============================================== > > > Have also tested a cylinder method - but the angles were awful to handle. > =============================================== > hull() > { > translate([10,0,10]) > > rotate([45,0,0]) > rotate([90,90,0]) > cylinder(h=0.01, d=3, $fn=3); > > translate([10,30,10]) > rotate([45,0,0]) > rotate([90,90,0]) > cylinder(h=0.01, d=3, $fn=3); > } > =============================================== > > > the circle method below doesn't work at all > =============================================== > translate([10,10,10]) > rotate([45,0,0]) > rotate([90,90,0]) > linear_extrude(cubeD-wall) > circle(d=3,$fn=3); > > > > > ---------- Forwarded message ---------- > From: "Jan Öhman via Discuss" <discuss@lists.openscad.org> > To: OpenSCAD General Discussion <discuss@lists.openscad.org> > Cc: "Jan Öhman" <jan_ohman@yahoo.com> > Bcc: > Date: Mon, 25 Apr 2022 10:19:30 +0000 (UTC) > Subject: [OpenSCAD] create a beveled edge - complicated? > _______________________________________________ > OpenSCAD mailing list > To unsubscribe send an email to discuss-leave@lists.openscad.org >