Giriş

Orijinalini görmek için tıklayınız : Radyobot Radyo Kod Çalışması


Goemon
18 Şubat 2015, 12:24
Merhaba Sevgili İRCFORUMLARİM.NET Forum Sevenleri

Evet Sevgili Arkadaşlar Radyo Çalışması Hakkında Anlıyabilceğiniz Şekilde Resimli Örnekler Halinde Verceğim Codeleri Kendinize Göre Düzenleyip Düzelte

Bilirsiniz.

Dj, DjMisafiR, DjAop, DjSop, DjFoundeR, RadyoFoundeR İdenti Kullanan Kişiler Dj Takısı Aldıkları Zaman #Radyo Kanalına Dj Görevlisi Yayına

Başladı ve Dj Görevlisi Yayını Bıraktı Diye Uyarı Vercektir.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;Dj Görevlisi Yayın Aldı Yayını Bıraktı
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

on *:NICK:{
if ($gettok($gettok($fulladdress,2,$asc(!)),1,$asc(@) ) == Dj) {
if dj* iswm $nick { msg #radyo 4Dj 2GörevLisi10 $newnick 1Radyo 2Yayınını BırakmıştıR4.. | msg #radyo 4Dj1'2in 2Yayından aYrıLış SaaT1'2i 4;1 $time }
if dj* iswm $newnick { msg #radyo 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. | msg #radyo 2ßaşarıLaR DiLeriz10 $nick $+ 4... | msg #radyo 4Dj1'2in 2Yayına

BaşLayış Saati 4:1 $time | .nflash 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. }
}
elseif ($gettok($gettok($fulladdress,2,$asc(!)),1,$asc(@) ) == DjMisafiR) {
if dj* iswm $nick { msg #radyo 4Dj 2GörevLisi10 $newnick 1Radyo 2Yayınını BırakmıştıR4.. | msg #radyo 4Dj1'2in 2Yayından aYrıLış SaaT1'2i 4;1 $time }
if dj* iswm $newnick { msg #radyo 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. | msg #radyo 2ßaşarıLaR DiLeriz10 $nick $+ 4... | msg #radyo 4Dj1'2in 2Yayına

BaşLayış Saati 4:1 $time | .nflash 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. }
}
elseif ($gettok($gettok($fulladdress,2,$asc(!)),1,$asc(@) ) == DjAop) {
if dj* iswm $nick { msg #radyo 4Dj 2GörevLisi10 $newnick 1Radyo 2Yayınını BırakmıştıR4.. | msg #radyo 4Dj1'2in 2Yayından aYrıLış SaaT1'2i 4;1 $time }
if dj* iswm $newnick { msg #radyo 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. | msg #radyo 2ßaşarıLaR DiLeriz10 $nick $+ 4... | msg #radyo 4Dj1'2in 2Yayına

BaşLayış Saati 4:1 $time | .nflash 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. }
}
elseif ($gettok($gettok($fulladdress,2,$asc(!)),1,$asc(@) ) == DjSop) {
if dj* iswm $nick { msg #radyo 4Dj 2GörevLisi10 $newnick 1Radyo 2Yayınını BırakmıştıR4.. | msg #radyo 4Dj1'2in 2Yayından aYrıLış SaaT1'2i 4;1 $time }
if dj* iswm $newnick { msg #radyo 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. | msg #radyo 2ßaşarıLaR DiLeriz10 $nick $+ 4... | msg #radyo 4Dj1'2in 2Yayına

BaşLayış Saati 4:1 $time | .nflash 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. }
}
elseif ($gettok($gettok($fulladdress,2,$asc(!)),1,$asc(@) ) == RadyoFoundeR) {
if dj* iswm $nick { msg #radyo 4Dj 2GörevLisi10 $newnick 1Radyo 2Yayınını BırakmıştıR4.. | msg #radyo 4Dj1'2in 2Yayından aYrıLış SaaT1'2i 4;1 $time }
if dj* iswm $newnick { msg #radyo 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. | msg #radyo 2ßaşarıLaR DiLeriz10 $nick $+ 4... | msg #radyo 4Dj1'2in 2Yayına

BaşLayış Saati 4:1 $time | .nflash 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. }
}
elseif ($gettok($gettok($fulladdress,2,$asc(!)),1,$asc(@) ) == DjFoundeR) {
if dj* iswm $nick { msg #radyo 4Dj 2GörevLisi10 $newnick 1Radyo 2Yayınını BırakmıştıR4.. | msg #radyo 4Dj1'2in 2Yayından aYrıLış SaaT1'2i 4;1 $time }
if dj* iswm $newnick { msg #radyo 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. | msg #radyo 2ßaşarıLaR DiLeriz10 $nick $+ 4... | msg #radyo 4Dj1'2in 2Yayına

BaşLayış Saati 4:1 $time | .nflash 4Dj 2GörevLisi10 $nick 2Yayına ßaşLamıştıR.. }
}
}

Örn: Resim

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])



Dj, DjSop, DjMisafiR, DjFoundeR, RadyoFoundeR, identiyle #Dj Kanalına Giriş Yapan Kişilere Uyarı Vercektir.


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;Dj Kanalında Djlere Uyarı 1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:join:#dj: {
if (*!Dj@* iswm $fulladdress) {
if $istok( $+ $me Nick Nick Nick Nick3,$nick,32) { return }
notice $nick 4 $token($server,2-,$asc(.)) 7 # 12Kanalına hoş geldiniz.
notice $nick 2Lütfen 1 # 2kanalına vereceğim istekleri yayında bulunan 4Dj 7 # 2Kanalında takip etsin..
notice $nick 7 #Dj 2KanaLında Kullanacağınız Komutlar..
notice $nick 1!istekvar Nick 4, 12!istekyok Nick 4, 5!isteklist 4, 10!sıradaki 4, 7!sıfırla 4, 6!duyuru
notice $nick 
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!djkomut 2Yazınız..
notice $nick 6Sanal alemin tadını birkez daha keşfedin! 4 $token($server,2-,$asc(.))
}
if (*!DjSop@* iswm $fulladdress) {
if $istok( $+ $me Nick Nick Nick Nick3,$nick,32) { return }
notice $nick 4 $token($server,2-,$asc(.)) 7 # 12Kanalına hoş geldiniz.
notice $nick 2Lütfen 1 # 2kanalına vereceğim istekleri yayında bulunan 4Dj 7 # 2Kanalında takip etsin..
notice $nick 7 #Dj 2KanaLında Kullanacağınız Komutlar..
notice $nick 1!istekvar Nick 4, 12!istekyok Nick 4, 5!isteklist 4, 10!sıradaki 4, 7!sıfırla 4, 6!duyuru
notice $nick 
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!djkomut 2Yazınız..
notice $nick 6Sanal alemin tadını birkez daha keşfedin! 4 $token($server,2-,$asc(.))
}
if (*!DjMisafiR@* iswm $fulladdress) {
if $istok( $+ $me Nick Nick Nick Nick3,$nick,32) { return }
notice $nick 4 $token($server,2-,$asc(.)) 7 # 12Kanalına hoş geldiniz.
notice $nick 2Lütfen 1 # 2kanalına vereceğim istekleri yayında bulunan 4Dj 7 # 2Kanalında takip etsin..
notice $nick 7 #Dj 2KanaLında Kullanacağınız Komutlar..
notice $nick 1!istekvar Nick 4, 12!istekyok Nick 4, 5!isteklist 4, 10!sıradaki 4, 7!sıfırla 4, 6!duyuru
notice $nick 
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!djkomut 2Yazınız..
notice $nick 6Sanal alemin tadını birkez daha keşfedin! 4 $token($server,2-,$asc(.))
}
if (*!DjFoundeR@* iswm $fulladdress) {
if $istok( $+ $me Nick Nick Nick Nick3,$nick,32) { return }
notice $nick 4 $token($server,2-,$asc(.)) 7 # 12Kanalına hoş geldiniz.
notice $nick 2Lütfen 1 # 2kanalına vereceğim istekleri yayında bulunan 4Dj 7 # 2Kanalında takip etsin..
notice $nick 7 #Dj 2KanaLında Kullanacağınız Komutlar..
notice $nick 1!istekvar Nick 4, 12!istekyok Nick 4, 5!isteklist 4, 10!sıradaki 4, 7!sıfırla 4, 6!duyuru
notice $nick 
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!djkomut 2Yazınız..
notice $nick 6Sanal alemin tadını birkez daha keşfedin! 4 $token($server,2-,$asc(.))
}
if (*!RadyoFoundeR@* iswm $fulladdress) {
if $istok( $+ $me Nick Nick Nick Nick3,$nick,32) { return }
notice $nick 4 $token($server,2-,$asc(.)) 7 # 12Kanalına hoş geldiniz.
notice $nick 2Lütfen 1 # 2kanalına vereceğim istekleri yayında bulunan 4Dj 7 # 2Kanalında takip etsin..
notice $nick 7 #Dj 2KanaLında Kullanacağınız Komutlar..
notice $nick 1!istekvar Nick 4, 12!istekyok Nick 4, 5!isteklist 4, 10!sıradaki 4, 7!sıfırla 4, 6!duyuru
notice $nick 
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!djkomut 2Yazınız..
notice $nick 6Sanal alemin tadını birkez daha keşfedin! 4 $token($server,2-,$asc(.))
}
}

Örn: Resim

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])



Dj, DjSop, DjMisafiR, DjFoundeR, RadyoFoundeR, identiyle #Dj Kanalına Giriş Yapan Kişilere Uyarı Vercektir.


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;Dj Kanalında Djlere Uyarı 2
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:join:#dj: {
if (*!Dj@* iswm $fulladdress) {
if $istok( $+ $me Nick Nick Nick Nick3,$nick,32) { return }
notice $nick 4 $token($server,2-,$asc(.)) 4 # 12Kanalına hoş geldiniz.
notice $nick 2Lütfen 4 # 2kanalına vereceğim istekleri yayında bulunan 12Dj 4 # 2Kanalında takip etsin..
notice $nick 4 #Radyo 2KanaLında Yapılan iStek ve Önceden iStenilmiş iSteKLeRi Görmek iÇin 4!isteklist 2Yazabilirsiniz.
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!djkomut 2Yazınız..
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!komutlar 2Yazınız..
notice $nick 6Sanal alemin tadini birkez daha kesfedin! 4 $token($server,2-,$asc(.))
}
if (*!DjSop@* iswm $fulladdress) {
if $istok( $+ $me Nick Nick Nick Nick3,$nick,32) { return }
notice $nick 4 $token($server,2-,$asc(.)) 4 # 12Kanalına hoş geldiniz.
notice $nick 2Lütfen 4 # 2kanalına vereceğim istekleri yayında bulunan 12Dj 4 # 2Kanalında takip etsin..
notice $nick 4 #Radyo 2KanaLında Yapılan iStek ve Önceden iStenilmiş iSteKLeRi Görmek iÇin 4!isteklist 2Yazabilirsiniz.
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!djkomut 2Yazınız..
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!komutlar 2Yazınız..
notice $nick 6Sanal alemin tadini birkez daha kesfedin! 4 $token($server,2-,$asc(.))
}
if (*!DjMisafiR@* iswm $fulladdress) {
if $istok( $+ $me Nick Nick Nick Nick3,$nick,32) { return }
notice $nick 4 $token($server,2-,$asc(.)) 4 # 12Kanalına hoş geldiniz.
notice $nick 2Lütfen 4 # 2kanalına vereceğim istekleri yayında bulunan 12Dj 4 # 2Kanalında takip etsin..
notice $nick 4 #Radyo 2KanaLında Yapılan iStek ve Önceden iStenilmiş iSteKLeRi Görmek iÇin 4!isteklist 2Yazabilirsiniz.
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!djkomut 2Yazınız..
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!komutlar 2Yazınız..
notice $nick 6Sanal alemin tadini birkez daha kesfedin! 4 $token($server,2-,$asc(.))
}
if (*!DjFoundeR@* iswm $fulladdress) {
if $istok( $+ $me Nick Nick Nick Nick3,$nick,32) { return }
notice $nick 4 $token($server,2-,$asc(.)) 4 # 12Kanalına hoş geldiniz.
notice $nick 2Lütfen 4 # 2kanalına vereceğim istekleri yayında bulunan 12Dj 4 # 2Kanalında takip etsin..
notice $nick 4 #Radyo 2KanaLında Yapılan iStek ve Önceden iStenilmiş iSteKLeRi Görmek iÇin 4!isteklist 2Yazabilirsiniz.
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!djkomut 2Yazınız..
notice $nick 4 #Radyo 2Kanalında kullanabileceğiniz komutları görmeniz için özelime 4!komutlar 2Yazınız..
notice $nick 6Sanal alemin tadini birkez daha kesfedin! 4 $token($server,2-,$asc(.))
}
}

