Chuyển đến nội dung
Diễn đàn CADViet
  • Thông báo

    • Nguyen Hoanh

      CADViet đã hoàn tất nâng cấp   14/09/2017

      Chào các bạn, CADViet đã hoàn tất việc nâng cấp lên phiên bản mới. Tất cả các chức năng đã hoạt động theo kỳ vọng của ban quản trị. Nếu có vấn đề gì cần phản hồi, các bản post ở đây nhé: Trân trọng, Nguyễn Hoành.
Đăng nhập để thực hiện theo  
chatbumbum

lips cad vẽ nét cắt cột tròn

Các bài được khuyến nghị

các bạn giúp mình tìm lips vẽ ký hiệu vệt cắt cột tròn nhe. cám ơn rất nhiều

Mình không hiểu ý của bạn. Bạn giải thích rõ hơn được không. bạn nên gửi file mẫu lên và ghi rõ kết quả mong muốn.

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
các bạn giúp mình tìm lips vẽ ký hiệu vệt cắt cột tròn nhe. cám ơn rất nhiều

 

Bạn thử cái này xem.



(Defun C:cottron (/ p1 p2 p3 p5 p11 p12 p13 l)
(setq dk (getreal "\nNhap duong kinh:"))
(setq p (getpoint "\nDiem dau:"))
(setq pt2 (getpoint p "\nDiem cuoi:"))
(setq l (distance p pt2))
(setq goc (angle p pt2))

(setq p1 (polar p (+ goc (/ pi 2.0)) (/ dk 2.0)))
(setq p2 (polar p1 goc l))
(setq p3 (polar p (- goc (/ pi 2.0)) (/ dk 2.0)))
(setq p4 (polar p3 goc l))
(setq p5 (polar p goc l))


(command "line" p1 p2 "")
(command "line" p3 p4 "")

(setq p11 (polar p5 (+ goc (/ pi 2.0)) (/ dk 4.0)))
(setq p11 (polar p11 goc (/ dk 8.0)))
(setq p12 (polar p5 (- goc (/ pi 2.0)) (/ dk 4.0)))
(setq p12 (polar p12 goc (/ dk 8.0)))
(setq p13 (polar p12 (- pi goc) (/ dk 4.0)))

(command "spline" p2 p11 p5 p13 p4 p12 p5 "" "" "")

)

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay

Đăng nhập để thực hiện theo  

×