# rehash.tcl IUC 2025 

#Bu script eggdrop'a otomatik rehash atttırır

#Böylece bota devamlı REHASH komutunu yollamak zorunda kalmassnız 

 
####################################################

# Bota Kaç dakikada bir rehash atması gerekir yaz  #

####################################################

 
set timerehash_setting(timer) "60"

 
####################

# Kod Başlıyor     #

####################

 
if {![string match 1.6.* $version]} { putlog "\002ZAMANLIREHASH:\002 \002UYARI:\002 Bu script eggdrop 1.6.x yada daha üst versiyonlarını destekler." }

if {[info tclversion] < 8.2} { putlog "\002ZAMANLIREHASH:\002 \002UYARI:\002Bu script Tcl Versiyon 8.2 yada daha üst versiyonlara ihtiyaç duyar.." }

 
if {$timerehash_setting(timer) > 0 && [lsearch -glob [timers] "* timerehash_rehash *"] == -1} { timer $timerehash_setting(timer) timerehash_rehash }

 
proc timerehash_rehash {} {

    global timerehash_setting

    rehash

    if {[lsearch -glob [timers] "* timerehash_rehash *"] == -1} { timer $timerehash_setting(timer) timerehash_rehash }

}

 
putlog "\002ZAMANLIREHASH:\002 zamanlıRehash.tcl Yüklendi"