default: all
-all: whole.ps layout-test.ps \
+all: maxprintable.ps minprintable.ps layout-test.ps \
$(addprefix a4-test-,$(addsuffix .ps, b m t)) \
$(addprefix layout-test-,$(addsuffix .ps, b m t))
faces.plag: opt.plag $(USE_PLAG_DEBUG) Makefile
$(USE_PLAG_DEBUG) RF $< W-FACES $@.tmp && $i
-whole.ps: generate-board faces.plag input-graph misc-data.pl Parse.pm
- ./generate-board -XS faces.plag input-graph $o
+maxprintable.ps: generate-board faces.plag input-graph misc-data.pl Parse.pm
+ ./generate-board faces.plag input-graph $o
-layout-test.ps: whole.ps Makefile Parse.pm
+minprintable.ps: generate-board faces.plag input-graph misc-data.pl Parse.pm
+ ./generate-board -XM faces.plag input-graph $o
+
+layout-test.ps: maxprintable.ps Makefile Parse.pm
./generate-board -XW faces.plag input-graph $o
layout-test-%.ps: layout-test-prefix-%.ps layout-test.ps
cat $^ $o
-a4-test-%.ps: layout-test-prefix-%.ps whole.ps
+a4-test-%.ps: layout-test-prefix-%.ps maxprintable.ps
cat $^ $o
#map.ps: map.dot
use Parse;
-our $xopts;
+our $xopts = '';
our $facesf;
our %vxname2pos; # $vxname2pos{VXNAME} = Math::GSL::Vector
our $mid;
+our $a4_w = 595;
+our $a4_h = 842;
+our $a3_h = 1190;
+
+our $max_printeredge = 5.50;
+
+
# ----- region names from plag, incl. reverse mapping -----
our %prs2region;
}
sub preamble() {
- my $printeredge = 5 * MM2PT;
- my $xsz = 842;
- my $ysz = 3 * 595 - 4 * $printeredge;
+ my $tprinteredge = ($xopts =~ m/M/ ? $max_printeredge : 0) * MM2PT;
+ my $xmax = $a4_h - $tprinteredge;
+ my $ymax = ($a4_w + $a3_h) - 2 * $max_printeredge - $tprinteredge;
o(<<END);
%!PS-Adobe-3.0
-%%BoundingBox 0 0 $xsz $ysz
+%%BoundingBox $tprinteredge $tprinteredge $xmax $ymax
%%Pages: 1
%%EndComments
%%BeginProlog
gsave
40 -26 translate
END
- #o(" 0.52 dup scale\n") if $xopts =~ m/S/;
- #o("%%Box 0 0 $xsz $ysz");
- # xxx split into pages?
+ # xxx split into pages
}
sub postamble () {