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