added x01 mode

[svn42.git] / dart / Dart.pm

diff --git a/dart/Dart.pm b/dart/Dart.pm
index 634f149..ebb36bb 100644 (file)
--- a/dart/Dart.pm
+++ b/dart/Dart.pm
@@ -90,6 +90,8 @@ sub run
       $self->callback('undo');
     } elsif ($mult eq 'reset') {
       $self->reset_game();
+    } elsif ($mult eq 'quit') {
+      return;
     }
     push @history, Clone::clone($self);
     $self->callback('before_shoot');
@@ -186,6 +188,12 @@ sub get_next_active_player
   return ($current_player,$new_round);
 }
 
+sub finish_player_round
+{
+  my $self=shift;
+  $self->{current_shoot_count} = $self->{max_shoots_per_player};
+}
+
 sub next_round
 {
   my $self=shift;