Đến nội dung


Hình ảnh
- - - - -

(lisp) check


  • Please log in to reply
4 replies to this topic

#1 Chutuyen

Chutuyen

    biết vẽ circle

  • Members
  • PipPip
  • 36 Bài viết
Điểm đánh giá: -3 (bình thường)

Đã gửi 19 May 2015 - 03:42 PM

các b check hộ t đoan lisp mơi chế dk mà k0 biết nó lỗi chỗ nào.hic
(defun C:xx2 ( / ss pt1 pt2 os)
(setq os (getvar "osmode") ss (ssget))
(setq pt1 (getpoint "\nDiem dau : "))
(setq pt2 (getpoint "\nDiem cuoi : "))
(setvar "osmode" 0)
(command "align" ss "" pt1 '(0 0) pt2 '(1 0) "" "" "explode" ss "" "")
(setvar "osmode" os)
(princ)
)


  • 0

#2 Doan Van Ha

Doan Van Ha

    biết lệnh adcenter

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

Đã gửi 19 May 2015 - 04:06 PM

Bỏ cặp "" cuối cùng đi.


  • 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.


#3 Chutuyen

Chutuyen

    biết vẽ circle

  • Members
  • PipPip
  • 36 Bài viết
Điểm đánh giá: -3 (bình thường)

Đã gửi 19 May 2015 - 08:42 PM

e bỏ roi ma nó vân báo lỗi ?

XX2 Unknown command "XX2".  Press F1 for help.

b xem con lôi nào nưa k0? thank!


  • 0

#4 Doan Van Ha

Doan Van Ha

    biết lệnh adcenter

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

Đã gửi 19 May 2015 - 09:16 PM

Chỉ có thể là bạn chọn đối tượng không thể Explode, ví dụ Line, Text...


  • 1

* 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.


#5 Chutuyen

Chutuyen

    biết vẽ circle

  • Members
  • PipPip
  • 36 Bài viết
Điểm đánh giá: -3 (bình thường)

Đã gửi 19 May 2015 - 10:25 PM

Cám ơn b Ha đa quan tâm ok rôi a.hii


  • 0