mam oto taka procedurke na poruszanie sie w swiecie 3d do przodu i bez wzgledu pod jakim katem patrze (cos jak spect)

procedure move_przod; we go forward
begin
if (heading = -90) or (heading = 90) then
begin
if heading = -90 then safe forward
y := y - movespeed else
y := y + movespeed;
end else
begin
x := x - movespeed
sin(glop
pi/180);
z := z + movespeedcos(gloppi/180);
y := y + movespeedsin(headingpi/180);
end;
end;

teraz moj problem: jak zwieksze lub zmniejsze kat nachylenia to mi punkt widzenia przemieszcza sie raz to szybciej a raz wolniej

czy moze ktows wie jak temu zapobiec?