Mit dem aktuellen Snapshot bekomme ich folgende Fehlermeldung:
16.03.2017 15:36:13 Fehler Runtime error "List index out of bounds (0)" in background script D:\mAirList\5\Skripts\EncoderConnected (2).mls, handling message: TIMER 0000000000000000 00000001
Ungefähr zwei Snapshots davor war es noch in Ordnung (habe ein paar Snaps übersprungen…)
Hier das Skript:
[code]procedure OnLoad;
begin
EnableTimer(1000);
end;
procedure OnTimer;
begin
if
(Encoder.GetConnections.GetItem(0).GetState = ecsConnected) then begin
if Encoder.GetConnections.GetItem(0).GetState = ecsConnected then
ExecuteCommand('ONAIRPRG TEXT ON AIR');
ExecuteCommand('ONAIRPRG BACKGROUNDCOLOR #FF0000')
ExecuteCommand('ONAIRPRG FONTCOLOR #FFFFFF')
end
else begin
ExecuteCommand('ONAIRPRG BACKGROUNDCOLOR #00FF00')
ExecuteCommand('ONAIRPRG FONTCOLOR #000000')
ExecuteCommand('ONAIRPRG TEXT OFFLINE')
if (Encoder.GetConnections.GetItem(0).GetState = ecsConnecting) then begin
ExecuteCommand('ONAIRPRG TEXT !OFF AIR!')
ExecuteCommand('ONAIRPRG FONTCOLOR #FFFFFF')
ExecuteCommand('ONAIRPRG BACKGROUNDCOLOR #FF0000')
Sleep(1000);
end;
ExecuteCommand('ONAIRPRG BACKGROUNDCOLOR #00FF00')
ExecuteCommand('ONAIRPRG FONTCOLOR #000000')
ExecuteCommand('ONAIRPRG TEXT OFFLINE');
end;
end;
begin
end.[/code]