-
-
1思路是这样的,选取一个线条,取线条的y值小的一个端点的坐标pt1,其坐标为 x1,y1,然后求pt2其坐标为x2,y2, x2=x1-125,y2=y2-19然后得出pt3,pt4,以pt4和pt3交差窗选这个范围内的对象,如果是文本文件,就输出到屏幕上。 这个是个简单的程序。不过运行中发现,如果把屏幕放大,也就是线条基本充满cad屏幕时,结果是正确的,当把屏幕缩小是,选出的结果就是错误的。 已经验证了,pt3和pt4的坐标输出是对的,但是就是窗选出的数据是庞斌的数据,屏幕越
-
0
-
9本人用的苹果本,很多现成的工具没法用,只能自己写一些lisp。 而autocad for mac里只能用autolisp函数,visual lisp的统统不行。 具体就是vla,vlr,vlr开头的函数都不行。只能用autolisp和vl开头的。 如果有同用mac os的,也可以一起交流。目前我写了一些工具,比如画墙,墙上开洞、开窗,坐标标注,标高自动计算,填充墙体,填充线等等。
-
4我用程序已经将excel中的数据读取到一个变量中,一共读取了两个单元格数据,变量是个表,表中有两个元
-
6编制了一个程序,画一个圆,并以圆心为端点画一条线,并自动修剪掉圆内线段,程序正常运行,缩放绘图视口后程序就失效了。请问大神这是什么原因,之前看过一个帖子,也有人遇到类似问题,记得是输入一个命令修改参数,就解决了。 (defun c:hx() (setq pa (getpoint "输入第一点:")) (setq pb (getpoint pa "输入第二点:")) (setq wa 1) (command "line" pa pb "") (setq l1l (entlast)) (command "circle" pa 1) (setq cc1 (entlast)) (command "trim" cc1
-
24rt好像用不了visualLISP是吗1517没有基础,求方法思路,谢谢1一个lisp程序运行出现错误显示“要绑定的对象不正确:T”,发现删除defun中的参数t 即可,但删除该参数,下面运行的程序出错,请教高手!4112有用VSCode的么?怎么配置它,让Autolisp程序在autocad中调试运行?0initget 17是1+16么?控制位16(位4)不是不使用么?有没有大佬懂得,帮忙解答一下。77本人接触autolisp有十年了,虽不是本职工作,但兴趣浓烈,有需要写的,可以联系我729297971@qq.com4大神给指点下这两个命令是怎么用的,网上查了好多,没有看懂,试了试都提示参数太少, (command "hatch" "u" 45 2 "n" "w " p1 p2 "") (command "bhatch" p "p" "u" 45 2 "" "") 这里p u n w 都代表是什么00019简化经常用到的函数符号,"E:\\ELLA\\" 是默认文件夹 (SETQ Z: CADDR # MAPCAR APP APPEND \ REVERSE READL READ-LINE &DIR "E:\\ELLA\\" )0基于AutoLISP的平面与圆锥截交线参数化绘图的此类程序设计是否需要测试和修改?1; ∫(-0.5 0.5)f(x)dx = [ 5 f(-√0.15) + 8 f(0) + 5 f(√0.15) ] / 1801805我刚接触cad二次开发大概一周,想做一个插件,大概功能如下: 1、插件的界面能够显示指定目录下的图层列表,可以选择更改目录,该插件一直存在于页面上。 2、可以选择图层列表中的图层进行导入。 3、导入后的图层与原图层并存, 想知道这个功能大概设计思路是什么?要用到autolisp、dcl控件中哪些部分,或者讲一讲简单的实现方法,谢谢各位了。00* 概述 ** 场景1 有时我们需要管理一组相关的 dwg 文件,如一个小区的不同建筑施工图。如果所有的dwg文件都在一个文件夹处,我们选择所有就可以全部打开。 如果不在同一个文件夹下,我们需要多次进入不同的文件夹打开每个 dwg 文件。 ** 场景2 我们正在编辑十多个 dwg 文件,快下班了,我们需要保存全部并关机。但是第二天上班我们还需要把这些文件逐个找到并打开各个不同的 dwg 文件,继续工作。 ** @lisp会话管理 现在,使用 @lisp会话管理,可以轻1900一个是单线图框的识别。 一个是图名的识别。 使用之前需要训练,就是要先告诉程序,什么是图框,哪些文字是图名。 然后程序才能做出选择。 如果程序运行结果不对,还需要继续训练,直到结果正确为止。 单线图框的识别与打印,自动分析图名。基于样本学习越用越准确。 视频: https://www.ixigua.com/7135646309305811463 https://www.ixigua.com/6991973013616853535 源码陆续发布于: https://gitee.com/atlisp/packages91本人最近编写出了利用autolisp去掉字符串内某些字符(如空格、“-”等)的程序,有需要者可加qq492379558。3请问大神们,sld幻灯片可以编译到vlx插件吗?3一段很长的中英混排的字符串,需要截取成长度相同的单行文本写入图纸。 由于中英字符长度不同,举个例子,如果用substr统一截取成长度20的子字符串,全是英文或者全是中文没有问题,但是当含有奇数个英文字符时(英文字母不在最后),就会导致最后一个中文字符乱码,剩余字符也全部乱码。 我的思路是判断最后一个字符是不是异常,如果异常,那就将此次截取的字符数+1或者-1,但是这个判例如何写? 还有什么更好的解决办法?9在autolisp中read-line读取结果为字符串“ 20 20 ”怎么转变表的形式(20 20)。2各位大神, 现在我遇到一个很诡异的问题,就是AutoCAD里面使用AutoLisp,有三个函数A,B,C,C的作用是设置图块属性更新显示的,A函数调用C函数可以执行并且刷新图块,B函数调用C函数却不行了,B函数是DCL的点击响应函数,请问各位有没有遇到这种情况?或者这是CAD的BUG?2defun c:ZHDGX() (claim) (command "layer" "m" "dgxj" "") (command "layer" "c" &qu1大神,请教一个问题,getdist 函数获得的两点间距只有小数点后4位,如果一个点按(getdist)获取的尺寸移动,是移动不到另一个点上的。这种情况怎么办?2用lisp做了一个自动读取图纸明细栏的程序,明细栏是这个块做出来,现在程序做好了,但遇到一个问题:在while内以自动读取上一行的实体进行判断,然后读取实体内的各个参数,用鼠标选定while内部完整程序,单步运行,读取出来的明细栏数据一行行都没有问题,可以写到文件内,但就是不能选定整个程序运行,试试选定整个(while )也不行,读取的数据也是乱的,数据的记录发现重复和数据记录数字不对,仔细看了整个程序,原则上设计没有问题1请问一下autolisp怎么读取excel文件,并获得指定单元格的数据,比如想获取B2的数据