PAL script om 18:00 uur beginnen en om 24:00 weer uit

[variafm]

Ik heb een vraag over PAL script om 18:00 uur laten beginnen en om 24:00 weer uit

PAL.Loop:=True;
const ShowURL = 'http://server-16.stream-server.nl:8704/';
const StartTime = '18:00:00';
const EndTime = '24:00:00';


Maar de tijden die werken niet ik zal iets fout doen maar wat ? ik heb dit ook al gedaan
PAL.WaitForTime(T['18:00:00']);

Maar je heb geen PAL.EndForTime (T['24:00:00']); dus daar schiet ik ook niks mee op ik hoor het wel als iemand dat weet groetjes Marcel

[Gerrit]

Marcel, probeer deze eens :

Code: Selecteer alles

PAL.Loop:=True;

PAL.WaitForTime(T['18:00:00']);

Queue.AddFile('http://server-16.stream-server.nl:8704/',ipTop);

ActivePlayer.Fadetonext;

PAL.WaitForTime(T['23:59:59']);
Queue.Clear;
ActivePlayer.Fadetonext;

Volgens mij moet het hiermee lukken.

Succes,

Gerrit.

[variafm]

Hallo Gerrit als eerst wou ik je even bedanken voor de reactie ik ga het vanavond even uit testen ik laat je het weten of het werk alvast bedankt groetjes Marcel

[variafm]

Hallo Gerrit iets eerder getest ik kon niet wachten zo naar me werk toe het werk goed perfect maar nou wou ik het op een dag in laten gaan die palscript






while DayOfWeek(Now) = Saturday and ((Now >= T['17:59:15']) and (Now <= T['22:59:25'])) do
begin

PAL.LockExecution;PAL.Loop:=True;

WriteLn('zaterdag');


Kijk Gerrit dit had ik van u wat er onder staat werk prima maar ik zou graag op een bepaalde dag palscript in werking laten gaan en ik ben bezig geweest boven staat het wat ik er bij gedaan heb maar werk niet als ik dat er bij doe werk het niet meer ik zal wel weer iets niet goed doen


PAL.WaitForTime(T['18:00:00']);
Queue.AddFile('http://server-16.stream-server.nl:8704/',ipTop);
ActivePlayer.Fadetonext;
PAL.WaitForTime(T['23:59:59']);
Queue.Clear;
ActivePlayer.Fadetonext;

Vriendelijke groet Marcel

[Gerrit]

Marcel,

Even een tip voor de evt. volgende topic die je gaat openen:
Zet daar zo veel mogelijk info in en niet zoals nu, eerst om een script vragen en later vragen of dit op een bepaalde dag kan !

Op die manier scheelt het voor ons veel [smilie=gamer2.gif] werk !

Hier je nieuwe script voor de zaterdag, ik heb hem nog niet getest !

Code: Selecteer alles

PAL.Loop:=True;
PAL.LockExecution;

// START OP Zaterdag 18:00 uur

while  DayOfWeek(Now) = Saterday and ((Now >= T['17:59:50']) and (Now <= T['17:59:55'])) do
Begin
PAL.UnLockExecution;
Queue.AddFile('http://server-16.stream-server.nl:8704/',ipTop);
Activeplayer.FadeTonext;
PAL.WaitForTime(T['+00:00:15']);
PAL.LockExecution;
end;

// VERDER MET DE NONSTOP om 24:00 uur

while  DayOfWeek(Now) = Sunday and ((Now >= T['23:59:50']) and (Now <= T['23:59:55'])) do
Begin
PAL.UnLockExecution;
Activeplayer.FadeTonext;
PAL.WaitForTime(T['+00:00:15']);
PAL.LockExecution;
end;
PAL.UnLockExecution;

Succes,
Gerrit.

[variafm]

Hallo Gerrit ja sorry ik zal er op letten maar dat kom zo ik was blij dat hij het deed ik denk nou dan kan ik zelf wel de dag er bij zetten van een oude script die ik had maar ik zat er mooi naast het was niet de bedoeling om dit ook nog eens te vragen anders had ik het wel gelijk gedaan ik ga het script testen maar als ik naar die script kijk snap ik er niks van maar natuurlijk weer bedankt voor de reactie vriendelijke groet Marcel [smilie=wink3.gif]

[Gerrit]

Je moet nog even 1 ding aanpassen Marcel !

Deze regel:

Code: Selecteer alles

while  DayOfWeek(Now) = Sunday and ((Now >= T['23:59:50']) and (Now <= T['23:59:55'])) do

veranderen in deze:

Code: Selecteer alles

while  DayOfWeek(Now) = Saterday and ((Now >= T['23:59:50']) and (Now <= T['23:59:55'])) do

Gerrit.

[variafm]

Oke Gerrit ga ik even doen nog geen tijd gehad om hem te testen druk op me werk geweest maar alvast bedankt groet Marcel