个人信息
状态: 当前离线
gao8888
发短消息 加为好友
日历
« 2008-12  
日一二三四五六
 123456
78910111213
14151617181920
21222324252627
28293031   
回复
更多
收藏的版块
更多
    文集
    更多
    AutoCad | 2008-4-4
    **线形反向***(defun c:fx()　　　　(setq ss(ssget) mun 0)(repeat (sslength ss)　　　　(setq entl-y (ssname ss mun))　　　　(command "pedit" entl-y "d" "")　　　　(setq entl(entget entl-y))　　　 (if (= "POLYLINE" (cdr(assoc 0 entl))) (command "pedit" entl-y "lt" "on" "x"))　　　 (if ( ...
    查看(383) | 评论(2) | 收藏
    主题
    更多