3D模型
  • 3D模型
  • SU模型
  • 材质
  • 贴图
  • CAD图纸
  • 灵感图
  • 全球案例
  • 效果图
  • 方案文本
  • PS免抠
3D模型 SU模型 材质 贴图 CAD图纸 灵感图 全球案例 效果图 方案文本 PS免抠

最近搜索

热门搜索

溜溜问答 > 平面设计 > CAD问答 > CAD的lisp例子
kiss mayue
kiss mayue
邀请你来回答
126人阅读 2022-03-25

CAD的lisp例子

我要回答
1个回答

;画直线
(defun c:hzx()

(command "_line")
(while (/= (getvar "CMDACTIVE") 0)
(command pause)
)
(princ)
)

查看全部
2022-03-25
赞 回复 采纳

相关问题

CAD lisp程序
共4条回答 >
吧噗勒斯： 可以用反应器实现，前提是画线和输入文字必须用定义的函数一次性操作完成.LISP代码如下：(VL-Load-Com)(defunc:Line_Txt(/PtPt1Pt2EntLineHandTxtVlaObjTmp)(setqPt1(getpoint"\n指定第一点:"))(setqPt2(getpoint"\n指定下一点:"))(setqPt(list(/(+(carPt1)(carPt2))2)(/(+(cadrPt1)(cadrPt2))2)(/(+(caddrPt1)(ca....
赞 (25) 回复
CAD lisp 是什么？
共3条回答 >
A 王洪： lisp是一种编程语言。lisp在cad绘图软件上的应用非常广泛，普通用户均可以用lisp编写出各种定制的绘图命令。
赞 (1) 回复
CAD中的lisp
共1条回答 >
颖： 设ws1、ws2的中心点分别为p1、p2，则深度0.3、0.4的标注点计算如下：(setqang12(anglep1p2))(setqang21(anglep2p1))(setqp3(polarp1ang12(+ws1标记半径r10.3文本的长度)))(setqp4(polarp2ang21(+ws2标记半径r20.4文本的长度)))
赞 回复
求lisp语言，CAD
共1条回答 >
猪头君： (defunC:分解(/datalayer)(while(if(setqen(entsel"\n选择要分解图层的图元："))(progn(setqdata(entget(caren))layer(cdr(assoc8data)))(setqss(ssget"_X"(list(cons8layer))))(setvar"QAFLAGS"1)(command"EXPLODE"ss"")(setvar"QAFLAGS"0))))(princ))
赞 回复
CAD中的lisp？
共1条回答 >
阿拉洋： 加载应用程序---加载你的lisp文件同时，有用的lisp程序可以设置为自动加载：加载应用程序---启动组---添加你的lisp文件这样，新打开的cad窗口都会加载这些lisp！
赞 (35) 回复
素材推荐
3D模型 SU模型 材质 贴图 CAD 灵感图 效果图
侘寂风格软装家具组合
侘寂风格软装家具组合
法式奶油风住宅设计效果图
法式奶油风住宅设计效果图
轻奢软装效果图
轻奢软装效果图
热门文章
防潮护墙板有哪些优缺点？
防潮护墙板有哪些优缺点？
34人阅读
阁楼应该如何装修设计？
阁楼应该如何装修设计？
15人阅读
75平房子怎么装修三代同堂不拥挤？
75平房子怎么装修三代同堂不拥挤？
32人阅读
结婚新房怎么装修好？
结婚新房怎么装修好？
55人阅读
草图大师SketchUp怎么换快捷键？
草图大师SketchUp怎么换快捷键？
67人阅读
问答标签
CAD的lisp例子 CAD lisp CAD和lisp lisp CAD CAD的lisp CAD怎么进入lisp CAD lisp 函数 CAD lisp语言 CAD 布局lisp CAD lisp是什么 CAD lisp 教程 CAD求和lisp
发表成功!
感谢您的分享!
好的
  • 3D模型
  • SU模型
  • 贴图
  • CAD图纸
  • 设计图
  • 效果图
  • 案例
  • 方案文本
  • 材质
小程序

免责声明：本网站部分内容由用户自行上传，如权利人发现存在误传其作品情形，请及时与本站联系。

Copyright © 2010 - 2023 3d66.com All rights reserved. 3D溜溜网 ©版权所有 粤ICP备13075835号 深圳特鹏网络有限公司

官方Q群
溜溜联盟
官方微信群

（微信添加“妙妙”或“笑笑”，邀您进群）