2013-07-03 明经 AutoLISP 编程(102918348) 群聊记录：(vl-load-com) (defun C:zx( / np1 np2 n

明经快报

[flytoday]过^-^客 15:49:54

[qqimg]201307/{6DBBBC89-3847-2306-F0DA-171E35240227}.jpg[/qqimg]

[qqimg]201307/{E69EDE44-9354-5139-B5B7-F3C72714360D}.jpg[/qqimg]

明经快报

[snowblade]逍遥 17:17:29

群里gif.exe 你注册名和注册码是啥

[【KAIXIN】] [【KAIXIN】]炫翔 17:17:50

不用注册

也可以随便注册

[qianzj]太阳 17:27:06

属性标记只能是大写？

我小写的字母好像被自动转成大写了

有没有解决方法

[snowblade]逍遥 17:28:53

[qqimg]201307/{13F39E4D-1BC4-4848-B8E9-22BD824663E1}.gif[/qqimg]

这个程序有时候能用 有时候不能用 谁给看看

明经快报

[yifei]绝然 17:39:19

哈哈 。CASS用的也是这个 一样样的

[snowblade]逍遥 17:41:02

有时候不能用啊

明经快报

[xiaomm09]江湖 19:17:37

片石的填充图案哪位有？

明经快报

[xiaomm09]江湖 19:40:27

天正里面有片石的填充图案吗？哪位帮填充下？谢谢

[kwok][kwok]巭隼 19:41:50

[qqimg]201307/{9FE44834-ED6B-F353-3E25-457360E257C3}.jpg[/qqimg]

[xiaomm09]江湖 19:42:08

这是毛石

[qqimg]201307/{FB41BF9F-4BCE-1F8E-94CD-F8D0B55709F0}.jpg[/qqimg]

明经快报

残剑~~ 21:09:43

谁可以给我发个天正插件吗

在线等 急用 家里加班中  各位同仁 谁帮下忙

[雨的节奏][雨的节奏] 21:12:12

08的能用吗

破解版的

残剑~~ 21:12:35

恩恩

就要08的

3Q 急用

明经快报

[LC100]建筑设计 21:35:05

空白处双击启动命令谁会？

[LC100]建筑设计 21:35:36

空白处双击启动命令谁会？

残剑~~ 21:35:49

不会

[LC100]建筑设计 21:36:02

你新来的当然不会

[雨的节奏][雨的节奏] 21:36:09

什么空白处双击啊？】

什么意思

说具体点、貌似有点意思

[LC100]建筑设计 21:36:41

就是不选择对象的时候双击鼠标左键。然后启动一个命令

[ZZXXQQ] 21:36:43

双击反映器

[alwtyp][alwtyp] 21:36:46

这个应该要用上反应器吧

[LC100]建筑设计 21:37:06

我是空选哦。

[alwtyp][alwtyp] 21:37:41

知道

[LC100]建筑设计 21:38:03

问点直接的吧，CAD中的宏谁会编写

[ZZXXQQ] 21:38:19

SCR？

[LC100]建筑设计 21:38:28

scr是什么？

[alwtyp][alwtyp] 21:38:43

宏不就是VBA吗？

[ZZXXQQ] 21:39:04

SCRIPT

[LC100]建筑设计 21:39:06

是

在  vba里有吗？

[alwtyp][alwtyp] 21:39:28

你进错群了

[ZZXXQQ] 21:39:35

VBA不是宏

[LC100]建筑设计 21:39:58

[qqimg]201307/{8C92EC62-5882-4524-8F55-4656B1C40A28}.jpg[/qqimg]

我想实现红色框的 这种暂停，但lsp却做不到。

[alwtyp][alwtyp] 21:40:35

宏是巨集

[ZZXXQQ] 21:40:45

可直接用GET系函数

宏是可以直接运行的

[LC100]建筑设计 21:41:21

ZZXXQQ那里可以实现这种暂停么？

[ZZXXQQ] 21:41:25

你贴的图上是LISP代码

直接用GET系函数

[LC100]建筑设计 21:41:59

达不到这停暂停

[ZZXXQQ] 21:42:41

你要什么样的暂停？

[LC100]建筑设计 21:43:04

(defun c:test ()
  (command "T91_TDIMMP" pause pause (* 10 (getvar "hpscale")) pause);T91_TDIMMP 天正的标命令
       );end

[alwtyp][alwtyp] 21:43:16

PAUSE可不可以？

[ZZXXQQ] 21:43:26

天正不会，也从来不用

[LC100]建筑设计 21:43:36

[qqimg]201307/{9C971793-6CBE-D41B-3183-B070E8C4719B}.jpg[/qqimg]

这里输入数字后，不回车

可以做到么？

[alwtyp][alwtyp] 21:44:05

不回车，那就空格嘛

[ZZXXQQ] 21:44:11

那就是GET系函数的作用

[LC100]建筑设计 21:44:26

怎么做，帮我把刚才的lsp改一下

(defun c:test ()
  (command "T91_TDIMMP" pause pause (* 10 (getvar "hpscale")) pause);T91_TDIMMP 天正的标命令
       );end

[ZZXXQQ] 21:44:46

你不是用了吗

[LC100]建筑设计 21:44:56

就pause吗？

lsp代码没写之前写了，但用不了。

[ZZXXQQ] 21:45:01

是

[LC100]建筑设计 21:45:13

这种跟刚才的宏都不同的效果。

[ZZXXQQ] 21:45:36

刚才的也是LISP代码

[LC100]建筑设计 21:45:40

宏的暂停是输入完后不回车的。  而这个pause呢多了个回车。

[ZZXXQQ] 21:46:22

你输入数后不回车试试

[LC100]建筑设计 21:47:02

那个数字，我是要电脑自动输入，而不是我手动输入。

命令: test

需要点或选项关键字。
; 错误: *error* 函数中出错ADS 请求被拒绝

请点取尺寸线位置或 [更正尺寸线方向(D)]:

请输入其他标注点或 [撤消上一标注点(U)]:

刚才的测试结果就是这样。

[ZZXXQQ] 21:47:51

那是你那个命令不能在command下使用

[LC100]建筑设计 21:48:07

我还以为你说的get是其它涵数来的呢。

但为什么宏的这个暂停又可以呢

[ZZXXQQ] 21:48:50

那是菜单的定义

[LC100]建筑设计 21:48:55

宏的这个过程跟我手动的过程是一模一样的。

[夏生生][x_s_s_1]生无可恋 21:49:02

[LC100]建筑设计 21:49:33

所以我就想问有谁能将这个代码转成真正的宏。

真正的宏，就可以用lsp调用了。

[ZZXXQQ] 21:49:56

概念不同，鸡同鸭讲

[夏生生][x_s_s_1]生无可恋 21:50:05

完全没听明白

[LC100]建筑设计 21:50:25

55

[夏生生][x_s_s_1]生无可恋 21:51:01

您说的到底是宏还是脚本

[LC100]建筑设计 21:51:29

[qqimg]201307/{48814221-51C7-8652-1EE6-862A300432FE}.jpg[/qqimg]

CAD定义这里写着宏

[夏生生][x_s_s_1]生无可恋 21:52:37

你那是菜单吧

[ZZXXQQ] 21:52:39

那就是SCR

[LC100]建筑设计 21:53:18

哦

那能搞到变成命令吗？

[夏生生][x_s_s_1]生无可恋 21:53:32

看看DIESEL表达式

[LC100]建筑设计 21:54:29

menucmd

是用这个来调用么？

[ZZXXQQ] 21:55:02

这是加载菜单

[LC100]建筑设计 21:55:16

怎么搞呢

生无可恋是不是会呢？

[ZZXXQQ] 21:55:54

天正不会

[LC100]建筑设计 21:56:02

不用会天正

[ZZXXQQ] 21:56:10

从来不用

[LC100]建筑设计 21:56:18

只要会调用那个脚本就行了。

[ZZXXQQ] 21:56:26

今后也不会去用

[LC100]建筑设计 21:56:45

你都会编写这么多了，肯定不会用啦。

[夏生生][x_s_s_1]生无可恋 21:58:19

天正建筑不会

[LC100]建筑设计 21:58:43

这个CAD里也有啊

[ZZXXQQ] 21:59:00

写个SCR

[夏生生][x_s_s_1]生无可恋 21:59:16

我还在用06的04阶段

[LC100]建筑设计 21:59:18

Z版我不会写啊。帮我写个

[ZZXXQQ] 21:59:25

将下面的命令另存为xx.scr

[alwtyp][alwtyp] 21:59:31

最近被菜单搞死。一个好好的MMU能在04中加载。在13中老说有问题

[ZZXXQQ] 21:59:42

然后用script调用

(setq a (getstring))
(setq b (getstring))
(setq c (getstring))
T91_TDIMMP
!a
!b
(* 10 (getvar "hpscale"))
!c

[LC100]建筑设计 22:00:37

不能用命令调用吗？

就写成命令

[ZZXXQQ] 22:01:18

可以写个LISP来调用，但只能是在LISP的最后

[ZZXXQQ] 22:01:58

(defun c:tt ()
(command "_.SCRIPT" "xx.scr")
)

[LC100]建筑设计 22:01:59

scr一点都不会

[alwtyp][alwtyp] 22:03:05

相当于批处理？

BAT?

[LC100]建筑设计 22:04:23

加载不了scr

[夏生生][x_s_s_1]生无可恋 22:06:10

就是把你执行过的命令复制下来，拷贝成scr

[alwtyp][alwtyp] 22:06:47

变量前加！是什么意思？

[LC100]建筑设计 22:06:50

这个脚本，还真没搞过。

Z版，能远程帮我搞一下么

[ZZXXQQ] 22:07:37

没空

[LC100]建筑设计 22:07:48

求你啦

[ZZXXQQ] 22:08:01

前面给你代码了

[LC100]建筑设计 22:08:05

我搞这个东东求好久了。都没成功。难得你会。

[ZZXXQQ] 22:08:15

我不会

从来没用过天正

[LC100]建筑设计 22:08:35

都不用会天正。

[VBALISPER]恐龙 22:08:51

你去天正群问问可能会有收获的

[LC100]建筑设计 22:09:13

你有天正群?

[VBALISPER]恐龙 22:09:25

没有.我也不用天正

[LC100]建筑设计 22:09:55

哦。都高手。

[夏生生][x_s_s_1]生无可恋 22:11:19

专业不同

不要轻易问专业外挂软件的问题

[LC100]建筑设计 22:11:55

我想我找到别的办法了。

[夏生生][x_s_s_1]生无可恋 22:12:11

建筑设计用天正别的专业不一定用

直接用command解决就蛮好的

[LC100]建筑设计 22:13:21

他解决不了这个暂停

[夏生生][x_s_s_1]生无可恋 22:14:43

还是上学的时候用过天正3做毕业设计

现在的天正完全不会了

明经快报

拓荒者 22:27:36