IDENTIFICATION DU EGGDROP identification, TCL, tutorial, auto ident, ident, Source N°45029

Information sur la source

Catégorie :Scripts Classé sous : identification, TCL, tutorial, auto ident, ident Niveau : Débutant Date de création : 12/12/2007 Date de mise à jour : 12/12/2007 17:46:10 Vu : 2 432

Auteur : Exagone

Site perso

Ecrire un message privé

Note :
Aucune note

Commentaire sur cette source (4)

Ajouter un commentaire et/ou une note

Description

voici une des binds pour que le eggdrop ce auto identifi , grâce à ce bind , il peut aussi ce oper , ce mettre superadmin et se hoster automatiquement

Source

# Variables globales - informations du bot #
set nsnick "Nom-du-bot"
set nspass "mot-de-passe-du-bot"
# Identification Ns
bind notc - * ident_ns
proc ident_ns { nick uhost handle arg dest } {
global botnick nsnick altnick nspass
if { ([string match "*Si vous ne changez pas*je changerai votre pseudo.*" $arg]) && ($nick == "NickServ") } {
if { ($botnick == $nsnick) || ($botnick == $altnick) } { putquick "PRIVMSG nickserv :identify $nspass" }
}
}
bind notc - * oper
proc oper { nick uhost handle arg dest } {
if { ([string match "*Votre vhost*est activée.*" $arg]) && ($nick == "HostServ") } {
putserv "oper login mot-de-passe"
putserv "os set superadmin on"
}
}
bind raw - "001" identify
proc identify { from keyword text } {
putquick "identify mot-de-passe-du-pseudo"
putquick "oper login mot-de-passe"
putquick "os set superadmin on"
putquick "hs on"
}

# Variables globales - informations du bot #
set nsnick "Nom-du-bot"
set nspass "mot-de-passe-du-bot"

# Identification Ns

bind notc - * ident_ns    
proc ident_ns { nick uhost handle arg dest } {
global botnick nsnick altnick nspass
if { ([string match "*Si vous ne changez pas*je changerai votre pseudo.*" $arg]) && ($nick == "NickServ") } {
 if { ($botnick == $nsnick) || ($botnick == $altnick) } { putquick "PRIVMSG nickserv :identify $nspass" }
}
}

bind notc - * oper    
proc oper { nick uhost handle arg dest } {
if { ([string match "*Votre vhost*est activée.*" $arg]) && ($nick == "HostServ") } {
 putserv "oper login mot-de-passe"
 putserv "os set superadmin on"
}
}

bind raw - "001" identify

proc identify { from keyword text } {
putquick "identify mot-de-passe-du-pseudo"
putquick "oper login mot-de-passe"
putquick "os set superadmin on"
putquick "hs on"
}

Conclusion

Alors , remplaçez :
pseudo : par le pseudo du bot
mot-de-passe , par le mot de passe du pseudo
login , pass : par votre oper , ex : oper exagone abcd
mot-de-passe-du-bot par le mot de passe du pseudo
Voilà

Si vous avez quelques remarque à me faire n'hésitez pas

Historique

12 décembre 2007 17:30:11 :: Alors mettez ça sur un bloc texte , enregistrez le en tant que base.tcl mettez le sur le document scripts de votre eggdrop puis allez sur la racine de votre eggdrop donc eggdrop.conf et mettez sur Source : source/scripts/base.tcl
12 décembre 2007 17:46:10 :: Alors mettez ça sur un bloc texte , enregistrez le en tant que base.tcl mettez le sur le document scripts de votre eggdrop puis allez sur la racine de votre eggdrop donc eggdrop.conf et mettez sur Source : source/scripts/base.tcl

Sources de la même categorie

Toutes les sources de la catégorie Scripts

Sources en rapport avec celle ci

Commentaires

Commentaire de Bestdoud le 12/12/2007 17:38:26

juste pour dire que identification c'est avec un C
Commentaire de Exagone le 12/12/2007 17:44:03

lol , désoler je vais voir ça , j'ai quelques probléme avec la langue de temps en temps merci
Commentaire de uaip le 15/12/2007 17:06:02

mouai. euh... si tu postes ce code ici, ca serait bien qu'il soit "universel", or là on doit trafiquer ta source pour paramétrer nos pass, etc. Mets directement toutes les var en haut de code, puis ensuite ca fait tout tout seul. (au lieu de laisser des "login mot de passe" partout).
et juste un détail, au lieu de rajouter la var nsnick, ya pas deja $botnick inclue dans l'interpréteur ?
sinon, pas mal :)

PS: (T'es Exagone, l'anim+ sur CL ?)
Commentaire de Exagone le 16/12/2007 19:59:49

Oui , c'est moi ExaGonE l'anim+ , content de te revoir lol , eu pour $botnick , je crois pas qu'il est dans l'interpréteur je vais me renseigner , et je corrige s'il y a lieu

Ajouter un commentaire

Discussions en rapport avec ce code source

tutorial tcl par aNaKiN_

Radio.tcl par NEO___

afficher host ou ident dans un menu par BiGOuF

Rcherche scripteur tcl par kayak2007

Tutorial débutant par linkinpar236737

Probleme avec un script TCL par lTommyl

problem de socket + tcl par sommer

PROPOSITION POUR IRCFR par TroXsA

Aide /server -m (avec ident temporaire) par Casion

Tcl : récupération de données par Nenex