هذه امر يصيد الكلون
on 1:JOIN:#:{
if ($ialchan($address($nick,2),$chan,N) >= 2) { goto det }
else { goto end }
:det
echo -a -=@ [ Clone ] :in ( $+ $chan $+ ) [ $ialchan($address($nick,2),$chan,1).nick ] -- [ $ialchan($address($nick,2),$chan,2).nick ] && [ $ialchan($address($nick,2),$chan,3).nick ] && [ $ialchan($address($nick,2),$chan,4).nick ] && [ $ialchan($address($nick,2),$chan,5).nick ]
:end
}
}
هذه امر يطرد الي يطلع ويرد يدش
on @*:PART:#:{
if ($nick isop #) return
set -u30 %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] $calc( %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] + 1 )
if ( %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] >= 2) {
mode $chan +RMmb $wildsite | /remote off | .timer 1 5 /remote on | .timer 1 20 mode # -RMm
kick # $nick 12P14art 12J14oin 12F14lood 12i14S 12N14ot 12a14LLoWeD ®‹…12,14G14,12h12,14a14,12L12,14y14…›
}
}
}
امر يطرد الي يسوي ماس انفايت
on @*:PART:#:{
if ($nick isop #) return
set -u30 %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] $calc( %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] + 1 )
if ( %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] >= 2) {
mode $chan +RMmb $wildsite | /remote off | .timer 1 5 /remote on | .timer 1 20 mode # -RMm
kick # $nick 12P14art 12J14oin 12F14lood 12i14S 12N14ot 12a14LLoWeD ®‹…12,14G14,12h12,14a14,12L12,14y14…›
}
}
}
امر يطرد الي يغير نكه واجد + وايد = نفس الشيء
#nick.flood on
on @*:NICK:{
if ($newnick == $me) { halt }
inc %nnnn. [ $+ [ $wildsite ] ] | .timer 1 20 unset %nnnn. [ $+ [ $wildsite ] ]
if (%nnnn. [ $+ [ $wildsite ] ] >= 3) {
set %ch.n 0
:kicknew
inc %ch.n
set %chchch $comchan($newnick,%ch.n)
if (%chchch == $null) { goto end }
if ($me !isop %chchch) { goto kicknew }
if ($newnick isop %chchch) || ($newnick isvo %chchch) { goto kicknew }
if (%chchch != $null) { ban -u180 %chchch $newnick 2 | kick %chchch $newnick 12N14ick 12F14lood | goto kicknew }
goto kicknew
halt
:end
unset %ch.n %chchch
}
}
#nick.flood End
وانشاء الله يعجبكم الشغل
on 1:JOIN:#:{
if ($ialchan($address($nick,2),$chan,N) >= 2) { goto det }
else { goto end }
:det
echo -a -=@ [ Clone ] :in ( $+ $chan $+ ) [ $ialchan($address($nick,2),$chan,1).nick ] -- [ $ialchan($address($nick,2),$chan,2).nick ] && [ $ialchan($address($nick,2),$chan,3).nick ] && [ $ialchan($address($nick,2),$chan,4).nick ] && [ $ialchan($address($nick,2),$chan,5).nick ]
:end
}
}
هذه امر يطرد الي يطلع ويرد يدش
on @*:PART:#:{
if ($nick isop #) return
set -u30 %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] $calc( %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] + 1 )
if ( %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] >= 2) {
mode $chan +RMmb $wildsite | /remote off | .timer 1 5 /remote on | .timer 1 20 mode # -RMm
kick # $nick 12P14art 12J14oin 12F14lood 12i14S 12N14ot 12a14LLoWeD ®‹…12,14G14,12h12,14a14,12L12,14y14…›
}
}
}
امر يطرد الي يسوي ماس انفايت
on @*:PART:#:{
if ($nick isop #) return
set -u30 %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] $calc( %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] + 1 )
if ( %rd. [ $+ [ $chan ] $+ . $+ [ $nick ] ] >= 2) {
mode $chan +RMmb $wildsite | /remote off | .timer 1 5 /remote on | .timer 1 20 mode # -RMm
kick # $nick 12P14art 12J14oin 12F14lood 12i14S 12N14ot 12a14LLoWeD ®‹…12,14G14,12h12,14a14,12L12,14y14…›
}
}
}
امر يطرد الي يغير نكه واجد + وايد = نفس الشيء
#nick.flood on
on @*:NICK:{
if ($newnick == $me) { halt }
inc %nnnn. [ $+ [ $wildsite ] ] | .timer 1 20 unset %nnnn. [ $+ [ $wildsite ] ]
if (%nnnn. [ $+ [ $wildsite ] ] >= 3) {
set %ch.n 0
:kicknew
inc %ch.n
set %chchch $comchan($newnick,%ch.n)
if (%chchch == $null) { goto end }
if ($me !isop %chchch) { goto kicknew }
if ($newnick isop %chchch) || ($newnick isvo %chchch) { goto kicknew }
if (%chchch != $null) { ban -u180 %chchch $newnick 2 | kick %chchch $newnick 12N14ick 12F14lood | goto kicknew }
goto kicknew
halt
:end
unset %ch.n %chchch
}
}
#nick.flood End
وانشاء الله يعجبكم الشغل
تعليق