Ansteuerung des OnAirScreen

Deutsch / German Scripts
3

Vielleicht könnte einer der Admins, den Titel mal ändern in “Ansteuerung des OnAirScreen”

Dann können wir diesen Thread wenigstens noch zur Dokumentation verwenden.

procedure OnLoad;
begin
  ShellExecute ('C:\ProgramData\mAirList\6.1\sfk174.exe', 'udpsend 192.168.51.103 3310 "CONF:LED2:autoflash=True"');
  ShellExecute ('C:\ProgramData\mAirList\6.1\sfk174.exe', 'udpsend 192.168.51.103 3310 "CONF:CONF:APPLY=TRUE"');
end;

procedure OnOnAir;
begin
  ShellExecute ('C:\ProgramData\mAirList\6.1\sfk174.exe', 'udpsend 192.168.51.103 3310 "LED1:ON"');
  SystemLog ('C:\ProgramData\mAirList\6.1\sfk174.exe udpsend 192.168.51.103 3310 "LED1:ON"');
end;

procedure OnOffAir;
begin
  ShellExecute ('C:\ProgramData\mAirList\6.1\sfk174.exe', 'udpsend 192.168.51.103 3310 "LED1:OFF"');
  SystemLog ('C:\ProgramData\mAirList\6.1\sfk174.exe udpsend 192.168.51.103 3310 "LED1:OFF"');
end;

procedure OnPlayerEOFWarning(PlaylistIndex: integer; PlayerIndex: integer);
begin
  ShellExecute ('C:\ProgramData\mAirList\6.1\sfk174.exe', 'udpsend 192.168.51.103 3310 "LED2:ON"');
  SystemLog ('C:\ProgramData\mAirList\6.1\sfk174.exe udpsend 192.168.51.103 3310 "LED2:ON"');
end;

procedure OnPlayerStop(PlaylistIndex: integer; PlayerIndex: integer; Duration: TTimeValue; Item: IPlaylistItem);
begin
  ShellExecute ('C:\ProgramData\mAirList\6.1\sfk174.exe', 'udpsend 192.168.51.103 3310 "LED2:OFF"');
  SystemLog ('C:\ProgramData\mAirList\6.1\sfk174.exe udpsend 192.168.51.103 3310 "LED2:OFF"');
end;

procedure OnShutdown; // Sollte den Rechner mit den OnAirScreen herunterfahren, funktioniert bisher aber nicht.
begin
  ShellExecute ('C:\ProgramData\mAirList\6.1\sfk174.exe', 'udpsend 192.168.51.103 3310 "CMD:SHUTDOWN"');
  SystemLog ('C:\ProgramData\mAirList\6.1\sfk174.exe udpsend 192.168.51.103 3310 "CMD:SHUTDOWN"');
end;

Jetzt möchte ich diese art und Weise: "Altes" ONAIR-Script funktioniert nur noch teilweise Nutzen um den Stream Timer zu starten, wenn mindestens einer der Streams verbunden ist und stoppen wenn alle offline sind.

Ausserdem möchte ich aus meinem Gamepad, eine Funktion triggern. Die soll zum einen, hier einen Befehl absetzen und ebenfalls einen Timer starten und zum anderen den dedizierten “Aircheck” recorder starten.

Warscheinlich kann man den ganzen Spaghetti code da oben auch wieder in eine eigene Procedure verpacken und dann nur noch die Befehle übergeben. Dazu später, ich will erst einmal alle Funktionen überhaupt am laufen haben.

“Vielleicht könnte einer der Admins, den Titel mal ändern in “Ansteuerung des OnAirScreen””
done by Mod (es gibt nur einen Admin hier :wink:)