26/11/2009, 09:01
bonjour,
ton code na rien à voir avec mon poste !! pourquoi putmsg ? ça ne serais pas PRIVMSG ? en regardant mon poste tu aurais arriver à le créer sans difficulté.mais bon ... voici mon TCL pour le AutoOp Niubot Orange. je vais le mettre dans la partie Téléchargement.
Cordialement
tcl
bind join - "*" joinbot
proc joinbot { nick host hand chan } {
if { $nick == $::botnick } {
putmsg niubotxx "op motdepass"
putmsg niubotyy "op motdepass"
putmsg niubotzz "op motdepass"
}
}
ton code na rien à voir avec mon poste !! pourquoi putmsg ? ça ne serais pas PRIVMSG ? en regardant mon poste tu aurais arriver à le créer sans difficulté.mais bon ... voici mon TCL pour le AutoOp Niubot Orange. je vais le mettre dans la partie Téléchargement.
tcl
# //-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//
# -={ Auto-Opage sur NiubOt }=-
#
# ***********************[ DESCRIPTION DU TCL ]*****************************
# * *
# Ce script sert à votre EggdrOp de ce Opé Automatiquement à un Niubot
# sur le serveur Orange.
# Un grand Merci pour L'aide de CrazyCat pour la création de ce TCL
#
# * *
# **************************************************************************
set autoOpTCLDesciption "Auto-Op"
set autoOpTCLVersion "2.1.1"
set autoOpTCLCreateur "DnS"
# *************************[ TCL informations ]**
# *
# *** [Nom du Fichier] -- AutoOp.tcl
# ******[Size en Ko] -- 2,63 ko
# *
# ********************************************[DnS .2009]**
# //-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//
# --------------Début De la Configuration---------------
# //-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//
# Configuration de l'auto Op Salon et pass NiubOt
# Ici Mettre le(s) pseudo(s) de(s) Niubot(s) (en minuscule)
set autoop(niubot) {"niubot1" "niubot2"}
# Ici Mettre le(s) Salon(s) ou ce Trouve le(s) Niubot(s) (en minuscule)
set autoop(salon) {"#SALON1" "#SALON2"}
# Ici Mettre le mot de passe pour que votre Eggdrop ce Op au(x) Niubot(s)
set autoop(pass) "LE PASS"
# //-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//
# !!! NE CHANGEZ RIEN A PARTIR DE CETTE LIGNE !!!
# //-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//
# le Binds
bind join - * autoop
# Systeme d Auto Opage sur le(s) Niubot(s)
proc autoop { nick uhost hand chan args} {
global botnick autoop
if {$nick != $::botnick} {
return 0
}
set idt [lsearch $::autoop(salon) [string tolower $chan]]
if { $idt eq -1 } {
return 0
} else {
putspeed "PRIVMSG [lindex $::autoop(niubot) $idt] :op $::autoop(pass) $chan"
putspeed "PRIVMSG [lindex $::autoop(niubot) $idt] :voice $::autoop(pass) $chan"
}
}
proc putspeed {arg} {
putquick "$arg"
}
# //-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//
putlog "$::autoOpAutoOpDesciption NiubOt version $::autoOpTCLVersion loaded. ** $::autoOpTCLCreateur **"
# //-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//
# --------------------FIN DU FICHIER--------------------
# //-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//-//
Cordialement
[font=Times New Roman]La différence entre Linux et Windows ,c'est que Linux c'est comme une belle fille , il faut l'apprivoiser , la comprendre , la séduire tandis que Windows , c'est comme une prostitué , il faut payer et surtout bien se protéger.[/font]