begin process at 2010 03 20 17:03:19
  Trouver un code source :
 
dans
 
Accueil > Forum > 

IRC

 > 

Scripting

 > 

Général

 > 

protect marche partout !


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

protect marche partout !

dimanche 10 février 2008 à 22:09:40 | protect marche partout !

Benjamin37

Membre Club
Bonsoir !

j'aurais besoin de votre aide car je voudrais que ça ne marche que pour le serveur Entrechat mais pas pour les autres or quand on lance un pv sur un autre serveur il me la lance quand meme la protect

Voici le code :

Alias Chkqry {
  Var %iqry = 1
  While (%iqry <= $1) {
    If (guest isin $gettok($query(%iqry).addr,1,64)) { closemsg $query(%iqry) }
    Inc %iqry
  }
}

Alias SilenceCloseAll { .TimerCLALL 0 1 Chkqry $query(0) | .Timer 1 30 .TimerCLALL off }

on *:invite:#:{
  If $regex($nick,/^(irix|roboth?|Thema|geofront|pooshy|nickserv)/i) { Halt }
  inc -u2 $+(%,invite,.,$nick) 1
  if ($+(%,invite,.,$nick) > 4) && ($network == irc.voila.fr) {
 
    raw silence +*!guest@*

    echo -sa $event(Info, Protect Fondation activée - Flood en Invite -( Silence Serveur 1 mn )- )
    If !$timer(invite) { nick $rand(A,Z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(A,Z) $+ $rand(1,9) }
    timerinvite 1 60 raw silence -*!guest@*
  }
}

