Nhờ giúp đỡ về Lisp offset double !

[quocmanh04tt 638]

Bạn dùng xem:

DoubleOffsetV1-1.lsp

[thiep 367]

5 giờ trước, NGUYENVANHIEUGTVT đã nói:

Bác ơi lisp hoạt động rất tốt k lỗi gì cả, nhưng Bác có thể bổ sung lisp của Lee-Mac là điểm kết thúc nhưng mọi chức năng lisp đều đc giữ nguyên đc k ạ, vì mấy hôm đang sử dụng cái lisp của Lee-Mac quen thao tác rồi mà trong khi lisp phía trên Bác bổ sung lại thiếu mấy chức năng ban đầu thành ra bất tiện quá.. Làm phiền Bác quá nhưng mong Bác giúp đỡ với ạ ! cảm ơn Bác đã quan tâm.

thiếu mấy chức năng ban đầu là chức năng gì bạn?

Có 1 chức năng Through tôi bỏ qua dùng để tìm khoảng cách offset khi pick 2 điểm. Có phải vậy không hay còn gì khác nữa không bạn.

[NGUYENVANHIEUGTVT 7]

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

Bạn dùng xem:

DoubleOffsetV1-1.lsp

lisp chạy đc nhưng xảy ra lỗi là khi offset ra thì nó tạo cùng lúc ra 2 đường 2 offset bị trùng nhau ( 1 đường là polyine và 1 đường là line), và các chức năng ban đầu bị lỗi dùng k đc Bác à. Bác có thể xem lại được k ạ.

[NGUYENVANHIEUGTVT 7]

15 phút trước, thiep đã nói:

thiếu mấy chức năng ban đầu là chức năng gì bạn?

Có 1 chức năng Through tôi bỏ qua dùng để tìm khoảng cách offset khi pick 2 điểm. Có phải vậy không hay còn gì khác nữa không bạn.

Dạ e chào Bác lisp Bác thêm vào đó mà các chức năng như có trong lisp Lee-Mac bị lỗi dùng k đc, các chức năng về xóa nét sau khi offset, rồi chuyển layer khi offset đều k dùng đc, Bác xem lại dùm E với vì lâu nay dùng Lisp của Lee-Mac quen rồi nên giờ k dùng đc bất tiện quá, E chỉ muốn thép chức năng khép kín line hoặc polyline thôi ạ, Còn mọi chức năng khác vẫn đc giữ nguyên. Làm phiền Bác chút nhưng mong Bác xem lại với Ạ !

[quocmanh04tt 638]

15 phút trước, NGUYENVANHIEUGTVT đã nói:

lisp chạy đc nhưng xảy ra lỗi là khi offset ra thì nó tạo cùng lúc ra 2 đường 2 offset bị trùng nhau ( 1 đường là polyine và 1 đường là line), và các chức năng ban đầu bị lỗi dùng k đc Bác à. Bác có thể xem lại được k ạ.

Uh, sr mình nhầm 1 chút khi đối tượng là line, không xóa được line gốc. Lisp sửa:

 

 

Chức năng ban đầu là chức năng nào?

DoubleOffsetV1-1.lsp

[NGUYENVANHIEUGTVT 7]

2 phút trước, quocmanh04tt đã nói:

Uh, sr mình nhầm 1 chút ở đối tượng là line, lsp sửa:

DoubleOffsetV1-1.lsp

Dạ quá thành công rồi Bác nhưng có cái nữa là có chức năng là chọn layer sau khi offset Bác có thể giữ nguyên như ban đầu được không ạ ! Do thói quen E lâu giờ muốn giờ đã dùng giờ khác nhìn lạ quá :v
nếu có thể Bác điều chỉnh chút ạ. Em cảm ơn nhiều lắm
 

[quocmanh04tt 638]

1 phút trước, NGUYENVANHIEUGTVT đã nói:

