Page 3 sur 3
Re: Enregistre le titre en cour sur radio dans un fichier te
Publié : ven. 10/mai/2013 9:52
par Backup
j'ai rééditer ma procedure ci dessus ! sorry je me reveille
Re: Enregistre le titre en cour sur radio dans un fichier te
Publié : ven. 10/mai/2013 10:44
par John
OK super ça marche la dernière modif:
Artist: Dwayne Kerr
Titre : I Didn't Know
Merci beaucoup.
A+
Re: Enregistre le titre en cour sur radio dans un fichier te
Publié : ven. 10/mai/2013 14:35
par Backup
je viens de reedité tout les codes (page1 aussi )
avec cette procedure
Code : Tout sélectionner
Procedure.s filtre(Var.s)
for i=32 to 255
if i<100
Var.s = ReplaceString(Var.s,"&#"+"0"+str(i),chr(i) )
Else
Var.s = ReplaceString(Var.s,"&#"+str(i),chr(i) )
Endif
Next i
; By Dobro
; autre exemple de filtre qui a l'avantage que nous voyons directement les caracteres que nous désirons garder , il suffit de les ajouter dans la chaine Ref.s
ref.s="0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ&()/éèê.:[]-' " ; << derniere caractere est un espace
For i=1 to len(var.s)
ex.s=mid(var.s,i,1)
If findstring(ref.s,ex.s)>0
sort.s=sort.s+ex.s
Endif
Next i
ProcedureReturn Sort.s
Endprocedure
j'ai ajouté la possibilité d'affichage des parentheses , et de certains accent , car j'ai constaté que de temps en temps il y en avait
j'ai aussi ajouté le Slash et le & car ça ne m"etonnerai pas qu'il faille les afficher ...
Re: Enregistre le titre en cour sur radio dans un fichier te
Publié : ven. 10/mai/2013 14:42
par John
Oui j'ai aussi rajouter [] car il y en a de temps en temps. ça marche bien maintenant.
Le plus gênant étant le ' qui me foutait un zouk sur l'afficheur du tuner!
pour le reste ça ajoute de la lisibilité au texte.
Merci.
Re: Enregistre le titre en cour sur radio dans un fichier te
Publié : ven. 10/mai/2013 14:51
par Backup
ok ben j'ai ajouté
...