Code: Select all
set mjointrigger "3:5"
bind join - "*" mass:join:chan
proc mass:join:chan {nick uhost hand chan} {
global botnick mjointrigger joinflood kickno net_split
if {[isbotnick $nick] || [info exists net_split]} { return 0 }
set host "*!*@[lindex [split [maskhost $uhost] @] 1]"
set user [string tolower $chan]
if {[string match -nocase "#*" $chan]} {
if {![info exists joinflood($user)]} {
set joinflood($user) 0
}
utimer [lindex [split $mjointrigger :] 1] [list mass:join:list $user]
if {[incr joinflood($user)] >= [lindex [split $mjointrigger :] 0]} {
if {[botisop $chan]} {
putquick "MODE $chan +b $host" -next
set clonenicks [list]; set clonenum 0
foreach person [chanlist $chan] {
if {[string match -nocase *$host* "$person![getchanhost $person $chan]"] && ![isop $person $chan] && ![isvoice $person $chan]} {
incr clonenum; lappend clonenicks $person:$clonenum
}
}
foreach clone $clonenicks {
putquick "KICK $chan [lindex [split $clone :] 0] :0,1 Clone Mass Join Flood 12,0 - You 2joined with6 [lindex [split $mjointrigger :] 0] clients 2or more 12in less than6 [lindex [split $mjointrigger :] 1] secs 12from the host 6*!*@[lindex [split $uhost @] 1] 12- (Clone2 #[lindex [split $clone :] 1] 12of2 #[llength $clonenicks]12)" -next
}
unset clonenicks; unset clonenum
timer 60 [list putquick "MODE $chan -b $host"]
}
if {[info exists joinflood($user)]} { unset joinflood($user) }
}
}
}
proc mass:join:list {user} {
global joinflood
if {[info exists joinflood($user)]} { incr joinflood($user) -1 }
}
bind splt "*" - mass:join:split
bind rejn "*" - mass:join:rejoin
proc mass:join:split {nick host hand chan} {
global net_split
if {[info exists net_split]} {
return 0
} elseif {![info exists net_split] && [onchansplit $nick $chan]} {
set net_split 1
}
}
proc mass:join:rejoin {nick host hand chan} {
global net_split
if {[info exists net_split]} {
utimer 5 [list "unset net_split"]
}
}
02[12:35] 01*02*12* [01#usa] Punishing 01[^FuL|an0^] (~akbbkvaz@c-68-62-75-66.hsd1.mi.comcast.net) Notice flood - 1 in 3 sec - Offense 1 (bk0)
03[12:35] *** Cash-money-r (~lqptcyj@adsl-76-241-188-222.dsl.sfldmi.sbcglobal.net) has joined #usa
05[12:35] -Cash-money-r:#usa- 4,1Jj` [censored] ur MOM SISTERS where is ur bitch sis TinaStar ? i listened yesterday she is a tight bitch & we can take her for a night for 50$4.I`ll pay u 60$ so take her soon without clothes.coz i love to see ur slut TinaStar sis completly nude.(THE GAME IS GEGUN NOW 7Jj`[censored] u Jj` 12(Papa's flooder)
02[12:35] 01*02*12* [01#usa] Punishing 01Cash-money-r (~lqptcyj@adsl-76-241-188-222.dsl.sfldmi.sbcglobal.net) Notice flood - 1 in 3 sec - Offense 1 (bk0)
03[12:35] *** |MetalMan| (~iiiocoog@adsl-76-241-188-222.dsl.sfldmi.sbcglobal.net) has joined #usa - Clones: 2 from |MetalMan| (Cash-money-r) CtrlF1 whois; ShiftF8 ping; F8 to punish
05[12:35] -|MetalMan|:#usa- 4,1Jj` [censored] ur MOM SISTERS where is ur bitch sis TinaStar ? i listened yesterday she is a tight bitch & we can take her for a night for 50$4.I`ll pay u 60$ so take her soon without clothes.coz i love to see ur slut TinaStar sis completly nude.(THE GAME IS GEGUN NOW 7Jj`[censored] u Jj` 12(Papa's flooder)
02[12:35] 01*02*12* [01#usa] Punishing 01|MetalMan| (~iiiocoog@adsl-76-241-188-222.dsl.sfldmi.sbcglobal.net) Notice flood - 1 in 3 sec - Offense 1 (bk0)
03[12:35] *** vendeur71 (~jhklork@68.62.75.66) has joined #usa
05[12:35] -vendeur71:#usa- 4,1Jj` [censored] ur MOM SISTERS where is ur bitch sis TinaStar ? i listened yesterday she is a tight bitch & we can take her for a night for 50$4.I`ll pay u 60$ so take her soon without clothes.coz i love to see ur slut TinaStar sis completly nude.(THE GAME IS GEGUN NOW 7Jj`[censored] u Jj` 12(Papa's flooder)
02[12:35] 01*02*12* [01#usa] Punishing 01vendeur71 (~jhklork@68.62.75.66) Notice flood - 1 in 3 sec - Offense 1 (bk0)
03[12:35] *** X sets mode: +l 122
03[12:35] *** [[KurtCobain (~zmmzowxn@cpe-75-83-182-231.socal.res.rr.com) has joined #usa
05[12:35] -[[KurtCobain:#usa- 4,1Jj` [censored] ur MOM SISTERS where is ur bitch sis TinaStar ? i listened yesterday she is a tight bitch & we can take her for a night for 50$4.I`ll pay u 60$ so take her soon without clothes.coz i love to see ur slut TinaStar sis completly nude.(THE GAME IS GEGUN NOW 7Jj`[censored] u Jj` 12(Papa's flooder)
02[12:35] 01*02*12* [01#usa] Punishing 01[[KurtCobain (~zmmzowxn@cpe-75-83-182-231.socal.res.rr.com) Notice flood - 1 in 3 sec - Offense 1 (bk0)
03[12:35] *** Dr^IshQbla (~ipgjlipk@cpe-75-83-182-231.socal.res.rr.com) has joined #usa - Clones: 2 from Dr^IshQbla ([[KurtCobain) CtrlF1 whois; ShiftF8 ping; F8 to punish
05[12:35] -Dr^IshQbla:#usa- 4,1Jj` [censored] ur MOM SISTERS where is ur bitch sis TinaStar ? i listened yesterday she is a tight bitch & we can take her for a night for 50$4.I`ll pay u 60$ so take her soon without clothes.coz i love to see ur slut TinaStar sis completly nude.(THE GAME IS GEGUN NOW 7Jj`[censored] u Jj` 12(Papa's flooder)
02[12:35] 01*02*12* [01#usa] Punishing 01Dr^IshQbla (~ipgjlipk@cpe-75-83-182-231.socal.res.rr.com) Notice flood - 1 in 3 sec - Offense 1 (bk0)
03[12:35] *** ZaMaN_EL_3aG (~kuzwcvmm@cpe-75-83-182-231.socal.res.rr.com) has joined #usa - Clones: 3 from ZaMaN_EL_3aG (Dr^IshQbla, [[KurtCobain) CtrlF1 whois; ShiftF8 ping; F8 to punish