영어 버전의 문제 lisp는 여러 contours를 재구성합니다.

[athanatos]

안녕하세요!

나는이 주제를 열다 몇 가지 네트워크 lisp에 대한 정보를 요청하기 위해 더 많은 수익의 윤곽을 재구성 할 수 있습니다.

많은 중 하나는이

;handy autocad-12 해치 편집 2009–2019 ·
;author: alex borodulin
; naacad의 inc. 웹 사이트 : http://www.nyacad.com(defun c:has (/gp) (setq gp (sssget))) (command “-hatchedit” gp “as” 일시 중지)); 공동 작업
(defun c:hbo(/gp) (setq gp (sssget))) (command "-hatchedit" gp "b" "p" "y")); 해치에 바인딩
(defun c:hf (/gp) (setq gp (ssget))) (command "-hatchedit" gp "o" "s" 일시 중지 "n")); 해치 수정
(defun c:hs(/gp) (setq gp (sssget))) (command "-hatchedit" gp "h")); 분리

oppure questo reperibile 요구
http://forums.autodesk.com/t5/visua...olygons-each-in-the-layer/td-p/3275725/page/1이 코드의 문제는 아마도 autocad의 영어 버전과 함께 작동한다는 것입니다.

실제로 (Autocad 2013에서) 이탈리아어에서 "-hatchedit" 명령은 "_hatchedit"가됩니다. b p y 명령에 대한 일치를 찾을 수 없습니다.

누구든지 propose 또는 일 lisp에 해결책이 있습니까?

감사합니다.

이름 *

 

[PlannerRoad]

당신은 그들을 만들기 위해 underscore를 넣어해야합니다 "이탈리아어로 전합니다".

[COLOR=#333333];handy autocad-12 해치 편집 2009–2019 ·[/COLOR]
[COLOR=#333333];author: alex borodulin[/COLOR]
[COLOR=#333333]; naacad의 inc. [/COLOR][URL="http://www.nyacad.com/"]웹 사이트 : http://www.nyacad.com[/URL]
[COLOR=#333333](defun c:has(/gp) (setq gp (sssget))) (command "_-hatchedit" gp "_as" 일시 중지));[/COLOR]
[COLOR=#333333](defun c:hbo(/ gp) (setq gp (ssget))) (command "_-hatchedit" gp "_b" "_p" "_y")); 해치에 경계를 추가[/COLOR]
[COLOR=#333333](defun c:hf(/gp) (setq gp (ssget))) (command "_-hatchedit" gp "_o" "_s" 일시 중지 "_n")); 해치 수정[/COLOR]
[COLOR=#333333](defun c:hs(/gp) (setq gp (ssget))) (command "_-hatchedit" gp "_h")); 분리[/COLOR]

 

[Cristallo]

b = 경계 (replaceable from _b)
p = 폴리 라인 (나는 eng과 ita 사이에 동일하다고 믿는다)
y = 예 (설명을 예약? )

모든 경우 명령 줄을 따르고 이탈리아의 명령 옵션을 볼 수 있습니다.
또는 대안으로, 당신은 통제와 선택권에 둘 다 underscore가 있고 그것이 가는 경우에 볼 것입니다

 

[athanatos]

도움 둘 다에 감사.

나는 낮은 돌진 솔루션을 사용하고 실제로 작동합니다.

내 문제는, 그러나, 많은 네트워크에서 작업의 tyration에 연결: 실제로 나는 qgis에서 단지 dxf 파일에서 샘플링의 시리즈가 윤곽을 가지고 있지 않습니다. 따라서 샘플의 수백의 윤곽을 재현하기 위해 제공해야합니다.

이전 lisp는 다시 만들 수 있지만 수동으로 각 샘플을 클릭... autocad가 자동으로 작동하기 때문에 솔루션을 찾고 있습니다.

이 목록 (두 번째 링크에서) 내 경우에 할 것 같다 (내가 잘못되었는지 확인)

;;;recreate-hatch-boundaries.lsp murray clack에 의해 작성, november 19, 2010
;; 이 루틴은 여러 개의 선택된 해치 패턴 주위에 경계를 재 작성하고 패턴의 연관성을 만듭니다.
(prompt "\nhatch-recreate-boundaries.lsp로드, 'hatch_recreate_boundaries'를 실행)
(defun c:hatch_recreate_boundaries) (/ oldce sset cnt obj)
(setq oldce (getvar "cmdecho")))
(세바 "cmdecho") 0)
(princ "\nselect hatch 개체: ")
(세트 (세트)
(세트 cnt -1)
(while (setq obj (ssname sset (setq cnt (1 + cnt))))))))
(command "_-hatchedit" obj "_b" "_p" "_y")
( "_change" cnt "p" "la" "defpoints" "")
·

(setvar "cmdecho"이전)
(파나)
·

모자를 씌우고 3개의 편지 (이탈리아어 대응자는 r, polylinea를 위해, p, si를 위해, s를 위한 recreation를 위해, s, 입니다) 자동적으로 작동하지 않습니다 (그것은 이탈하지 않습니다).

어떤 아이디어?

감사합니다.

 

[athanatos]

좋은 아침.
자동 응답입니다.

나는 목록을 읽었고, 코드가 경계선을 재창조하고, 레이어를 변경했습니다 (_change 인스턴스와 함께). 이 이벤트에 대한 코드 라인을 삭제하고 코드를 완벽하게 작동!

따라서 목록 작업 (Autocad 2013에서 입증)

;;;recreate-hatch-boundaries.lsp murray clack에 의해 작성, november 19, 2010
;;;modificato dall'utente athanatos nel 포럼 cad3d, luglio 21, 2016
;; 이 루틴은 여러 개의 선택된 해치 패턴 주위에 경계를 재 작성하고 패턴의 연관성을 만듭니다.
( "\nhatch-recreate-boundaries.lsp caricato, eseguire 당 scrivere 'hrb' 제공)
(defun c:hatch_recreate_boundaries) (/ oldce sset cnt obj)
(setq oldce (getvar "cmdecho")))
(세바 "cmdecho") 0)
(princ "\nselect hatch 개체: ")
(세트 (세트)
(세트 cnt -1)
(while (setq obj (ssname sset (setq cnt (1 + cnt))))))))
(command "_-hatchedit" obj "_b" "_p" "_y")
·

(setvar "cmdecho"이전)
(파나)
·

그것을 시도하십시오. 도움에 대한 다시 감사,

인사와 좋은 일