Inhaltsverzeichnis
Event TankenAusfahrt
Einleitung
Dieses Event wird gestartet, wenn ein TankenAusfahrt-Signal erkannt wird. Dies geschieht entweder über die PSAU, wenn man den Gashebel zu mehr als 50% durchdrückt, über Cockpit-XP-Sensoren (beide digital), oder über Fotowiderstände (LDR), Gabellichtschranken, etc., welche in der Rennbahn als TankenAusfahrt konfiguriert sind.
Syntax
| Parameter | Beschreibung |
|---|---|
| Cockpit.Slot | Auslösender Slot |
Codebeispiel
Bei TankenAusfahrt von Fahrzeug-ID 2 soll der Text FAHRER XXX FÄHRT AUS DER BOX. ausgesprochen werden.
{ Pascal Script Engine }
{ Event: TankenAusfahrt }
{ Parameter: Cockpit.Slot=<SlotPlatz> }
var
Slot : Integer;
begin
Slot := Cockpit.Slot;
Cockpit.Slot := Slot;
if Cockpit.SlotID = 2 then
begin
cpSpeech(Cockpit.Fahrername + ' fährt aus der BOX.');
end;
end.
Jetzt wird der „normale“ Fahrername in den vielen Fällen merkwürdig klingen, da die Sprachausgabe wenig intelligent vorgeht. Aus diesem Grund enthält der Fahrerdatensatz im DataCenter ein weiteres Feld, in dem man eine für die Sprachausgabe optimierten Namen eintragen kann.
Mit dem folgenden Code wird geprüft, ob in diesem Feld ein Inhalt eingegeben ist. Ist das der Fall, wird diese Version des Fahrernamens für die Sprachausgabe bevorzugt. Ist das Feld leer, kommt der übliche Name zum Einsatz.
{ Pascal Script Engine }
{ Event: TankenAusfahrt }
{ Parameter: Cockpit.Slot=<SlotPlatz> }
var
Slot : Integer;
Fahrername : String;
begin
Slot := Cockpit.Slot;
Cockpit.Slot := Slot;
if Cockpit.SlotID = 2 then
begin
if Cockpit.FahrerNameSprechen <> '' then
Fahrername := Cockpit.FahrerNameSprechen
else
Fahrername := Cockpit.FahrerName;
cpSpeech(Fahrername + ' fährt aus der BOX.');
end;
end.
Hinweise
