IRC ve mIRC Kullanıcılarının Buluşma Noktası
  Reklam Ver

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

Forum tutkunlarının tek adresi Türkiye Sohbet Odaları Sohbetteyiz herkes burda

ayna chat muhabbetbayilik veren firmalar

Şeker Shell  Sohbet


Eggdrop, NeoStats, BNC

Sunucu botları, kurulumları ve ayalarına bu başlık altından ulaşabilirsiniz.



Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 08 Mart 2010, 21:48   #1
Çevrimdışı
Radyo İstek Tcl Yardım


-- Sponsor Baglantı --


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
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
Alt 08 Mart 2010, 23:34   #2
Çevrimdışı
SaW
SaW - ait Kullanıcı Resmi (Avatar)
Cevap: Radyo İstek Tcl Yardım




E yap o zaman kolay gelsin

__________________
I Lost My Way
Bazıları yapar bazıları taklit eder..
*** Nebiliymben is now known as SaW
  Alıntı ile Cevapla

Alt 09 Mart 2010, 19:49   #3
Çevrimdışı
Cevap: Radyo İstek Tcl Yardım




Nebiliymben Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 20 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
SaW - ait Kullanıcı Resmi (Avatar)
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- Kodu:   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.

__________________
I Lost My Way
Bazıları yapar bazıları taklit eder..
*** Nebiliymben is now known as SaW
  Alıntı ile Cevapla

Alt 09 Mart 2010, 23:56   #5
Çevrimdışı
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
SaW - ait Kullanıcı Resmi (Avatar)
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.

__________________
I Lost My Way
Bazıları yapar bazıları taklit eder..
*** Nebiliymben is now known as SaW
  Alıntı ile Cevapla

Alt 10 Mart 2010, 01:16   #7
Çevrimdışı
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ışı
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 20 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ışı
Cevap: Radyo İstek Tcl Yardım




IcNaMeK Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 20 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 20 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ı...... }


__________________
"Soy kırım oLmalı hoşuna giden ve de sistemi dinleyen alçaktır."
  Alıntı ile Cevapla

Alt 05 Eylül 2011, 00:14   #10
Çevrimdışı
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

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 Açık
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