홈/ 질문/Q 106249
다음
진행 중
Lv.0
등록일: 2016-03-15T09:44:04+09:00 카테고리:

auto lisp 변수 관련 질문

안녕하세요~

리습을 만들다가 궁금한 것이 있어서 질문드립니다.


(setq Cnr 1) <– 변수 선언

(setq Ab_1 (getpoint “nNo.” Cnr ” Click left Coner!!:”))  <– 1번 왼쪽 코너 클릭!!인데

여기서 Ab_1 <– 이 변수를

Cnr 변수 값을 이용하여 변수를 지정 할수 있을까요?



예를 들면 Cnr 값이 1이면

Ab_1_1 이라는 변수가 생기고

Cnr 값이 2이면

Ab_2_1 이라는 변수가 생기고

뭐 이런식으로 가능한가요?



좀 알려주세요~~
감사합니다~

공유

    관련 있는 질문들

    4 답변

    1. aalan

    2. 아래와 같이 해보세요.
      (defun c:abc()
       (setq Cnr 2 variable (read (Strcat “Ab_” (itoa Cnr) “_1”)))
       (set variable (getpoint (strcat “nNo.” (itoa Cnr) ” Click left Coner!!:”)))
       (princ “n”) (princ (vl-symbol-name variable)) (princ)
      )

      • 0

    3. 답변 감사드립니다~

      • 0

    4. 답변 감사드립니다 . 테스트 해봤는데 딱 제가 원하던 거네요.. 소름이 돋았어요 ㅎㅎ 감사드립니다.

      테스트용
      (defun c:abc()
       (setq Cnr 1)
       (setq variable_1 (read (Strcat “Ab_” (itoa Cnr) “_1”)))
       (setq variable_2 (read (Strcat “Ab_” (itoa Cnr) “_2”)))
       (set variable_1 (getpoint (strcat “nNo.” (itoa Cnr) ” Click left Coner!!:”)))
       (set variable_2 (getpoint (strcat “nNo.” (itoa Cnr) ” Click Right Coner!!:”)))
       
       (setq Cnr 2)
       (setq variable_1 (read (Strcat “Ab_” (itoa Cnr) “_1”)))
       (setq variable_2 (read (Strcat “Ab_” (itoa Cnr) “_2”)))
       (set variable_1 (getpoint (strcat “nNo.” (itoa Cnr) ” Click left Coner!!:”)))
       (set variable_2 (getpoint (strcat “nNo.” (itoa Cnr) ” Click Right Coner!!:”)))
       
       (princ “n”)
       (princ AB_1_1)
       (princ AB_1_2)
       (princ AB_2_1)
       (princ AB_2_2)
       (princ)
      )

      • 0

    5. 반갑습니다. ㅎㅎ
      상큼메론님이 잘 활동하고 계서서 제가 낄 자리가 없네요 ㅠ.ㅠ

      • 0