Sory ludzie, że zawracam wam głowy, ale OKROPNIE jest mi potrzebny algorytm, który powie mi, jaki kąt zachodzi między dwoma punktami.
function jaki_kat(xp,yp,xk,yk:real):integer;
mam kilka funkcji z tego tematu a tej jednej mi brakuje. Byłoby dobrze, aby zwracana wartośc była w dziesiętnych cześciach stopnia i CAŁKOWITOLICZBOWA.
Z góry dziękuję wszystkim guru za pomoc ;)
Przybliż troche temat bo nie bardzo widze możliwośc mierzenia kąta pomiędzy dwoma punktami - trzema to co innego... :d ;)
Odpowiedź dość typowa dla mnie :]
Jest to w PilotMP3 w pliku Cocpit.pas w źródłach. Link w stopce.
chyba Ci chodzi o kąt nachylenia prostej przechodzącej przez te punkty, a nie o kąt między nimi :/
function jaki_kat(xp,yp,xk,yk:real):integer;
begin
result:=Round(RadToDeg(arctg((yp-yk)/(xp-xk))));
end;
chyba dobrze ale glowy nie dam czy to dziala i czy w ogóle o to Ci chodzi
P.S Adam ... czego Ty tam jeszcze nie masz w tym pilocie :> :]