+sub show_semaphore {
+ my ($self, $num) = @_;
+
+ my $win = $self->{semaphore_win};
+ if (defined $num) {
+ my $img = $self->{semaphore_img};
+ my $pixbuf = $self->{semaphore_images}->[$num];
+ $img->set_from_pixbuf($pixbuf);
+ $win->show;
+ } else {
+ $win->hide;
+ }
+}
+
+sub rounds {
+ my ($self, $text) = @_;
+
+ my $label = $self->get_object("label_lap_global")
+ or die "Can't get label_lap_global";
+ $label->set_markup('<span font_desc="18" weight="bold">Lap '.$text.'</span>');
+}
+
+sub time {
+ my ($self, $text) = @_;
+
+ my $label = $self->get_object("label_time_global")
+ or die "Can't get label_time_global";
+ $label->set_markup('<span font_desc="18" weight="bold">Time '.$text.'</span>');
+}
+
+sub best_lap {
+ my ($self, $text) = @_;
+
+ my $label = $self->get_object("label_best_lap_global")
+ or die "Can't get label_best_lap_global";
+ $label->set_markup('<span font_desc="18" weight="bold">Best lap '.$text.'</span>');
+}
+