乐筑天下

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

[编程交流] 创建单线风管工程

[复制链接]

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 15:43:29 | 显示全部楼层
 
我只能认为自那以后命令已经改变了,因为我发布的代码似乎适用于ACAD'04。
回复

使用道具 举报

26

主题

1495

帖子

20

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
118
发表于 2022-7-6 15:47:35 | 显示全部楼层
嗯,我看不出这里的命令有什么变化。
 
http://www.hyperpics.com/commands/
 
哦,好吧-大卫
回复

使用道具 举报

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 15:50:27 | 显示全部楼层
 
 
我明白你的意思-但用“entlast”论点补充它似乎无论如何都能奏效。。
回复

使用道具 举报

38

主题

83

帖子

53

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
186
发表于 2022-7-6 15:55:05 | 显示全部楼层
谢谢李。
它工作得很好。2004年在家试用。
我确实将圆角形状从2“改为8”,段长改为11”,这样X就不会重叠太多。
您在编写过程中创建的Lisp例程开始让我感到奇怪,因为我理解这个操作。这只是(/*误差*vlst ovar)
(defun*错误*(msg)
(如果为ovar(mapcar‘setvar vlst ovar))
(princ(strcat“\n错误:”(strcase msg)))
(普林斯)
我现在很难理解。
我可以调整lisp例程,像这样简单,我可以理解它。这有助于了解
开始写我自己的。
再次感谢。
感谢大家的支持和投入。这让工作变得容易多了。
:D
回复

使用道具 举报

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 16:01:41 | 显示全部楼层
 
 
很高兴它对你有用
 
对此:
 
  1. [size=3][font=Times New Roman] (/ *error* vlst ovar)
  2. (defun *error*  (msg)
  3.    (if    ovar (mapcar 'setvar vlst ovar))
  4.    (princ (strcat "\nError: " (strcase msg)))
  5.    (princ))
  6. [/font][/size]

让我们分开来看:
 
第一:
 
  1. [size=3][font=Times New Roman](/ *error* vlst ovar)[/font][/size]
是函数的一部分:“defun”和所有局部变量应包含在正斜杠后的括号内。(函数的参数放在正斜杠之前-但此函数不接受参数)。在VLIDE帮助中查找“defun”函数,您将了解我的意思。
 
本地化变量不仅有助于跟踪用作变量的符号,还可以在程序完成后清除这些符号中的任何值。
 
现在,转到:
 
这是程序的错误处理程序-它接受一个参数(错误消息),当ACAD返回错误时返回该参数。程序基本上会说,‘如果有错误,将所有变量返回到原来的状态,然后打印错误消息。"
 
  1. 7
  1. 8

希望这能进一步澄清问题。
 
如果你对这件事或其他事情还有任何问题,尽管问。
 
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-5 00:56 , Processed in 2.241394 second(s), 61 queries .

© 2020-2025 乐筑天下

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