Softs.CAD LispNam vẽ ống mềm trên Autocad 2015, 2016,2017

pccc.tranvan

Thành Viên [LV 7]
Gửi anh em lisp vẽ ống mềm trên cad 2015, 2016. Mình đã test trên 2007,2014,2015, 2016,2017
Code mới mình không dùng command đễ vẽ nên thấy vẽ khá nhanh, anh em dùng cho ý kiến nhé.
Lệnh S1, S2, S3, R1, R2, R3
Thấy ok thanh cho phát.
 

Đính kèm

  • AUTOLISPnam.rar
    1.5 MB · Xem: 1,353
Chỉnh sửa lần cuối:

huongdeptrai

Thành Viên [LV 0]
Cám ơn lisp của anh. Máy em bị lỗi lispnam mà ko sửa được. Có cái này thì tốt quá.Hi vọng anh còn làm thêm vẽ co, tê, gót giày nữa. Tks anh nhiều.
p/s: góp ý thêm là anh có thể làm cho nó tự bắt điểm càng tuyệt.
 

pccc.tranvan

Thành Viên [LV 7]
Cám ơn lisp của anh. Máy em bị lỗi lispnam mà ko sửa được. Có cái này thì tốt quá.Hi vọng anh còn làm thêm vẽ co, tê, gót giày nữa. Tks anh nhiều.
p/s: góp ý thêm là anh có thể làm cho nó tự bắt điểm càng tuyệt.
Tự bắt điểm khi nào bạn? Mình không có làm về lạnh nên mấy cái co te... minh khong co biết. Mà lisp Nam thấy dùng bình thường mà. Trừ cái ống mềm thằng bạn không xài dc nó nhờ code lại thôi.
 

pccc.tranvan

Thành Viên [LV 7]
Mình đã làm lại theo ý ban @vangtoilatoi :
- Thêm thanh công cụ: lấy từ lispNam, xin phép chú Nam dùng icon của chú.
- Thêm layer cho ống mềm: mình để mặc định là "M-HVAC-SUPPLY-FLEXIBLE" và "M-HVAC-RETURN-FLEXBLE" màu lần lượt là màu 102 và 52.
Các bạn có thể sửa layer và màu theo ý của các bạn bằng cách sửa những chỗ mình gạch chân trong hình (chỉ sửa các chữ M-HVAC-SUPPLY-FLEXIBLE, M-HVAC-RETURN-FLEXBLE, 102, 52 các dấu " để nguyên nhé):

Help Tao layer.png

- Cách cài và sử dụng như LispNam.
File cài xem ở bài #1
 

vangtoilatoi

Thành Viên [LV 1]
Cái này không có liên quan đến Lisp Nam đâu bạn @tam_ciat ah, nếu bạn dùng Lisp Nam trên cad2015 thì không vẽ được ống mềm nha. Cái của bác @pccc.tranvan là dùng cho cad2015 để thay cho lispNam.
Dùng bản mới mình thấy thế này:
- Bạn đã sửa lại thứ tự lệnh như lispNam: quen thuộc hơn nên dễ dùng.
- Phần layer: lisp nam thì gõ layer ngay trước size ống vd: FA250 nó sẽ tự tạo layer. Như của bạn thì tạo ngay từ đầu mình thấy ok, đỡ phải gõ thêm vào lệnh.
- Test trên cad2007, 2010, 2013, 2014, 2015 đều chạy được.
- Tốc độ: trước đây khi dùng lispNam máy hơi yếu sẽ thấy hình chạy như phim (như đang cầm viết vẽ từng nét) nay của bạn thì enter phát thì nó chạy vèo cái xong. Nói chung tốc độ cải thiện được khá nhiều.
Thanks! bạn nhiều. Mình làm phiền bạn hơi nhiều thông cảm nha, tại cứ tưởng bạn quên nên thi thoảng lại mail.
 

langkhachdocco

Thành Viên [LV 0]
Bản vẽ của mình trục bị nghiêng nên phải đổi UCS để tiện thao tác, nhưng đổi thì dùng lệnh s1 vẽ từ bên trái hay bên phải đều ra y hệt nhau. Có cách nào khắc phục vấn đề này không nhỉ :)
 

pccc.tranvan

Thành Viên [LV 7]
Bản vẽ của mình trục bị nghiêng nên phải đổi UCS để tiện thao tác, nhưng đổi thì dùng lệnh s1 vẽ từ bên trái hay bên phải đều ra y hệt nhau. Có cách nào khắc phục vấn đề này không nhỉ :)
Tạm thời bạn trả về WCS để vẽ đã, mình sẽ fix lỗi này, bạn theo dõi để cập nhật. Bạn dùng cad phiên bản nào? Dưới 2015 thì dùng Lisp Nam nhé.
 

Andy Diep

Thành Viên [LV 1]
ai hướng dẫn giúp với, menuload load xong , op set đường dẫn xong , cũng không sử dụng được, hixx
 

Andy Diep

Thành Viên [LV 1]
Mình ấn load nó báo thế này

Command: LISP command is not available.
Command: Unknown command ""TAO LAYER")". Press F1 for help.
Command: LISP command is not available.
Command: Unknown command ""FLEX 23-01-2016")(PRINC". Press F1 for help.
Command:
Unknown command "")(PRINC)". Press F1 for help.
 
Bên trên