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.
qh2qa06

Xin Lisp Tính Và Điền Độ Dốc Kèm Mũi Tên Chỉ Hướng Dốc Giữa 2 Điểm Text

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

Nhờ các chuyên gia giúp em viết lisp tính độ dốc giữa 2 cao độ text, vẽ mũi tên chỉ hướng dốc từ điểm có cao độ lớn đến điểm có cao độ nhỏ.

 

Nội dung như sau:

1. Chọn 2 cao độ text cần tìm độ dốc (chọn bằng cách tích text hay quét cửa sổ đều được).

2. Căn cứ vào vị trí của text và giá trị cao độ text, tính ra độ dốc giữa 2 điểm text. Điền mũi tên độ dốc và giá trị độ dốc từ điểm cao độ lớn đến điểm cao độ nhỏ. Phương của mũi tên độ dốc trùng với phương của 2 điểm text.

3. Trường hợp giá trị độ dốc bằng 0%, điền mũi tên 2 đầu.

 

Chi tiết em ghi trong file đính kèm. Nhờ mọi người giúp đỡ! Em xin chân thành cảm ơn!

 

http://www.cadviet.com/upfiles/6/64018_dien_do_doc.dwg

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

Lisp đây: http://www.cadviet.com/upfiles/6/141736_slope.rar

- Quét chọn.

- Nếu vùng text cần quét, tất cả các text sắp xếp đều theo lưới ô vuông thì chỉ 1 lần quét là xong, còn không thì phải chọn từng cặp đôi.

*** Nếu chọn vùng Text có khoảng cách giữa các text không đều, hoặc đều từng cụm thì khoảng cách min, hoặc cụm có khoảng cách min sẽ được thực hiện...

- Lệnh: SLOPE.

  • 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

Lisp đây: http://www.cadviet.com/upfiles/6/141736_slope.rar

- Quét chọn.

- Nếu vùng text cần quét, tất cả các text sắp xếp đều theo lưới ô vuông thì chỉ 1 lần quét là xong, còn không thì phải chọn từng cặp đôi.

*** Nếu chọn vùng Text có khoảng cách giữa các text không đều, hoặc đều từng cụm thì khoảng cách min, hoặc cụm có khoảng cách min sẽ được thực hiện...

- Lệnh: SLOPE.

Cảm ơn bác nhiều!

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

Lisp đây: http://www.cadviet.com/upfiles/6/141736_slope.rar

- Quét chọn.

- Nếu vùng text cần quét, tất cả các text sắp xếp đều theo lưới ô vuông thì chỉ 1 lần quét là xong, còn không thì phải chọn từng cặp đôi.

*** Nếu chọn vùng Text có khoảng cách giữa các text không đều, hoặc đều từng cụm thì khoảng cách min, hoặc cụm có khoảng cách min sẽ được thực hiện...

- Lệnh: SLOPE.

Anh chỉnh giúp em như sau được không:

- Tên lệnh: DDS

- Style của text ghi độ dốc theo style của text hiện hành. Lần đầu dùng lệnh, hỏi chiều cao chữ của text độ dốc.

- Mũi tên theo Dim hiện hành.

- Layer của cả mũi tên và text theo layer hiện hành.

 

Cảm ơn anh!

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


×