Tekil Mesaj gösterimi
Alt 25 Şubat 2008, 14:17   #1
Çevrimdışı
Hasan
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Bunu Nasıl Duzenlerim.




*:text:*:#: {
if ($nick isop #) && (%oplari == on) { return }
if ($nick ison #) && (%vlar == on) { return }
kufurculer $1-
}
alias kufurculer {
var %x $strip($1-) , %i $numtok(%soyush,44)
while (%i) {
if ($gettok(%soyush,%i,44) iswm %x) || ($gettok(%soyush,%i,44) isin %x) {
if (%kiket == on) { .samode # +b $wildsite }
if (%banet == on) { .ban $iif(%banvaxt isnum,-u $+ %banvaxt) # $nick 2 }
return
}
dec %i
}
}
dialog kufurcu {
title "Reklam Koruma"
size -1 -1 185 81
option dbu
box "Eklenecek Reklam Girin", 1, 90 1 94 79
combo 2, 94 10 87 53, size
button "Ekle", 3, 98 66 31 10
button "Sil", 4, 144 65 31 10
box "", 5, 96 60 36 18
box "", 6, 142 60 36 18
box "Yapılacak işlem", 7, 2 2 84 45
check "Kick ", 8, 5 13 39 10
check "Ban ", 9, 5 31 32 10
edit "", 10, 36 30 23 12, disable
text "Saniye", 11, 62 32 21 8, disable
box "Ayir", 12, 2 49 84 31
check "@plar", 13, 6 57 77 10
check "+Voiceler", 14, 6 68 75 10
}
alias bad { .dialog -m kufurcu kufurcu }
on *:dialog:kufurcu:init:*:{
if (%kifirler) didtok $dname 2 44 $ifmatch
if (%kiketi) { .did -c $dname 8 }
if (%baneti) { .did -c $dname 9 }
if (%oplari) { .did -c $dname 13 }
if (%vlar) { .did -c $dname 14 }
did -a $dname 10 %banvaxti
}
on *:dialog:kufurcu:sclick:*:{
if ($did == 3) {
if ($did(2) != $null) { set -u %artir $did(2) | if (%artir) && (!$istok(%kifirler,%artir,44)) { .set %kifirler $addtok(%kifirler,%artir,44) | did -a $dname 2 %artir } }
}
if ($did == 4) { if ($did(2).sel > 0) { .set %kifirler $remtok(%kifirler,$did(2).seltext,1,44) | did -d $dname 2 $did(2).sel | did -c $dname 2 1 } }
if ($did == 8) { if ($did(8).state == 1) { .set %kiketi on } | else { .unset %kiketi } }
if ($did == 9) { if ($did(9).state == 1) { .set %baneti on | did -e $dname 10,11 } | else { .unset %baneti | did -b $dname 10,11 } }
if ($did == 13) { if ($did(13).state == 1) { .set %oplari on } | else { .unset %oplari } }
if ($did == 14) { if ($did(14).state == 1) { .set %vlar on } | else { .unset %vlar } }
}
on *:dialog:kufurcu:edit:*:{
%banvaxti = $did(10)
}


ARKADASLAR BU KUFUR DOYALOG U BEN BUNU PROXY KORUMASI GIBI IP EKLIYECEGIM SEKILE GETIMEK ISTIYORUM NASIL YAPABILIRIM ??

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet