| … | |
… | |
| 554 | |
554 | |
| 555 | my $running = $self->{showmove} == @{$self->{path}} && $self->is_active; |
555 | my $running = $self->{showmove} == @{$self->{path}} && $self->is_active; |
| 556 | |
556 | |
| 557 | delete $self->{board_click}; |
557 | delete $self->{board_click}; |
| 558 | |
558 | |
| 559 | $self->{colour} = COLOUR_BLACK;#d# |
|
|
| 560 | $self->{whosemove} = COLOUR_BLACK;#d# |
|
|
| 561 | $running = 1;#d# |
|
|
| 562 | if ($self->{teacher} eq $self->{app}{conn}) { |
559 | if ($self->{teacher} eq $self->{app}{conn}) { |
| 563 | #TODO# # teaching mode not implemented |
560 | #TODO# # teaching mode not implemented |
| 564 | $self->{button_pass}->set (label => "Pass", visible => 1, sensitive => 1); |
561 | $self->{button_pass}->set (label => "Pass", visible => 1, sensitive => 1); |
| 565 | $self->{button_undo}->hide; |
562 | $self->{button_undo}->hide; |
| 566 | $self->{button_resign}->hide; |
563 | $self->{button_resign}->hide; |
