Đến nội dung


Hình ảnh
- - - - -

xin lisp vẽ đường cong SPL theo toạ độ (x,y) lấy từ cột excel


  • Please log in to reply
6 replies to this topic

#1 nguyenbac_cd

nguyenbac_cd

    biết vẽ line

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

Đã gửi 23 November 2014 - 09:35 PM

chào các bác!

em có file excel có 2 cột X,Y bây giờ em muốn vẽ đường SPL nối liền tung độ các điểm của cột Y

các bác có thể viết em hộ lisp được không ạ!

em có đọc bài này và down lisp về ma không dùng được ạ !  http://www.cadviet.c...p-tu-txt/page-2

em xin cảm ơn!


  • 0

#2 nguyenbac_cd

nguyenbac_cd

    biết vẽ line

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

Đã gửi 23 November 2014 - 09:37 PM

hoặc là các cột số liệu được chọn từ autocad cũng được ạ!


  • 0

#3 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 23 November 2014 - 10:13 PM

hoặc là các cột số liệu được chọn từ autocad cũng được ạ!

Trong lisp tôi có ghi chú:

1). Số liệu là file txt.

2). Mỗi hàng là 1 điểm. Giữa X và Y cách nhau 1 space.

Nếu file txt của bạn format như vậy thì dùng được.


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


#4 nguyenbac_cd

nguyenbac_cd

    biết vẽ line

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

Đã gửi 24 November 2014 - 01:21 AM

em có dùng mà bị  lỗi này !

122241_666.png


  • 0

#5 nguyenbac_cd

nguyenbac_cd

    biết vẽ line

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

Đã gửi 24 November 2014 - 01:25 AM

http://www.cadviet.c...41_vidu_cad.txt

 

file dạng txt của em đây ạ!

nhờ bác kiểm tra giúp!


  • 0

#6 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 24 November 2014 - 06:46 AM

Bạn sửa dòng này:

(setq txt (HA:str->lst rl " "))

Thành dòng này:

(setq txt (HA:str->lst rl (chr 9)))


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


#7 nguyenbac_cd

nguyenbac_cd

    biết vẽ line

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

Đã gửi 24 November 2014 - 03:16 PM

Bạn sửa dòng này:

(setq txt (HA:str->lst rl " "))

Thành dòng này:

(setq txt (HA:str->lst rl (chr 9)))

cảm ơn bác nhé!

đúng là em được voi thì muốn đòi tiên :) , cái này mà có vẽ luôn đường gióng tung độ Y xuống trục hoành thì tốt biết mấy !


  • 0