Inhaltsverzeichnis
cpGetTankparameter
Einleitung
Dieser Befehl fragt die aktuellen Tankparameter für einen Slot ab, sofern in der Rennbahn Cockpit Tanken aktiviert ist. Ist bei einem Auto der Tankverbrauch vom Fahrzeug eingestellt, wird das entsprechend berücksichtigt.
Ab der Version 3.3.1 build 480 werden die zusätzlichen Werte in der Mitte der Tankkennlinie bei diesem Befehl nicht mehr berücksichtigt.
Grund: Es konnte passieren, dass die Kennlinienpunkt trotz setzen per Befehl bestehen blieben und sich dann nicht nachvollziehbare Tankverbräuche ergeben.
Syntax
| Befehl | cpGetTankparameter( Slot:Integer; CockpitTanken:Boolean; VerbrSchnell, RdzeitSchnell, VerbrLangsam, RdzeitLangsam:Extended ) |
|---|---|
| Funktion | Fragt pro Slot (nicht SlotID !) die eingestellten Tankparameter ab, wenn Cockpit.Tanken aktiviert ist. |
| Typ | |
| ab | 3.0.8 build 363 |
Codebeispiel
const
anzahlSlots = cpCountOfSlots;
CRLF = Chr(13) + Chr(10);
var
slot : Integer;
cpTanken : Boolean;
rdZeitLangsam : Extended;
VerbrLangsam : Extended;
rdZeitSchnell : Extended;
VerbrSchnell : Extended;
msg : String;
begin
// Variable initialisieren
msg := '';
msg := msg + 'Tankparameter LESEN' + CRLF +
'----------------------------' + CRLF;
// alle Slots abfragen
for slot := 1 to anzahlSlots do
begin
// Tankparameter holen
cpGetTankparameter( slot,
cpTanken,
VerbrSchnell, rdZeitSchnell,
VerbrLangsam, rdZeitLangsam );
// Cockpit.Tanken ist aktiviert
if cpTanken then
begin
// Meldung zusammenstellen
msg := msg + 'Cockpit.Slot: ' + IntToStr(slot) + CRLF +
'Zeit langsam: ' + FormatFloat('#0.0s', rdZeitLangsam) + ' - ' +
'Verbrauch/Rd: ' + FormatFloat('#0.0%', VerbrLangsam) + CRLF +
'Zeit schnell: ' + FormatFloat('#0.0s', rdZeitSchnell) + ' - ' +
'Verbrauch/Rd: ' + FormatFloat('#0.0%', VerbrSchnell) + CRLF +
'------------------------------------' + CRLF;
end;
end;
// Werte für Tankparameter definieren
rdZeitLangsam := 17.5;
VerbrLangsam := 4.2;
rdZeitSchnell := 13.8;
VerbrSchnell := 20.7;
// Meldung zusammenstellen
msg := msg + 'Tankparameter SETZEN' + CRLF +
'----------------------------' + CRLF;
// erneut alle Slots abarbeiten
for slot := 1 to anzahlSlots do
begin
// Tankparameter setzen
cpSetTankparameter ( slot,
VerbrSchnell, rdZeitSchnell,
VerbrLangsam, rdZeitLangsam );
// Meldung zusammenstellen
msg := msg + 'Cockpit.Slot: ' + IntToStr(slot) + CRLF +
'Zeit langsam: ' + FormatFloat('#0.0s', rdZeitLangsam) + ' - ' +
'Verbrauch/Rd: ' + FormatFloat('#0.0%', VerbrLangsam) + CRLF +
'Zeit schnell: ' + FormatFloat('#0.0s', rdZeitSchnell) + ' - ' +
'Verbrauch/Rd: ' + FormatFloat('#0.0%', VerbrSchnell) + CRLF +
'------------------------------------' + CRLF;
end;
// Meldung anzeigen
cpShowMessage(msg);
end.
Zeigt die folgende Meldung. Für die Slots 1 und 4 sind die Tankparameter des Fahrzeugs aktiviert. Slots 2 und 3 zeigen die globalen Einstellungen.
