Đến nội dung


Hình ảnh
- - - - -

None lisp nhưng cũng vẽ automatic


  • Please log in to reply
5 replies to this topic

#1 tranchan

tranchan

    biết lệnh break

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

Đã gửi 12 September 2008 - 03:35 PM

Cách này cũng na ná như script nhưng không hoàn toàn vậy. Từ một bài tình cờ đọc được trên Cadviet... nên tôi thử làm theo hưóng này.
Trươc hết lấy một ví dụ:
Vẽ một loạt hình chữ nhật theo cung parabol (vd sưu tầm đc) , để thực hiện chép đoạn text sau vào dòng commandline
 
rec 0,0 1,0.5
rec 0.1,0.01 1.1,0.51
rec 0.2,0.04 1.2,0.54
rec 0.3,0.09 1.3,0.59
rec 0.4,0.16 1.4,0.66
rec 0.5,0.25 1.5,0.75
rec 0.6,0.36 1.6,0.86
rec 0.7,0.49 1.7,0.99
rec 0.8,0.64 1.8,1.14
rec 0.9,0.81 1.9,1.31
rec 1,1 2,1.5
rec 1.1,1.21 2.1,1.71
rec 1.2,1.44 2.2,1.94
rec 1.3,1.69 2.3,2.19
rec 1.4,1.96 2.4,2.46
rec 1.5,2.25 2.5,2.75
rec 1.6,2.56 2.6,3.06
rec 1.7,2.89 2.7,3.39
rec 1.8,3.24 2.8,3.74
rec 1.9,3.61 2.9,4.11
rec 2,4 3,4.5



kết quả hiện trên màn hình
Hình đã gửi

Tiếp tục với một ví dụ khác, vẽ dàn cong nhịp L=18m độ vồng h=2.5m, khoảng chia bụng dàn mỗi khoảng 3m
 line 0,0 18000,0 
arc 0,0 9000,2500 18000,0
line 3000,0 3000,1433.3935 6000,0 6000,2240.1862 9000,0 9000,2500
line 9000,0 12000,2240.1862 12000,0 15000,1436.0459 15000,0
kết quả xuất hiện
Hình đã gửi

AE thấy thế nào , phát biểu cảm tưởng coi. Không dùng lisp mà cũng đâu fải nông dân đâu, nói thế thôi chứ cũng chưa đc như lisp đâu, vì nếu lập trình thì cho fép vẽ khi nhịp thay đổi đc còn đây thì ko.... nhưng ai ngó qua chưa biêt mình làm gì mà ra như vậy thì cũng thấy..... choáng rồi :)
  • 0

#2 duy782006

duy782006

    PHẠM QUỐC DUY

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 2155 Bài viết
Điểm đánh giá: 1359 (rất tốt)

Đã gửi 12 September 2008 - 04:26 PM

Cách này cũng na ná như script nhưng không hoàn toàn vậy. Từ một bài tình cờ đọc được trên Cadviet... nên tôi thử làm theo hưóng này.
Trươc hết lấy một ví dụ:
Vẽ một loạt hình chữ nhật theo cung parabol (vd sưu tầm đc) , để thực hiện chép đoạn text sau vào dòng commandline

 
rec 0,0 1,0.5
rec 0.1,0.01 1.1,0.51
rec 0.2,0.04 1.2,0.54
rec 0.3,0.09 1.3,0.59
rec 0.4,0.16 1.4,0.66
rec 0.5,0.25 1.5,0.75
rec 0.6,0.36 1.6,0.86
rec 0.7,0.49 1.7,0.99
rec 0.8,0.64 1.8,1.14
rec 0.9,0.81 1.9,1.31
rec 1,1 2,1.5
rec 1.1,1.21 2.1,1.71
rec 1.2,1.44 2.2,1.94
rec 1.3,1.69 2.3,2.19
rec 1.4,1.96 2.4,2.46
rec 1.5,2.25 2.5,2.75
rec 1.6,2.56 2.6,3.06
rec 1.7,2.89 2.7,3.39
rec 1.8,3.24 2.8,3.74
rec 1.9,3.61 2.9,4.11
rec 2,4 3,4.5

kết quả hiện trên màn hình
Hình đã gửi

Tiếp tục với một ví dụ khác, vẽ dàn cong nhịp L=18m độ vồng h=2.5m, khoảng chia bụng dàn mỗi khoảng 3m
 line 0,0 18000,0 
arc 0,0 9000,2500 18000,0
line 3000,0 3000,1433.3935 6000,0 6000,2240.1862 9000,0 9000,2500
line 9000,0 12000,2240.1862 12000,0 15000,1436.0459 15000,0
kết quả xuất hiện
Hình đã gửi

