begin process at 2012 02 05 15:59:21
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

AddOns

 > ANTIPUB - AVEC AVERTISSEMENT + CONTRE PUB (POUR BOTS)

ANTIPUB - AVEC AVERTISSEMENT + CONTRE PUB (POUR BOTS)


 Information sur la source

Note :
9 / 10 - par 1 personne
9,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :AddOns Niveau :Débutant Date de création :25/12/2002 Date de mise à jour :25/12/2002 17:34:05 Vu :6 989
Auteur : serialkinder

Ecrire un message privé
Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note

 Description

Chose à faire :
le mettre dans son dossier MIRC , tapez n'importe ou : /load -rs antipub.mrc . Ensuite faîtes un click droit sur 1 channel , et entrer le nom du chan ou vous voulez que le script soit actif , exemple #Pubs (n'oubliez pas le "#")
Son fonctionnement :
lorsque une personne tapera le nom d'un chan , dans une de ses phrases (exemple : BoB: venez sur mon #chan c'est le meilleur...) alors il aura un avertissement du bot écrit sur le chan , et votre bot , joinera #chan avec un contre pub , (exemple /join #chan , ensuite "BoB a écris sur #lechan ou vous voulez que le script soit actif : venez sur mon #chan c'est le meilleur puis un /part #chan)
et si "bob" refait une pub , il sera automatiquement banni pendant 2 min
et ca repart en boucle , (si il refait un pub (avertissement) 1 autre (kick ban 2mn)

Source

  • menu channel,nicklist,query {
  • -
  • Script-Antipub
  • .ProtectChan:{ set %chan $$?="Entre le channel à protéger" }
  • } }
  • on *:TEXT:*#*:%chan: {
  • /set %frase $1-
  • if ($nick isop %chan) { //echo -a 4Tu ne peux pas kicker $nick (Op) }
  • elseif ($read(kb.txt, w, * $+ $address($nick,3) $+ *)) && ($nick !isop %chan) && ($wildtok(%frase,#*,1,32) != %chan) {
  • /set %lam $address($nick,3)
  • /mode %chan +b %lam
  • /timer 1 1 /kick %chan $nick 4no pubs! (2nd time) = KickBan 2mn
  • /write -d kb.txt %lam
  • /timer 1 120 /mode %chan -b %lam }
  • elseif ($wildtok(%frase,#*,1,32) != %chan) {
  • /msg %chan 4C5aution $nick 4no pubs! (1st time) Next Time = KickBan 2mn
  • /write kb.txt $address($nick,3)
  • /join $wildtok(%frase,#*,1,32)
  • /timer 1 2 /msg $wildtok(%frase,#*,1,32) 5< 4g04g04g0 on %chan 5> 4pub détectée sur %chan de $nick 12[4 $+ $asctime(HH:nn) $+ 12] < $+ $nick $+ > : %frase  }}
  • if ($me ison $wildtok(%frase,#*,1,32)) { //echo -a 4Tu es déjà sur le chan :) }
  • elseif ($me !ison $wildtok(%frase,#*,1,32)) { /timer 1 8 /part $wildtok(%frase,#*,1,32) } }
  • on *:ACTION:*#*:%chan: {
  • /set %frase $1-
  • if ($nick isop %chan) { //echo -a 4Tu ne peux pas kicker $nick (Op) }
  • elseif ($read(kb.txt, w, * $+ $address($nick,3) $+ *)) && ($nick !isop %chan) && ($wildtok(%frase,#*,1,32) != %chan) {
  • /set %lam $address($nick,3)
  • /mode %chan +b %lam
  • /timer 1 1 /kick %chan $nick 4no pubs! (2nd time) = KickBan 2mn
  • /write -d kb.txt %lam
  • /timer 1 120 /mode %chan -b %lam }
  • elseif ($wildtok(%frase,#*,1,32) != %chan) {
  • /msg %chan 4C5aution $nick 4no pubs! (1st time) Next = KickBan 2mn
  • /write kb.txt $address($nick,3)
  • /join $wildtok(%frase,#*,1,32)
  • /timer 1 2 /msg $wildtok(%frase,#*,1,32) 5< 4g04g04g0 on %chan 5> 4pub détectée sur %chan de $nick 12[4 $+ $asctime(HH:nn) $+ 12] < $+ $nick $+ > : %frase  }}
  • if ($me ison $wildtok(%frase,#*,1,32)) { //echo -a 4Tu es déjà sur le chan :) }
  • elseif ($me !ison $wildtok(%frase,#*,1,32)) { /timer 1 8 /part $wildtok(%frase,#*,1,32) } }
menu channel,nicklist,query {
  -
  Script-Antipub
  .ProtectChan:{ set %chan $$?="Entre le channel à protéger" }
} }

on *:TEXT:*#*:%chan: {
  /set %frase $1-
  if ($nick isop %chan) { //echo -a 4Tu ne peux pas kicker $nick (Op) }
  elseif ($read(kb.txt, w, * $+ $address($nick,3) $+ *)) && ($nick !isop %chan) && ($wildtok(%frase,#*,1,32) != %chan) {
    /set %lam $address($nick,3)
    /mode %chan +b %lam
    /timer 1 1 /kick %chan $nick 4no pubs! (2nd time) = KickBan 2mn 
    /write -d kb.txt %lam
  /timer 1 120 /mode %chan -b %lam }
  elseif ($wildtok(%frase,#*,1,32) != %chan) {
    /msg %chan 4C5aution $nick 4no pubs! (1st time) Next Time = KickBan 2mn 
    /write kb.txt $address($nick,3) 
    /join $wildtok(%frase,#*,1,32)
  /timer 1 2 /msg $wildtok(%frase,#*,1,32) 5< 4g04g04g0 on %chan 5> 4pub détectée sur %chan de $nick 12[4 $+ $asctime(HH:nn) $+ 12] < $+ $nick $+ > : %frase  }}
if ($me ison $wildtok(%frase,#*,1,32)) { //echo -a 4Tu es déjà sur le chan :)  }
elseif ($me !ison $wildtok(%frase,#*,1,32)) { /timer 1 8 /part $wildtok(%frase,#*,1,32) } }

on *:ACTION:*#*:%chan: {
  /set %frase $1-
  if ($nick isop %chan) { //echo -a 4Tu ne peux pas kicker $nick (Op) }
  elseif ($read(kb.txt, w, * $+ $address($nick,3) $+ *)) && ($nick !isop %chan) && ($wildtok(%frase,#*,1,32) != %chan) {
    /set %lam $address($nick,3)
    /mode %chan +b %lam
    /timer 1 1 /kick %chan $nick 4no pubs! (2nd time) = KickBan 2mn 
    /write -d kb.txt %lam
  /timer 1 120 /mode %chan -b %lam }
  elseif ($wildtok(%frase,#*,1,32) != %chan) {
    /msg %chan 4C5aution $nick 4no pubs! (1st time) Next = KickBan 2mn 
    /write kb.txt $address($nick,3) 
    /join $wildtok(%frase,#*,1,32)
  /timer 1 2 /msg $wildtok(%frase,#*,1,32) 5< 4g04g04g0 on %chan 5> 4pub détectée sur %chan de $nick 12[4 $+ $asctime(HH:nn) $+ 12] < $+ $nick $+ > : %frase  }}
if ($me ison $wildtok(%frase,#*,1,32)) { //echo -a 4Tu es déjà sur le chan :)  }
elseif ($me !ison $wildtok(%frase,#*,1,32)) { /timer 1 8 /part $wildtok(%frase,#*,1,32) } }

 Conclusion

petit script qui marche uniquement pour 1 channel :/
j'avais ce script dans un de mes bots, je n'ai jamais réellement mis le nez dedans, mais il fonctionne.
Je sais qu'il a bien plus à pas mal de users sur @qnet . Mais je sais pas si il est réellement utile ailleurs :) car Qnet c'est une mentalité assez spécial :D


 Sources de la même categorie

PACMAN MULTI-JOUEUR EN LIGNE par wims
PROXY&SOCKS SCANNER+LEECHER par independentt
GESTIONNAIRE DE HIGHLIGHT AVANCÉ AVEC IGNORE SALON OU PSEUDO par doob666
AUTOJOIN HTABLE MULTISERVER par doob666
TCL - AJOUT SUPPRESSION DE LOGS par Atok
Toutes les sources de la catégorie AddOns

Commentaires et avis

Commentaire de jashugan le 02/01/2003 19:00:59

est ce que tu pourrai le modifier pr que ce soir o premier # un avertissement o 2eme # un kick et le 3eme un ban ?
avec comme possibilité de pvoir anuler lorsque c une erreur le mec te donne un chan comme ca et sil en donne un otr sil é kicker alor quil taide ba voila koa kon puisse annuler
et un dernier truc ossi un on et off :))
sinon ca roxx tt serieu gg

Commentaire de CaSsNoiX le 06/01/2003 23:46:37

je sias pas pkoi mais tous les codes ou il y a un /load -rs etc....mrc ca me marque * /load: no such file 'C etc...
ou dois je exactement marquer ce texte et avec quel accessoire ( note pad ca marche?) moi je suis le newbie de chez newbie
merci

Commentaire de t0nt0n le 09/01/2003 17:40:05

Eh en fait c ptet que tu donne pas le bon endroit:
si tu l'a bien placer dans ton docier IRC , par deffault MIRC, et que c'est un fichier MRC, tu n'a pas besoin de specifier TOUT le chemin d'acces:
Si par exemple, tu place un fichier "antipub.mrc" dans ton dossier MirC!
Tu aura juste a faite: /load -rs antipub.mrc   et  pas bésoin de faire
/load -rs C:Programmes FilesMirCantipub.mrc (par deffault)!
Voila, et si tu place un dossier "antipub" avec a l'interieur le fichier "antipub.mrc" , la il te faudra specifier dans quel dossier se trouve le script : /load -rs antipub/antipub.mrc
StoO*
Ou tout simplement : tu vas dans les menus au dessu: Remote, load, script et tu le met lol :)
Aller ++ et bon scripting

Commentaire de serialkinder le 13/01/2003 21:26:44

hum j'aurais bien voulu t'aider jashugan , mais là je suis en train de faire un bot pour pickup , hyper complexe , environ 4000 lignes , et j'ai vraiment pas de temps à consacrer pour le reste(autres scripts irc)  :) désolé , peut-être quand j'aurais un coup de motivation :) et que le bot ne contiendra plu de bugs :)

Commentaire de ELVISELVIS le 22/04/2003 07:17:49

Boff.. c po si pire mais ya juste un prob.. tu peut pas le mettre a off avec les commandes du popus .. fack si un jour sa te tente pu de protégé le chan de pub.. ben tu peut pas .. tk

 Ajouter un commentaire

Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Waterfall in Kauai Hawaii With RainbowPhoto Water in the Beginning of the Grand Canyon
Photo Spooky City View at Sunrise 

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,718 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)