Vector speed;
here you go

if(key_s)
my.pan+=1;

if(key_a)
my.pan-=1;

if(key_w)
{
speed.x = 10; speed.y = 0; speed.z = 0;
vec_rotate(speed,my.pan);
phent_addvelcentral(my,speed);

}