Ich versuchs mal, obwohl Wochenende ist
Christian:
winkel := frac(0.5 * winkel / pi)*2*Pi;
oder
winkel := frac(winkel / (2*pi))*2*Pi;
AXMD:
while winkel > 2 * Pi do
winkel := winkel - 2 * Pi;
Jasoculs Erläuterungen (Achtung! Das ist kein Beweis!):
Du willst immer 2*Pi abziehen bis der winkel < 2*Pi ist.
Wenn du das oft genug machst, nämlich solange, wie es erfoderlich ist, kommst du zwangsläufig auf:
winkel/(2*Pi). Das kannst du mal per Hand prüfen. Taschenrechner sei erlaubt.
Da dich für deine Funktion aber der "Modulo-Rest" interessiert, musst du den Dezimal-Rest mit 2*Pi wieder multiplizieren.
Ich hoffe, dass das nachvollziehbar ist.
Bin noch nicht vollständig von gestern erholt.
EDIT:
Theoretisch müsste ein ähnliches Verfahren auch funktionieren, wenn du den eigegebenen Winkel vorher durch 360 dividierst.