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

[Doan Van Ha 3211]

6 phút trước, duy782006 đã nói:

Máy mình win11, cad2022. Biến LISPSYS =1 vẫn chạy ầm ầm như trên.

Có ra tiếng Việt không ạ?

[quanghapham 0]

2 giờ trước, Doan Van Ha đã nói:

Format đơn vị là số 0 thì được thôi.

cảm ơn bạn, thật ra lisp trên thì máy mình vẫn nhận được các lệnh c1, c2, 1c, stt. nhưng khi dùng lệnh stt dùng đến chức năng đánh stt 2 chiều từ trái qua phải, từ trên xuống dưới hoặc chọn từ trên xuống dưới hay từ dưới lên trên thì lisp sẽ không chạy được 

 

 

[tannguyen291 170]

43 phút trước, Doan Van Ha đã nói:

Có ra tiếng Việt không ạ?

Vẫn chạy bình thường mà bác. em chưa bao giờ gặp lỗi chuyển lispsys mà lisp không hoạt động.

ngoại trừ các lệnh chr, ascii , vl-string->list , vl-list->string dành cho mã lớn hơn 256

[Doan Van Ha 3211]

F2 này sao giống Cad đời thấp vậy?

[tannguyen291 170]

bảng F2 đời nào cũng vậy ạ.

máy em win11 cad 2024

[duy782006 1598]

10 giờ trước, Doan Van Ha đã nói:

Có ra tiếng Việt không ạ?

Vẫn ra tiếng Việt có dấu bác ạ. 

[Duong Nhat Duy 467]

15 giờ trước, quanghapham đã nói:

ok bạn ơi, mình đang dùng cad 22 với 24 đều không được, thôi dùng cái đánh stt theo thứ tự tự chọn cũng được nhưng hơi lâu chút :V

Theo các tiền bối mách bảo thì bạn hãy thử dùng lệnh LISPSYS, nhập 0, r khởi động lại cad xem có chạy được ko nhé. Cảm ơn các tiền bối nhé !

[amateurday 21]

10 giờ trước, Doan Van Ha đã nói:

Tắt Cad mở lại duy nhất 1 lần trong đời mà không làm được sao?

Hic, em tắt mở lại suốt. Nhưng như thế vẫn chưa hoàn hảo lắm. Kể ra có lệnh đổi biến này, ấn lệnh → tự động tắt cad và mở lại thì xịn xò hơn.

[quanghapham 0]

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

Theo các tiền bối mách bảo thì bạn hãy thử dùng lệnh LISPSYS, nhập 0, r khởi động lại cad xem có chạy được ko nhé. Cảm ơn các tiền bối nhé !

mình nghĩ không phải do cái này, tại mặc định ban đầu lệnh này máy mình đang để biến là 0 rồi  :v

[OngNguyenVanHan 1]

AutoCAD đời cao như AutoCAD 2024, AutoCAD 2025 thì phải sửa lisp sao cho danh sách vlax-ldata-list có dữ liệu vì hiện tại nó tự xoá dữ liệu về 0 và sẽ bị lỗi bị lỗi bad argument type: fixnump: nil. Còn trên AutoCAD đời thấp như AutoCAD 2007 không bị lỗi bad argument type: fixnump: nil 

[amateurday 21]

Vào lúc 16/4/2024 tại 11:27, quanghapham đã nói:

mình nghĩ không phải do cái này, tại mặc định ban đầu lệnh này máy mình đang để biến là 0 rồi  :v

Thử 2 file này xem có chạy được không nào? 

Danh STT Text, Att, Dim v1.01.VLX
Danh STT Text, Att, Dim v1.01.fas

Danh STT Text, Att, Dim v1.01.rar

[quanghapham 0]

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

Thử 2 file này xem có chạy được không nào? 

Danh STT Text, Att, Dim v1.01.VLX
Danh STT Text, Att, Dim v1.01.fas

Danh STT Text, Att, Dim v1.01.rar

cảm ơn b nhé, như lisp b sửa lại mình có test trên 2 bản cad. 

+ Cad 22 đang có lisp cũ mình đang sử dụng thì đến bước 2 option từ trái qua phải từ trên xuống dưới thì lisp không đến bước nhập sai số (mình nghĩ đang xung đột với lisp nào đó đang có trên máy của minh :V )

+ Cad 24 mình xóa hết toàn bộ lisp thì dùng lisp của b ok không bị sao cả )

[amateurday 21]

Khả năng cad 22 cài bị lỗi thôi, không lỗi này thì lỗi kia.

Như tớ đang dùng 22 đây, chạy lisp này ngon lành (đổi lispsys = 0), nhưng VBA tải về không tài nào cài được, cứ bảo liên hệ Autodesk, nhọ.

[Duong Nhat Duy 467]

Bây giờ có 2 trường phái: 1 là những con người của quá khứ trung thành với cad07, 2 là những người đến từ tương lai, đầu năm 23 24 nhưng đã dùng cad 24 25 rồi :))).

Mình thì ở giữa, từ khi cad nó lên đời xong tự nhiên thêm mấy cái biến ngớ ngẩn ví như TRIMSEXTENDMODE (mặc định là 1 chứ ko phải 0) thì mình ko còn quá hào hứng với cad nữa rồi, vẫn trung thành với cad18 và 20.

