Đến nội dung


Hình ảnh
- - - - -

Nhờ Viết Lisp Chuyển Đổi Dim Về Dạng Độ.


  • Please log in to reply
5 replies to this topic

#1 Tuanhp

Tuanhp

    biết zoom

  • Members
  • Pip
  • 11 Bài viết
Điểm đánh giá: -1 (bình thường)

Đã gửi 10 August 2015 - 12:51 PM

E chào các ae trong Diễn đàn CADViet !

 

Lời đầu cho e gửi lời chúc tốt lành đến tất cả các ae và chúc Diễn đàn ngày càng phát triển.

 

e muốn nhờ các ae giúp e viết một lisp chuyển đổi Dimension tư số về độ đk k ah?

 

VD: 

 

e có đường kt ntnay

 

  138236_123.jpg

 

nhập lệnh: cd

nhập đường kính: 6000

click đối tượng Dim

kết quả:

 

138236_124.jpg

 

E xin cảm ơn !

 

Ps: e đang dùng cad LT ạ


  • 0

#2 Tuanhp

Tuanhp

    biết zoom

  • Members
  • Pip
  • 11 Bài viết
Điểm đánh giá: -1 (bình thường)

Đã gửi 11 August 2015 - 12:07 PM

UP


  • -1

#3 haanh

haanh

    biết lệnh adcenter

  • Members
  • PipPipPipPipPipPipPip
  • 2875 Bài viết
Điểm đánh giá: 1554 (rất tốt)

Đã gửi 11 August 2015 - 01:08 PM

E chào các ae trong Diễn đàn CADViet !

 

Lời đầu cho e gửi lời chúc tốt lành đến tất cả các ae và chúc Diễn đàn ngày càng phát triển.

 

e muốn nhờ các ae giúp e viết một lisp chuyển đổi Dimension tư số về độ đk k ah?

 

VD: 

 

e có đường kt ntnay

 

  138236_123.jpg

 

nhập lệnh: cd

nhập đường kính: 6000

click đối tượng Dim

kết quả:

 

138236_124.jpg

 

E xin cảm ơn !

 

Ps: e đang dùng cad LT ạ

 

Dùng lisp mà phải thao tác kiểu cù nhầy và rườm rà :

nhập lệnh: cd

nhập đường kính: 6000

click đối tượng Dim

như thế thì.... ôi người lắm, anh ạ!

Tại sao anh không tạo một kiểu dim Hâm 45°C cho hoành tráng??? :) :) :)

 

11837_aaa21.png


  • 0

“Sống trong đời sống cần có một tấm lòng / Để làm gì em biết không ? / Để gió cuốn đi, để gió cuốn đi...”


#4 Tuanhp

Tuanhp

    biết zoom

  • Members
  • Pip
  • 11 Bài viết
Điểm đánh giá: -1 (bình thường)

Đã gửi 11 August 2015 - 01:41 PM

e cảm ơn a đã góp ý nhưng vấn đề đặt ra của e là chuyển đường đường kích thước về dạng độ ứng vs đường kính mình nhập. (vì công việc của e làm việc gặp rất nhiều đường kính khác nhau"

 

còn ý của bác thì chỉ có thể lấy giá trị thực của Dim và thêm đk "độ" đằng sau đường Dim đó thui.

 

E rất mong nhân dk sự đóng góp ý kiến của mn.

 

thanks you so much !!


  • 0

#5 duy782006

duy782006

    PHẠM QUỐC DUY

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 2155 Bài viết
Điểm đánh giá: 1360 (rất tốt)

Đã gửi 11 August 2015 - 01:59 PM

1.Đã là cad LT thì lisp có làm được gì đâu?

2.Tương ứng theo quy luật gì mà nhập đường kính 6000 thì ra thành 900


  • 0

Cứ ngỡ trần gian là cõi thật.Cho nên tất bật đến bây giờ.
Tạo hộp thoại bằng lisp My blog QUY ĐỊNH ĐẶT TÊN TOPIC TRONG CHUYÊN MỤC LISPD http://ktsduy.wordpress.com/
Để cám ơn chỉ cần nhấn rep_up.png
(Là nhấn vào nút đó phía bài viết của người ta í chứ đừng có nhè cái hình này mà nhấn miết đi nha :-D


#6 Tuanhp

Tuanhp

    biết zoom

  • Members
  • Pip
  • 11 Bài viết
Điểm đánh giá: -1 (bình thường)

Đã gửi 11 August 2015 - 05:17 PM

Cad Lt nhưng bên e cài thêm CadtaMac nên chạy lisp ngon ah.

 

cái này giống như mình scale dim và thêm độ vào thôi a.

 

e đã điều chỉnh phần Scale factor theo ty le =chuvi đường tròn/360

 

nhung moi lan nhu the lai thay doi lai nen mat tg qua. 

 

các a có ý tưởng nào khác k ah?


  • 0