on ^1:OPEN:?: {
if ( %quew == $wildsite ) { goto next }
else goto end 
:next
if ( %quew == $wildsite ) { set %quew1 $wildsite }
:end
}
on @1:QUIT:{ if ($chr(3) isin $1-) || ($chr(2) isin $1-) || (Client isin $1-) || (connection isin $1-) { .auser mmmm $wildsite | .timer 1 7 .rlevel mmmm | .ignore -u8 $wildsite } }



#quitflood on
on @mmmm:JOIN:#:{ 
ban $chan $wildsite
set %palysta $nick($chan,0)
unset %fastfilter 
:loop
inc %fastfilter
if (%fastfilter > %palysta) halt
set %temp.filter.kick $ial($wildsite,%fastfilter).nick
if (%temp.filter.kick == $me) { goto loop }
if (%temp.filter.kick ison $chan) kick $chan %temp.filter.kick 1,15 4Q1,15uit 4F1,15lOoOd %naif
goto loop
}
#quitflood end

#quitflood1 on
on ^1!:quit:{
if $gettok(%tempquit [ $+ [ $site ] ] ,2,32) == $nick {
if %tempqmode [ $+ [ $site ] ] == $null {
set -u10 %tempqmode [ $+ [ $site ] ] ?
mode $gettok(%tempquit [ $+ [ $site ] ] ,1,32) +mRb $wildsite
.timer 1 20 mode $gettok(%tempquit [ $+ [ $site ] ] ,1,32) -Rm
unset %tempquit [ $+ [ $site ] ]
}
}
}
on @1:join:#:.set -u1 %tempquit [ $+ [ $site ] ] $chan $nick
#quitflood1 end

menu menubar,channel {
كوت مسج فلود
.ON:/enable #quitflood | /enable #quitflood1 | echo 14,1 Quit Flood Pro. is now 7ON 
.OFF:/disable #quitflood | /disable #quitflood1 | echo 1,15 Quit Flood Pro. is now 7OFF 
}