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
CSS CONTENT STATE SELECTORS (PERSONNAL DRAFT)CSS CONTENT STATE SELECTORS (PERSONNAL DRAFT) par FREMYCOMPANY
Bonjour à tous, Je viens de publier une proposition comprenant 5 pseudo-classes pour le CSS Working Group ayant trait à l'état de chargement d'un élément (ex: IMG,VIDEO,AUDIO,OBJECT pour l'HTML.). Si le c½ur vous en dit, vous pouvez retrouver cette p...
Cliquez pour lire la suite de l'article par FREMYCOMPANY MBA : POURQUOI FAIRE ET COMMENT LE CHOISIR ?MBA : POURQUOI FAIRE ET COMMENT LE CHOISIR ? par ROMELARD Fabrice
Formation initiale Durant la formation, le découpage classique est le suivant (je donnerai les équivalences Suisse lorsque je les connaîtrais) : Ecole primaire jusqu'au Collège : Formation générale permettant d'obtenir les méthodes...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice Y'A DES ERREURS QUI PEUVENT RENDRE LE DéVELOPPEUR VIOLENTY'A DES ERREURS QUI PEUVENT RENDRE LE DéVELOPPEUR VIOLENT par Aleks
Quand on a ce genre d'erreur sans log :
Et bas on a juste envie de choper le gas de Microsoft qu'a développé ça et lui foutre des baffes de Coboye ! ...
Cliquez pour lire la suite de l'article par Aleks [HYPER-V 3] PRéSENTATION DES COMMANDLETS POWERSHELL[HYPER-V 3] PRéSENTATION DES COMMANDLETS POWERSHELL par Pierrick CATRO-BROUILLET
Avec la sortie prochaine de la Beta Consumer Preview de Windows 8, j'avais envie de revenir sur une des fonctionnalités que j'attends le plus et que, en bon geek que je suis, j'utilise déjà : Hyper-V 3 ainsi son module PowerShell.
Il y a déjà pléthor...
Cliquez pour lire la suite de l'article par Pierrick CATRO-BROUILLET IIS7 - COMPRESSION GZIPIIS7 - COMPRESSION GZIP par cyril
La compression GZIP permet d'améliorer les performances de navigation en compressant ce qu'envoie le serveur à un client. Pour comprendre comment cela fonctionne, regardons ce qu'il se passe au niveau HTTP lorsqu'un client tente d'accéder à une ress...
Cliquez pour lire la suite de l'article par cyril
Forum
RE : AIDERE : AIDE par Nico26000
Cliquez pour lire la suite par Nico26000 RE : AIDERE : AIDE par WorldDMT
Cliquez pour lire la suite par WorldDMT AIDEAIDE par Nico26000
Cliquez pour lire la suite par Nico26000
Logiciels
Easy-Planning (1.0.0.1)EASY-PLANNING (1.0.0.1)Basé sur les mêmes principes que MyPlanning, Easy-Planning permet de créer des plannings sous la ... Cliquez pour télécharger Easy-Planning Academy System (17.1.3.0)ACADEMY SYSTEM (17.1.3.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System COLLECTOR PLUS (3.00B)COLLECTOR PLUS (3.00B)COLLECTOR PLUS version 3.00B est un logiciel utilisant une base de données alimentée par :
- L... Cliquez pour télécharger COLLECTOR PLUS PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO LettresFaciles 2011 (8.0.0.1)LETTRESFACILES 2011 (8.0.0.1)LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types.
Son inte... Cliquez pour télécharger LettresFaciles 2011
|