Inhaltsverzeichnis

cpShowSubScreenIntervall

Einleitung


Zeigt einen Subscreen innerhalb eines Rennbildschirms an. Es ist eine Art Bild-in-Bild.

Im Unterschied zu cpShowSubScreen ermöglicht dieser Befehl ein Blinken des Subscreens. Intervall gibt die Zeitdauer an, die der Subscreen jeweils ein- und ausgeblendet wird.

Der zweite Unterschied ist die Art, wie der so aufgerufene Subscreen wieder geschlossen wird. Er blinkt solange weiter, wie der Aufruf bestehen bleibt. Deshalb muss er über eine bedingte Anweisung gestartet werden. Erhält die Bedingung den Wert Falsch, endet auch das Blinken des Subscreens.

Syntax

Befehl cpShowSubScreenIntervall(xpos,ypos:Integer,SubScreenName:String,Intervall:Integer)
Funktion Zeigt einen Subscreen in einem geöffneten Rennbildschirm an und blendet diesen für die Dauer von Intervall in Millisekunden Ein und wieder Aus.
Typ Integer


Codebeispiel

{ Pascal Script Engine }
{ Event: Bestrafung }
{ Parameter: 
  Cockpit.Slot=<SlotPlatz>,
  Cockpit.Station=<1=ausgesprochen;2=disqualifiziert>,
  Cockpit.Parameter=<1=Rundenstrafe;2=Zeitstrafe;3=Boxengassestrafe> }

var
  slot : Integer;
  
begin
  
  // Auslösenden Slot speichern und einstellen
  slot := Cockpit.Slot;
  Cockpit.Slot := slot;

  // Strafe ist aktiv. So lange blinkt Subscreen 
  while cpGetStatusBestrafung(slot) do
  begin

    // Es gibt zwei Zusatzmonitore
    // Slot 1 + 2 sind auf Monitor 1
    // Slot 3 + 4 sind auf Monitor 2
    case slot of
     
      1: 
        begin
          // Zusatzmonitor 1 einstellen
          cpSetMonitor(1);
          // Subscreen aufrufen. Takt 1 sek.
          cpShowSubScreenIntervall(52,705,'Boxenstrafe.xml',1000);
          // kurz warten
          cpSleep(200);
        end;

      2:
        begin
          cpSetMonitor(1);
          cpShowSubScreenIntervall(472,705,'Boxenstrafe.xml',1000);
          cpSleep(200);
        end;

      3:
        begin
          cpSetMonitor(2);
          cpShowSubScreenIntervall(52,705,'Boxenstrafe.xml',1000);
          cpSleep(200);
        end;

      4:
        begin
          cpSetMonitor(2);
          cpShowSubScreenIntervall(472,705,'Boxenstrafe.xml',1000);
          cpSleep(200);
        end;

    end;
    
end.


Dieser Code blendet den Subscreen Boxenstrafe.xml auf dem zugewiesenen Zusatzmonitor ein, wenn ein Fahrer eine Strafe erhalten hat. Er blinkt dort im Takt von ca. 1 sek. bis, die Strafe beendet ist.

Gut zu sehen ist die horizontale Verschiebung der Anzeige (52 px und 472 px). Dieses Beispiel war an meinem Linden Park Speedway bis Ende 2015 so im Einsatz.

Der Blinkvorgang lässt sich leider schlecht in einem Screenshot festhalten.


Start - FAQ - Glossar - Sitemap - Impressum