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  
47c1

[Yêu cầu] Lisp đánh cấp đường

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

47c1    1

(Anh Tue_NV đã đưa ra 1 lisp nhưng chưa đúng với cách đánh cấp đường http://www.cadviet.com/forum/topic/14448-nho-giup-lisp-danh-cap/)

Xin nhờ mọi người làm lisp đánh cấp có điểm bắt đầu và điểm kết thúc đánh cấp của đường PL hoặc đánh cấp từ trên xuống (ko phái phía trên hay phía dưới ạ)

 

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
Tue_NV    3.841

 

(Anh Tue_NV đã đưa ra 1 lisp nhưng chưa đúng với cách đánh cấp đường http://www.cadviet.com/forum/topic/14448-nho-giup-lisp-danh-cap/)

Xin nhờ mọi người làm lisp đánh cấp có điểm bắt đầu và điểm kết thúc đánh cấp của đường PL hoặc đánh cấp từ trên xuống (ko phái phía trên hay phía dưới ạ)

 

 

Bạn vui lòng mô tả cách đánh cấp đường sao cho đúng?

Bằng file dwg và mô tả thật cụ thể và chi tiết nhé

 

Là dân ngoại đạo nên chỉ viết theo yêu cầu thôi. Việc hiểu sao cho đúng là của các bạn trong ngành có chuyên mô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
47c1    1

Dạ e chào anh ạ. e chỉ cần sửa bản cuối cùng 

Cai lisp cua bac chỉ đánh cấp được từ khi polyline từ phải qua trái thôi, em vừa thử

Sửa lại cho bạn đây. Bạn thử lại nhé :
http://www.cadviet.c...iles/3/dcap.lsp 

Lisp của anh là đưa Bề rộng B từ đỉnh dưới đường PL lên đỉnh trên của đường PL 

Còn đánh cấp để thiết kế đường của bọn e là Bề rộng B đều từ đỉnh trên của đường PL xuống đỉnh dưới a ạ.

 

 

"Bạn vui lòng upload file dwg lên nhé!" - Tue_NV

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
47c1    1

Bạn vui lòng mô tả cách đánh cấp đường sao cho đúng?

Bằng file dwg và mô tả thật cụ thể và chi tiết nhé

 

Là dân ngoại đạo nên chỉ viết theo yêu cầu thôi. Việc hiểu sao cho đúng là của các bạn trong ngành có chuyên môn

A ơi e đã gửi hình vẽ lên rồi ạ. a xem giúp e với. Tks!

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
ndtnv    396

Lisp đầy đủ nên có option chọn bắt đầu từ trên xuống hay từ dưới lên.
Sửa lisp nầy không khó nhưng để tác giả làm thì tốt hơn.
Ngoài ra còn cần phải xét đến biến PEDITACCEPT để tránh lỗi cho lệnh PEDIT
Trong thời gian chờ, bạn sửa các chỗ sau để dùng tạm
đổi dấu > thành < và ngược lại ở các dòng
(if (> (cadr sp) (cadr ep))
(if (< ang (/ pi 2))
đổi 2 dòng
(if (= ans "D") thành
(if (= ans "T")

  • Vote tăng 1

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
47c1    1

Lisp đầy đủ nên có option chọn bắt đầu từ trên xuống hay từ dưới lên.

Sửa lisp nầy không khó nhưng để tác giả làm thì tốt hơn.

Ngoài ra còn cần phải xét đến biến PEDITACCEPT để tránh lỗi cho lệnh PEDIT

Trong thời gian chờ, bạn sửa các chỗ sau để dùng tạm

đổi dấu > thành < và ngược lại ở các dòng

(if (> (cadr sp) (cadr ep))

(if (< ang (/ pi 2))

đổi 2 dòng

(if (= ans "D") thành

(if (= ans "T")

Có lẽ lisp này vẫn chưa thỏa mãn khi mà đường PL gấp khúc thì nó ko hiểu được như hình của m gửi. khi đó mình phải đánh cấp từng đường 1 không gộp chung lại được. dù sao m cũng rất cám ơn vì đã hướng dẫn m sửa lisp của a Tue_NV

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  

×