Communauté Eggdrop
!planning radio - Version imprimable

+- Communauté Eggdrop (https://forum.eggdrop.fr)
+-- Forum : Eggdrop et TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=8)
+--- Forum : Scripts TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=4)
+--- Sujet : !planning radio (/showthread.php?tid=433)

Pages : 1 2

!planning radio - Babytigrou16 - 19/06/2009

Bonjour j'essai de faire une commande de !planning radio mais cela ne fonctionne le but de cette commande c'est de faire !planning radio pas !planning_radio mais j'ai essayer mais cela ne fonctionne ou es l'erreur ?

bind pub - !planning_radio planning
proc planning {nick uhost handle chan args} {
putquick "NOTICE $nick :Voici le planning de la radio"

}


Merci car la je suis a bout :S:S

RE: !planning radio - heretoc - 19/06/2009

Je n'est pas tout compris ...
Mais j'ai une idée (je sais pas si cela pourais marcher car je n'est jamais essayer de faire comme cela)

tcl
bind msg - "!planning" radio_planning
proc radio_planning {nick host hand arg} {
putquick "NOTICE $nick :Voici le planning de la radio" 
}




RE: !planning radio - Babytigrou16 - 19/06/2009

et non sa marche pas ...

RE: !planning radio - Artix - 19/06/2009

Je pense que faut effectivement utiliser un bind pubm

tcl
bind pubm - !planning pubm:planning
 
proc pubm:planning {nick uhost hand chan text} {
if {$text ne "radio"} { return }
putquick "NOTICE $nick :Voici le planning de la radio :"
}




RE: !planning radio - Babytigrou16 - 19/06/2009

eee bon sa marche pas mais il a pas de message d'erreur malheuresement )Sad

RE: !planning radio - BdS - 20/06/2009

tcl
bind pub - !planning planning
 
proc planning { nick uhost hand chan text } {
	if {[string tolower [lindex $text 0]]=="radio"} {
		putquick "NOTICE $nick :Voici le planning de la radio :"	
	} else {	
		putquick "NOTICE $nick :Syntaxe de la commande: !planning radio"
	} 
}



J'ai pas testé mais ça devrait t'aider.

RE: !planning radio - MenzAgitat - 20/06/2009

Artix a écrit :
tcl
bind pubm - !planning pubm:planning
 
proc pubm:planning {nick uhost hand chan text} {
if {$text ne "radio"} { return }
putquick "NOTICE $nick :Voici le planning de la radio :"
}

La solution est bien un bind pubm, mais la syntaxe est la suivante :
tcl
bind pubm flags cmd/mask procname


où cmd/mask doit matcher le chan + la commande, soit par exemple :
tcl
bind pubm - "* !planning radio" pubm:planning


ou
tcl
bind pubm - "#monchan !planning radio" pubm:planning



Petits rappels utiles concernant les binds :
  • il est possible d'utiliser des jokers dans un bind pubm/msgm mais pas dans un bind pub/msg
  • Il est possible de spécifier un chan dans un bind pubm mais pas dans un bind pub (qui lui est actif sur tous les chans)
  • Il est possible de cumuler plusieurs bind pubm/msgm ayant un déclencheur identique et un appel de procédure différent; cela est impossible avec un bind pub/msg : définir un autre bind pub/msg avec un déclencheur identique écrasera le précédent. On dit que les bind pubm/msgm sont "stackables" (empilables) tandis que les bind pub/msg ne le sont pas.
  • pour des informations détaillées sur les binds et leur syntaxe, voir ici : http://www.eggheads.org/support/egghtml/1.6.19/tcl-commands.html#bind


RE: !planning radio - cestlemien - 20/06/2009

Salut
Pour les binds ,vois aussi ici les 3/4 a ete traduite en français.

Bon week-end

RE: !planning radio - Babytigrou16 - 22/06/2009

