Lisp co kéo và copy đối tượng

[dinhtuong18 3]

Nhờ các anh trong cộng đồng cadviet giúp em viết lisp với ạ

Em có một hình chữ nhật cho trước,bên trong hình chữ nhật có các hệ lỗ đã được chia khoảng cách cho trước,giờ em muốn kéo giãn hay co ngắn hình chữ nhật đấy thì các hệ lỗ bên trong cũng sẽ tăng lên hoặc giảm đi và chia đều như các khoảng cách cho trước ạ
Em cảm ơn

demo.dwg

[Hung_Neymar 6]

Vào lúc 11/5/2020 tại 11:42, dinhtuong18 đã nói:

Nhờ các anh trong cộng đồng cadviet giúp em viết lisp với ạ

Em có một hình chữ nhật cho trước,bên trong hình chữ nhật có các hệ lỗ đã được chia khoảng cách cho trước,giờ em muốn kéo giãn hay co ngắn hình chữ nhật đấy thì các hệ lỗ bên trong cũng sẽ tăng lên hoặc giảm đi và chia đều như các khoảng cách cho trước ạ
Em cảm ơn

demo.dwg

bạn dùng thử lisp này

Lisp_Collection.lsp

[dinhtuong18 3]

không đúng ý của mình bạn ạ

[thiep 365]

Vào lúc 11/5/2020 tại 11:42, dinhtuong18 đã nói:

Nhờ các anh trong cộng đồng cadviet giúp em viết lisp với ạ

Em có một hình chữ nhật cho trước,bên trong hình chữ nhật có các hệ lỗ đã được chia khoảng cách cho trước,giờ em muốn kéo giãn hay co ngắn hình chữ nhật đấy thì các hệ lỗ bên trong cũng sẽ tăng lên hoặc giảm đi và chia đều như các khoảng cách cho trước ạ
Em cảm ơn

demo.dwg

Lisp co kéo thanh thép có hệ lỗ, lệnh là CLP. Xem clip minh hoạ ở đây:

 

 

Keocohelo.rar

[dinhtuong18 3]

Vào lúc 23/5/2020 tại 23:14, thiep đã nói:

Lisp co kéo thanh thép có hệ lỗ, lệnh là CLP. Xem clip minh hoạ ở đây:

 

 

Keocohelo.rar

em cảm ơn thầy đã giúp đỡ,lisp dùng rất ok rồi,nhưng nếu có thể thầy giúp em thêm mục nhập chiều dài muốn kéo giãn hoặc co lại thay vì kéo chuột đc ko ạ,vì kéo chuột như thế sẽ ko đc chuẩn ạ

[thiep 365]

Vào lúc 18/6/2020 tại 09:08, dinhtuong18 đã nói:

em cảm ơn thầy đã giúp đỡ,lisp dùng rất ok rồi,nhưng nếu có thể thầy giúp em thêm mục nhập chiều dài muốn kéo giãn hoặc co lại thay vì kéo chuột đc ko ạ,vì kéo chuột như thế sẽ ko đc chuẩn ạ

Việc kéo chuột thể hiện được tính động khi co hay kéo, còn muốn chính xác khoảng cách cũng được,
Yêu cầu người dùng nhập thêm kích thước thanh thép, khi đó lisp sẽ tính toán nếu chiều dài thanh thép > (N*chiều dài khoảng cách 2 "tâm" hệ lỗ) + khoảng cách 1 biên thì sẽ tạo thêm N hệ lỗ. (N là số nguyên không âm).
Chờ sẽ có lisp được fix.

[vomanhhungdhxd 3]

thầy giúp em lisp này được không ạ.

em muốn mọi người giúp viết lisp kéo dài đối tượng, cụ thể mình hay vẽ cột điện tháp thép. nên đa số là các thép góc đều cạnh. 

Nội dung lisp là chỉ cần tích vào đầu thanh và nhập số liệu, giả sử nhập 30 thì thanh sẽ dài ra 30, nhập vào -30 thì sẽ co ngắn lại 30. như ở video

bản vẽ cad mẫu

 

TP-D122A by H.dwg