Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

[bin/crypt] 'east' -> 'walk east' abbreviation

  • Loading branch information...
commit a9c83c02de04f9604e4eb7a5dead4e5c5e148b7d 1 parent 9a7f528
@masak authored
Showing with 11 additions and 0 deletions.
  1. +11 −0 bin/crypt
View
11 bin/crypt
@@ -417,6 +417,12 @@ multi MAIN() {
}
my %commands = map { $^m.name => params($m) }, $game.^methods;
+ my @possible_directions = <
+ north south east west
+ northeast northwest southeast southwest
+ up down in out
+ >;
+
say "Clearing";
say "";
@@ -438,6 +444,11 @@ multi MAIN() {
say "[walk] north/south/east/west";
}
+ when any @possible_directions {
+ $command = "walk $command";
+ proceed;
+ }
+
my $verb = $command.words[0];
my @args = $command.words[1..*];
when %commands.exists($verb) {
Please sign in to comment.
Something went wrong with that request. Please try again.