자동화(FA)
자동화부품요소 (12)
공압/진공기술 (33)
유압기술 (7)
직동시스템 (7)
자동화기술 (17)
자동화기계/설비 (1)
자동공급체결 (0)
프레스금형 (0)
몰드금형 (0)
기계요소/부품
동력전달요소
CAD/2D/3D
공구/툴링
금형/사출
웹/IT
가공/조립/제작
사업/경영/경제
반송/운반/하역
공업규격/단위
제어/계측/센서
재료/열처리
도금/코팅/도장
취미/여행/동호회
마음의양식
유체/분체기술
환경/에너지
로봇기술
설계/제도
현재위치 : HOME > Search
시퀀스링크시퀀스링크 등록
포스트 검색결과 : 1034
[Lisp] 모따기(축/구멍)cmguy33
■ 다이알로그 박스로하는................................... 축 ...구멍 ■ 마우스 클릭으로만 하는............................................ ■ Recess groove......................................
CAD/2D/3D > Auto Lisp
[Lisp] 화면의 객체선택으로 동일명령 실행cmguy33
화면에서...  - 라인을 선택하면 라인명령이 실행되고  - 원을 선택하면 원 그리기 명령이 실행되는...  - Line / Circle / Text / Point  / Solid / 치수 / 폴리라인 / 인서트;화면의 객체..
CAD/2D/3D > Auto Lisp
[Lisp] 부분상세도 그리기cmguy33
; 출처 -- Copyright 1988 by Looking Glass Microproducts(defun modes (a)   (setq MLST nil)   (repeat (length a)      (setq MLST (append MLST (list ..
CAD/2D/3D > Auto Lisp
[Lisp]45도 미러하기cmguy33
;;45도 미러하기(defun c:45M()(setvar "cmdecho" 0)(princ "n45도 미러하기: ");->*error* start (defun *error* (msg)(princ "error: ")(princ msg) (COMMAND "SNAPANG" "0") (princ));-<*..
CAD/2D/3D > Auto Lisp
[Lisp]자동트림 - 라인,폴리라인,원,아크cmguy33
경계선 지정없이 자를선만 선택하면 트림이 되는....(경계선은 선택한 자를선에서 가장 가까운 객체를 경계로 자동 인식함);;자동트림 - 라인,폴리라인,원,아크;(defun C:TR(/ ent entl ent-p ent-name ent-leng..
CAD/2D/3D > Auto Lisp
[Lisp]가상의 연장선까지 extend or trim하기cmguy33
;Extend(defun c:aex(/ ent1 ent2) (setq ent1 (entsel "n 기준 객체 1개를 선택하세요 "))(princ "n 연장할 객체를 선택하세요(다중선택 가능) ")(setq ent2 (ssget))(command "extend" ent1 "" "e" "e" ent2 "")) ..
CAD/2D/3D > Auto Lisp
[Lisp]사인곡선그리기(sin-curve)cmguy33
캠 그릴 때 가끔 사용하는....;;Program Name : Sin curve line;(defun dtr (a)    (* pi (/ a 180.)))(defun c:Sin-Line ( / olderr sosmd sblip spick clay dimsc a b c r x y l an) &nbs..
CAD/2D/3D > Auto Lisp
[Lisp]원,사각형 안에 X라인 그리는 리습cmguy33
;사각박스 에 X라인 그리기(defun c:BX (/ pnt1 pnt2 pnt3 pnt4) (prompt "n사각박스에 X라인 그리기")(setvar "cmdecho" 0) (setq os (getvar "osmode")) (setq cla (getvar "clayer"))(graphsc..
CAD/2D/3D > Auto Lisp
[Lisp]두원을 선택해서 장공(Slot) 그리기cmguy33
;;================================================================;  두원을 선택해서 장공 생성;;----------------------------------------------------------------(defun c:sss (/ e1 e2 e3 e4 pt1..
CAD/2D/3D > Auto Lisp
[Lisp]접선 그리기cmguy33
;;==========================================;  접선 그리기;;----------------------------------------------------------------(defun c:TTL(/ pt1 pt2 os)    (SETQ OS (GETVAR "OSMODE"))..
CAD/2D/3D > Auto Lisp
[Lisp]플렌지(Flange) 그리기cmguy33
  ;;=======================================================;  플렌지(Flange) 그리기;;-------------------------------------------------------(defun c:Flange (/ e1 h d1 d2 d3 d4 pt1 pt2 p..
CAD/2D/3D > Auto Lisp
[Lisp]여러 원 드래그하여 한번에 중심선 그리기cmguy33
;; 여러 원 드래그하여 한번에 중심선 그리기(defun C:MCCEN (/ COUNT_1 COUNT_2 DIST OBJECTS_X OBJECTS_Y SCALE      CENTER CENTER_2 ENTITY_1 ENTITY_2 RADIUS RADIUS_2 &..
CAD/2D/3D > Auto Lisp
[Lisp]경사면에 보이는 원 그리기- 타원(ellipse)cmguy33
;;;; 경사면에 보이는 원 그리기 - 타원(ellipse) draw ;;; ysJeong 2009.2.11;;;--Error handler--------------------------------------------------------(defun bot_er (s)(if (/= s "Function Cancelled") ..
CAD/2D/3D > Auto Lisp
[Lisp]스플라인을 폴리라인으로 다시그리기cmguy33
(defun c:sptrace (/ ent spline cur pl end keep) (setq cur nil) (setq pl '((0 . "LWPOLYLINE")     (100 . "AcDbEntity")     (67 . 0)   &n..
CAD/2D/3D > Auto CAD
[Lisp]스냅 돌리기(크로스헤어돌리기)cmguy33
스냅설정 --> xc스냅해제 --> sf 원래하실려면..snap이라는 명령어도 하셔야 됩니다... 그러나 꽤 귀찬져.. 이렇게 하면..F8키로 저 경사도의 수직선들을...그릴수 있져...경사진 평면같은거 그릴때..
CAD/2D/3D > Auto Lisp
[Lisp]파일이름 도면에 표기하기cmguy33
1. 파일이름들어갈곳에 아무 글자나 넣어둡니다..    리습에서 텍스트로 안만들어주는건.. 텍스트 위치때문에 그렇습니다.   2. 명령어 실행후 해당 글자 선택하면 해당 텍스트가 파일이름으로..
CAD/2D/3D > Auto Lisp
[Lisp]text 와 폴리라인의 시작점 or isert포인트에 circle표기cmguy33
(defun c:cde(/ ss k rad ent ename )   (setq os (getvar "osmode"))   (setvar "osmode" 0)   (setq ss (ssget))      (setq k 0)   &n..
CAD/2D/3D > Auto Lisp
[Lisp]표면거칠기/다듬질기호cmguy33
;거칠기/다듬질기호(defun c:SAM(/ os bl cl ts skk num ag p0 p1 p2 p3 p4 p5 p6 tp e1)   (setq os (getvar "osmode") bl (getvar "blipmode"))   (setq cl (getvar "clayer") ts (getvar..
CAD/2D/3D > Auto Lisp
[Lisp]선간 중심선 그리기(돌출 비율 설정기능)cmguy33
;선간 중심선 그리기(중심선 돌출 비율 지정가능);중심선 길이의 돌출 비율은 첫 선택선이 기준임 (defun c:WCL(/ os en1 en2 ed1 ed2 p1s p1e p2s p2e d1 d2 cps cpe ext et );->*error* start (defun ..
CAD/2D/3D > Auto Lisp
[Lisp]모따기 리습cmguy33
(defun c:Chamf(/ os diz cl #dt s1 cb1 cf1 dis1 len1 len2 p1 p2 #df j jj j1 jj1)   (setvar "osmode" 165)   (setq os (getvar "osmode"))   (setq diz (getvar "dimzin")) ..
CAD/2D/3D > Auto Lisp
31 32 33 34 35 36 37 38 39 40
메카피아소개제휴/광고문의개인정보 처리방침이용약관이메일주소 무단수집 거부책임의한계와 법적고지저작권침해신고고객센터
상호 : (주)메카피아(서울지점)대표이사 : 김현주사업자등록번호 : 119-85-40453통신판매업신고 : 제 2023-서울종로-1613호
개인정보 보호책임자 : 김현주사업장소재지 : [03134] 서울특별시 종로구 돈화문로 88-1, 3층
대표전화: 1544-1605팩스: 02-6008-9111E-mail : mechapia@mechapia.com
Copyright(c)2008 Mechapia Co. All rights reserved.