卡西欧5800曲线要素程序

本资料包含doc文件1个，下载需要10积分

主程序[SENDY-YS]
Lbl 1:Fix 3:X1”C:Y1”D:X2”O:Y2”F:X3”G:Y3”H: R:LS”L:JDK”K
C-O→I:D-F→J: ProgC”:J→N:G-O→I:H-F→J:ProgC”:J→Q:N-Q→A:A＜0＞A360→A:If A＜180:Then 180-A→A:AR”:A→DMS◢
Else A-180→A:AL”:A→DMS◢
IfEnd:L2÷(24R→B:L÷2-L＾(3)÷(240R2→M:M(RB)tan(A÷2→T:(RB)÷cos(A÷2)-R→E:πRA÷180L→S:K-T→U:UL→V:V(S-2L)÷2→W:VS-2L→X:XL→Y:Cls:Locate 1，1，T”:Locate 10，1， T:Locate 1，2，E”:Locate 11，