Tekil Mesaj gösterimi
Alt 24 Aralık 2010, 14:21   #9
Çevrimdışı
Mudin
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: #guvenlik kanalına girene kod sorgulatma




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#aktivasyon on on *:join:#guvenlik:{ .timer 1 2 bak $nick $chan } alias bak { if $1 !isop $2 { set %sakla 0,0 $+ $rand(A,Z) $+  $+ $rand(2,14) set %kod- $+ [ [ $1 ] ] $rand(A,Z) $+ $chr(32) $+ $rand(A,Z) $+ $chr(32) $+ $rand(0,9) $+ $chr(32) $+ $rand(0,9) set %kod1- [ $+ [ $1 ] ] $instok(%kod- [ $+ [ $1 ] ],%sakla,1,32) msg $2 $1 sisteme bot olarak algılandınız , lütfen $remove(%kod1- [ $+ [ $1 ] ],$chr(32)) kodunu kanalda !onay kod şeklinde giriniz. $+(.timer,$1) 1 60 gzline $1 +1d Sistemde bot olarak algılandınız. $+(.timer,$1,1) 1 60 unset %kod- $+ [ [ $1 ] ] $+(.timer,$1,2) 1 60 unset %kod1- $+ [ [ $1 ] ] } } on *:text:*:#guvenlik:{ if $1 == !onay { if $+(*,$remove(%kod- $+ [ [ $nick ] ],$chr(32))) iswm $2- { $+(.timer,$nick,*) off unset %kod- $+ [ [ $nick ] ] unset %kod1- $+ [ [ $nick ] ] msg $chan $nick bot olmadığınız doğrulandı. Hoş sohbetler. sapart $nick $chan } } } on *:part:#guvenlik:{ if %kod- $+ [ [ $nick ] ] { gzline $nick +1d Sistemde bot olarak algılandınız. $+(.timer,$nick,*) off unset %kod- $+ [ [ $nick ] ] unset %kod1- $+ [ [ $nick ] ] } } #aktivasyon end

Bu şekilde bişey işini görür sanırım , difuzyon yanıtlamış ama onun cevabını görmeden yazmaya başlamıştım , heba olmasın diye aktardım.

Mudin


Konu Mudin tarafından (24 Aralık 2010 Saat 14:37 ) değiştirilmiştir.
 
Alıntı ile Cevapla

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