CAD&BIM

AutoCAD → (119)건

  1. Flatten a 3D Drawing 1.0.0
    2021.11.09
  2. 2D 나무 심볼 모음
    2021.11.09
  3. 임의의 점에서 원이나 호에 접하는 선 그리기
    2021.11.09
  4. 치수선 값을 엑셀로 내보내기
    2021.11.09
  5. Exporting Dimensions to Excel
    2021.11.05
  6. 객체 교차점을 끊는 LISP BreakObjects.lsp
    2021.10.20
  7. layer on off
    2021.10.20
  8. layer filters delete
    2021.10.20
  9. 선형에 객체를 일정 간격으로 삽입하기
    2021.10.20
  10. 교차점에 블록 삽입하기
    2021.10.20
  11. 선택한 블록만 이름 변경하기
    2021.10.20
  12. 형강 작도 lisp
    2021.10.20
  13. 기준선 각도로 text, mtext, block 다중선택 회전하기
    2021.10.19
  14. 블럭 insert point 변경하기
    2021.10.19
  15. RENAME명령
    2021.10.18
  16. 문자 내용을 복사해서 붙여넣기
    2021.10.06
  17. AutoCAD에서 내부 블록 편집기(REFEDIT)로 블록을 편집하는 방법
    2021.10.06
  18. diet LISP
    2021.09.25
  19. SCRIPT를 이용하여 point, pline, text 입력하기
    2021.09.24
  20. 이거 어떻게 그리나요?
    2021.09.01
  21. Parabola 곡선 그리기
    2021.08.12
  22. gstarCAD에서 다정다감이용하기
    2021.08.11
  23. 경로에 맞게 배열하는 방법 arraypath
    2021.07.13
  24. Autodesk dwg view DWG TrueView
    2021.07.01
  25. pipe fitting 3d
    2021.06.23
  26. 3D Screw 그리기
    2021.06.22
  27. 객체 선택시 Shift키를 사용하여 선택에 추가(PICKADD)
    2021.06.17
  28. CAD파일 치명적 오류로 저장도 못하는 상황 대처 방법
    2021.06.11
  29. 삼각함수 lisp
    2021.06.09
  30. 치수의 숫자값을 강제입력으로 변경해주는 lisp
    2021.06.09

Flatten a 3D Drawing 1.0.0

; Flatten a 3D drawing ; Written by Lee Mac (http://www.lee-mac.com/) ; This script will set all z values to zero, efectively flattening any 3D drawing. ; (defun c:flat ( / doc org ) (setq doc (vla-get-activedocument (vlax-get-acad-object)) org (vlax-3D-point 0 0 0) ) (vlax-for blk (vla-get-blocks doc) (if (= :vlax-false (vla-get-isxref blk)) (vlax-for obj blk (if (vlax-write-enabled-p obj) (for..
AutoCAD 2021. 11. 9. 12:31

2D 나무 심볼 모음

이 팩의 계획 트리 기호는 AutoCAD 릴리스 14 이상과 호환됩니다. 모든 도면은 비교적 작으며(25-30KB) AutoCAD 내에서 블록으로 사용하기에 적합합니다. 조경 건축 계획에 이상적으로 적합합니다. 나무는 1 도면 단위의 반경으로 그려졌습니다. 필요한 크기로 나무를 삽입하려면 필요한 반경을 삽입 축척 계수로 입력하기만 하면 됩니다. 나무는 모두 레이어 0에 그려지므로 삽입될 때 현재 레이어의 특성을 적용합니다. 따라서 개체 속성을 쉽게 제어할 수 있도록 삽입하기 전에 새 레이어를 만드는 것이 좋습니다. 각각의 경우 삽입 기준점은 캐노피 중앙에 있습니다. 출처:http://www.cadtutor.net/
AutoCAD 2021. 11. 9. 12:30

임의의 점에서 원이나 호에 접하는 선 그리기

임의의 점에서 원이나 호에 접하는 선 그리기 ;; TAP -Gilles Chanteau- (maj 12/06/10) ;; Draw tangent lines to specified curve ;; The line length is entered at the command prompt or with the cursor. ;; 3d working whatever the ciurrent view except if the the line direction ;; is perendiculat to the view plane
AutoCAD 2021. 11. 9. 11:22

치수선 값을 엑셀로 내보내기

ttt.lsp ;; free lisp from cadviet.com ;;; this lisp was downloaded from http://www.cadviet.com/forum/topic/98743-nho-viet-lisp-xuat-text-tu-cad-sang-excel-dang-cot-theo-thu-tu-chon/ (defun LM:writecsv ( lst csv / des sep ) (if (setq des (open csv "w")) (progn (setq sep (cond ((vl-registry-read "HKEY_CURRENT_USER\\Control Panel\\International" "sList")) (","))) (foreach row lst (write-line (LM:ls..
AutoCAD 2021. 11. 9. 11:20

Exporting Dimensions to Excel

1) explode dimensions you want to export 2) export values ("Contents") of resulting texts by using DATAEXTRACTION command 3) do not forget to undo explode of the dimensions command : DATAEXTRACTION 템플릿 이름 입력후 저장 데이터 추출 파일인 DXE 파일을 사용해 데이터 추출 마법사에서 선택한 추출 설정을 저장하고, 다른 도면 파일에서 데이터를 추출할 때 동일한 설정을 사용할 수 있습니다. 현재 도면에서 객체를 선택한다. demension을 explode 한후 문자만 선택한다. 문자의 내용만 원하니까 문자 내용만 선택 같은 값이 있으면 겹쳐져 나오니 ..
AutoCAD 2021. 11. 5. 10:13

