This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.
For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.
Help for those learning Tcl or writing their own scripts.
-
ranny
- Halfop
- Posts: 49
- Joined: Wed Jun 22, 2005 2:00 pm
- Location: switzerland
Post
by ranny »
Hello,
I want to send a message in a channel all 4 hours.
I have this code
Code: Select all
bind time - "00 00 *" myproc
bind time - "00 04 *" myproc
bind time - "00 08 *" myproc
bind time - "00 12 *" myproc
bind time - "00 16 *" myproc
bind time - "00 20 *" myproc
There's a more simple solution, shorter
thx
-
]Kami[
- Owner
- Posts: 590
- Joined: Thu Jul 24, 2003 2:59 pm
- Location: Slovenia
-
Contact:
Post
by ]Kami[ »
timer ?
-
De Kus
- Revered One
- Posts: 1361
- Joined: Sun Dec 15, 2002 11:41 am
- Location: Germany
Post
by De Kus »
You probably mean something like that?! Use your brain, all your hours have a remainder of 0 if you divide them by 4
.
Code: Select all
bind time - "00 *" myproc
proc myproc {min h d m y} {
if {[expr {$h % 4}] == 0} {
...
}
}
De Kus
StarZ|De_Kus, De_Kus or DeKus on IRC
Copyright © 2005-2009 by De Kus - published under
The MIT License
Love hurts, love strengthens...
-
ranny
- Halfop
- Posts: 49
- Joined: Wed Jun 22, 2005 2:00 pm
- Location: switzerland
Post
by ranny »
De Kus wrote:You probably mean something like that?! Use your brain, all your hours have a remainder of 0 if you divide them by 4
.
Code: Select all
bind time - "00 *" myproc
proc myproc {min h d m y} {
if {[expr {$h % 4}] == 0} {
...
}
}
Yes,thx De Kus.
I use my brain and i see your error
The good code is
Code: Select all
if {[expr {[string trimleft $h 0] % 4}] == 0} {
...
}
thx
-
Sir_Fz
- Revered One
- Posts: 3794
- Joined: Sun Apr 27, 2003 3:10 pm
- Location: Lebanon
-
Contact:
Post
by Sir_Fz »
No need to trim and no need to use expr inside the if statement.
.tcl if {04%4 == 0} { putlog yes }
[23:50] yes