qi-hardware/cae-tools
1
0
Fork 0
mirror of git://projects.qi-hardware.com/cae-tools.git synced 2025-04-21 12:27:27 +03:00
Code Activity

cameo/zstack.pl: output one point at (x, y, z0) to set reference level

Browse Source 
Otherwise, gp2rml will eliminate any offset. (x, y) is an arbitrary point
from the toolpaths.
This commit is contained in:
Werner Almesberger
2013-11-06 20:28:47 -03:00
parent e82667e680
commit 033d55c8ad
1 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
cameo/zstack.pl
View File

@@ -54,7 +54,11 @@ while (<>) {
$z{$z} .= "$s\n";
undef $s;
}
$z = $3 if /^-?\d+(\.\d*)?\s+-?\d+(\.\d*)?\s+(-?\d+(\.\d*)?)/;
if (/^-?\d+(\.\d*)?\s+-?\d+(\.\d*)?\s+(-?\d+(\.\d*)?)/) {
$x = $1 unless defined $x;
$y = $2 unless defined $y;
$z = $3;
}
$s .= $_;
$zmax = $z if $z > $zmax || !defined $zmax;
}
@@ -68,6 +72,8 @@ if ($reverse) {
%z = %t;
}
print "$x $y $z0\n\n";
$z = $z0;
for $c (sort { $b <=> $a } keys %z) {
while ($z > $c+$zs) {