견적 요청

Martina Webber

Guest
안녕하세요.
나는 기술적인 디자이너를 martin이고 autocad 2017를 사용하고, 나는 어디에서든지 보았고 나는 나의 문제에 해결책을 찾아내지 않았습니다 (그것은 trivial 것 같이 보입니다 그러나 나는 나의 손을 넣는 것을 이해할 수 없습니다) 나는 설명합니다.
참조 지점을 수정하는 lisp가 "quota_altimetrica"라는 모든 선택 블록을 업데이트하는 것을 관리합니다. 블록의 가시성을 변경할 때까지 문제가 없습니다 (지하의 상징을 표시하려면), 내가 선택하지 않는 할당량을 업데이트하려고하면 블록이 또 다른 경우.
상황을 해결하는 유일한 방법은 블록을 복원하는 것입니다, 할당량을 업데이트하고 원하는 가시성을 선택, 하지만 그것은 실용적이지 않습니다.

나는 내 머리를 슬램 할 곳을 모른다, 나는 내가 두 개의 다른 블록과 두 개의 다른 lisp를 만들 생각하지만, 그들은 싸움하지 않습니다, 즉. 나는 하나로드 또는 다른로드, 병렬에서 그들을 사용하지.

나는 질문과 lisp의 블록과 dwg 파일을 첨부 (행정적으로 독일어에 있습니다).View attachment Quote.dwg· View attachment Quota altimetrica.lspn.b.: 두 가시성에 있는 속성은 동일하, 유일한 다름은 할당량의 밑에 선의 존재입니다.
 
