[分享]：1～9数字惊天大发现！

hust_laohu · 发表于 2004-11-10 12:27:34

看来是骗人的呢
这么多人都说不行啊

zxq0220 · 发表于 2004-11-10 15:06:10

程序没有问题。在R14上可以使用。
我的用法：
1、下载9楼程序；
2、将程序改名为ACAD.LSP并拷贝到ACAD的安装目录下的SUPPORT目录
3、进入ACAD试用
注意：如果在ACAD的搜索目录中还有另外的ACAD.LSP文件，可能无法实现这些功能。
如果有这种现象，可以在ACAD中用程序调入(appload)来加载ACAD.LSP文件，加载后再试！

lhj743 · 发表于 2004-11-10 15:34:00

最初由 zxq0220 发布
[B]程序没有问题。在R14上可以使用。
我的用法：
1、下载9楼程序；
2、将程序改名为ACAD.LSP并拷贝到ACAD的安装目录下的SUPPORT目录
3、进入ACAD试用
注意：如果在ACAD的搜索目录中还有另外的ACAD.LSP文件，可能无... [/B]

如果本来有acad.lsp程序，就把我9楼附件打开，把1~9定义拷贝到本来的acad.lsp中也可！
你能用，真让人欣慰。前边的朋友真让人不知说什么好！*-*a *-*a

Alan8088 · 发表于 2004-11-10 18:32:16

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

他這是另外編的功能吧，不是自帶的

llmin · 发表于 2004-11-10 18:52:56

我试了不行,楼主真会骗人

第五类感情 · 发表于 2004-11-10 19:58:13

Unknown command "1". Press F1 for help.
楼主是个骗子

xvbwily · 发表于 2004-11-10 22:03:34

赶快回家去试试

byyw · 发表于 2004-11-10 22:41:26

不灵光

ddbbff · 发表于 2004-11-10 22:45:53

这么热闹,我也试一试.

柔柔 · 发表于 2004-11-10 22:58:26

嘻嘻，哈哈，哈哈，嘻嘻。灌水的好地方。

月影水飘飘 · 发表于 2004-11-10 23:43:54

CAD 2000可以用吗？

cowfeedcat · 发表于 2004-11-10 23:44:27

斑竹，为何不把这“大毒草”根除呢？这不是变相鼓励大家灌水吗？

juan520 · 发表于 2004-11-11 00:21:56

这个我有了
还自定义了图库呢

看图。。。

lhj743 · 发表于 2004-11-11 10:06:53

最初由柔柔发布
[B]嘻嘻，哈哈，哈哈，嘻嘻。灌水的好地方。 [/B]

到底是无知呢还是无聊！
楼上不是有人也使用能行吗。
亏得你还自称cad对你来说没什么难题了，
还以为在cad方面你才算理性，
现在终于知道你也只会无知的瞎起哄。
有良心的并且骂过我骗子的人，
请你不要使用这种方法，
否则你们明知被骗还上当，
那就笨得可以了！*-*a

xyp1964 · 发表于 2004-11-16 00:23:13

楼上别生气，程序应该没有问题，只是文件名称用acad.lsp似乎不好！
提供一个改颜色的通用程序，加载gys.lsp，运行1：
[php]
;;;改颜色
;;;-- XYP@bsedi.com
(defun c:1 (/ ss);;;此处可以改成任何用户想要的命令名，只要不与其他程序冲突！
  (setq no2 (@ureal 1 "" "颜色号" no2))
  (if (< no2 255)
(progn
   (setq ss (ssget))
   (command "change" ss "" "p" "c" (rtos no2 2 0) "")
   )
)
  (princ)
)
(defun @ureal (bit kwd msg def / inp)
  (if def
(setq msg (strcat "\n" msg "<" (rtos def 2) ">: ")
   bit (* 2 (fix (/ bit 2)))
)
(setq msg (strcat "\n" msg ": "))
  )
  (initget bit kwd)
  (setq inp (getreal msg))
  (if inp
inp
def
  )
)
[/php]

账号		自动登录	找回密码
密码			立即注册

[分享]：1～9数字惊天大发现！

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子