OpenEuphoria

Re: Timers

• Posted by "Brian K. Broker" <bkb at CNW.COM> Apr 06, 2000
• 404 views

----- Original Message -----
From: "Kondor Attila"
Sent: Thursday, April 06, 2000 2:37 AM
Subject: Timers

> How can I use more independent timer (6..8) simultaneuosly?
> The setTimer(window,timer,ticks) is ok, but how can I make an event if
timer
> ellapses? Please do an  example with 2..3 timers.

-----------------------------------------------------------
-- this is what your timer routine might look like
procedure onTimer_Win( integer timerID )

  if timerID = 1 then
    -- do something every half second
  end if

  if timerID = 2 then
    -- do something every second
  end if

  if timerID = 3 then
    -- do something every 1.5 seconds
  end if

end procedure
onTimer[Win] = routine_id( "onTimer_Win" )
-----------------------------------------------------------
-- somewhere in your program
setTimer( Win, 1, 500 )
setTimer( Win, 2, 1000 )
setTimer( Win, 3, 1500 )

-- that's it...
-- Brian