2013-11-15 明经 AutoLISP 编程(102918348) 群聊记录：[1/7](defun C:tt (/ EN ENT LST LST1 OL

明经快报

[偏爱云~小吴]偏 08:40:16

[1/7](defun C:tt (/ EN ENT LST LST1 OLDAUN OLDOSM T SS i ptlst ss1 STR TXT ZG)
 (setq oldaun (getvar "aunits")
       oldosm (getvar "osmode"))
 (setvar "aunits" 3)   ;设为弧度
 (setvar "osmode" 0 )

[4/7](ssname ss1 0))));取出第一个数据
     (setq pt (cdr(assoc 10 ent))
          txt (cdr(assoc 1 ent))
           zg (cdr(assoc 40 ent))
           lst (cons (list pt txt zg) lst);;获取表
           ss (ssdel en

[6/7](setq pt (car (last lst1));插入点
          zg (last (last lst1)));字高
    (setq pt (polar pt (* pi 0.5) zg))
    (vl-cmdf "MTEXT" pt "H" zg "W" 0 (substr str 1 (1- (strlen str))) "")
   ))
  )
 ))

[偏爱云~小吴]偏 08:40:49

为什么显示ssget错误

明经快报

[偏爱云~小吴]偏 09:09:52

6 92kA1B5a9b07fe56a6ce8c      50kDaccWxdbYDccJZN{B04846E-F0CD-549C-6859-43A85FC121F65}.jpgA

[偏爱云~小吴]偏 09:11:01

并且返回数据顺序错位

明经快报

[pzweng][pzweng]路人 09:29:35

如何在位编辑嵌套块

[pzweng][pzweng]路人 09:30:41

如何在位编辑嵌套块内指定的块

明经快报

[q3_2006]q2 09:46:23

[qqimg]201311/{7C5821E6-E4A9-81A6-77DB-E2DF117D4298}.gif[/qqimg]

张勇 09:47:34

好東西啊

明经快报

[llsheng_73]■■■ 10:14:39

请教一下
(vlax-curve-getClosestPointTo a '(199.16 54.4233 0.0) 0)
(199.16 54.5984 0.0)

明经快报

[llsheng_73]■■■ 10:41:53

请问下怎么修改一个线对象的起点坐标和终点坐标
用VLax或者VLA

明经快报

[xieling888] 11:00:12

(COMMAND "TEXT" "S" "INFO" T 2.5 0 "新  兴  环  境")

[偏爱云~小吴]偏 11:00:24

[4/7](ssname ss1 0))));取出第一个数据
     (setq pt (cdr(assoc 10 ent))
          txt (cdr(assoc 1 ent))
           zg (cdr(assoc 40 ent))
           lst (cons (list pt txt zg) lst);;获取表
           ss (ssdel en

[1/7](defun C:tt (/ EN ENT LST LST1 OLDAUN OLDOSM T SS i ptlst ss1 STR TXT ZG)
 (setq oldaun (getvar "aunits")
       oldosm (getvar "osmode"))
 (setvar "aunits" 3)   ;设为弧度
 (setvar "osmode" 0 )

[6/7](setq pt (car (last lst1));插入点
          zg (last (last lst1)));字高
    (setq pt (polar pt (* pi 0.5) zg))
    (vl-cmdf "MTEXT" pt "H" zg "W" 0 (substr str 1 (1- (strlen str))) "")
   ))
  )
 ))

[7/7](setvar "aunits" oldaun)   ;设为弧度
 (setvar "osmode" oldosm )
 (princ)
)帮忙看下为什么不能批量,而且转换后xyz顺序颠倒变成zyx

[xieling888] 11:00:45

(COMMAND "TEXT" "S" "INFO" T 2.5 0 "新  兴  环  境")

为什么我这个在CAD里生成不了呢

[xieling888] 11:01:22

[qqimg]201311/{1C27ADB6-8EA9-6899-A70A-9644498896A8}.jpg[/qqimg]

提示这个

[llsheng_73]■■■ 11:01:44

你用了没有的文字样式。。。

“INFO”是一个文字样式，但你的图中没有这个

[xieling888] 11:02:21

[qqimg]201311/{47ABAAB2-3697-7E35-81F4-D1F39BD51809}.jpg[/qqimg]

(COMMAND "TEXT" "S" "style1" T 2.5 0 "新  兴  环  境")

这样行吗

[llsheng_73]■■■ 11:03:01

只要图中有它就可以

[xieling888] 11:03:09

也不行

[llsheng_73]■■■ 11:03:33

也不行的话那是后边的参数出错了吧？

难道字体样式名要区分大小写？

具体不知道，不用COMMAND好久了

[xieling888] 11:04:26

我再试试

[llsheng_73]■■■ 11:05:31

你应该先在键盘上自己运行TEXT，仔细看看它的过程中出现的参数顺序。。。

[龙崽子] 11:06:09

大神们 请教个问题怎么在64位系统上安装32位的cad2010

[llsheng_73]■■■ 11:06:16

郁闷得很，弄了一半天了，不知道怎么用
vla-put-startpoint

[龙崽子] 11:06:46

大神们 请教个问题怎么在64位系统上安装32位的cad2010

[龙崽子] 11:07:21

我想安装pccad 在64位系统里

[龙崽子] 11:07:52

谢谢大家了  帮忙解决一些

一下

[龙崽子] 11:08:29

[llsheng_73]■■■ 11:08:56

你这是个难题，不然autodesk也不会没事干开发一个32位版本和一个64位版本

[龙崽子] 11:09:33

哎！！！ 看来只有换系统了

[龙崽子] 11:10:42

