Çevrimdışı

belki alttaki kodlar işine yarar


bind join - * join_greet


bind pub - !sifre sifre

proc sifre {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putquick "PRIVMSG #Dj 10Radyo FM Radyo BiLgiLeri"
putquick "PRIVMSG #Dj "
putquick "PRIVMSG #Dj 10Ip : 4 radyo ipini yaz"
putquick "PRIVMSG #Dj "
putquick "PRIVMSG #Dj 10Port : 4 7201"
putquick "PRIVMSG #Dj "
putquick "PRIVMSG #Dj 10Sifre : 4 radyosifresiyaz"
}

bind pub - !saatler saatler

proc saatler {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putquick "PRIVMSG #dj Dj Yayin Saatleri ; "
}

bind pub - !kurallar kurallar

proc kurallar {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putquick "PRIVMSG #Dj ----------------------"
putquick "PRIVMSG #Dj - DJ KURALLARI"
putquick "PRIVMSG #Dj - 1. Sevgi ve saygi."
putquick "PRIVMSG #Dj - 2. Dinleyiciler ile kavga edilmeyecek ya da sert tartismalara girilmeyecek. Herhangi bir sorun oldugunda sunucudaki yetkililere bildirilecek."
putquick "PRIVMSG #Dj - 3. DJ sohbet odasinda radyo odasinda DJ'ler birbirlerine emir kipi cumleler kurmayacak. Yayin alis ve bırakislarda mutlaka iletisim icinde olunacak. Gorulen hata varsa bile, uygun bir dille genelde degil ozelde konusulacak."
putquick "PRIVMSG #Dj - 4. Yayinlarda DJ arkadaslar birbirlerine destek olmak amaciyla radyo yayinlarini dinlemeli ve istekte bulunmali ki, diger arkadaslar icin ozendirici olsun."
putquick "PRIVMSG #Dj - 5. YAYIN SAATLERINE UYUM: Yayin saatlerine azami olcude uyulmali, gelinemeyecek durumlarda bilgi verilmeli."
putquick "PRIVMSG #Dj - 6. Yayin alis-verislerde diger DJ arkadaslarin hakkina saygi gosterimeli. Yayin suresinin bitiminden sonra, en fazla 5 dakika icinde yayin siradaki arkadasa devredilmeli."
putquick "PRIVMSG #Dj - 7. Yayin sirasinda yayinin patronu DJ arkadaslarımizidir. Ancak siyasi propaganda niteliginde sarki ve marslar ile takim marslari calinmamali. Kufur-argo iceren sarkilarin da yayinlanmamasinda ozen gosterilmeli."
putquick "PRIVMSG #Dj - 8. Yayindan DJ arkadaslarimiz keyif almali ki, yayini dinleyenlere de keyif verebilsin. Yayindan alacaginiz keyif, basariyi getirecektir arkadaslar."
putquick "PRIVMSG #Dj - 9. Msn'lerde ve facelerde yayinlarinizi duyurun ki, dinleyici sayimizda artma olsun."
putquick "PRIVMSG #Dj - Radyo-fM; Herkese iyi calismalar dilerim. Sevgiler saygilar..."
putquick "PRIVMSG #Dj ----------"
}


bind pub - !istekon istekon

proc istekon {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putquick "PRIVMSG #Radyo 0,13- 0,14 İstemiş olduğunuz isteği yayın akışında dinleyebilirsiniz 0,13 - 0,6 radyo-Fm'den ayrılmayınız 0,13 - 0,14 domain.com  "
}

bind pub - !istekoff istekoff

proc istekoff {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putquick "PRIVMSG #Radyo 0,13- 0,14 Suan Yayınımızda istek yoktur. 0,13 - 0,6 keyifli Sohbetler dileriz 0,13 - 0,14 domain.com  "
}

bind pub - !linkat linkat

proc linkat {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putquick "allsend all private global RadyoDinle 0,13 - 0,14 Radyo Fm'i Canlı olaraktan Winamptan dinlemek için, 0,13 -  0,13 - 0,6 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0,13 -  0,13 - 0,14 adresine tıklayınız.. 0,13 - "
}

bind pub - !djalim djalim

