ĐIỀU CHỈNH LIPS ĐO CHIỀU DÀI TỰ ĐỘNG ĐÚNG THEO HỆ TRỤC

[ngothanhduy 2]

CHÀO CÁC ANH EM!

TÌNH HÌNH LÀ MÌNH CÓ 1 LIPS ĐO CHIỀU DÀI TỰ ĐỘNG PLINE, NHƯNG KHI ĐO THÌ NHIỀU LÚC ĐƯỜNG DIM KHÔNG QUAY ĐÚNG THEO HƯỚNG TRÌNH BÀY BẢN VẼ. NÊN MÌNH MUỐN NHỜ CÁC ANH EM RÀNH VỀ LIPS CÓ THỂ CHỈNH LẠI DÙM MÌNH LIPS NÀY.

YÊU CẦU: 

+ CHỈNH LẠI LIPS ĐIM ĐÚNG HỆ TRỤC VÀ ĐÚNG TIÊU CHUẨN

+ CÓ THỂ QUÉT 1 LẦN NHIỀU PLINE THAY VÌ QUÉT TỪNG CÁI.

MÌNH CÓ LINK YOUTUBE MÔ TẢ CÁCH HOẠT ĐỘNG CỦA LIPS Ở DƯỚI! (MÌNH CÓ CHÈN ẢNH GIFF CHO BẠN NÀO DÙNG 3G :) )

 

<a href="https://imgflip.com/gif/2ghdgs"><img src="https://i.imgflip.com/2ghdgs.gif" title="made at imgflip.com"/></a>

https://imgflip.com/gif/2ghdgs

 

 

DF - DO DOAN THANG PLINE.lsp

[ngothanhduy 2]

