set sahip Rvg 
set sahip2 Ravage 
set sahip3 IRCMerkez 

bind join - * karsilama 
proc karsilama { nick uhost hand chan } { 
  global sahip sahip2 sahip3 
  if {$nick==$sahip} {  
     putserv "PRIVMSG $nick :Hosgeldiniz."  

  } elseif {$nick==$sahip2} {  
    putserv "PRIVMSG $nick :Niye Geldin ? :-)"  

  } elseif {$nick==$sahip3} {  
    putserv "PRIVMSG $nick :Gözlerimiz Yollarda kaldı.. .)"  

  ;bu mesaj listede ismi olamayn kullanicilara gonderilecektir.. 
  } else { 
    putserv "PRIVMSG $nick :$nick Hosgeldiniz. Keyifli sohbetler." 
  } 

}