Ce script PAL permet de jouer un bip horaire au début de chaque nouvelle heure. Il faut pointer vers le fichier son qui contient les bips.
{Script PAL - Bip horaire par Matt - www.skyminds.net}
function ActivePlayer:TPlayer; forward;
{On attend la bonne heure}
PAL.WaitForTime(T['XX:00:00']);
{On ajoute le fichier bip}
Queue.Addfile('C:\bip.wav',ipTop);
ActivePlayer.FadeToNext;
{On lance le bon deck}
function ActivePlayer:TPlayer;
begin
if DeckA.Status = psPlaying then
Result := DeckA
else
Result := DeckB;
end;
Intérêt un peu limité mais bon, on ne sait jamais, cela peut vous être utile.
Rencontrez-vous des défis avec votre site WordPress ou WooCommerce? Laissez-moi les résoudre pour vous.
bjr Matt bravo pr le script(pal) et si a la place du fichier je veux fait passer 1 playlist? j’ai essayé de modifier ton script en mettant (c:playlist.m3u’,ipTop) à la place du fichier mp3, malheuresement ça ne marche pas comme je veux, ou alors je me suis trompé quelque part? aide moi stp. Merci d’avance.
Samut zenith,
Si tu veux charger une playlist, il faut que tu utilises la fonction AddList() et non Addfile(). Essaie ceci :
Merci pour ta reponse Matt effectivement ça marche nickel.
1 autre inquietude stp, il y t-il un moyen pour equilibrer le niveaux du volume des chanson?
une fois encore merci pour ta reponse
Bonjour, merci pour le script,
par contre si on ne veux pas que la lecture se fasse sur un deck (et donc “coupe” le titre qui est en cours de diffusion), comment s’y prend on ?
L’option de lire le bip horaire avec le SoundFX pourrait etre une solution, avec un parametre permettant de gerer le fade de Deck en cours de lecture.
quelqu’un a une idée sur le code que ca donnerait? mes competences en pal sont plus que limitée (j’ai déjà bien galeré pour comprendre qu’avec un “PAL.Loop := True ; le script se repetera de lui meme :( )
Tant que j’y suis, peut on trouver des tutos “super simple” sur le Palscript (genre avec des exemples concrets) quelque part? pas evident de comprendre le Pal quand le seul language qu’on connait est le html ;)
Salut le script fonctionne mais je suis obligé de le reactiver apres chaque heure.
Y a t il une soluce pour qu il reste tout le temps actif.
Merci
salut à tous,
voila, jai donc utiliser le script pour le bip horaire, MAIS, étant assez créatif, jai décider de mettre un top horaire correspondant a chaque heure :
PAr exemple a 1h le MR dit ” Il est 1h “.
sauf que le script ne fonctione pas dans ce cas la.
en duplicant les ligne et en changeant les (‘XX:00:00’) par les heures corespondantes et les adresses de fichiers correspondant, soit ca lance tous les top horaires au démarage de sam ou alors il execute le meme bip horaire pendant 1h.
comment faire pour obtenir un script qui soit capable de lancer un top horaire different a chaque heure sans se planter ??
merci ce serai suuuper top de chopper ca parceque j’en ai suuuper besoin.
et un grand merci a tous pour votre boulo….
je suis arrivé a faire mon scripte pour ajouter des fichiers au sommet du conducteur pour les top-h sans couper la zik en cour. Ce scripte ne se répète pas car il est commendé par un évènement dans event schedulder sui lance le scriptre a XX:59.00.
il faut bien penser a mettre la liste des fichiers à lire a l’envers dans le scripte pour que dans le conducteur ils soient dans le bon sens
mais le blem c’est que là il ajoute que la première et la dernière ligne et avec des retour à la ligne entre chaque catégorie ça revient au même, simplement là ça les ajoutent d’un coup.
Donc pour résumer, ce scripte ajoute les fichiers au sommet du conducteur sans lancer la zik, mais il y a que le top-h et le décro qui s’ajoutent vous pouvez m’aider à trouver pourquoi SVP ?
Salut,
Suivant ce à quoi correspondent tes catégories, je mettrais :
decro et top-h sont les deux seules catégories à ne pas suivre les règles (pas plus de X diffusions).
RE…
Je souhaite donc savoir si par hasard, quelqu’un sais si il existe un script qui balance un TOP H different a chaques heures ?
jai une petite impression que ma demande ne conçerne persone… ouinnn !!
en fait j’aimerai un bip horaire different de chaques heures sans que ces derniers soient ajoutées en BDD.
pour lemoment rien de rien ! jai essayer plusieurs combinaisons mais sans succes..
merci a vous de m’aider….
Salut,
Disneyweb, je crois que tu ce que tu cherches ressemble à ceci :
Voici les sons de l'heure en anglais, à toi de les enregistrer/trouver en français. N'oublie pas de modifier le chemin vers les fichiers MP3 dans les 5 premières lignes du script.
Bonjour Matt,
J’ai fait un top horaire avec 24 fichiers différents.
Tout fonctionne très bien sauf à 00H
Lorsque les 23H son passé, il cherche le 00H mais il ne le trouve pas car c’est le 00H du lendemain.
Comment puis-je parer à ce problème ?
J’ai testé de le mettre à 23:59:59 pour voir.
Voici mon script :
bonjour, j’ai essayé ce script et il me lit tous les top horaires d’un seul coup arf. moi aussi j’aurais aimé diffuser un top horaire different a chaque heure. :( qi quelqu’un peut m’aider je susi preneur. merci
Salut Etann86,
Cela fonctionne à 23:59 ? Si oui, garde-ça comme ça.
Salut Matt,
Oui, ça marche à 23H59.
Par contre, j’ai encore un problème lol… La radio tourne 24H/24 ce qui est logique… Le problème c’est qu’au bout de 72heures, elle s’arrête. Y’at-il un moyen de savoir dans un script pal, la détection de l’arr^t des deck et de les remettre en marche en cas d’arrêt ?
Salut,
Voici mon script si ça peu t’aider.
Il te fodra donc 24 tophoraire
J’ai pas trier, y’a d’autres trucs que je lance via ce script
///Script de Top Horaire
///Scripts qui boucle
PAL.Loop := True;
///Déclaration de fonction
function ActivePlayer:TPlayer; forward;
///Déclaration des variables
///var Mtn : DateTime = Now;
///Script qui attend l'heure 00:00:000
PAL.WaitForTime('01:00:00');
///CONDITION
///Ajout du fichier 00H.mp3 dans la file d'attente en début de celle-ci
Queue.AddFile('D:\RadioDpk\Top Horaires1H.mp3',ipTop);
///Passe à l'élément suivant de la file d'attente, soi le fichier 00H.mp3
ActivePlayer.FadeToNext;
///exétéra
PAL.WaitForTime('02:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires2H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('03:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires3H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('04:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires4H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('05:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires5H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('06:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires6H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('07:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires7H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('08:00:00');
Queue.Clear;
cat['ChroniqueHumour'].QueueTop(smLemmingLogic,EnForceRules);
Queue.AddFile('D:\RadioDpk\Top Horaires\EcouteSkech.mp3',ipTop);
Queue.AddFile('D:\RadioDpk\Top Horaires8H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('09:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires9H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('10:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires\10H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('11:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires\11H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('12:00:00');
Queue.Clear;
cat['ChroniqueHumour'].QueueTop(smLemmingLogic,EnForceRules);
Queue.AddFile('D:\RadioDpk\Top Horaires\EcouteSkech.mp3',ipTop);
Queue.AddFile('D:\RadioDpk\Top Horaires\12H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('13:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires\13H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('14:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires\14H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('15:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires\15H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('16:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires\16H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('17:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires\17H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('18:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires\18H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('19:00:00');
Queue.Clear;
cat['ChroniqueHumour'].QueueTop(smLemmingLogic,EnForceRules);
Queue.AddFile('D:\RadioDpk\Top Horaires\EcouteSkech.mp3',ipTop);
Queue.AddFile('D:\RadioDpk\Top Horaires\19H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('20:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires\20H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('21:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires\21H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('22:00:00');
Queue.Clear;
IF(DayOfWeek(Now) = Monday) OR (DayOfWeek(Now) = Wednesday) OR (DayOfWeek(Now) = Friday) THEN
BEGIN
CAT['ChroniqueNaissementVotre'].QueueTop(smLemmingLogic,EnForceRules);
END;
Queue.AddFile('D:\RadioDpk\Top Horaires\22H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('23:00:00');
Queue.AddFile('D:\RadioDpk\Top Horaires\23H.mp3',ipTop);
ActivePlayer.FadeToNext;
PAL.WaitForTime('23:59:59');
Queue.AddFile('D:\RadioDpk\Top Horaires0H.mp3',ipTop);
ActivePlayer.FadeToNext;
///Création de la fonction déclarée précédemment
///qui renverra l'identifiant du deck en cours
function ActivePlayer:TPlayer;
begin
if DeckA.Status = psPlaying then
Result := DeckA
else
Result := DeckB;
end;
Seul problème, dès que tu lances ce script il te joue tous les top horaires jusqu’au bon.
Je travaille sur une version qui ne le fera pas !
Bonne utilisation
Un immense merci a toi en tout cas pour cette reponse. je vais deja faire le tri dans le script.
Tiens moi au courant dès que tu penses avoir trouvé le moyen de supprimer le demarrage de tous les top horaires au lancement.
Encore mille mercis
Salut à tous,
j’ai utilisé le script de MATT, il fonctionne très bien, je l’ai adapté à ma façon sur SAM. Mais il y a un problème. D’habitude le bip horaire se lance au bon moment. Je me suis aperçu que, si un titre de ta playlist commence à un début d’heure (ex: 01h00) et qu’à ce moment-là, normalement, le bip se déclenche….eh ben, ce bip horaire sera diffusé juste après le titre. Quelqu’un aurait une idée?
Merci d’avance
Bonjour,
Effectivement un trés bon script ma question es la suivante j’ai pris le script il fonctione nikel mais il charge toujours les heures serai t’il possible que je ne doit pas a chaque fois le remettre manuellement en fonction mais en automatique je voudrais que je n’ai plus a me soucier de a chaque fois le remettre a manuellement je vous donne mon script j’ai peut-etre oublier une commande
merci d’avance de votre aide