卡西欧5800程序，谁能帮修改修改

Question

卡西欧fx-5800p竖曲线计算程序
下面这段程序运行不下去
“BP1”？A: “BP1H” ？G: “BPD” ？B: “BPDH”？I :LbI 0: “BP2”?→C: “BP2H”?→J: “R”?→R: B-A→D: C-B→F: I-G→K: J-I→M: K÷D→N: M÷F→O :N-O→P: “T”:Abs (RP÷2) →T▲“E”:T²÷﹙2R) ▲B-T→W :B+T→X:G+N(W-A)→Y﹕I+OT→Z︰LbI 1“KM”?→Q:
Q>X=>Goto 2: While Q﹤W﹕Q-A→S︰G+SN→V▲Goto 1: WhileEnd: While Q≦B And Q>W﹕Q-W→S︰If P﹥0∶Then Y+SN-
S ²÷(2R) →V▲Else Y+SN+S ²÷(2R) →V▲IfEnd∶Goto 1: WhileEnd: While Q≦X And Q>B﹕X-Q→S︰If P﹥0∶Then Z-SO-
S ²÷(2R) →V▲Else Z-SO+S ²÷(2R) →V▲IfEnd∶Goto 1: WhileEnd: LbI 2: B→A: C→B: I→G J→I :Goto 0

程序提示符号含义及程序使用说明
BP1 BP1H-------前一变坡点里程桩号及高程；
BPD BPDH-------竖曲线变坡点里程桩号及高程；
BP2 BP2H-------后一变坡点里程桩号及高程；R----竖曲线半径
T-----切线长；E-----外矢距；ZXG-----计算中线高程
首先按程序提示输入7个参数，计算前一变坡点至竖曲线终点的纵段高程。当输入桩号大于竖曲线终点时，程序会自动提示输入后一变坡点的桩号及高程，以及下一竖曲线半径，输入三个参数后即可进行下一段纵段高程的计算。

Answer 1

你看看我这个给可以用