$self->{early_start} = 1;
$self->gui->set_driver('Early start!');
}
+
+ if ($self->{in_pit_lane} && defined $val && $val > 3) {
+ $self->leave_pit_lane;
+ }
+
$self->gui->set_throttle($self->{order}, $val);
}
return if $self->same('lap', $lap_nr);
$self->gui->set_lap($self->{order}, defined $lap_nr ? $lap_nr : '--');
if ($self->track->{race_running} && $self->{lap} > 1) {
- my $now = gettimeofday;
+ my $now = $self->{last_finish_time};
my $avg = ($now - $self->track->{race_running_since})
/ ($self->{lap} - 1);
$self->{avg_lap} = $avg;
$self->gui->enter_pit_lane;
}
}
-
+
+sub reset {
+ my ($self) = @_;
+
+ $self->set_lap(0);
+ $self->set_laptime(undef);
+ $self->{in_pit_lane} = 0;
+ $self->{early_start} = undef;
+}
+
+sub finish_line {
+ my ($self, $time, $regular) = @_;
+
+ return undef
+ if defined $self->{last_finish_time}
+ && $time - $self->{last_finish_time} < 2;
+
+ if ($regular) {
+ if (defined $self->{last_finish_time}) {
+ $self->set_laptime($time - $self->{last_finish_time});
+ }
+ } else {
+ $self->enter_pit_lane;
+ }
+
+ $self->{last_finish_time} = $time;
+ $self->set_lap(++$self->{lap});
+
+ return 1;
+}
+
1;