Nhờ viết lisp thống kê phôi

[Black Roses 2]

Chào các anh/chị,

 

Em là sinh viên mới ra trường làm về bên Cơ khí, công việc của em là thống kê kích thước phôi từ các bản vẽ chi tiết để lặp danh sách mua phôi về gia công.

Việc đơn giản nhưng thao tác lặp đi lặp lại rất nhiều, dễ có sai sót, vì vậy nay em xin nhờ anh/chị viết giùm em 1 lisp (hoặc bằng VBA) để thực hiện công việc đó.

Ý tưởng để viết chương trình thế này:

- B1: Em sẽ chọn text ghi vật liệu (Nhôm, sắt, inox,...), chọn số lượng của chi tiết (theo bản vẽ)

- B2: chọn 3 (hoặc 2) kích thước cơ bản của phôi gồm chiều dày phôi, chiều rộng và chiều dài (nếu phôi tròn thì chọn đường kính và chiều dài)

- B3: xét các điều kiện của 3 kích thước trên mà tạo thành 1 Mtext (dạng top center, size 10) rồi chọn điểm đặt vào bản vẽ (thường là phía dưới bản vẽ chi tiết)

Lặp lại các thao tác trên...

 

Các điều kiện về 3 kích thước cơ bản như sau: (chiều rộng luôn nhỏ hơn chiều dài)

- Khi dày <20mm, nếu dài <400, thì cộng rộng và dài thêm 3mm, chiều dày làm tròn lên (theo dãy tiêu chuẩn). Nếu dài >400 thì cộng dài, rộng thêm 5mm, dày cũng làm tròn lên theo tiêu chuẩn

- Khi dày >20, nếu dài<400 thì dài và rộng cộng thêm 5mm, nếu dài >400 thì dài và rộng cộng thêm 8mm

- Chiều dày phôi sẽ phụ thuộc vào loại phôi mà có dãy kích thước tiêu chuẩn khác nhau (em có thể bổ sung hoặc chỉnh sửa nếu cần), được ghi trong file cad đính kèm.

 

Mong được sự giúp đỡ của mọi người,

 

Chúc cả nhà buổi chiều vui vẻ ^^

 

test lisp.dwg

[Danh Cong 422]

Thường thì những vấn đề này nên có "Đặt hàng".. :)) Nói vui thôi, nhưng nên có sự liên hệ với các anh chị có kinh nghiệm để họ bớt chút thời gian để viết bạn ạ... ^^ Vì để lập trình các bác ý cũng tốn thời gian lắm.

[Nguyen Hoanh 4664]

Sao bạn không thử dùng bock attribute,

1 block chứa các text thuộc tính.

 

Thống kê rất dễ bằng lệnh ATTOUT.

[Black Roses 2]

20 phút trước, Nguyen Hoanh đã nói:

Sao bạn không thử dùng bock attribute,

1 block chứa các text thuộc tính.

 

Thống kê rất dễ bằng lệnh ATTOUT.

Dạ khi thống kê thì em dùng lisp khác rồi ạ, cái này là cần tạo ra Mtext rồi đặt phía dưới bản vẽ, để dễ quản lý phôi nào dành cho bản vẽ nào đó ạ :D. Hiện tại thì Mtext đó em tạo 1 cái mẫu, xong rồi copy qua bản vẽ kế bên rồi chỉnh sửa cho đúng, có khi copy mà quên chỉnh nên nó sai :(.

 

Với lại em nghĩ giá trị kích thước khi mình ghi ra đâu phải là block đâu ạ :(

[dinhvantrang 151]

các khung tên của bạn định dạng giống y chang nhau chứ? nếu thế thì có thể tự động 1 phát ăn ngay được.

[Black Roses 2]

13 phút trước, dinhvantrang đã nói:

các khung tên của bạn định dạng giống y chang nhau chứ? nếu thế thì có thể tự động 1 phát ăn ngay được.

Dạ khung tên thì định dạng như nhau, chỉ có cái là đường bao khác nhau thôi, do em luôn dùng tỷ lệ 1:1 mà sẽ kéo hình chữ nhật (khung giấy) ra để cho vừa, còn phần khung bên dưới vẫn giữ nguyên đó anh :D