明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1793|回复: 16

[LISP群(1)] 2013-07-23 明经 AutoLISP 编程(102918348) 群聊记录:[image={88956AFE-7568-1A4F-2C16-49FAEE

 关闭 [复制链接]
发表于 2013-7-23 07:38:18 | 显示全部楼层 |阅读模式
[mmh1][mmh1]漫步地球 07:38:18
[qqimg]201307/{88956AFE-7568-1A4F-2C16-49FAEE354D8F}.jpg[/qqimg]
这种什么情况?
 楼主| 发表于 2013-7-23 08:51:20 | 显示全部楼层
[mmh1][mmh1]漫步地球 08:51:20
(command "change" "" LAYCH "" "p" "la" 1)
(command "change" LAYCH "" "p" "la" 1)
表示对change函数无法理解啊,昨天还能用的,今天就要在change后加上空格!!!!
 楼主| 发表于 2013-7-23 10:15:42 | 显示全部楼层
[野狼谷]笨鸟 10:15:42
会不会是公共变量影响?
能用就行呗
 楼主| 发表于 2013-7-23 10:49:30 | 显示全部楼层
[永不言弃]梦 10:49:30
寻边的程序哪位大侠有在CAD平台上写的,谢谢[qqimg]201307/{EDC0AAD0-FAB0-7105-7D75-480C72CAABFA}.jpg[/qqimg]
[pzweng][pzweng]路人 10:50:20
这个好写吧
BOUNDARY
CAD自带的
你在外面画个框就行了
[永不言弃]梦 10:54:23
好的,我试试,谢谢
[永不言弃]梦 10:56:42
我想要的 是外围的界线
这个命令是分开的
 楼主| 发表于 2013-7-23 12:41:31 | 显示全部楼层
[flytoday]过^-^客 12:41:31
[qqimg]201307/{B2C65C77-CD71-D67F-09FC-11C19FADF5F5}.jpg[/qqimg]
这个太坏了怎么处理各位大大
[loveguo]筠筠 12:44:49
[mitenickevin]kevin 12:47:00
方便的话 共享图纸看看
[flytoday]过^-^客 12:47:17
好的
[flytoday]过^-^客 12:49:45
一个普通图纸七搞八搞。。以为就他一个会搞设计真晕
[tiyi8888]永远D痛 12:54:22
与我一样,经常拿点破图了
哈哈
[flytoday]过^-^客 12:55:05
这个图一定采用了什么代码加密过了。。没找到解密软件
[flytoday]过^-^客 13:00:49
好象图纸被限制使用命令了
[jicqj]大力水手 13:07:01
是dwg吗
[flytoday]过^-^客 13:07:16
是的
[jicqj]大力水手 13:07:54
那个对话框怎么来的
[flytoday]过^-^客 13:08:11
他本来就有显示
[jicqj]大力水手 13:08:50
卓子公司自己有加密功能吗
[kwok][ww5w]行舟月下 13:09:39
[flytoday]过^-^客 13:09:47
附带个插件安装下图才能正常显示
啥鸟设计真晕
[kwok][ww5w]行舟月下 13:10:13
另存下面有个选项
[kwok][ww5w]行舟月下 13:10:48
私人开发的工具吧
用来卖钱?
[flytoday]过^-^客 13:11:21
什么
什么
我说那个图无法解密
[kwok][ww5w]行舟月下 13:12:43
找原图作者发个没加密的,解决
[flytoday]过^-^客 13:13:11
呵呵
会发给你就不要加密了
[kwok][ww5w]行舟月下 13:13:35
不发就不给弄图,让他自己玩
[kwok][ww5w]行舟月下 13:15:08
一句话,图加密了,没法做事,可以上网玩了
[tiyi8888]永远D痛 13:15:45
垃圾设计院总是这样子
让别人编辑不了的事
 楼主| 发表于 2013-7-23 13:35:46 | 显示全部楼层
[lrd1861][lrd1861]-笗天- 13:35:46
那个插件只支持到2010  如果支持13   14 应该可以解
[flytoday]过^-^客 13:37:54
可能是无解真晕
很多连命令都是被限制了哦
 楼主| 发表于 2013-7-23 13:54:51 | 显示全部楼层
[linshiyin2]大地 13:54:51
[qqimg]201307/{6245C6AA-6412-FE15-3AFA-670105B82617}.jpg[/qqimg]et里的消除重元
[linshiyin2]大地 13:55:33
谁能改一下,添加一个选项,对于重复的图元只是亮显(选中即可)而不是删除
overkill
[linshiyin2]大地 13:56:22
看overkill.lsp就没看出来哪里是删除图元
[lrd1861][lrd1861]-笗天- 14:01:38
[qqimg]201307/{C0AC4F4E-71CF-9540-62BB-589298CB6A03}.jpg[/qqimg]
[linshiyin2]大地 14:05:01
);progn then ok to optimize plines
 );if
 
 ;; Delete the perfect matches first
 (setq ss2 (acet-ss-remove-dups ss fuz ignore)
        ss (car ss2)
       ss2 (cadr ss2)
 );setq
 (if ss2
     (progn
      ;(command "_.erase" ss2 "")
      (princ (acet-str-format " 删除%1个重复。 " (itoa (sslength ss2))))
     );progn then
     (setq ss2 (ssadd));setq else create an empty selection set
 );if
