load_image_set('img/throttle%d.svg', 13, 100)
],
fuel_images => [
- load_image_set('img/fuel%d.svg', 8, 100)
+ load_image_set('img/fuel%d.svg', 8, 60)
],
car_images => load_image_dir('img/SCXCars', 100),
builder => Gtk2::Builder->new,
++$row;
my $label = $self->get_object("label_lap$row")
or die "Can't get label_lap$row";
- $label->set_label($text);
+ $label->set_markup('<span font_desc="24" weight="bold">'.$text.'</span>');
}
sub set_laptime {
++$row;
my $label = $self->get_object("label_laptime$row")
or die "Can't get label_laptime$row";
- $label->set_label($text);
+ $label->set_markup('<span font_desc="18" weight="bold">'.$text.'</span>');
}
sub set_best_lap {
++$row;
my $label = $self->get_object("label_best_lap$row")
or die "Can't get label_best_lap$row";
- $label->set_label($text);
+ $label->set_markup('<span font_desc="18" weight="bold">'.$text.'</span>');
}
sub set_driver {
++$row;
my $label = $self->get_object("label_name$row")
or die "Can't get label_lap$row";
- $label->set_label($text);
+ $label->set_markup('<span font_desc="18" weight="bold">'.$text.'</span>');
+}
+
+sub enter_pit_lane {
+ my ($self, $row) = @_;
+ $self->set_laptime($row, 'PIT');
+}
+
+sub leave_pit_lane {
+ my ($self, $row) = @_;
+ $self->set_laptime($row, '--');
}
1;