Chuyển đến nội dung
Diễn đàn CADViet
sonhv

viết giúp lisp theo yêu cầu

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

em làm bên đo bốc khối lượng.tính khối lượng từ các dim trong bảng vẽ cad rồi cộng lại với nhau.bác nào viết giúp em lisp xuất các dim từ cad sang excel trong cùng 1 ô. chi tiết xem tại hình ảnh đính kèm nhé.add zalo em. 0793664104 có trả phí cho anh em giúp đỡ nhé.image.thumb.png.4e62f62e0e89076353736387355685f3.png

image.thumb.png.a829fbd8d6e38b4e89c8800bf4de12f0.png

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
25 phút trước, sonhv đã nói:

em làm bên đo bốc khối lượng.tính khối lượng từ các dim trong bảng vẽ cad rồi cộng lại với nhau.bác nào viết giúp em lisp xuất các dim từ cad sang excel trong cùng 1 ô. chi tiết xem tại hình ảnh đính kèm nhé.add zalo em. 0793664104 có trả phí cho anh em giúp đỡ nhé.image.thumb.png.4e62f62e0e89076353736387355685f3.png

image.thumb.png.a829fbd8d6e38b4e89c8800bf4de12f0.png

 

Bạn có thể tham khảo. Nhưng mất phí nhé :))

 

 

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ình như bác này muốn nhiều hơn mà.

Theo mình đoán là có các dim theo pline nhưng không theo tất cả các đỉnh. Có ghi chú pline ghi chú tên line đèn. Bác muốn viết lisp xuất ra excel có phải như vậy ko?

Không đơn thuần tính toán.

Ít nhất là nên đưa 1 file cad và excel ví dụ mới biết dc.

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

có nghĩa là trong 1 line đèn. dim rất nhiều đoạn trong pline đó...em muốn cộng các dim đó lại để xuất ra excel đó bác.dạng như giải trình trong line đèn đó để ra được kết quả đó bác

 

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

image.thumb.png.4da87d1139550e470797c3ef161eb255.pngimage.thumb.png.4da87d1139550e470797c3ef161eb255.png

bác nào sửa lisp chổ này giúp em với. ví dụ trong dim là 7853 + 6238 . em muốn sửa lisp lại thành 7.85+6.23 được không bác. em có gửi lisp lên đó ạ.bác nào cao thủ sửa giúp em với

ccd.lsp

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

Cách1.định dạng lại dim tại  Dimstyles, phần Primay Unit -> Dim Factor

Cách 2. hoặc trong lisp

thay dòng

str (strcat str  (Rtos (gt1 ent)) "+")

bằng dòng

str (strcat str  (Rtos (/ (gt1 ent) 1000.0) 2 2) "+")

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

×