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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 21 Temmuz 2007, 15:50   #11
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Istek TCL v2.0




Abi radyo kanalında !istek olayı bende olmamıştı onu kendi yöntemimle ayarladım !yes !no olayı gayet güzel çalışıyor elin sağlık

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 24 Temmuz 2007, 13:33   #12
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Istek TCL v2.0




NeTDeLiSi Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Abi radyo kanalında !istek olayı bende olmamıştı onu kendi yöntemimle ayarladım !yes !no olayı gayet güzel çalışıyor elin sağlık


NeTDeLiSi !istek olayını nasıl hallettin anlatırmısın sana zahmet ben hala çalıştıramadım Teşekkürler.

 
Alıntı ile Cevapla

Alt 25 Temmuz 2007, 00:06   #13
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Istek TCL v2.0




S.a KArdeş Bana KAOS Kelimetüretmece nin tcl leri lazım yani o sana bi soru soruyo veya bir kelime veriyo sen onunla ilgili şeyleri belli bir süre icerisinde söylüyon bu aciL

 
Alıntı ile Cevapla

Alt 28 Temmuz 2007, 23:23   #14
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Istek TCL v2.0




Selamın Aleykum arkadaşlar Bot süper bişeye benziyor ama bunu bende çalıştıramadım Adil
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.Siz diyorsunuz çalışıyor ama ben çalıştıramadım hiç bir şekilde

Not : aCoustiC nerelerdesin görünmüyon
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 29 Temmuz 2007, 12:34   #15
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Istek TCL v2.0




channel add $djkanal
channel add $radyo

1. bu komut satirlarini tcl nin en alt satirlarina ekleyiniz
2. $djkanal inda belirtilen kanalda op olunuz!
3. #radya ve djkanallari nizin modlari +cSmM gibi modlar barindirmamali

ilk verilen kod yetersiz degildir, ama aciklamalarinda belirtigim yazilari pek dikkatli okumadiniz sanirim, op olmaniz gereken kanal, botun girmesi gereken kanal adlari da orada belirtilmekte, size dusen sadece belirtilen kanallara sokmakti.

calisma mantiginda kesinlikle sorun yoktur bizzat 1 kac gun once denedim, ust ust'e istek isteme mantiginin engellendigini de unutmayin, 1. istekten sonra 2. istek isteme suresi 30sn dir!

NOT: Casper dostum PM on
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
Our brain is Our Weapon
 
Alıntı ile Cevapla

Alt 12 Ağustos 2007, 00:29   #16
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Istek TCL v2.0




Alıntı:
NeTDeLiSi !istek olayını nasıl hallettin anlatırmısın sana zahmet ben hala çalıştıramadım Teşekkürler.

PM attım bakabilirsin . Kod çalışıyo olabilir ben çalıştıramadım onun için kod üstüne kod yayınlamak istemem zaten bişide yapmadım sadece ekledim . PM ye cevap verirsen kodları atabilirim ..

 
Alıntı ile Cevapla

Alt 12 Kasım 2007, 23:19   #17
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Istek TCL v2.0




Merhabalar bu tcl'i calistirmayi basardim sonunda. Ancak ignore kismini error veriyor. Tcl error [istek]: can't read "uhost": no such variable bu konuda yaardimci olabilirseniz sevirim.

 
Alıntı ile Cevapla

Alt 23 Kasım 2007, 00:01   #18
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Istek TCL v2.0




Tekrardan merhabalar. Nihayet sorunumu cozdum.

Sorunum: İstek istedikten sonra 1 dahaki istek isteme sureniz 1 dk diyor fakat ignore etmiyordu. Yukarda yazdigim hatayla karsilasiyordum ve surekli istek isteyebiliyodu kullanici.

Cozum:
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
newignore $nick!$uhost aCoustiC "Istek Ignore" 1

satirini,

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
newignore $kim!*@* aCoustiC "Istek Ignore" 1



seklinde degisterek halletim. Artik bu ozelliginide kullanabiliyorum. Bot asagidaki sekilde gayet duzgun calisiyor.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#gerekli bindler bind pub - !yes yes bind pub - !no no bind pub - !istek istek bind pub - !msg cevap bind evnt - init-server baglan_yap #Gerekli degiskenler set onick "" set opass "" #Dj kanali set djkanal "#DJ" #Radyo kanali set radyo "#Radyo" #ELLEMEYIN (Siz Bİlirsiniz) proc baglan_yap {type} { global onick opass putserv "OPER $onick $opass" } proc cevap {nick uhand host chan arg} { global djkanal radyo set nick [lindex [split $arg] 0] if {[isop $nick $djkanal] && [onchan $nick $radyo]} { putquick "PRIVMSG $radyo :4 [lindex [split $arg] 0] :6[join [lrange [split $arg] 1 end]]" } } proc yes {nick uhand host chan arg} { global djkanal radyo set nick [lindex $arg 0] putquick "PRIVMSG $radyo :4 $nick 6İsteğiniz Arşivimizde Mevcut. Kısa Süre İçinde İsteginiz yayınlanacaktır." } proc no {nick uhand host chan arg} { global djkanal radyo set nick [lindex $arg 0] putquick "PRIVMSG $radyo :4 $nick 6Üzgünüm, İsteğiniz Arşivimizde Bulunmamaktadır. Başka Bir İstekte Bulunabilirsiniz." } proc istek {nick uhand host chan arg} { global radyo djkanal if {[lindex $arg 0] == ""} { return } dj:ara $nick $arg } proc dj:ara {kim mesaj} { global botnick djkanal radyo set opbulundu 0 foreach opcuk [chanlist $djkanal] { if {[isop $opcuk $djkanal] && $opcuk != $botnick} { set opbulundu "1" } } if {$opbulundu != "1"} { putserv "PRIVMSG $radyo :6Üzgünüm 4 $kim 6isteginize cevap verecek dj bulunamadı! Lütfen daha sonra tekrar deneyiniz." } { putquick "PRIVMSG $radyo :4 $kim 6Lütfen bekleyiniz. İsteğinizi Kontrol Ediyorum." putquick "PRIVMSG $djkanal :4 $kim 6Istegi: 12 $mesaj" putquick "PRIVMSG $radyo :4 $kim 12 $mesaj 6 isteğiniz DJ'lerimize iletilmiştir. Bir sonraki istek isteme süreniz 4 1dk6'dir." newignore $kim!*@* aCoustiC "Istek Ignore" 1 } } channel add $djkanal channel add $radyo putlog "yapimci : aCoustiC" putlog "e-mail :
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"


 
Alıntı ile Cevapla

