求助各位大侠帮忙完善下面的程序

gprspda

要求，已知两条线，以及两个端点A和B，要用一段螺旋线将A和B连接。需要输入的参数越少越好。
条件，已知指示空速 V，与IAS标准差值 C，高度H，风速W，A、B两点位置
需要求出转弯率R ， 静风条件下转弯半径r，真空速t（已经写出）
下面是我写的程序的开头，继续往下写发现的问题越来越多，比如角度的确定，在极坐标中确定点坐标，还请各位高人帮忙完善一下。
(defun c:flx(/ p0 p1  q v c h θ1   r R t w )
(setq v (getint"\n输入指示空速"))
(setq c (getint"\n输入与ISA的差值"))
(setq h (getint"\n输入高度（米）"))
(setq w (getint"\n输入风速"))
(setq θ1 (getangle"\n输入等分角度值"))
(setq p0 (getpiont"\n确定风螺旋起始点"))
(setq p1 (polar p0 0 r))
(setq t (/(* v 171233 (expt(-(+ 288 c) (* 0.006496 h))0.5))(expt(- 288 (* 0.006496 h))2.628))));真空速

crazylsp

你的图已经有了,多分析分析应不难实现哈

gprspda

crazylsp 发表于 2011-9-21 17:56
你的图已经有了,多分析分析应不难实现哈

有两个问题弄不清楚，一个是上面的R，用IF语言，怎么处理，第二个就是AB两点角度如何处理
老师要的比较急，没太多时间，我又是个新手，很多都弄不明白，越弄不明白的越多

zoubo604

（if（R>3） R=3  ）
不知道对不对，我模仿写的。学习中。