proc djalim {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putquick "allsend all private global DjAlim 0,13 - 0,14 Radyo Fm Dj Alımları Başlamıştır 0,13 -  0,13 - 0,6 Muracat için 0,13 -  0,13 - 13,1Radyo SorumLumuz 1,13 huysuz 13,1 ve 1,13 MeLeKsy 13,1 ile görüsebilirsiniz... 0,13 - "
}




bind pub - !bilgi bilgi

proc bilgi {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putquick "PRIVMSG #Dj -------------------------------------"
putquick "PRIVMSG #Dj - !bilgi : radyo hakkinda bilgi verir."
putquick "PRIVMSG #Dj - !istek on/off : istek saatini acma kapama ozelligi. komutlar ; (!istekon , !istekoff)"
putquick "PRIVMSG #Dj - !sifre : radyo sifre ve port'u verir."
putquick "PRIVMSG #Dj - !linkat : sunucu geneline radyo link'i atar."
putquick "PRIVMSG #Dj - !reklam nick : Yayında olan dj , Radyo linkini özellere gönderir."
putquick "PRIVMSG #Dj - !djalim : sunucu geneline dj alimi vardir diye global atar."
putquick "PRIVMSG #Dj - !var nick : nick'in isteginin siraya alindigini belirtir."
putquick "PRIVMSG #Dj - !yok nick : nick'in isteginin olmadigini belirtir."
putquick "PRIVMSG #Dj - !calma nick : nick'e istek alinmadigini belirtir."
putquick "PRIVMSG #Dj - !saatler : Dj yayin saatlerini gosterir."
putquick "PRIVMSG #Dj - !kurallar : Dj arkadaslarin uymasi gereken kurallar."
putquick "PRIVMSG #Dj ----------------------"
}


#gerekli bindler
bind pub - !yok yok
bind evnt - init-server baglan_yap

proc baglan_yap {type} {
global inick ipass

putserv "OPER $inick $ipass"
putserv "WALLOPS
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
asari ile Login Oldum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
}

proc yok {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putserv "PRIVMSG #Radyo 2$kanal : 5Üzgünüm İstediğiniz Şarkı Mevcut 4Değildir1. 5Dilerseniz Başka Bir İstek Şarkısı İsteyebilirsiniz1."
}

#gerekli bindler
bind pub - !calma calma
bind evnt - init-server baglan_yap

proc baglan_yap {type} {
global inick ipass

putserv "OPER $inick $ipass"
putserv "WALLOPS
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
asari ile Login Oldum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
}

proc calma {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putserv "PRIVMSG #Radyo 2$kanal : 5Üzgünüm Şuanda Istek Alınmamaktadir.1. 5Dilerseniz Başka Bir zaman tekrar istekde bulunabilirsiniz1."
}


#gerekli bindler
bind pub - !var var
bind evnt - init-server baglan_yap

proc baglan_yap {type} {
global inick ipass

putserv "OPER $inick $ipass"
putserv "WALLOPS
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
asari ile Login Oldum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
}

proc var {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putserv "PRIVMSG #Radyo 2$kanal : 5İstediğiniz Şarkı Mevcut Çalma Listesine Alınmıştır1. 4Teşekkür Ederiz1."
}

#gerekli bindler
bind pub - !reklam reklam
bind evnt - init-server baglan_yap

proc baglan_yap {type} {
global inick ipass

putserv "OPER $inick $ipass"
putserv "WALLOPS
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
asari ile Login Oldum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
}

proc reklam {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a ]
putserv "allsend all private global Radyo 13,1 Müzigin Kalbi 0,1Radyo FM'13,1de ATiyor Dinlemek Icin => 9,1 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 13,1 Adresini TikLayabiLirsiniz....0,1 Radyo Fm'e13,1 Hos Geldiniz Suanda Yayinda Olan 9,1 DJ' 13,1Miz 0,1 ($kanal)13,1 Isteklerinizi Radyo Kanalina 0,1!istek13,1 <istediginiz Sarki Mesajiniz> Seklinde Yazabilirsiniz. 0,1Ornek:13,1 Gece Yolculari - Unut Beni Tum0,1 Radyo13,1 Ailesine Gelsin..."
}