[求助]：三个问题如何解决

真龙天子

问题一、在lisp里设置standard文字样式和txt.shx字体用下面的代码出错，怎么解决。
(command "_style" "standard" "txt.shx" "0" "1" "" "" "" "")
问题二、怎样在lisp里删除已经不用的、块名为km的块。
问题三、已知块名为kb的块是一多义线，在lisp里插入kb时，如果X、Y的比例小于或等于1，块分解后多义线是连续的，如果插入kb时的X或Y的任何一个比例大于1，块分解后多义线是不连续的，变成了一条条直线段。求如何在插入块时X或Y的任何一个比例大于1的情况下分解块后的多义线仍然保持是连续的解决方法。

xyp1964

一、似乎没问题
二、(command "purge" "b" "km" "y" "y")
三、似乎不行

cy956

(DEFUN c:sty1 (/ k)
  (command "-style" "standard" "romans" "" 0.6 15 "" "" "")
  (SETQ        K (acqs        "\nÇëÑ¡Ôñ×ÖÐÍÅäÖ÷½°¸: 1-DXFS+S; 2-DXFS+S+ST1+HT1 " "1"))
  (COND
    ((= "1" K)
     (sty3 "S" "ROMANC.shx,S.shx" 1.0)
     (sty2 "DXFS" "ROMANS.shx,DXFS.shx" 0.7)
    )
    ((= "2" K)
     (sty3 "S" "ROMANC,S" 1.0)
     (sty3 "ST1" "SIMSUN.TTF" 0.7)
     (sty3 "HT1" "SIMHEI.TTF" 1)
     (sty2 "DXFS" "ROMANS,DXFS" 0.7)
    )
    (T)
  )(princ)
)
(DEFUN sty2 (#sty #zt #w)
  (COMMAND "-style" #sty #zt 0.0 #w 0.0 "" "" "")
)
(DEFUN sty3 (#sty #zt #w)
  (COMMAND "-style" #sty #zt 0.0 #w 0.0 "" "")
)

3的问题其实应该说是在xyz比例不等时才会出现。这时圆弧变成椭圆，有宽度的pl线看上去象有一个平行四边形的填充，前者无法和其他线连成pl，后者无法用线表达，所以炸开后抛弃宽度和连续的关系。这也是cad的矢量数据方式决定的。

真龙天子

回三楼的，只要xyz的比例都小于１，比例不等也不会出现不连续的现象，如果其中一个比例只要大于１，哪怕是万分之一，pl线就不会连续了．
我想请教XYP先生,多义线分解后变成了一条条的直线,能否把这些直线加进一个选择集SS,再用多义线编辑命令把这些直线连接起来,我想是应该可以连接的,但是怎么把它们加进选择集我就不得而知了,还得请大侠们指点一二.

doswin

entlast
entnext

LADESIGNER

(ssget "p")