[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)

 

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

Cái này thêm số 0 đằng trước những số từ 1-9 nữa thì hay anh ah

 

[Duong Nhat Duy 467]

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

Cái này thêm số 0 đằng trước những số từ 1-9 nữa thì hay anh ah

 

Option này nằm ở mục "Số chữ số tối thiểu" b nhé, b chịu khó đọc kỹ mấy dòng hướng dẫn nhé, mình đã đề cập đến rồi, b nhập 2 là ra 01 02 03, ... 09 10 11 12

[Quốc Khánh TVGT 0]

Lisp bác dùng sướng hơn cái TCOUNT của Cad. Cảm ơn bác nhiều nhiều

[TIENTRIDATAIS2N4 0]

CỦA MÌNH NÓ HIỆN CÁI TAG LÚC DÙNG CHO BLOCK ATT NHỈ 

 

 

[Duong Nhat Duy 467]

23 phút trước, TIENTRIDATAIS2N4 đã nói:

CỦA MÌNH NÓ HIỆN CÁI TAG LÚC DÙNG CHO BLOCK ATT NHỈ 

Thì bạn muốn đánh số cho tag nào thì chọn tag đó

[Lê Quang Dương 9]

Vào lúc 17/4/2024 tại 13:18, amateurday đã nói:

Thử 2 file này xem có chạy được không nào? 

Danh STT Text, Att, Dim v1.01.VLX
Danh STT Text, Att, Dim v1.01.fas

Danh STT Text, Att, Dim v1.01.rar

Xin phép bác Duong Nhat Duy chỉnh lại phiên bản v1.02 đi bạn. Lisp sau khi chỉnh thì dùng ok, vẫn để Lispsys=1 (Nếu để Lispsys=0 để dùng được bản v1.02 của bác Duong Nhat Duy thì bị lỗi tiếng Việt khi dùng những lisp khác).

[Lê Quang Dương 9]

Vào lúc 8/4/2024 tại 08:03, makhorungxanh đã nói:

không biết sao chứ em dùng thì lại bị lỗi khi xử dụng lệnh  STT anh ạ

; error: bad argument type: fixnump: nil

Mình chỉnh lại thế này thì dùng bình thường

 

Chuyển những dòng có mã Hexa sau:

"D:trên->d\\U+01B0\\U+1EDBi"
"U:d\\U+01B0\\U+1EDBi->trên"
"R:trái->ph\\U+1EA3i"
"L:ph\\U+1EA3i->trái"
"X:theo-hai-chi\\U+1EC1u-XY"
"P:theo-h\\U+01B0\\U+1EDBng-Pline"
"C:theo-th\\U+1EE9-t\\U+1EF1-Ch\\U+1ECDn"

 

Về mã Unicode:

"U:trên->dưới"
"D:dưới->trên"
"L:trái->phải"
"R:phải->trái"
"X:theo-hai-chiều-XY"
"P:theo-hướng-Pline"
"C:theo-thứ-tự-Chọn"

 

thì sẽ không còn lỗi: ; error: bad argument type: fix nump: nil lúc chọn Trái, phải, trên, dưới trong lệnh STT

Vẫn để biến LISPSYS = 1 (đang dùng cad 2022 và 2024)

[HUY2K 17]

17 phút trước, Lê Quang Dương đã nói:

Mình chỉnh lại thế này thì dùng bình thường

 

Chuyển những dòng có mã Hexa sau:

"D:trên->d\\U+01B0\\U+1EDBi"
"U:d\\U+01B0\\U+1EDBi->trên"
"R:trái->ph\\U+1EA3i"
"L:ph\\U+1EA3i->trái"
"X:theo-hai-chi\\U+1EC1u-XY"
"P:theo-h\\U+01B0\\U+1EDBng-Pline"
"C:theo-th\\U+1EE9-t\\U+1EF1-Ch\\U+1ECDn"

 

Về mã Unicode:

"U:trên->dưới"
"D:dưới->trên"
"L:trái->phải"
"R:phải->trái"
"X:theo-hai-chiều-XY"
"P:theo-hướng-Pline"
"C:theo-thứ-tự-Chọn"

 

thì sẽ không còn lỗi: ; error: bad argument type: fix nump: nil lúc chọn Trái, phải, trên, dưới trong lệnh STT

Vẫn để biến LISPSYS = 1 (đang dùng cad 2022 và 2024)

Cảm ơn bạn, đã fix lỗi thành công

[Lê Quang Dương 9]

30 phút trước, HUY2K đã nói:

Cảm ơn bạn, đã fix lỗi thành công

Những dòng có mã Hexa bạn cũng nên đổi về Unicode nếu không sẽ bị lỗi ở những lựa chọn khác

[HUY2K 17]

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

Những dòng có mã Hexa bạn cũng nên đổi về Unicode nếu không sẽ bị lỗi ở những lựa chọn khác

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

[Lê Quang Dương 9]

11 giờ trước, 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

Bạn xin phép tác giả nếu cho phép thì mình sẽ gửi lên nha