Fadeout en stop na laatste cat TBV Live-uitzending

[Gerrie K]

hallo,
Kan iemand mij opweg helpen met een weekscript wat ik aan het maken ben,AUB want ik kom er niet uit.

Ten eerste wil ik vermelden dat de licentie aanvraag in behandeling is,mijn oude automatiserings software gaat binnen afzienbare tijd als back up in de kast.

hier komt het stukje script wat ik wil aan passen,het gaat om de uren tussen 13:00 en 16:00 na deze periode moet Sam weer verder gaan met het PAL script.Sam moet om 12:59:08 starten met een promo,daarna opvolgend het nieuwblok en daarna nog een hitmix,na deze hitmix moet hij stoppen,en om 13:59:08 weer het zelfde doen.En zo ook nog voor het derde uur.Na 16:00 uur moet hij na de hitmix weer doorgaan of laden van de Queue.Ik hoop dat het begrijpelijk is.
Hier onder het stukje script voor de start om 13:00 uur,



// Zondag 13:00 uur
while DayOfWeek(Now) = Sunday and ((Now >= T['12:59:15']) and (Now < T['12:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['12:59:08']);
Queue.Clear;
Queue.AddFile('C:\Sound\KVJTspot.mp3',ipTop);
Queue.AddFile('C:\Nieuws\Nieuws LMN.mp3',ipBottom);
Cat['Hitmix'].QueueBottom(smRandom,NoRules);
DeckA.Stop;
DeckB.Stop;
Queue.Clear;
While Queue.Duration < QueueTime2011 do
Begin
Cat['2011'].QueueBottom(smRandom, EnforceRules);
Cat['2011'].QueueBottom(smLRP, EnforceRules);
Cat['2011'].QueueBottom(smLRP, EnforceRules);
Cat['JinglesRV'].QueueBottom(smRandom,NoRules);
end;
PAL.LockExecution;


Als bijlage het hele script

gr gerrie

[Gerrit]

Gerrie, ik kan de weekpal niet downen, ik krijg de melding dat ik niet bevoegd ben !
Ik hoop dat andere het ook niet lukt want mocht dat wel zo zijn dan ben ik bang dat ik uit mijn functie ontheven ben [smilie=yahoo.gif]

Gerrit.

btw:
Waarom zet je het script stil ? bedenk wel dat als de live-uitzending op wat voor manier niet doorgaat het wel stil wordt op je stream/zender !!
Bij ons wordt het script gewoon geladen en aangepast door de DJ die er op dat moment is.

[Wout]

Ik hoop dat andere het ook niet lukt want mocht dat wel zo zijn dan ben ik bang dat ik uit mijn functie ontheven ben

Asjemenou, zal gelijk voor je kijken Gerrit.

[edit] Der is iets meer aan de hand, er kunnen veel meer mensen niet downloaden, der zit een fout in de database ergens [smilie=gamer2.gif] [/edit]

[Gerrie K]

Gerrie, ik kan de weekpal niet downen, ik krijg de melding dat ik niet bevoegd ben !
Ik hoop dat andere het ook niet lukt want mocht dat wel zo zijn dan ben ik bang dat ik uit mijn functie ontheven ben [smilie=yahoo.gif]

Gerrit.

btw:
Waarom zet je het script stil ? bedenk wel dat als de live-uitzending op wat voor manier niet doorgaat het wel stil wordt op je stream/zender !!
Bij ons wordt het script gewoon geladen en aangepast door de DJ die er op dat moment is.

hallo Naamgenoot
Gerrit, ik doe dit al jaren zo,en trouwens ik ben de de enige jock,Sam mag blijven lopen maar tussen 13:00 en 16:00 uur neem ik het live over via Breakaway Broadcast Asio vanuit mijn studio thuis.
Dus Sam hoeft dan ik die uren alleen maar een spotje en het nieuws en de hitmix te draaien.

IK ben nog maar een leek met Sam Broadcasting (sound weet ik alles van af en van Breakaway ook een hoop) en met Raduga kan ik lezen en schrijven.Dus help me op weg of doe een suggestie,ik sta voor alles open!!!
Dat week plannertje is leuk voor de afwisseling ,vooral omdat mijn station een middle of the Road Format heeft.

Ps Radio Vredenburg draait op dit moment met Sam(wel een demo versie)want de licentie is nog niet binnen.

Gr gerrit,
Ohh Ja,de bijlage's kan ik ook niet downloaden (Hij geeft de melding niet bevoegd)

[Gerrit]

Wout, mij is het nu gelukt ! [smilie=yes2.gif]

Gerrit.

[Gerrit]

Kijk eens of dit werkt Gerrit:

Code: Selecteer alles

// Zondag 13:00 uur
while DayOfWeek(Now) = Sunday and ((Now >= T['12:59:15']) and (Now < T['12:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['12:59:08']);
Queue.AddFile('C:\Sound\KVJTspot.mp3',ipTop);
ActivePlayer.FadeTonext;
Queue.Clear;
Queue.AddFile('C:\Nieuws\Nieuws LMN.mp3',ipBottom);
Cat['Hitmix'].QueueBottom(smRandom,NoRules);
end;
PAL.LockExecution;
end;

// Zondag 14:00 uur
while DayOfWeek(Now) = Sunday and ((Now >= T['13:59:15']) and (Now <= T['13:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['13:59:45']);
Queue.AddFile('C:\Sound\KVJTspot.mp3',ipTop);
ActivePlayer.FadeTonext;
Queue.Clear;
Queue.AddFile('C:\Nieuws\Nieuws LMN.mp3',ipBottom);
Cat['Hitmix'].QueueBottom(smRandom,NoRules);
end;
PAL.LockExecution;
end;

// Zondag 15:00 uur
while DayOfWeek(Now) = Sunday and ((Now >= T['14:59:15']) and (Now <= T['14:59:25'])) do
begin
PAL.UnLockExecution;
PAL.WaitForTime(T['14:59:45']);
Queue.AddFile('C:\Sound\KVJTspot.mp3',ipTop);
ActivePlayer.FadeTonext;
Queue.Clear;
Queue.AddFile('C:\Nieuws\Nieuws LMN.mp3',ipBottom);
Cat['Hitmix'].QueueBottom(smRandom,NoRules);
While Queue.Duration < QueueTime2011 do
Begin
Cat['2011'].QueueBottom(smRandom, EnforceRules);
Cat['2011'].QueueBottom(smLRP, EnforceRules);
Cat['2011'].QueueBottom(smLRP, EnforceRules);
Cat['JinglesRV'].QueueBottom(smRandom,NoRules);
end;
PAL.LockExecution;
end;

Dit kun je testen door even de klok in windows terug te zetten naar 12:45 u. [smilie=wink3.gif]

Gerrit.

En dit even doen:

[Gerrie K]

Gerrit als ik dit doe krijg ik syntax error ";" expected [Line:290,colum:1]

[Gerrit]

Gerrit ik heb eens even zitten kijken maar wat me opgevallen is, is dat je een Weekformat hebt gedownload van de
slechste "PAL Goeroe on this Planet" we noemen verder geen namen maar er klopt helemaal niets van de hele PAL !!

Ik heb hier een Weekpal van mezelf en die heb ik al aangepast tussen 13:00 en 16:00 uur.

Je begrijpt dat hij verder nog helemaal naar eigen hand gezet moet worden.

Gerrit.

[Gerrie K]

hhahhhhaaa Gerrit..........Toch moeilijk om je eigen naam te typen


ik zal deze downloaden en aanpassen,testen zal ik hem ook


Ik zag nog een bericht op het forum van die uurtimer mag ik je melden dat dat wel redelijk goed werkt!!!

Bedankt zo ver ,want ik moet nog veel leren

[Gerrit]

Er zal ongetwijfeld nog wel wat verkeerd gaan maar dan horen we het wel.

Gerrit.

[Gerrie K]

heb ook de licentie nog niet binnen en ik wacht nog op een update van Breakaway Live

[Gerrie K]

Bijna goed Gerrit, Sam Loopt nu vast op het PAL script.

[Gerrit]

Vreemd, hier loopt hij gewoon zonder error !

Kun je wel zien wat voor fout hij geeft of is dat ook niet meer te zien?

Gerrit.

[Gerrie K]

Hier ook weer,Gerrit,
Ik heb even bij Spacialaudio op het forum gekeken,daar staan wat PAL codes op die ik ga proberen zoals:
fadeToStop en zo

[Gerrie K]

Gerrit,
Je kan wel een (LEGE) mp3 file in de player laten werken,hij is niet echt leeg.

Maak een file aan in Cool edit Pro met tones,selecteer een frequentie boven de 20.000hz (ik heb 23.000hz genomen) van 3600 seconden.
Encode deze met een kwaliteit van 128kbps 44100hz mono in MP3.
Geef de een naam en maak met IDTAG een tag aan,laad hem in de queue.
De file wordt gewoon geacepteerd door de player en is onhoorbaar maar speelt wel af.
Probeer het maar

Gr Gerrie

[Gerrie K]

Gerrit,
Je kan wel een (LEGE) mp3 file in de player laten werken,hij is niet echt leeg.

Maak een file aan in Cool edit Pro met tones,selecteer een frequentie boven de 20.000hz (ik heb 23.000hz genomen) van 3600 seconden.
Encode deze met een kwaliteit van 128kbps 44100hz mono in MP3.
Geef de een naam en maak met IDTAG een tag aan,laad hem in de queue.
De file wordt gewoon geacepteerd door de player en is onhoorbaar maar speelt wel af.
Probeer het maar

Gr Gerrie

Update:
Ik kan nu Sam voor de gek houden,zodat ik via dezelfde PC via line in van de M-Audio geluidskaart mijn lIve signaal kan zetten.
Sam hoef nu niet te stoppen met afspelen,Deze file zorgt dat er géén geluid op de stream gezet wordt,Nou ja eigenlijk wel maar dit is niet hoorbaar op de stream omdat de frequetie hoog is.

Heb algelopen nog een test uitgevoerd en de file toegevoegd aan't script,en het werkt.

Gerrie

[Gerrit]

Dat is ook een mooie simpele oplossing Gerrie, dan hoef je verder geen rare fratsen uit te halen met het script ! [smilie=good.gif]

Gerrit.