nhờ viết lisp co giãn đường dim theo 1 giá trị cho trước

[truong hoan 1]

E có 1 yều cầu nhỏ mong nhờ các bác giúp đỡ ạ. ví dụ e có nhiều đường dim đã vẽ trước giờ muốn thu ngắn lại toàn bộ đường dim đó  đi 2 đầu , mỗi đầu 100mm. vậy bác nào giúp e với ạ. e cảm ơn.

[limfx 32]

Lệnh DDS:  Dim Shrink 

Không biết theo yêu cầu của bạn chưa?

DimShrink(DDS).lsp

[truong hoan 1]

cảm ơn bác. đúng cái e cần ạ. nếu được bác có thể fix cho e thêm chức năng giãn ra được k ạ

22 giờ trước, limfx đã nói:

Lệnh DDS:  Dim Shrink 

Không biết theo yêu cầu của bạn chưa?

DimShrink(DDS).lsp

cảm ơn bác. đúng cái e cần ạ

[NTHAHT 91]

Lisp trên, với trường hợp dim Rotated có chân dim không bằng nhau sẽ không được như ý.

[limfx 32]

23 giờ trước, truong hoan đã nói:

cảm ơn bác. đúng cái e cần ạ. nếu được bác có thể fix cho e thêm chức năng giãn ra được k ạ

cảm ơn bác. đúng cái e cần ạ

Giãn ra bạn nhập số âm vào là được

 

[7o7 82]

4 giờ trước, limfx đã nói:

Giãn ra bạn nhập số âm vào là được

 

Nếu làm ngược lại thì hợp lý hơn: giãn là dương, co là âm.

Còn lấy angle thì lisp chỉ đúng với dim aligned, còn dim rotated thì góc chỉ có 2 giá trị là 0 nếu nằm ngang và pi/2 nếu đứng.

[ndtnv 481]

Góc dim rotated không chỉ có chỉ có 2 giá trị là 0 và pi/2

nó là DXF 50 hoặc (vlax-get-property dimo 'Rotation)

Xoay ucs rồi dim sẽ thấy

 

[cuongtk2 394]

DimLinear nó là dạng RotatedDimension, quay nó một góc- khi strecth vẫn khác AlignedDimension