Örn: Resim

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])


Djekle, Djsil Kodunu Kullana Bilmeniz İçin djfounder.txt ve root.txt metin belgelerinde bu Codeyi Kullanmasına İzin Vermek İstediğiniz Yetkili

Nickleri Yazacaksınız.

Kullanma Komutu Örnekleri Resimde Mevcut Ben Yinede Belirtim.

Kanala Sop, Aop, Vop, Ekleme Komut Şekli.

!djekle sop #kanal Nick
!djekle aop #kanal Nick
!djekle vop #kanal Nick

Kanalda Sop, Aop, Vop, Silme Komut Şekli.

!djsil sop #kanal Nick
!djsil aop #kanal Nick
!djsil vop #kanal Nick

Dj Listesini Görmek İçinde.

!djlist Yazacaksınız.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;Dj ekle sil listele
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:text:*:#dj: {
if !dj* iswm $1 {
if $read(djfounder.txt,w,$nick) || $read(root.txt,w,$nick) {
if $1 == !djekle {
if $2 == sop || $2 == aop || $2 == vop {
if $3 == $null || $4 == $null { msg $chan 10 $nick 1Komutun dogru Kullanımı 4!djekle $2 #Kanal Nick 1Şeklindedir. }
else {
if $read(dj.txt,w,$4) { msg $chan 1Bu Rumuz Daha Önceden Yetkili Olarak Eklenmiş. 10 $nick }
else {
set %;goechannel $chan
set %;goenick $nick
set %;djyönetici $2
set %;djchannel $3
set %;djnick $4
ns info %;djnick | enable #nskayıtbilgi
}
}
}
else { msg $chan 1Yanlış Parametre Girdiniz.Ekleyebileceginiz 14Yetkiler 4Sop1,4Aop 2ve 4Vop 1dur. }
}
if $1 == !djsil {
if $2 == sop || $2 == aop || $2 == vop {
if $3 == $null || $4 == $null { msg $chan 1Komutun dogru Kullanımı 4!djsil $2 #Kanal Nick 1Şeklindedir. }
else {
if $read(dj.txt,w,$4) { cs $2 $3 del $4 | write -ds $4 dj.txt | msg $chan 10 $4 1Nicki4 $3 1Kanalından Başarı İle Silindi. | ms send $4 10 $3 1Kanalında Olan4 $2

1Yetkiniz Silinmiştir. }
else { msg $chan 10 $4 1Nicki Daha Önceden Silinmiş Bir Nicktir. }
}
}
else { msg $chan 10 $nick 1Yanlış Parametre Girdiniz.Kullanabileceginiz Yetkiler 14Yetkiler 4Sop1,4Aop 2ve 4Vop 1dur. }
}
if $1 == !djlist { msg $chan 4Yetkili Nickler Listeleniyor | play $chan dj.txt 100 }
}
else { msg $chan 10 $nick 1Bu Komutu Kullanabilmek İcin Yetkiniz Bulunmuyor. }
}
}
#nskayıtbilgi off
on *:notice:*:?: {
if $nick == Nickserv {
if (*The nickname * is not registered* iswm $1-) || (*kay*tl* de*il* iswm $1-) { msg %;goechannel 1Belirtmiş Oldugunuz 10 %;djnick 1Nicki Kayıtlı Olmadıgından İşlem

Tamamlanamadı. | disable #nskayıtbilgi | unset %;goe* }
else { cs %;djyönetici %;djchannel add %;djnick | write dj.txt %;djnick | msg %;goechannel 10 %;djnick 1Nicki 4 %;djchannel 1Kanalına Başarıyla 10 %;djyönetici 1Olarak

Eklendi. | ms send 10 %;djnick 2 %;djchannel 1Kanalına 7 %;djyönetici 1Olarak Eklendiniz Görevinizde Başarılar Dileriz. | disable #nskayıtbilgi | unset %;goe* }
}
}
#nskayıtbilgi end

Örn: Resim

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])



#Radyo Kanalında İstek Parça Yaparak Radyo Kanalında İsteğinizin Değerlendirilmesi İçin İstek ve Radyo Hakkında Kısa Bilgiler.

Bu Kod Ciprix den Alıntı.Ben Sadece Kendime Göre Düzenlemiştim.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;
;;;istek isteme, istekyok, istekvar uyarı
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;
on *:text:*:#:{
if $chan == #radyo {
if !istek* iswm $1- {
if $read(istekler.txt,w,$nick $+ *) {
msg $chan 4Zaten bekleyen bir isteğiniz var
}
else {
if $2 == $null {
msg $chan 12Lütfen Bir İstek Parça Belirtin 13 $nick
}
else {
inc %isayi
msg #radyo 7,71R *1,7 isteginiz DJ'lerimize iletilmistir 
msg #radyo 7,71a *7,1 İstenilen istek sayısı:7 %isayi 
msg #radyo 7,71d *7,1 İstek Yapan Nick: 0 $nick 
msg #radyo 7,71y *7,1 Yapılan İstek : 0 ( $2- ) -
msg #radyo 7,71o *7,1 Radyomuzu WEB'den dinlemek icin 13,1|0 8 $server
msg #radyo 7,71B 1,7 Radyomuzu Winampdan Dinlemek İçin Tıklayın : 8,1[Only Registered Users Can See Links] $+ %ipport3 $+ : $+ %ipport1 $+ /listen.pls
msg #radyo 7,71o *7,1 Isteklerinizi Radyo kanalinda göndermek istiyorsaniz; 
msg #radyo 7,71T *7,1 !istek <sanatçi> <mesajiniz> seklinde istekte bulunabilirsiniz. 

msg #dj 4,4 0,1Radyo İstek 
msg #dj 4,4 0,1
msg #dj 4,4 2 $server 12Radyo Yönetim AiLeSi
msg #dj 4,4 0,1
msg #dj 4,4 0,1 $nick 6(7 $+ $2- $+ 6)
msg #dj 4,4 0,1
msg #dj 4,4 0,1 İsteniLen İstek Sayısı:11 %isayi
.write istekler.txt $+($nick,$chr(11),$2-)
}
}
}
}
if $chan == #dj {
if !istekvar* iswm $1- {
if $2 == $null {
msg $chan 2Lütfen Bir Nick Belirtin.. 4ÖRN: 1!istekvar Araf
}
else {
if $read(istekler.txt,w,$2 $+ *) {
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 4 $+ $remove($server,irc.) 2Radyo Yönetim AiLeSi
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 5Nickiniz4;10 $nick 
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 5iSTeK Yaptığınız Parça4:7 $gettok($read(istekler.txt,w,$2 $+ *),2,11) 
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 6Web Adresimiz:2 $server 6Radyo Yayın Linkimiz: 7 $+ [Only Registered Users Can See Links] $+ %ipport3 $+ :

$+ %ipport1 $+ /listen.pls
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 12R4adyo 12kanalında yapmış olduğunuz 7istek 12sıraya alınmıştır.2En kısa sürede yayınlanacaktır.4[ 12Sizin

Sesiniz 7Radyo10 $remove($server,irc.) 7'dasınız. 4] 4İyi dinletiler..
write $+(-,dl,$readn) istekler.txt
.halt
}
if !$read(istekler.txt,w,$2 $+ *) {
msg $chan 10 $2 2Nicki Listede Gözükmüyor
}
}
}
if !istekyok* iswm $1- {
if $2 == $null {
msg $chan 2Lütfen Bir Nick Belirtin.. 4ÖRN: 1!istekyok Araf
}
else {
if $read(istekler.txt,w,$2 $+ *) {
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 4 $+ $remove($server,irc.) 2Radyo Yönetim AiLeSi
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 5Nickiniz4;10 $nick 
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 5iSTeK Yaptığınız Parça4:7 $gettok($read(istekler.txt,w,$2 $+ *),2,11) 
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 6Web Adresimiz:2 $server 6Radyo Yayın Linkimiz: 7 $+ [Only Registered Users Can See Links] $+ %ipport3 $+ :

$+ %ipport1 $+ /listen.pls
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 4,4*9,1Radyo kanalında yapmış olduğunuz istek Dj'imizin Arşivinde olmadığından,Sıradaki çalışma Dj tarafından

size Armağan edilecektir.Yada yeni bir istekte bulunabilirsiniz.4[ 12Sizin Sesiniz 7Radyo10 $remove($server,irc.) 7'dasınız. 4] 4İyi dinletiler ..
write $+(-,dl,$readn) istekler.txt
.halt
}
if !$read(istekler.txt,w,$2 $+ *) {
msg $chan 10 $2 2Nicki Listede Gözükmüyor
}
}
}
}
}