KHÔNG CÓ CAO NHÂN NÀO GIÚP EM HẢ :(

[dinhvantrang 151]

11 phút trước, ngothanhduy đã nói:

KHÔNG CÓ CAO NHÂN NÀO GIÚP EM HẢ :(

 

hình như phải Dim ở "Ngoài" của Pline thì phải

[ngothanhduy 2]

Vào lúc 28/8/2018 tại 17:14, dinhvantrang đã nói:

 

hình như phải Dim ở "Ngoài" của Pline thì phải

 

Em đã dim mọi hướng nhưng vẫn không được anh ơi...

[congviet 29]

Do pline không cùng hướng nên mới có đường dim quay vào trong hoặc quay ra ngoài.

[ngothanhduy 2]

có cao nhân nào chỉnh dùm em dim 1 lúc nhiều poly line không ạ? chứ phải quét 1 lần 1 poly line như thế thì lâu và chậm quá!

xin đa tạ!

[quocmanh04tt 635]

Bạn dùng lisp này xem: https://drive.google.com/file/d/16TGQgWJ_jW1_ABUBifdLEKOKy1xliPpo/view?usp=sharing

P/s: Theo dim hiện hành nhé!

[conghoa 123]

@quocmanh04tt cái lisp của bác em dùng thì nó là hình bên trái, bác có thể giúp em điều chỉnh lisp để nó được như hình bên phải không ạ? 

Lưu ý: khoảng cách từ chân Dim đến đường gióng Dim sẽ được nhập vào từ bàn phím.

Thanks Bác!

[quocmanh04tt 635]

16 phút trước, conghoa đã nói:

@quocmanh04tt cái lisp của bác em dùng thì nó là hình bên trái, bác có thể giúp em điều chỉnh lisp để nó được như hình bên phải không ạ? 

Lưu ý: khoảng cách từ chân Dim đến đường gióng Dim sẽ được nhập vào từ bàn phím.

Thanks Bác!

Bạn xem cái này có phù hợp không: 

 

[ngothanhduy 2]

Vào lúc 12/9/2018 tại 16:08, quocmanh04tt đã nói:

Bạn dùng lisp này xem: https://drive.google.com/file/d/16TGQgWJ_jW1_ABUBifdLEKOKy1xliPpo/view?usp=sharing

P/s: Theo dim hiện hành nhé!

thanks bác @quocmanh04tt nhé! em đã test thử lips của bác và bị 1 số vấn đề như sau!

nếu bác có cách điều chỉnh dùm em thì tuyệt quá. 

 

[ngothanhduy 2]

CÒN 1 PHẦN NỮA LÀ KHI EM DÙNG LỆNH "DPL" CỦA BÁC THÌ NÓ BỊ ĐÁ  LIPS CUTDIM_BDIM CỦA EM, KHÔNG ĐÙNG ĐƯỢC, BÁC @quocmanh04tt NGHIÊN CỨU DÙM EM THỬ NHA BÁC!

[quocmanh04tt 635]

6 giờ trước, ngothanhduy đã nói:

thanks bác @quocmanh04tt nhé! em đã test thử lips của bác và bị 1 số vấn đề như sau!

nếu bác có cách điều chỉnh dùm em thì tuyệt quá. 

 

- Vấn đề của bạn mình đoán là do: Đoạn thẳng đứng đó không thực sự thẳng đứng, nó bị nghiêng về bên trái 1 góc rất nhỏ (nên nhìn bình thường không phát hiện được).

- Bạn thử kiểm tra theo 2 cách sau:

1. Dùng lệnh Dim của CAD, bắt điểm 2 đầu của đoạn thẳng đứng đó, dim sẽ có kết quả như Lisp đã thực hiện.

2. Bạn bật Ortho -> ON, vẽ 1 line, điểm đầu bắt vào đầu dưới của đoạn thẳng đứng đó, điểm thứ 2 thẳng đứng lên trên. Tiếp theo Zoom đủ lớn để xem 2 đầu trên của 2 đối tượng đã nói ở trên có trùng khít lên nhau hay không.

*** Đá với lisp cut_dim, bạn tải lại lisp ở Link trên và chạy thử xem.

[ngothanhduy 2]

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

- Vấn đề của bạn mình đoán là do: Đoạn thẳng đứng đó không thực sự thẳng đứng, nó bị nghiêng về bên trái 1 góc rất nhỏ (nên nhìn bình thường không phát hiện được).

- Bạn thử kiểm tra theo 2 cách sau:

1. Dùng lệnh Dim của CAD, bắt điểm 2 đầu của đoạn thẳng đứng đó, dim sẽ có kết quả như Lisp đã thực hiện.

2. Bạn bật Ortho -> ON, vẽ 1 line, điểm đầu bắt vào đầu dưới của đoạn thẳng đứng đó, điểm thứ 2 thẳng đứng lên trên. Tiếp theo Zoom đủ lớn để xem 2 đầu trên của 2 đối tượng đã nói ở trên có trùng khít lên nhau hay không.

*** Đá với lisp cut_dim, bạn tải lại lisp ở Link trên và chạy thử xem.

ĐẦU TIÊN XIN CÁM ƠN BÁC!

VẤN ĐỀ THỨ 1 VÀ THỨ 2 CỦA BÁC EM CŨNG ĐÃ BIẾT VÀ HIỂU VIỆC ĐÓ NHƯNG EM NGHỈ KHÔNG PHẢI ĐÂU BÁC MẠNH. EM NGHỈ LÀ LIÊN QUAN ĐẾN TRỤC TOẠ ĐỘ. (X-Y)

 

1-  VỀ VẤN ĐỀ DÙNG LỆNH "CUTDIM _ BDIM" THÌ EM ĐÃ HIỂU LÝ DO VÌ SAO, DO LIPS CỦA BÁC SAU KHI DIM NHIỀU ĐỐI TƯỢNG, NÓ KHÔNG PHẢI LÀ THUỘC TÍNH DIM MÀ CHỈ LÀ TEXT, NÊN MÌNH KHÔNG DÙNG LIPS "CUTDIM_BDIM" ĐƯỢC. NÊN BÁC CÓ CAO KIẾN HAY Ý TƯỞNG GÌ KHẮC PHỤC ĐƯỢC KHÔNG Ạ?? CHỨ DẠNG TEXT THÌ SAU KHI CÓ SỰ CỐ PHẢI "STRETCH" PLINE ĐÓ THÌ SỐ KHÔNG CHẠY THEO PLINE HOẶC PHẢI QUÉT LẠI TOÀN BỘ.

 

2- VỚI ĐỂ HOÀN CHỈNH THÊM LIPS CỦA BÁC, EM XIN GÓP THÊM 1 SỐ Ý NHƯ MÔ TẢ Ở CLIPS DƯỚI. CÁM ƠN BÁC @quocmanh04tt

 !

 

[CadExTools 102]

Cái này chỉ là Dim "Bên ngoài" Polyline thôi.

Bạn tham khảo trong chủ đề này hình như đúng mà:

 

[ngothanhduy 2]

17 phút trước, CadExTools đã nói:

Cái này chỉ là Dim "Bên ngoài" Polyline thôi.

Bạn tham khảo trong chủ đề này hình như đúng mà:

 

chủ đề này em tham khảo rồi bác, nhưng vẫn chưa giải quyết được theo topic của em đề ra, em cám ơn bác!

[quocmanh04tt 635]

2 giờ trước, ngothanhduy đã nói:

ĐẦU TIÊN XIN CÁM ƠN BÁC!

VẤN ĐỀ THỨ 1 VÀ THỨ 2 CỦA BÁC EM CŨNG ĐÃ BIẾT VÀ HIỂU VIỆC ĐÓ NHƯNG EM NGHỈ KHÔNG PHẢI ĐÂU BÁC MẠNH. EM NGHỈ LÀ LIÊN QUAN ĐẾN TRỤC TOẠ ĐỘ. (X-Y)

 

1-  VỀ VẤN ĐỀ DÙNG LỆNH "CUTDIM _ BDIM" THÌ EM ĐÃ HIỂU LÝ DO VÌ SAO, DO LIPS CỦA BÁC SAU KHI DIM NHIỀU ĐỐI TƯỢNG, NÓ KHÔNG PHẢI LÀ THUỘC TÍNH DIM MÀ CHỈ LÀ TEXT, NÊN MÌNH KHÔNG DÙNG LIPS "CUTDIM_BDIM" ĐƯỢC. NÊN BÁC CÓ CAO KIẾN HAY Ý TƯỞNG GÌ KHẮC PHỤC ĐƯỢC KHÔNG Ạ?? CHỨ DẠNG TEXT THÌ SAU KHI CÓ SỰ CỐ PHẢI "STRETCH" PLINE ĐÓ THÌ SỐ KHÔNG CHẠY THEO PLINE HOẶC PHẢI QUÉT LẠI TOÀN BỘ.

 

2- VỚI ĐỂ HOÀN CHỈNH THÊM LIPS CỦA BÁC, EM XIN GÓP THÊM 1 SỐ Ý NHƯ MÔ TẢ Ở CLIPS DƯỚI. CÁM ƠN BÁC @quocmanh04tt

 !

 

1- Ở trên mình nói là đoán, vậy tại sao bạn không gửi bản vẽ mẫu của bạn lên? Bởi vì của mình test không có trường hợp nào bị như vậy. Cái Lisp sau, trong lisp mình cũng dùng dim để do, sau đó xóa dim để lại MTEXT. Lần trước nó đá với Cut_Dim là do mình để sót lại 1 biến không khử, nên có thể ảnh hưởng đến nó.

2- Do dùng Dim nên kết quả của CAD, dim thế nào thì lisp như vậy. Bạn cứ thử dùng lệnh dim của cad để thực hiện với các trường hợp của bạn, pick 2 điểm để đo, điểm đặt Dim nằm trên đoạn pline đã đo. Ở video mới, khi bạn move mấy dim có giá trị 80 đó, thì lúc này dimline không nằm trên pline nữa.

3- Với nhu cầu đặt vị trí giá trị dim giống như video ở trên, kết hợp chọn nhiều pline cùng 1 lần, mình e là không thể vì không có quy luật chung... Theo mình giải pháp là: viết thêm 1 lệnh khác để điều chỉnh vị trí của các đối tượng sau khi DPL mà không ưng cái bụng (có thể quét chọn).

[ngothanhduy 2]

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

- Vấn đề của bạn mình đoán là do: Đoạn thẳng đứng đó không thực sự thẳng đứng, nó bị nghiêng về bên trái 1 góc rất nhỏ (nên nhìn bình thường không phát hiện được).

- Bạn thử kiểm tra theo 2 cách sau:

1. Dùng lệnh Dim của CAD, bắt điểm 2 đầu của đoạn thẳng đứng đó, dim sẽ có kết quả như Lisp đã thực hiện.

2. Bạn bật Ortho -> ON, vẽ 1 line, điểm đầu bắt vào đầu dưới của đoạn thẳng đứng đó, điểm thứ 2 thẳng đứng lên trên. Tiếp theo Zoom đủ lớn để xem 2 đầu trên của 2 đối tượng đã nói ở trên có trùng khít lên nhau hay không.

*** Đá với lisp cut_dim, bạn tải lại lisp ở Link trên và chạy thử xem.

 

Em đã kiểm tra lại kỹ theo cách của bác chỉ như thế này:

- làm theo cách thứ 2 của bác. vấn đề dim ngược đã được xử lí.

- giờ bác @quocmanh04tt  co thể chỉnh lại giúp em dim nhiều poly line kết quả là định dạng dim chứ không phải text và có thể dùng lệnh "CUTDIM_BDIM" được. để khi chiều chỉnh chiều dài của Pline thì số của dim sẽ chạy theo.

 

Em cám ơn bác nhiều!

[quocmanh04tt 635]

12 phút trước, ngothanhduy đã nói:

 

Em đã kiểm tra lại kỹ theo cách của bác chỉ như thế này:

- làm theo cách thứ 2 của bác. vấn đề dim ngược đã được xử lí.

- giờ bác @quocmanh04tt  co thể chỉnh lại giúp em dim nhiều poly line kết quả là định dạng dim chứ không phải text và có thể dùng lệnh "CUTDIM_BDIM" được. để khi chiều chỉnh chiều dài của Pline thì số của dim sẽ chạy theo.

 

Em cám ơn bác nhiều!

Tạm thời bạn làm như sau: Mở file có "CUTDIM_BDIM" thêm vào ngay sau tên lệnh dòng này: (setq dim nil)

Ví dụ:

(defun c:CD (....)

(setq dim nil)

....

)

p/s: Do hiện tại mình không có cad và file lisp cũ ở đây, nên tạm thời bạn làm như vậy nhé!

[quocmanh04tt 635]

Chắc là phải xử lý theo cách này:

 

[ngothanhduy 2]

Vào lúc 15/9/2018 tại 17:52, quocmanh04tt đã nói:

Chắc là phải xử lý theo cách này:

 

 

CÁM ƠN BÁC @quocmanh04tt, KHI NÀO BÁC RẢNH THÌ POST LÊN FILE LIPS CŨ DÙM EM NHA! HOẶC THEO PHƯƠNG ÁN BÊN TRÊN CỦA BÁC QUÁ  TỐT , DO BỮA EM TẢI CHỒNG FILE NÊN MẤT FILE "DPL" ĐỊNH DẠNG DIM

[quocmanh04tt 635]

Bạn tải theo link này: https://drive.google.com/open?id=18TwXeS3VPYoTau43IuyanFhJY4P3e6Ji

P/s: 

- Lệnh: DPL -> Đối tượng là DIM

- Lệnh: PTD (để hiệu chỉnh vị trí TextDim - Toggle switch)

[ngothanhduy 2]

EM CÁM ƠN BÁC @quocmanh04tt NHIỀU! EM ĐÃ TEST LIPS OK RỒI NHA BÁC. KHÔNG BIẾT PHẢI CÁM ƠN BÁC RA SAO.