Cockpit.TankStand ist ein Unterelement von Cockpit.Slot, das erst zur Verfügung steht, wenn die eine Session gestartet ist und erste Runden gefahren sind.

Die Funktion liefert den Tankinahlt als Extendedwert. Dadurch sind Anzeige und Verarbeitung mit Nachkommastellen möglich.

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

var
  slot : Integer;
  msg : String;
  
begin

  // Variable initialisieren
  msg := cpGetStringVar('msg');
  
  // Auslösenden Slot in Variable speichern
  slot := Cockpit.Slot;
  Cockpit.Slot := slot;
  
  // Zeile mit Slot nur 1x in Meldung schreiben
  if Cockpit.Runde = 0 then
  begin
    // Meldung zusammenstellen
    msg := msg + 'Slot: ' + IntToStr(slot) + ' - ';
    msg := msg + Cockpit.FahrerName;
    msg := msg + Chr(13) + Chr(10);
  end;
  
  if Cockpit.Runde <= 5 then
  begin
    // Meldung zusammenstellen
    msg := msg + 'Runde: ' + IntToStr(Cockpit.Runde) + ' - ';
    msg := msg + 'Tankinhalt: ' + FormatFloat('#0.000', Cockpit.TankStand) + '%';
    msg := msg + Chr(13) + Chr(10);
  end;
      
  // Inhalt von msg für nächsten Durchlauf speichern
  cpSetStringVar('msg', msg);
  
  // Meldung anzeigen
  cpShowMessage(msg);

end.

Dieser Code zeigt den Tankinhalt in den Runden 0 bis 5 des Fahrers mit Regler-ID 3 auf Slot 1 mit 3 Nachkommastellen formatiert.

Start - FAQ - Glossar - Sitemap - Impressum