From f738ea9914fba48520d48bd20ee82ecdcf393a8a Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Wed, 6 Mar 2019 23:25:03 +0000 Subject: [PATCH] wip prep paper sizes --- generate-board | 3 +++ 1 file changed, 3 insertions(+) diff --git a/generate-board b/generate-board index db7bd59..f35a699 100755 --- a/generate-board +++ b/generate-board @@ -21,6 +21,7 @@ our $bounding = 'Entire'; our $facesf; our %vxname2pos; # $vxname2pos{VXNAME} = Math::GSL::Vector our %bb; # $r{Bounding...}[0..3] = points +our $maxpaper = 'a3'; sub TAU { M_PI * 2.0; } sub MM2PT { 72.0 / 25.4; } @@ -862,6 +863,8 @@ sub play_hint () { $xopts = shift @ARGV if $ARGV[0] =~ s/^-X//; $bounding = $1 if $xopts =~ s/b(\w+)//; +$maxpaper = $1 if $xopts =~ s/p(\w+)//; +$maxpaper =~ m/^a[134]$/ or confess; ($facesf, @ARGV) = @ARGV or die; parse_input_graph(); -- 2.30.2