객체 교차점을 끊는 LISP BreakObjects.lsp

객체 교차점을 끊는 LISP BreakObjects.lsp =======================[ BreakObjects.lsp ]============================== Author: Copyright?2006-2008 Charles Alan Butler Contact @ www.TheSwamp.org Version: 2.1 Nov. 20,2008 Purpose: Break All selected objects permitted objects are lines, lwplines, plines, splines, ellipse, circles & arcs Function c:MyBreak - DCL for selecting the routines Function c:BreakAll - ..
AutoCAD 2021. 10. 20. 13:44

layer on off

layer on off
AutoCAD 2021. 10. 20. 09:48

layer filters delete

레이어 필터 삭제 (defun rrbI:LayerFiltersDelete (strKeepWC / objXDict) ;; This function insures that an Extension Dictionary exists, and works on both locations for layer filters (vl-load-com) ; load ActiveX if needed (vl-catch-all-apply ; trap error if no extension dictionary (function (lambda () (setq objXDict (vla-GetExtensionDictionary ; bind dictionary to variable (vla-get-Layers (vla-get-ActiveDo..
AutoCAD 2021. 10. 20. 09:10

선형에 객체를 일정 간격으로 삽입하기

선형에 객체를 일정 간격으로 삽입하기 measure명령어와 비슷한 기능으로 만들어진 lisp이다. ;;; ------------------------------------------------------------------------ ;;; CopyAlongCurve.lsp v1.1 ;;; ;;; Copyright?03.26.10 ;;; Alan J. Thompson (alanjt) ;;; ;;; Contact: alanjt @ TheSwamp.org, CADTutor.net ;;; ;;; Permission to use, copy, modify, and distribute this software ;;; for any purpose and without fee is hereby granted, pro..
AutoCAD 2021. 10. 20. 08:57

교차점에 블록 삽입하기

교차점에 블록 삽입하기 인터넷에서 받은 자료임.
AutoCAD 2021. 10. 20. 08:55

선택한 블록만 이름 변경하기

선택한 블록이름 변경하기 rename명령은 파일내에 있는 해당 블록 이름 모두를 변경하는 명령어이다. 2021.10.18 - [AutoCAD] - RENAME명령 RENAME명령 Changes the names assigned to named objects from the Command prompt. The following prompts are displayed. Object type to renameEnter a named object type to rename an object. You can rename blocks, d.. labellota02.tistory.com
AutoCAD 2021. 10. 20. 08:53

형강 작도 lisp

아주 오래전에 인터넷에서 받았던 자료로 H형강, L형강, C형강 등 형강 제원을 이용하여 자동 작도해주는 lisp
AutoCAD 2021. 10. 20. 08:35

기준선 각도로 text, mtext, block 다중선택 회전하기

기준선 각도로 text, mtext, block 다중선택 회전하기 인터넷에서 받았는데 아마도 아키모아 운영진 행복한하루님이 만드신 것으로 보입니다. 유용하네요. ; 아키모아 운영진 "행복한하루" ; http://cafe.daum.net/archimore ; 기준선각도로 text,mtext,block 다중선택회전하기 ; 2007.07.26 (defun dtr (a)(* pi (/ a 180.0))) (defun c:thv(/ k ss1 ss2 ed1 ent stp edp ang1 en2 ed2) ;->*error* start (defun *error* (msg)(princ "error: ")(princ msg) (redraw (car ss1) 4) (princ)) ;- ang1 (dtr 90)) (
AutoCAD 2021. 10. 19. 12:57

블럭 insert point 변경하기

블럭 insert point 변경하기 인터넷에서 받은 자료입니다. 참고하세요. ;;================================================================================= ; Block base point change (2007.3 블럭기준점 변경하기) ; ->블럭의 환경변화없이 기준점만을 변경하는 명령어 ;;--------------------------------------------------------------------------------- (defun c:bba(/ ss os ent old10 new10 bname old41 old50 newss b en blp addents ang dist index) (setq os (getvar..
AutoCAD 2021. 10. 19. 11:06

RENAME명령

Changes the names assigned to named objects from the Command prompt. The following prompts are displayed. Object type to renameEnter a named object type to rename an object. You can rename blocks, detail view styles, dimension styles, layers, linetypes, materials, multileader styles, section view styles, plot styles, text styles, table styles, UCS, views, and viewports. Old object name Enter the..
AutoCAD 2021. 10. 18. 19:58

문자 내용을 복사해서 붙여넣기

문자 내용을 복사해서 붙여넣기 여러 문자 객체가 있을 때 "AAA"라는 문자로 바꿔치기 하고 싶을 때 사용하면 편리하다. ;;;********************************************************** ;;;* Program : MaText * ;;;* Match Text * ;;;* Lee Soomoon(003) * ;;;* 2004/06/24 * ;;;********************************************************** (defun C:MAT (/ ca count e e1 e2 d d1 d2 len s1 txt ss1) (setq e1 (entsel "\nSelect Source Text:")) ; (initget "Single Mul..
AutoCAD 2021. 10. 6. 14:09

AutoCAD에서 내부 블록 편집기(REFEDIT)로 블록을 편집하는 방법

AutoCAD에서 내부 블록 편집기(REFEDIT 명령)를 사용하는 방법 기본적으로 블록을 두 번 클릭하면 속성 대화상자 또는 블록 편집기가 열립니다. 블록 내부 편집을 수행하려면 다음 중 하나를 수행하십시오. 블록을 마우스 오른쪽 버튼으로 클릭하고 블록 내부 편집을 선택합니다. REFEDIT 명령을 사용하여 선택한 블록에 대한 내부 블록 편집기를 엽니다. 편집한 후 REFCLOSE 명령을 사용하여 닫습니다. 두 번 클릭 기능을 내부 블록 편집기로 변경하려면 다음 단계를 따르십시오. 명령 프롬프트에서 CUI를 입력합니다. 사용자 인터페이스 사용자화 대화상자에서 사용자화 탭을 선택합니다. 사용자화 탭의 모든 CUI 파일의 사용자화 아래에서 주 CUI 파일 > 두 번 클릭 동작 > 블록을 확장합니다. 블록 ..
AutoCAD 2021. 10. 6. 13:21

diet LISP

필요없는 객체를 지워서 용량을 줄여주는 LISP
AutoCAD 2021. 9. 25. 17:33

SCRIPT를 이용하여 point, pline, text 입력하기

POINT 입력하기 엑셀에서 다음 좌표를 이용하여 스크립트를 작성한다. x y 374037.8 1580682.4 374032.23 1580716.25 374037.73 1580735.14 374044.98 1580772.49 374097.77 1580771.83 374116.27 1580769.13 point 374037.8,1580682.4 point 374032.23,1580716.25 point 374037.73,1580735.14 point 374044.98,1580772.49 point 374097.77,1580771.83 point 374116.27,1580769.13 pline 그리기 pline 374037.8,1580682.4 374032.23,1580716.25 374037.73,1580..
AutoCAD 2021. 9. 24. 10:15

이거 어떻게 그리나요?

어떻게 그릴까.. https://kin.naver.com/qna/detail.naver?d1id=1&dirId=1020302&docId=398824327&mode=answer Cad 도면 이거어떻게 그리나여? 정신나갈거같아 정신나갈거같아 정신나갈거같아 정신나갈거같아정신나갈거같아 정신나갈거같아 정신나갈거같아 정신나갈거같아 정신나갈거같아 정신나갈거같아 정신나갈거같아 정신나갈거 kin.naver.com 1. 원을 그린다. 2. 타원을 그리기 위한 기준선을 그린다. 3. 타원을 그린다. 4. 타원을 mirror 한다. 5. trim명령으로 필요 없는 선을 지운다.
AutoCAD 2021. 9. 1. 14:14

Parabola 곡선 그리기

1. 포물선 - 실제 스플라인 포물선 (AutoCAD 용 VLX LISP) 2. lisp 루틴을 사용하여 포물선을 만드는 방법? ;; PolynomialFunction.lsp [command name: PF] ;; To draw the curve defined by a Polynomial Function in the form Y = a sum of ;; coefficients on X raised to a descending series of any number of integer powers, ;; and a constant, e.g. Y = X^4 - 2X^3 + 4.5X^2 - 12X + 17.9 ;; Asks User for whether to draw Spline [uses default sta..
AutoCAD 2021. 8. 12. 17:32

gstarCAD에서 다정다감이용하기

[DJDG]작동 원리는 아래와 같습니다. 1.[DJDG]메뉴를 load하면 djdg.mnl이 실행됩니다. 이 파일은 lisp파일입니다. menu가 load될 때 자동으로 실행되는 파일이라 확장자가 mnl입니다. 아마도 menu lisp의 약자가 아닌가 싶습니다. 2. djdg.mnl파일에는 (prefix)함수가 정의되어 있습니다. 이 함수는 acad.exe파일이 존재하는 경로명을 알려줍니다. 3. (prefix)함수를 이용해서 acad가 설치된 경로 아래에서 djdg 폴더 안의 loadjdg.lsp파일을 실행시킵니다. 4. loadjdg.lsp파일에는 [DJDG]명령어들과 그 명령어가 실행되면 어떤 lisp파일을 실행시킬 것인지에 대한 정보가 들어있습니다. 5. 이제 command상태에서 [DJDG]명령..
AutoCAD 2021. 8. 11. 15:07

경로에 맞게 배열하는 방법 arraypath

특히 곡선구간에 일정간격으로 배열하고자 할때 사용가능하다. arraypath를 모를 때는 measure명령어를 사용하였는데 arraypath는 한결 수월하게 배열할 수 있다.
AutoCAD 2021. 7. 13. 11:01

Autodesk dwg view DWG TrueView

무료로 DWG, DWF 및 DXF 파일을 열어볼 수 있습니다. Autodesk 온라인 뷰어를 사용해 브라우저에서 파일을 업로드하고 확인하거나 다운로드하여 사용할 수 있는 뷰어를 선택하십시오. DWG TrueView 다운로드
AutoCAD 2021. 7. 1. 15:44

pipe fitting 3d

사용한 명령어는 아래와 같습니다. circle helix polygon rotate3d extrude chamfer presspull
AutoCAD 2021. 6. 23. 12:58

3D Screw 그리기

3D 나사 그리기 사용한 명령어는 아래와 같습니다. circle helix polygon rotate3d sweep extrude chamfer join trim boundary loft
AutoCAD 2021. 6. 22. 17:13

객체 선택시 Shift키를 사용하여 선택에 추가(PICKADD)

옵션 > 선택 > 선택모드 Shift 키를 사용하여 선택에 추가(F) 이후의 선택 사항이 현재 선택 세트를 대치할지 또는 현재 선택 세트에 추가될지 여부를 조정합니다. (PICKADD 시스템 변수) 선택 세트를 신속히 지우려면, 도면의 빈 영역에 선택 윈도우를 그리십시오. PICKADD(시스템변수) 이후의 선택 사항이 현재 선택 세트를 대치할지 또는 현재 선택 세트에 추가될지 여부를 조정합니다. 유형: 정수 저장위치:사용자설정 초기값 : 2 0 PICKADD를 끕니다. 가장 최근에 선택했던 객체가 선택 세트가 됩니다. 이전에 선택했던 객체들은 선택 세트에서 자동으로 제거됩니다. 1 PICKADD를 켭니다. 개별적으로 또는 윈도우 방식을 통해 선택된 객체는 각각 현재 선택 세트에 추가됩니다. 2 PICKA..
AutoCAD 2021. 6. 17. 10:41

CAD파일 치명적 오류로 저장도 못하는 상황 대처 방법

CAD작업하다가 갑자기 오류가 나서 저장도 못하는 상황이 종종 생깁니다. 이럴때 강제 종료를 할 수 밖에 없는데요. CAD파일 치명적 오류로 저장도 못하는 상황 대처 방법에 대해 알아보자 1. 백업(*.bak)파일을 확인하자. 작업중 습관적으로 crtl+S를 눌러서 자주 저장하기 바랍니다. bak파일은 작업중이 파일이 저장된 폴더에 있으므로 파일명의 .bak을 이름바꾸기로 확장자를 dwg로 변경해주시면 됩니다. Bak파일은 파일을 저장하면 최종 저장파일을 기점으로 bak파일이 생성이 됩니다. 2. Temp파일을 찾아서 복구하기 임시파일 위치는 C:\Users\사용자이름\AppData\Local\Temp 이다. 작업하고 있던 파일명.ac$(AutoCAD) .sw$또는 /zw$(ZWCAD) 파일을 찾는다. ..
AutoCAD 2021. 6. 11. 14:10

삼각함수 lisp

;TANGENT FUNCTION (defun Tan (x) (cond ((= (cos x) 0.0)(if (minusp x) -1.0E200 1.0E200)) (t (/ (sin x) (cos x))) ) ) ;SECANT FUNCTION (defun Sec (x) (if (= (cos x) 0) (if (minusp x) -1.0E200 1.0E200) (/ 1.0 (cos x)) ) ) ;;COSECANT FUNCTION (defun CoSec (x) (if (= (sin x) 0) (if (minusp x) -1.0E200 1.0E200) (/ 1.0 (sin x)) ) ) ;COTANGENT FUNCTION (defun CoTan (x) (cond ((= (sin x) 0.0) (if (minus..
AutoCAD 2021. 6. 9. 13:51

치수의 숫자값을 강제입력으로 변경해주는 lisp

인터넷에서 받은 자료인데 출처를 알 수가 없어요. 치수의 숫자값을 강제입력으로 변경해주는 lisp입니다. (defun c:dg( / ss ddc ent change n cm fr bk ddd val dac) (defun rtd (a)(/ (* a 180.0) pi)) (setq cm (getvar "cmdecho")) (setvar "cmdecho" 0) (prompt "\n 고정시킬 치수를 선택하세요. : ") (if (= (setq ss (ssget)) nil) (setq ss (ssget "x" '((0 . "DIMENSION")))) ) (if ss (progn (command "undo" "be") (setq ddc (getvar "DIMDEC") dac (getvar "DIMADEC") n 0..
AutoCAD 2021. 6. 9. 13:47
◀ 1 2 3 4 ▶

티스토리툴바