Örn: Resimler
#Radyo KanaLı

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])

#Dj KanaLı

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])


Dj Kanalında Botun Op Olması ve Sizinde Op Olmanız Şart Dj Kanalında Kullana Bilceğiniz Şekilde Resimli Örnekler Halinde Sundum.Siz Kendinize Göre

Düzenliyebilirsiniz.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;
;;;Sıradaki Parça Hakkında Bilgi
;;;-
;;;İstekvar Nick, İstekyok Nick
;;;-
;;;İstenilen İstek Parçaları sıfırla
;;;-
;;;İstenilen İstek Parçaları Listele
;;;-
;;;Şifre,Şifreler,Pass,Radyopass
;;;-
;;;Radyo Hakkında Bilgi Almalar
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;
on @*:text:*:#dj: {
if $regex($1,/^(!|.)sıradaki/i) {
if $lines(istekler.txt) == 0 { msg #dj 0,7 ** 14,1 Sırada Bekleyen İstek Bulunmuyor. | return }
var %sıradaki = $read(istekler.txt)
msg #dj 4,4 0,1Radyo Sıradaki Parça 
msg #dj 4,4 0,1
msg #dj 4,4 2 $server 12Radyo Yönetim AiLeSi
msg #dj 4,4 0,1
msg #dj 4,4 0,1 7İstek Yapan : 5 $gettok($read(istekler.txt,w,$2 $+ *),1,11)
msg #dj 4,4 0,1
msg #dj 4,4 0,1 7Yapılan İstek :6 $gettok($read(istekler.txt,w,$2 $+ *),2,11)
msg #dj 4,4 0,1
msg #dj 4,4 0,1 0Bekleyen isTek Sayısı :12 $lines(istekler.txt)
echo -a 2Sıradaki iSTeK Parça Başarıyla Kanala Verilmiştir.
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 4 $+ $remove($server,irc.) 2Radyo Yönetim AiLeSi
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 5Nickiniz4;10 $nick 
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 5iSTeK Yaptığınız Parça4:7 $gettok($read(istekler.txt,w,$2 $+ *),2,11) 
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 6Web Adresimiz:2 $server 6Radyo Yayın Linkimiz: 7 $+ [Only Registered Users Can See Links] $+ %ipport3 $+ : $+

%ipport1 $+ /listen.pls
msg $gettok($read(istekler.txt,w,$2 $+ *),1,11) 12R4adyo 12kanalında yapmış olduğunuz 7istek 12sıraya alınmıştır.2En kısa sürede yayınlanacaktır.4[ 12Sizin

Sesiniz 7Radyo10 $remove($server,irc.) 7'dasınız. 4] 4İyi dinletiler..
write $+(-dl,$readn) istekler.txt
}
if $regex($1,/^(!|.)sıfırla/i) {
msg #dj 4,4 0,1 Silinen İstek Sayısı: $lines(istekler.txt)
msg #dj 4,4 0,1
msg #dj 4,4 0,1
msg #dj 4,4 0,1 İstekler Sıfırlanmıştır.
remove istekler.txt
write istekler.txt
}
if $regex($1,/^(!|.)isteklist/i) {
if $lines(istekler.txt) == 0 { msg #dj 1iStek Listesi Boş. | return }
msg #dj 5 $nick 4iSteK Listesi SıraLanıyoR.
var %- 1 | while %- <= $lines(istekler.txt) { msg #dj $+(%-,-) $read(istekler.txt,%-) | inc %- }
msg #dj 4iStek LisTeSi TamamLandı.
}
if $regex($1,/^[.!](şifre|şifreler|sifreler|pass|radyopass)/i) {
if $nick isop #dj {
notice $nick 4,4 0,1 Radyo Bilgileri 4,4
notice $nick 4Şifre 1BiLgileri Tarafınıza GönderiLiyor4.1 Lütfen Bekleyin4.
notice $nick 4Bu Bilgileri Lütfen Ki mseyle Paylaşmayın.
notice $nick 14 $str($chr(45),45)
notice $nick 5 Port 1: 4 %ipport1
notice $nick 5 Şifre 1: 4 $regsubex(%ipport2,/./ig,$chr(42))
notice $nick 5 İp 1: 4 %ipport3
notice $nick 14 $str($chr(45),45)
notice $nick 1Şifre 7:1 Radyo 4 SorumLusundan1 ALıcakSınız4.
notice $nick 14 $str($chr(45),45)
notice $nick 5 Radyo Bilgilerinin Sonu.
notice $nick 14 $str($chr(45),45)
notice $nick 4 Radyo Bilgilerini Alan Nick 1( 5 $nick 1)
notice $nick 14 $str($chr(45),45)
notice $nick 5 Hoş Sohbetler 1,5 İyi Yayınlar 7 $nick
notice $nick 14 $str($chr(45),45)
notice $nick 2BU bilgiler 4Gizlidir, 2Paylaşılması halinda kişi hakkında tespit ve işlem başlatılır..
notice $nick 14 $str($chr(45),45)
notice $nick 4 Yapımcı : 1*** 4CR 10C1o12d1eman 10Goemon 1***
notice $nick 14 $str($chr(45),45)
notice $nick 4,4 0,1 Radyo Bilgileri 4,4
}
else {
msg $chan 10 $nick 5Kanal 4operatörü 5değilsiniz.
}
}
}

Örn: ResimleR
!Sıradaki Parça Resmi

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])

