Çevrimdışı

Selamun Aleykum Arkadaşlar #DJ kanalına !reklam yazdığım zaman online olan dj ve çalan şarkıyı belirlemiş olduğum kanallara yollamak istiyorum ben bi kaç kod denedim fakat olumlu sonuç alamadım yardımlarınızı bekliyorum


bind pub - !reklam reklam

proc reklam {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putserv "PRIVMSG #Sohbet Yayında Suan <<<$stitle>>> bulunmakta.Yayin turu: $sgenre Calan parca: >>>>> [lrange $cursong 1 [llength $cursong]]$songurl <<<< "
putserv "PRIVMSG #diyalog Yayında Suan <<<$stitle>>> bulunmakta.Yayin turu: $sgenre Calan parca: >>>>> [lrange $cursong 1 [llength $cursong]]$songurl <<<< "
putserv "PRIVMSG #Radyo Yayında Suan <<<$stitle>>> bulunmakta.Yayin turu: $sgenre Calan parca: >>>>> [lrange $cursong 1 [llength $cursong]]$songurl <<<< "
}



bind pub - !reklam reklam

proc reklam {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putquick "PRIVMSG #radyo [temizle $stitle] Online! Radyomuzda Şu Anda: ' [temizle $calan] ' Çalıyor İyi Dinlemeler "
}


Ben bunları denedim ama sonuç alamadım.

 

Çevrimdışı

radyo kodları hiç kullanmadım,hiç radyo kurmadım yada işletmedim,,, ancak gördüğüm kadarıyla zaten piyasadaki radyo kodları içinde çoğunlukla advertisement yada announcement ..yani reklam / duyuru gibi proc/prosedürlerde yer alıyor.

gördüğüm kadarıyla siz bunu kanal komutuyla yapmaya çalışıyorsunuz.elinizde olan kod içinde yukarda yazdığım gibi advert*/announce* prosedürlerinden örnek alarak yazabilir ayrıca oluşturabilirsiniz. (size ipucu)

yukarda verdiğiniz denemelerin çalışma ihtimali yok.
niye yok:

prosedürler içinde yer verdiğiniz $variable'lar gökten inmiş gibi yerleştirmişiniz. bu şekilde denerseniz unknown variable $... gibi hata alırsınız.

bir prosedür içinde $variable/lara yer vermeden evvel bunu o proc içinde tanıtmalı ne olduğunu göstermelisiniz. bunu ya set .... yada global olarak yada namespace global variable olarak yada başka proc içinden taşıyarak mümkün olabilir.yukardaki şekilde tanımlanması mümkün değil.

ayrıca lrange bir listedeki akışın bir yerinden diğer yerine alınacak kısmı belirler. yani ortada bir akış,bir başlangıç birde son noktası olmalı.

lrange $text 3 6 <-- $text akışı bir liste,bu liste içinde 4üncüden 7inciye kadar olan kısmı alıyorum.

aksi türlü kullanımlar hata atar.
llength genişlik/ebat/size alır listenin.. mesela <-- llength mesela == 6 olurdu. çünkü 6 harften oluşmuş. boşluklarıda whitespaceleride sayar bunları saymasın görmesin istiyorsanız trim etmelisiniz ..yani string trim $akış... vs vs..

kısaca elinizdeki radyo tcl içindeki anons yada reklam prosedürleri büyük ihtimal zaten vardır onları örnek alın o proclarda nasıl yapmışlarsa o şekilde oluşturun...