This is not delta timing, this will make your graphics even worse. If you want to fix the framerate, set a fixed refresh rate at the graphics command.
Otherwise, if you want to use DeltaTiming, one of the ways to do it is:
Call DeltaCalculate just after every FLIP command,
And multiply any increment on the X or Y by AlphaTime. If should move things at the same speed independently of the hardware FPS.
Otherwise, if you want to use DeltaTiming, one of the ways to do it is:
Global AlphaTime:double Function DeltaCalculate() Global LastTime:int = Millisecs() Local CurTime:int = Millisec() AlphaTime = (CurTime - LastTime) / 10.0 LastTime = CurTime End Function
Call DeltaCalculate just after every FLIP command,
And multiply any increment on the X or Y by AlphaTime. If should move things at the same speed independently of the hardware FPS.