if !$nick(#,$nick,oh) { msg # $nick kanalda yetkili degilsiniz. | return }
    Msg $chan 4,4 0,1 Radyo Yayin Saatleri 4,4 
    while $token(%saatler,%x,32) { var %v1 $v1, %v2 %djsaat [ $+ [ %x ] ], %saat $iif(%v1 == joker,Joker Yayincilar,$regsubex(%v1,/(\w+)/g,\t $+ :00 )) || $iif($v1 == EKJoker,Joker Yayincilar,$regsubex(%v1,/(\w+)/g,\t $+ :00 ))
      Msg $chan 4Saat - 10 %saat 4- 2Dj 4~12 $iif(%v2,$v1,Bulunmuyor)  4~
      inc %x
    }