on @*:JOIN:#:{
if $ialchan($wildsite,#,0) >= 3 {
mode # +b $wildsite
kick # $ial($wildsite,1).nick $+ , $+ $ial($wildsite,2).nick $+ , $+ $ial($wildsite,3).nick $+ , $+ $ial($wildsite,4).nick $+ , $+ $ial($wildsite,5).nick $+ , $+ $ial($wildsite,6).nick Don't Cloning Here)
}
}
on @*:join:#:{
inc -u1 %adadforjoin. [ $+ [ $chan ] ]
if (%adadforjoin. [ $+ [ $chan ] ] >= 5) {
.mode $chan +R | .remote off | /timer 1 10 /.remote on
}
set -u3 %Jfk. [ $+ [ $chan ] $+ . $+ [ $wildsite ] ] $calc( %Jfk. [ $+ [ $chan ] $+ . $+ [ $wildsite ] ] + 1 )
if ( %Jfk. [ $+ [ $chan ] $+ . $+ [ $wildsite ] ] >= 2) {
if ($nick isop #) return
.mode $chan +Rb $wildsite | .remote off | /timer 1 10 /.remote on
set %palystan $nick($chan,0)
unset %fastfilters
:loop
inc %fastfilters
inc -u2 %tolele
if (%tolele >= 4) halt
if (%fastfilters > %palystan) halt
set %temp.filter.kicks $ialchan($wildsite,$chan,%fastfilters).nick
if (%temp.filter.kicks == $me) { goto loop }
if (%temp.filter.kicks isop $chan) || (%temp.filter.kicks isvo $chan) { goto loop }
if (%temp.filter.kicks ison $chan) .kick $chan %temp.filter.kicks Join Bot)
goto loop
}
}
on *:quit:{
if $gettok(%tempflood [ $+ [ $site ] ] ,1,32) = $nick {
mode $gettok(%tempflood [ $+ [ $site ] ] ,2,32) $iif(%siteclose = $null,+Rb,b) *!*@ $+ $site | .remote off | /timer 1 10 /.remote on | .timer 1 15 mode # -R
set -u5 %siteclose ? | .timerchan off
}
}
on @*!:join:#:{ set -u2 %tempflood [ $+ [ $site ] ] $nick # }
on *:part:#:{
if $gettok(%tempflood [ $+ [ $site ] ] ,1,32) = $nick {
mode $gettok(%tempflood [ $+ [ $site ] ] ,2,32) +Rb $wildsite | .remote off | /timer 1 10 /.remote on | .timer 1 15 mode # -R
}
}
on @1:join:#:{
if (*!*@200.* iswm $fulladdress) || (*!*@*.shawcable.net iswm $fulladdress) || (*!*@*.proxad.net iswm $fulladdress) || (*!*@*.net.au iswm $fulladdress) || (*!*@*.bitsyu.net iswm $fulladdress) || (*!*@*.qwest.net iswm $fulladdress) || (*!*@*.sympatico.ca iswm $fulladdress) || (*!*@*.forthent.gr iswm $fulladdress) || (*!*@24.* iswm $fulladdress) || (*!*@209.* iswm $fulladdress) || (*!*??????*@210.* iswm $fulladdress) || (*!*@*.ca.us iswm $fulladdress) || (*!*@*.citlink.net iswm $fulladdress) || (*!*@*.netlink.se iswm $fulladdress) || (*!*@198.* iswm $fulladdress) || (*!*@163.* iswm $fulladdress) || (*!*@166.* iswm $fulladdress) || (*!*@*.siol.net iswm $fulladdress) || (*!*@80.* iswm $fulladdress) { mode # +b $wildsite | kick # $nick Proxy ... Out!) }
if (*!*@*.wanadoo.nl iswm $fulladdress) || (*!*@*.charterpipeline.net iswm $fulladdress) || (*!*@*.tin.it iswm $fulladdress) || (*!*@*.eunet.yu iswm $fulladdress) || (*!*@211.* iswm $fulladdress) || (*!*@*.com.cy iswm $fulladdress) || (*!*@*.pol.co.uk iswm $fulladdress) || (*!*@*.yubc.net iswm $fulladdress) || (*!*@*.online.no iswm $fulladdress) || (*!*@*.intnet.mu iswm $fulladdress) || (*!*@*.volja.net iswm $fulladdress) || (*!*@*.menanet.net iswm $fulladdress) || (*!*@*.net.ec iswm $fulladdress) || (*!*@*.thumb.net iswm $fulladdress) || (*!*@*.forgent.net iswm $fulladdress) || (*!*@*.net.lb iswm $fulladdress) || (*!*@*.retevision.es iswm $fulladdress) || (*!*@*.qwest.net iswm $fulladdress) { mode # +b $wildsite | kick # $nick Proxy ... Out!) }
if (*!*@148.* iswm $fulladdress) || (*!*??????@*.aol.com iswm $fulladdress) || (*!*@64.* iswm $fulladdress) || (*!*@*.com.br iswm $fulladdress) || (*!*@*.knology.net iswm $fulladdress) || (*!*@*.optonline.net iswm $fulladdress) || (*!*@*.telenet.be iswm $fulladdress) || (*!*@*.uni.edu iswm $fulladdress) || (*!*@*.com.sg iswm $fulladdress) || (*!*@*.bredbandsbolaget.se iswm $fulladdress) || (*!*@*.videotron.ca iswm $fulladdress) || (*!*@*.telia.com iswm $fulladdress) || (*!*@*.uu.net iswm $fulladdress) || (*!*@*.net1plus.com iswm $fulladdress) || (*!*@*.co.nz iswm $fulladdress) || (*!*@61.* iswm $fulladdress) || (*!*@*.o1.com iswm $fulladdress) || (*!*@*.interpacket.net iswm $fulladdress) { mode # +b $wildsite | kick # $nick Proxy ... Out!) }
if (*!*@*.interisland.net iswm $fulladdress) || (*!*@*.attbi.com iswm $fulladdress) || (*!*@*.arnes.si iswm $fulladdress) || (*!*@*.verestar.net iswm $fulladdress) || (*!*@*.netcom.ca iswm $fulladdress) || (*!*@*.tii-dial.net iswm $fulladdress) || (*!*@*.net.id iswm $fulladdress) || (*!*??????@203.* iswm $fulladdress) || (*!*@*.uh.edu iswm $fulladdress) || (*!*@*.mtco.com iswm $fulladdress) || (*!*@*.acvilon.com iswm $fulladdress) || (*!*@66.* iswm $fulladdress) || (*!*@*.mindspring.com iswm $fulladdress) || (*!*??????@218.* iswm $fulladdress) || (*!*@144.* iswm $fulladdress) || (*!*@*.bellsouth.net iswm $fulladdress) || (*!*@*.azerin.com iswm $fulladdress) { mode # +b $wildsite | kick # $nick Proxy ... Out!) }
}
if $ialchan($wildsite,#,0) >= 3 {
mode # +b $wildsite
kick # $ial($wildsite,1).nick $+ , $+ $ial($wildsite,2).nick $+ , $+ $ial($wildsite,3).nick $+ , $+ $ial($wildsite,4).nick $+ , $+ $ial($wildsite,5).nick $+ , $+ $ial($wildsite,6).nick Don't Cloning Here)
}
}
on @*:join:#:{
inc -u1 %adadforjoin. [ $+ [ $chan ] ]
if (%adadforjoin. [ $+ [ $chan ] ] >= 5) {
.mode $chan +R | .remote off | /timer 1 10 /.remote on
}
set -u3 %Jfk. [ $+ [ $chan ] $+ . $+ [ $wildsite ] ] $calc( %Jfk. [ $+ [ $chan ] $+ . $+ [ $wildsite ] ] + 1 )
if ( %Jfk. [ $+ [ $chan ] $+ . $+ [ $wildsite ] ] >= 2) {
if ($nick isop #) return
.mode $chan +Rb $wildsite | .remote off | /timer 1 10 /.remote on
set %palystan $nick($chan,0)
unset %fastfilters
:loop
inc %fastfilters
inc -u2 %tolele
if (%tolele >= 4) halt
if (%fastfilters > %palystan) halt
set %temp.filter.kicks $ialchan($wildsite,$chan,%fastfilters).nick
if (%temp.filter.kicks == $me) { goto loop }
if (%temp.filter.kicks isop $chan) || (%temp.filter.kicks isvo $chan) { goto loop }
if (%temp.filter.kicks ison $chan) .kick $chan %temp.filter.kicks Join Bot)
goto loop
}
}
on *:quit:{
if $gettok(%tempflood [ $+ [ $site ] ] ,1,32) = $nick {
mode $gettok(%tempflood [ $+ [ $site ] ] ,2,32) $iif(%siteclose = $null,+Rb,b) *!*@ $+ $site | .remote off | /timer 1 10 /.remote on | .timer 1 15 mode # -R
set -u5 %siteclose ? | .timerchan off
}
}
on @*!:join:#:{ set -u2 %tempflood [ $+ [ $site ] ] $nick # }
on *:part:#:{
if $gettok(%tempflood [ $+ [ $site ] ] ,1,32) = $nick {
mode $gettok(%tempflood [ $+ [ $site ] ] ,2,32) +Rb $wildsite | .remote off | /timer 1 10 /.remote on | .timer 1 15 mode # -R
}
}
on @1:join:#:{
if (*!*@200.* iswm $fulladdress) || (*!*@*.shawcable.net iswm $fulladdress) || (*!*@*.proxad.net iswm $fulladdress) || (*!*@*.net.au iswm $fulladdress) || (*!*@*.bitsyu.net iswm $fulladdress) || (*!*@*.qwest.net iswm $fulladdress) || (*!*@*.sympatico.ca iswm $fulladdress) || (*!*@*.forthent.gr iswm $fulladdress) || (*!*@24.* iswm $fulladdress) || (*!*@209.* iswm $fulladdress) || (*!*??????*@210.* iswm $fulladdress) || (*!*@*.ca.us iswm $fulladdress) || (*!*@*.citlink.net iswm $fulladdress) || (*!*@*.netlink.se iswm $fulladdress) || (*!*@198.* iswm $fulladdress) || (*!*@163.* iswm $fulladdress) || (*!*@166.* iswm $fulladdress) || (*!*@*.siol.net iswm $fulladdress) || (*!*@80.* iswm $fulladdress) { mode # +b $wildsite | kick # $nick Proxy ... Out!) }
if (*!*@*.wanadoo.nl iswm $fulladdress) || (*!*@*.charterpipeline.net iswm $fulladdress) || (*!*@*.tin.it iswm $fulladdress) || (*!*@*.eunet.yu iswm $fulladdress) || (*!*@211.* iswm $fulladdress) || (*!*@*.com.cy iswm $fulladdress) || (*!*@*.pol.co.uk iswm $fulladdress) || (*!*@*.yubc.net iswm $fulladdress) || (*!*@*.online.no iswm $fulladdress) || (*!*@*.intnet.mu iswm $fulladdress) || (*!*@*.volja.net iswm $fulladdress) || (*!*@*.menanet.net iswm $fulladdress) || (*!*@*.net.ec iswm $fulladdress) || (*!*@*.thumb.net iswm $fulladdress) || (*!*@*.forgent.net iswm $fulladdress) || (*!*@*.net.lb iswm $fulladdress) || (*!*@*.retevision.es iswm $fulladdress) || (*!*@*.qwest.net iswm $fulladdress) { mode # +b $wildsite | kick # $nick Proxy ... Out!) }
if (*!*@148.* iswm $fulladdress) || (*!*??????@*.aol.com iswm $fulladdress) || (*!*@64.* iswm $fulladdress) || (*!*@*.com.br iswm $fulladdress) || (*!*@*.knology.net iswm $fulladdress) || (*!*@*.optonline.net iswm $fulladdress) || (*!*@*.telenet.be iswm $fulladdress) || (*!*@*.uni.edu iswm $fulladdress) || (*!*@*.com.sg iswm $fulladdress) || (*!*@*.bredbandsbolaget.se iswm $fulladdress) || (*!*@*.videotron.ca iswm $fulladdress) || (*!*@*.telia.com iswm $fulladdress) || (*!*@*.uu.net iswm $fulladdress) || (*!*@*.net1plus.com iswm $fulladdress) || (*!*@*.co.nz iswm $fulladdress) || (*!*@61.* iswm $fulladdress) || (*!*@*.o1.com iswm $fulladdress) || (*!*@*.interpacket.net iswm $fulladdress) { mode # +b $wildsite | kick # $nick Proxy ... Out!) }
if (*!*@*.interisland.net iswm $fulladdress) || (*!*@*.attbi.com iswm $fulladdress) || (*!*@*.arnes.si iswm $fulladdress) || (*!*@*.verestar.net iswm $fulladdress) || (*!*@*.netcom.ca iswm $fulladdress) || (*!*@*.tii-dial.net iswm $fulladdress) || (*!*@*.net.id iswm $fulladdress) || (*!*??????@203.* iswm $fulladdress) || (*!*@*.uh.edu iswm $fulladdress) || (*!*@*.mtco.com iswm $fulladdress) || (*!*@*.acvilon.com iswm $fulladdress) || (*!*@66.* iswm $fulladdress) || (*!*@*.mindspring.com iswm $fulladdress) || (*!*??????@218.* iswm $fulladdress) || (*!*@144.* iswm $fulladdress) || (*!*@*.bellsouth.net iswm $fulladdress) || (*!*@*.azerin.com iswm $fulladdress) { mode # +b $wildsite | kick # $nick Proxy ... Out!) }
}
تعليق