"XA="?A:"YA="?B
Lb1 0:"JULI="?C:"FWJ="?D
Cos(D)C+A→X
Sin(D)C+B→Y
"X=":X◢
"Y=":Y◢
这是个坐标正算程序吧!我改了一下,你输一下试试,不能用再问我
你这个程序应该是能运行的。不过不是很完整。
Deg
"XA"?A:"YA"?B
Lb1 0:"JULI"?C:"FWJ"?D
Cos(D)XC+A→X
Sin(D)XC+B→Y
"XB=":X◢
"YB=":Y◢
Goto 0
"XA="?A:"YA="?B
Lb1 0:"JULI="?C:"FWJ="?D
Cos(D)C+A→X
Sin(D)C+B→Y
"X=":X◢
"Y=":Y◢