ديلوق

[sub-ziro`]

______________________________ تحطه بريموت
#Xchan off
on @1:JOIN:#:.whois $nick
raw 319:*: {
if (%Xchan1 isin $3-) || (%Xchan2 isin $3-) || (%Xchan3 isin $3-) || (%Xchan4 isin $3-) || (%Xchan5 isin $3-) {
var %Wnick = $comchan($2,0)
while (%Wnick) {
if ($me isop $comchan($2,%Wnick)) {
ban -u60 $comchan($2,%Wnick) $2 11
kick $comchan($2,%Wnick) $2 1I don't like your channels! $+ )( $+ %z $+ $+
}
dec %Wnick
}
}
}
#Xchan End

alias Xchan dialog -m Xchan Xchan
dialog Xchan {
title "New Project"
size -1 -1 126 187
option pixels
edit "", 1, 4 19 116 21, center
edit "", 2, 4 44 116 21, center
edit "", 3, 4 70 116 21, center
edit "", 4, 4 95 116 21, center
edit "", 5, 4 121 116 21, center
box "", 6, 1 7 123 144
button " [ موافق ] ", 7, 24 157 75 25, flat ok
box "", 8, 1 148 122 37
}
on *:dialog:Xchan:init:0: {
did -a Xchan 1 %Xchan1
did -a Xchan 2 %Xchan2
did -a Xchan 3 %Xchan3
did -a Xchan 4 %Xchan4
did -a Xchan 5 %Xchan5
}
on *:dialog:Xchan:edit:*: {
if $did(1) { set %Xchan1 $did(1) }
if $did(2) { set %Xchan2 $did(2) }
if $did(3) { set %Xchan3 $did(3) }
if $did(4) { set %Xchan4 $did(4) }
if $did(5) { set %Xchan5 $did(5) }
}

Menu Channel,Menubar {
-
طرد الي يدخل قنوات وصخه
.تشغيل : .enable #Xchan | /echo -a * * * تم تشغيل الحمايه
.اطفاء : .disable #Xchan | /echo -a * * * تم اطفاء الحمايه
.اعداد : /Xchan
.-
.توضيح : /echo -a طريقته اذا دخل اي شخص القناه يعمل عليه بحث اذا كان بقنوات اباحيه او قنوات انت تضعها يطرد و يربط بان لمدة ستين ثانيه %z
}