请高手更改程序，编辑填充角度
<p>目的：如果角度为0度，那么编辑填充角度为90度</p><p> 如果角度为90度，那么编辑填充角度为0度</p><p>;;;编辑填充角度 <br/>(defun c:EH (/ SS SS1)(STRCAT "请拾取填充区域进行编辑角度为90°")(setvar "pickbox" 23) <br/>(setq SS (ssget))(setq SS1 (ssadd))(ssadd (entlast) SS1)(repeat (sslength SS1))<br/>(command "change" SS "" "p" "c" "BYLAYER" "la" "剖面线层" "" "_.hatchedit" SS "" "" "" "90" ))</p>
页:
[1]