[Nhờ Viết Lisp] Tự Động Thay Đổi Giá Trị Theo Độ Dài Và %độ Dốc

[conghoa 136]

Hiện tại mình đang phải bố trí các cốt cao độ thoát nước mặt của một công trình chia lô có diện tích lớn, hướng thoát theo nhiều chiều khác nhau, mình muốn nhớ các bạn làm giúp 1 lisp như sau:

 

(file ví dụ xem ảnh minh họa)

 

- Chạy lisp

+ Lisp yêu cầu chọn % độ dốc. (giá trị này được lưu lại mặc định cho các lần chạy lisp sau)

- Người dùng đánh : 1 (tương đường với 1% độ dốc)

+ Lisp yêu cầu chọn text cần copy

- Người dùng chọn text 5000 tại vị trí A (xem hình dưới, giá trị 5000 chỉ để mình họa, có thể áp dụng cho mọi giá trị text)

+ Lisp yêu cầu chọn điểm cần thay đổi cốt 

- NGười dùng chọn điểm B thì giá trị tự động thay đổi thành 4900 (giá trị này bằng 5000-(10000x1%)

lưu ý giá trị 10000 là Khoảng cách từ A đến B là do người dùng chọn và giá trị này có thể thay đổi

 

Tương tự với việc vị trí điểm B có thể thay đổi bất gì mà không cố định là phải thẳng hàng theo trục 0xy.

 

 

 

 

 

Trân trọng!

 

 

 

 

 

 

[quocmanh04tt 638]

Xem bài này có phù hợp không! http://www.cadviet.com/forum/topic/156702-xin-lisp-copy-tang-giam-theo-do-doc/?do=findComment&comment=390985

[conghoa 136]

Thanks bác Mạnh :D, lisp của bác ngoài mong đợi :D

[lanvientkh 13]

Vào lúc 11/3/2017 tại 11:26, quocmanh04tt đã nói:

Xem bài này có phù hợp không! http://www.cadviet.com/forum/topic/156702-xin-lisp-copy-tang-giam-theo-do-doc/?do=findComment&comment=390985

Link này mất rồi bạn ơi

[vietduc147258 88]

1 giờ} trướ}c, lanvientkh đã nói:

Link này mất rồi bạn ơi

Diễn đàn có chức năng tìm kiếm đó bạn. Nếu tìm không thấy thì reply lại tui gửi link cho

[Xuân Lộc 11]

1 giờ trước, lanvientkh đã nói:

Link này mất rồi bạn ơi

b seach xin-lisp-copy-tang-giam-theo-do-doc cadviet là ra nhé, bên cadviet đổi link mới lên link cũ bị lỗi

[vietduc147258 88]

3 giờ trước, Xuân Lộc đã nói:

b seach xin-lisp-copy-tang-giam-theo-do-doc cadviet là ra nhé, bên cadviet đổi link mới lên link cũ bị lỗi

Mình muốn bạn đó tìm thôi. chứ thực ra có 1 mẹo trong diễn đàn có nói đến rồi

ví dụ Link cũ

http://www.cadviet.com/forum/topic/156702-xin-lisp-copy-tang-giam-theo-do-doc/?do=findComment&comment=390985

Lấy bài viết bất kì hoặc link đang hiện trên thanh địa chỉ hiện hành cũng được. Sửa mấy số cuối là ok

"https://www.cadviet.com/forum/index.php?app=forums&module=forums&controller=topic&id=168275"

thành "https://www.cadviet.com/forum/index.php?app=forums&module=forums&controller=topic&id=156702"