]> git.sesse.net Git - ultimatescore/blobdiff - stinger/sting.pl
Add a comment about what “Mark game” means.
[ultimatescore] / stinger / sting.pl
index 480eff67d7f65f2d142274c724a47d4a66c2d280..52c99011d3bc8e4287cb96cfb06807106b33a8eb 100644 (file)
@@ -5,8 +5,8 @@ use POSIX qw(ceil floor);
 
 for my $i (0..24) {
 #for my $i (23..23) {
-       my @args = ("./stinger/blur");
-       my ($x1, $y1, $x2, $y2) = (0, 0, 346.547, 202.492);  # From Inkscape output when converting by default.
+       my @args = ("./blur");
+       my ($x1, $y1, $x2, $y2) = (0, 0, 2813.0, 2813.0);  # From Inkscape output when converting by default.
        my $convfactor = 0.26458;  # mm to SVG units, empirical :-/
 
        for my $j (0..97) {  # 98 hits a movit limit!
@@ -14,7 +14,7 @@ for my $i (0..24) {
                my $f = $i / 25.0 + ($j * 0.010) / 25.0;
                #my $f = $i / 255.0;
 
-               my $d = 90.0 / (1.0 - $f) - 80.0;
+               my $d = 90.0 / (1.0 - $f) - 89.0;
                my $outfilename = sprintf("stinger%03d.png", $i * 10 + $j);
                print "$outfilename [$d]...\n";
 
@@ -32,7 +32,7 @@ for my $i (0..24) {
                        $h = floor($h / 2);
                }
 
-               my $cmd = "LANG=C inkscape --export-png=$outfilename --export-area=$x1:$y1:$x2:$y2 --export-width=$w --export-height=$h stinger.svg";
+               my $cmd = "LANG=C inkscape --export-png=$outfilename --export-area=$x1:$y1:$x2:$y2 --export-width=$w --export-height=$h bedre_frisbee.svg";
        #       print "$cmd\n";
                system("$cmd 2>/dev/null >/dev/null");
                #my $x = `$cmd 2>/dev/null`;