########################################### 
#Global uygulamasinin yapilabilecegi kanal 
########################################### 
set tg_chan "#opers" 

########################################### 
#Uygulamanin calismasi icin botun oper login ve nick login paslari 
########################################### 


set o_login "global" 

set o_pass "123globalbot" 

set b_ipass "123456" 


########################################### 
#Gerekli uygulamalar 
########################################### 

bind pub - !global global:msg 
bind evnt - init-server baglanti:ayari 


########################################### 
#Buraya DOKUNMAYIN! (siz bilirsiniz) :) 
########################################### 
proc global:msg {n u h c a} { 
  set tg_msg [lindex $a ] 
  if {[isop $n $tg_chan]==1} { 
     putserv "NOTICE $* \02<$n>\02 $tg_msg" 
 } 
  if {[isop $n $tg_chan]==0} { 
    putserv "SAMODE $c +b $n" 
    purserv "KICK $c $n Bu komudu kullanmaya Yetkili degilsiniz!" 
  } 

} 

proc baglanti:ayari {type} { 
  putserv "NICKSERV IDENTIFY $b_ipass 
  putserv "OPER $o_login $o_pass" 
  putserv "WALLOPS :Helper Global mesaj sistemi aktif!" 
} 

putlog "Global mesaj atma sistemi yuklendi" 
putlog "Bot OPER ve Global kullanma izni olmadigi surece" 
putlog "Calismayacaktir!" 
putlog "!helpglobal globalmesajiniz seklinde calismatadir"