Finding the Reference Angle with a TI-84 Plus CE

People disliking are probably beyond stupid. This program delivers as advertised. If you can't handle it, maybe try something simpler than 8th-grade math.
-----------------------------
ClrHome
Input "θ=",θ
remainder(θ,360)→ θ
If remainder(iPart(θ/90),2)=1
Then:Disp 90-fPart(θ/90)90
Else:Disp fPart(θ/90)90
End