Konu: Tcl Script
Tekil Mesaj gösterimi
Alt 09 Ocak 2012, 16:24   #7
Çevrimdışı
qeweSe
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Tcl Script




oPtimiSt Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
mesela bota text dosyasına bırseyler yazdırma ornegın .badnekle tiki yazınca ftp dekı dosyaya nıckı ekleyıp listedekı o nıckle gelenı yada o nıcke gecenı atacak


sana bir örnek sunmak isterim.

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
# önce komutun fonksiyonunu belirliyelim..

proc bad:ekle {n u c h a} {
    global 
botnick 
    
#burda botnick ki cagiriyoruz..
    
if {[lindex $a 0] == "badnick"} { putquick "PRIVMSG $c :[lindex $a 0] komutunu kullandiniz.";return 0}
    
# yukaridaki if ile belirtilen komut dizisi eger gelen veri badnick ile aynı iste bunu yap gibi
    
else { putquick "PRIVMSG $c :Yanliş bir komut kullandiniz Lütfen düzeltip tekrar deneyin.";return 0}
    
# else ile başlayan ifade eger yukarida yazdigim if ile başlayan bir döngü yoksa bunu yap return 0 ise işlemi yaptiktan sonra başka bir işlem yapma anlamina gelir.
}

bind pubm - * bad:ekle 

#yukarida bulunan bind satiri komutun nasil calişicagini belirler
# bind <eylem> - <komut> <fonksiyon> 


 
Alıntı ile Cevapla

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