두선사이 중심선 리습 수정가능할까요…? 요청리습
유틸리티
작성자
캐드플러스
작성일
2023-09-19 09:06
조회
2558

Q & A에는 파일을 올리수 없고,
소스 프로그램을 올리니까 외곡이 심해 이곳에 파일로 올립니다.
혹시 리습을 어디에서 구했습니까?
아주 잘 만들어진 프로그램 인듯 합니다.
최대한 원본 프로그램을 훼손 하지 않는 범위에서 하려고 노력했습니다.
2가지 질문 및 요구 내용은 반영을 하였습니다.
(command "layer" "s" "1″ "") ;;★중심선 레이어 설정 <- 이내용은 원 프로그램에서 다른사람이 추가한듯 한데 삭제했습니다. "1" 레이어가 없을때만 생성하도록 하였습니다. 또 레이어를 옮겨가지 않고 중심선 생성후 변경 하도록 하였습니다. 라인 타입도 만들때 "cender"로 하였는데 라인타입이 없으면 레이어가 생성이 안되어서 또 라인타입에 대한 것도 추가하고 복잡해질듯 해서 그만 두었습니다. - 필요면 요청하세요 추가해드릴께요.
그리고 기준선 양쪽으로 10%씩 연장 하도록 하였습니다.
연장 길리를 변경하고 싶으면 아래 0.1 값을 변경하면 됩니다.
(setq #m(* (distance #k #l) 0.1))
좋은 프로그램 잘 구경했습니다. 유용하게 사용하십시오.
소스 프로그램을 올리니까 외곡이 심해 이곳에 파일로 올립니다.
혹시 리습을 어디에서 구했습니까?
아주 잘 만들어진 프로그램 인듯 합니다.
최대한 원본 프로그램을 훼손 하지 않는 범위에서 하려고 노력했습니다.
2가지 질문 및 요구 내용은 반영을 하였습니다.
(command "layer" "s" "1″ "") ;;★중심선 레이어 설정 <- 이내용은 원 프로그램에서 다른사람이 추가한듯 한데 삭제했습니다. "1" 레이어가 없을때만 생성하도록 하였습니다. 또 레이어를 옮겨가지 않고 중심선 생성후 변경 하도록 하였습니다. 라인 타입도 만들때 "cender"로 하였는데 라인타입이 없으면 레이어가 생성이 안되어서 또 라인타입에 대한 것도 추가하고 복잡해질듯 해서 그만 두었습니다. - 필요면 요청하세요 추가해드릴께요.
그리고 기준선 양쪽으로 10%씩 연장 하도록 하였습니다.
연장 길리를 변경하고 싶으면 아래 0.1 값을 변경하면 됩니다.
(setq #m(* (distance #k #l) 0.1))
좋은 프로그램 잘 구경했습니다. 유용하게 사용하십시오.
전체
번호 | 제목 | 작성자 | 작성일 | 조회 |
공지사항 |
[공지] 글꼴은행 - 캐드 글꼴 442종 압축 파일 NOTICE
gocad
|
2022.09.01
|
조회 95244
|
gocad | 2022.09.01 | 95244 |
13781 |
arcbig03.shx 폰트 요청드립니다
아빠의전설
|
2025.04.23
|
조회 78
|
아빠의전설 | 2025.04.23 | 78 |
13780 |
캐드 한글 폰트를 만들었습니다.
준
|
2025.04.10
|
조회 195
|
준 | 2025.04.10 | 195 |
13779 |
블록 이름 다 똑같이 맞출 수 있는 리습 있을까요?
이민성
|
2025.04.08
|
조회 134
|
이민성 | 2025.04.08 | 134 |
13778 |
갠트리크레인 도면 "급" 구합니다
샤인
|
2025.04.01
|
조회 177
|
샤인 | 2025.04.01 | 177 |
13777 |
스크린 골프장 도면을 부탁드립니다!
썐206
|
2025.03.28
|
조회 232
|
썐206 | 2025.03.28 | 232 |
13776 |
ISO LISP 또는 프로그램 부탁드립니다.
박기범
|
2025.03.14
|
조회 469
|
박기범 | 2025.03.14 | 469 |
13775 |
GSG1 글꼴
오인권
|
2025.03.14
|
조회 430
|
오인권 | 2025.03.14 | 430 |
13774 |
아파트 현관 신발장 상세도 부탁드립니다
다큐3일
|
2025.02.13
|
조회 494
|
다큐3일 | 2025.02.13 | 494 |
13773 |
굵은돋움체(Takeo) 부탁드립니다.
박기석
|
2025.02.04
|
조회 528
|
박기석 | 2025.02.04 | 528 |
13772 |
소방 배관. 피팅. 밸브 도면 모음집 있으시면 주시면 안딜까요? ㅜ.ㅜ
고고고태
|
2025.01.15
|
조회 732
|
고고고태 | 2025.01.15 | 732 |
13771 |
판금전개 리습 공유
김다래
|
2025.01.10
|
조회 761
|
김다래 | 2025.01.10 | 761 |
13770 |
CadPlus_Plot ( 멀티플롯 / 일괄출력 / 외부파일 출력) (5)
캐드플러스
|
2024.12.27
|
조회 935
|
캐드플러스 | 2024.12.27 | 935 |
13769 |
캐드 기초 연습도면 부탁드립니다 (1)
홍보석
|
2024.12.23
|
조회 849
|
홍보석 | 2024.12.23 | 849 |
13768 |
승마장 도면 구합니다!!
연세찬
|
2024.12.02
|
조회 632
|
연세찬 | 2024.12.02 | 632 |
13767 |
자동차 등각도면 구합니다
김성훈
|
2024.11.22
|
조회 650
|
김성훈 | 2024.11.22 | 650 |
13766 |
카페 평면, 단면 등을 구합니다
박민지
|
2024.11.17
|
조회 661
|
박민지 | 2024.11.17 | 661 |
13765 |
소형창고도면 있으면 부탁드립니다.
풀나무
|
2024.11.16
|
조회 745
|
풀나무 | 2024.11.16 | 745 |
13764 |
라인 길이의 합
전경삼
|
2024.11.14
|
조회 689
|
전경삼 | 2024.11.14 | 689 |
13763 |
acaddoc.lsp구합니다. (1)
김상동
|
2024.09.06
|
조회 924
|
김상동 | 2024.09.06 | 924 |
13762 |
다중출력 ( 멀티플롯 / 일괄출력 )리습 프로그램 업그레이드(최종) (2)
캐드플러스
|
2024.08.19
|
조회 2599
|
캐드플러스 | 2024.08.19 | 2599 |
라인 선택 할 때 nil값이 들어 오면(엔터 또는 선택 못했을때) 에러 나면서 종료 되어 라인을 선택 했을 때만 프로그램이 실행 되도록 했습니다.
첨부파일 : ww20230920.zip
위 프로그램에 추가 업그레이드를 했습니다.
1. 무한 실행이 되도록 하였습니다.(그냥 엔터 -> 종료)
2. 레이어에 라인타입을 "CENTER" 로 만들어줍니다.
3. 라인이 아닌 (circle, arc, pline, 등)을 선택하면 에러 표시.
앞으로도 계속 업그레이드 합니다.
1. Line과 Circle 중심선 그리기.
2. 선택한 모든 객체 중심선 그리기. -> 여기까지 완료됨.
3. 대화상자 추가.
첨부파일 : ww20230924.zip
위 프로그램에서 업그레이드를 했습니다.
1. 라인과 라인 그리고 원 중심선을 그려줌니다.
2. 레이어 생성을 dxf 코드가 아닌 비주얼 리습으로 만들도록 했습니다.
첨부파일 : ww2023-1010-r1.zip
위 프로그램과 사용은 모두 같습니다.(라인과 라인 그리고 원 중심선)
추가된 기능은 DCL상자를 만들기 위한 기능을 추가 했습니다.
Command : ww
First line Select:[Enter: Option] <- 엔터를 치면 DCL 대화상자로 넘어갈수 있도록 추가하였습니다. 명령 실행후 처음 한번만 나올 수 있도록 했습니다.
VLX파일로 공개 합니다.
소스 프로그램은 다음에 하도록 하겠습니다.
첨부파일 : ww2023-1010_r2.zip
중심선 그리는 최종 프로그램을 공개 합니다.
모든 도형의 중심선을 다 그려줍니다.
LINE, PLINE, CIRCLE, ARC, RETANGLE, ELLIPSE
실행방법은 리습을 올리면 나옵니다.
첨부파일 : ww20231102.zip