본문 바로가기
반응형

전체 글306

배경색상 레이어 만들기 1. 지정 색상 레이어 만들기(vl-load-com);; Core function to assign RGB to a specific layer(defun SetLayerColorRGB (layerName r g b / acadObj doc layers layerObj colorObj) (setq acadObj (vlax-get-acad-object) doc (vla-get-activedocument acadObj) layers (vla-get-layers doc) ) ;; Check if the layer exists (if (vl-catch-all-error-p (setq layerObj (vl-catch-all-apply 'vla-item (list layer.. 2026. 10. 12.
OLE->RGB by LeeMAC (defun LM:OLE->RGB ( c ) (mapcar '(lambda ( x ) (lsh (lsh (fix c) x) -24)) '(24 16 8)))leemac, He is Genius!! 2026. 10. 12.
기존 dwg 열어서 문자 수정한 후 다른 이름으로 저장 🔎 acad lisp 기존 dwg 열어서 문자 수정한 후 다른 이름으로 저장하는 리습: Google 검색 www.google.com(vl-load-com)(defun c:CHG_SAVEAS ( / acadObj docsObj targetFile saveFile oldText newText dbxDoc) (setq acadObj (vlax-get-acad-object)) (setq docsObj (vla-get-documents acadObj)) ;; 1. 사용자 입력 받기 (setq targetFile (getfiled "원본 DWG 파일 선택" "" "dwg" 0)) (if (not targetFile) (exit)) (setq saveFile (getfiled "새로운 이름으로 저.. 2026. 9. 29.
OPENING DWG to EDIT 1. Openinghttps://www.cadtutor.net/forum/topic/32134-open-drawing-using-lisp/(defun KM:OPEN ( / ) (vl-load-com) ; (setq path_stamp_dwg "C:\\TEMP\\STAMP\\") (setq pref_stamp "STAMP_REFERENCE_DWG_") (setq date_stamp (getstring T "Specify date: ")) (setq path_name_dwg (strcat path_stamp_dwg pref_stamp "(" date_stamp ").dwg")) ; (if (= 0 (getvar "SDI")) (vla-activate (vla-open (vla-get-doc.. 2026. 9. 16.
파일명 일괄 수정하기 파일명을 규칙에 따라 일괄 변경하는 방법 - Windows PowerShell 이용특정 폴더 안에 이미지 파일을 정리해두었는데... 파일명을 일괄 바꾸어야 하는 상황이 몇 번 있었습니다. ...blog.naver.com파워쉘에서 dir | rename-item -newname {$_.name -replace "x.dwg", ".dwg"}gdsagsahgagewtrf524163467x.dwg --> gdsagsahgagewtrf524163467.dwg~~x.dwg 에서 ~~.dwg로 일괄 바꿈^^ 2026. 9. 11.
ScriptPro AutoCAD에서 ScriptPro v2.0을 사용하여 스크립트를 실행할 수 없음 www.autodesk.comhttps://help.autodesk.com/sfdcarticles/attachments/ScriptProSetup.zip이상의 경로는 설치파일 경로입니다.(현재 3.0 버전)AutoCAD에서 공식으로 제공하는 스트립트 프로입니다.기존 사용하던 AutoScript for AutoCAD(Freeware)는 회사정책으로 재설치가 안되어 갈아탐https://kmlab.tistory.com/118 Auto Run Script같은 스크립트(리습 등등)를 여러 dwg 파일에 동일하게 실행하고 싶다면, 예를 들어, 여러개의 dwg 파일을 출력하거나, 변환하거나, 검사하거나, 등등. 오토스크립트에 여러 dw.. 2026. 9. 10.
반응형