Dạ quá thành công rồi Bác nhưng có cái nữa là có chức năng là chọn layer sau khi offset Bác có thể giữ nguyên như ban đầu được không ạ ! Do thói quen E lâu giờ muốn giờ đã dùng giờ khác nhìn lạ quá :v
nếu có thể Bác điều chỉnh chút ạ. Em cảm ơn nhiều lắm
 

Lên hộp thoại đó! List layer, lên mặc định chọn current layer, trên cùng là Source, còn chọn layer khác thì tùy.

[NGUYENVANHIEUGTVT 7]

Dạ vậy cũng quá tốt rồi.
Em cảm ơn Bác #quocmanh04tt và Bác #thiep nhiều nhé. Chúc 2 Bác sức khỏe và thành công nha. Cảm ơn 2 Bác rất là nhiều.

[mr.thanh2610 1]

Chào 2 bác #quocmanh04tt, #thiep , em đang dùng lisp rất tốt, nhưng 2 bác có thể chỉnh sửa giúp em thêm chức năng quét chọn nhiều đối tượng được không ạ,em xin cảm ơn.

[quocmanh04tt 638]

Vào lúc 12/3/2020 tại 05:23, mr.thanh2610 đã nói:

Chào 2 bác #quocmanh04tt, #thiep , em đang dùng lisp rất tốt, nhưng 2 bác có thể chỉnh sửa giúp em thêm chức năng quét chọn nhiều đối tượng được không ạ,em xin cảm ơn.

Update theo yêu cầu: 

DoubleOffsetV1-12.lsp

P/s:

+ Khi chọn đối tượng để offset, ở dòng nhắc có chức năng quét chọn nhiều đối tượng bằng cách gõ M (Mselect).

+ Bổ sung Pline khép kín khi đối tượng là ARC.

[thiep 367]

Vào lúc 12/3/2020 tại 05:23, mr.thanh2610 đã nói:

Chào 2 bác #quocmanh04tt, #thiep , em đang dùng lisp rất tốt, nhưng 2 bác có thể chỉnh sửa giúp em thêm chức năng quét chọn nhiều đối tượng được không ạ,em xin cảm ơn.

 

Cũng bon chen với quocmanh04tt, Thiep chỉnh lại lisp Doubleoffset cho đúng yêu cầu của mr.Thanh2610: Chọn nhiều đối tượng để Double_offset

Lisp thêm trong hộp thoại nút THROUGH, cho phép người dùng thêm tuỳ chọn pick 2 điểm để lấy khoảng cách offset,

Đúng với các Curve là SPLINE, *POLYLINE, LINE, ARC, CIRCLE, ELLIPSE,

Và đúng luôn trường hợp ELLIPSE bị cắt (ELLIPSE không đầy đủ)

DoubleOffset.rar

[thiep 367]

10 giờ trước, quocmanh04tt đã nói:

Update theo yêu cầu: 

DoubleOffsetV1-12.lsp

P/s:

+ Khi chọn đối tượng để offset, ở dòng nhắc có chức năng quét chọn nhiều đối tượng bằng cách gõ M (Mselect).

+ Bổ sung Pline khép kín khi đối tượng là ARC.

@quocmanh04tt, lisp của bạn đối với ARC, có trường hợp xảy ra không như ý muốn. Nhưng rất nhiều điều tui phải học hỏi trong lisp của bạn. Trân trọng.

[mr.thanh2610 1]

Cảm ơn 2 bác nhiều, chúc 2 bác thật nhiều sức khỏe :)

[quocmanh04tt 638]

Vào lúc 14/3/2020 tại 18:56, thiep đã nói:

@quocmanh04tt, lisp của bạn đối với ARC, có trường hợp xảy ra không như ý muốn. Nhưng rất nhiều điều tui phải học hỏi trong lisp của bạn. Trân trọng.

Thanks Mr. Thiep, đã test lisp!

*** Lisp của bác cũng có vấn đề với POLYLINE (AcDb2dPolyline).