kann es sein, dass die folgenden OnCartPlayer…-Prozeduren nicht (mehr) funktionieren? Möglicherweise seit der neuen Cartwall?
[tt]// Called when cart player is started
procedure OnCartPlayerStart(PlayerIndex: integer; Item: IPlaylistItem);
// Called when cart player is stopped
procedure OnCartPlayerStop(PlayerIndex: integer; Duration: TTimeValue; Item: IPlaylistItem);
// Called when cart player reaches EOF warning point
procedure OnCartPlayerEOFWarning(PlayerIndex: integer);[/tt]
Ich wollte gerade die EOF-Warnung auswerten und weiterverarbeiten, aber keine der drei Prozeduren wird aufgerufen.
Kannst Du das bei Dir reproduzieren?
Falls sie wirklich nicht mehr funktionieren, könntest Du sie wieder einbauen?
Wobei sich das immer auf die gerade aktive Seite bezieht. Wenn du also von einer Seite mit spielenden Playern auf eine Seite mit nicht spielenden Playern umschaltest, dann wirst du ganz viele Statusänderungen spielt -> stop bekommen. Primär ist die Prozedur dafür gedacht, MIDI-Keypads usw. mit der Anzeige der Cartwall zu synchronisieren.
Workaround, um OnCartPlayerStart und OnCartPlayerStop wieder ans Laufen zu kriegen:
procedure OnCartwallPlayerStateChange(PlayerIndex: integer;
OldState: TPlayerState; NewState: TPlayerState;
Item: IAudioCartwallItem; PlaylistItem: IPlaylistItem;
OnAirMode: TCartwallOnAirMode);
begin
if NewState = psPlaying then
OnCartPlayerStart(PlayerIndex, PlaylistItem)
else if OldState = psPlaying then
OnCartPlayerStop(PlayerIndex, 0, PlaylistItem);
end;
An die tatsächliche Spiellänge kommt man an der Stelle nicht ran, daher ersatzweise 0 - ich hoffe du wertest sie gar nicht aus
Ich muss mal schauen, ob ich die alten Prozeduren wieder ans Rennen kriege.
Play, Stop und die anderen Status werte ich in der Tat bereits durch[tt] OnCartPlayerStateChange [/tt]aus in so ähnlicher Weise, wie Du es beschrieben hast. Das funktioniert auch gut.
Eigentlich wollte ich jetzt nur noch zusätzlich “schnell” die EOF-Warnung dazubauen, sprich: Ich möchte eine LED blinken lassen, wenn eine Cart den EOF-Warnpunkt erreicht. Bei den Playlist-Playern habe ich das auch über[tt] OnPlayerEOFWarning [/tt]gelöst und wollte es so ähnlich auch für die Cart machen. Erst als ich alles fertig programmiert hatte, habe ich gemerkt, dass die Prozedur gar nicht angesprungen wird.
Die Carts selbst blinken ja bei EOF-Warnung. Kannst Du mit Beginn des Blinkens nicht recht einfach auch wieder[tt] OnCartPlayerEOFWarning [/tt]triggern?
Viele Grüße
Stefan
PS: Bitte markiere doch am besten in [tt] Background Script Template.mls [/tt] die Prozeduren als inaktiv, solange sie nicht mehr funktionieren. Ich schaue da immer mal rein, um zu schauen, ob ich noch von den richtigen Namen (und Parametern ) ausgehe.
Das stand noch als “to do” bei mir im Sourcecode, daher war es auch nicht aus dem Template entfernt
Es kommt gleich Build 3158. Testest du das bitte mal für mich? Die neuen Prozeduren lauten:
// Called when cart player is started
procedure OnCartwallPlayerStart(PlayerIndex: integer; Item: IAudioCartwallItem; PlaylistItem: IPlaylistItem);
begin
end;
// Called when cart player is stopped
procedure OnCartwallPlayerStop(PlayerIndex: integer; Item: IAudioCartwallItem; PlaylistItem: IPlaylistItem; Duration: TTimeValue);
begin
end;
// Called when cart player reaches EOF warning point
procedure OnCartwallPlayerEOFWarning(PlayerIndex: integer; Item: IAudioCartwallItem; PlaylistItem: IPlaylistItem);
begin
end;
