Đến nội dung


Hình ảnh
- - - - -

[yêu cầu] lisp đổi màu đối tượng theo thứ tự lựa chọn


  • Please log in to reply
1 reply to this topic

#1 Nauvtran

Nauvtran

    biết zoom

  • Members
  • Pip
  • 13 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 08 December 2012 - 01:31 AM

Chào các anh (chị)
Em muốn nhờ anh (chị) viết giúp em lisp đổi màu các đối tượng được lựa chọn theo thứ tự như sau: giả sử em có 20 đối tượng, em pick chọn từng đối tượng 1, 2, 3...20. Kết quả là đối tượng 1 mang màu 1, 2 mang màu 2, 20 mang màu 20. Mục đích là để tránh nhầm lẫn trong công việc.
Em xin chân thành cảm ơn anh (chị) rất nhiều!
  • 0

#2 hochoaivandot

hochoaivandot

    biết dimradius

  • Members
  • PipPipPipPipPip
  • 310 Bài viết
Điểm đánh giá: 107 (tàm tạm)

Đã gửi 08 December 2012 - 07:17 PM

(defun C:ddd(/ i e)
(setq i 1)
(while (setq e (car (entsel "\nChon doi tuong")))
(command "change" e "" "P" "C" i "")
(setq i (1+ i))
)
)

  • 0

Dương Bá Diệp

 

www.cadonline.duyxuyen.vn 

 

Thành viên nhóm CADMAGIC