One Gold Bar

thingiverse

Make one bar gold in OpenSCAD: /* 1gram GOLD bar */ l=5; L=8; h=1.83632430644; inset = 0.003; circle_h = 0.005; epsilon = 0.001; gold_y = 2; top_x= (l/2)-1.324016564; // top_x=1.175983436 bottom_x= l-top_x; // bottom_x=3.824016564 L_R_h= L-top_x; // L_R_h=6.824016564 Points=[[0,0,0],[l,0,0],[bottom_x,top_x,h],[top_x,top_x,h],[top_x,L_R_h,h],[0,L,0],[l,L,0],[bottom_x,L_R_h,h]]; Paths=[ [3,2,1,0], [0,5,4,3], [5,6,7,4], [6,1,2,7], [2,3,4,7], [0,1,6,5] ]; module text_w() { translate([0,gold_y,h-inset]) resize([1,l/10,0]) linear_extrude(height=inset+epsilon) text("GOLD", font ="Times New Roman:style=Bold" , halign="center", valign="center"); translate([0,-gold_y,h-inset]) resize([1,0.5,0]) linear_extrude(height=inset+epsilon) text("1g", font ="Arial:style=Bold", halign="center"); translate([0,-gold_y-(l/9),h-inset]) resize([1,0.4,0]) linear_extrude(height=inset+epsilon) text("0,035274 oz", font ="Courier 10 Pitch:style=Bold Italic", halign="center"); } module Turn_Gold() { difference(){ resize([1.6,1.2,0]) cylinder(h=circle_h, r=5, $fn=500); translate([0,0,-epsilon]) resize([1.4,1,0]) cylinder(h=circle_h + 2*epsilon, r=2, $fn=500); } translate([0,-1.081*gold_y,0]) cube(size=[2,2,0.093], center=true); } union(){ translate([0,-gold_y+h,h-0.048]) resize([2,2,0.05]){ surface(file = "3m_Grbiss_prep.png", center=true); } } module objet(){ translate([-l/2,-L/2,0]) polyhedron(points=Points, faces=Paths); } difference(){ objet(); text_w(); translate([0,gold_y,h-0.001]){ Turn_Gold(); } }