screw-recess-test: numbers

diff --git a/.gitignore b/.gitignore
index 7a1b620177b895183a6c2c5304acd1550c8b9379..c4a28c1892380d9e305431949a3687239e757a6f 100644 (file)
--- a/.gitignore
+++ b/.gitignore
@@ -11,3 +11,4 @@ funcs.scad
 knifeblock-knives-*.dxf*
 pandemic-counter-l*.dxf
 pandemic-counter-l*.eps
+screw-recess-test-number-s*.*

diff --git a/Makefile b/Makefile
index 937bcc9dc95ceeea0c2cb096f35c5e99c1af6afb..8bf5fadf251bdb7bcdb9c5e099024045b20c00d1 100644 (file)
--- a/Makefile
+++ b/Makefile
@@ -88,6 +88,24 @@ pandemic-counter-l%.eps: pandemic-counter-letters.fig
                fig2dev -D +$(notdir $*) -L eps <$< >$@.tmp
                @mv -f $@.tmp $@
 
+SCREWRECESSTEST_SIZES= 2 3 4 5 6
+SCREWRECESSTEST_DXFS=$(foreach s,$(SCREWRECESSTEST_SIZES), \
+       screw-recess-test-number-s$s.dxf)
+
+screw-recess-test-number-s%.fig: screw-recess-test-number.fig.pl
+       ./$< $* >$@.tmp && mv -f $@.tmp $@
+
+screw-recess-test-number-s%.eps: screw-recess-test-number-s%.fig
+               fig2dev -L eps <$< >$@.tmp
+               @mv -f $@.tmp $@
+
+screw-recess-test-numbers screw-recess-test.stl: $(SCREWRECESSTEST_DXFS)
+
+.PRECIOUS: $(SCREWRECESSTEST_DXFS) $(SCREWRECESSTEST_DXFS) \
+       $(foreach s,$(SCREWRECESSTEST_SIZES), \
+               screw-recess-test-number-s$s.fig \
+               screw-recess-test-number-s$s.eps)
+
 %.dxf:         %.eps
                pstoedit -dt -f "dxf: -polyaslines -mm" $< $@
 

diff --git a/screw-recess-test-number.fig.pl b/screw-recess-test-number.fig.pl
index d17365488288f95c17267266d2eb346aa000d334..023b31539f8574631db0e79e52f7f6495a5887fb 100755 (executable)
--- a/screw-recess-test-number.fig.pl
+++ b/screw-recess-test-number.fig.pl
@@ -1,12 +1,11 @@
 #!/usr/bin/perl
 
-my $number = shift ARGV;
+my $number = shift @ARGV;
 die unless $number =~ m/^\d+$/;
 
 my $fontsz = $number * 6 + 12;
 
-print <DATA> or die $!;
-__DATA__
+print <<END or die $!;
 #FIG 3.2  Produced by xfig version 3.2.5b
 Landscape
 Center
@@ -17,3 +16,4 @@ Single
 -2
 1200 2
 4 0 0 50 -1 18 $fontsz 0.0000 4 285 225 3600 4500 $number\001
+END

diff --git a/screw-recess-test.scad b/screw-recess-test.scad
index 5db4a56036cd9e4c52a4a845943abdb8c9eaaf54..4234a7aa237531b3d68a4e6052be2fb55a272097 100644 (file)
--- a/screw-recess-test.scad
+++ b/screw-recess-test.scad
@@ -80,14 +80,20 @@ tests = [
 
 function Test_blocksz(t) = screw_recess_dia_use(t) + 7;
 
-module OneTestCore(t, h, ymul){
+module OneTestCore(t, h, ymul, labelnumber=false){
   blocksz = Test_blocksz(t);
   translate([0, ymul * (blocksz*0.5 - 1.5), 0]) {
-    difference(){
+    %difference(){
       translate([-blocksz/2, -blocksz/2, 0])
        cube([blocksz, blocksz, h]);
       child();
     }
+    if (labelnumber) {
+      rotate([90,0,0])
+       translate([-blocksz/4,blocksz/5, blocksz/2-1])
+       linear_extrude(height=0.3+1)
+      import(file=str("screw-recess-test-number-s",t[0],".dxf"), convexity=100);
+    }
   }
 }
 
@@ -97,7 +103,7 @@ module OneTest(t){
   OneTestCore(t, h, 1){
     RecessedScrewCutoutStandard(t, h+1);
   }
-  OneTestCore(t, ha, -1){
+  OneTestCore(t, ha, -1, true){
     RecessedScrewCutoutStandardAllen(t, ha+1);
   }
 }