Đến nội dung


Hình ảnh
- - - - -

Nhờ viết lisp copy, move, rotate đối tượng theo 1 giá trị cho trước


  • Please log in to reply
3 replies to this topic

#1 eakarphan

eakarphan

    biết zoom

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

Đã gửi 26 December 2013 - 10:34 PM

Nhờ các cao thủ viết giúp em lisp này với. Em có một đối tượng cần copy( hoặc move) 1 khoảng là 50( có lúc là 100, 150) vậy có lisp nào mà  chỉ cần nhập lệnh mà không cần nhập khoảng cách mà vẫn copy(move) 1 khoảng theo giá trị đã gán sẵn trong lisp không ạ

Nói cho đễ hiểu là em chỉ cần nhập c1 thì tự hiểu luôn là copy 1 khoảng bằng 50

Tương tự thì c2->copy 100

C3->copy 150

M1-> move 50

M2-> move 100

M3->move 150

R1- rotate 1 góc 270

Vì  em phải thực hiện thao tác này rất nhiều lần và nhiều vị trí khác nhau nên nếu nhập khoảng cách hoặc góc xoay nữa thì mỏi tay lắm. Nhờ các cao thủ giúp đở. :unsure:


  • 0

#2 quansla

quansla

    biết lệnh xclip

  • Members
  • PipPipPipPipPipPipPip
  • 643 Bài viết
Điểm đánh giá: 224 (khá)

Đã gửi 26 December 2013 - 11:16 PM

Thiếu giữ kiện bạn ạ, gửi file lên đi,

  1. Move đi đâu, thẳng đưgns, nằm ngang, bất kỳ,
  2. Xoay lấy tâm ở đâu (block lấy điểm chèn à, tẽxt lấy điểm chèn, polyline lấy cái mô)
  3. Trả biết còn gì ko, k0 có file chắc chưa có ai liều giúp bạn đâu.

  • 0

#3 eakarphan

eakarphan

    biết zoom

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

Đã gửi 27 December 2013 - 10:15 AM

Cảm ơn a đã quan tâm,

Ý em là nó giống lệnh copy, move, rotate thôi nhưng không cần nhập giá trị nữa mà tự hiểu theo 1 giá trị gắn sẵn trong lisp rồi.

1. move(copy) 1 đối tượng theo phương bất kỳ ( phương thì mình chọn giống như lệnh offset vậy)

2. xoay thì mình tự chọn tâm

 

File cad: https://copy.com/dJ07SfEOHYOB

File nặng nên mở hơi lâu nha.


  • 0

#4 Doan Van Ha

Doan Van Ha

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 5454 Bài viết
Điểm đánh giá: 2626 (tuyệt vời)

Đã gửi 28 December 2013 - 04:46 PM

Qua topic này tải về dùng nhé bạn.

http://www.cadviet.c...-cau-moi/page-3


  • 0

* Chỉ nên yêu cầu Lisp khi bạn làm việc đó mất cả ngày nhưng họ chỉ viết 1 giờ. Đừng nêu yêu cầu Lisp khi bạn chỉ làm 1 giờ nhưng bắt họ phải mất cả ngày.

* Nhờ viết lisp cũng như đi khám bệnh. Chỉ gởi căn cước và than sắp chết thì không bác sỹ nào cứu sống được.