!istekvar Nick, !istekyok Nick Görüntüsü

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])

!sıfırla ve !isteklist Görüntüsü

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])

!radyopass, !şifre, !şifreler, !sifreler, !pass Görüntüsü

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])


Radyo Kanalında Link Yazarak Radyo Kanalının Yayın Linkini Alabilirsiniz.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;Radyo Link Alma
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:text:*:#radyo:{
if !link* iswm $1 {
msg $chan 8,1Radyomuzu 11Winamp7'tan 8,1Dinlemek İçin Tıklayın 13»0,1 [Only Registered Users Can See Links] $+ %ipport3 $+ : $+ %ipport1 $+ /listen.pls
msg $chan 
msg $chan 8,1Radyomuzu 11Winamp7'tan 8,1Dinlemek İçin Tıklayın 13»0,1 [Only Registered Users Can See Links] $+ %ipport3 $+ : $+ %ipport1 $+ /listen.pls
}
}

Örn: Resim

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])



Dj, DjSop, DjMisafiR, DjFoundeR, RadyoFoundeR, identleri İle #Radyo Kanalına Giriş Yapan Kişilere Karşılama Yapar.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;Dj Karşılama Mesajı
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:join:#radyo: {
if (*!Dj@* iswm $fulladdress) {
if $istok( $+ $me Nick1,$nick,32) { return }
describe # 2Radyo 12 $+ $remove($server,irc.) $+ -FM 7Dj4'2i10 $nick 2Şuanda4 # 2Kanalına Giriş Yaptı..
}
if (*!DjSop@* iswm $fulladdress) {
if $istok( $+ $me Nick1,$nick,32) { return }
describe # 2Radyo 12 $+ $remove($server,irc.) $+ -FM 7Dj4'2i10 $nick 2Şuanda4 # 2Kanalına Giriş Yaptı..
}
if (*!DjMisafiR@* iswm $fulladdress) {
if $istok( $+ $me Nick1,$nick,32) { return }
describe # 2Radyo 12 $+ $remove($server,irc.) $+ -FM 7Dj4'2i10 $nick 2Şuanda4 # 2Kanalına Giriş Yaptı..
}
if (*!DjFoundeR@* iswm $fulladdress) {
if $istok( $+ $me Nick1,$nick,32) { return }
describe # 2Radyo 12 $+ $remove($server,irc.) $+ -FM 7Dj4'2i10 $nick 2Şuanda4 # 2Kanalına Giriş Yaptı..
}
if (*!RadyoFoundeR@* iswm $fulladdress) {
if $istok( $+ $me Nick1,$nick,32) { return }
describe # 2Radyo 12 $+ $remove($server,irc.) $+ -FM 7Dj4'2i10 $nick 2Şuanda4 # 2Kanalına Giriş Yaptı..
}
}

Örn: Resim

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])



Radyo İp Port Diyalog Menüsü

menu channel {
Radyop İp Port Menü:port-panel
}
alias port-panel { if $dialog(port-panel) { !echo -a 2Radyo İp Port Şifre Dialog'u Zaten 4AÇIK! } | else { !dialog -m port-panel port-panel } }
dialog port-panel {
title "Radyo iP Port Şifre PaneLi"
size -1 -1 120 81
option dbu notheme
box " iP Port Sifre BilgiLendirmesi", 1, 2 1 115 48
text " Radyo PORTU", 2, 5 12 50 8
text " Radyo SiFRESi", 3, 5 24 50 9
text " Radyo iP Adresi", 4, 5 37 50 9
edit %ipport1, 5, 60 11 53 10, autohs autovs
edit %ipport2, 6, 60 23 53 10, autohs autovs
edit %ipport3, 7, 60 36 53 10, autohs autovs
button "TAMAM", 8, 3 53 33 12, ok
button "KAYDET", 9, 43 53 33 12, flat
button "KAPAT", 10, 83 53 33 12, cancel
text " * mS - CR Codeman Goemon *", 11, 25 69 76 9
}

on *:dialog:port-panel:*:*:{
if $devent == sclick {
if $istok(8 9,$did,32) {
set %ipport1 $did($dname,5)
set %ipport2 $did($dname,6)
set %ipport3 $did($dname,7)
}
}
}

Örn: Resim

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])


RadyoYönetim Yayın Saati Diyalog Menüsü

menu channel {
RadyoYönetim YayınSaati Menüsü:radyoyönetim
}
alias radyoyönetim { if $dialog(radyoyönetim) { !echo -a 2Radyo Yönetim ve Yayın Saati Dialog'u Zaten 4AÇIK! } | else { !dialog -m radyoyönetim radyoyönetim } }
dialog radyoyönetim {
title "Radyo Dj Yönetim ve Radyo Yayin SaatLeRi PaneLi"
size -1 -1 225 219
option dbu notheme
box " Radyo Dj Yonetim Listesi", 1, 2 2 112 215
box " Radyo Dj Yayin SaaTLeRi", 2, 116 2 106 134
text " Radyo Dj FoundeR", 3, 5 11 50 9
edit %djyön1, 4, 56 10 56 10, autohs autovs
text " Radyo Dj Yardimcisi", 5, 5 23 52 8
text " Radyo Dj Yardimcisi", 6, 5 34 53 8
text " Radyo Dj Yardimcisi", 7, 5 44 52 9
text " Radyo Dj Sop", 8, 5 55 50 9
text " Radyo Dj Sop", 9, 5 66 50 8
text " Radyo Dj Sop", 10, 5 77 50 9
text " Radyo Dj Aop", 11, 5 87 50 8
text " Radyo Dj Aop", 12, 5 99 50 8
text " Radyo Dj Aop", 13, 5 110 50 9
text " Radyo Dj Aop", 14, 5 121 50 8
text " Radyo Dj Aop", 15, 5 131 50 9
text " Radyo Dj Aop", 16, 5 142 50 8
text " Radyo Dj Aop", 17, 5 153 50 9
text " Radyo Dj Aop", 18, 5 163 50 9
text " Radyo Dj Aop", 19, 5 174 50 9
text " Radyo Dj Aop", 20, 5 185 50 8
text " Radyo Dj Aop", 21, 5 195 50 8
text " Radyo Dj Aop", 22, 5 205 50 8
edit %djyön2, 23, 56 22 56 10, autohs autovs
edit %djyön3, 24, 56 33 56 10, autohs autovs
edit %djyön4, 25, 56 43 56 10, autohs autovs
edit %djyön5, 26, 56 54 56 10, autohs autovs
edit %djyön6, 27, 56 65 56 10, autohs autovs
edit %djyön7, 28, 56 76 56 10, autohs autovs
edit %djyön8, 29, 56 86 56 10, autohs autovs
edit %djyön9, 30, 56 97 56 10, autohs autovs
edit %djyön10, 31, 56 108 56 10, autohs autovs
edit %djyön11, 32, 56 119 56 10, autohs autovs
edit %djyön12, 33, 56 129 56 10, autohs autovs
edit %djyön13, 34, 56 140 56 10, autohs autovs
edit %djyön14, 35, 56 151 56 10, autohs autovs
edit %djyön15, 36, 56 162 56 10, autohs autovs
edit %djyön16, 37, 56 173 56 10, autohs autovs
edit %djyön17, 38, 56 184 56 10, autohs autovs
edit %djyön18, 39, 56 194 56 10, autohs autovs
edit %djyön19, 40, 56 204 56 10, autohs autovs
text " 08:00 / 10:00", 41, 118 10 50 8
text " 10:00 / 12:00", 42, 118 20 50 8
text " 12:00 / 14:00", 43, 118 30 50 9
text " 14:00 / 16:00", 44, 118 40 50 8
text " 16:00 / 18:00", 45, 118 50 50 9
text " 18:00 / 20:00", 46, 118 61 50 8
text " 20:00 / 22:00", 47, 118 71 50 9
text " 22:00 / 24:00", 48, 118 82 50 8
text " 24:00 / 02:00", 49, 118 93 50 9
text " 02:00 / 04:00", 50, 118 104 50 9
text " 04:00 / 06:00", 51, 118 114 50 9
text " 06:00 / 08:00", 52, 118 125 50 9
edit %djsaat1, 53, 170 9 50 10, autohs autovs
edit %djsaat2, 54, 170 19 50 10, autohs autovs
edit %djsaat3, 55, 170 29 50 10, autohs autovs
edit %djsaat4, 56, 170 39 50 10, autohs autovs
edit %djsaat5, 57, 170 49 50 10, autohs autovs
edit %djsaat6, 58, 170 60 50 10, autohs autovs
edit %djsaat7, 59, 170 70 50 10, autohs autovs
edit %djsaat8, 60, 170 81 50 10, autohs autovs
edit %djsaat9, 61, 170 91 50 10, autohs autovs
edit %djsaat10, 62, 170 102 50 10, autohs autovs
edit %djsaat11, 63, 170 112 50 10, autohs autovs
edit %djsaat12, 64, 170 124 50 10, autohs autovs
button "TAMAM", 65, 118 138 32 13, ok
button "KAYDET", 66, 153 152 33 12, flat
button "KAPAT", 67, 188 164 32 12, cancel
text "* mS - CR Codeman Goemon *", 68, 132 183 76 9
link "[Only Registered Users Can See Links]", 69, 147 200 55 8
}

on *:dialog:radyoyönetim:*:*:{
if $devent == sclick {
if $istok(65 66,$did,32) {
set %djyön1 $did($dname,4)
set %djyön2 $did($dname,23)
set %djyön3 $did($dname,24)
set %djyön4 $did($dname,25)
set %djyön5 $did($dname,26)
set %djyön6 $did($dname,27)
set %djyön7 $did($dname,28)
set %djyön8 $did($dname,29)
set %djyön9 $did($dname,30)
set %djyön10 $did($dname,31)
set %djyön11 $did($dname,32)
set %djyön12 $did($dname,33)
set %djyön13 $did($dname,34)
set %djyön14 $did($dname,35)
set %djyön15 $did($dname,36)
set %djyön16 $did($dname,37)
set %djyön17 $did($dname,38)
set %djyön18 $did($dname,39)
set %djyön19 $did($dname,40)
set %djsaat1 $did($dname,53)
set %djsaat2 $did($dname,54)
set %djsaat3 $did($dname,55)
set %djsaat4 $did($dname,56)
set %djsaat5 $did($dname,57)
set %djsaat6 $did($dname,58)
set %djsaat7 $did($dname,59)
set %djsaat8 $did($dname,60)
set %djsaat9 $did($dname,61)
set %djsaat10 $did($dname,62)
set %djsaat11 $did($dname,63)
set %djsaat12 $did($dname,64)
}
}
}

Örn: Resim

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])



