AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Kürzester rotationsweg bei einem Kreis?

Ein Thema von Memnarch · begonnen am 30. Dez 2012 · letzter Beitrag vom 30. Dez 2012
Antwort Antwort
Seite 1 von 2  1 2      
Benutzerbild von Memnarch
Memnarch

Registriert seit: 24. Sep 2010
737 Beiträge
 
#1

Kürzester rotationsweg bei einem Kreis?

  Alt 30. Dez 2012, 16:56
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:

LClockDistance := Abs((360-FRotation) - Integer(FRotationGoal)); Nur die umstellung auf ConterClock habe ich noch nicht hinbekommen. Sicherlich malwieder nen brett vorm kopf

Kann mir da jemand helfen?

MFG
Memnarch
Da man Trunc nicht auf einen Integer anwenden kann, muss dieser zuerst in eine Float kopiert werden
  Mit Zitat antworten Zitat
Popov
(Gast)

n/a Beiträge
 
#2

AW: Kürzester rotationsweg bei einem Kreis?

  Alt 30. Dez 2012, 17:04
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?
  Mit Zitat antworten Zitat
Benutzerbild von Aphton
Aphton

Registriert seit: 31. Mai 2009
1.198 Beiträge
 
Turbo Delphi für Win32
 
#3

AW: Kürzester rotationsweg bei einem Kreis?

  Alt 30. Dez 2012, 17:06
Edit- mom
das Erkennen beginnt, wenn der Erkennende vom zu Erkennenden Abstand nimmt
MfG

Geändert von Aphton (30. Dez 2012 um 17:10 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Memnarch
Memnarch

Registriert seit: 24. Sep 2010
737 Beiträge
 
#4

AW: Kürzester rotationsweg bei einem Kreis?

  Alt 30. Dez 2012, 17:13
@Popov: egal wie, was dir gerade weniger arbeit macht
Da man Trunc nicht auf einen Integer anwenden kann, muss dieser zuerst in eine Float kopiert werden
  Mit Zitat antworten Zitat
Lemmy

Registriert seit: 8. Jun 2002
Ort: Berglen
2.380 Beiträge
 
Delphi 10.3 Rio
 
#5

AW: Kürzester rotationsweg bei einem Kreis?

  Alt 30. Dez 2012, 17:14
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
  Mit Zitat antworten Zitat
Benutzerbild von Memnarch
Memnarch

Registriert seit: 24. Sep 2010
737 Beiträge
 
#6

AW: Kürzester rotationsweg bei einem Kreis?

  Alt 30. Dez 2012, 17:20
@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
Da man Trunc nicht auf einen Integer anwenden kann, muss dieser zuerst in eine Float kopiert werden
  Mit Zitat antworten Zitat
Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.768 Beiträge
 
Delphi 10.4 Sydney
 
#7

AW: Kürzester rotationsweg bei einem Kreis?

  Alt 30. Dez 2012, 17:24
Code:
LDistance := 270(goal) - 0(rotation)
if abs(LDistance) > 180 then
  counterClockWiseRotation
else
  clockWiseRotation;
Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat
Benutzerbild von Memnarch
Memnarch

Registriert seit: 24. Sep 2010
737 Beiträge
 
#8

AW: Kürzester rotationsweg bei einem Kreis?

  Alt 30. Dez 2012, 17:36
Auch falsch:

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

2 richtungen, dasselbe ergebnis
Da man Trunc nicht auf einen Integer anwenden kann, muss dieser zuerst in eine Float kopiert werden
  Mit Zitat antworten Zitat
Benutzerbild von Aphton
Aphton

Registriert seit: 31. Mai 2009
1.198 Beiträge
 
Turbo Delphi für Win32
 
#9

AW: Kürzester rotationsweg bei einem Kreis?

  Alt 30. Dez 2012, 17:39
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?
das Erkennen beginnt, wenn der Erkennende vom zu Erkennenden Abstand nimmt
MfG

Geändert von Aphton (30. Dez 2012 um 17:50 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Memnarch
Memnarch

Registriert seit: 24. Sep 2010
737 Beiträge
 
#10

AW: Kürzester rotationsweg bei einem Kreis?

  Alt 30. Dez 2012, 17:46
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
Da man Trunc nicht auf einen Integer anwenden kann, muss dieser zuerst in eine Float kopiert werden
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 15:15 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz