乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 85|回复: 9

[编程交流] Lisp程序地通过“密集Ha”

[复制链接]

6

主题

21

帖子

13

银币

初来乍到

Rank: 1

铜币
33
发表于 2022-7-6 07:03:46 | 显示全部楼层 |阅读模式
我编写了一个在AutoCAD 2006中工作的LISP程序,但在AutoCAD 2013中工作不正常。该程序的一部分使用标准AutoCAD“线”图案创建图案填充,其中图案填充比例非常小。使用高密度图案填充线进行数值积分需要较小的图案填充比例。
 
目前,该程序仅在剖面线比例设置为0.10或更大时才在AutoCAD 2013上运行;但是,如果将图案填充比例设置为0.01或更小,则不会绘制图案填充,并且LISP程序会爆炸。根据我的研究,我已经将MaxHatch变量设置为一个非常高的值(setenv“MaxHatch”“1000000”),但LISP程序仍然低于相同的0.10 hatch比例。
 
有趣的是,当从命令提示符启动hatch命令时,我可以将图案填充比例设置为0.0001,尽管会出现“密集图案填充”对话框,但在选择“创建密集图案填充(不推荐)”选项后会绘制非常精细的图案填充
 
有没有办法使用LISP代码绕过这个“密集图案填充”对话框,以便直接从LISP代码创建非常精细的图案填充?
 
谢谢你的帮助。
射线
 
  1. (command "-LAYER" "N" "sp-Hatching" "C" "YELLOW" "sp-Hatching" ""
  2. "-HATCH" "Properties" "*LINE" hatchsc "0" "Select" selset "" ""
  3. "-LAYER" "OFF" "*" "N" "")

080350wpgk7awew4owwwbp.jpg
回复

使用道具 举报

4

主题

2143

帖子

2197

银币

限制会员

铜币
-24
发表于 2022-7-6 07:17:04 | 显示全部楼层
请阅读代码发布指南,并编辑您的帖子以包含代码标签。
回复

使用道具 举报

GP_

8

主题

248

帖子

245

银币

初来乍到

Rank: 1

铜币
42
发表于 2022-7-6 07:20:59 | 显示全部楼层
创建比例为0.10的图案填充
在…之后添加。。。
 
  1. (command "_-hatchedit" "_L" "" "" "0.0001" "")
回复

使用道具 举报

6

主题

21

帖子

13

银币

初来乍到

Rank: 1

铜币
33
发表于 2022-7-6 07:26:49 | 显示全部楼层
SLW-很抱歉。。。我很清楚,不会再发生这种事了。我编辑了这篇文章。
 
GP-非常感谢您的建议。工作得很好!!!!!!!!
非常感谢你,
射线
回复

使用道具 举报

GP_

8

主题

248

帖子

245

银币

初来乍到

Rank: 1

铜币
42
发表于 2022-7-6 07:31:22 | 显示全部楼层
不客气。
回复

使用道具 举报

4

主题

2143

帖子

2197

银币

限制会员

铜币
-24
发表于 2022-7-6 07:43:20 | 显示全部楼层
感谢您的修复!!
回复

使用道具 举报

6

主题

21

帖子

13

银币

初来乍到

Rank: 1

铜币
33
发表于 2022-7-6 07:48:40 | 显示全部楼层
下一个问题:GP的建议对于创建非常密集的图案填充非常有效。在我原来的lisp程序中,图案填充使用了*线,其中“*”插入了分解图案填充。我需要分解图案填充,以便获得每条线的起点和终点。然而,现在,当我分解非常密集的图案填充时,线条都消失了。即使所有层“打开”和“全部缩放”,图案填充也会消失如果我将图案填充比例更改为更大的数字,图案填充会很好地分解。我尝试了突发命令,但没有成功。
 
有没有一种方法可以在AutoCAD不删除图案填充的情况下分解密集图案填充?
 
最终我需要单独的线路,我知道会有很多。分解密集图案填充在2006年不是问题,所以我想知道我在AutoCAD 2013中做错了什么。根据我的经验,AutoDesk非常善于保留以前的功能。
谢谢你-雷
回复

使用道具 举报

GP_

8

主题

248

帖子

245

银币

初来乍到

Rank: 1

铜币
42
发表于 2022-7-6 07:52:46 | 显示全部楼层
尝试:
HPMAXAREAS=0
然后祈祷。
回复

使用道具 举报

6

主题

21

帖子

13

银币

初来乍到

Rank: 1

铜币
33
发表于 2022-7-6 07:58:05 | 显示全部楼层
GP-在你和祈祷之间,这个建议帮助很大!!!!
 
更改系统变量hpmaxares=0似乎使图案填充密度显著增加到了一个功能性的、足够精确的级别(尽管如果我可以使图案填充间距稍微密集一点,我可能会这样做)。以前我只能孵化到0.1左右的分辨率,现在我可以孵化到0.0003而不需要常规轰炸。我一直在尝试不同的方法,看看是否可以让程序失败,所以我认为把这个变量改为零真的成功了。
 
非常感谢你的建议。我希望有一天能像这个网站上的许多成员一样博学。
射线
回复

使用道具 举报

GP_

8

主题

248

帖子

245

银币

初来乍到

Rank: 1

铜币
42
发表于 2022-7-6 08:04:17 | 显示全部楼层
来帮忙。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-10 10:02 , Processed in 0.564203 second(s), 75 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表