mais je tien quand meme a souligné que sa ne fonctionne toujour pas en tk pas celon mon idée a moi mdrrr

RE: !planning radio - fedora - 22/06/2009

essaye peut être cela:

tcl
#//-//-//-//-//-//-//-//-//-//-#
#-//-//- Configuration -//-//-#
#//-//-//-//-//-//-//-//-//-//-#

#ici le(s) nom(s) de vos salon(s):
set salon_planning "#Salon"
 
bind pub - !planning_radio  pub:planning 
proc pub:planning { nick uhost handle channel arg } {
	global salon_planning
	foreach a $salon_planning {
		if {[string equal -nocase $channel $a]} {
	        	putquick "NOTICE $nick :Voici le planning de la radio :" 
        		putserv "NOTICE $nick :blablabla"
		}
	}
}



je n'est pas testé (je le signale)

cordialement

RE: !planning radio - BdS - 22/06/2009

Babytigrou16 a écrit :mais je tien quand meme a souligné que sa ne fonctionne toujour pas en tk pas celon mon idée a moi mdrrr

Peut être qu'on a pas compris ton idée a toi ...

RE: !planning radio - Obu - 22/06/2009

Bon je vous met sur la voix...

"switch" ??

serait nettement plus simple.

Pardon mais je ne te cracherais pas le morceau va donc recherché cet fonction et essaye de faire un petit bou de code et nous montrais t'es erreurs Smile

Good luck.

RE: !planning radio - Artix - 23/06/2009

switch ? y'a pas besoin de switch la - meme pas besoin de filtrer les chans
Pas besoin de foreach ou quoi que ce soit, un bind pubm peut marcher

tcl
bind pubm - "* !planning radio" pubm:planning
 
proc pubm:planning {nick uhost hand chan text} {
putquick "NOTICE $nick :Voici le planning de la radio :"
return }




RE: !planning radio - BlackNight - 26/06/2009

Je ne me permettrai pas de jour le role de modérateur, mais je tiens a te signaler babytigrou:

1- Utilise les balises [ tcl] [ /tcl] quand tu poste du code, ca a dû t'être répété une bonne dizaine de fois ... gare à toi, notre admin préféré risque de prendre des sanctions.

2- notre admin préféré (encore lui), demande cordialement de ne PAS utiliser de langage SMS, hors mon très cher bébé tigre, tes post en son remplis.

Ensuite pour ton code.
Déjà, si tu veux deux arguments à ta commande, utiliser un truc genre "!commande_blabla" dans le bind ça ne marchera JAMAIS.
Le code qu'a posté BdS me parais très bien approprié.

Voici ce que moi j'aurai fait.

tcl
proc putfast {arg} {
append arg "\n"
putdccraw 0 [string length $arg] $arg
}
#merci à Heretoc pour le putfast que je reprends toujours dans mes tcl
 
bind pub - !planning planrad
 
proc planrad { nick uhost handle channel arg } {
 
   if {[lindex $arg 0]!="radio"} {
putfast "NOTICE $nick :La syntaxe correcte est !planning radio"
	   } else {
putfast "NOTICE $nick :Le planning radio se trouve sur h ttp://tonsite.tld"
 
		}
	}



ici en pièce jointe (pour éviter la surcharge) je te le donne à titre d'indications et d'aide un de mes tcl pour la radio.
Je précise que, ce tcl n'est pas fini, et que certains morceaux ne fonctionnent pas.
Et si je vois que tu l'approprie ce tcl ou des morceaux comme le tien, je demanderai à un modérateur ou admin de prendre des mesures. vu que tu en as la fâcheuse habitude ...

ps: si tu souhaite poster des morceaux de code du animradio.tcl n'oublie pas d'enlever les couleurs. et d'utiliser la balise tcl.

RE: !planning radio - heretoc - 26/06/2009

faut eviter de coller des putfast a toutes les sauces ...
Un eggdrop n'est pas fait pour aller ci rapidement ...