Alarm program in Hi Soft basic

[alphagemini]

I need code in Hi Soft basic for an alarm program,to warn me of time
sensitive actions. Anyone help?

[Leffmann]

Like this:

timer on
on timer(60) gosub checktime
...


checktime:
if left$(time$, 5) = "11:55" then print "put the kettle on"
return

[alphagemini]

Thanks for the code. I need to enter the time on screen, so this is too simple!

[Leffmann]

Sorry I haven't got a complete alarm clock program for you, but you can f.ex do this to enter time in HH:MM format:

input "set alarm: ", t$

and then under checktime you replace the "11:55" with t$ to make it respond on the time you entered. The HiSoft Basic manual will have everything you need to turn it into a complete program.

[alphagemini]

Thanks for the help

[alphagemini]

Thanks for the help. I have written the following:

input "set alarm ",t$
TIMER ON
ON TIMER(1) GOSUB checktime
checktime:
IF LEFT$(TIME$,6) = t$ then sound 300,3,255,2

Is this OK?

[Leffmann]

Your program continues as normal after you've started the timer, so unless there's anything else that needs to be done then you'd have to write it like this:

input "set alarm: ", t$
timer on
on timer(1) gosub checktime
do
 sleep
loop

checktime:
if left$(time$, 5) = t$ then sound 300, 3, 255, 2
return

and you have to include leading zeroes in the time, e.g. 6:55 has to be entered as 06:55.