Chuyển đến nội dung
Diễn đàn CADViet
  • Thông báo

    • Nguyen Hoanh

      CADViet đã hoàn tất nâng cấp   14/09/2017

      Chào các bạn, CADViet đã hoàn tất việc nâng cấp lên phiên bản mới. Tất cả các chức năng đã hoạt động theo kỳ vọng của ban quản trị. Nếu có vấn đề gì cần phản hồi, các bản post ở đây nhé: Trân trọng, Nguyễn Hoành.
trinhhoanghieu090

[Nhờ viết Lisp] : Vẽ sơ đồ thả neo tàu biển

Các bài được khuyến nghị

Dear các Bro!

 

Mời các bro xem trước bản vẽ đính kèm của em.

http://www.cadviet.com/upfiles/3/133631_mau.dwg

 

Đầu tiên em sẽ vẽ thủ công  trước hình tàu với hướng quay bất kỳ ( trong file mẫu là 235 độ - Hướng này là góc hợp bởi phương bắc thực với hướng mũi tàu ).

 

Các bro viết giúp em một cái lisp vẽ sơ đồ thả neo của tàu theo các bước:

- Chọn chế độ (vẽ 2 neo trước lái, vẽ 2 neo sau lái, vẽ cả 4 neo)

- Nhập hướng của tàu.

- Chọn vị trí bắt đầu  dây neo: (theo từng chế độ ở trên, lần lượt theo AP1, AP2, AS3, AS4).

- Nhập góc mở, chiều dài dây neo:

+ Nhập góc mở,  chiều dài 2 dây neo trước lái ( AP2 và AS4 ). Như trong file mẫu là 40 độ và 350 m. vì 2 thông số này giống nhau nên ta chỉ nhập một lần. Hoặc( Và):

+ Nhập góc mở và chiều dài 2 dây neo sau lái (AP1 và AS3). Như trong file mẫu là 40 độ và 350 m. vì 2 thông số này giống nhau nên ta chỉ nhập một lần.

-   Nhập cỡ chữ

-   Vẽ hình và ghi các thông số liên quan với cỡ chữ vừa nhập ở trên (như file kết quả).

Hoàn thành lệnh.

 

Tiếp theo các bác có thể viết giúp em một thêm lisp ghi tọa độ như file đính kèm với  để hoàn thiện bản vẽ sơ đồ neo.

 

Em cảm ơn các pro.

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
phamthanhbinh    3.123

Dear các Bro!

 

Mời các bro xem trước bản vẽ đính kèm của em.

http://www.cadviet.com/upfiles/3/133631_mau.dwg

 

Đầu tiên em sẽ vẽ thủ công  trước hình tàu với hướng quay bất kỳ ( trong file mẫu là 235 độ - Hướng này là góc hợp bởi phương bắc thực với hướng mũi tàu ).

 

Các bro viết giúp em một cái lisp vẽ sơ đồ thả neo của tàu theo các bước:

- Chọn chế độ (vẽ 2 neo trước lái, vẽ 2 neo sau lái, vẽ cả 4 neo)

- Nhập hướng của tàu.

- Chọn vị trí bắt đầu  dây neo: (theo từng chế độ ở trên, lần lượt theo AP1, AP2, AS3, AS4).

- Nhập góc mở, chiều dài dây neo:

+ Nhập góc mở,  chiều dài 2 dây neo trước lái ( AP2 và AS4 ). Như trong file mẫu là 40 độ và 350 m. vì 2 thông số này giống nhau nên ta chỉ nhập một lần. Hoặc( Và):

+ Nhập góc mở và chiều dài 2 dây neo sau lái (AP1 và AS3). hư trong file mẫu là 40 độ và 350 m. vì 2 thông số này giống nhau nên ta chỉ nhập một lần.

-   Nhập cỡ chữ

-   Vẽ hình và ghi các thông số liên quan với cỡ chữ vừa nhập ở trên (như file kết quả).

Hoàn thành lệnh.

 

Tiếp theo các bác có thể viết giúp em một thêm lisp ghi tọa độ như file đính kèm với  để hoàn thiện bản vẽ sơ đồ neo.

 

Em cảm ơn các pro.

Hề hề hề,

Tại sao phải vẽ thử công tàu và hướng tàu ban đầu??? Sao không tạo block các đối tượng này và mỗi lần cần vẽ chỉ việc insert nó vào bản vẽ là Ok.

Các tọa độ hiển thị như trên bản vẽ của bạn được tính toán theo chuẩn nào vậy??? Cách chuyển đổi từ hệ tọa độ của CAD sang hệ tọa độ như trên bản vẽ của bạn ???

  • Vote giảm 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Hề hề hề,

Tại sao phải vẽ thử công tàu và hướng tàu ban đầu??? Sao không tạo block các đối tượng này và mỗi lần cần vẽ chỉ việc insert nó vào bản vẽ là Ok.

Các tọa độ hiển thị như trên bản vẽ của bạn được tính toán theo chuẩn nào vậy??? Cách chuyển đổi từ hệ tọa độ của CAD sang hệ tọa độ như trên bản vẽ của bạn ???

 

Hi hi, bác phamthanhbinh nói chí phải, nhưng năng lực vẽ cad có hạn em chỉ block các đối tượng được trong một bản vẽ riêng lẻ và insert khi cần. Còn vụ insert như bác nói thì em chưa làm được, mong bác chỉ giáo. 

