Accueil > > > CLONE KICKER ON JOIN
CLONE KICKER ON JOIN
Information sur la source
Description
Et bien voila, j'apprécie le scripting et cela fait maintenant un mois que je script seulement.
j'en ai eu marre de voir des bots (clones) faire interruption dans mon channel...
c'est un script qui kick un clone quand il join mon channel ,donc.
C'est trés simpliste mais ça marche trés bien !
(je l'utilise sur cyanide-x donc il n'y a pas de possibilité que quelqu'un joigne avec deux fois le meme pseudo , ce qui fait de ce script qu'il est suffisant.)
Source
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;;;;;;;;;H;;;A;;;C;;;K;;;M;;;A;;;N;;;;;;;;;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ;YOU ONLY NEED TO LOAD THIS FILE ON A REMOTE WITH mIRC;
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- menu * {
- Cl0NeKiCkEr
- .Configuration : /clonekick
- }
-
- on *:start:{
- if ($exists(htables) == $false) { mkdir htables }
- hmake cloneconf 100
- if ($exists(htables/cloneconf) == $false) {
- hadd cloneconf Nghost 1
- hadd cloneconf BAN 4
- hadd cloneconf chan $null
- hadd cloneconf nick $null
- hadd cloneconf message $null
- hsave cloneconf htables/cloneconf
- }
-
- hload cloneconf htables/cloneconf
- }
-
-
- alias clonekick { dialog -m clonekick clonekick }
- dialog clonekick {
- title Cl0neKicker : MADE BY HACKMAN[TeTa]
- icon mirc.exe,18
- size -1 -1 200 100
- option dbu
- tab "Channel", 10, 10 12 183 70
- tab "Except", 20
- tab "Message", 30
- tab "Config +", 40
-
- box "",1,5 0 192 97
- check ": clonekick State ON/OFF",2,68 4 80 10
- ;--------TAB10-------
- text "Channel Used (with #):",11,12 30 80 10, tab 10
- edit "",12,11 40 150 10, tab 10
- list 13,11 50 150 40,sort vsbar tab 10
- button "Add",14,161 50 30 10,push tab 10
- button "Remove",15,161 60 30 10,push tab 10
- ;--------TAB20-------
- text "Exception (type the nick of the exeption :NEED TO BE ONLINE)",21,12 30 180 10, tab 20
- edit "",22,11 40 150 10, tab 20
- list 23,11 50 150 40,sort vsbar tab 20
- button "Add",24,161 50 30 10,push tab 20
- button "Remove",25,161 60 30 10,push tab 20
-
- ;--------TAB30-------
- text "Kick message",31,12 30 180 10, tab 30
- text "you can type CLONE1 or CLONE2 on the message , those values will be replaced by the nicks of both clones (CLONE1 = kicked one)",32,12 38 180 20, tab 30
- text "If you don't set one, it will use a default one ",34,12 51 180 10, tab 30
- edit "",33,11 60 180 10, tab 30
-
- ;--------TAB40-------
- text "Max Clone Number Per Channel",41,20 30 170 10, tab 40
- edit "",43,20 40 80 10, tab 40
- text "Number Of Rejoin/Kick Before BAN",44,20 55 170 10, tab 40
- edit "",45,20 65 80 10, tab 40
-
- ;--------QUIT&SAVE-------
- button "Close&Save",9,80 87 40 10,flat,ok
- icon 4,160 2 20 20,mirc.exe,18,large
- }
-
- on *:dialog:clonekick:sclick:14:{
- if ($did(12) isin $hget(cloneconf,chan)) { did -ra clonekick 12 Already on the list ! }
- else {
- hadd -m cloneconf chan $iif($hget(cloneconf,chan), $hget(cloneconf,chan) $+ $chr(32) $+ $did(12), $did(12))
- }
- did -r clonekick 13
- didtok clonekick 13 32 $hget(cloneconf,chan)
- if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
- else { did -e clonekick 2,9 }
- }
- on *:dialog:clonekick:sclick:15:{
- hadd cloneconf chan $replacex($remove($hget(cloneconf,chan), $did(13).seltext), $chr(32) $+ $chr(32), $chr(32))
- did -r clonekick 13
- didtok clonekick 13 32 $hget(cloneconf,chan)
- if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
- else { did -e clonekick 2,9 }
- }
- on *:dialog:clonekick:sclick:24:{
- if ($address($did(22),4) isin $hget(cloneconf,nick)) { did -ra clonekick 22 Already on the list ! }
- else {
- hadd -m cloneconf nick $iif($hget(cloneconf,nick), $hget(cloneconf,nick) $+ $chr(32) $+ $address($did(22),4), $address($did(22),4))
- }
- did -r clonekick 23
- didtok clonekick 23 32 $hget(cloneconf,nick)
- if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
- else { did -e clonekick 2,9 }
- }
- on *:dialog:clonekick:sclick:25:{
- hadd cloneconf nick $replacex($remove($hget(cloneconf,nick), $did(23).seltext), $chr(32) $+ $chr(32), $chr(32))
- did -r clonekick 23
- didtok clonekick 23 32 $hget(cloneconf,nick)
- if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
- else { did -e clonekick 2,9 }
- }
- on *:dialog:clonekick:sclick:9:{
- hadd cloneconf Nghost $did(43)
- hadd cloneconf BAN $did(45)
- if ($did(33) == $null) { hadd cloneconf message No Clones admitted *( $+(%,clone.nick1) & $+(%,clone.nick2) )* }
- else { hadd cloneconf message $replace($did(33), CLONE1, $+(%,clone.nick1), CLONE2, $+(%,clone.nick2)) }
- if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
- else { did -e clonekick 2,9 }
-
- hsave cloneconf htables/cloneconf
- }
- on *:dialog:clonekick:edit:43:{
- hadd cloneconf Nghost $did(43)
- if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
- else { did -e clonekick 2,9 }
- }
- on *:dialog:clonekick:edit:45:{
- hadd cloneconf BAN $did(45)
- if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
- else { did -e clonekick 2,9 }
- }
- on *:dialog:clonekick:init:0:{
- did -r clonekick 13
- didtok clonekick 13 32 $hget(cloneconf,chan)
- did -r clonekick 23
- didtok clonekick 23 32 $hget(cloneconf,nick)
- if (%CLONEKICK.State == ON) { did -c clonekick 2 }
- if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
- else { did -e clonekick 2,9 }
- did -r clonekick 43
- didtok clonekick 43 32 $hget(cloneconf,Nghost)
- did -r clonekick 45
- didtok clonekick 45 32 $hget(cloneconf,BAN)
- }
- on *:dialog:clonekick:sclick:2:{
- if $did(2).state == 1 { set %CLONEKICK.State ON | echo -a %CLONEKICK.Chan 4 clonekick : 2ON 6annoying $hget(cloneconf,chan) }
- else { set %CLONEKICK.State OFF | echo -a %CLONEKICK.Chan 4 clonekick : 2OFF }
- }
-
-
-
- alias clonestart {
- .who %clone.chan
- var %nnick = 1
- while (%nnick <= $nick(%clone.chan,0)) {
- var %address = $address($nick(%clone.chan,%nnick),4)
- hadd $+(clonekick,%clone.chan) %address $iif($hget($+(clonekick,%clone.chan),%address) == $null, $nick(%clone.chan,%nnick), $hget($+(clonekick,%clone.chan),%address) $+ $chr(32) $+ $nick(%clone.chan,%nnick))
- tokenize 32 $hget($+(clonekick,%clone.chan),%address)
- while ($0 > $hget(cloneconf,Nghost)) {
- var %clone.nick1 = $1
- var %clone.nick2 = $2
- if (%address == $address($me,4)) || (%address isin $hget(cloneconf,nick)) { echo -a %clone.nick excepted | break }
- hadd $+(clonekick,%clone.chan) %address $remove($hget($+(clonekick,%clone.chan),%address), $1)
- $iif(!$($+(%,ban,$1),2),set -u10,inc) $+(%,ban,$1) 1
- if ($($+(%,ban,$1),2) > $hget(cloneconf,BAN)) { ban -u30 %clone.chan $1 }
- kick %clone.chan $1 $($hget(cloneconf,message),2)
- tokenize 32 $hget($+(clonekick,%clone.chan),%address)
- }
- inc %nnick
- }
- }
- alias clonejoin {
- if (!$address(%clone.nick,4)) { .who %clone.chan }
- var %address.join = $address(%clone.nick,4)
- hadd -m $+(clonekick,%clone.chan) %address.join $iif($hget($+(clonekick,%clone.chan), %address.join) == $null, %clone.nick, $hget($+(clonekick,%clone.chan), %address.join) $+ $chr(32) $+ %clone.nick)
- tokenize 32 $hget($+(clonekick,%clone.chan), %address.join)
- while ($0 > $hget(cloneconf,Nghost)) {
- var %clone.nick1 = $1
- var %clone.nick2 = $2
- if (%address.join == $address($me,4)) || (%address.join isin $hget(cloneconf,nick)) { echo -a %clone.nick excepted | return }
- hadd $+(clonekick,%clone.chan) %address.join $remove($hget($+(clonekick,%clone.chan), %address.join), $1)
- kick %clone.chan $1 $($hget(cloneconf,message),2)
- tokenize 32 $hget($+(clonekick,%clone.chan),%address.join)
- }
- }
-
- on *:join:*:{
- if (%CLONEKICK.State == ON) {
- if ($chan isin $hget(cloneconf,chan)) {
- set %clone.nick $nick
- set %clone.chan $chan
- if ($nick == $me) {
- var %nchan = 1
- while ($gettok($hget(cloneconf,chan),%nchan,32)) {
- .who $gettok($hget(cloneconf,chan),%nchan,32)
- inc %nchan
- }
- hfree $+(clonekick,%clone.chan)
- hmake $+(clonekick,%clone.chan) 1000
- timer 1 1 clonestart
- }
- else { clonejoin }
- }
- }
- }
- on *:part:*:{
- if (%CLONEKICK.State == ON) {
- if ($chan isin $hget(cloneconf,chan)) {
- var %address.part = $address($nick,4)
- hadd $+(clonekick,$chan) %address.part $replace($removecs($hget($+(clonekick,$chan), %address.part), $nick), $chr(32) $+ $chr(32), $chr(32), $chr(32) $+ $null, $null)
- }
- }
- }
- on *:kick:*:{
- if (%CLONEKICK.State == ON) {
- if ($chan isin $hget(cloneconf,chan)) {
- var %address.part = $address($knick,4)
- hadd $+(clonekick,$chan) %address.part $replace($removecs($hget($+(clonekick,$chan), %address.part), $knick), $chr(32) $+ $chr(32), $chr(32), $chr(32) $+ $null, $null)
- }
- }
- }
-
- on *:quit:{
- if (%CLONEKICK.State == ON) {
- tokenize 32 $hget(cloneconf,chan))
- var %chann = 1
- var %chane = $($+($,%chann),2)
- while (%chane) {
- var %address.part = $address($nick,4)
- hadd $($+(clonekick,%chane),2) %address.part $replace($removecs($hget($+(clonekick,%chane), %address.part), $nick), $chr(32) $+ $chr(32), $chr(32), $chr(32) $+ $null, $null)
- inc %chann
- var %chane = $($+($,%chann),2)
-
- }
- }
- }
-
- on *:nick:{
- if (%CLONEKICK.State == ON) {
- var %ncount = 1
- while ($gettok($hget(cloneconf,chan),%ncount,32)) {
- if ($newnick ison $gettok($hget(cloneconf,chan),%ncount,32)) {
- var %address.change = $address($newnick,4)
- hadd $+(clonekick,$gettok($hget(cloneconf,chan),%ncount,32)) %address.change $replace($hget($+(clonekick,$gettok($hget(cloneconf,chan),%ncount,32)), %address.change), $nick, $newnick)
-
- }
- inc %ncount
- }
- }
- }
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;H;;;A;;;C;;;K;;;M;;;A;;;N;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;YOU ONLY NEED TO LOAD THIS FILE ON A REMOTE WITH mIRC;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
menu * {
Cl0NeKiCkEr
.Configuration : /clonekick
}
on *:start:{
if ($exists(htables) == $false) { mkdir htables }
hmake cloneconf 100
if ($exists(htables/cloneconf) == $false) {
hadd cloneconf Nghost 1
hadd cloneconf BAN 4
hadd cloneconf chan $null
hadd cloneconf nick $null
hadd cloneconf message $null
hsave cloneconf htables/cloneconf
}
hload cloneconf htables/cloneconf
}
alias clonekick { dialog -m clonekick clonekick }
dialog clonekick {
title Cl0neKicker : MADE BY HACKMAN[TeTa]
icon mirc.exe,18
size -1 -1 200 100
option dbu
tab "Channel", 10, 10 12 183 70
tab "Except", 20
tab "Message", 30
tab "Config +", 40
box "",1,5 0 192 97
check ": clonekick State ON/OFF",2,68 4 80 10
;--------TAB10-------
text "Channel Used (with #):",11,12 30 80 10, tab 10
edit "",12,11 40 150 10, tab 10
list 13,11 50 150 40,sort vsbar tab 10
button "Add",14,161 50 30 10,push tab 10
button "Remove",15,161 60 30 10,push tab 10
;--------TAB20-------
text "Exception (type the nick of the exeption :NEED TO BE ONLINE)",21,12 30 180 10, tab 20
edit "",22,11 40 150 10, tab 20
list 23,11 50 150 40,sort vsbar tab 20
button "Add",24,161 50 30 10,push tab 20
button "Remove",25,161 60 30 10,push tab 20
;--------TAB30-------
text "Kick message",31,12 30 180 10, tab 30
text "you can type CLONE1 or CLONE2 on the message , those values will be replaced by the nicks of both clones (CLONE1 = kicked one)",32,12 38 180 20, tab 30
text "If you don't set one, it will use a default one ",34,12 51 180 10, tab 30
edit "",33,11 60 180 10, tab 30
;--------TAB40-------
text "Max Clone Number Per Channel",41,20 30 170 10, tab 40
edit "",43,20 40 80 10, tab 40
text "Number Of Rejoin/Kick Before BAN",44,20 55 170 10, tab 40
edit "",45,20 65 80 10, tab 40
;--------QUIT&SAVE-------
button "Close&Save",9,80 87 40 10,flat,ok
icon 4,160 2 20 20,mirc.exe,18,large
}
on *:dialog:clonekick:sclick:14:{
if ($did(12) isin $hget(cloneconf,chan)) { did -ra clonekick 12 Already on the list ! }
else {
hadd -m cloneconf chan $iif($hget(cloneconf,chan), $hget(cloneconf,chan) $+ $chr(32) $+ $did(12), $did(12))
}
did -r clonekick 13
didtok clonekick 13 32 $hget(cloneconf,chan)
if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
else { did -e clonekick 2,9 }
}
on *:dialog:clonekick:sclick:15:{
hadd cloneconf chan $replacex($remove($hget(cloneconf,chan), $did(13).seltext), $chr(32) $+ $chr(32), $chr(32))
did -r clonekick 13
didtok clonekick 13 32 $hget(cloneconf,chan)
if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
else { did -e clonekick 2,9 }
}
on *:dialog:clonekick:sclick:24:{
if ($address($did(22),4) isin $hget(cloneconf,nick)) { did -ra clonekick 22 Already on the list ! }
else {
hadd -m cloneconf nick $iif($hget(cloneconf,nick), $hget(cloneconf,nick) $+ $chr(32) $+ $address($did(22),4), $address($did(22),4))
}
did -r clonekick 23
didtok clonekick 23 32 $hget(cloneconf,nick)
if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
else { did -e clonekick 2,9 }
}
on *:dialog:clonekick:sclick:25:{
hadd cloneconf nick $replacex($remove($hget(cloneconf,nick), $did(23).seltext), $chr(32) $+ $chr(32), $chr(32))
did -r clonekick 23
didtok clonekick 23 32 $hget(cloneconf,nick)
if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
else { did -e clonekick 2,9 }
}
on *:dialog:clonekick:sclick:9:{
hadd cloneconf Nghost $did(43)
hadd cloneconf BAN $did(45)
if ($did(33) == $null) { hadd cloneconf message No Clones admitted *( $+(%,clone.nick1) & $+(%,clone.nick2) )* }
else { hadd cloneconf message $replace($did(33), CLONE1, $+(%,clone.nick1), CLONE2, $+(%,clone.nick2)) }
if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
else { did -e clonekick 2,9 }
hsave cloneconf htables/cloneconf
}
on *:dialog:clonekick:edit:43:{
hadd cloneconf Nghost $did(43)
if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
else { did -e clonekick 2,9 }
}
on *:dialog:clonekick:edit:45:{
hadd cloneconf BAN $did(45)
if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
else { did -e clonekick 2,9 }
}
on *:dialog:clonekick:init:0:{
did -r clonekick 13
didtok clonekick 13 32 $hget(cloneconf,chan)
did -r clonekick 23
didtok clonekick 23 32 $hget(cloneconf,nick)
if (%CLONEKICK.State == ON) { did -c clonekick 2 }
if (!$hget(cloneconf,chan)) || (!$hget(cloneconf,Nghost)) || (!$hget(cloneconf,BAN)) { did -b clonekick 2,9 }
else { did -e clonekick 2,9 }
did -r clonekick 43
didtok clonekick 43 32 $hget(cloneconf,Nghost)
did -r clonekick 45
didtok clonekick 45 32 $hget(cloneconf,BAN)
}
on *:dialog:clonekick:sclick:2:{
if $did(2).state == 1 { set %CLONEKICK.State ON | echo -a %CLONEKICK.Chan 4 clonekick : 2ON 6annoying $hget(cloneconf,chan) }
else { set %CLONEKICK.State OFF | echo -a %CLONEKICK.Chan 4 clonekick : 2OFF }
}
alias clonestart {
.who %clone.chan
var %nnick = 1
while (%nnick <= $nick(%clone.chan,0)) {
var %address = $address($nick(%clone.chan,%nnick),4)
hadd $+(clonekick,%clone.chan) %address $iif($hget($+(clonekick,%clone.chan),%address) == $null, $nick(%clone.chan,%nnick), $hget($+(clonekick,%clone.chan),%address) $+ $chr(32) $+ $nick(%clone.chan,%nnick))
tokenize 32 $hget($+(clonekick,%clone.chan),%address)
while ($0 > $hget(cloneconf,Nghost)) {
var %clone.nick1 = $1
var %clone.nick2 = $2
if (%address == $address($me,4)) || (%address isin $hget(cloneconf,nick)) { echo -a %clone.nick excepted | break }
hadd $+(clonekick,%clone.chan) %address $remove($hget($+(clonekick,%clone.chan),%address), $1)
$iif(!$($+(%,ban,$1),2),set -u10,inc) $+(%,ban,$1) 1
if ($($+(%,ban,$1),2) > $hget(cloneconf,BAN)) { ban -u30 %clone.chan $1 }
kick %clone.chan $1 $($hget(cloneconf,message),2)
tokenize 32 $hget($+(clonekick,%clone.chan),%address)
}
inc %nnick
}
}
alias clonejoin {
if (!$address(%clone.nick,4)) { .who %clone.chan }
var %address.join = $address(%clone.nick,4)
hadd -m $+(clonekick,%clone.chan) %address.join $iif($hget($+(clonekick,%clone.chan), %address.join) == $null, %clone.nick, $hget($+(clonekick,%clone.chan), %address.join) $+ $chr(32) $+ %clone.nick)
tokenize 32 $hget($+(clonekick,%clone.chan), %address.join)
while ($0 > $hget(cloneconf,Nghost)) {
var %clone.nick1 = $1
var %clone.nick2 = $2
if (%address.join == $address($me,4)) || (%address.join isin $hget(cloneconf,nick)) { echo -a %clone.nick excepted | return }
hadd $+(clonekick,%clone.chan) %address.join $remove($hget($+(clonekick,%clone.chan), %address.join), $1)
kick %clone.chan $1 $($hget(cloneconf,message),2)
tokenize 32 $hget($+(clonekick,%clone.chan),%address.join)
}
}
on *:join:*:{
if (%CLONEKICK.State == ON) {
if ($chan isin $hget(cloneconf,chan)) {
set %clone.nick $nick
set %clone.chan $chan
if ($nick == $me) {
var %nchan = 1
while ($gettok($hget(cloneconf,chan),%nchan,32)) {
.who $gettok($hget(cloneconf,chan),%nchan,32)
inc %nchan
}
hfree $+(clonekick,%clone.chan)
hmake $+(clonekick,%clone.chan) 1000
timer 1 1 clonestart
}
else { clonejoin }
}
}
}
on *:part:*:{
if (%CLONEKICK.State == ON) {
if ($chan isin $hget(cloneconf,chan)) {
var %address.part = $address($nick,4)
hadd $+(clonekick,$chan) %address.part $replace($removecs($hget($+(clonekick,$chan), %address.part), $nick), $chr(32) $+ $chr(32), $chr(32), $chr(32) $+ $null, $null)
}
}
}
on *:kick:*:{
if (%CLONEKICK.State == ON) {
if ($chan isin $hget(cloneconf,chan)) {
var %address.part = $address($knick,4)
hadd $+(clonekick,$chan) %address.part $replace($removecs($hget($+(clonekick,$chan), %address.part), $knick), $chr(32) $+ $chr(32), $chr(32), $chr(32) $+ $null, $null)
}
}
}
on *:quit:{
if (%CLONEKICK.State == ON) {
tokenize 32 $hget(cloneconf,chan))
var %chann = 1
var %chane = $($+($,%chann),2)
while (%chane) {
var %address.part = $address($nick,4)
hadd $($+(clonekick,%chane),2) %address.part $replace($removecs($hget($+(clonekick,%chane), %address.part), $nick), $chr(32) $+ $chr(32), $chr(32), $chr(32) $+ $null, $null)
inc %chann
var %chane = $($+($,%chann),2)
}
}
}
on *:nick:{
if (%CLONEKICK.State == ON) {
var %ncount = 1
while ($gettok($hget(cloneconf,chan),%ncount,32)) {
if ($newnick ison $gettok($hget(cloneconf,chan),%ncount,32)) {
var %address.change = $address($newnick,4)
hadd $+(clonekick,$gettok($hget(cloneconf,chan),%ncount,32)) %address.change $replace($hget($+(clonekick,$gettok($hget(cloneconf,chan),%ncount,32)), %address.change), $nick, $newnick)
}
inc %ncount
}
}
}
Historique
- 27 septembre 2007 02:29:24 :
- happy ? lol
voila version 2.0beta lol
- 27 septembre 2007 02:34:36 :
- v 2.0beta.
- 27 novembre 2007 23:19:02 :
- Bon, je suis content d'avoir trouvé le temps pour affiner ce script...
j'espère que cette V2f sera interressante...
et pas trop critiquée =P
- 27 novembre 2007 23:21:45 :
- Je suis content d'avoir trouvé le temps d'affiner ce script ...
j'espère que cette v2f sera convenable ...
et pas trop critiquée =P
- 27 novembre 2007 23:58:52 :
- j'avais oublié le ON NICK event :/
- 27 novembre 2007 23:59:35 :
- j'avais oublié le ON NICK event :/
- 28 novembre 2007 00:02:05 :
- encore un petit oublie :/ desolé
- 28 novembre 2007 04:59:48 :
- c'est OK, j'ai résolu mon problème avec le $chan dans l'event ON NICK ...
- 30 novembre 2007 14:26:10 :
- Bon...
mettre un ON PART event, c'est pratique et utile !
MAIS , si je ne met pas de ON QUIT .... :D
voilà c'est fixé ... (j'ai kické une innocente comme ça LOL)
- 30 novembre 2007 14:50:12 :
- encore un autre lag -_-
je vais continuer de le mettre a jour pas de problème ...
- 30 novembre 2007 14:57:55 :
- ...no comment... une boucle infini de noob ..fixée
- 30 novembre 2007 20:43:58 :
- cette update est l'une des plus grosse...
J'ai rajouté un évennement ON KICK ...
ET j'ai fixé un sacré lag a cause d'un timer manquant
J'ai aussi fixé deux autres lags 'mineurs' mais suffisamment PAS MINEUR pour killer mon script lol
- 01 décembre 2007 06:52:01 :
- un pov' $nick que j'avais oublié de remplacer par $knick ...
- 01 décembre 2007 22:32:11 :
- quelques petit bugs découverts et fixés ... je vais continuer à tester cette source trés durement ...
je la veux sans aucun soucis ...
en même temps ... c'est le but :P
Sources de la même categorie
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
Bot Anti-clone [ par shadowsexpect ]
Bonjour a tous, je construit mon bot depuis maintenant une semaine, et je voudrais qu'il serve aussi pour la sécurtié du server, pour ce faire j'aimer
anti kick ? [ par morgandetoi06 ]
y a t il un script anti kick qui fonctionne ? j en ait testé 2 qui viennent d ici mais apparement ils ne fonctionnent pas ?www.morgan06.fr.fm
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
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
Anti Kick [ par DetaX ]
Salut tout le monde. Je voudrais faire un remote pr faire anti kick. Pour linstant juen suis à la tout con je C suis Un NOOB : On *:KICK:#:/join
Protection sur quakenet [ par recover512 ]
En ce moment sur irc.quakenet.org beaucoup de chan se font "takeover". J'aimerai trouver une bonne protection anti-takeover (anti-deop,anti-ban-kick,
cherche script ou addon anti-kick special [ par pipou30 ]
Bonjour tout le monde ^^ Je viens juste de m'inscrire , car malgres mes nombreuse recherche je ne trouve pas ce que je recherche :-( Je suis operatri
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 }
Anti-Mass join Anti-clone [ par Soprano71 ]
bonjour a tous ! y aurai t'il un anti clone en dial et anti-mass join svp ?
Anti mass kick [ par Milk0z ]
BAN: on *:RAWMODE:#:{ if (( $mid($1- < ,1 ,7 )) && ( +b isin $1 ) { ... } } DEOP: on *:DEOP:#:{ if ($modefirst) { ... } Je ne trouve pas
|
Derniers Blogs
UNE JOLIE-HORLOGE ET PAS QU'UN PEU !UNE JOLIE-HORLOGE ET PAS QU'UN PEU ! par neodante
Pour les possesseurs d'iPhone, ça y est Bijin Tokei - qui se traduit littéralement en Français par " Jolie Horloge " - est arrivé et GRATUITEMENT s'il vous plaît ! Après la version Tokyo, Hokkaido, night club, racing, Gal, "pour les mademoiselles'", . voi...
Cliquez pour lire la suite de l'article par neodante TECHDAYS PARIS 2010 : CONNECTEZ VOS DONNéES à SHAREPOINT 2010 AVEC LES BUSINESS CONNECTIVITY SERVICESTECHDAYS PARIS 2010 : CONNECTEZ VOS DONNéES à SHAREPOINT 2010 AVEC LES BUSINESS CONNECTIVITY SERVICES par ROMELARD Fabrice
Animé par: Gaetan Bouveret et Julien Chomarat Business Connectivity Services (BCS) est dans SharePoint 2010 la version 2 de Business Data Catalog (BDC dans SharePoint 2007). Il s'agit de la solution permettant de visualiser des données provenan...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice [DIVERS] SUIVRE VOS SéRIES PRéFéRéS SUR LA TOILE[DIVERS] SUIVRE VOS SéRIES PRéFéRéS SUR LA TOILE par orion
Comme de nombreux geek, je suis un grand amateur de série TV et je rate régulièrement des épisodes de mes séries préférés. Une solution s'offre à vous avec ce merveilleux site : Tv Gorge - www.tvgorge.com Moteur de recherche à l'appui, vous pouvez ...
Cliquez pour lire la suite de l'article par orion TECHDAYS PARIS 2010 : LA BI DANS SHAREPOINT 2010TECHDAYS PARIS 2010 : LA BI DANS SHAREPOINT 2010 par ROMELARD Fabrice
Animé par: Vincent Bellet et Baptiste Giraudier La BI dans SharePoint 2010, Les nouveaux services d'application dans SP2010 et SQL Server Reporting services 2008 R2. La BI dans SharePoint est généralisée pour tous afin de permettre à tous les coll...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice
Forum
RE : ON RAWMODERE : ON RAWMODE par WorldDMT
Cliquez pour lire la suite par WorldDMT AVERTISSMENT ET KIKKAVERTISSMENT ET KIKK par mouhcine951990
Cliquez pour lire la suite par mouhcine951990
Logiciels
DB-MAIN (9.1.0)DB-MAIN (9.1.0)DB-MAIN is a data-modeling and data-architecture tool. It is designed to help developers and anal... Cliquez pour télécharger DB-MAIN Xilisoft DPG Convertisseur (5.1.37.0120)XILISOFT DPG CONVERTISSEUR (5.1.37.0120)Xilisoft DPG Convertisseur offre aux fans de Nintendo DS une bonne solution leur permettant de dé... Cliquez pour télécharger Xilisoft DPG Convertisseur GraphicsGale (2.01.01)GRAPHICSGALE (2.01.01)GraphicsGale est un logiciel de PixelArt avec de nombreuse fonctionnalités permettant de réalisé ... Cliquez pour télécharger GraphicsGale Architecte 3D (Platinum 2010)ARCHITECTE 3D (PLATINUM 2010)Architecte 3D Platinium vous permet de concevoir facilement les plans votre future maison, de l'é... Cliquez pour télécharger Architecte 3D TeamViewer 5 (TeamViewer 5)TEAMVIEWER 5 (TEAMVIEWER 5)Dépanner un ami,expliquer une manipulation devient un jeu d'enfant.
Prise en main d'un autre ord... Cliquez pour télécharger TeamViewer 5
|