Auto Rehash

[ORATEGOD]

Code: Select all

proc rehash { } {
	global chanlist

	foreach channel [array names chanlist] { 
	putquick "PRIVMSG $channel :Ejecutando Rehash Automatico" 
	}

	rehash 
}
settimer rehash 3600 rehash

I found this TCL but I can't get it to work, I hope someone can help me.


Thank you so much !

[SpiKe^^]

My first thought is that you are replacing the built in Eggdrop rehash command with one of your own that no longer rehashes the bot at all:)

...and settimer is not an eggdrop tcl command I'm aware of.

[Fire-Fox]

I thing you neeed

Code: Select all

utimer

Code: Select all

utimer <seconds> <tcl-command> [count [timerName]]
Description: executes the given Tcl command after a certain number of seconds have passed. If count is specified, the command will be executed count times with the given interval in between. If you specify a count of 0, the utimer will repeat until it’s removed with killutimer or until the bot is restarted. If timerName is specified, it will become the unique identifier for the timer. If timerName is not specified, Eggdrop will assign a timerName in the format of “timer<integer>”.

Returns: a timerName

Module: core

[CrazyCat]

Don't touch the rehash native function, bind the pre-rehash

Code: Select all

bind evnt - prerehash nrehash
proc nrehash {type} {
   foreach channel [array names chanlist] {
      putquick "PRIVMSG $channel :Ejecutando Rehash Automatico"
   }
}
utimer 3600 rehash 0