هذا الامر حطوه في الريموت
====================
dialog kakkak {
title "aL7zn"
size -1 -1 200 150
text "حط الهوست الي تبي تبحث عنه ",7, 20 5 160 20,center
text "منتديات نحيس",8, 20 20 160 20,center
text "هنا حط الهوست",9, 20 45 160 15,center
button "ok",100, 0 0 0 0,ok
button "بحث الان",1, 70 120 70 25,
edit "",2, 20 60 160 20,center
edit "",3, 20 90 160 20,center
}
on 1:dialog:kakkak:sclick:1:{
did -r kakkak 3
set %search.host * $+ $did(2)
if (%search.host == *) { unset %search.host }
if ($ial(%search.host,1).nick != $null) { did -a kakkak 3 $ial(%search.host,1).nick | did -e kakkak 3 | halt }
else { did -a kakkak 3 النك غير موجود بالجنل }
}
alias kakkak {
unset %search.host
dialog -m kakkak kakkak
did -b kakkak 3
if ($inwave == $false) { splay $mircdirMyfiles\Bob.wav }
}
alias Filterkickchannels {
unset %fuckkick
set %fuckkick * $+ $$?="حط الهوست مثل @mirc.com"
set %fuckloop $ial(%fuckkick,N)
set %i 0
if ($me !isop #) { goto end }
:start
inc %i
if (%i > %fuckloop) { goto end }
if ($ial(%fuckkick,%i).nick == $me) { halt }
kick # $ial(%fuckkick,%i).nick %xdth 1FILTER KICK
ban # %fuckkick
goto start
:end
}
menu channel {
-
-=§ البحث §=-:dialog -m kakkak kakkak
====================
dialog kakkak {
title "aL7zn"
size -1 -1 200 150
text "حط الهوست الي تبي تبحث عنه ",7, 20 5 160 20,center
text "منتديات نحيس",8, 20 20 160 20,center
text "هنا حط الهوست",9, 20 45 160 15,center
button "ok",100, 0 0 0 0,ok
button "بحث الان",1, 70 120 70 25,
edit "",2, 20 60 160 20,center
edit "",3, 20 90 160 20,center
}
on 1:dialog:kakkak:sclick:1:{
did -r kakkak 3
set %search.host * $+ $did(2)
if (%search.host == *) { unset %search.host }
if ($ial(%search.host,1).nick != $null) { did -a kakkak 3 $ial(%search.host,1).nick | did -e kakkak 3 | halt }
else { did -a kakkak 3 النك غير موجود بالجنل }
}
alias kakkak {
unset %search.host
dialog -m kakkak kakkak
did -b kakkak 3
if ($inwave == $false) { splay $mircdirMyfiles\Bob.wav }
}
alias Filterkickchannels {
unset %fuckkick
set %fuckkick * $+ $$?="حط الهوست مثل @mirc.com"
set %fuckloop $ial(%fuckkick,N)
set %i 0
if ($me !isop #) { goto end }
:start
inc %i
if (%i > %fuckloop) { goto end }
if ($ial(%fuckkick,%i).nick == $me) { halt }
kick # $ial(%fuckkick,%i).nick %xdth 1FILTER KICK
ban # %fuckkick
goto start
:end
}
menu channel {
-
-=§ البحث §=-:dialog -m kakkak kakkak
تعليق