Chuyển đến nội dung
Diễn đàn CADViet
Đăng nhập để thực hiện theo  
nhocbabi

Đánh số thứ tự đối tượng trong wipeout

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

Em có một công việc như sau, nếu làm thủ công thì rất mất thời gian, cách anh xem giúp em xem có lisp nào làm được thì chỉ giúp em với nhé, em cảm ơn nhiều nhiều

http://www.cadviet.com/upfiles/new_block_4.dwg

Cho mình hỏi cái chỉ số A, B, C...của bạn chạy theo quy luật nào?

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
Các anh ơi, giúp em với, em đang cần gấp lắm

lisp đơn giản này sẽ giúp bạn:

(defun c:N13T2 (/ tl n m k pott textTT)
 (command "undo" "be")
 (setq	tl 333333.333
n  121
m  '(65 66 67)
k  0
 )
 (while (setq poTT (getpoint "\nPick insertpoint:"))
   (if	(= k 3)
     (setq k 0)
   )
   (setq textTT (strcat (itoa n) "-" (chr (nth k M))))
   (command ".insert" "tram-cot" "s" tl poTT "" textTT)
   (setq k (1+ k)
  n (1+ n))
 )
 (command "undo" "end")
 (princ "\nGood Luck. THIEP")
 (princ)
)

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
lisp đơn giản này sẽ giúp bạn:

(defun c:N13T2 (/ tl n m k pott textTT)
 (command "undo" "be")
 (setq	tl 333333.333
n  121
m  '(65 66 67)
k  0
 )
 (while (setq poTT (getpoint "\nPick insertpoint:"))
   (if	(= k 3)
     (setq k 0)
   )
   (setq textTT (strcat (itoa n) "-" (chr (nth k M))))
   (command ".insert" "tram-cot" "s" tl poTT "" textTT)
   (setq k (1+ k)
  n (1+ n))
 )
 (command "undo" "end")
 (princ "\nGood Luck. THIEP")
 (princ)
)

Góp ý đôi chút với bác Thiep về lisp của bác.

Thứ nhất: bác không nên để tỷ lệ và số thứ tự cố định mà hãy lấy nó từ block để tính toán. Như vậy lisp mới thực hiện được trong trường hợp tổng quát.

Thứ hai: theo mình trường hợp này có thể dùng lệnh insert, tuy nhiên để áp dụng cho trường hợp tổng quát thì cũng nên làm sao áp dụng cho block bất kỳ.

  • 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
Góp ý đôi chút với bác Thiep về lisp của bác.

Thứ nhất: bác không để tỷ lệ và số thứ tự cố định mà hãy lấy nó từ block để tính toán. Như vậy lisp mới thực hiện được trong trường hợp tổng quát.

Thứ hai: theo mình trường hợp này có thể dùng lệnh insert, tuy nhiên để áp dụng cho trường hợp tổng quát thì cũng nên làm sao áp dụng cho block bất kỳ.

Ban đầu ý định của em là hỏi lisp để đánh số thứ tự tự động cho cả đối tượng đấy, chỉ sau một lần pick chuột. Nhưng loay hoay mãi chẳng được, em đã nghĩ ra cách sau:

Hiện tại em đang phải tách đối tượng đấy ra làm 2phần:

- phần thứ nhất (bên trên của ô) không đổi, em copy ra hết các vị trí cần đặt.

- phần thứ hai (bên dưới của ô) em tách rời thành một đối tượng text riêng, rồi dùng lisp đánh số thứ tự cho cột mà em đã lấy trên diễn đàn này từ trước

Kết quả là ở mỗi một vị trí sẽ phải mất 2 lần pick chuột nhưng dù sao công việc được thực hiện nhanh hơn rất nhiều vì không phải mất công edit text!

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
Góp ý đôi chút với bác Thiep về lisp của bác.

Thứ nhất: bác không để tỷ lệ và số thứ tự cố định mà hãy lấy nó từ block để tính toán. Như vậy lisp mới thực hiện được trong trường hợp tổng quát.

Thứ hai: theo mình trường hợp này có thể dùng lệnh insert, tuy nhiên để áp dụng cho trường hợp tổng quát thì cũng nên làm sao áp dụng cho block bất kỳ.

Cảm ơn Nataca góp ý. Vì lisp này thiep chỉ tạo một cách rất đơn giản, chống cháy cho Nhocbabi. Nếu để áp dụng cho trường hợp tổng quát, thì phải can thiệp vào cơ sở dữ liệu Block, kèm thuộc tính.

Trân trọ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

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  

×