[Résolu] rajout d'une exception sur une commande de kick

[Alucard`68]

Salut,

D'accord sa marche encore merci :)

Edit : oui aliasangelus un tcl du genre !k !kb

dans se style la

tclcopier

bind pub - !kr kickraison
bind pub - !kflood kickflood
 
proc kickraison { nick host hand channel text } {
  global vhostmodo1 kickraison
  set args [split $text]
  set victim [lindex $args 0]
  set reason [join [lrange $args 1 end]]
  foreach vhost $vhostmodo1 {
    if [string match -nocase $vhost $host] {
      putserv "PRIVMSG $::cs kick $channel $victim $reason"
      putserv "PRIVMSG $::log :\0034$victim \00312a été kick de \0034$channel \00312par \0034$nick \00312pour la raison :\0037 $reason"
      }
   }
}
 
proc kickflood { nick host hand channel arg } {
  global vhostmodo1 kickflood
  foreach vhost $vhostmodo1 {
    if [string match -nocase $vhost $host] {
      putserv "PRIVMSG $::cs kick $channel $arg \00312Le flood est interdit sur les salons officiels !"
      putserv "PRIVMSG $::log :\0034$arg \00312a été kick de \0034$channel \00312par \0034$nick \00312pour flood."
      }
   }
}

Voila encore merci de ton aide.