55.6 frames per second

[bplus]

Every time you press a key the LPS = Loops Per Second is reduced by .5 there might be a Goldilocks LPS between 80 and 60 better chance between 80 and 30?

Code: (Select All)

_Title "Framerate check"
Screen _NewImage(640, 480, 32)
Color &HFFFFFFFF, _RGB32(28, 28, 22)
X = 1
lps = 80
While _KeyDown(27) = 0
    Do
        Cls
        If Len(InKey$) Then lps = lps - .5
        Print "LPS:"; lps
        Locate 10, X: Print "X"
        Locate 11, 40: Print "^"
        _Display
        _Limit lps
        X = X + 1
        If X > 80 Then X = 1
    Loop Until _KeyHit = 27
Wend