Lisp vẽ Pline vét bùn ????

[hhhhgggg 29]

Vâng, cái này lúc viết em quên mất. Đúng là yêu cầu điểm sẽ nằm trên đường Pline.

Em thành thật xin lỗi bác ! Đúng là lúc đầu tiên đưa đầu bài em Vô Tình để điểm đầu và điểm cuối của Pline vẽ thêm trùng với điểm đầu và điểm cuối của Pline ban đầu. Yêu cầu ở đây là sẽ vẽ tại điểm bắt đầu và kết thúc là 2 điểm bất kỳ trên Pline đó. Tại bác Tuệ chưa dùng nova bao giờ nên bác hiểu hơi nhầm chút. Jờ thì mọi chuyện đã sáng tỏ, lúc nào bác rảnh bác sửa lại júp em nhé !!!! Cảm ơn các bác rất nhiều !!!

[Tue_NV 3915]

Ok ! Đúng là lúc đầu tiên đưa đầu bài em vô tình để điểm đầu và điểm cuối của Pline vẽ thêm trùng với điểm đầu và điểm cuối của Pline ban đầu. Tại bác Tuệ chưa dùng nova bao giờ nên bác hiểu hơi nhầm chút. Jờ thì mọi chuyện đã sáng tỏ, lúc nào bác rảnh bác sửa lại júp em nhé !!!! Cảm ơn các bác rất nhiều !!!

Chào hhhhgggg.

Bạn vẫn chưa trả lời câu hỏi của anh Duy782006. Hay là bạn đang muốn lẩn tránh nó???

 

Các bác Pro à ? Ko bit các bác viết Lisp xong các bác có chạy thử ko ? Em rất cảm ơn các bác vì đã nhiệt tình quan tâm giúp đỡ.Nhưng mà Lisp các bác viết ra thì ko cái nào chạy được cả, của bác Duy, Tuệ và Giá bạch đều ko chạy đúng. Nếu các bác đã từng dùng nova thi bit nó vét bùn thế nào, nhưng em biết là viết được như thế thì sẽ tốn công nên đưa ra yêu cầu rất nhỏ.

Đề bài : Có 1 Pline có từ trước, Lisp sẽ vẽ ra 1 Pline dạng copy xuống bên dưới 1 đoạn b và chú ý là nó vẽ thêm cả 2 mẩu đoạn thẳng ở 2 đầu của Pline vẽ thêm để nối liền 2 Pline thành 1 hình kín phục vụ cho việc tính khối lượng ???

Các bác chỉnh lại CODE và test giúp em nhé ! Cảm ơn các bác !!!

cái nào hông đúng dậy?

 

Tôi thật sự khó hiểu bạn. Cái lisp của bạn tue mặc dù không hỏi chọn 2 điểm nhưng lisp đã tự tìm điểm đầu và điểm cuối sau đó vẽ theo đúng y yêu cầu của bạn.

-Bạn chưa trả lời câu hỏi của tôi. Mong bạn có trách nhiệm 1 chút. Không phải ai cũng hiểu điều bạn nói đúng như cách bạn mong người ta hiểu đơn giản vì bạn quá hời hợt trong diển đạt khi đưa ra yêu cầu

[nataca 555]

Ok ! Đúng là lúc đầu tiên đưa đầu bài em vô tình để điểm đầu và điểm cuối của Pline vẽ thêm trùng với điểm đầu và điểm cuối của Pline ban đầu. Tại bác Tuệ chưa dùng nova bao giờ nên bác hiểu hơi nhầm chút. Jờ thì mọi chuyện đã sáng tỏ, lúc nào bác rảnh bác sửa lại júp em nhé !!!! Cảm ơn các bác rất nhiều !!!

Bạn rút kinh nghiệm lần sau yêu cầu rõ hơn nhé. Xin phép bác Tuệ và bác Duy em đã up sửa lại cho bạn Hoàng Giang. HG down lại file mình đã edit.

[hhhhgggg 29]

Tôi thật sự khó hiểu bạn. Cái lisp của bạn tue mặc dù không hỏi chọn 2 điểm nhưng lisp đã tự tìm điểm đầu và điểm cuối sau đó vẽ theo đúng y yêu cầu của bạn.

-Bạn chưa trả lời câu hỏi của tôi. Mong bạn có trách nhiệm 1 chút. Không phải ai cũng hiểu điều bạn nói đúng như cách bạn mong người ta hiểu đơn giản vì bạn quá hời hợt trong diển đạt khi đưa ra yêu cầu.

Vâng em Post đề bài có đôi phần chưa tổng quát, cái đề bài ban đâu của em thì chỉ những người đã từng sử dụng chương trình nova và làm đường thì mới có thể hiểu đúng theo ý em được, Em đã vô tình để điểm đầu và điểm cuối trùng với Pline ban đầu. Em thành thật xin lỗi và sẽ rút kinh nghiệm để lần sau nhìn nhận vấn đề một cách tổng quát hơn. Em nhìn nhận vấn đề vãn chưa được tổng quát dẫn đến hiểu nhầm !!!

