mirror of
git://projects.qi-hardware.com/kicad-libs.git
synced 2024-11-25 18:56:14 +02:00
components/gencon.pl: put spaces around operators
This commit is contained in:
parent
f74400f7bc
commit
c3ebae8a40
@ -18,17 +18,17 @@ for ($x = 1; $x <= 40; $x++) {
|
|||||||
$name .= "X$y" if $y > 1;
|
$name .= "X$y" if $y > 1;
|
||||||
print "#\n# $name\n#\n";
|
print "#\n# $name\n#\n";
|
||||||
print "DEF $name CON 0 40 Y N 1 F N\n";
|
print "DEF $name CON 0 40 Y N 1 F N\n";
|
||||||
$h = $x/2*100;
|
$h = $x / 2 * 100;
|
||||||
print "F0 \"CON\" 0 ".($h+50)." 60 H V C CNN\n";
|
print "F0 \"CON\" 0 " . ($h + 50) . " 60 H V C CNN\n";
|
||||||
print "F1 \"$name\" 0 ".(-$h-50)." 60 H V C CNN\n";
|
print "F1 \"$name\" 0 " . (-$h - 50) . " 60 H V C CNN\n";
|
||||||
print "DRAW\n";
|
print "DRAW\n";
|
||||||
print "S -100 -$h 100 $h 0 1 0 N\n";
|
print "S -100 -$h 100 $h 0 1 0 N\n";
|
||||||
$n = 1;
|
$n = 1;
|
||||||
for ($px = 1; $px <= $x; $px++) {
|
for ($px = 1; $px <= $x; $px++) {
|
||||||
for ($py = 1; $py <= $y; $py++) {
|
for ($py = 1; $py <= $y; $py++) {
|
||||||
print "X $n $n ".(400*($py-1.5)*2)." ".
|
print "X $n $n " . (400 * ($py - 1.5) * 2) .
|
||||||
($h-$px*100+50)." 300 ".
|
" " . ($h - $px * 100 + 50) . " 300 " .
|
||||||
("?", "R", "L")[$py]." 50 50 1 1 P\n";
|
("?", "R", "L")[$py] . " 50 50 1 1 P\n";
|
||||||
$n++;
|
$n++;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue
Block a user