OpenSCAD Name Tag Generator + Customizer

gistfile1.txt

name = "Anne-marie";
extra_length = -10;

function getFrameWidth() = (len(name) * (len(name) > 10 ? 8 : 10)) + extra_length;

translate([0, -4, 0])
linear_extrude(height=5)
	text(name);

	
difference() {
	$fn=100;

	
	difference() {
		hull() {
			cylinder(h=5, d=16);
			translate([getFrameWidth(), 0, 0])
				cylinder(h=5, d=16);
		}
		
		translate([0, 0, 3.1])
		hull() {
			cylinder(h=3, d=14);
			translate([getFrameWidth(), 0, 0])
				cylinder(h=3, d=14);
		}
		
	}

	translate([getFrameWidth(), 0, -2])
		cylinder(h=8, d=14);
}