热心的高手进……………………

kic

既然你进来了就说明你很热心，谢谢了,那我就给大家填点麻烦,请大家帮忙^^^^^

1、如何实现双线或多线的多段线，现在AutoCAD的多段线只能一次画一条，而且不能话圆弧，我很需要这样的函数。

2、如何实现4~5条可以同时画的多线，小弟画三维效果图的时候只能一条一条的画，费时费力，AutoCAD只能同时画两条。

3、因为每次做设计都要设置很多个必须的图层，我想把这些重复的工作作成一个初始化的命令，但是限与水平太洼了，做不出来。

4、在宏里面如何表示相对坐标。

以上是我这个菜菜给大家提的我面临的难题，呵呵，希望高手们不吝指教，在线等待中………………………………………………………………

超然A

3、因为每次做设计都要设置很多个必须的图层，我想把这些重复的工作作成一个初始化的命令，但是限与水平太洼了，做不出来。

这个很简单啊，你自己先做好一个什么图层都设置好了的样图，以后每次都打开这个样图，然后“另存为”你要画的图就可以了。

jdhszh

你可以考虑画了一条偏移处理,给你一个可以左右偏移的程序，若需要改一下偏移的数目，按你的要求改一下就可以
(defun c:py()
(setvar "cmdecho" 0)
(setq old_lay (getvar "clayer"))
(setq new_lay (getstring "\n输入要偏移到的图层:"))
(setq new_dist (getreal "\n输入要偏移的距离:"))
(command "-layer" "m" new_lay "")
(setq s(ssget))
(setq a 0)
(repeat (sslength s)
(setq e1(ssname s a))
(setq z (entget e1))
(setq m (assoc 10 z))
(setq pt3 (list (- (cadr m) new_dist) (- (caddr m) new_dist)))
(setq pt4 (list (+ (cadr m) new_dist) (+ (caddr m) new_dist)))
(command "offset" 4 e1 pt3 "")
(command "chprop" (entlast) "" "layer" new_lay "")
(command "offset" 4 e1 pt4 "")
(command "chprop" (entlast) "" "layer" new_lay "")
(setq a(1+ a))
)
(command "-layer" "s" old_lay "")
(setvar "cmdecho" 1)
)

别晨

超然A发表于2006-3-26 8:18:003、因为每次做设计都要设置很多个必须的图层，我想把这些重复的工作作成一个初始化的命令，但是限与水平太洼了，做不出来。 这个很简单啊，你...

做个模板（dwt）文件

无痕

1、如何实现双线或多线的多段线，现在AutoCAD的多段线只能一次画一条，而且不能话圆弧，我很需要这样的函数。

2、如何实现4~5条可以同时画的多线，小弟画三维效果图的时候只能一条一条的画，费时费力，AutoCAD只能同时画两条。

1.mline不能画弧，没办法

2 可以设置，用 mlstyle命令。

kic

非常感谢各位楼主,初始化的命令已经解决了,就是我想做的那个多线命令是个空间多线,不是在一个平面上的,不知道能不能解决!!