số thứ tự Lisp đánh số thứ tự, thêm tiền tố, hậu tố Text, Block Att, Dim

[tuk45bn 2]

Vào lúc 18/1/2024 tại 18:44, Duong Nhat Duy đã nói:

Chia sẻ đến các bạn 1 lisp đánh số thứ tự hàng loạt, thêm tiền tố, hậu tố,... Áp dụng cho Text (cũng như Mtext), Block Att (Block thuộc tính), Dim.

Lisp có nhiều tính năng đánh số ví dụ đánh đè lên Text cũ hoặc thêm vào Text hiện tại,... thỏa mãn nhiều yêu cầu đề bài đặt ra.

 

Tên lệnh:

   STT - Đánh số thứ tự hàng loạt (áp dụng cho Text, Att, Dim)

   C1 - Copy tăng dần (áp dụng cho Text, Att)

   C2 - Copy giảm dần (áp dụng cho Text, Att)

   1C - Copy tăng dần N đơn vị (áp dụng cho Text, Att)

   FT - Thêm tiền tố, hậu tố, hoặc xóa 1 đoạn ký tự ở đầu hoặc cuối (áp dụng cho Text, Att, Dim)

 

Mô tả:

- STT :

+ Đánh số thứ tự theo các quy tắc tùy chọn, ví dụ: trên xuống dưới, trái sang phải, theo chiều pline hoặc theo thứ tự người dùng pick chọn

+ Có thể thêm tiền tố, hậu tố, nhập stt bắt đầu, số chữ số 0.

+ Kết quả có thể đè lên text cũ hoặc thêm vào đầu, cuối

+ 1 số ví dụ: (hình minh họa)

 

Đánh số từ trên xuống dưới, trái sang phải:

 

Đánh số theo thứ tự pick chọn:

 

Đánh số theo chiều Pline:

 

- C1, C2, 1C : Đánh số thứ tự thủ công

+ Hoạt động như lệnh Copy nhưng tăng/giảm dần giá trị cuối cùng trong Text/Att

+ Có thể chọn 1 nhóm đối tượng, ví dụ: 1 hình tròn và 1 Text, ...

+ Lệnh 1C chỉ dùng cho các Text/Att số thực

 

- FT : Thêm tiền tố, hậu tố; xóa 1 đoạn ký tự ở đầu hoặc cuối

 

File lisp:

- 18/01/2024: Danh STT Text, Att, Dim v1.00.lsp

- 04/04/2024: Danh STT Text, Att, Dim v1.01.lsp (Thêm option đánh stt theo 2 chiều, ví dụ: trái qua phải, trên xuống dưới)

- 09/05/2024: Danh STT, them bot noi dung Text, Att, Dim v1.02.lsp (Thêm tính năng thêm tiền tố, hậu tố, xóa 1 đoạn ký tự ở đầu hoặc cuối)

- 20/06/2024: Danh STT, them bot noi dung Text, Att, Dim v1.03.lsp (Sửa lại cách đánh stt có số 0 đằng trước bằng cách khai báo stt bắt đầu là 01, 002, ... Thêm tính năng đánh theo alphabet A, B, C, D,...)

 

Chúc các bạn thành công :)))

Cái này khung to khung nhỏ không bằng nhau thì lại đánh số không chính xác được anh nhỉ khắc phục được cái có cả khung to nhỏ thì hay quá anh nhỉ

 

[Duong Nhat Duy 461]

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

Cái này khung to khung nhỏ không bằng nhau thì lại đánh số không chính xác được anh nhỉ khắc phục được cái có cả khung to nhỏ thì hay quá anh nhỉ

Bạn gửi bản cad lên đây.

[tuk45bn 2]

Khung az.dwg đây anh cả hàng dọc và hàng ngang đều bị anh ah

 

[Duong Nhat Duy 461]

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

Khung az.dwg đây anh cả hàng dọc và hàng ngang đều bị anh ah

