单角、双角、多角、回头、曲线计算程序
	CASIO  fx-4500p 计算器
F1
1.  Fox：{P}:LbI9
2.  D=2��Goto8��
3.  D=0��Goto8��
4.  {D}:D=Degut 9
5.  LbI8:P=P
6.  D=2��{SAY}
7.  A=A: I=S+Y��
8.  D=0��{IR}:I=I��
9.  L=π/180IR
10. I>180��I=-I��
11. T=Rtan I/2
12. K=90/πR:E=R((cos(I/2))-1-1◢
13. L=Int(100C+.5)/100
14. D=0��Goto 3��
15. F=T-A┙sin I sin Y
16. Z=T-A┙sin I sin S
17. F<0��F=Int(100F-.5)/100��
18. Z<0��Z=Int(100Z-.5)/100��
19. F<0��F=Int(100F+.5)/100��
20. Z<0��Z=Int(100Z+.5)/100��
21. I<0��B=P+F:Z=-Z��
22. I>0��B=P-F:F=-F��
23. V=1:X=I
24. Goto5:LbI7
25. I=X:I>0��I◢��
26. I<0��-I◢��
27. N=T:T=F:T/1┙1
28. T=Z:T/2┙2◢T=N
29. LbI3
30. T=Int(100T+.5)/100
31. D=0��B=P-T��E=B+C
32. Q=Int(B/10)×10+10
33. V=Int(E/10)×10
34. U=Q-B:W=E-V
35. G=UK:H=WK
36. Z=1:X=G
37. Goto5:LbI4
38. G=X:X=H:Z=2
39. LbI5:J=IntX
40. M=60(X-J):O=IntM
41. M=Int(60(M-O)+.5
42. M=60��O=O+1:M=0��
43. O=60��J=J+1:O=0��
44. X=100(100J+O)+M
45. V=1��Goto7��
46. Z=1��Goto4��
47. Z=2��Goto6��
48. Z=3��Goto0��X◢
49. Z=5��R<80��L=2Rsin(10K)◢�ⅹ�
50. Z=5��Goto1��
51. N=(10F+U)��X=KL:Z=5��
52. N=(10F+W)��X=KL:Z=5��
53. X=KL��C=2B��X=360-X��
54. C=2E��X=360-X��
55. Z=5:Goto5��
56. Z=4��Goto0��
57. Z=5��Goto5��
58. LbI6:H=X
59. T◢L◢B◢E◢Q◢U◢G◢V◢W◢H◢
60. F=(V-Q)/10◢
61. LbI1:C=0:{L}
62. C=2B��N=U
63. X=360-UK:Z=4
64. Goto5��
65. C=2E��N=W
66. X=360-WK:Z=4
67. Goto5��
68. C=B��N=U:G◢Z=4:Goto0��
69. C=E��N=W:H◢Z=4:Goto0��
70. Goto1:LbI0
71. N=N+10
72. X=KN:Z=4
73. C=2B��X=360-KN��
74. C=2E��X=360-KN��
75. Goto5
F2
1.  C=C
2.  Fixm
3.  LbI0
4.  A=KC
5.  X=Rsin(2A)◢
6.  Y=2R(sinA)²◢
7.  C=C+10
8.  Goto0
F3
1.  P=P:G=G:H=H:E=E:J=J:LbI0
2.  A=√(G²+H²+2GHcosF)
3.  S=E+sin-1(sinF/A×H)
4.  Y=E+F+J-S:E=S:F=Y
5.  C=0:{L}:C>0��E=S
6.  F=Y:G=A:{HJ}:Goto0��
7.  C=0��D=2:Prog1��