my $from = "";
    if ($movement[0] == 0 && $movement[1] == 1) {$from = "north"}
    elsif ($movement[0] == 1 && $movement[1] == 0) {$from = "east"}
    elsif ($movement[0] == 0 && $movement[1] == -1) {$from = "south"}
    elsif ($movement[0] == -1 && $movement[1] == 0) {$from = "west"}