chiark / gitweb /
pattress-boxes-3-cover: Lid: another toplevel test foor convenience
[reprap-play.git] / knifeblock-knives-filter
index bb832cf..17cff74 100755 (executable)
@@ -14,7 +14,7 @@ my ($wknife,$wparts) = $want =~ m/^(\d)([a-z]+)$/ or die;
 
 sub want ($) {
     my ($colournum) = @_;
-    my $knife = ($colournum-1) % $nknives;
+    my $knife = $nknives-1 - ($colournum-1) % $nknives;
     return 0 unless $knife == $wknife;
     my $part = $part_order[ floor(($colournum-1) / $nknives) ];
     die "huh colour $colournum?" unless defined $part;