04/12/2011, 12:27
Pages : 1 2
04/12/2011, 12:29
t as quelle version d eggdrop et quelle version de tcl?
04/12/2011, 12:30
tcl8.5 eggdrop1.6.18
04/12/2011, 12:32
tcl8.5 avec un eggdrop 1.6.18?? impossible! eggdrop1.6.18 ne le prend pas en charge
04/12/2011, 12:35
Pourtant moi sa fonctionne
04/12/2011, 12:37
la preuve que non, ce tcl a été testé par plein de monde et il fonctionne parfaitement.
commences par mettre à jour ton eggdrop en 1.6.20 avec tcl8.5.3 minimum
commences par mettre à jour ton eggdrop en 1.6.20 avec tcl8.5.3 minimum
04/12/2011, 12:41
Quand je met tcl8.5.3 sa me met ça :
Code :
Reading package lists... Done
Building dependency tree
Reading state information... Done
E: Couldn't find package tcl8.5.304/12/2011, 12:43
le .3 c est la subversion, a toi de contrôler si tu l'as bien. mais pour l installation il faut utiliser "8.5"
04/12/2011, 15:20
Pour installer tcl8.5 il faut installer le paquetage tcl8.5 et tcl8.5-dev, pour ce qui est des scripts TCL shoutcast, ils ne sont pas compatibles avec radionomy, ils utilisent Icecast avec d'autres modules... donc il faut utiliser le xml pour le titrage.
Sinon, je me rapelle avoir vu un code de CrazyCat pour radionomy
Il faut remplacer les "-RADIOUID-" dans le lien de la variable "url" par l'uid de la radio fourni sur le site radionomy.
Sinon, je me rapelle avoir vu un code de CrazyCat pour radionomy
tcl
bind pub - "!titre" radio:titre
set url "http://api.radionomy.com/currentsong.cfm?radiouid=-RADIOUID-&apikey=-RADIOUID-&apikey=-RADIOUID-&type=xml"
package require http
proc radio:titre { nick uhost handle chan args } {
set page [::http::geturl $::url -timeout 3000]
set html [::http::data $page]
regexp -all -- {<title>(.+)?</title>} $html null title
regexp -all -- {<artists>(.+)?</artists>} $html null artist
putserv "PRIVMSG $chan :En cours: \002$title\002 par \002$artist\002"
}
Il faut remplacer les "-RADIOUID-" dans le lien de la variable "url" par l'uid de la radio fourni sur le site radionomy.
08/12/2011, 00:22
Merci pour le code blaster91.
Pages : 1 2