外门。lsp包含4个不同的

sam kolker · 发表于 2022-7-5 19:12:11

是否有DTR功能的替代品？你试过运行修改后的lsp吗？为什么它在v14版本中工作得很好，而在2011版本中却没有？我认为你应该能够在以后的版本中使用lisps。

BKT · 发表于 2022-7-5 19:15:00

这是我在你发布的lisp中看到的：

登录/注册后可看大图

至于DTR函数，我将其添加到EXTDOOR3和4中：

;; Added DTR function
(defun dtr (x)
   ;define degrees to radians function
   (* pi (/ x 180.0))
   ;divide the angle by 180 then
   ;multiply the result by the constant PI
)

BKT · 发表于 2022-7-5 19:17:38

我没有访问V14的权限，所以我不知道你的问题的答案，尽管有时我不得不修改旧代码。

这是我添加DTR后的代码。看看它是否适合你。
（警告：我正在使用BricsCAD）

[附件]55484

sam kolker · 发表于 2022-7-5 19:21:24

我刚刚签出了我之前上传的extdoor lsp文件，我看不出你在哪里加载了dtr函数。它工作正常吗？如果可以，是否可以上载extdoor lsp。在你的回复中，以便我以后可以下载？

sam kolker · 发表于 2022-7-5 19:24:51

谢谢你的下载，我会试试，让你知道。

sam kolker · 发表于 2022-7-5 19:29:25

我刚刚测试了外门。lsp单门、双门、带2个侧灯的门都工作，只有带1个侧灯的门停止工作。（外门2）

BKT · 发表于 2022-7-5 19:30:41

有什么迹象表明它不起作用？它会抛出错误吗？

sam kolker · 发表于 2022-7-5 19:35:29

然而，当我加载Intdoor时，extdoor2 lsp不会打开。lsp，其书写方式与原始extdoor相同。奇怪的是，所有4个lsp程序都适用于外门和内门。

BIGAL · 发表于 2022-7-5 19:36:13

正如我之前发布的（DTR 180）意味着以另一种方式旋转180度，需要2xPI才能形成一个圆，所以只需将任何（DTR 180）替换为PI即可。这样就不需要任何DTR调用基本几何。

copy

; angles to be used as they are just square can be pre-declared 
; or put in a library and autoloaded same as DTR
; preset the ang
(setq a90 (/ pi 2.0)) ; 90 degrees 
(setq a180 pi) ; 180 degrees
(setq a270 (+ pi (/ pi 2.0))) ; 270 degrees

BIGAL · 发表于 2022-7-5 19:41:28

删除对（DTR 180）的引用，只需使用PI即可

copy

; my square angle presets
(setq a90 (/ pi 2.0))
; 180 use PI or
(setq a180 pi)
(setq a270 (+ pi (/ pi 2.0))

[编程交流] 外门。lsp包含4个不同的

发表回复

精选推荐