I just want at timer :(

isis123 · Post by **isis123** » Thu Sep 01, 2005 12:09 am

Hi, all I want is a simple timer which puts a message in a channel every 2 minutes.
So the channel should be #jonathan
the message should be "hello"
and every 2 minutes.

Can someone help me? thank you

demond · Post by **demond** » Thu Sep 01, 2005 12:58 am

read tcl-commands.doc, pay attention to [timer] and [putserv]

isis123 · Post by **isis123** » Thu Sep 01, 2005 1:01 am

ok i made one but it doesnt work. whats wrong?

Code: Select all

set channel "#omfgnaps #spielersuche"

set time 3
set text {
"hi"
}



if {[string compare [string index $time 0] "!"] == 0} { set timer [string range $time 1 end] } { set timer [expr $time * 60] }
if {[lsearch -glob [utimers] "* go *"] == -1} { utimer $timer go }

proc go {} {
global channel time text timer
foreach chan $channel {
foreach line $text { putserv "PRIVMSG $chan :$line" }
}
if {[lsearch -glob [utimers] "* go *"] == -1} { utimer $timer go }
}

putlog

demond · Post by **demond** » Thu Sep 01, 2005 1:34 am

you need to learn how to post by reading the top sticky post on this forum

try again after removing [lsearch] checks

isis123 · Post by **isis123** » Thu Sep 01, 2005 1:48 am

thanks.

demond · Post by **demond** » Thu Sep 01, 2005 2:00 am

heh, you made me drop my real insult too

isis123 · Post by **isis123** » Thu Sep 01, 2005 2:05 am

i missunderstood you, i thought you called me names, sorrsy.