#Konusma icin zaman sureci (Dk cinsinden)

set zaman_araligi "15"





#Uygulamanin calismasi icin

#botun oper login ve nick login paslari



#oper login

set o_login "eggdrop"

set o_pass "OperPASS"



#Nick identify sifresi

set b_ipass "NickPASS"





#bind

bind evnt - init-server baglanti:ayari



#mesajlar

set global_msg {

  "^C15,1 RaDYoMuZu DiNLeMeK iÇiN ^C0,3 « http://xxxxxxxx/listen.pls  »^C3,1LiNKiNi TıKLaYıNıZ. "

}



if {![string match "*konusma_zamani*" [timers]]} {

 timer $zaman_araligi konusma_zamani

}





proc konusma_zamani {} {
global global_msg zaman_araligi

   set global_rmsg [lindex $global_msg [rand [llength $global_msg]]]

   putserv "OS GLOBAL $global_rmsg"

   timer $zaman_araligi konusma_zamani

   return 1

 }

proc baglanti:ayari {type} {

  putserv "NICKSERV IDENTIFY $b_ipass

  putserv "OPER $o_login $o_pass"

  putserv "WALLOPS :Global mesaj sistemi aktif!"

}
putlog "Global mesaj atma sistemi yuklendi"

putlog "Bot OPER ve Global kullanma izni olmadigi surece"

putlog "Calismayacaktir!"

putlog "mail: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"