홈/ 질문/Q 98190
다음
진행 중
Lv.0
등록일: 2013-05-09T17:26:41+09:00 카테고리:

라인 스케일 문의 드립니다

두 개의 도면에서

각각 scale1.0의 두 hidden 선이 있는데

점 간격이 하나는 좁고

또 다른 도면에서는 넓게 나타나는 경우

LTscale을 1로 통일 시켰음에도 불구하고 다르게 나타나는 것 해결방법 좀 알려주세요~^^

공유

    관련 있는 질문들

    1 답변

    1. aalan

    2. CELTSCALE을 확인해 보세요!

      참고로..

      특정객체의 라인타입 스케일을 바꿀려면 아래의 제 리습을 활용 해봅심도….ㅋ
      LINETYPE에는 두 가지 스케일이 있습니다. 
      LTSCALE: 광역변수로 변경시 도면전체에 적용됩니다. 변경시 변화가 없는거 같아도 저장 후 다시 열면 스케일 값이 바껴 있을겁니다. 
      CELTSCALE: 지역변수로 변경시, 변경이후 새로 그린 객체에만 적용되는 스케일 입니다. 
      CELTSCALE은 보통 1이 기본값입니다. 2로 설정하시면 LTSCALE값에 x2하여 스케일 값이 적용됨.
      ex) LTSCALE: 10 , CELTSCALE: 3  =  10 x 3하여 라인에는 30의 스케일이 적용되는 것입니다.
      그래서 저는 CELTSCALE만 바꿔가며 사용하고 있습니다. 
      아래 리습로드 후 CS를 입력하시면 객체를 선택하라고 묻습니다. 
       
      1. 선택할 경우: 그 객체의 CELTSCALE값을 보여줍니다. 원하는 값을 입력하시면 됩니다. 
                            동시에 이후 작도하는 객체에 적용됩니다. 
      2. 선택없이 스페이스바 누를 경우:  현제 CELTSCALE값을 보여주고, 원하는 값을 입력하심 되요^^
                                                       물론 이후 작도하는 객체에 적용됩니다. 
      HIDDEN 또는 CENTER 선을 몇개 긋고 값을 변경 해보시면 조금 이해가 빠를듯 하네요!
        (defun c:CS (/ clts cltsn str1 ents fac entname1 str2 dxf fac1 cltsn1)  
                 
                 (setq clts (getvar “celtscale”))
                 (setq cltsn (rtos clts 2 2))
                 (setq str1 (strcat “Enter new value for CELTSCALE < ” cltsn ” >:” ))
                (setq ents (ssget)) 
                
            (if (= ents nil)
            
               (progn 
                   (setq fac (getreal str1))
                   (command “setvar” “celtscale” fac)
                )
                
                (progn
                           (setq entname1 (ssname ents 0))
                          (if (= (cdr (assoc 48 (entget entname1))) nil)
                                 (progn           
                                      (setq str2 “Enter new value for CELTSCALE <1.00>:”)          
                                      (setq fac1 (getreal str2))          
                                      (command “setvar” “celtscale” fac1)
                                      (command “change” ents “” “p” “s” fac1 “” )      
                                 )
                
                                (progn 
                                      (setq dxf (cdr (assoc 48 (entget entname1))))
                                      (setq cltsn1 (rtos dxf 2 2))
                                      (setq str2 (strcat “Enter new value for CELTSCALE < ” cltsn1 ” >:”))
                                     (setq fac1 (getreal str2))
                                     (command “setvar” “celtscale” fac1)
                                     (command “change” ents “” “p” “s” fac1 “” ) 
                               )    
                           )
                  )
              )
           (princ)
      )
      • 0