Script identifiant un titre

[levasseur]

Salut,

Je tennais a vous faire un petit cadeau (c'est de circonstance).

Ci dessous un script qui va vous permettre de placer sur l'intro d'une chanson un liner bien spécifique.

Trés efficace pour annoncer une nouveauté, ou alors pour imaginons, une journée spéciale sur l'artiste en question.

var theSong : TSongInfo;
var theString : String;

//Vérification de la chanson en attente.

   theSong := Queue.NextInQueue;
   Queue.AddFile(theSong['filename'],ipTop);

//Vérification du nom de l'artiste et si intro disponible
   theString :='d:\intro_folder\'+(theSong['artist'])+'.mp3';

      if FileExists(theString)
         then Queue.AddFile(theString,ipTop)
         else Cat['something_else'].QueueTop(smRandom,NoRules);
      end;

theSong.Free;