问题标题：
【帮忙把这个autolisp的画正弦曲线的程序解释一下;画正弦曲：x=a,y=sina;(defunc:zxqx(/dabpAilptbp1bp2)(initget1);（initget［位］字符串）设定下次getxxx函数的有效输入)(setqbp(getpoint"n起始点?:"】
问题描述：
帮忙把这个autolisp的画正弦曲线的程序解释一下
;画正弦曲：x=a,y=sina;
(defunc:zxqx(/dabpAilptbp1bp2)
(initget1);（initget［位］字符串）设定下次getxxx函数的有效输入)
(setqbp(getpoint"n起始点?:"));
(initget7)
(setqda(getangle"n角度增量?:"))
(setqAi0Ae(*pi2.0)bp1(carbp)bp2(car(cdrbp)))
(while(
曲彦文回答：
材料工程专业硕士专业课资料
查看更多