#Radyo #istek #dj Kanalında AUTO Opa Çıkar

on *:join:#radyo,#dj,#istek: {
if $nick == $me { samode $chan +o $me | msg #dj 4 $chan 12KanaLında7 $nick 4AUTO OP 12Konumuna Geçtim. }
}



#Radyo Kanalına Girene Özelde Karşılama

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;Radyo Kanalında Girene Özelde Mesaj
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:join:#radyo:{ if ($nick != $me) { /.inc %giris
msg $nick 4 $token($server,2-,$asc(.)) 2Radyo Yönetim AiLesine 4Hoş Geldiniz."
msg $nick 2Sunucumuzda 2kurallara lütfen uyunuz."
msg $nick 2Sunucumuzda 2Radyo kanalımız4 # 2kanalıdır."
msg $nick 2Sunucumuzda4 # 2Kanalında Suan12 $nick($chan,0) 2Kişi Sohbet Etmektedir..
msg $nick 2Winaptan bizleri4[Only Registered Users Can See Links] $+ %ipport3 $+ : $+ %ipport1 $+ /listen.pls 2dinleyebilirsiniz."
msg $nick 2İsteklerinizi4 # 2kanalindan yapabilirsiniz..."
msg $nick 1!istek sanatçıadı parçası 2Sizlere Gelsin Gibi..."
msg $nick 2Diğer bilgilerimiz için4 /motd 2yazabilirsiniz."
}
}

Örn: Resim

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])



!radyopass Kodunu Paylaştım Ama Bana Sadece Bu Code Lazım Olur Derseniz Size Kullanabilceğiniz Şekilde Kısa Bir Code Yine Vermek İstedim

Buyrun.

#Dj Kanalında Radyo Yayınının Şifresini Portunu Örenmek İçin #Dj Kanalında Op Ekli Olmanız Şart ve #Dj Kanalında Radyo ip Port

Şifresini !radyopass Yazarak Öğrene Bilirsiniz.

on @*:text:*:#dj:{
if $strip($1) == !radyopass {
if $nick isop #dj {
notice $nick 4,4 0,1 Radyo Bilgileri 4,4
notice $nick 4Şifre 1BiLgileri ÖzeLinize GönderiLiyor4.1 Lütfen Bekleyin4.
notice $nick 4Bu Bilgileri Lütfen Ki mseyle Paylaşmayın.
notice $nick 14 $str($chr(45),45)
notice $nick 5 Port 1: 4 %ipport1
notice $nick 5 Şifre 1: 4 $regsubex(%ipport2,/./ig,$chr(42))
notice $nick 5 İp 1: 4 %ipport3
notice $nick 14 $str($chr(45),45)
notice $nick 1Şifre 7:1 Radyo 4 SorumLusundan1 ALıcakSınız4.
notice $nick 14 $str($chr(45),45)
notice $nick 5 Radyo Bilgilerinin Sonu.
notice $nick 14 $str($chr(45),45)
notice $nick 4 Radyo Bilgilerini Alan Nick 1(5 $nick 1)
notice $nick 14 $str($chr(45),45)
notice $nick 5 Hoş Sohbetler 1,5 İyi Yayınlar 7 $nick
notice $nick 14 $str($chr(45),45)
notice $nick 2BU bilgiler Gizlidir, Paylaşılması halinda kişi hakkında tespit ve işlem başlatılır..
notice $nick 14 $str($chr(45),45)
notice $nick 4 Yapımcı : 1*** 4CR 10C1o12d1eman 10Goemon 1***
notice $nick 14 $str($chr(45),45)
notice $nick 4,4 0,1 Radyo Bilgileri 4,4
}
else {
msg $chan 10 $nick 5Kanal 4operatörü 5değilsiniz.
}
}
}

Örn: Resim

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])



#Radyo ve #istek Kanalına Giren Kişilere Radyo Yönetimi Ve Yayın Saatleri Hakkında Bilgi Verir.

on *:join:#: {
if ($chan == #radyo) {
if $nick == $me { halt }
notice $nick 7• 2~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
notice $nick 7• 12IRC10 $+ $token($server,2-,$asc(.)) 12Radyo Yönetim AiLeSi -
notice $nick 7• 2~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
notice $nick 7•
notice $nick 7• 4Radyo Sorumlusu:
notice $nick 7• 12 %djyön1
notice $nick 7•
notice $nick 7• 4Yardımcı Radyo Sorumlusu:
notice $nick 7• 10 %djyön2 9- 2 %djyön3 9- 2 %djyön4
notice $nick 7•
notice $nick 7• 4Radyo Dj 1LeR:
notice $nick 7• 6 %djyön5 9- 6 %djyön6 9- 6 %djyön7 9- 6 %djyön8 9- 6 %djyön9
notice $nick 7•
notice $nick 7• 6 %djyön10 9- 2 %djyön11 9- 2 %djyön12 9- 2 %djyön13 9- 2 %djyön14
notice $nick 7•
notice $nick 7• 2 %djyön15 9- 2 %djyön16 9- 2 %djyön17 9- 2 %djyön18 9- 2 %djyön19
notice $nick 7•
notice $nick 7• 2~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
notice $nick 7• 4Istek öneri ve şikayetleriniz için Msn Adresimiz: 2ircadmin@ $+ $token($server,2-,$asc(.))
notice $nick 7• 2~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
notice $nick 7• 4CR 10C1o12d1eman 10Goemon
notice $nick 7• 14=~~=~~=~~=~~=~~=~~=~~=~~=~~=~~=~
notice $nick 7•
notice $nick 7• 4«10®adyoMøtd4»
notice $nick 7•
notice $nick 7• 14=~~=~~=~~=~~=~~=~~=~~=~~=~~=~~=~
}
if ($chan == #istek) {
if $nick == $me { halt }
notice $nick 12 $token($server,2-,$asc(.)) 5IRC Ağı Radyo Departmanında Görev ALmakta OLan
notice $nick 4Dj Yayın Saatleri;
notice $nick 7==========================================
notice $nick 4Saat - 5 08:00 4- 5 10:00 4- 2Dj 4~12 %djsaat1 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 10:00 4- 5 12:00 4- 2Dj 4~12 %djsaat2 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 12:00 4- 5 14:00 4- 2Dj 4~12 %djsaat3 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 14:00 4- 5 16:00 4- 2Dj 4~12 %djsaat4 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 16:00 4- 5 18:00 4- 2Dj 4~12 %djsaat5 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 18:00 4- 5 20:00 4- 2Dj 4~12 %djsaat6 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 20:00 4- 5 22:00 4- 2Dj 4~12 %djsaat7 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 22:00 4- 5 24:00 4- 2Dj 4~12 %djsaat8 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 24:00 4- 5 02:00 4- 2Dj 4~12 %djsaat9 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 02:00 4- 5 04:00 4- 2Dj 4~12 %djsaat10 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 04:00 4- 5 06:00 4- 2Dj 4~12 %djsaat11 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 06:00 4- 5 08:00 4- 2Dj 4~12 %djsaat12 4~
notice $nick 7==========================================
notice $nick 12***
}
}

