Đến nội dung


Hình ảnh
- - - - -

Lisp thay lệnh PE với tham số j.


  • Please log in to reply
2 replies to this topic

#1 hhhhgggg

hhhhgggg

    biết dimedit

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

Đã gửi 11 April 2009 - 01:26 PM

Bác Pro nào viết júp em cái CODE của lisp mà khi mình đánh lệnh nó bao hàm lệnh PE và tham số j để nối các line được chọn lại thành Pline ! Thanks !
  • 0
Hoàng Giang

#2 tucdrom

tucdrom

    — T — U — N — A —

  • Members
  • PipPipPipPipPipPip
  • 497 Bài viết
Điểm đánh giá: 642 (tốt)

Đã gửi 11 April 2009 - 01:37 PM

Bác Pro nào viết júp em cái CODE của lisp mà khi mình đánh lệnh nó bao hàm lệnh PE và tham số j để nối các line được chọn lại thành Pline ! Thanks !


Ko cần dùng đến Lisp đâu bác ạ.Lệnh PE ngoài chức năng edit và joint các pline với nhau,nó còn có chức năng joint các line thành 1 pline.
Command:PE
Command:PEDIT Select polyline or [Multiple]:M+Space
Chọn các Line.
Command:Convert Lines and Arcs to polylines [Yes/No]? Y+Space
Command:Enter an option [Close/Open/Join/Width/Fit/Spline/Decurve/Ltype gen/Undo]: J+Space

:cheers:
  • 0

Email : anhtu2101@gmail.com



 


#3 q288

q288

    biết lệnh fillet

  • Members
  • PipPipPipPip
  • 209 Bài viết
Điểm đánh giá: 164 (tàm tạm)

Đã gửi 11 April 2009 - 01:42 PM

Bác Pro nào viết júp em cái CODE của lisp mà khi mình đánh lệnh nó bao hàm lệnh PE và tham số j để nối các line được chọn lại thành Pline ! Thanks !




(command "pedit" (ssname (setq ssg (ssget '((0 . "LINE")))) 0) "y" "j" ssg "" "")
  • 0