Đến nội dung


Hình ảnh

move đối tượng vào giao điểm của 2 đường ntn?


  • Please log in to reply
8 replies to this topic

#1 dot phao dee

dot phao dee

    biết pan

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

Đã gửi 28 January 2011 - 09:46 AM

chào các bác.

em muốn hỏi các bác, em muốn move một đối tượng vào giao điểm của 2 đường (tạo bởi 4 điểm) thì fai làm ntn?

em thử mấy chức năng của lệnh move mà ko đc.

bác nào biết thì chỉ em hay giúp em tạo 1 cái lisp với, chọn điểm 1 điểm 2 là đường thứ nhất, điểm 3 điểm 4 là đường thứ hai, move đối tượng vào giao của 2 đường đó.

thanks các bác trc nhé
  • 0

#2 tuvanthietke.hcm

tuvanthietke.hcm

    biết lệnh array

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

Đã gửi 28 January 2011 - 09:48 AM

chào các bác.

em muốn hỏi các bác, em muốn move một đối tượng vào giao điểm của 2 đường (tạo bởi 4 điểm) thì fai làm ntn?

em thử mấy chức năng của lệnh move mà ko đc.

bác nào biết thì chỉ em hay giúp em tạo 1 cái lisp với, chọn điểm 1 điểm 2 là đường thứ nhất, điểm 3 điểm 4 là đường thứ hai, move đối tượng vào giao của 2 đường đó.

thanks các bác trc nhé


Quá dễ search: m2c (move to center)
  • 0

#3 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 28 January 2011 - 10:19 AM

chào các bác.

em muốn hỏi các bác, em muốn move một đối tượng vào giao điểm của 2 đường (tạo bởi 4 điểm) thì fai làm ntn?

em thử mấy chức năng của lệnh move mà ko đc.

bác nào biết thì chỉ em hay giúp em tạo 1 cái lisp với, chọn điểm 1 điểm 2 là đường thứ nhất, điểm 3 điểm 4 là đường thứ hai, move đối tượng vào giao của 2 đường đó.

thanks các bác trc nhé


Bạn nói 1 đối tuợng hay 1 nhóm các đối tượng ? 4 điểm của bạn chưa có đường thẳng gióng ?

Quá dễ search: m2c (move to center)

P/S : lisp m2c của bác Hoành viết không phải dành cho mục đích này, vì nó là move 1 đối tượng bất kỳ đến tâm của đối tượng khác
  • 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


#4 dot phao dee

dot phao dee

    biết pan

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

Đã gửi 28 January 2011 - 11:19 AM

bài toán của em đơn giản chỉ là thế này:

em fai sửa lại vị trí các thiết bị trong phòng, ghi lại kích thước detail cho thiết bị.

một số tbị nằm ở chíng giữa các đường giao trong phòng mà số lượng lại nhiều, làm thủ công thì :s_big: :)

phòng thì đủ kiểu, ngang ngửa méo xiên có hết

các bác cứ nghĩ 4 điểm đó là tứ giác bất kỳ thôi.

có thể là giao của 2 đường chéo của hình tứ giác hoặc là giao 2 cạnh (kéo dài) của tứ giác.

dĩ nhiên là m2c hay m2p là ko phù hợp rồi
  • 0

#5 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 28 January 2011 - 12:21 PM

Chắc giống ntn : bạn chọn đối tượng, chọn basepoint, sau đó kick 4 điểm theo thứ tự 2 điểm thuộc đường 1, 2 điểm thuộc đường 2 nhé

;free lisp from cadviet.com @ ketxu
(defun c:m2g()
(command ".move" (ssget) "" pause
(inters
(getpoint "\n Diem thu 1 : ")
(getpoint "\n Diem thu 2 :")
(getpoint "\n Diem thu 3 :")
(getpoint "\n Diem thu 4 :")
nil
)
)
)

  • 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


#6 dot phao dee

dot phao dee

    biết pan

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

Đã gửi 28 January 2011 - 12:42 PM

hix hix

quá chuẩn ---> ko còn ji ngoài nói thanks

em cảm ơn bác ketxu nhiều nhé :s_big: :)
  • 0

#7 tuvanthietke.hcm

tuvanthietke.hcm

    biết lệnh array

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

Đã gửi 28 January 2011 - 01:23 PM

Chắc giống ntn : bạn chọn đối tượng, chọn basepoint, sau đó kick 4 điểm theo thứ tự 2 điểm thuộc đường 1, 2 điểm thuộc đường 2 nhé


;free lisp from cadviet.com @ ketxu
(defun c:m2g()
(command ".move" (ssget) "" pause
(inters
(getpoint "\n Diem thu 1 : ")
(getpoint "\n Diem thu 2 :")
(getpoint "\n Diem thu 3 :")
(getpoint "\n Diem thu 4 :")
nil
)
)
)


Quá hay, mình đang bặp bẹ viết lisp và dùng mấy cái tài liệu nhiều quá nản, bác có tài liệu cơ bản và đơn giản không shared mình với
  • 0

#8 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 28 January 2011 - 01:32 PM

hix hix

quá chuẩn ---> ko còn ji ngoài nói thanks

em cảm ơn bác ketxu nhiều nhé :s_big: :)

Bạn còn có thể ấn nút Thanks mà ^^

Quá hay, mình đang bặp bẹ viết lisp và dùng mấy cái tài liệu nhiều quá nản, bác có tài liệu cơ bản và đơn giản không shared mình với

Thực ra mình cũng đang tập tọe viết thôi bạn ạ. Tài liệu thì chủ yếu trong help, ngoài ra phần lớn khác ở trong các lisp mọi người đã post lên đây. Mình để YH ở dưới, nếu bạn rảnh có thể thì có thể cùng nhau trao đổi ^^Mình cũng là dân KC
  • 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


#9 tuvanthietke.hcm

tuvanthietke.hcm

    biết lệnh array

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

Đã gửi 28 January 2011 - 01:58 PM

Bạn còn có thể ấn nút Thanks mà ^^
Thực ra mình cũng đang tập tọe viết thôi bạn ạ. Tài liệu thì chủ yếu trong help, ngoài ra phần lớn khác ở trong các lisp mọi người đã post lên đây. Mình để YH ở dưới, nếu bạn rảnh có thể thì có thể cùng nhau trao đổi ^^Mình cũng là dân KC


Phần help toàn tiếng anh không mà, mình ngại xem lắm hu hu
  • 0