#gerekli bindler
bind pub - !istek istek
bind evnt - init-server baglan_yap
proc baglan_yap {type} {
global inick ipass
  putserv "OPER $inick $ipass"
  putserv "WALLOPS :Basari ile Login Oldum :)"
}
proc istek {n u h c a} {
  global gnick
 set gnick $n
        set kanal [lindex $a ]
 putserv "PRIVMSG #DJ 4İstek İsteyen Nick 2$gnick4 İsteği:2 $kanal"
    putserv "PRIVMSG #Radyo : 4İsteğiniz Sıraya Alınmıştır 2$gnick Teşekkür Ederiz."
    putserv "PRIVMSG #Diyalog : 4İsteğiniz Sıraya Alınmıştır 2$gnick Teşekkür Ederiz."
}

#gerekli bindler
bind msg - !istek istek
bind evnt - init-server baglan_yap

proc baglan_yap {type} {
global inick ipass
  putserv "OPER $inick $ipass"
  putserv "WALLOPS :Basari ile Login Oldum :)"
}

proc istek {n u h a} {
putserv "PRIVMSG #DJ 4İstek İsteyen Nick 2 $n 4İsteği:2 [lindex $a ]"
putserv "PRIVMSG $n : 4İsteğiniz Sıraya Alınmıştır 2 $n Teşekkür Ederiz."
}