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 484]

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 484]

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 484]

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 484]

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 484]

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 484]

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 10]

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 484]

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 10]

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 484]

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 484]

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

[AnhKS2 0]

dạ chào anh,

anh cho em hỏi em add lisp vào và dùng lệnh STT thì nó báo lỗi này là tại sao, có khắc phục được không. em cảm ơn
//em không biết lý do gì em không chèn hình vào được. em xin phép liên hệ qua zalo.

[mr.thanh2610 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ạn đã chia sẻ,  bạn có thể thêm tính năng chọn Block Att mẫu , Text hoặc Mtext theo cùng layer để dễ quét vùng chọn không (vì đôi lúc rất nhiều đối tượng chọn sẽ mất thời gian), cảm ơn

[Duong Nhat Duy 484]

Vào lúc 22/8/2025 tại 19:59, mr.thanh2610 đã nói:

Cảm ơn bạn đã chia sẻ,  bạn có thể thêm tính năng chọn Block Att mẫu , Text hoặc Mtext theo cùng layer để dễ quét vùng chọn không (vì đôi lúc rất nhiều đối tượng chọn sẽ mất thời gian), cảm ơn

Nhiều đối tượng thì bạn chủ động quản lý chúng bằng layer nhé, trước khi STT thì bạn layiso là xong.

[amateurday 24]

18 giờ trước, Duong Nhat Duy đã nói:

Nhiều đối tượng thì bạn chủ động quản lý chúng bằng layer nhé, trước khi STT thì bạn layiso là xong.

Hình như còn tình huống stt nữa là ký hiệu bản vẽ ở layout, 1 layout 1 bản vẽ. Xét trường hợp không dùng sheet set, liệu có cập nhật được không bạn nhỉ? Stt dạng xxx-01 tăng dần theo layout trái sang phải, và được chọn những layout nào cần đánh số ấy.

[Duong Nhat Duy 484]

3 giờ trước, amateurday đã nói:

Hình như còn tình huống stt nữa là ký hiệu bản vẽ ở layout, 1 layout 1 bản vẽ. Xét trường hợp không dùng sheet set, liệu có cập nhật được không bạn nhỉ? Stt dạng xxx-01 tăng dần theo layout trái sang phải, và được chọn những layout nào cần đánh số ấy.

Cái này nó nằm trong 1 lisp khác của mình, tạm thời cũng chưa có time làm hướng dẫn, có gì bạn tham khảo trong này nhé: https://drive.google.com/drive/u/1/folders/1hOJA0p93CXBpMehak0SDRQuf_oJJVIG4