X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=web%2Fmake-switches.pl;fp=web%2Fmake-switches.pl;h=e1d3fe9b3c4f400bfabc3a7e585317889723a2f6;hb=684a6cca9932fd57dcab4bb4edda01d6867c5159;hp=2829ed7fb28daf60f57c821d7ebdb61e3f192f95;hpb=5541bedcc39044e899a10f9dc47b755a9b51d503;p=nms diff --git a/web/make-switches.pl b/web/make-switches.pl index 2829ed7..e1d3fe9 100644 --- a/web/make-switches.pl +++ b/web/make-switches.pl @@ -22,7 +22,7 @@ while () { $name =~ /e(\d+)-(\d+)/; my ($e, $s) = ($1, $2); - my $x = int(202 + $e * 8.25); + my $x = int(244 + $e * 9.87); my $y; $x += 7 if ($e >= 19); @@ -35,12 +35,12 @@ while () { $c = $e; $d = ($s - 1) * 64; - $y = 470 - $s * 48; + $y = 455 - $s * 48; } else { $c = $e + 1; $d = ($s - 4) * 64; - $y = 400 - $s * 48 - ($s - 3) * 2; + $y = 424 - $s * 48 - ($s - 3) * 2; } my $xx = $x + 12;