Commits

Trammell Hudson committed 13af312

Top and bottom work now

Comments (0)

Files changed (1)

 
 # Compute the height of the interior triangle
 my $interior_angle = 360.0 / $sides;
-my $interior_len = $edge - $thickness;
+my $interior_len = $edge - $thickness * 2;
 my $interior_radius = ($interior_len/2) / tan(deg2rad($interior_angle/2));
 
 
 print <<"";
 <!-- Created with boxer (http://trmm.net/) -->
 <svg xmlns="http://www.w3.org/2000/svg">
-<g transform="scale(3.543307)">
+<g transform="scale(3.543307)"><!-- scale to mm -->
 
 
 #
 	my $hx = $interior_len / 2;
 
 	# Put one tab in the middle
-	my $tab_x1 = $hx - $tab_width/2 - $kerf;
-	my $tab_x2 = $hx + $tab_width/2 + $kerf;
+	my $tab_x1 = $edge/2 - $tab_width/2 - $kerf - $thickness/2;
+	my $tab_x2 = $edge/2 + $tab_width/2 + $kerf - $thickness/2;
 
 	print <<"";
 	<g