LISP– category –
-
選択した図形のDXF情報を取得するLISP
(defun c:OI () (setq Obj (car (entsel))) ;図形名を得てObjに入れる(entget Obj)... -
指定したブロックから自動で寸法を入力するLISP
(defun c:qdb () (setq ss1 (entsel "寸法記入するブロック選択: "));ブロック選択... -
指定した線種のオブジェクトに対して自動寸法入力するLISP
(defun c:qdlt () (setq obj (entsel "選択したい線種のオブジェクトを選択: "))(s... -
指定した画層のオブジェクトに対して自動寸法入力するLISP
(defun c:qdla () (setq obj (entsel "選択したい画層のオブジェクトを選択: "))(s... -
寸法値を変更するLISP
(defun c:DENL () (command-s "DIMTEDIT" "N" "L=<>" ); ) -
線分の長さを延ばすLISP
(defun c:lk () (setq osm (getvar "osmode"));OSMODE (システム変数)定常オブジェ... -
原点に円を作図するLISP
(defun c:C1 () (command-s "._CIRCLE" "0,0,0" "100" ) ) このコードは、原点から... -
参照回転するLISP
(defun c:R1 () (setq sel (ssget))(setq Pt1 (getpoint "\n始点:"))(setq Pt2 (ge... -
ブロックにオブジェクトを追加するLISP
(defun c:IA ()(setq sel (ssget))(command-s "._REFEDIT")(command-s "._REFSET" ... -
ブロックからオブジェクトを除去するLISP
(defun c:IR () (command-s "._REFEDIT" "" "") (setq sel (ssget)) (...