AE thấy thế nào , phát biểu cảm tưởng coi. Không dùng lisp mà cũng đâu fải nông dân đâu, nói thế thôi chứ cũng chưa đc như lisp đâu, vì nếu lập trình thì cho fép vẽ khi nhịp thay đổi đc còn đây thì ko.... nhưng ai ngó qua chưa biêt mình làm gì mà ra như vậy thì cũng thấy..... choáng rồi :)

Cách này để chơi thì được nhưng nói về hiệu quả thì thua cả lệnh WBLOCK và INSERT nửa. Vì để có mấy dòng này thì là phải tính toán hoặc đo từ hình có sẳn ==========>>>>>>>>> mệt :)
  • 0

Cứ ngỡ trần gian là cõi thật.Cho nên tất bật đến bây giờ.
Tạo hộp thoại bằng lisp My blog QUY ĐỊNH ĐẶT TÊN TOPIC TRONG CHUYÊN MỤC LISPD http://ktsduy.wordpress.com/
Để cám ơn chỉ cần nhấn rep_up.png
(Là nhấn vào nút đó phía bài viết của người ta í chứ đừng có nhè cái hình này mà nhấn miết đi nha :-D


#3 tranchan

tranchan

    biết lệnh break

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

Đã gửi 12 September 2008 - 05:50 PM

Cách này để chơi thì được nhưng nói về hiệu quả thì thua cả lệnh WBLOCK và INSERT nửa....


Còn quá sớm để kết luận ... nó chưa tự động thì cần làm sao cho tự động và hoàn thiện hơn. Hơn nưa, khi xem trên STadd pro dùng để dựng các mẫu dàn thì bên trong code cũng chỉ chứa toàn toạ đô.. trở lại vd trên
với VD 1 mà pick từng điểm chỉ có ngã nón xin chào...
VD 2 là tôi thực hiện với số điểm ít hơn và cũng ở mức độ thực tập nên cũng như duy782006 nói..

Xin bật mí nhé Vd1 (tất nhiên như tôi nói là not mine ) là tác đã giả đã làm 1 file excel tính toán và kết quả là bảng toạ độ như vậy đó... Vậy nên sao không thể không thực hiện một cách tự động đc để áp dụng cho truờng hơp có thay đổi dữ liệu đầu vào.
  • 0

#4 Snowman

Snowman

    biết lệnh mirror

  • Members
  • PipPipPip
  • 155 Bài viết
Điểm đánh giá: 90 (tàm tạm)

Đã gửi 12 September 2008 - 07:04 PM

Đây là cách mà dân Xây Dựng có vẻ rất thích dùng. Kết hợp Lisp với Excel (ko phải là trao đổi dữ liệu mà là trao đổi ...lệnh lisp từ ...excel sang lisp. Tôi cũng có xem qua một bảng excel tính toán cao độ hố ga, kết hợp với tính toán khoảng cách, toạ độ rồi ghép thành lệnh lisp vẽ trắc dọc đường ống. Cách này có vẻ rất hiệu quả với những trường hợp cần tính toán nhiều, hay phải thay đổi số liệu. Tôi xin up lên để mọi người tham khảo
FileExcel-Lisp
  • 0

. - ' * ' - .. - ... "Sống trong đời sống cần có một tấm lòng..." . - ' * ' - .. -
-----------------------------------------------------------------------------------

Hình đã gửi Hình đã gửi


#5 tranchan

tranchan

    biết lệnh break

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

Đã gửi 13 September 2008 - 12:14 PM

Thực ra , ko fức tạp như ví dụ của Snowman vì đây chỉ cần Toán + CAD basic . Mà toán thì excel làm rồi chỉ là đưa ra hướng đi mà thôi.... và chuyển lại thành lệnh chứ ko fải là cấu trúc lisp. Nên tôi thiết nghĩ ai làm cũng được.
Hình đã gửi

Nếu ai quan tâm thì tôi sẽ post file excel tính toán toạ độ lên.
  • 0

#6 toan2658

toan2658

    Chưa sử dụng CAD

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

Đã gửi 15 June 2009 - 09:57 PM

Thực ra , ko fức tạp như ví dụ của Snowman vì đây chỉ cần Toán + CAD basic . Mà toán thì excel làm rồi chỉ là đưa ra hướng đi mà thôi.... và chuyển lại thành lệnh chứ ko fải là cấu trúc lisp. Nên tôi thiết nghĩ ai làm cũng được.
Hình đã gửi

Nếu ai quan tâm thì tôi sẽ post file excel tính toán toạ độ lên.


Anh tranchan cho mình file Excel đó đi, mình đang làm thoát nước nên cần lắm! cảm ơn và chúc anh vui khoe!
  • 0