$fn = 20;

base_height = 1;
base_radius = 10;

pipe_height = 10;
pipe_radius = 2;

main_radius = base_radius - 2;
main_height = 50;

needle_radius = 0.5;
needle_height = 40;

cylinder(r = base_radius, h = base_height);
translate([0, 0, base_height]) {
	cylinder(r = pipe_radius, h = pipe_height);
	translate([0, 0, pipe_height]) {
		cylinder(r = main_radius, h = main_height);
		translate([0, 0, needle_height]) {
			cylinder(r = needle_radius, h = needle_height, $fn=10);
		}
	}
}