X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=quacks-ingredients-make-copy-gcodes;h=bcddcf7a1948301ce4fe19525fed462acdace716;hb=d6461b60b78da57ba531ef0dd0acfdd046ceeaef;hp=b198f95c22cf46b3983dad2e211222f2d69c9e22;hpb=bf5d181cd8b395dfa38a4cce9d80f659d05bc840;p=reprap-play.git

diff --git a/quacks-ingredients-make-copy-gcodes b/quacks-ingredients-make-copy-gcodes
index b198f95..bcddcf7 100755
--- a/quacks-ingredients-make-copy-gcodes
+++ b/quacks-ingredients-make-copy-gcodes
@@ -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 $!; }