Đến nội dung


Hình ảnh
- - - - -

[Yêu cầu] Autolisp Tự động copy theo vùng cho trớc


  • Please log in to reply
5 replies to this topic

#1 meodihia007

meodihia007

    biết pan

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

Đã gửi 21 July 2011 - 02:17 PM

Chào các bậc tiền bối.
Em mới dùng autocad. Nay em phải làm một loạt các bản vẽ yêu cầu copy nguyên một vùng từ khung bản vẽ này đến khung bản vẽ khác.

Em muốn nhờ mọi người hỗ trợ em viết một lisp copy một vùng hình chữ nhật và copy den vi tri khac.
Nếu được em cảm ơn mọi người nhiều. :wub:
  • 0

#2 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5685 Bài viết
Điểm đánh giá: 2606 (tuyệt vời)

Đã gửi 21 July 2011 - 02:25 PM

Không nhập gì cả thì xy1,2,3,4 bạn hô biến ra chăng ?? Bạn hãy đọc kỹ hướng dẫn post bài trong mục Autolisp ở chữ ký của ketxu để nhanh chóng được đáp ứng nhé ^^
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#3 meodihia007

meodihia007

    biết pan

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

Đã gửi 21 July 2011 - 03:49 PM

Không nhập gì cả thì xy1,2,3,4 bạn hô biến ra chăng ?? Bạn hãy đọc kỹ hướng dẫn post bài trong mục Autolisp ở chữ ký của ketxu để nhanh chóng được đáp ứng nhé ^^

Ý mình là các tọa độ này được nhập sẵn trong file lisp!
  • 0

#4 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5685 Bài viết
Điểm đánh giá: 2606 (tuyệt vời)

Đã gửi 21 July 2011 - 03:59 PM

Ý mình là các tọa độ này được nhập sẵn trong file lisp!

Haiza... kể cả nhập sẵn trong file lisp thì bạn cũng phải nói để người viết lisp biết nó là cái gì mà nhập vào cho bạn chứ. Lisp là máy móc chứ có phải trí tưởng tượng của bạn đâu ^^
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#5 phamthanhbinh

phamthanhbinh

    biết lệnh adcenter

  • Moderator
  • PipPipPipPipPipPipPip
  • 6009 Bài viết
Điểm đánh giá: 3113 (tuyệt vời)

Đã gửi 22 July 2011 - 04:15 PM

Ý mình là các tọa độ này được nhập sẵn trong file lisp!

Hề hề hề,
Phải chăng bạn muốn cái ni:

(defun c:cpm (/ p1 p2 p3 p4 p5 p6 ss)
(setq p1 (list 1 420)
p2 (list 1 2)
p3 (list 595 2)
p4 (list 595 420)
p5 (list 412 417)
p6 (list 412 -7)
)
(setq ss (ssget "CP" (list p1 p2 p3 p4) ))
(command "copy" ss "" p5 p6)
)


Hề hề hề, thực tình thì cái yêu cầu của bạn hơi .......không khoái. Song mình cứ làm đại cái ni để bạn thấy cái sự không khóai này và rút kinh nghiệm cho các yêu cầu sắp tới.
hề hề hề....
  • 1
Chúc các quý Anh trên diễn đàn luôn khỏe, đẻ thêm được nhiều thứ để mót.

#6 meodihia007

meodihia007

    biết pan

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

Đã gửi 23 July 2011 - 09:19 AM

Tại mình mới tìm hiểu cad thôi. Hi vọng sắp tới sẽ đóng góp được nhiều cho diễn đàn. Cảm ơn bạn nhiều. Rất giúp ích cho mình.
  • 0