Badnick webcam

[nispOr]

Salut,


Je voudrais faire un script tcl pour signalé les webcams, du genre en tapant : /cam pseudo ou /bc pseudo, le bot affiche un message sur le salon précisé.
Ou si vous avez un script qui soit à peu près proche de celui-là merci de m'en faire par.

[CrazyCat]

Tout d'abord, un eggdrop ne réagira pas à /quelquechose, ton client IRC enverra directement cette commande au serveur.
Tu peux faire réagir un eggdrop à une pseudo-commande, donc qui ne commence pas par /, comme !cam ou :cam ou juste "cam" en début de phrase.

Et la commande doit-elle être envoyée en privé à l'eggdrop, ou directement sur le canal où se trouve la personne ou bien sur un autre canal ?
Et comment l'eggdrop sait sur quel canal il doit agir ?

[nispOr]

Je me disais aussi, alors tout ce passera via message privé.
Exemple dans le privé de l'eggdrop, en tapant : cam pseudo il affichera sur le salon où ce trouve les membres du staff le signalement
Le bot sera également présent sur le salon ou ce situera les membres.

[CrazyCat]

Donc en gros:

tclcopier

set actchan "#canalasurveiller"
set modchan "#canaldes modos"
 
bind msg - "cam" avertir
proc avertir { nick handle uhost text } {
   if {[llength [split $text]] == 0 } {
      putserv "PRIVMSG $nick :Il faut donner un nick"
      return 0
   }
   set vict [lindex [split $text] 0]
   set uvict [getchanhost $vict $::actchan]
   if { $uvict eq "" } {
      putserv "PRIVMSG $nick :$vict n'est pas sur $::actchan"
      return 0
   }
   putserv "PRIVMSG $::modchan :Attention: $nick signale que $vict ($uvict) montre ses fesses sur $::actchan"
   return 1
}

[nispOr]

Merci, mais je viens de le tester il n'affiche rien sur le salon "modos" :3
il y a que le PRIVMSG "Il faut donner un nick" qui fonctionne.

[nispOr]

Ah si finalement ça marche, merci beaucoup. :D