mouselook troubles

ok, heres the problem

;mouselook------------
PositionEntity pivot,EntityX(pivot),y#,EntityZ(pivot) 
RotateEntity pivot, EntityPitch(pivot) + MouseYSpeed   
()/2, EntityYaw(pivot) - MouseXSpeed(), 0
 MoveMouse GraphicsWidth()/2,GraphicsHeight()/2
;---------------------

when i use this code along with moving forward
i move up (my Y increases)..
how do i stop that??

and yes i have gravity set

;gravity ------------------
 If Not EntityCollided(pivot,SCENERY)
    TranslateEntity pivot,0,-0.2,0
 End If
 ;-----------------------------------