Animation Loops outside the Gameloop

[seraphelic]

Wondering if anyone uses loop timers outside the gameloop.

Just an idea, for example:

Code:

Sub BltSomething(ByVal Something As Long)

    Dim x As Long
    x = 0

    Do While x  -1
        If GetTickCount > SomethingTimer + 125 Then
            If x  4 Then
                SomethingTimer = GetTickCount
                Call BltSomething
                x = x + 1
            Else
                x = -1
            End If

    DoEvents

    Loop

End Sub

Then just have a BltSomething packet. Im runnin out the door but thought Id ask instead of testing, plus I like the constructive comments.