|
 Trouver une ressource
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !
 ANTI IDLE !!! UN DE PLUS
 Information sur la source
 Description
un anti idle de base ! Simple et efficace! Pas de tests sur le fait d etre operateur , celui qui le charge et ne l est pas doit arreter de scripter. Désolé pour le goto c est une vieille habitude pour ne pas remplr les pipes de processeurs et creer un Jump ( et un seul ). Je pourrais mettre du elsif mais c est pareil !! vidage du pipe ! Quelques petites ameliorations a faire, mais pas fioritures. > multichan > %server.chan.pseudo pour le multiserver par exemple ...
 Source
- ;;;;;;;;;;;;;;;;;;;;;;;;;;; anti idle ;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;; Script : anti Idle ;;
- ;; Doit pouvoir permettre de virer quelqu un sur idle time over ;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
- on *:load : {
- ;; durée du ban
- set %idleTime.over 600
- ;; Raison du kick a faire
- }
- on *:unload: {
- ;; durée du ban
- unset %idleTime.over
- ;; Raison du kick
- }
-
- on *:connect: {
- /timeridstart 1 2 /antiidle stop
- /timeridstart 1 10 /antiidle start %idleTime.over
- }
-
- alias antiidle {
- if (($$1 isin start) && ($$2 isnum )) {
- /timerfirstact 1 2 /actidle
- /set %idleTime.over $$2
- /timerantiidle 0 30 /actIdle
- ;;/echo @highlights > Script anti idle launched : $+ $chr(32) $+ $$2 $+ $chr(32) $+ secondes
- /goto done
- }
- if ($$1 isin stop) {
- /timerantiidle off
- }
- :done
- }
-
- alias actIdle {
- set %idle.nb.regular $calc($nick(#biere-entre-potes,0,r) + 1)
- set %idle.ind 1
- ;; pour tous les utilisateurs de bases (aucun mode)
- while (%idle.ind < %idle.nb.regular) {
- ;; j affiche dans une fenetre speciale ( a commenter ou a créer )
- ;; /echo @highlights $nick(#biere-entre-potes,%idle.ind,r) $+ $chr(32) $+ idle time : $+ $chr(32) $+ $nick(#biere-entre-potes,%idle.ind,r).idle $+ $chr(32) $+ secondes
- ;; si il y a un depassement du temps autoriser >> action
- if ( $nick(#biere-entre-potes,%idle.ind,r).idle > %idleTime.over ) {
- ;; si une variable de type %pseudo existe
- if ($var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1) != $null) {
- ;; alors je l incremente
- /inc $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1) 1
- ;; si cette valeur est superieure a 2 alors je kick/ban
- if ( $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1).value > 2) {
- /mode #biere-entre-potes +bb $nick(#biere-entre-potes,%idle.ind,r) $address($nick(#biere-entre-potes,%idle.ind,r),2)
- /kick #biere-entre-potes $nick(#biere-entre-potes,%idle.ind,r) $+ $chr(32) IDLE TIME OVER - temps de squattage maximum autoriser $+ $chr(32) $+ $calc(%idleTime.over / 60) $+ $chr(32) $+ minutes ( $+ %idleTime.over $+ $chr(32) $+ secondes) => $+ $chr(32) $nick(#biere-entre-potes,%idle.ind,r).idle $+ ( $+ $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1).value $+ $chr(32) $+ fois, kick/ban à 3)
- ;; je detruit la variable %pseudo
- /unset $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1)
- }
- ;;/echo @highlights >> $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1).value
- }
- ;; sinon si la variable %pseudo n existe pas >> je la crée et je kicke
- else {
- /set % $+ $nick(#biere-entre-potes,%idle.ind,r),1) 1
- /kick #biere-entre-potes $nick(#biere-entre-potes,%idle.ind,r) $+ $chr(32) IDLE TIME OVER - temps de squattage maximum autoriser $+ $chr(32) $+ $calc(%idleTime.over / 60) $+ $chr(32) $+ minutes ( $+ %idleTime.over $+ $chr(32) $+ secondes) => $+ $chr(32) $nick(#biere-entre-potes,%idle.ind,r).idle $+ ( $+ $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1).value $+ $chr(32) $+ fois, kick/ban à 3)
- ;;/echo @highlights >> $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1).value
- }
- }
- ;; j incremente
- /inc %idle.ind 1
- }
- ;; je detruis les variables pour eviter les residus accidentels
- unset %idle.ind
- unset %idle.nb.regular
- }
;;;;;;;;;;;;;;;;;;;;;;;;;;; anti idle ;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Script : anti Idle ;;
;; Doit pouvoir permettre de virer quelqu un sur idle time over ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:load : {
;; durée du ban
set %idleTime.over 600
;; Raison du kick a faire
}
on *:unload: {
;; durée du ban
unset %idleTime.over
;; Raison du kick
}
on *:connect: {
/timeridstart 1 2 /antiidle stop
/timeridstart 1 10 /antiidle start %idleTime.over
}
alias antiidle {
if (($$1 isin start) && ($$2 isnum )) {
/timerfirstact 1 2 /actidle
/set %idleTime.over $$2
/timerantiidle 0 30 /actIdle
;;/echo @highlights > Script anti idle launched : $+ $chr(32) $+ $$2 $+ $chr(32) $+ secondes
/goto done
}
if ($$1 isin stop) {
/timerantiidle off
}
:done
}
alias actIdle {
set %idle.nb.regular $calc($nick(#biere-entre-potes,0,r) + 1)
set %idle.ind 1
;; pour tous les utilisateurs de bases (aucun mode)
while (%idle.ind < %idle.nb.regular) {
;; j affiche dans une fenetre speciale ( a commenter ou a créer )
;; /echo @highlights $nick(#biere-entre-potes,%idle.ind,r) $+ $chr(32) $+ idle time : $+ $chr(32) $+ $nick(#biere-entre-potes,%idle.ind,r).idle $+ $chr(32) $+ secondes
;; si il y a un depassement du temps autoriser >> action
if ( $nick(#biere-entre-potes,%idle.ind,r).idle > %idleTime.over ) {
;; si une variable de type %pseudo existe
if ($var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1) != $null) {
;; alors je l incremente
/inc $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1) 1
;; si cette valeur est superieure a 2 alors je kick/ban
if ( $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1).value > 2) {
/mode #biere-entre-potes +bb $nick(#biere-entre-potes,%idle.ind,r) $address($nick(#biere-entre-potes,%idle.ind,r),2)
/kick #biere-entre-potes $nick(#biere-entre-potes,%idle.ind,r) $+ $chr(32) IDLE TIME OVER - temps de squattage maximum autoriser $+ $chr(32) $+ $calc(%idleTime.over / 60) $+ $chr(32) $+ minutes ( $+ %idleTime.over $+ $chr(32) $+ secondes) => $+ $chr(32) $nick(#biere-entre-potes,%idle.ind,r).idle $+ ( $+ $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1).value $+ $chr(32) $+ fois, kick/ban à 3)
;; je detruit la variable %pseudo
/unset $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1)
}
;;/echo @highlights >> $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1).value
}
;; sinon si la variable %pseudo n existe pas >> je la crée et je kicke
else {
/set % $+ $nick(#biere-entre-potes,%idle.ind,r),1) 1
/kick #biere-entre-potes $nick(#biere-entre-potes,%idle.ind,r) $+ $chr(32) IDLE TIME OVER - temps de squattage maximum autoriser $+ $chr(32) $+ $calc(%idleTime.over / 60) $+ $chr(32) $+ minutes ( $+ %idleTime.over $+ $chr(32) $+ secondes) => $+ $chr(32) $nick(#biere-entre-potes,%idle.ind,r).idle $+ ( $+ $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1).value $+ $chr(32) $+ fois, kick/ban à 3)
;;/echo @highlights >> $var( $chr(37) $+ $nick(#biere-entre-potes,%idle.ind,r),1).value
}
}
;; j incremente
/inc %idle.ind 1
}
;; je detruis les variables pour eviter les residus accidentels
unset %idle.ind
unset %idle.nb.regular
}
 Historique
- 14 juillet 2006 14:32:09 :
- Perspective d evolution du script
 Sources du même auteur
 Sources de la même categorie
Sources en rapport avec celle ci
 Commentaires et avis
 Discussions en rapport avec ce code source dans le forum
recherche anti-ban anti-kick.... [ par TaitsuO ]
J'aimerai trouver un anti-kick et un anti-ban assez puissant, ceux que j'ai trouver ici ne marche pas si bien que ça (dsl...) et je ne suis pas trés b
besoin d aide urgente pour bote de moderation [ par yvesman ]
bonjourpouvez vous m aider le bot uune fos le processus lance s emballe et ne fait plus la difference entre bons et mauvais mots (+ plantages divers)m
aidez moi svp c important [ par yvesman ]
bonjour voila le probleme: j'essaye ((deseperement) sic! vu mon niveau) de creer un bot de moderation qui doit etre mis urgemment sur un server avc de
Aidez moi [ par reva94 ]
kelk1 pourai me crée un anti flood : - au bout de 4 phrases en flood il le kick ban 5 min anti-pub : 1 er pub Qui avertit 2 eme pub qui kick 3 emem p
pourquoi ce script anti j/p ban les mecs qui /hop??? [ par int3r_ ]
Bonjour, Voilà c'que j'ai dans le remote ;anti join-part ON *:JOIN:#monChan: { set %join. [ $+ [ $nick ] ] 1 .timerunset 1 60 unset %join. [ $+
Anti flood [ par Zqokmi ]
kelkun pourai me dire ski va pas ds mon anti-flood ? on *:text:*:#:{ inc -u2 %flood $+ $nick if %flood [ $+ [ $nick ] ] >= 3 { ban -u900 # $nick 2 }
Kick Ban no réponse [ par Newbieeeeee ]
Salut tous le monde, serait til possible que quand je auto ban kick ctcp avec ce script!!!on !*:join:#abcedf:ctcp $nick versionon *:ctcpreply:version*
il y a un probleme là [ par WorldDMT ]
salutc'est au cas qu'il y a ban sur un mask ( par exp: +b *!*@120.120.120.12 ) tout les nick qui se raportent a ce mask doivent etre kick bon j'ai fai
Remote averto , kick et après ban [ par tim01 ]
Bonjour,Voilà j'essaye de coder un anti spam et badwords, voilà mon code On *:TEXT:*pute*:#:{ if ( %pute <= 1 | halt ) { /inc %pute $+ $nick 1 |
traceur de kick && ban [ par moho1 ]
bonjour à tt, C'est la premiere fois que je poste une question ici lol, parce que je vois que c'est un bon site pour scripting et autre truc. Là je vo
|
 Téléchargements
Logiciels à télécharger sur le même thème :
|