Örn: ResimLeR

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])



B]Botun Özelinde[/B]
!yayınlist Yazarak İRC Sunucunun Radyo Dj Lerinin Yayın Saatini Öğrenebilirsiniz.
!djkurallar Yazarak İRC Radyo Dj Kurallarını Öğrene Bilirsiniz.
!djyönetim Yazarak İRC Sunucusunun Radyo Dj Yönetim Listesini Göre Bilirsiniz.
!radyokomut Yazarak #Radyo Kanalında Kullana Bilceğiniz Komutlar Hakkında Bilgi Ala Bilirsiniz.

Not: Bu Codeyi Kullana Bilmeniz İçin #radyo #dj #istek Kanallarında Bulunmanız Şart.

on ^*:text:*:?: {
if ($regex($1,/((!|\.)yayınlist)/i)) {
if $nick isop #radyo || $nick isop #dj || $nick isop #istek {
Msg $nick 4,4 0,1 Radyo Yayin Saatleri 4,4
Msg $nick 12 $token($server,2-,$asc(.)) 5IRC Ağı Radyo Departmanında Görev ALmakta OLan 4Dj Yayın Saatleri;
notice $nick 7==========================================
notice $nick 4Saat - 5 08:00 4- 5 10:00 4- 2Dj 4~12 %djsaat1 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 10:00 4- 5 12:00 4- 2Dj 4~12 %djsaat2 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 12:00 4- 5 14:00 4- 2Dj 4~12 %djsaat3 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 14:00 4- 5 16:00 4- 2Dj 4~12 %djsaat4 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 16:00 4- 5 18:00 4- 2Dj 4~12 %djsaat5 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 18:00 4- 5 20:00 4- 2Dj 4~12 %djsaat6 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 20:00 4- 5 22:00 4- 2Dj 4~12 %djsaat7 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 22:00 4- 5 24:00 4- 2Dj 4~12 %djsaat8 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 24:00 4- 5 02:00 4- 2Dj 4~12 %djsaat9 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 02:00 4- 5 04:00 4- 2Dj 4~12 %djsaat10 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 04:00 4- 5 06:00 4- 2Dj 4~12 %djsaat11 4~
notice $nick 7==========================================
notice $nick 4Saat - 5 06:00 4- 5 08:00 4- 2Dj 4~12 %djsaat12 4~
notice $nick 7==========================================
Msg $nick 1Herkes yayın saatlerine uymaya çalışsın4.
Msg $nick 4İsteklere 1önem verelim arkadaşlar4. 1Anlayışınız için şimdiden 4teşekkür ederim1.
Msg $nick 7,1BiLGi:
Msg $nick 4,4 0,1 Radyo GoemonFM 4,4 1Yayin Saatinde herkes burda bulunmak zorundadir.Yayin saatine 3 kez gelmeyen DJ nin yayin saati siLinir ve hak talep

edemez.
}
else {
msg $nick 5 $nick 12Kanal 4operatörü 12değilsiniz..
}
}
if ($regex($1,/((!|\.)djkurallar)/i)) {
if $nick isop #radyo || $nick isop #dj || $nick isop #istek {
Msg $nick 5 $nick 4Dj KuRaLLaR Listesi SıraLanıyoR.
Msg $nick $token($server,2-,$asc(.)) 4Dj 5Lerin we 4Dj 5oLmak isteyen arkadasLarın uymak zorunda oldukLarı Kurallar
Msg $nick 4(1) 2Dj ’ler 5kendilerine verilen şifreyi korumakla yükümlüdür.
Msg $nick 5Her ne şekilde olursa olsun. 6Gerektiğinde ip ve portu verseler bile ,
Msg $nick 2ŞİFRE VERME YETKİSİ SADECE RADYO VE DJ KANALI SORUMLUSUNA AİTTİR.
Msg $nick 5Şifre kimseye söylenmeyecek.söylendiği tespit edildiği anda 4DJ’likten 5SiLinicektir "
Msg $nick 6Bu isteğiniz nickiniz ve ip adresinizle kaydedildi şifremizin çalınması durumunda sorumlusunuz "
Msg $nick 14-
Msg $nick 4(2) 2Dj 5olan arkadaş yayın yaptığı süre ve online zamanında 12#Dj 5kanalına girip orada bulunmakta olan istekleri çalacaktır.
Msg $nick 14-
Msg $nick 4(3) 2Dj 5arkadaşlarımız yayında olan 2Dj 5arkadaşımıza yardımcı olmalı kanal genelinde kişilerin radyoyu dinlemesi için reklam yapmalıdır
Msg $nick 14-
Msg $nick 4(4) 2Dj 7Spor 6(Takım Marşları) 7Siyasi 6(Kürtçe Ve Mesaj Veren) 5konulu kavgaya dönecek tartışma yaratacak şarkıların çalınması kesinLikleyasaktır.
Msg $nick 14-
Msg $nick 4(5) 2Dj 5Kesinlikle bir dj arkadaşımız yayındayken yayını bölecek isteklerde bulunulmamalıdır.
Msg $nick 5(Yayını Alabilir Miyim? Gibi) Yayını kesme yetkisi sadece ve sadece 12#Radyo 5ve 12#Dj 5kanalı sorumlu arkadaşımızdadır
Msg $nick 14-
Msg $nick 4(6) 2Dj 5Yayın bitimi yayının otoda kalmaması için şifre programdan silinecektir.
Msg $nick 5Oto’da yayın kalmayacak, hele ki server’da olmayan 2Dj 5yanlışlıkla dahi olsa, yayını almayacaktır ~
Msg $nick 14-
Msg $nick 4(7) 2DJ 5Her yayın saatine uymak zorundadır 7(Özel Günler Hariç). 5Yayına giremeyeceği zaman önceden haber vermekle yükümlüdür.
Msg $nick 5En az bir gün önce yarın yayına giremeyeceğim diyip 12#Radyo 7ve 12#Dj 5kanalı sorumlusuna bildirecek sorumluda o aradaki olayı tamamlayacak.
Msg $nick 14-
Msg $nick 4(8) 2Dj 5Sadece yayında olan dj nickini 4Dj_ ibaresini ekleyecek.5Radyo ve server global sohbet kanalında aop 4(@) 5ta duracaktır
Msg $nick 14-
Msg $nick 4(9) 2Dj 5Hicbir radyo programcısı 2Dj sorumlusuna karşı gelmiyecek 5ve belirtilen tarihlerdeki toplantılara katılacaktır.
Msg $nick 5Mazereti olan bunu uygun bir dille 2Dj sorumlusuna belirtmekle yükümlüdür
Msg $nick 14-
Msg $nick 4(10) 5Siyasi FutboL Vb Tür Sarkılar Calmak Caldırmak KesinlikLe YASAKTIR.
Msg $nick 14-
Msg $nick $token($server,2-,$asc(.)) 6Radyo 4& 2Dj 1Kuralları.
.timer 1 2 Msg $nick 12 $nick 5DjKuRaLLaR Listesi öZeLine BaşarıyLa gönderiLmiştir..
}
else {
msg $nick 5 $nick 12Kanal 4operatörü 12değilsiniz.
}
}
if ($regex($1,/((!|\.)djyönetim)/i)) {
if $nick isop #radyo || $nick isop #dj || $nick isop #istek {
Msg $nick 4 $token($server,2-,$asc(.)) 2Radyo Yönetim Görev DağıLımı;
Msg $nick 7==========================================
Msg $nick 4Dj FoundeR : 12 %djyön1
Msg $nick 7==========================================
Msg $nick 4Dj Yardımcısı : 10 %djyön2 9- 10 %djyön3 9- 10 %djyön4
Msg $nick 7==========================================
Msg $nick 4Dj SopLaR : 6 %djyön5 9- 6 %djyön6 9- 6 %djyön7
Msg $nick 7==========================================
Msg $nick 4Dj AopLaR : 2 %djyön8 9- 2 %djyön9 9- 2 %djyön10
Msg $nick 7==========================================
Msg $nick 4Dj AopLaR : 5 %djyön11 9- 5 %djyön12 9- 5 %djyön13
Msg $nick 7==========================================
Msg $nick 4Dj'LeR : 1 %djyön14 9- 1 %djyön15 9- 1 %djyön16
Msg $nick 7==========================================
Msg $nick 4Dj'LeR : 1 %djyön17 9- 1 %djyön18 9- 1 %djyön19
Msg $nick 7==========================================
Msg $nick 4GörevLi BoT : 12Radyobot 9-
Msg $nick 7==========================================
Msg $nick 12 $token($server,2-,$asc(.)) 2Herkese Görevinde Başarılar dileriz..
}
else {
msg $nick 5 $nick 12Kanal 4operatörü 12değilsiniz!
}
}
if ($regex($1,/((!|\.)radyokomut)/i)) {
Msg $nick 4#Radyo 6Kanalında Herkesin Kullanabilecegi Komutlar
Msg $nick 4!link : 5Radyo 2linkini alabilmek için: 1!link
Msg $nick 4!istek : 5İstek 2yapabilmek için: 1!istek sanatcıadı-şarkı-mesajınız
Msg $nick 4!durum : 5Radyo 2yayını hakkında bilgi almak için: 1!durum
Msg $nick 4!dj : 5Radyo 2yayını hakkında bilgi almak için: 1!dj
Msg $nick 4!calan : 5#Radyo 2kanalımızda herkesin kullanabileceği bir komuttur.
Msg $nick 4!dinliyen : 5#Radyo 2kanalımızda herkesin kullanabileceği bir komuttur.
Msg #dj 7Özelimde 4!radyokomut 7yazan 12 $nick
}
}


