Speedhack

I've been trying to program a decent speed hack checker and finaly, I think I got it. This is how a part of it looks:
Code:
If Timer < Player(index).Char(Player(index).CharNum).SpeedHackCheck + 0.1 Then Call AlertMsg(index, "You are using a Speedhack. Go to the forum for more information.") Exit SubEnd If


Basicly, the speed hack will check for a increased speed in the movement of the player. So if his running just a little bit faster, he will get disconnected. I'm pretty sure this should take most of the speedhacks away. But I'm also going to add one more thing that will help a lot too.