diff options
| author | root <root@frank.tg14.gathering.org> | 2014-04-14 18:52:20 +0200 |
|---|---|---|
| committer | root <root@frank.tg14.gathering.org> | 2014-04-14 18:52:20 +0200 |
| commit | dc6d87d22f54f7b47df12a62ad3cdef2efdae494 (patch) | |
| tree | 93ff6300a69cb30041f4ac60cfc534846b566c02 /tools | |
| parent | 91c834d2b3ae4bef034a4ae8be51f4b86e287430 (diff) | |
Netlist and switches from TG14, so far.
Diffstat (limited to 'tools')
| -rwxr-xr-x | tools/make-switch-placements.pl | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/tools/make-switch-placements.pl b/tools/make-switch-placements.pl index 58538e2..7bfb889 100755 --- a/tools/make-switch-placements.pl +++ b/tools/make-switch-placements.pl @@ -23,32 +23,32 @@ while (<STDIN>) { $name =~ /e(\d+)-(\d+)/; my ($e, $s) = ($1, $2); - $x = int(220 + (($e-1)/2) * 21.5); + $x = int(205 + (($e-1)/2) * 20.2); $y = undef; - $x += 10 if ($e >= 11); - $x += 10 if ($e >= 27); - $x += 10 if ($e >= 43); - $x += 10 if ($e >= 59); + $x += 8 if ($e >= 11); + $x += 6 if ($e >= 27); + $x += 12 if ($e >= 43); + $x += 7 if ($e >= 60); if ($s > 2) { - $y = 310 - 84 * ($s-2); + $y = 328 - 84 * ($s-2); } else { - $y = 507 - 84 * ($s); + $y = 519 - 84 * ($s); } $xx = $x + 14; $yy = $y + 84; # Justeringer - $y += 42 if $name eq "e1-4"; - $y += 28 if $name eq "e3-4"; - $y += 14 if $name eq "e5-4"; + $y += 45 if $name eq "e1-4"; + $y += 20 if $name eq "e3-4"; + $y += 15 if $name eq "e5-4"; - $yy -= 14 if $name eq "e77-1"; - $yy -= 28 if $name eq "e79-1"; - $yy -= 42 if $name eq "e81-1"; - $yy -= 56 if $name eq "e83-1"; + #$yy -= 14 if $name eq "e77-1"; + #$yy -= 28 if $name eq "e79-1"; + $yy -= 15 if $name eq "e81-1"; + #$yy -= 56 if $name eq "e83-1"; } elsif ($name =~ /^creative(\d+)$/) { my $s = $1; if ($s < 3) { |