홈/ 질문/Q 27614
다음
진행 중
Something went wrong with the plugin API.
등록일: 2001-12-26T15:25:43+09:00 카테고리:

미터제곱을 평수로 계산하는 방법에서..

area 명령어에서 미터제곱을 평수로 함께 보는 방법을 알려주세요
변수를 손봐야하느지요
아님 계산기를 써야 하는지
계산공식은 아는데 area 명령을 믿을수가 있어야죠
컴퓨터를 믿지 못하는 저의 마음 이해해 주세요
답변부탁합니다.

공유

    관련 있는 질문들

    2 답변

    1. aalan

    2. 컴을 못믿으신다구요?
      그럼 캐드를 못쓰실텐디…ㅡㅡㅋ
      캐드에서는 평을 지원하지 않습니다..
      유저가 계산식을 리습등으로 만들어 써야되겠지요..
      그리고 area명령은 최대한 화면을 확대해서 써야
      에러가 거의 없죠..
      일단 리습 올려드릴께요..
      별루 어려운거 없으니까 대충 수정해서 쓰시길…

      ;;************피크포인트 면적구하기*************
      (defun c:parea(/ p_area area_last)
      (setvar “cmdecho” 1)
      (setq p_area (getpoint”n 면적을 구할 곳에 Pick Point.. :”))
      (command “bpoly” p_area “”)
      (setq area_last (entlast))
      (command “area” “o” area_last)
      (setq a_get_ar (getvar “area”))
      (setq a_a1 (/ a_get_ar 3.3058))
      (command “erase” area_last “”)
      (setq p_area1 (strcat ” 면적 : ” (rtos a_get_ar 2 2) ” m2″))
      (setq p_area2 (strcat ” 면적 : ” (rtos a_a1 2 2) ” 평”))
      (princ p_area1)(princ”n”)
      (princ p_area2)
      (princ)
      )

      • 0

    3. 예전에 저도 한번 그런 리습을 짠 것 같아서 찾아보니…^^
      제가 짠 리습은 넘 간단하게 짠것 같아서 에구구..
      역쉬 중수님…^^ 파이팅

      (defun c:pp (/ a b c d e)

      (setq a (entsel))
      (command “area” “o” a)
      (setq c (getvar “area”))
      (setq d (getvar “perimeter”))
      (setq e (/ c 3.3058))

      ;(prompt “r”)(prompt “Area……..::”)(princ c)
      ;(prompt “r”)(prompt “nPreimeter…::”)(princ d)
      (prompt “r”)(prompt “평수……..::”)(princ e)
      (princ)
      )

      넘 간단하죠..^^

      • 0