이름 *
차단없이 프로그램에 동의하는 경우 내 제안.
quotav.lsp라는 파일에서 저장해야합니다
검색 디렉토리에 삽입 (예: autocad 2017-support)
명령 (load "quotav")의 일부가 시도하십시오.
그것이 suffice가 아니라면, 나는 비슷한 프로그램을 사용할 수있는 texitaliano64를 본 사이트를 말해 줄 것입니다. 블록으로 행해져 있다고 생각합니다.
안녕하세요.
http://bar-ingegneria.forumfree.it/?t=74986967#newpost;quotav.lsp 계산 및 삽입 수직 quotas
; 자동차 2012 25-11-2011년
(prompt "\n")
(setq n (getvar "useri1")))
(컨드)
((= n 0); 단위 cm
(setq um "cm" dec 0)
·
((= n 1); 단위 mm
(setq um "mm" dec 0)
·
((= n 2); 단위 m
(setq um "m" dec 2)
·
·

(ht nil (setq ht 2); 텍스트 높이 세금
(Qb nil (setq qb 0); 기본 할당량 세금
(세트 sc)
pb (getpoint "포인트 할당량베이스 : ")
a (strcat "\nimmetti valore 할당량베이스 <" (rtos qb) "> :")
qb1 (자신 a)
a (strcat "\nimmetti altezza testo ht = mm <" (rtos ht) "> :")
ht1 (실현 a)
·
(if (/= ht1 nil) (setq ht ht1)); 텍스트 높이 세금
(/= qb1 nil) (setq qb qb1)); 기본 할당량 세금
(setq dl (* 0.125년 ht sc)
(command "_setvar" "textsize" (* ht (getvar "dimscale")) 1. 명세
(색상 "_색상" 3)
(command "_linetype" "_s" "연속"")


(남성)
(setq os (getvar "osmode"))
(setq p (getpoint "nimmetti punto 할당량 : ")
(- (캐스터 pb)
dh (+ dh qb) (으)로
a (rtos dh 2 니다.)
·
( if (= dh 0) (setq a (strcat "%p" a)))))
(if (> dh 0) (setq a (strcat "+" a))))
(setq p1 (- (자동차 p) dl) (+))
p1 (리스트 (- (자동차 p) dl) (+ (캐스터 p) dl))
p2 (리스트 (자동차 p) (+ (캐스터 p) dl)
p3 (리스트 (+ (자동차 p) dl) (+ (캐스터 p) dl))
·
(command "_osmode" 0)
( "_pline" p3 p1 p3 ")
( "_solid" p2 p3 "")
("_text""_c" (리스트 (자동차 p) (+ (캐스터 p) (* 0.2 ht sc)))))))
(command "_osmode"os)
·
 
좋은 아침.
감사합니다. [MENTION=22561]스낵 바[/MENTION] 나는이 lisp를 시도하고 블록의 편의와 내 소유주에 lisp는 확률이 나중에 업그레이드 될 수 있다는 것입니다, 그리고 내가 그들을 이동하거나 할당의 유형을 변경해야하는 경우, 내가 거기 작동 몇 달 동안,하지만 lisp는 그것을 작성하지 않았고 나는 프로그래밍의 내 ignorance를 부여 할 수 없습니다, 나는 블록의 선택에 영향을받는 것을 이해하기 위해 관리
(자세한 ...하지만 "quota_altimetrica"에 삽입하는 방법을 이해 할 수 없습니다. 두 번째 요소 선택의 가능성을 차단 (지하에 대 한 exemplary 블록), 해야
(사)나는 문제를 해결할 수있을 때 나는 모든 사람에게 사용할 수있을 것입니다 (독일에서 이탈리아어로 표시를 번역 한 후,이 표시에 대한 높은 장점은 독일어)
 
문제, 저에게 martin에 따라, 당신이 동적 블록의 가시성을 변경할 때, autocad는 *u에서 "이름"을 autocad<numero> ( 익명 블록이었다) 따라서 lisp 더 이상 그것을 볼</numero>
 
감사합니다 tristan, 나는이 일어날 것 같은 무언가를 상상했다, 그래서 두 블록을 만들 것이 더 좋을 것입니다하지만 나는 "quote_altimetriche"를 가지고보다 lisp에 쓰기하는 방법을 이해할 수 없습니다 당신은 또한 "quote_altimetriche_falda"를 선택할 수 있습니다. 이제까지 나는 이것이 문자열에 지정되어야한다는 것을 이해
(setq 목록 (ssget '(0 . "insert") (2 . "quota_altimetrica"))))))
(setq anzahl (길이 목록)
( 세트q nr 0)
(while (< nr anzahl) (setq 요소 (이름 목록 nr)))
그러나 나는 넣는 방법을 이해하지 않는다
(ssadd)그리고 특히 어디

당신이 선호하는 경우 이탈리아에서 lisp를 번역, 그것은 문제가되지 않습니다
 
"quota_altimetrica"라는 이름으로 블록을 추구하는 ssget 명령에서 문제가 발생하면 동적 블록은 이름 *u로 표시됩니다. 그러나 함수를 통해 (vlax-get-property (vlax-ename->vla-object n) '효율적인 이름) 당신은 원래 이름을 가질 수 있습니다.
파일 lisp에서 나는이 작업을 작동하는 기능을 추가, 당신은 파일의 하단에 찾을, 실제 이름과 모든 블록을 필터링하여 목록을 생성하는 코드를 추가.

안녕하세요.
 

Attachments

mitichissimo rpor66, 당신은 내 문제를 해결:피드::피드::4406:

별도의 토론에 모두 사용할 수 있도록 유용하다고 생각하십니까? 나는 이탈리아로 번역하고 보정의 추가와 함께 나는 이탈리아에서 lisp와 완벽한 블록을 사용할 수 있었다.
 
여기, 지금 나는 이탈리아의 표시와 함께 lisp를 번역 (나는 불편에 대한 사과).
이탈리아의 lisp와 함께 부착 된 dwg 파일 (층은 현재 법률에 따라 기존의 할당량의 유형이 있습니다).

도움에 대한 다시 몰입하고 나는 다음 시간을 희망하지만 나는 도움을 요청하지 못하지만 나는 모든 것에 유용한 무언가를 충전 할 것이다. .
 

Attachments

Forum statistics

Threads
58,191
Messages
495,938
Members
103,104
Latest member
FabioFrontini

Members online

No members online now.

Back
Top