坐標變換

坐標變換

程式更新日期: 2010年7月22日

程式一參考了網友 roviury 的修改建議。

程式一(23 bytes，使用記憶為X, Y及A)

?→X: ?→Y: ?→A: Rec( Pol( X , Y, Y+A◢ Y

程式二由Webcal論壇網友提供。

程式二需要在 CMPLX 模式下執行，因此在選擇新程式位置後，按 2 選用CMPLX模式。

程式二(18 bytes，使用記憶為X, Y及A)

?→A: ?→B: Abs(A)∠(B+arg(A►a+bi

例題: 求點 (4, 3)繞原點逆時針方向旋轉90^o的坐標。

注意: 這個例題要在DEG Mode 之下執行。

程式一按法

按 Prog 1 再按 4 EXE 3 EXE 90 EXE (逆時針取正值輸入，顯示x坐標為 -3) EXE (顯示y坐標為4)

程式二按法

按 Prog 1 再按 4 + 3i EXE 90 EXE (逆時針取正值輸入，顯示x坐標為 -3) Shift Re<=>Im EXE (顯示4i即y坐標為4)

注意: 本程式取逆時針旋轉為正值，順時針旋轉為負值。若果希望是順時針取正，逆時針為負，程式一中的 Rec( X, Y+A可改為 Rec( X, Y-A，而程式二中的 B+arg(A 可改為 - B+arg(A即可。