Code:
proc join:greet {nick uhost hand chan} {
global agrflood
if {[channel get $chan greet] && [botisop $chan]} {
if {[info exists agrflood($nick:$chan)]} {
return 0
}
set greet [::stats::channel -get $chan greet]
set agrflood($nick:$chan) 1
timer 2[list unset agrflood($nick:$chan)]
putserv "NOTICE $nick :[subst [greet:parse $greet]]"
}
}
Thanks for the help.. its now working