Alt 26 Kasım 2007, 10:01   #19
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Istek TCL v2.0




arkadaslar bu tclyi bende çalıştıramadım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
bi kaç arkadas bazı değisiklikler
yaparak çalıştırmışlar söylesede bizde yapsak
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 26 Kasım 2007, 21:17   #20
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Istek TCL v2.0




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#gerekli bindler bind pub - !yes yes bind pub - !no no bind pub - !istek istek bind pub - !msg cevap bind evnt - init-server baglan_yap #Gerekli degiskenler set onick "" set opass "" #Dj kanali set djkanal "#DJ" #Radyo kanali set radyo "#Radyo" #ELLEMEYIN (Siz Bİlirsiniz) proc baglan_yap {type} { global onick opass putserv "OPER $onick $opass" } proc cevap {nick uhand host chan arg} { global djkanal radyo set nick [lindex [split $arg] 0] if {[isop $nick $djkanal] && [onchan $nick $radyo]} { putquick "PRIVMSG $radyo :4 [lindex [split $arg] 0] :6[join [lrange [split $arg] 1 end]]" } } proc yes {nick uhand host chan arg} { global djkanal radyo set nick [lindex $arg 0] if {$chan == "#DJ"} { putquick "PRIVMSG $radyo :4 $nick 6İsteğiniz Arşivimizde Mevcut. Kısa Süre İçinde İsteginiz yayınlanacaktır." } } proc no {nick uhand host chan arg} { global djkanal radyo set nick [lindex $arg 0] if {$chan == "#DJ"} { putquick "PRIVMSG $radyo :4 $nick 6Üzgünüm, İsteğiniz Arşivimizde Bulunmamaktadır. Başka Bir İstekte Bulunabilirsiniz." } } proc istek {nick uhand host chan arg} { global radyo djkanal if {$chan == "#Radyo"} { if {[lindex $arg 0] == ""} { return } dj:ara $nick $arg } } proc dj:ara {kim mesaj} { global botnick djkanal radyo set opbulundu 0 foreach opcuk [chanlist $djkanal] { if {[isop $opcuk $djkanal] && $opcuk != $botnick} { set opbulundu "1" } } if {$opbulundu != "1"} { putserv "PRIVMSG $radyo :6Üzgünüm 4 $kim 6isteginize cevap verecek dj bulunamadı! Lütfen daha sonra tekrar deneyiniz." } { putquick "PRIVMSG $radyo :4 $kim 6Lütfen bekleyiniz. İsteğinizi Kontrol Ediyorum." putquick "PRIVMSG $djkanal :4 $kim 6Istegi: 12 $mesaj" putquick "PRIVMSG $radyo :4 $kim 12 $mesaj 6 isteğiniz DJ'lerimize iletilmiştir. Bir sonraki istek isteme süreniz 4 1dk6'dir." newignore $kim!*@* aCoustiC "Istek Ignore" 1 } } channel add $djkanal channel add $radyo putlog "yapimci : aCoustiC" putlog "e-mail :
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"

Yukarda sorunuma care buldugum mesajdaki kodda !yes !no ve !istek komutlari hem dj hemde radyo kanalinda da calisiyordu. TCL'i calistirmak icin if'leri silmistim. Simdi onlarida ekledim. !yes !no sadece dj kanalinda !istek ise sadece radyo kanalinda bu sekilde gayet duzgun calisiyor. Yanliz "proc yes, proc no ve proc istek" icinde if'lerdeki kanal isimleri kucuk buyuk harfe duyarli. Severinizda nasilsa yazilisi ole olmasi gerekiyor.


Konu tarzan tarafından (26 Kasım 2007 Saat 21:22 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Cevapla

Etiketler
v20, tcl, istek


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
TCL istek EHost-Gökhan Eggdrop, NeoStats, BNC 3 21 Nisan 2011 01:41
tcl istek RahmetLi Eggdrop, NeoStats, BNC 3 05 Ocak 2011 23:34
istek Ebul_Alemeyn mIRC Scripting Hazır Kodlar 1 31 Ekim 2009 03:14
!radyo , !istek istek parçasi Yunus mIRC Scripting Sorunları 2 21 Temmuz 2008 21:11
tcl istek hipokrat TCL Scriptler 0 17 Ocak 2008 09:08