Global delta#
Global render_time
Global FPS#=30
Global TimePerFrame#= (1000.0 / FPS#)
;multiply all time based variables by delta#
;such as speed .... speed = distance * time
Function CalcTimer()
ms_passed#=MilliSecs()-render_time
render_time=MilliSecs()
delta#=(delta#*4.0 + Float(ms_passed#/ TimePerFrame#))/5.0
If delta# >2 Then delta#=2
End Function
Global render_time
Global FPS#=30
Global TimePerFrame#= (1000.0 / FPS#)
;multiply all time based variables by delta#
;such as speed .... speed = distance * time
Function CalcTimer()
ms_passed#=MilliSecs()-render_time
render_time=MilliSecs()
delta#=(delta#*4.0 + Float(ms_passed#/ TimePerFrame#))/5.0
If delta# >2 Then delta#=2
End Function