set start_stamp [clock scan "$hour:$min"]
set 1hour_before [expr {$start_stamp - (60 * 60)}]
set 1hour_before_format [clock format $1hour_before -format "%H:%M"]
set 1hour_after [expr {$start_stamp + (60 * 60)}]
set 1hour_after_format [clock format $1hour_after -format "%H:%M"]
Now how do I check if the time (thats in database file) is between $1hour_before_format and $1hour_after_format and only on the current day?
#first get the time from the file and set it to a variable
#then make sure it is in unixformat (like it is returned from the clock scan command
# this is just an example
set time [clock scan "19:20"]
#do the check..
if {$time < $1hour_after && $time > $1hour_before} {
#it is between the vars... do something here
}