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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 08 Mart 2010, 21:48   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Radyo İstek Tcl Yardım




Arkadaşlar Elimde Bir Adet Radyo Botu Var Ve !istek isteme aralıgına belirli bir zaman koyucam bunu nasıl yapa bilirim yardımcı olurmusunuz

Örnek : [21:45] <Radyo> KOMANDO-81 eLLer Kadir kıymet birlmiyor annem ParÇaSını İstiyorum ÇaLarSanız Sevinirim ayca KanaLına qeL isteğiniz DJ'lerimize iletilmiştir. Bir sonraki istek isteme süreniz 5dk'dir.

Bunun Gibi Yapıcam

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 08 Mart 2010, 23:34   #2
Çevrimdışı
SaW
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Radyo İstek Tcl Yardım




E yap o zaman kolay gelsin

 
Alıntı ile Cevapla

Alt 09 Mart 2010, 19:49   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Radyo İstek Tcl Yardım




Nebiliymben Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
E yap o zaman kolay gelsin

Sayın Adminim Beni Yanlış Anladınız Yapıcam Dediysem bunun Gibi Olmasını yani bole yapmak istiyorum sadece bana bu konuda yardım ede bilirmisiniz.

Her istek istemenin arası 5 dk olucak bi tcl arıyorum

 
Alıntı ile Cevapla

Alt 09 Mart 2010, 23:16   #4
Çevrimdışı
SaW
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Radyo İstek Tcl Yardım




Ben sana nasıl yapacağın hakkında fikir vereyim;
İstek komutu uygulandığında çağrılan proc'un içerisinde kişinin hostunu global bir değişkene md5 kullanarak atarsın. Hemen altına bir timer ile az önce atadığın bu değişkeni belirlediğin süre sonunda unset yaptırırsın.
Bu bahsi geçen satırların hemen üzerinde ise o global değişkenin olup olmadığını sorgulatırsın. Varsa kişi daha önce istekde bulunmuştur demektir, ona göre mesaj verdidir işlemi durdurursun.. Bu kadar..
Örnek:
PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
globak istek
if {[info exists istek([md5 [string tolower $uhost]])]} {
 
putquick "privmsg $nick :5 dakika içerisinde sadece 1 istek yapabilirsiniz" ; return 0
} else {
  
set istek([md5 [string tolower $uhost]]) 1
  timer 5 
[list unset istek([md5 [string tolower $uhost]])]
## .... Buraya komutların devamı......


Tabi burada $uhost ve $nick değişkenini proc tanım kısmında bu şekilde belirlediğini varsayıyorum. Bu genel şablondur. Üzerinde çalışarak kendi kodlarına bunu monte edebilirsin.

 
Alıntı ile Cevapla

Alt 09 Mart 2010, 23:56   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Radyo İstek Tcl Yardım




Tsk ederim Hocam Denyicem Ugrasacam yapasam başınızı agırıtıcam tekrar

----------

tskler abi

----------

[23:55] invalid command name "globak"
while executing
"globak istek"
(file "scripts/istek.tcl" line 93)
invoked from within
"source scripts/istek.tcl"
(file "radyo.conf" line 59)
[23:55] * CONFIG FILE NOT LOADED (NOT FOUND, OR ERROR)

 
Alıntı ile Cevapla

Alt 10 Mart 2010, 00:15   #6
Çevrimdışı
SaW
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Radyo İstek Tcl Yardım




global olacak o, aceleyle yazınca olur öyle hatalar. Ama bunu kendin başaracaksın, her hata da buraya yazma, deneme yanılmayla ve araştırmayla yapmalısın aksi takdirde öğrenemezsin.

 
Alıntı ile Cevapla

Alt 10 Mart 2010, 01:16   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Radyo İstek Tcl Yardım




Valla Hocam Denedim Yanıldım Denedim Yanıldım Sabahdan Beri 1 Saaten Beri Aynı Yoldayım ilerliyorum Ama Bulamaadım Canız Saolsun Kolay Gelsin

Dipnot Mesajı: Yukarıda gösterdiğin hatanın nedenini söyledim ya, globak yazdığım yeri global diye değiştirmen lazım


Konu SaW tarafından (10 Mart 2010 Saat 02:08 ) değiştirilmiştir. Sebep: yukarıda gösterdiğin hatanın çözümü
 
Alıntı ile Cevapla

Alt 16 Mart 2010, 10:44   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Radyo İstek Tcl Yardım




proc istek {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
set istek([md5 [string tolower $uhost]]) 1
putserv "PRIVMSG #DJ Istek isteyen rumuz: $gnick Istedigi sarki
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
$kanal )"
putserv "PRIVMSG #Radyo Isteginiz siraya alinmistir: 2$gnick"
putserv "PRIVMSG $gnick Bir Sonraki Istek Isteme Zamanız 5 dakika'dır.Lütfen Bu Kuralla Uyalım Aksitaktirde Banlanacaksınız: 2$gnick"
}


Verdigin her Komutu birlikde tek tek ayrı bi pro acarak denememe rahmen hiç birias olmadı

 
Alıntı ile Cevapla

Alt 16 Mart 2010, 11:06   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Radyo İstek Tcl Yardım




IcNaMeK Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
proc istek {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
set istek([md5 [string tolower $uhost]]) 1
putserv "PRIVMSG #DJ Istek isteyen rumuz: $gnick Istedigi sarki
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
$kanal )"
putserv "PRIVMSG #Radyo Isteginiz siraya alinmistir: 2$gnick"
putserv "PRIVMSG $gnick Bir Sonraki Istek Isteme Zamanız 5 dakika'dır.Lütfen Bu Kuralla Uyalım Aksitaktirde Banlanacaksınız: 2$gnick"
}


Verdigin her Komutu birlikde tek tek ayrı bi pro acarak denememe rahmen hiç birias olmadı

Komutları biraz daha gözden geçirin eksik ve yanlış dizilimleriniz var. Anlatılana göre mantık kurmaya çalışın.


Alıntı :
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
global istek if {[info exists istek([md5 [string tolower $uhost]])]} { putquick "privmsg $nick :5 dakika içerisinde sadece 1 istek yapabilirsiniz" ; return 0 } else { set istek([md5 [string tolower $uhost]]) 1 timer 5[list unset istek([md5 [string tolower $uhost]])] ## .... Buraya komutların devamı...... }


 
Alıntı ile Cevapla

Alt 05 Eylül 2011, 00:14   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Radyo İstek Tcl Yardım




konuyu hortlatacam belki ama bende ariyorum konu bile açmıştım hiç yardımcı olan yok. saW yardımcı olacak gibi ama hazıra konmaya alışkın bir milletiz sanırım. + eggdrop TCL bilgim sıfır.

 
Alıntı ile Cevapla

Cevapla

Etiketler
istek, radyo, tcl, yardim, yardım, İstek


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
Web Radyo İstek Paneli Toprak mIRC Scripting Hazır Kodlar 11 07 Mart 2017 20:13
Radyo İstek Cemalizim mIRC Scripting Sorunları 2 09 Eylül 2008 03:34
Radyo Botu İstek! sohbetbudur Eggdrop, NeoStats, BNC 5 07 Mart 2007 16:53