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]
#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


Messages In This Thread
Commande SAY pour Windrop [Résolu] - by tow - 19/11/2012, 00:07
RE: Commande SAY pour Windrop - by aliasangelius - 19/11/2012, 00:29
RE: Commande SAY pour Windrop - by tow - 19/11/2012, 01:02

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

Forum Jump:


Users browsing this thread: 1 Guest(s)