Cái này là do Block của bạn mất (điểm) gốc: điểm gốc bay ra ngoài vũ trụ nên nó lỗi thôi. Nếu đánh số 1 loại Block thì không sao vì bay thì thằng nào cũng bay nhưng 2 block khác nhau, hoặc chỉ cần scale khác nhau thì điểm gốc chúng nó bay loạn xạ nên sai thôi. Còn khi đã đúng điểm gốc rồi thì như ví dụ trong file, bạn chọn đánh từ trên xuống hoặc từ dưới lên là được.

[Duong Nhat Duy 461]

Vào lúc 24/7/2024 tại 08:24, HUY2K đã nói:

phiền bạn có thể gửi lisp của bạn đã sửa hết mã haxa được ko ạ, tác giả tạo lisp cho toàn bộ cad nên ae cad có biến LISPSYS chắc tự khắc phục thôi

Mình đã fix lỗi khi đánh số kiểu trái->phải, trên->dưới rồi nhé, cái này do chữ tiếng Việt nhiều nên cad nó dịch lú dẫn đến lỗi hàm

[Thanhvqh 0]

Bác cho E xin Lsip đi sao E không down được vậy!!

 

[Duong Nhat Duy 461]

14 giờ trước, Thanhvqh đã nói:

Bác cho E xin Lsip đi sao E không down được vậy!!

https://drive.google.com/drive/u/1/folders/1vs5fVIPiH1afDJczolu_GURTnXlaM75Y

Bạn down trong này nhé !

[Đinh Văn Triển 0]

Video_2024-10-04_094056.rarKhông biết sao mình thêm tiền tố, hậu tố cho Dim mà nó bị mất luôn số của Dim?

[Duong Nhat Duy 461]

5 giờ trước, Đinh Văn Triển đã nói:

Video_2024-10-04_094056.rarKhông biết sao mình thêm tiền tố, hậu tố cho Dim mà nó bị mất luôn số của Dim?

Bạn thêm vào Text Override thì nó đè lên chiều dài dim là đúng rồi, bạn phải thêm vào Prefix chứ.

[Đinh Văn Triển 0]

Cho mình hỏi sao Lisp này mỗi bản vẽ mình dùng được vài lần lại không dùng được vậy? Nếu tắt bản vẽ đi mở lại lại dùng được vài lần lại bị vậy?

[Duong Nhat Duy 461]

3 giờ trước, Đinh Văn Triển đã nói:

Cho mình hỏi sao Lisp này mỗi bản vẽ mình dùng được vài lần lại không dùng được vậy? Nếu tắt bản vẽ đi mở lại lại dùng được vài lần lại bị vậy?

Bạn chụp hoặc quay video lại 1 lần được và 1 lần không được mình xem nhé

[Lê Quang Dương 9]

Lisp này sau khi sao lưu cấu hình và load lại thì không dùng lệnh ATL được nữa, cứ gõ lệnh xuất hiện bảng khoảng nửa giây là thoát. Rất tiếc dạo này diễn đàn không thể gửi hình lên được.

[Duong Nhat Duy 461]

20 giờ trước, Lê Quang Dương đã nói:

Lisp này sau khi sao lưu cấu hình và load lại thì không dùng lệnh ATL được nữa, cứ gõ lệnh xuất hiện bảng khoảng nửa giây là thoát. Rất tiếc dạo này diễn đàn không thể gửi hình lên được.

Có nhầm lẫn gì không bạn, đây là lisp này đâu có lệnh ATL.

[Lê Quang Dương 9]

10 phút trước, Duong Nhat Duy đã nói:

Có nhầm lẫn gì không bạn, đây là lisp này đâu có lệnh ATL.

Mình nhầm qua lisp kia, cũng của bạn viết luôn.

[Duong Nhat Duy 461]

3 giờ trước, Lê Quang Dương đã nói:

Mình nhầm qua lisp kia, cũng của bạn viết luôn.

Bạn trao đổi qua zalo mình kiểm tra lỗi nhé.

[Đinh Văn Triển 0]

Video_2024-10-14_083622.rar. Bạn xem giúp mình. Nhiều lúc nó còn bị treo Cad luôn phải tắt đi khời động lại. Mình nghĩ nó bị xung đột với 1 cái lisp nào đó.

[vandungckt 0]

Cảm ơn admin đã chia sẻ 1 lisp hay. Có cách nào để đánh Số thứ tự bằng số La Mã ko ạ?

[Duong Nhat Duy 461]

14 giờ trước, vandungckt đã nói:

Cảm ơn admin đã chia sẻ 1 lisp hay. Có cách nào để đánh Số thứ tự bằng số La Mã ko ạ?

Hiện tại thì không, cái này ít dùng bạn chịu khó đánh tay nhé !

[nguyenxuancam 0]

Vào lúc 18/1/2024 tại 18:44, Duong Nhat Duy đã nói:

Chia sẻ đến các bạn 1 lisp đánh số thứ tự hàng loạt, thêm tiền tố, hậu tố,... Áp dụng cho Text (cũng như Mtext), Block Att (Block thuộc tính), Dim.

Lisp có nhiều tính năng đánh số ví dụ đánh đè lên Text cũ hoặc thêm vào Text hiện tại,... thỏa mãn nhiều yêu cầu đề bài đặt ra.

 

Tên lệnh:

   STT - Đánh số thứ tự hàng loạt (áp dụng cho Text, Att, Dim)

   C1 - Copy tăng dần (áp dụng cho Text, Att)

   C2 - Copy giảm dần (áp dụng cho Text, Att)

   1C - Copy tăng dần N đơn vị (áp dụng cho Text, Att)

   FT - Thêm tiền tố, hậu tố, hoặc xóa 1 đoạn ký tự ở đầu hoặc cuối (áp dụng cho Text, Att, Dim)

 

Mô tả:

- STT :

+ Đánh số thứ tự theo các quy tắc tùy chọn, ví dụ: trên xuống dưới, trái sang phải, theo chiều pline hoặc theo thứ tự người dùng pick chọn

+ Có thể thêm tiền tố, hậu tố, nhập stt bắt đầu, số chữ số 0.

+ Kết quả có thể đè lên text cũ hoặc thêm vào đầu, cuối

+ 1 số ví dụ: (hình minh họa)

 

Đánh số từ trên xuống dưới, trái sang phải:

 

Đánh số theo thứ tự pick chọn:

 

Đánh số theo chiều Pline:

 

- C1, C2, 1C : Đánh số thứ tự thủ công

+ Hoạt động như lệnh Copy nhưng tăng/giảm dần giá trị cuối cùng trong Text/Att

+ Có thể chọn 1 nhóm đối tượng, ví dụ: 1 hình tròn và 1 Text, ...

+ Lệnh 1C chỉ dùng cho các Text/Att số thực

 

- FT : Thêm tiền tố, hậu tố; xóa 1 đoạn ký tự ở đầu hoặc cuối

 

Change log

- v1.00 (18/01/2024): Phiên bản đầu tiên

- v1.01 (04/04/2024): Thêm option đánh stt theo 2 chiều, ví dụ: trái qua phải, trên xuống dưới

- v1.02 (09/05/2024): Thêm tính năng thêm tiền tố, hậu tố, xóa 1 đoạn ký tự ở đầu hoặc cuối

- v1.03 (06/08/2024):

   + Sửa lại cách đánh stt có số 0 đằng trước bằng cách khai báo stt bắt đầu là 01, 002, ... Thêm tính năng đánh theo alphabet A, B, C, D,...

   + Sửa lỗi khi đánh số theo 2 chiều trên->dưới, trái->phải

- v1.04 (28/10/2024): Sửa một số lỗi

 

Link download

https://drive.google.com/drive/u/1/folders/1vs5fVIPiH1afDJczolu_GURTnXlaM75Y

 

Chúc các bạn thành công :)))

cảm ơn bác rất nhiều

[tinhyeu_forever2 4]

Lisp đỉnh quá, cảm ơn bác