Inhaltsverzeichnis
Cockpit.AbstandRundeFuehrenden
Einleitung
Dieser Befehl liefert den Rückstand auf den Führenden in der Session (Platz 1). Ist man selbt der Führende ist der Wert 0.
Liegt man mehr als eine Runde zurück, liefert der Befehl einen negativen Integerwert zurück.
Befindet man sich mit dem Führenden in der gleichen Runde, gibt diese Funktion den gleichen Wert zurück wie Cockpit.AbstandZeitFuehrenden, entspricht demnach dem Zeitrückstand in Millisekunden.
Syntax
| Befehl | Cockpit.AbstandRundeFuehrenden |
|---|---|
| Funktion | Liefert die Anzahl Runden als negativen Integerwert, die man hinter dem Fahrer auf Platz 1 zurückliegt. |
| Typ | Integer |
Codebeispiel
{ Pascal Script Engine }
{ Event: StartZiel }
{ Parameter: Cockpit.Slot=<SlotPlatz> }
var
slot : Integer;
id : Integer;
msg : String;
begin
// Variable initialisieren
msg := '';
// für alle Spuren durchlaufen
for slot := 1 to cpCountOfSlots do
begin
// Slot einstellen
Cockpit.Slot := slot;
// Regler-ID speichern
id := Cockpit.SlotID;
// Meldung erweitern
msg := msg + 'Slot: ' + IntToStr(slot) + ' - ';
msg := msg + Cockpit.FahrerName + ' - ';
msg := msg + 'ID: ' + IntToStr(id);
msg := msg + Chr(13) + Chr(10);
msg := msg + 'Aktuelle Position: ' + IntToStr(Cockpit.Position);
msg := msg + Chr(13) + Chr(10);
msg := msg + 'Rückstand P1 (Zeit): ' + cpIntToStr3(Cockpit.AbstandZeitFuehrenden) + 's';
msg := msg + Chr(13) + Chr(10);
msg := msg + 'Rückstand P1 (Runden): ' + IntToStr(Cockpit.AbstandRundeFuehrenden);
msg := msg + Chr(13) + Chr(10);
msg := msg + 'Rückstand Vo (Zeit): ' + cpIntToStr3(Cockpit.AbstandZeitVordermann) + 's';
msg := msg + Chr(13) + Chr(10);
msg := msg + 'Rückstand Vo (Runden): ' + IntToStr(Cockpit.AbstandRundeVordermann);
msg := msg + Chr(13) + Chr(10);
msg := msg + '----------------------------------------------';
msg := msg + Chr(13) + Chr(10);
end;
// Meldung anzeigen
cpShowMessage(msg);
end.
Dieser Code zeigt eine Meldung an, die alle Funktionen einschließt, die sich auf Abstände zum Führenden oder den Vordermann beziehen.
