Showing Framerate with DrawText()?

Graphics 640, 480,0

Local FPS_Counter:Int
Local FPS_Counter_Time:Int
Local FPS:Int





While Not KeyDown(KEY_ESCAPE)
FPS_Counter = FPS_Counter + 1

If FPS_Counter_time+1000 =< MilliSecs()
	FPS=FPS_Counter' <- Frames/Sec
	FPS_Counter=0
	FPS_Counter_time=MilliSecs()
EndIf
DrawText "Current FPS: " + FPS , 20 , 20
Flip
Cls

Wend
End