Còn vụ các tọa độ hiển thị như trên bản vẽ thì đó chính là tọa độ trong hệ tọa độ mặc định autocad, giống như khi mình dùng lệnh "id" đó bác.

thanks bác phamthanhbinh đã quan tâm.

 

Nhân tiện để viết autolisp một lần không phải sửa đi sửa lại, bác viết giúp em thêm một chế độ vẽ:

- Chọn chế độ (vẽ 2 neo trước lái, vẽ 2 neo sau lái, vẽ cả 4 neo, vẽ 1 neo bất kỳ).

Với 3 chế độ đầu autolisp vẫn chạy như trên, riêng nếu chọn vẽ 1 neo bất kỳ thì autolisp sẽ thực hiện theo các bước:

-Chọn vị trí bắt đầu dây neo

- Nhập hướng neo, chiều dài dây neo (Hướng dây neo là góc hợp bởi hướng bắc theo ngược chiều kim đồng hồ đến dây neo như file mẫu 2 http://www.cadviet.com/upfiles/3/133631_mau_2.dwg)

- Nhập cỡ chữ

- Vẽ hình và ghi các thông số liên quan với cỡ chữ vừa nhập ở trên (như file kết quả mẫu 2).

Bác giúp em vụ này nha em cảm ơn bác lắm lắm.

 

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
phamthanhbinh    3.123

Hi hi, bác phamthanhbinh nói chí phải, nhưng năng lực vẽ cad có hạn em chỉ block các đối tượng được trong một bản vẽ riêng lẻ và insert khi cần. Còn vụ insert như bác nói thì em chưa làm được, mong bác chỉ giáo. 

Còn vụ các tọa độ hiển thị như trên bản vẽ thì đó chính là tọa độ trong hệ tọa độ mặc định autocad, giống như khi mình dùng lệnh "id" đó bác.

thanks bác phamthanhbinh đã quan tâm.

 

Nhân tiện để viết autolisp một lần không phải sửa đi sửa lại, bác viết giúp em thêm một chế độ vẽ:

- Chọn chế độ (vẽ 2 neo trước lái, vẽ 2 neo sau lái, vẽ cả 4 neo, vẽ 1 neo bất kỳ).

Với 3 chế độ đầu autolisp vẫn chạy như trên, riêng nếu chọn vẽ 1 neo bất kỳ thì autolisp sẽ thực hiện theo các bước:

-Chọn vị trí bắt đầu dây neo

- Nhập hướng neo, chiều dài dây neo (Hướng dây neo là góc hợp bởi hướng bắc theo ngược chiều kim đồng hồ đến dây neo như file mẫu 2 http://www.cadviet.com/upfiles/3/133631_mau_2.dwg)

- Nhập cỡ chữ

- Vẽ hình và ghi các thông số liên quan với cỡ chữ vừa nhập ở trên (như file kết quả mẫu 2).

Bác giúp em vụ này nha em cảm ơn bác lắm lắm.

Hề hề hề,

1/- Bạn vẻ một tàu và các điểm chuẩn của thân tàu, của vị trí nối neo trên thân tàu, mũi tên chỉ hướng tàu, sau đó sử dụng lện wblock để tạo nó thành một file đã block với một tên do bạn đặt và lưu lại vào thư mục của bạn.

Sau đó mỗi lần dùng bạn sử dụng lệnh insert như bình thường nhưng chọn browse để tìm tới file này và insert nó như việc bạn insert các block trong cùng bản vẽ.

2/- Mình chưa rõ cách xác định tọa độ của bạn vì theo mình biết thì hệ tọa độ trong Cad đâu có nói tới Northing và Easting như bạn  thể hiện. Gốc tọa độ theo hệ của bạn được xác định thế nào???

3/- Việc viết lisp theo yêu cầu của bạn không quá khó, nhưng vì mình chưa hiểu rõ nên chưa thể giúp bạn. Bạn hãy giải thích kỹ để mình hiểu mới có thể làm đúng yêu cầu của bạn được.

  • Vote tăng 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Hề hề hề,

1/- Bạn vẻ một tàu và các điểm chuẩn của thân tàu, của vị trí nối neo trên thân tàu, mũi tên chỉ hướng tàu, sau đó sử dụng lện wblock để tạo nó thành một file đã block với một tên do bạn đặt và lưu lại vào thư mục của bạn.

Sau đó mỗi lần dùng bạn sử dụng lệnh insert như bình thường nhưng chọn browse để tìm tới file này và insert nó như việc bạn insert các block trong cùng bản vẽ.

2/- Mình chưa rõ cách xác định tọa độ của bạn vì theo mình biết thì hệ tọa độ trong Cad đâu có nói tới Northing và Easting như bạn  thể hiện. Gốc tọa độ theo hệ của bạn được xác định thế nào???

3/- Việc viết lisp theo yêu cầu của bạn không quá khó, nhưng vì mình chưa hiểu rõ nên chưa thể giúp bạn. Bạn hãy giải thích kỹ để mình hiểu mới có thể làm đúng yêu cầu của bạn được.

thanks bác Phamthanhbinh, vụ block nhờ có bác em đã thông suốt và thành công.

Vụ toạ độ thì "Northing" chính là giá trị Y trong autocad, "Easting" là giá trị X trong autocad. Gốc toạ độ tại điểm gốc O(0,0) mặc định của autocad trong hệ toạ độ mặc định UCS World.

Còn vụ giải thích thì em xin phép được làm trong file word

http://www.cadviet.com/upfiles/3/133631_file_chu_thich_1_1.rar

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay


×