Brightsign Object Reference Manual (FW 5.1) User Manual Page 319

  • Download
  • Add to my manuals
  • Print
  • Page
    / 341
  • Table of contents
  • BOOKMARKS
  • Rated. / 5. Based on customer reviews
Page view 318
311
print "Another event arrived: "; type(ev)
end if
end while
End Sub
Example: This code creates a timer that triggers every minute using wildcards in the timer spec.
st=CreateObject("roSystemTime")
timer=CreateObject("roTimer")
mp=CreateObject("roMessagePort")
timer.SetPort(mp)
timer.SetDate(-1, -1, -1)
timer.SetTime(-1, -1, 0, 0)
timer.Start()
while true
ev = Wait(0, mp)
if (type(ev) = "roTimerEvent") then
print "timer event received"
else
print "unexpected event received"
endif
endwhile
Page view 318
1 2 ... 314 315 316 317 318 319 320 321 322 323 324 ... 340 341

Comments to this Manuals

No comments