新机子安装的是win8 64位的  郁闷

[llsheng_73]■■■ 11:11:30

如果屏幕不支持触屏，我不知道WIN8有什么用。。。

[龙崽子] 11:11:40

我照网上找的办法修改了cad 还是不行

我感觉和win7没有区别

就是少了一个开始菜单

出来是个开始界面

[llsheng_73]■■■ 11:16:58

晕，弄了半天，stratpoint对于ARC和SPLINE是只读的，怪不得搞半天它就
误: ActiveX 服务器返回错误: 未知名称: StartPoint

诸葛四郎 11:17:52

http://bbs.mjtd.com/forum.php?mod=viewthread&tid=77645

请教一下，这个函数怎么改成

数字在前面变更，日期在后面呢：

比如：

CGD010005-K1AD0AY1(131115)
后面的1变化，日期跟着系统时间变动

诸葛四郎 11:24:57

请教一下，这个函数怎么改成

数字在前面变更，日期在后面呢：

比如：

CGD010005-K1AD0AY1(131115)
后面的1变化，日期跟着系统时间变动

[qqimg]201311/{80A94640-CCC4-B090-3BDB-A70FD23F5984}.jpg[/qqimg]

[llsheng_73]■■■ 11:27:52

[qqimg]201311/{9A3E9FED-F486-BE15-4860-45FCA8F88BDE}.jpg[/qqimg]
这个地方把1写到前边去就行了

诸葛四郎 11:28:32

好像我试过了

不行

[llsheng_73]■■■ 11:29:08

你想弄成什么样子？

诸葛四郎 11:29:43

CGD010005-K1AD0AY1(131115)
CGD010005-K1AD0AY2(131115)
CGD010005-K1AD0AY3(131115)
.
.
.

文件名可以这样保存

[llsheng_73]■■■ 11:30:38

(command "_.saveas" ""(strcat path newname "1(" date ")"))

那个1还得变是吧？

诸葛四郎 11:31:23

是的

[llsheng_73]■■■ 11:31:42

(command "_.saveas" ""(strcat path newname (itoa i)"(" date ")"))

[llsheng_73]■■■ 11:32:18

至于i对应到你程序中应该是哪个变量自己改过去就是了

[llsheng_73]■■■ 11:33:16

好象是hz?

诸葛四郎 11:33:51

你怎么不接受啊

[llsheng_73]■■■ 11:34:19

看你刚才发的那个图片能看清楚

诸葛四郎 11:35:29

能给我修改一下啊

[llsheng_73]■■■ 11:35:58

给你说了改那个地方以及怎么改，自己动手就行了

诸葛四郎 11:36:31

不会改啊

[llsheng_73]■■■ 11:38:24

真正不会的话正好以修改别人的程序来入手，不要怕被改坏，反正有备份的

诸葛四郎 11:39:00

我按照你的修改过了还不行呢

[llsheng_73]■■■ 11:39:18

改了之后是什么样子的？

诸葛四郎 11:39:26

[qqimg]201311/{C85B9319-FAEF-895B-DD99-C3ECA08E06FB}.jpg[/qqimg]

[qqimg]201311/{3FAA0EE2-AF4D-5A6C-0F9B-95DA70C84390}.jpg[/qqimg]

[llsheng_73]■■■ 11:40:03

说过了那个i得对应到你程序中相应的变量。。。

诸葛四郎 11:40:26

不懂

那个变量

[llsheng_73]■■■ 11:40:46

另外你程序中有类似的地方两个，两个地方都要改

诸葛四郎 11:40:58

好

[pzweng][pzweng]路人 11:41:04

改好名字

群昵称修改为“[论坛用户名]网名”格式，如果你未加入明经CAD社区，请先到http://bbs.mjtd.com注册用户。

[llsheng_73]■■■ 11:41:47

但都不能直接用I,好象你程序中是HZ?
[qqimg]201311/{701D6824-A4F3-FA32-C46C-8419CE597ABE}.jpg[/qqimg]

诸葛四郎 11:42:23

命令吗？

HZ是什么

[pzweng][pzweng]路人 11:42:45

诸葛四郎 请看群规

诸葛四郎 11:43:08

群规？

[llsheng_73]■■■ 11:43:20

[qqimg]201311/{73CE8D85-9147-5DC6-A1A1-157D9A4D777D}.jpg[/qqimg]

[pzweng][pzweng]路人 11:43:35

群昵称修改为“[论坛用户名]网名”格式，如果你未加入明经CAD社区，请先到http://bbs.mjtd.com注册用户。

诸葛四郎 11:43:58

我的网名和论坛用户名是一样 的

[pzweng][pzweng]路人 11:44:12

仔细看

[llsheng_73]■■■ 11:44:38

那就直接加个[]

[诸葛四郎] 11:46:13

好

是不是这样

还是不行

[llsheng_73]■■■ 11:47:38

这文件名也够长的

[llsheng_73]■■■ 11:48:49

问题改它和不改它有什么区别么？

明经快报

[诸葛四郎] 12:04:49

老哥，不会啊。麻烦修改一下哇

明经快报

[pzweng][pzweng]路人 13:14:58

张翰84年的，郑爽91年的，他大三 的时候，她初二；刘恺威74年的，杨幂 86年的，他大三的时候，她小学一年 级；吴奇隆70年的，刘诗诗87年的，他 大三的时候，她还没上幼儿园。

杨振宁大三的时候，他岳母都还没 生呢。

[shasha488][shasha488]nIhaO 13:17:54

明经快报

[llsheng_73]■■■ 13:38:31

记得论坛上有个SSGET参数的帖子很详细的，一时找不到它了。。。