while 1
If @error = 1 Then
Exit
Else
WinSetOnTop("0", "", True)
$zahl1 = InputBox ("180 Grad","Aktueller Winkel? Es erfolgt eine Drehung um 180 Grad")
Endif
If @error = 1 Then
Exit
Else
$zahl2 = 180 
Endif
If @error = 1 Then
Exit
Else
InputBox ("180 Grad", "Kopie in Zwischenablage!",$zahl1 - $zahl2 ) ;Ausgabe des Ergebnisses
Endif
If @error = 1 Then
Exit
Else
ClipPut  ($zahl1 - $zahl2) ; Kopie in Zwischenablage
Endif
Wend