on *:notice:*:*:{
  If $regex($nick,/^(irix|roboth?|Thema|geofront|pooshy|nickserv)/i) { Halt }
  inc -u2 $+(%,notice,.,$nick) 1
  if ( $+(%,notice,.,$nick)  > 3 ) && ($network == irc.voila.fr) {

   raw silence +*!guest@*
   ignore -nu120 *!guest@*
    echo -sa $event(Info, Protect Fondation activée - Flood en Notice -( Silence Serveur 1 mn )- )
    If !$timer(notice) { nick $rand(A,Z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(A,Z) $+ $rand(1,9) }
    timernotice 1 60 raw silence -*!guest@*
  }
}

on *:text:*:?:{
 If $regex($nick,/^(irix|roboth?|Thema|geofront|pooshy|nickserv)/i) { Halt }
  inc -u2 $+(%,text,.,$nick ) 1
  if ( $+(%,text,.,$nick ) > 3) && ($network == irc.voila.fr) {
 
    raw silence +*!guest@*
    ignore -pu120 *!guest@*

    echo -sa $event(Info, Protect Fondation activée - Flood en Privé -( Silence Serveur 1 mn )- )
    SilenceCloseAll
    If !$timer(texte) {nick $rand(A,Z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(A,Z) $+ $rand(1,9)
  }
  timertexte 1 60 raw silence -*!guest@*
}
}

on *:open:?:*:{
 If $regex($nick,/^(irix|roboth?|Thema|geofront|pooshy|nickserv)/i) { Halt }
inc -u2 %pv.general
if ( %pv.general > 3 ) && ($network == irc.voila.fr) {

  raw silence +*!guest@*
  ignore -pu120 *!guest@*

  echo -sa $event(Info, Protect Fondation activée - Flood en Invite -( Silence Serveur 1 mn )- )
  SilenceCloseAll
  If !$timer(ouverturepv) { nick $rand(A,Z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(A,Z) $+ $rand(1,9)
  }
  timerouverturepv 1 60 raw silence -*!guest@*
}
}

on 1:ctcpreply:ping*:{
inc -u5 %ping.general 1
if ( %ping.general > 2 ) && ($network == irc.voila.fr) {

  raw silence +*!guest@*

  echo -sa $event(Info, Protect Fondation activée - Flood en CTCP -( Silence Serveur 1 mn )- )
  If !$timer(silencegeneral) { nick $rand(A,Z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(A,Z) $+ $rand(1,9) }
  timersilencegeneral 1 60
  raw silence -*!guest@*
}
}

On *:Quit:{
If $regex($1-4,/(Read\/Dead.Error:.SendQ.Exceeded|SendQ.exceeded)/) {
  If !%Att.Prot && ($network == irc.voila.fr) {
 
 
  raw silence +*!guest@*
    .Timer 1 60 silence -*!guest@*
    Set -u20 %Att.Prot 1
    Echo -sa $event(Info , $+($chr(3),04,Attack Protect,$chr(3))   $nick  a quitté pour : SendQ )
  }
}
}

; EOF
; ---

Merci d'avance

Cdt

Benji_37©
dimanche 10 février 2008 à 22:46:02 | Re : protect marche partout !

wims

Rééssaye ton code en corrigeant la faute de frappe sur le on text, il manque un espace entre une { et le /nick, ce qui engendre de nombreuse erreur par la suite (notamment un "décalage" (:p) avec les { }.
Repost si ça ne corrige pas le problème
dimanche 10 février 2008 à 22:57:18 | Re : protect marche partout !

wims

Une autre chose que j'ai vu, mirc utilise déja l'identifieur $event, donc je te conseil d'éviter de l'utiliser, comme je déconseille d'avoir des alias qui ont le même nom que ce de mirc, car la priorité est ensuite bien consufse, un petit rappel :

Considérons ce code dans vos remotes :
alias me $iif($isid,return,echo -a >) ok

$me retournera toujours votre pseudo actuel
$/me ou $.me retournera ok
En revanche /me affichera en echo ok et c'est /!me qui effectura le réel /me voulu

Dans le cas d'$event, utilisé par 1% des personnes c'est pas genant mais il vos mieux savoir ce que l'on fait :)
dimanche 10 février 2008 à 22:58:03 | Re : protect marche partout !

Benjamin37

Membre Club
Hello
Ok je viens de comprendre =)


je repostes le code :

Alias Chkqry {
  Var %iqry = 1
  While (%iqry <= $1) {
    If (guest isin $gettok($query(%iqry).addr,1,64)) { closemsg $query(%iqry) }
    Inc %iqry
  }
}

Alias SilenceCloseAll { .TimerCLALL 0 1 Chkqry $query(0) | .Timer 1 30 .TimerCLALL off }

on *:invite:#:{
  If $regex($nick,/^(irix|roboth?|Thema|geofront|pooshy|nickserv)/i) { Halt }
  inc -u2 $+(%,invite,.,$nick) 1
  if ($+(%,invite,.,$nick) > 4) && ($network == irc.voila.fr) {
 
    raw silence +*!guest@*

    echo -sa $event(Info, Protect Fondation activée - Flood en Invite -( Silence Serveur 1 mn )- )
    If !$timer(invite) { nick $rand(A,Z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(A,Z) $+ $rand(1,9) }
    timerinvite 1 60 raw silence -*!guest@*
  }
}

on *:notice:*:*:{
  If $regex($nick,/^(irix|roboth?|Thema|geofront|pooshy|nickserv)/i) { Halt }
  inc -u2 $+(%,notice,.,$nick) 1
  if ( $+(%,notice,.,$nick)  > 3 ) && ($network == irc.voila.fr) {

   raw silence +*!guest@*
   ignore -nu120 *!guest@*
    echo -sa $event(Info, Protect Fondation activée - Flood en Notice -( Silence Serveur 1 mn )- )
    If !$timer(notice) { nick $rand(A,Z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(A,Z) $+ $rand(1,9) }
    timernotice 1 60 raw silence -*!guest@*
  }
}

on *:text:*:?:{
 If $regex($nick,/^(irix|roboth?|Thema|geofront|pooshy|nickserv)/i) { Halt }
  inc -u2 $+(%,text,.,$nick ) 1
  if ( $+(%,text,.,$nick ) > 3) && ($network == irc.voila.fr) {
 
    raw silence +*!guest@*
    ignore -pu120 *!guest@*

    echo -sa $event(Info, Protect Fondation activée - Flood en Privé -( Silence Serveur 1 mn )- )
    SilenceCloseAll
    If !$timer(texte) { nick $rand(A,Z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(A,Z) $+ $rand(1,9)
  }
  timertexte 1 60 raw silence -*!guest@*
}
}

on *:open:?:*:{
 If $regex($nick,/^(irix|roboth?|Thema|geofront|pooshy|nickserv)/i) { Halt }
inc -u2 %pv.general
if ( %pv.general > 3 ) && ($network == irc.voila.fr) {

  raw silence +*!guest@*
  ignore -pu120 *!guest@*

  echo -sa $event(Info, Protect Fondation activée - Flood en Invite -( Silence Serveur 1 mn )- )
  SilenceCloseAll
  If !$timer(ouverturepv) { nick $rand(A,Z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(A,Z) $+ $rand(1,9)
  }
  timerouverturepv 1 60 raw silence -*!guest@*
}
}

on 1:ctcpreply:ping*:{
inc -u5 %ping.general 1
if ( %ping.general > 2 ) && ($network == irc.voila.fr) {

  raw silence +*!guest@*

  echo -sa $event(Info, Protect Fondation activée - Flood en CTCP -( Silence Serveur 1 mn )- )
  If !$timer(silencegeneral) { nick $rand(A,Z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(A,Z) $+ $rand(1,9) }
  timersilencegeneral 1 60
  raw silence -*!guest@*
}
}

On *:Quit:{
If $regex($1-4,/(Read\/Dead.Error:.SendQ.Exceeded|SendQ.exceeded)/) {
  If !%Att.Prot && ($network == irc.voila.fr) {
 
 
  raw silence +*!guest@*
    .Timer 1 60 silence -*!guest@*
    Set -u20 %Att.Prot 1
    Echo -sa $event(Info , $+($chr(3),04,Attack Protect,$chr(3))   $nick  a quitté pour : SendQ )
  }
}
}

; EOF
; ---


( je ne sais pas si $network c'est le bon argument mais bon :x on verra bien  )

Et encore merci d'avance :)


Cdt

Benji_37©
dimanche 10 février 2008 à 23:17:11 | Re : protect marche partout !

wims

( je ne sais pas si $network c'est le bon argument mais bon :x on verra bien  )

C'est effectivement le problème, mais puisque tu avais un doute, pourquoi ne pas avoir vérifié ? dans ton code tu mettais un echo sur $network et tu aurais vu...
$network retourne un nom de reseau alors que $server retourne le nom du server (un server a plusieurs reseau) dans le cas de voila.fr, $network ne retourne rien (ce n'est pas une obligation pour un server d'avoir un network associé), change $network par $server ;)


Cette discussion est classée dans : nick, rand, guest, silence, if


Répondre à ce message

Sujets en rapport avec ce message

$reptok($reptok($reptok [ par N4d1n3 ] K. Avec ça, je peux faire deux $reptok... a 3 ça marche pu. Mais moi je veux mettre plus de smiley a remplacer, comment je fais? Exemple je veux rajou détecteur badword en PV qui Kick,ignore et ferme le PV [ par freenaute ] bonjour tous !J'ai "compilée" cette remote qui détecte des badwords dans mes PV et répond par kick,donne la raison puis ignore et ferme le PV et ban l Problème Script auto réponse [ par steretrix ] Bonjour à tous,je débute dans le domaine du scripting de mIRC. j'avais fait un script il y a quelques temps mais depuis se matin il ne marche plus san PB : Mon auto unban disfonctionne [ par fandesandro ] J'ai besoin d'un petit coup de pouce pour faire mon auto unban :on @*:BAN:#:{   if ($banmask iswm $ial($me)) {     mode $chan -b $me    join $chan    PB : Mon "géreur de PV" [ par fandesandro ] menu * {   Anti-PV  .Pas d'anti-PV: /set %antipv off  .Fermeture auto: /set %antipv on  .Demande d'attente: /set %antipv repondeur  }on *:open:?:{/not clone scan [ par mikl59 ] Bonjour je debute et j' ai trouver ce code pou scanner les clones il marche en faisans /clonescanca me met une fenetre @scanner mais quand un clone se Blackliste on join [ par Soprano71 ] bonsoir , je souhaiterai savoir comment kickban un host caché qui ce trouve dans ma blist je m'explique je voudrai en faite le meme genre que ma blac besoin d'aide script.tcl stripcodes abcgru [ par snip74 ] Bonjour,dans mon code ci dessous qui marche très bien.bind pub - !stats pub_statproc pub_stat {nick host hand chan args} {     if {[string tolower $ch Probleme tcl [ par foufou33 ] hello, j'aurai aimer avoir une aide concernant ce code svp.proc detect_massjoin {idx sock chan nick} {global c_ l_ salon nick nickmassjoin pooshyforea nick precedent [ par mikl59 ] bonjour j' ai un petit probleme...Je suis op sur un chan et on ma donner ca mais j' aimerai savoir si c' est possible a mon avis oui que qd j' ai un n


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

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,655 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales