radyo sadece istek TCL si
 

Radyo.TCL Eklentisi(!yes,!no,!istek )
Kod:
#gerekli bindler
bind pub - !yes yes
bind pub - !no no
bind pub - !istek istek
bind evnt - init-server baglan_yap
#Gerekli degiskenler
set inick "opernick"
set ipass "opersifresi"
#ELLEMEYIN (Siz Bİlirsiniz)
proc baglan_yap {type} {
global inick ipass
putserv "OPER $inick $ipass"
putserv "WALLOPS :Basari ile Login Oldum :)"
}
proc yes {n u h c a} {
set kanal [lindex $a 0]
putserv "PRIVMSG #Radyo :\002$kanal\002 :\0034İsteğiniz Arşivimizde Mevcut. Kısa Süre İçinde İsteginiz yayınlanacaktır."
}
proc no {n u h c a} {
set kanal [lindex $a 0]
putserv "PRIVMSG #Radyo :\002$kanal\002 :\0034Üzgünüm,İsteğiniz Arşivimizde Bulunmamaktadır. Başka Bir İstekte Bulunabilirsiniz."
}
proc istek {n u h c a} {
set kanal [lindex $a 0]
putserv "PRIVMSG #DJ :\0034İstek İsteyen Nick \002$n\0034 İsteği:\001 $kanal"
putserv "PRIVMSG #Radyo :\002$n \0034Lütfen bekleyiniz. İsteginizi Kontrol Ediyorum."alıntı

Cevap: radyo sadece istek TCL si
 

Yapimci adi belirtilmemis!

Cevap: radyo sadece istek TCL si
 

alıntıdır diye belirttim bence yeterli bunun yapımcı adının niye ihtiyacı varki ?
altı üstü bir basit bir tcl işine yarıyan olur diye forum a koydum bence bu tür küçük şeyler için yapımcı adına gerek yok ALINTI diye yazıyor sonunda Saygılarımla..