if ((PlayerControl.GetState <> psPaused) and (PlayerControl.GetCaption = ‘MAL1’)) then begin
MidiOut ( 01, 176, 73, 00 ) ;
end;
if ((PlayerControl.GetState <> psPaused) and (PlayerControl.GetCaption = ‘MAL2’)) then begin
MidiOut ( 01, 176, 74, 00 ) ;
end;
if ((PlayerControl.GetState <> psPaused) and (PlayerControl.GetCaption = ‘EV’)) then begin
MidiOut ( 01, 176, 75, 00 ) ;
end;
end;
begin
end.[/code]
des weiteren zeigt mir mairlist das liedende beim fadeout punkt, obwohl ich das ausgeschaltet habe. scheint ein bug zu sein.
Schau dir das neue Notification Script Template an, die Parameterlisten haben sich geändert. Dort bekommt man jetzt die Nummer der Playlist und die Nummer des Players übergeben anstelle des PlayerControl-Objektes. Auf das Objekt kann man sich mit Playlist(PlaylistIndex).GetPlayer(PlayerIndex) zugreifen. Anstelle der GetCaption-Vergleiche kannst du auch direkt mit PlayerIndex vergleichen (der erste Player hat die 0).
habe fast alle scripten wieder zum laufen bekommen. hier aber eins, wo ich die parameter leider nocht weiß, da sie mit der scripthelp nicht mehr zusammenstimmen. und zwar möchte ich, dass beim starten des cartwall1 players alle anderen ausfaden.
[code]procedure OnCartPlayerStart(PlayerIndex: integer);
begin
if (Playerindex=0 ) then begin
//hier das fehlende Kommando ;
end;
end;
das hab ich vorher auch schon probiert nur kommt dann:
26.06.2009 15:52:18 Fehler Fehler beim Laden von D:\mAirList-3.0.4\scripts\notification\CARTPLAYER_STOP_NEU.mls: [Fehler] (6:24): Unknown identifier ‘GETCARTWALL’
[code]var i : Integer;
procedure OnCartPlayerStart(PlayerIndex: integer);
begin
if (Playerindex=0 ) then begin
for i := 1 to Engine.GetCartwall.GetPlayerCount - 1 do
Engine.GetCartwall.GetPlayer(i).FadeOut;
end;
end;
oh hatte ich übersehen. jetzt kommt aber die meldung:
27.06.2009 09:17:29 Fehler Fehler beim Laden von D:\mAirList-3.0.4\scripts\notification\CARTPLAYER_STOP_NEU.mls: [Fehler] (5:29): Unknown identifier ‘GETPLAYER’
[code]var i : Integer;
procedure OnCartPlayerStart(PlayerIndex: integer);
begin
for i := 1 to Engine.GetCartwallControl.GetPlayerCount - 1 do
Engine.GetCartwallControl.GetPlayer(i).FadeOut;
end;
Guck dir dein Script genau an: Es wird aufgerufen, wenn irgendein Player gestoppt wird, und schickt dann für alle, die nicht im Pause-Zustand sind, ein entsprechendes MIDI-Signal. Wie kommt es nun, dass Player A gestoppt wird? Schickt das MIDI-Gerät etwas zurück?
ach ja: es schickt nur ein bestimmtes midisignal aus, wenn ein bestimmter player gestoppt wird. das fragt er ja ab mit playerindex. deshalb verstehe ich das nicht ???
Wo soll denn da die Abfrage nach dem entsprechenden Player sein? Die sehe ich nicht. Es werden immer beide Player behandelt. Vielleicht möchtest du noch ein “and (PlayerIndex=0)” bzw. “and (PlayerIndex=1)” dazubauen?