- {
- if ($score{$current_player}{$zahl}<3)
- {
- $score{$current_player}{$zahl}++;
- } else {
- for my $playernum (1..$numplayer)
- {
- if ($score{$playernum}{$zahl}<3)
- {
- $score{$playernum}{0}+=$zahl;
- print "score\n";
- }
- }
- }
- }
- } else {
+ {
+
+ if ($score{$current_player}{$zahl}<3)
+ {
+ $score{$current_player}{$zahl}++;
+ $self_scored;
+ } else {
+ $scho++;
+ for my $playernum (1..$numplayer)
+ {
+ if ($score{$playernum}{$zahl}<3)
+ {
+ $score{$playernum}{0}+=$zahl;
+ $scored++;
+ }
+ }
+ }
+ }
+ print $schuss if ($scored || $scho || $self_scored);
+ print "scored\n" if $scored;
+ print "scho\n" if $scho;
+ } elsif ($mult eq 'btn') {
+ print $schuss;