[qqimg]201307/{BC57B04A-4B2F-4335-4A14-326C458BAAC4}.jpg[/qqimg]
桌子公司的程序员写的程序也有很多垃圾字符啊
[weiqi]weiqi 14:10:12
搬凳子 围观大哥深入解码
[linshiyin2]大地 14:17:50
[qqimg]201307/{D154DEFF-A4B8-EFCC-BF8D-9381FD611064}.jpg[/qqimg]
md是不是这句把图元给删除了
[linshiyin2]大地 14:19:34
就是这句
[flytoday]过^-^客 14:20:55
解密了不是吧。。这么强啊
[flytoday]过^-^客 14:21:29
大地兄弟你解决了吗
[flytoday]过^-^客 14:23:20
完整滴能上传试下不
[linshiyin2]大地 14:26:07
[qqimg]201307/{77FB5F9A-89C2-73D9-D588-0B519BE9F468}.jpg[/qqimg]
再改,一会试试看
[flytoday]过^-^客 14:26:31
[pzweng][pzweng]路人 14:34:04
ET工具全是源码吗
[linshiyin2]大地 14:37:44
搞定了
[500w008]500w008 14:38:01
共享下
[pzweng][pzweng]路人 14:38:41
ET工具全是源码吗?
[linshiyin2]大地 14:39:36
不熟
不是,部分用fas加密了
[flytoday]过^-^客 14:39:48
能共享不
[no13bus]13公交车 14:39:49
no
[linshiyin2]大地 14:39:56
伪函数
可以
[flytoday]过^-^客 14:40:06
传上来
[linshiyin2]大地 14:40:11
[qqimg]201307/{FD7897D0-9102-C1E0-CBC2-D1DC60003C6F}.gif[/qqimg]
[flytoday]过^-^客 14:40:57
不是解密那个啊。。晕倒
[linshiyin2]大地 14:41:24
还有个问题,记忆功能没哟添加上
[linshiyin2]大地 14:42:32
[qqimg]201307/{78924CFE-10F1-9CEC-AAC7-FBA188F0918C}.gif[/qqimg]
原版功能没有问题
[linshiyin2]大地 14:44:25
修改了1个dcl两个lsp,怎么传啊,算了,我把修改的地方发上来吧
[linshiyin2]大地 14:46:29
overkill.lsp中还有个
(if (= (get_tile "plotstyle") "1")
                (setq ignore (cons 390 ignore))
            )
         (if (= (get_tile "ssonly") "1")
                (setq ssonly "1")
            )
局部变量自己添加
[linshiyin2]大地 14:50:02
[qqimg]201307/{EF73CE1F-EF3B-01E4-23DE-6F2B9B44EDF5}.jpg[/qqimg]
[linshiyin2]大地 14:50:48
一会再修改一下能记忆
需要的m我
 楼主| 发表于 2013-7-23 15:19:15 | 显示全部楼层
[linshiyin2]大地 15:19:15
[qqimg]201307/{396F25B4-1BDE-B061-169C-24FED951D363}.jpg[/qqimg]
[linshiyin2]大地 15:23:38
[qqimg]201307/{7AC98B3A-ABA7-4F7C-0AC2-F0C0FE6550E6}.jpg[/qqimg]
et这样安装,不是函数
[pzweng][pzweng]路人 15:30:11
在后面加一个princ()
[爱学习]必须的 15:31:46
哦,我看一下
[tiyi8888]永远D痛 15:33:42
能否讲一下你要表达的是什么意思呢
全是000
我也是
[pzweng][pzweng]路人 15:33:48
(setq mm (atof mm))把这句删了看看
[tiyi8888]永远D痛 15:34:01
不影响的吧
[pzweng][pzweng]路人 15:34:11
这句有问题
[tiyi8888]永远D痛 15:34:14
主要是(command "text"  "j" "m" p4 2.0 qq mm )
[pzweng][pzweng]路人 15:34:39
(setq mm (atof mm))把这句删了
[爱学习]必须的 15:35:16
嗯嗯,改好了,就是这句有问题。谢谢了
[kwok][ww5w]行舟月下 15:35:31
加上要显示小数几位
[cie0588][cie0588] 15:36:06
mm本来就是需要字符串,不需要转成实数。。
[爱学习]必须的 15:45:27
嗯嗯,知道了。谢谢
[JAY913]SagapoЖ 15:52:24
请问合成块命令是什么了
 楼主| 发表于 2013-7-23 16:12:18 | 显示全部楼层
[aeromodelling]纸飞 16:12:18
请问有没有二维布尔运算的lisp
[aeromodelling]纸飞 16:13:08
矩形之间的交集
[阿然][阿然] 16:14:33
根据矩形建立面域,面域可以布尔运算
[aeromodelling]纸飞 16:19:17
谢谢
 楼主| 发表于 2013-7-23 16:57:02 | 显示全部楼层
[328302216][328302216]小莫 16:57:02
cad自带的lisp编辑器里面按回车没反应了是怎么回事?
[【KAIXIN】] [【KAIXIN】]炫翔 17:06:41
没用过,一直用LINKLISP
GU版一直在用  你可以去问问
[328302216][328302216]小莫 17:11:28
CAD关了重开又好了  不知道是不是不小心按到哪个键了
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-12-24 01:12 , Processed in 0.198691 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表