;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;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.. }
  }
}

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;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(.))
  }
}

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;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(.))
  }
}

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;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

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;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,1http:// $+ %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 $+ http:// $+ %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 $+ http:// $+ %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
        }
      }
    }
  }
}

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;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 $+ http:// $+ %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. 
    }
  }
}

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;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 http:// $+ %ipport3 $+ : $+ %ipport1 $+ /listen.pls
    msg $chan 
    msg $chan 8,1Radyomuzu 11Winamp7'tan 8,1Dinlemek İçin Tıklayın 13»0,1 http:// $+ %ipport3 $+ : $+ %ipport1 $+ /listen.pls
  }
}

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;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ı..
  }
}

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)
    }
  }
}

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 "www.Goemon.com", 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)
    }
  }
}

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ı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 bizleri4http:// $+ %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."
  }
}

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. 
    }
  }
}

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***
  }
}

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
  }
}

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. 
    }
  }
}

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.
  }
}