اوامر متعدده [الجزء الاول]

[بياع الورد]

امر طرد الشتم في القناة هناك امرين

on @*:TEXT:*:#:{
if ($nick !isop #) {
if (shit isin $1-) || (dick isin $1-) || (fuck isin $1-) {
;The above if statement is what actually checks for the swear words
ban -u60 # $nick 11
kick # $nick Do not swear! ALMOIT Script
}
}
}
- - - - - - - - - - -
on @+1:TEXT:*كس*:#:{ if ($nick isop $chan) { halt } | ban $chan $nick 2 | kick $chan $nick عيب عليك Maktoob Script }
on @+1:TEXT:*fuck*:#:{ if ($nick isop $chan) { halt } | ban $chan $nick 2 | kick $chan $nick don't Swear Maktoob Script }

طرد اللوان من يكتب بالجنل اي لون يطردة السكربت

on @*:TEXT:*:#:{
if ($nick isop #) return
var %count = $count($1-,$chr(3))
inc %count $count($1-,$chr(2))
inc %count $count($1-,$chr(22))
inc %count $count($1-,$chr(31))
inc %count $count($1-,$chr(15))
;The above 5 lines count the number of control codes
if (%count >= 10) {
ban -u60 # $nick 11
kick # $nick Please don't use soo much colour ( $+ %count $+ ) ALMOIT Script
}
}

طرد تيكست فلود Text Flood

on @*:TEXT:*:#:{
if ($nick isop #) return
if ($len($strip($1-)) >= 250) {
;Note that I $strip the text before I use $len, so it won't count any
; control codes like colour or bold etc...
ban -u60 # $nick 11
kick # $nick You talk too much! Keep it below 250 letters ALMOIT Script
}
}

طرد دعايات بالجنل مثل الصفحة والجنل

on @*:TEXT:*:#:{
if ($nick isop #) return
var %s = $strip($1-)
if (*www* iswm %s) || (*http:* iswm %s) || (*ftp:* iswm %s) || ($chr(35) isin $1-) {
ban -u60 # $nick 11
kick # $nick Please do not advertise ( $+ $ifmatch detected) ALMOIT Script
}
}


طرد الايدينت السيئ

on @*:JOIN:#:{
if (*!*FUCK*@* iswm $fulladdress) || (*!*SHIT*@* iswm $fulladdress) || (*!*DICK*@* iswm $fulladdress) {
ban -u60 # $nick 11
kick # $nick Bad Identd! ALMOIT Script
}
}


طرد نكات قيست

on @*:JOIN:#:{
if (guest????? iswm $nick) {
ban -u60 # $nick 11
kick # $nick Guest nicks are not allowed, /nick
}
}
on *:NICK:{
if (guest????? iswm $newnick)) {
var %i = 0
while (%i < $comchan($newnick,0)) {
;This while loop goes through every channel both you and the nick are on
inc %i
if ($me isop $comchan($newnick,%i)) {
;You can only kick if you are an op =)
ban -u60 $comchan($newnick,%i) $newnick 11
kick $comchan($newnick,%i) $newnick Guest nicks are not allowed, /nick
}
}
}
}


طرد تكرار الكلام

on @*:TEXT:*:#:{
if ($nick isop #) || ($nick isvo #) return
var %text = $hash($strip($1-),32)
var %old.text = %rp. [ $+ [ $chan ] $+ . $+ [ $nick ] ]
var %old.text = $deltok(%old.text,1,46)
if (%rp. [ $+ [ $chan ] $+ . $+ [ $nick ] ] == $null) || (%old.text != %text) {
set -u60 %rp. [ $+ [ $chan ] $+ . $+ [ $nick ] ] 1. $+ %text
return
}
var %temp = %rp. [ $+ [ $chan ] $+ . $+ [ $nick ] ]
var %count = $gettok(%temp,1,46)
inc %count
set -u60 %rp. [ $+ [ $chan ] $+ . $+ [ $nick ] ] %count $+ . $+ %text
if (%count >= 4) {
ban -u60 # $nick 2
kick # $nick You repeated %count times! ALMOIT script }
}

[JeKaR^Bs^7LoOo]

مشكور عالسته الحلوه

[بياع الورد]

انا في الخدمة

لا شكر على واجب