chiark / gitweb /
quacks-ingredients: gcode manipulation
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 19 Feb 2020 23:28:31 +0000 (23:28 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 19 Feb 2020 23:28:31 +0000 (23:28 +0000)
Do a Z raise, just at a better time.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
quacks-ingredients-make-copy-gcodes

index b198f95c22cf46b3983dad2e211222f2d69c9e22..bcddcf7a1948301ce4fe19525fed462acdace716 100755 (executable)
@@ -32,6 +32,7 @@ for l in 1 2 3 4 5; do
 
        perl -i~ -ne '
                $l =~ s/^/;/ if m/^M400/;
+               $l .= "G91\nG1 Z5\nG90\n" if m/^M84/;
                print $l or die $!;
                $l = $_;
                END { print $l or die $!; }