Dieser Befehl liefert den Zeitrückstand in Millisekunden auf den vor einem selbst Fahrenden Piloten in der Session. Ist man selbt der Führende, gibt es keinen Vordermann. Entsprechend ist der Wert 0.

{ Pascal Script Engine }
{ Event: StartZiel }
{ Parameter: Cockpit.Slot=<SlotPlatz> }

const
  CrLf = Chr(13) + Chr(10);

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) + ' - ' +  
           Cockpit.FahrerName + ' - ' +
           'ID: ' + IntToStr(id) + CrLf +
           'Aktuelle Position: ' + 
           IntToStr(Cockpit.Position) + CrLf +
           'Rückstand P1 (Zeit): ' +
           cpIntToStr3(Cockpit.AbstandZeitFuehrenden) + 's' + CrLf +
           'Rückstand P1 (Runden): ' +
           IntToStr(Cockpit.AbstandRundeFuehrenden) + CrLf +
           'Rückstand Vo (Zeit): ' +
           cpIntToStr3(Cockpit.AbstandZeitVordermann) + 's' + CrLf +
           'Rückstand Vo (Runden): ' + 
           IntToStr(Cockpit.AbstandRundeVordermann) + CrLf +
           '----------------------------------------------' + CrLf;
    
  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