[ Nhờ chỉnh sửa ] Lisp hoặc viết lại, Lisp code kéo hatch cho cad đời thấp

[mIG.31 1]

E chào các anh, chị, e có 1 lisp chọn hatch và kéo hatch bằng pick point cho autocad đời thấp, nhưng do mới tập viết nên  em đã thử lại nhiều lần nhưng vẫn chưa thể sửa được theo ý muốn, nội dung là như vậy:

- Khi pick chuột đến điểm cần kéo thì chỉ cần pick 1 lần

- Vẽ Vector đường bao tạm cho hatch và hiển thị point 

- Lắp vòng lặp bắt điểm và kéo hatch

Mong các anh chị ghé qua chỉnh sửa giúp , e xin chân thành cảm ơn trước

 

hed.lsp

[Tu Mo 0]

1 giờ trước, mIG.31 đã nói:

E chào các anh, chị, e có 1 lisp chọn hatch và kéo hatch bằng pick point cho autocad đời thấp, nhưng do mới tập viết nên  em đã thử lại nhiều lần nhưng vẫn chưa thể sửa được theo ý muốn, nội dung là như vậy:

- Khi pick chuột đến điểm cần kéo thì chỉ cần pick 1 lần

- Vẽ Vector đường bao tạm cho hatch và hiển thị point 

- Lắp vòng lặp bắt điểm và kéo hatch

Mong các anh chị ghé qua chỉnh sửa giúp , e xin chân thành cảm ơn trước

 

hed.lsp

Mục đích của bạn là gì?. muốn lấy cái hatch đó mà mình ko có hả?. có lisp sao chép và tạo hatch đó bạn.

[ketxu 2.984]

Mình có thể viết để cho phép lệnh Stretch kéo đc Hatch như bình thường mà :D

[mIG.31 1]

Chào anh ketxu, em thấy anh khá nổi tiếng, đi đâu cũng gặp họ dùng lisp của anh, có thể nói anh là người có tầm ảnh hưởng nhất trong cộng đồng autolisp/autocad việt

- Và em biết là anh viết được cái code này

- Thực ra thì cái lisp này e cũng hoàn thiện rồi, nhưng mà nghĩ đi nghĩ lại lisp mình viết cho cộng đồng thì cứ thả nổi để cho cộng đồng mạng viết tiếp :d

- Trước kia e cũng có dịp khảo sát mấy cái máy tính của một vài công ty và mình thấy các bác ấy dùng autocad 2008/2007 rất nhiều (có thể là cả cad 2005) , lý do thì nó có muôn vàn các kiểu như dùng phần mềm thiết kế đường, dùng cad đời cao nó hay bị out : fatal error, lỗi bắt win bản quyền, lỗi không load được lisp (phải trust location trong option-trust location :d), thậm chí có bác còn không biết dùng lisp là gì(biết nhưng không dám dùng ^^ -> vấn đề nhạy cảm) bla... bla.

Và cad 2008 thì một số bạn có thể chưa biết, để mình nói vắn tắt luôn từ năm 2010 trở đi các phiên bản autocad trở về sau chỉ cần click vào hatch nó sẽ hiện grips các điểm giống như bạn bấm vào line hoặc polyline vậy (cad 2009 trở xuống không có) khí bạn kéo cá points này đến điểm mới nó sẽ kéo đường biên hatch đến point đó rất tiện cho những bạn đi thông phương án kiến trúc hoặc sửa theo ý của bác chủ trì kiến trúc ^-^.

Thân ./.