[求助]：将直线命令分解成多个独立的直线命令

yxianfo

哪位高人能用LSP或其他程序，编一个将直线命令“L”分解成多个独立的直线命令（如L1、L2、L3、L4……）的程序。这样就可以很好的将各直线命令与自选图层的程序结合起来使用。如L1……粗实线、L2……细实线、L3……点划线、L4……虚线、L5……双点划线等等。编出这样的程序，相信会有很多人去使用。不知能否实现，期待奉献。

浪奔

好主意!
这个当然是可以实现的了.

黄河之水

我想这是行的

zml84

思路可以是这样的：
(defun c:Ln()
setp1:存储当前线形设置，设置本命令绘制直线使用的线形为当前；
setp2:调用系统定义的_line命令；
setp3:恢复线形设置。
)

浪奔

最初由 zml84 发布
[B]思路可以是这样的：
(defun c:Ln()
setp1:存储当前线形设置，设置本命令绘制直线使用的线形为当前；
setp2:调用系统定义的_line命令；
setp3:恢复线形设置。
) [/B]

楼上思路可以作为基础．

我认更为关键的是：要让线型比例自动匹配到当前图形中．否则，不管用什么线型画图，最后显示的结果可能都是实线.

yxianfo

很难实现吗？请有能力的人士辛苦一下，奉献出来可给很多人带来方便，先谢了！