NewsForumsCodeLogsGallerySpecsSearch

Code archives/BlitzPlus Gui/WaitTimer(timername)

This code has been declared by its author to be Public Domain code.

Download source code

WaitTimer(timername) by Reaper2003
Just found a major drawback with this function - It will work fine if you aren`t scanning for any events but if you are then any events that occur while the program is away in the waittimer function will be lost :/ .Works fine if you are just trying to get backward compatibility though. 
Function WaitTimer(timer$)
	Repeat
	Select WaitEvent()
	Case $803 : End
	Case $4001 
		Select EventSource()
		Case timer$
			Return
		End Select
	End Select
	Forever
End Function

Comments

None.

Code Archives Forum