Admin Admin
Number of posts : 33 Age : 34 Location : Lovely.Placez Registration date : 2008-10-23
| Subject: `MassJoin Kekanak Ribena` Jer Nih.... Wed Nov 12, 2008 9:42 pm | |
| Type ni lu /set %mjoin on
- Quote :
on @*:JOIN:#: { if (%mjoin == on) { set -u3 %nflood. [ $ [ # ] ] $addtok(%nflood. [ $ [ # ] ],$nick,44) if ($gettok(%nflood. [ $ [ # ] ],0,44) == $iif(%max.join,%max.join,4)) { if (R !isin $chan(#).mode) { mode # | .timer.remode 1 $iif(%m.time,%m.time,30) remode # } .timeromg.kick. [ $ [ # ] ] -m 1 1500 omg.kick # } } } alias omg.remode { if ($me isop $1) { mode $1 -mjJRd $ (.timerub,$1) 1 $iif($($ (%,b.time,$1),2),$($ (%,b.time,$1),2),60) cb $1 } } alias omg.kick { kick $1 $($ (%,nflood.,$1),2) Mass Join Kick Webchat Clanz var %loop-a = 1 while ($gettok($($ (%,ipflood.,$1),2),%loop-a,32)) { � = � $gettok($($ (%,ipflood.,$1),2),%loop-a,32) if ($modespl == $numtok(�,32)) { mode $1 $ ( ,$str(b,$gettok(�,0,32))) � | � = "" } inc %loop-a } if (�) { mode $1 $ ( ,$str(b,$gettok(�,0,32))) � | � = "" } $ (.timerx,$1) 1 0 unset $ (%,*,flood.,$1) $ (.timercbm.,$1) 1 $iif($($ (%,m.time,$1),2),$($ (%,m.time,$1),2),30) omg.remode $1 } alias cb { var %b = 1,%nban = "" while ($ibl($1,%b)) { var %nban = $addtok(%nban,$ibl($1,%b),32) if ($modespl == $numtok(%nban,32)) { mode $1 $ (-,$str(b,$gettok(%nban,0,32))) %nban | %nban = "" } inc %b } if (%nban) { .mode $1 $ (-,$str(b,$gettok(%nban,0,32))) %nban | %nban = "" } } menu channel { - on/off $chr(9) $iif(%mjoin == on,on,off):set %mjoin $iif(%mjoin != on,on,off) | ame Info :mj remote on - max join $chr(9) $iif(%max.join,%max.join,4):set %max.join $input(maxjoin,e) | if (!%max.join) { set %max.join 4 } mode time $chr(9) $iif($($ (%,m.time,#),2),$($ (%,m.time,#),2),30):set $ (%,m.time,#) $?="╩ode time" | echo -a $ ($chr(3),07,? Info : mode time %m.time unban time $chr(9) $iif($($ (%,b.time,#),2),$($ (%,b.time,#),2),60):set $ (%,b.time,#) $?="╱nban time" | echo -a $ ($chr(3),07,? Info : unban time %m.time - } on *:quit:{ if (*.*.* iswm $1) && (*.*.* iswm $2) { inc -u20 %qnet 1 if (%qnet == 1) { set %mjoin off | echo -a $ ($chr(3),07,? Info : Mass Join Protection - Webchat Clanz } } }
[Note] :: The Power Of Scripting Is Less Excess Flood..Not Mass Kicked~ | |
|