Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


Commande SAY pour Windrop [Résolu]
#1
Sad 
Bonjour,
je cherche à reproduire l'équivalent de ce script mIRC sur mon Windrop. Le soucis c'est que je n'arrive vraiment pas à comprendre le fonctionnement du TCL...


Code:
On *:TEXT:SAY #*:?:{
if ($nick ison #opers) { msg $2 $3- }
}
Merci d'avance... :)
#2
Salut,


tcl
bind msg - "say" say
proc say { nick uhost hand text } {
		 set chan [string tolower [lindex $text 0]]
    if { [nick2hand $nick] eq "*" } {
         puthelp "notice $nick :aucun axx"
    return 0
    }
	if {![string match #* [lindex $text 0]]} {
	     puthelp "notice $nick :Syntaxe incorrecte ! ( /msg $::botnick say <#salon> <text> ) !"
	return 0
	}
	if {![validchan [lindex $text 0]]} {
         puthelp "notice $nick :Désolé $nick mais le salon que tu demandes est inconnu !"
    return 0
    }
	if {![matchattr $hand o|o $chan]} {
         puthelp "notice $nick :Vous n'avez pas le level suffisant dans $::botnick pour utiliser cette commande $nick !"
    return 0
    }
	if {![botonchan [lindex $text 0]]} {
         puthelp "notice $nick :Désolé $nick mais je suis absent du salon $chan !"
    return 0
    }
		 set chann "[lindex [channels] [lsearch [string tolower [channels]] [string tolower [lindex $text 0]]]]"
         putserv "privmsg [lindex $text 0] :[join [lrange $text 1 end]]"
	return
}


Sa devrais fonctionner comme sa
#3
Merci bien, ça marche :)
#4
De rien marque ton sujet resolu :)


Possibly Related Threads…
Thread Author Replies Views Last Post
  [Résolu]Une commande putty via tcl aliasangelius 1 3,619 07/12/2012, 10:51
Last Post: CrazyCat
  [Résolu] Laisser un message pour un utilisateur loulou7593 15 9,306 29/12/2011, 13:53
Last Post: loulou7593
  aide pour une commande de ban loulou7593 4 5,173 17/12/2011, 02:06
Last Post: loulou7593
  Commande pour une chanlist loulou7593 5 4,950 10/06/2010, 13:17
Last Post: loulou7593
  commande pour listhand loulou7593 1 3,156 18/05/2010, 10:16
Last Post: loulou7593
  Ajout d'une commande pour Trivia loulou7593 1 3,858 07/10/2009, 14:18
Last Post: Artix
  Aide/Explications pour créer une commande heretoc 20 11,593 24/02/2009, 17:46
Last Post: heretoc

Forum Jump:


Users browsing this thread: 1 Guest(s)