Chuyển đến nội dung
Diễn đàn CADViet
  • Thông báo

    • Nguyen Hoanh

      CADViet đã hoàn tất nâng cấp   14/09/2017

      Chào các bạn, CADViet đã hoàn tất việc nâng cấp lên phiên bản mới. Tất cả các chức năng đã hoạt động theo kỳ vọng của ban quản trị. Nếu có vấn đề gì cần phản hồi, các bản post ở đây nhé: Trân trọng, Nguyễn Hoành.
Đăng nhập để thực hiện theo  
ptd1987

[Nhờ Sửa Lisp] Nhờ Các Bác Chỉnh Sửa Dùm Lisp Đánh Số Bv Tự Động Block Att

Các bài được khuyến nghị

ptd1987    5

Em kiếm dc cái đánh STT bản vẽ của block ATT này của bác Gia_Bach hay quá nhưng chỉ nhập prefix dạng KC01

Các bác có thể sửa dùm em nhập thêm suffix, vd: KC01/03 dc không ạ ^^

Em muốn nhập thêm hậu tố /03 để còn quản lý được bản vẽ đó nằm thứ mấy trong tổng bản vẽ

Người ta gọi là được voi đòi Hai Bà Trưng ^^

http://www.cadviet.c.../112169_stt.lsp

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
quocmanh04tt    385

Tặng bạn cái này cùng với ACE nào cần (Còn mới nóng): :D

http://www.cadviet.com/upfiles/5/141736_khbv.rar

141736_khbv.jpg

Trong đó: (Lệnh KHBV)

+ Pick : để lấy tên Tag của block thuộc tính.

+ Auto: Số thứ tự tự động (Tác dung với trường hợp bạn thay đổi STT bắt đầu, muốn khôi phục lại) - Mặc định là tự động.

+ Chức năng sort:

 0 - None ... Cái nào chọn trước thì được trước ...

 1,2,3,4 Có ghi rõ ràng ... (Nguyên tắc luôn từ trái qua phải).

P/s Có thể ứng dụng cho các loại att-block khác, không nhất thiết phải là khung tên.

  • Vote tăng 7

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
ths    2

Tặng bạn cái này cùng với ACE nào cần (Còn mới nóng): :D

http://www.cadviet.com/upfiles/5/141736_khbv.rar

141736_khbv.jpg

Trong đó: (Lệnh KHBV)

+ Pick : để lấy tên Tag của block thuộc tính.

+ Auto: Số thứ tự tự động (Tác dung với trường hợp bạn thay đổi STT bắt đầu, muốn khôi phục lại) - Mặc định là tự động.

+ Chức năng sort:

 0 - None ... Cái nào chọn trước thì được trước ...

 1,2,3,4 Có ghi rõ ràng ... (Nguyên tắc luôn từ trái qua phải).

P/s Có thể ứng dụng cho các loại att-block khác, không nhất thiết phải là khung tên.

thanks bạn nhé, rất là hữu ích :)

  • Vote tăng 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
conghoa    93

Tặng bạn cái này cùng với ACE nào cần (Còn mới nóng): :D

http://www.cadviet.com/upfiles/5/141736_khbv.rar

141736_khbv.jpg

Trong đó: (Lệnh KHBV)

+ Pick : để lấy tên Tag của block thuộc tính.

+ Auto: Số thứ tự tự động (Tác dung với trường hợp bạn thay đổi STT bắt đầu, muốn khôi phục lại) - Mặc định là tự động.

+ Chức năng sort:

 0 - None ... Cái nào chọn trước thì được trước ...

 1,2,3,4 Có ghi rõ ràng ... (Nguyên tắc luôn từ trái qua phải).

P/s Có thể ứng dụng cho các loại att-block khác, không nhất thiết phải là khung tên.

 

Thank bạn quocmanh04tt!

 

Bạn có thể nâng cấp nó để áp dụng được cho text thường nữa được không?

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
quocmanh04tt    385

Thử test thấy đang bị lỗi ở phần sort mọi người kiểm tra lại thế nào??? để chủ thớt hoàn chỉnh

đây là file test 

http://www.cadviet.com/upfiles/5/66960_test_kt.dwg

 

1. Bạn thử với khung tên thật của bạn xem sao!

2. Trong lsp mình để độ chính xác là 10 (units) để sắp xếp cùng hàng, cột.

3. File của bạn sẽ sort không như ý vì các block có kích thước 6x3 units.

*** Với file của bạn, bạn có thể scale all, tăng kích thước lên nhiều lần, rồi test xem...

4. Không biết block khung tên nhỏ nhất thông thường của mọi người là bao nhiêu???

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
ad.pham234    7

Tặng bạn cái này cùng với ACE nào cần (Còn mới nóng): :D

http://www.cadviet.com/upfiles/5/141736_khbv.rar

141736_khbv.jpg

Trong đó: (Lệnh KHBV)

+ Pick : để lấy tên Tag của block thuộc tính.

+ Auto: Số thứ tự tự động (Tác dung với trường hợp bạn thay đổi STT bắt đầu, muốn khôi phục lại) - Mặc định là tự động.

+ Chức năng sort:

 0 - None ... Cái nào chọn trước thì được trước ...

 1,2,3,4 Có ghi rõ ràng ... (Nguyên tắc luôn từ trái qua phải).

P/s Có thể ứng dụng cho các loại att-block khác, không nhất thiết phải là khung tên.

Ad ơi ad có thể đổi tên lệnh là bv hộ em được không chứ đề khbv thì dài dòng quá ad giúp em nhé.

thank ad trước ạ

  • Vote giảm 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
cuongtk2    40

Người ta viết file fas để không sửa được. Bạn nên tạo 1 lisp có nội dung như sau:

(defun c:bv () (c:tkbv))

load nó vào là ok. Dùng lệnh mới và cũ đều được.

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
ad.pham234    7

Người ta viết file fas để không sửa được. Bạn nên tạo 1 lisp có nội dung như sau:

(defun c:bv () (c:tkbv))

load nó vào là ok. Dùng lệnh mới và cũ đều được.

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

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
cuongtk2    40

Bạn bỏ đi dòng (command ".move.........(list 0 0 0))
vì dòng lệnh này coi như regen cho mỗi block

thay cụm dưới bằng cụm này.

(defun c:dlb ( / ss )
(setq ss (ssget '((0 . "INSERT"))))
(foreach n (ssnamex ss)
(if (= 'ename (type (cadr n)))
(progn
(block_s_dxf (cadr n) 8 "0")
(block_s_dxf (cadr n) 62 256)
)
)
)
(command "regen")
)

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
ad.pham234    7

Bạn bỏ đi dòng (command ".move.........(list 0 0 0))

vì dòng lệnh này coi như regen cho mỗi block

thay cụm dưới bằng cụm này.

(defun c:dlb ( / ss )

(setq ss (ssget '((0 . "INSERT"))))

(foreach n (ssnamex ss)

(if (= 'ename (type (cadr n)))

(progn

(block_s_dxf (cadr n) 8 "0")

(block_s_dxf (cadr n) 62 256)

)

)

)

(command "regen")

)

Cảm ơn bác ạ 

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay

Đăng nhập để thực hiện theo  

×