求助:怎样用entmake生成真彩色多段线
本帖最后由 lht 于 2018-4-26 18:58 编辑已知:点P1和点P2,高程Z,线宽L,真彩色R、G、B值,请高手们用entmake帮写个生成多段线的函数。
试试这个:
(entmake (list '(0 . "LWPOLYLINE") '(100 . "AcDbEntity") '(100 . "AcDbPolyline") (cons 420 (logior (lsh (fix R) 16) (lsh (fix G) 8) (fix B))) (cons 90 2) (cons 43 L) (cons 38 Z) (cons 10 pt1) (cons 10 pt2)))
谢谢ssyfeng老师,函数很好用,达到了目的,真是高手! 怎么用啊?????????
页:
[1]