Örn: ResimLeR

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])

[Only Registered Users Can See Links] ([Only Registered Users Can See Links])


Duyuru Codesini Dj kanalında 2 dk da bir kullana bilirsiniz.

on *:text:*:#dj: {
if ($1 == !duyuru) {
if !$hget(duyuru,$nick) {
.hadd -msu120 duyuru $nick 1
msg #radyo 4Duyuru: 2Radyo Fm Sizin Sesiniz RadyoFM de atıyor.
msg #dj 10 $nick 2Duyuru 4Mesajınız 2İletildi.
return
}
else {
.notice $nick 4 2 1Dakika içersinde, Yalnız4 1 1defa 4!Duyuru 1Komutunu Kullanabilirsiniz.
}
}
}



Evet arkadaşlar bu kod ilede djleri yayın saatlerine göre ekliyebilirsiniz.

Kullanma komutları
!djsaat1 nick
!djsaat2 nick
!djsaat3 nick
!djsaat4 nick
!djsaat5 nick
!djsaat6 nick
!djsaat7 nick
!djsaat8 nick
!djsaat9 nick
!djsaat10 nick
!djsaat11 nick
!djsaat12 nick

Gibi Yazarak Dj i Yayın Saati Hangisine Geliyorsa o Komutu Kullanın.

