반응형 전체 글303 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. 캐드리습에서 (getstring 따옴표 없이 입력받기 (getstring 함수는 문자열을 입력할 때 사용하는 함수.근데, 리습을 실행하면 입력할 때 " 큰따옴표를 넣고 입력해야 정상적으로 입력이 됨아~~ 귀챠니즘~~ 따옴표 없이 입력 받고 싶다면, T 를 쓰시오(setq str (getstring T "\n문자열을 입력하세요: ")) 2026. 9. 9. 지정 레이어, 선종류 등 있는지 확인하기 https://www.google.com/search?q=tblobjname+autolisp&oq=%28tblobjname&gs_lcrp=EgZjaHJvbWUqBggBEAAYHjIGCAAQRRg5MgYIARAAGB4yBwgCEAAY7wUyBwgDEAAY7wUyBwgEEAAY7wUyBwgFEAAY7wXSAQkyMzg1ajBqMTWoAgGwAgE&sourceid=chrome&source=chrome.rb&ie=UTF-8&atvm=2(tblobjname table-name symbol-name)(if (tblobjname "LTYPE" "HIDDEN2")hidden2 가 로드되어 있는지 확인,,, 없으면 로드하기다음 코드는 "AA-WALL_DEMO" 레이어가 있으면,그 레이어의 선종류를 "HIDDEN2"로 지.. 2026. 9. 4. Edit Default String by DCL 기본 문자열을 글자 그대로 띄워놓고 커서를 움직여 일부만 수정 🔎 캐드 리습 문자열 입력에서 디폴트 문자열 보여주고 편집하기: Google 검색 www.google.com(defun c:EditDefault ( / defVal dcl_id userVal txtFile) (setq defVal "수정할 기본 문자열") ; 기본값 ;; 1. 임시 DCL 파일 생성 (setq txtFile (open (setq dclFile (vl-filename-mktemp "editbox.dcl")) "w")) (write-line "edit_text : dialog { title = \"문자열 편집\";" txtFile) (write-line " : edit_box { label = \"내용 : \"; k.. 2026. 9. 1. 이전 1 2 3 4 ··· 51 다음 반응형