Dieser Befehl liefert den Rückstand auf die Position direkt vor einem Fahrer (Vordermann). Beim Führenden gibt es keinen Vordermann. Daher ist der Wert in diesem Fall 0.

Liegt man mehr als eine Runde zurück, liefert der Befehl einen negativen Integerwert zurück.

Gibt es einen Vordermann, das ist ab Position 2 der Fall, und befindet man sich mit diesem in der gleichen Runde, gibt diese Funktion den gleichen Wert zurück wie Cockpit.AbstandZeitVordermann, entspricht demnach dem Zeitrückstand in Millisekunden.

{ 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.

Start - FAQ - Glossar - Sitemap - Impressum