[hhhhgggg 29]

Em xin lỗi các bác trong diễn đàn đây :

http://www.binhdinhffc.com/diendan/download/file.php?id=970

http://www.quayeu.com/images/ga%20quay.jpg

[hhhhgggg 29]

Tue_NV đã hoàn thành đoạn Lisp nạo vét bùn này :

1. Chọn Pline

2. Chọn độ sâu vét bùn

3. Chọn điểm đầu là 1 điểm bất kì trên Pline

4. Chọn điểm cuối là 1 điểm bất kì trên Pline

5. Thực hiện công việc như ý bạn

 

Bác Tuệ UP lên cho em cái Lisp bác đã viết rùi đi ???

[duy782006 1592]

Em xin lỗi các bác trong diễn đàn đây :

 

Bạn không thẳng thắn trả lời câu hỏi của mình gì cả mình nhắc lại câu hỏi:

 

Trích dẫn(hhhhgggg @ Jun 17 2009, 10:42)

Các bác Pro à ? Ko bit các bác viết Lisp xong các bác có chạy thử ko ? Em rất cảm ơn các bác vì đã nhiệt tình quan tâm giúp đỡ.Nhưng mà Lisp các bác viết ra thì ko cái nào chạy được cả, của bác Duy, Tuệ và Giá bạch đều ko chạy đúng.

 

Mình viết lisp nào cho bạn chạy không được, cái nào chạy không đúng?

[hhhhgggg 29]

Bạn không thẳng thắn trả lời câu hỏi của mình gì cả mình nhắc lại câu hỏi:

 

Trích dẫn(hhhhgggg @ Jun 17 2009, 10:42)

Các bác Pro à ? Ko bit các bác viết Lisp xong các bác có chạy thử ko ? Em rất cảm ơn các bác vì đã nhiệt tình quan tâm giúp đỡ.Nhưng mà Lisp các bác viết ra thì ko cái nào chạy được cả, của bác Duy, Tuệ và Giá bạch đều ko chạy đúng.

 

Mình viết lisp nào cho bạn chạy không được, cái nào chạy không đúng?

Em nhầm bác với bác ZUY782006 bác à ? Em xin lỗi nhé !!! Cái bác Zuy kia chỉ góp ý thui chứ ko viết cho em. Em có đôi chút nhầm lẫn. Bác thông cảm nhé !!! Em sửa lại bài đó.

[traitimsat034 15]

Em nhầm bác với bác ZUY782006 bác à ? Em xin lỗi nhé !!! Cái bác Zuy kia chỉ góp ý thui chứ ko viết cho em. Em có đôi chút nhầm lẫn. Bác thông cảm nhé !!! Em sửa lại bài đó.

nói thật, mình ko thích ông này.

[conghoan1003 0]

Có thể lisp chạy nhanh hơn nhưng mà cái bạn viết nó lại không đúng ý cái tụi mình cần. Mình đưa ra ý tưởng thế này nha:

Chạy lisp hỏi: bề rộng vét: b=?

Độ dốc vét: 1:1(nhập1), 1:1.5(nhập 1.5), thẳng đứng (nhập 0)....

sau đó chọn polyline tự nhiên. (Chọn tấc cả các đường tự nhiên của tấc cả các mặt cắt)

Rồi chọn vị trí vét: chọn điểm thứ nhất (điểm A trong hình vẽ), chọn điểm thứ 2 (Điểm B trong hình vẽ). Sau khi chọn hai điểm cùng thuộc một polyline thì lisp sẽ vẽ được một đường tự nhiên. Rồi tiếp tục chọn hai điểm thuộc polyline khác (mặt cắt khác) thì sẽ được đường vét thứ hai rồi tiếp tục chọn hai điếp tiếp theo......

Mình nghĩ thế sẽ rất nhanh.

lưu ý: khi mình vét thì mình cần offset xuống chứ không coppy như hhhhqqqq nha.

đường vét được tạo thành thuộc layer hiện hữu (không trùng với layer tự nhiên)

Cảm ơn Tue_NV đã giúp đỡ! file cad nè: http://www.cadviet.com/upfiles/hoan.dwg

Có lẽ hhhhgggg phải rút kinh nghiệm khi post bài trong diễn đàn, vì đây là một diễn đàn rất bổ ích mà lại hoàn toàn free, mình thấy anh em trên diễn đàn rất nhiệt tình đã giúp đỡ mọi người (trong đó có mình) rất nhiều. từ khi biết đến diễn đàn này mình học hỏi được rất nhiều điều. Qua đây mình xin gỏi lời cảm ơn chân thành đến các anh em diễn đàn, và cũng xin góp ý cho hhhhgggg trước khi nhận xét một điều gì thì nên cân nhắc trước để khỏi phải gây sự khó chịu đến những ngưòi giúp đỡ mình nhé.

Cái lisp đối với anh em cầu đường như mình rất cẩn xin Tue_NV giúp đỡ nhé!