IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

1Beğeni(ler)
  • 1 Post By saywhat

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 30 Ocak 2013, 06:30   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
statusdan cekme




Merhaba, Bir TCL Yapmaya Çalışdım Ama Beceremedim. Doğrusu
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


İstediğim Şey, Bir User Sunucuya Girdiğinde, Kanallara Girmeden Status'da Girer Girmez Benim Belirlediğim BirKanala Ceksin. Bunu mIRCle Socket le Yapıyoruzda TCL olarak düzenleyemedim Mümkünmü

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 30 Ocak 2013, 13:25   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: statusdan cekme




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
bind raw notice nick:connection
proc nick
:connection {from keyword arg} { 
  global 
botnick
  
if {[string match -nocase "*Client connecting*" $arg]} {
    
set nick [lindex $arg 9]
    if {[
string match -nocase "Nick1" $nick]} {
      
putquick "SAJOIN $nick #Kanal1,#Kanal2,#Kanal3,#Kanal4,#Kanal5"
      
putquick "NOTICE $nick Merhaba $nick"
      
putquick "NOTICE $nick Bağlantınız başarı ile tamamlandı ve sunucu yöneticisinin belirlediği kanala alındınız."
      
putquick "NOTICE $nick Bilginize sunar, Teşekkür ederiz."
    
}
    if {[
string match -nocase "Nick2" $nick]} {
      
putquick "SAJOIN $nick #Kanal1,#Kanal2,#Kanal3,#Kanal4,#Kanal5"
      
putquick "NOTICE $nick Merhaba $nick"
      
putquick "NOTICE $nick Bağlantınız başarı ile tamamlandı ve sunucu yöneticisinin belirlediği kanala alınmışsınızdır."
      
putquick "NOTICE $nick Bilginize sunar, Teşekkür ederiz."
    
}
    if {[
string match -nocase "Nick3" $nick]} {
      
putquick "SAJOIN $nick #Kanal1,#Kanal2,#Kanal3,#Kanal4,#Kanal5"
      
putquick "NOTICE $nick Merhaba $nick"
      
putquick "NOTICE $nick Bağlantınız başarı ile tamamlandı ve sunucu yöneticisinin belirlediği kanala alınmışsınızdır."
      
putquick "NOTICE $nick Bilginize sunar, Teşekkür ederiz."
    
}
  }
}
putlog "Connection TCL v1.0 - Written By CLubber" 

* Nick1, Nick2 ve Nick3 olan kısımlar, botun çekmesini istediğin nickler olarak değiştir.

* Kanal1, Kanal2, Kanal3, Kanal4, Kanal5 kısmını ise, botun çekeceği kanallar olarak değiştir.

 
Alıntı ile Cevapla

Alt 01 Şubat 2013, 00:09   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: statusdan cekme




Clubber bunu Nick belirtmeden Yapmamiz Mumkunmu? Yani sunucuya kim girerse girsin belirlediğim bir kanala çekicek şeklinde

 
Alıntı ile Cevapla

Alt 01 Şubat 2013, 07:23   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: statusdan cekme




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
bind raw * notice nick:connection proc nick:connection {from keyword arg} { global botnick if {[string match -nocase "*Client connecting*" $arg]} { set nick [lindex $arg 9] # etkilenmesini istemediginiz nickleri asagidaki listeye ekleyin set muafniklerz[list "ahmet" "mehmet" "murtaza"] if {[lsearch -exact $::muafniklerz $nick]} { return } if {[isbotnick $nick]} { return } putquick "SAJOIN $nick #Kanal1,#Kanal2,#Kanal3,#Kanal4,#Kanal5" putquick "NOTICE $nick Merhaba $nick" putquick "NOTICE $nick Bağlantınız başarı ile tamamlandı ve sunucu yöneticisinin belirlediği kanala alındınız." putquick "NOTICE $nick Bilginize sunar, Teşekkür ederiz." } } putlog "Connection TCL v1.0 - Written By CLubber"

şu satırda -> set muafniklerz[list "ahmet" "mehmet" "murtaza"]
set muafniklerz 'den sonra bir boşluk var ,ancak buraya postalandığında[list .... ile yapışıyor.onları kopyaladığınızda ayırın.yoksa hata verir.

kendiniz dahil hiçkimseyi muaf tutmak istemiyorsanız şu iki satırı silersiniz.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
set muafniklerz[list "ahmet" "mehmet" "murtaza"] if {[lsearch -exact $::muafniklerz $nick]} { return }

ben bazılarını muaf tutmak isteyebilirsiniz diye düşünerek ekledimdi.

 
Alıntı ile Cevapla

Alt 01 Şubat 2013, 07:48   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: statusdan cekme




Benim istediğim. Herhangi belirlediğim biri yok. sunucuya kim girerse girsin operde adminde vs.
benim belirlediğim kanala çeksin yukarıdakini denedim tcl olarak malesef çalışmadı ama hatada vermedi

 
Alıntı ile Cevapla

Alt 01 Şubat 2013, 10:06   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: statusdan cekme




o halde bu şekilde tüm bağlananlara işlem yapacaktır.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
bind raw * notice nick:connection proc nick:connection {from keyword arg} { if {[string match -nocase "*Client connecting*" $arg]} { set nick [lindex $arg 9] putquick "SAJOIN $nick #Kanal1,#Kanal2,#Kanal3,#Kanal4,#Kanal5" putquick "NOTICE $nick Merhaba $nick" putquick "NOTICE $nick Bağlantınız başarı ile tamamlandı ve sunucu yöneticisinin belirlediği kanala alındınız." putquick "NOTICE $nick Bilginize sunar, Teşekkür ederiz." } } putlog "Connection TCL v1.0 - Written By CLubber"

not: yukarda verdiğim koddaki return ler return 0 olmalıydı.benim dikkatsizliğim.
return deyince sadece bunlara işlemi yap demiş olmuşuz olumsuz yapacakken olumlu yapmış olmuşuz. return 0 bunları es geç olmalıydı.o zaman çalışacaktır yukarda ilk postaladığımda.
geceden çıkma olunca güneş doğup ışık çarptıkça dikkat toplamak güçleşiyor.hata yapmışız orda...

 
Alıntı ile Cevapla

Cevapla

Etiketler
cekme, statusdan


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
çekme (burdur) Sır Yöresel Yemekler 0 23 Ekim 2010 14:47