If KeyDown(Key_A) And Player\XSpeed < Player\MaxSpeed Then Player\XSpeed = Player\XSpeed - 0.01
If KeyDown(Key_D) And Player\XSpeed > -Player\MaxSpeed Then Player\XSpeed = Player\XSpeed + 0.01
поменяй на
If KeyDown(Key_A) And Player\XSpeed < Player\MaxSpeed Then Player\XSpeed = Player\XSpeed + 0.01
If KeyDown(Key_D) And Player\XSpeed > -Player\MaxSpeed Then Player\XSpeed = Player\XSpeed - 0.01
ps. чисто визуальный анализ кода, нифига ты аналогично не написал