비밀번호를 잊으셨나요?

비밀번호를 잊으셨나요? 비밀번호를 재설정하려면 이메일 주소를 입력해주세요.

계정이 있나요? 로그인

You must login to ask a question.

비밀번호를 잊으셨나요?

아직 계정이 없으신가요? 회원가입 하기

해당 질문을 신고하는 이유를 간단히 입력해주세요.

해당 답변을 신고하는 이유를 간단히 입력해주세요.

해당 유저를 신고하는 이유를 간단히 입력해주세요.

로그인회원가입

고캐드 – 캐드(CAD) 정보의 중심

고캐드 – 캐드(CAD) 정보의 중심 Logo 고캐드 – 캐드(CAD) 정보의 중심 Logo

고캐드 – 캐드(CAD) 정보의 중심 Navigation

  • Q&A
    • AutoCAD & CADian
    • Inventor & Solidworks
    • Revit & ArchiCAD
    • 자유질문
    • 기타
  • 커뮤니티
    • 오늘의이슈
    • 자유게시판
    • 익명게시판
    • 건의게시판
  • 자료실
    • 자료요청
    • 일반파일
    • 도면샘플
    • 유틸리티
    • 기타
  • 작품 갤러리
    • 그래픽
    • 캐드도면
    • 3D모델
    • 기타
  • 뉴스&이벤트
    • 공지사항
    • 뉴스
    • 전시/행사
    • 이벤트
    • 기타
검색
질문하기

Mobile menu

닫기
질문하기
  • 홈
  • 카테고리
    • AutoCAD & CADian
    • Inventor & Solidworks
    • Revit & ArchiCAD
    • 자유질문
    • 기타
  • 투표
  • 커뮤니티 그룹
  • Q&A
    • AutoCAD & CADian
    • Inventor & Solidworks
    • Revit & ArchiCAD
    • 자유질문
    • 기타
  • 커뮤니티
    • 오늘의이슈
    • 자유게시판
    • 익명게시판
    • 건의게시판
  • 자료실
    • 자료요청
    • 일반파일
    • 도면샘플
    • 유틸리티
    • 기타
  • 작품 갤러리
    • 그래픽
    • 캐드도면
    • 3D모델
    • 기타
  • 뉴스&이벤트
    • 공지사항
    • 뉴스
    • 전시/행사
    • 이벤트
    • 기타
홈/ 질문/Q 106359
다음
진행 중
Lv.0
등록일: 2016-03-312016-03-31T09:25:34+09:00 2016-03-31T09:25:34+09:00카테고리: AutoCAD & CADian

모따기 리습 질문요.

아래 리습을  모따기 길이를 수정안하고 정해진 수로만 모따기 되게 안될까요??? 
가령  5 를 많이 쓰거든요

고수님들 부탁드립니다!!!!

——————————————————————————————————————-
; 교차점에 한 선은 그대로 두고 한 선만 모따기 하는 리습
(defun C:SCHM(/ sichamer cmde dis en1 en2 ena enb pt1 pt2 sp1 ep1  sp ep enc)
   (defun *error* (msg)
      (setq *error* sichamer)
      (command “undo” “e”)
      (command “ucs” “P”)
      (setvar “CMDECHO” cmde)
  (setvar “CHAMFERA” cham)
  (setvar “CHAMFERB” chamb)
      (princ)
   )
  (setq sichamer *error*)
   (setvar “ucsfollow” 0)
   (setq cmde (getvar “CMDECHO”))
   (setq cham (getvar “CHAMFERA”))
   (setq chamb (getvar “CHAMFER”))
   (setvar “CMDECHO” 0)
   (command “undo” “group”)
   (command “ucs” “w”)
   (setq dis (getdist (strcat “n 모따기 거리 입력 :<“(rtos cham)”> :”)))
   (if (= dis nil) (setq dis cham))
   (setq k 5)
   (while k
      (setq en2 (entsel “n 모따기 할 대상 객체선택 :”))
      (if en2
         (progn
            (redraw (car en2) 3)
            (setq en1 (entsel “n 모따기 제외 대상 객체선택:”))
            (setq ena (car en1) pt1 (cadr en1))
            (setq enb (car en2) pt2 (cadr en2))
            (setq sp1 (assoc 10 (entget ena))
     ep1 (assoc 11 (entget ena)))
            (setvar “CHAMFERA” dis)
            (setvar “CHAMFERB” dis)
            (command “CHAMFER” en1 en2)
;;;;—————————————————————
            (setq enc (entget (car en1)))
            (setq sp (assoc 10 enc))
            (setq ep (assoc 11 enc))
            (setq enc (subst sp1 sp enc) enc (subst ep1 ep enc))
            (entmod enc)
         )
         (setq k nil)
      ))
      (setq *error* sichamer)
      (command “undo” “e”)
      (command “ucs” “P”)
 (setvar “CHAMFERA” cham)
 (setvar “CHAMFERB” chamb)
      (setvar “CMDECHO” cmde)

  • 0
  • 2 2 답변
  • 48 조회
공유
  • Facebook

    관련 있는 질문들

    • FAQ 51을 참조 하라는데 FAQ가 어디에 있나요??
    • jsk.shx 파일 받을 부탁드립니다 ㅠ
    • 오토캐드 마지막 화면으로 실행 안됨
    • 오토캐드 마지막 화면으로 실행 안됨

    2 답변

    • 작성 순
    • 최신 순
    • 공감 순
    1. aalan
    2. [Deleted User]
      2016-03-31T10:48:29+09:00답변 등록 답변 등록 일시 2016-03-31 10:48 am

      (setq dis (getdist (strcat “n 모따기 거리 입력 :<“(rtos cham)”> :”)))를 (setq dis 5)로 수정

      • 0
      • 공유
        공유
        • 공유 Facebook
        • 공유 Twitter
    3. [Deleted User]
      2016-03-31T11:50:57+09:00답변 등록 답변 등록 일시 2016-03-31 11:50 am

      답변감사합니다.
      무한선 사용시 두번째선이 끊기는데 왜그런지 알수 있을까요?

      • 0
      • 공유
        공유
        • 공유 Facebook
        • 공유 Twitter

    Sidebar

    질문하기
    공지사항

    • AI CAD의 미래! 캐디안 2025 1+1 프로모션 안내 2025-05-14

    Adv 234x60

    aalan

    Adv 234x60

    aalan

    Adv 120x600

    aalan

    Explore

    • 홈
    • 카테고리
      • AutoCAD & CADian
      • Inventor & Solidworks
      • Revit & ArchiCAD
      • 자유질문
      • 기타
    • 투표
    • 커뮤니티 그룹
    aalan

    Footer

    Support

    • 회사 및 서비스 소개
    • 자주 묻는 질문
    • 문의하기

    Guide

    • 제휴/협업 안내
    • 광고 서비스 안내

    Policy

    • 서비스 이용약관
    • 개인정보 처리방침
    • 광고성 정보 수신 동의

    Contents

    • 고밍스토리
    • 리습 시리즈

    정소프트 | 사업자등록번호 : 677-40-00198 | 대표 : 정은숙 | 이메일 : gocad.manager@gmail.com
    주소 : 서울특별시 강서구 양천로 400-12, 6층 614,615,617호(등촌동, 더리브골드타워)
    Copyright. 2012-2024 GOCAD All rights reserved