Kürzester rotationsweg bei einem Kreis?

[Memnarch]

Tag allerseits. Ich stecke gerade an folgendem fest:

Sagen wir mal ich habe einen kreisrunden Drehtisch.

Den Drehe ich jetzt in irgendeine Richtung und habe die rotation x Grad. Jetzt will ich den Drehtisch auf eine andere position drehen, und möchte wissen ob es kürzer ist links oder rechtsherum zu drehen.

Wie stell ich das richtig an? Der rotationswert selbst ist immer 0-359, also durchweg positiv.

Ich habe immer den aktuellen rotationswert gegeben und den, zu dem ich hinwill. Und irgendwo habe ich mich da ziemlich verhaspelt, weil es spätestens beim switch von 0 Grad auf 345 Grad, den langen weg über die 345 geht anstatt den kurzen über 15 grad. Meine kalkulation ist da also irgendwo im eimer.

Speziel benötigt wird das in meinem EMulator, in dem ich gerade ein Vectordisplay implementiere, so wie hier beschrieben:
http://dcpu.com/3d-vector-display/

Klappt auch alles wunderbar, nur das mit der rotation funktioniert noch nicht wie gewollt.

Die Drehung in die eine richtung sieht meine Formel so aus:

Delphi-Quellcode:

LClockDistance := Abs((360-FRotation) - Integer(FRotationGoal));

Nur die umstellung auf ConterClock habe ich noch nicht hinbekommen. Sicherlich malwieder nen brett vorm kopf :evil:

Kann mir da jemand helfen?

MFG
Memnarch

[Popov]

Kreisrunder Drehtisch hört sich beinahe so an wie das Eckhaus an der Ecke.

Willst du das als eine Formel haben oder geht das auch als Funktion?

[Aphton]

Edit- mom

[Memnarch]

@Popov: egal wie, was dir gerade weniger arbeit macht ;)

[Lemmy]

Hi,

so was bekommst Du grundsätzlich immer so raus, dass Du "Nach"-"Von" rechnest, also

Code:

  LClockDistance := FRotationGoal - FRotation;

ist LClockDistance dann negativ gehts eben gegen den Uhrzeigersinn....

GRüße

[Memnarch]

@Lemmi: hehehe NÖ^^

mal ne beispiel:

LDistance := 270(goal) - 0(rotation)

LDistance := 90(goal) - 0(rotation)

Beidemale ein positives ergebnis obwol bei erstere die andere drehrichtung kürzer wäre. SO sahe s am anfang bei mir aus ;)

[Klaus01]

Code:

LDistance := 270(goal) - 0(rotation)
if abs(LDistance) >  180 then
  counterClockWiseRotation
else
  clockWiseRotation;

Grüße
Klaus

[Memnarch]

Auch falsch:

Abs(75(goal) - 90(rotation)) = 15
Abs(105(goal) - 90(rotation)= 15

2 richtungen, dasselbe ergebnis

[Aphton]

Delphi-Quellcode:

function getShortestRotation(const AngleA, AngleB: Integer): Integer;
var
  Small, Big: PInteger;
begin // Parameter in [0..360]
  if AngleA < AngleB then
  begin
    Small := @AngleA;
    Big := @AngleB;
  end else
  if AngleA > AngleB then
  begin
    Small := @AngleB;
    Big := @AngleA;
  end else
    Exit(0); // = (Result = 0; Exit)
  Result := (360-Big^) + Small^;
  if Result > Big^ - Small^ then
    Result := (Big^ - Small^);
  if (AngleA + Result) mod 360 <> AngleB then
    Result := -Result;
end;

Edit1: Ungetestet, bin ingame, aber so ca. sollte das klappen
Edit2: Getestet, scheint zu klappen! Ist es das, was du brauchst?

[Memnarch]

schaut interressant aus. 2 fragen aber bleiben noch:
1: konnte man nicht anstatt pointer direct integer verwenden?
2: Welcher rückgabetyp(schätze mal auf Integer)?^^

edit zu 2: ah warst schneller