반응형 array1 Explode Minsert Block ;ARRAY MODULE (defun KM:ARR_non ( / ) (princ) ) (defun KM:ARR_rec (CNT_RW CNT_CL DIS_RW DIS_CL) (command ".-array" (entlast) "" "R" CNT_RW CNT_CL DIS_RW DIS_CL) (princ) ) (defun KM:ARR_lin (CNT_RW CNT_CL DIS) (command ".-array" (entlast) "" "R" CNT_RW CNT_CL DIS) (princ) ) ;EXPLODE MINSERT BLOCK (defun KM:XM ( ENT / NT DXF_ENT NAM_BL COR_IN CNT_RW CNT_CL DIS_RW DIS_CL LYR COLR CLYR) ;(if (setq E.. 2022. 1. 19. 이전 1 다음 반응형