script sends to the channel a command

[st33l]

I need script which in 00:00 hours will send a command !off to the channel, and at 10:00 will send a command !on.
10x

[Sir_Fz]

Code: Select all

set commandchan "#channel"
bind time - * send:command

proc send:command {min hour args} {
 if {$min == 00 && $hour == 10} {
  puthelp "PRIVMSG $::commandchan :!on"
 } elseif {$min == 00 && $hour == 00} {
  puthelp "PRIVMSG $::commandchan :!off"
 }
}