my $player=$self->get_current_player();
delete ($player->{last_hit});
$player->{highlight}{shoot}=Clone::clone($self->{empty_matrix});
my $player=$self->get_current_player();
delete ($player->{last_hit});
$player->{highlight}{shoot}=Clone::clone($self->{empty_matrix});