on *:text:*:#dj:{
if $strip($1) == !djsaat1 && $2 {
set %djsaat1 $2
Msg $chan 10 %djsaat1 2Radyo Departmanında Ekibimize
Msg $chan 4Dj 5Olarak Eklenmiş ve7 08:00 4&7 10:00 2Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10 %djsaat1 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $strip($1) == !djsaat2 && $2 {
set %djsaat2 $2
Msg $chan 10 %djsaat2 2Radyo Departmanında Ekibimize
Msg $chan 4Dj 5Olarak Eklenmiş ve7 10:00 4&7 12:00 2Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10 %djsaat2 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $strip($1) == !djsaat3 && $2 {
set %djsaat3 $2
Msg $chan 10%djsaat3 2Radyo Departmanında Ekibimize
Msg $chan 4Dj 5Olarak Eklenmiş ve7 12:00 4&7 14:00 2Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10 %djsaat3 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $strip($1) == !djsaat4 && $2 {
set %djsaat4 $2
Msg $chan 10%djsaat4 2Radyo Departmanında Ekibimize
Msg $chan 4Dj 5Olarak Eklenmiş ve7 14:00 4&7 16:00 2Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10%djsaat4 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $strip($1) == !djsaat5 && $2 {
set %djsaat5 $2
Msg $chan 10 %djsaat5 2Radyo Departmanında Ekibimize
Msg $chan 4Dj 5Olarak Eklenmiş ve7 16:00 4&7 18:00 2Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10 %djsaat5 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $strip($1) == !djsaat6 && $2 {
set %djsaat6 $2
Msg $chan 10 %djsaat6 2Radyo Departmanında Ekibimize
Msg $chan 4Dj 5Olarak Eklenmiş ve7 18:00 4&7 20:00 2Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10 %djsaat6 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $strip($1) == !djsaat7 && $2 {
set %djsaat7 $2
Msg $chan 10 %djsaat7 2Radyo Departmanında Ekibimize
Msg $chan 4Dj 5Olarak Eklenmiş ve7 20:00 4&7 22:00 2Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10 %djsaat7 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $strip($1) == !djsaat8 && $2 {
set %djsaat8 $2
Msg $chan 10 %djsaat8 2Radyo Departmanında Ekibimize
Msg $chan 4Dj 5Olarak Eklenmiş ve7 22:004 &7 24:00 2Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10 %djsaat8 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $strip($1) == !djsaat9 && $2 {
set %djsaat9 $2
Msg $chan 10 %djsaat9 2Radyo Departmanında Ekibimize
Msg $chan 4Dj 5Olarak Eklenmiş ve7 24:00 7&7 02:00 2Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10 %djsaat9 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $strip($1) == !djsaat10 && $2 {
set %djsaat10 $2
Msg $chan 10 %djsaat10 2Radyo Departmanında Ekibimize
Msg $chan 4Dj 5Olarak Eklenmiş ve7 02:00 4&7 04:00 2Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10 %djsaat10 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $strip($1) == !djsaat11 && $2 {
set %djsaat11 $2
Msg $chan 10 %djsaat11 2Radyo Departmanında Ekibimize
Msg $chan 4Dj 5Olarak Eklenmiş ve7 04:00 4&7 06:00 2Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10 %djsaat11 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $strip($1) == !djsaat12 && $2 {
set %djsaat12 $2
Msg $chan 10 %djsaat12 2Radyo Departmanında Ekibimize
Msg $chan Dj Olarak Eklenmiş ve 06:00 & 08:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg $chan 10 %djsaat12 2Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
}

Ahmet
20 Şubat 2015, 22:49
Bu kodları rar halinde atma sansınız varmıdır socket botuma ekliyecegim?

TurkTC
06 Mart 2015, 22:42
Selam .
!djsaat1 djnick
bu olayda sadece yayin saatlerine 1 nick eklenebiliyor bunu daha fazla nick eklemesi yapabilirmiyiz.

Goemon
06 Mart 2015, 23:25
@TurkTC buyur istediğin gibidir inş.

sen renkleri ayarlarsın.

Kullanma komutları
!djsaat1 nick nick nick
!djsaat2 nick nick nick
!djsaat3 nick nick nick
!djsaat4 nick nick nick
!djsaat5 nick nick nick
!djsaat6 nick nick nick
!djsaat7 nick nick nick
!djsaat8 nick nick nick
!djsaat9 nick nick nick
!djsaat10 nick nick nick
!djsaat11 nick nick nick
!djsaat12 nick nick nick


on ^*:text:*:#dj: {
if ($regex($1,/((!|\.)yayınlist)/i)) {
if $nick isop #radyo || $nick isop #dj || $nick isop #istek {
Msg $nick 4,4 0,1 Radyo Yayin Saatleri 4,4
Msg $nick 12 $token($server,2-,$asc(.)) 5IRC Ağı Radyo Departmanında Görev ALmakta OLan 4Dj Yayın Saatleri;
Msg $nick 7==========================================
Msg $nick 4Saat - 5 08:00 4- 5 10:00 4- 2Dj 4~12 %djsaat1 4~
Msg $nick 7==========================================
Msg $nick 4Saat - 5 10:00 4- 5 12:00 4- 2Dj 4~12 %djsaat2 4~
Msg $nick 7==========================================
Msg $nick 4Saat - 5 12:00 4- 5 14:00 4- 2Dj 4~12 %djsaat3 4~
Msg $nick 7==========================================
Msg $nick 4Saat - 5 14:00 4- 5 16:00 4- 2Dj 4~12 %djsaat4 4~
Msg $nick 7==========================================
Msg $nick 4Saat - 5 16:00 4- 5 18:00 4- 2Dj 4~12 %djsaat5 4~
Msg $nick 7==========================================
Msg $nick 4Saat - 5 18:00 4- 5 20:00 4- 2Dj 4~12 %djsaat6 4~
Msg $nick 7==========================================
Msg $nick 4Saat - 5 20:00 4- 5 22:00 4- 2Dj 4~12 %djsaat7 4~
Msg $nick 7==========================================
Msg $nick 4Saat - 5 22:00 4- 5 24:00 4- 2Dj 4~12 %djsaat8 4~
Msg $nick 7==========================================
Msg $nick 4Saat - 5 24:00 4- 5 02:00 4- 2Dj 4~12 %djsaat9 4~
Msg $nick 7==========================================
Msg $nick 4Saat - 5 02:00 4- 5 04:00 4- 2Dj 4~12 %djsaat10 4~
Msg $nick 7==========================================
Msg $nick 4Saat - 5 04:00 4- 5 06:00 4- 2Dj 4~12 %djsaat11 4~
Msg $nick 7==========================================
Msg $nick 4Saat - 5 06:00 4- 5 08:00 4- 2Dj 4~12 %djsaat12 4~
Msg $nick 7==========================================
Msg $nick 1Herkes yayın saatlerine uymaya çalışsın4.
Msg $nick 4İsteklere 1önem verelim arkadaşlar4. 1Anlayışınız için şimdiden 4teşekkür ederim1.
Msg $nick 7,1BiLGi:
Msg $nick 4,4 0,1 Radyo GoemonFM 4,4 1Yayin Saatinde herkes burda bulunmak zorundadir.Yayin saatine 3 kez gelmeyen DJ nin yayin saati siLinir ve hak talep edemez.
}
else {
msg $nick 5 $nick 12Kanal 4operatörü 12değilsiniz..
}
}
}

on *:text:*:#dj:{
if $regex($strip($1),/^([!\.]djsaat1)$/i) && $4 {
set %djsaat1 $2-4
Msg # %djsaat1 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 08:00 & 10:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat1 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $regex($strip($1),/^([!\.]djsaat2)$/i) && $4 {
set %djsaat2 $2-4
Msg # %djsaat2 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 10:00 & 12:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat2 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $regex($strip($1),/^([!\.]djsaat3)$/i) && $4 {
set %djsaat3 $2-4
Msg # %djsaat3 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 12:00 & 14:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat3 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $regex($strip($1),/^([!\.]djsaat4)$/i) && $4 {
set %djsaat4 $2-4
Msg # %djsaat4 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 14:00 & 16:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat4 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $regex($strip($1),/^([!\.]djsaat5)$/i) && $4 {
set %djsaat5 $2-4
Msg # %djsaat5 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 16:00 & 18:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat5 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $regex($strip($1),/^([!\.]djsaat6)$/i) && $4 {
set %djsaat6 $2-4
Msg # %djsaat6 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 18:00 & 20:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat6 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $regex($strip($1),/^([!\.]djsaat7)$/i) && $4 {
set %djsaat7 $2-4
Msg # %djsaat7 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 20:00 & 22:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat7 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $regex($strip($1),/^([!\.]djsaat8)$/i) && $4 {
set %djsaat8 $2-4
Msg # %djsaat8 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 22:00 & 24:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat8 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $regex($strip($1),/^([!\.]djsaat9)$/i) && $4 {
set %djsaat9 $2-4
Msg # %djsaat9 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 24:00 & 02:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat9 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $regex($strip($1),/^([!\.]djsaat10)$/i) && $4 {
set %djsaat10 $2-4
Msg # %djsaat10 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 02:00 & 04:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat10 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $regex($strip($1),/^([!\.]djsaat11)$/i) && $4 {
set %djsaat11 $2-4
Msg # %djsaat11 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 04:00 & 06:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat11 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
if $regex($strip($1),/^([!\.]djsaat12)$/i) && $4 {
set %djsaat12 $2-4
Msg # %djsaat12 Radyo Departmanında Ekibimize
Msg # Dj Olarak Eklenmiş ve 06:00 & 08:00 Saatleri Arasında Radyomuzda Yayın Yapacaktır.
Msg # %djsaat12 Radyo Departmanında Yönetimi Olarak İyi Yayınlar ve Başarılar Dileriz.
}
}

Goemon
07 Mart 2015, 21:18
@TurkTC buyur Buda İkinci İsteğin.


on ^*:text:*:#radyoyönetim: {
if ($regex($1,/((!|\.)yayınlist)/i)) {
if $nick isop #radyoYonetim || $nick isop #dj || $nick isop #istek {
Msg # Radyo Babam ~ Yayinci DJ Saatleri Tarafınıza Gönderildi..
Msg # 11,10 Radyo BabamFM 15,10 Yayinci DJ Saatleri ~
Msg # 14,1Saat15=>4 08:00 - 10:00 14Dj 4 %djsaat1 3~ 
Msg # 14,1Saat15=>4 10:00 - 12:00 14Dj 4 %djsaat2 3~ 
Msg # 14,1Saat15=>4 12:00 - 14:00 14Dj 4 %djsaat3 3~ 
Msg # 14,1Saat15=>4 14:00 - 16:00 14Dj 4 %djsaat4 3~ 
Msg # 14,1Saat15=>4 16:00 - 18:00 14Dj 4 %djsaat5 3~ 
Msg # 14,1Saat15=>4 18:00 - 20:00 14Dj 4 %djsaat6 3~ 
Msg # 14,1Saat15=>4 20:00 - 22:00 14Dj 4 %djsaat7 3~ 
Msg # 14,1Saat15=>4 22:00 - 24:00 14Dj 4 %djsaat8 3~ 
Msg # 14,1Saat15=>4 24:00 - 02:00 14Dj 4 %djsaat9 3~ 
Msg # 14,1Saat15=>4 02:00 - 04:00 14Dj 4 %djsaat10 3~ 
Msg # 14,1Saat15=>4 04:00 - 06:00 14Dj 4 %djsaat11 3~ 
Msg # 14,1Saat15=>4 06:00 - 08:00 14Dj 4 %djsaat12 3~ 
Msg # 11,10 Radyo BabamFM 15,10Yayin Saatleri Bilgilendirme Sonu ~
}
else {
Notice $nick 5 $nick 12Kanal operatörü değilsiniz..
}
}
}

on *:text:*:#radyoyönetim:{
if $regex($strip($1),/^([!\.]djsaat1)$/i) && $2- {
set %djsaat1 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat1 4Radyo BabamFM 2 08:00 4&2 10:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
if $regex($strip($1),/^([!\.]djsaat2)$/i) && $2- {
set %djsaat2 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat2 4Radyo BabamFM 2 10:00 4&2 12:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
if $regex($strip($1),/^([!\.]djsaat3)$/i) && $2- {
set %djsaat3 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat3 4Radyo BabamFM 2 12:00 4&2 14:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
if $regex($strip($1),/^([!\.]djsaat4)$/i) && $2- {
set %djsaat4 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat4 4Radyo BabamFM 2 14:00 4&2 16:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
if $regex($strip($1),/^([!\.]djsaat5)$/i) && $2- {
set %djsaat5 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat5 4Radyo BabamFM 2 16:00 4&2 18:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
if $regex($strip($1),/^([!\.]djsaat6)$/i) && $2- {
set %djsaat6 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat6 4Radyo BabamFM 2 18:00 4&2 20:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
if $regex($strip($1),/^([!\.]djsaat7)$/i) && $2- {
set %djsaat7 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat7 4Radyo BabamFM 2 20:00 4&2 22:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
if $regex($strip($1),/^([!\.]djsaat8)$/i) && $2- {
set %djsaat8 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat8 4Radyo BabamFM 2 22:00 4&2 24:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
if $regex($strip($1),/^([!\.]djsaat9)$/i) && $2- {
set %djsaat9 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat9 4Radyo BabamFM 2 24:00 4&2 02:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
if $regex($strip($1),/^([!\.]djsaat10)$/i) && $2- {
set %djsaat10 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat10 4Radyo BabamFM 2 02:00 4&2 04:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
if $regex($strip($1),/^([!\.]djsaat11)$/i) && $2- {
set %djsaat11 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat11 4Radyo BabamFM 2 04:00 4&2 06:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
if $regex($strip($1),/^([!\.]djsaat12)$/i) && $2- {
set %djsaat12 $replace($2-,$chr(32),$+($chr(44),$chr(32)))
Msg # %djsaat12 4Radyo BabamFM 2 06:00 4&2 08:00 4Saatleri Arasında Radyomuzda Yayın Yapacaklar.
}
}

Goemon
06 Mayıs 2015, 22:56
İlk Postda Düzenleme Yapılıp ve Yeni Bir Kaç tane Kodda eklenilmiştir

Eklenilen Bilgiler

!sıradaki
!isteklist
!sıfırla Gibi Kodlar

No_FeaR
07 Mayıs 2015, 21:33
Ellerine Sağlık, Mükemmel Anlatım İçin.. : ) ^^