DonovanPorter 发表于 2022-7-7 00:45:43

标记的
 

^C^C^P(load "DATUM")))) ^C^CPOINTY

BlackBox 发表于 2022-7-7 00:47:38

 
 
 
 
 
开枪*踢翻泥土*
 
... 不过,至少我们(现在)朝着正确的方向前进。
 
 
*给自己唱歌,有人拿了他们的杯子,呵呵呵呵。。。
 
 
编辑:额外的紧密排列是为了什么?
 
当你忘记使用时,SLW会生气
, and you wouldn't like him when he's angry.

... Looks like 'DATUM' is a custom *.LSP, *.FAS, *.VLX file, and 'POINTY' is the custom command.

FWIW - I would re-write the macro so that 'DATUM' is only loaded if necessary, instead of each time the button is pressed:


^C^C^P(if (not c:POINTY)(load "DATUM"));POINTY;
。。。你能发布在“DATUM”中找到的源代码吗?
 
不确定在哪里可以找到“数据”。。。?
 
使用此选项:
 

(findfile "datum.<ext>")
。。。其中是上面的一个(不带星号)。

DonovanPorter 发表于 2022-7-7 00:50:50

我不知道为什么会有这么多家长,早在我开始在这里工作之前,这个命令就在这里,创建它的人已经离开了。
 
我对代码标签表示歉意,请记住。
 
我对宏等的了解真的是零,所以我真的不知道该如何处理你给我的代码来查找源代码?

BlackBox 发表于 2022-7-7 00:55:06

别担心;我不是在喋喋不休地谈论你——一旦你遇到SLW,你就会发现论坛上的幽默。英雄联盟
 
在任何情况下,请复制以下内容:
 

(findfile "datum.<ext>")
。。。将其粘贴到命令行,然后按Enter键(请确保按上述说明进行替换)。其中一个将返回路径,另两个应返回nil。
 
编辑:返回的路径是源文件所在的位置。我们希望源文件是的。LSP的多样性,因为我们无法使用编译代码(.FAS,.VLX),即使有也很容易。

DonovanPorter 发表于 2022-7-7 00:57:36

我得到的只是这个
 
("_>
 
与所有三个

BlackBox 发表于 2022-7-7 01:02:51

奇怪的请原谅我吹毛求疵,但你具体尝试了以下每一项:
 

(findfile "datum.lsp")

 

(findfile "datum.fas")

 

(findfile "datum.vlx")

 
...?
 
如果这些都不可行,也许您可以告诉我在命令行(如果有)返回了什么:
 

(load "datum")

DonovanPorter 发表于 2022-7-7 01:05:21

好吧,我做错了
 
这就是路
"P:\\Drawings\\000-Templates Palettes Profiles\\lisps\\datum.lsp"

DonovanPorter 发表于 2022-7-7 01:08:38

当我打开。lsp我得到这个代码
 

(vmon)
(DEFUN C:DATUM ()
(setq pt (getpoint "Select DATUM point : "))
(setq dY (cadr pt))
(setq lvl (getreal "\nDatum level : "))
(setq diff (- lvl dy))
(prin1)
)

(defun C:pointY ()
(setvar "attdia" 0)
(setq pt (getpoint "Select insertion point : "))
(setq Y (cadr pt))
(setq a (getvar "dimscale"))
(setq y (+ diff y))
(setq Y (rtos Y))
;
(setq l (strlen Y))
(setq s (- l 3))
(setq Y1 (substr Y 1 s))
(setq Y2 (substr Y (1+ s)))
(setq YA (strcat Y1 "," Y2))
;
(command "insert" "pointy" pt a "" "" YA)
(setvar "attdia" 0)
(prin1)
)

Tyke 发表于 2022-7-7 01:10:49

 
看起来RenderMan已经控制了这里的一切,所以我现在没有什么要补充的了,我会让这个“小家伙”完成这项工作。
他喜欢时不时地炫耀。

BlackBox 发表于 2022-7-7 01:15:14

 
是的,好吧,不要走得太远。。。我得到了口齿不清的东西(大多数时候),但我仍然没有完全理解OP的要求。你说得对,我的朋友眨眼:
 
 
*口吃,不,我不*回到令人敬畏的状态*
 

 
 
@多诺万·波特-
 
尝试一下快速重写:
 
现在,我不确定为什么有两个独立的函数(DATUM和POINTY),所以我所做的是合并一个“检查”,这样如果全局变量*DATUM*(以前的diff)为零,就会提示您定义必要的标准。就我个人而言,我觉得你们需要的只是一个完整的尖头函数——但这不是由我来决定的。
 
请让我知道这是否有效;如果你想了解更多关于我为你发布的代码,请告诉我。
 
另外,我知道你没有写它,但是关于你发布的代码有几件事:
 
不再需要(vmon)“虚拟内存开启”功能(或为此进行记录)。
 
确保在将来的代码中本地化变量,以避免与其他例程发生潜在冲突。
 
希望这有帮助!
页: 1 [2]
查看完整版本: 崔定制