用autolisp编写绘制的命令

要求通过输入正方形的左下角点和边长(用getpoint函数或的左下角点,用getdist函数获得边长)来绘制。利用command函数调用PLINE命令绘制漏了几个字!绘制... 要求
通过输入正方形的左下角点和边长(用getpoint函数或的左下角点,用getdist函数获得边长)来绘制。
利用command函数调用PLINE命令绘制
漏了几个字! 绘制正方形!!!!!
展开
 我来答
  • 你的回答被采纳后将获得:
  • 系统奖励15(财富值+成长值)+难题奖励10(财富值+成长值)+提问者悬赏80(财富值+成长值)
greatlmy4
2015-06-19 · TA获得超过1330个赞
知道小有建树答主
回答量:1446
采纳率:76%
帮助的人:311万
展开全部
源程序如下:
(defun c:box (/ p p1 p2 a)
(setq p (getpoint "Left & Bottom point: ")
a (getdist p "A=")
)
(command "PLINE" p (setq p1 (polar p 0 a)) (setq p2 (polar p1 (/ pi 2) a)) (polar p2 (- pi) a) "C")
)
本回答被提问者和网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
AiPPT
2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图... 点击进入详情页
本回答由AiPPT提供
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式