Chuyển đến nội dung
Diễn đàn CADViet
Đăng nhập để thực hiện theo  
Leeboow

LISP Kiểm tra và thay đổi các biến số điều khiển trong cad

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

Các bro cho mình hỏi có lisp nào phục vụ cho việc check các biến điều khiển trong cad không nhỉ?

Ví dụ như: lệnh PSL, LTS, MEASURMENT,... 

Mình muốn kiểm tra xem các biến này có được set về hệ số 1 chưa. Nhưng gõ từng lệnh để check và mở từng bản vẽ lên thì khá lâu.

Không biết có lisp nào check cùng lúc nhiều bản vẽ cho các lệnh này không nhỉ.

Đồng thời nếu chỉnh sửa hàng loạt về giá trị nào đó thì càng tuyệt với.

Mong các huynh chỉ giáo.

 

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

Các bro cho mình hỏi có lisp nào phục vụ cho việc check các biến điều khiển trong cad không nhỉ?

Ví dụ như: lệnh PSL, LTS, MEASURMENT,... 

Mình muốn kiểm tra xem các biến này có được set về hệ số 1 chưa. Nhưng gõ từng lệnh để check và mở từng bản vẽ lên thì khá lâu.

Không biết có lisp nào check cùng lúc nhiều bản vẽ cho các lệnh này không nhỉ.

Đồng thời nếu chỉnh sửa hàng loạt về giá trị nào đó thì càng tuyệt với.

Mong các huynh chỉ giáo.

 

Màu xanh: dùng lệnh sysvdlg >> save all >> đọc giá trị tất cả biến hệ thống, còn biến môi trường thì phức tập hơn.
Màu vàng: câu này mênh mông bát ngát, không nói khơi khơi được

  • Like 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

Wao, hay quá bro ơi. cảm ơn rất nhiều nhé. Bài viết của huynh hay và vô cùng hữu ích luôn.
Không biết huynh có cách nào check tương tự cho các lệnh PURGE, UNITS và STYLE không nhỉ?

Chân thành cảm ơn huynh

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

Wao, hay quá bro ơi. cảm ơn rất nhiều nhé. Bài viết của huynh hay và vô cùng hữu ích luôn.
Không biết huynh có cách nào check tương tự cho các lệnh PURGE, UNITS và STYLE không nhỉ?

Chân thành cảm ơn huynh

Câu hỏi sai: một bên là lệnh, 1 bên là biến. Với 1 lệnh có thể có rất nhiều biến liên quan. Với 1 biến cũng có nhiều lệnh liên quan.
Nói chung không thể đem mạ ngoài đồng mà nấu cơm đượ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

Có một cách ngày xưa vẫn hay dùng để fix nhiều bản vẽ cùng lúc.

viết 1 lisp chạy trực tiếp khi load dùng để làm gì đó cuối lệnh là save và close bản vẽ

mở cad cài startup suite tìm đến file lisp (tự động load lisp khi mở bản vẽ đó). 

mở toàn bộ file dwg muốn fix là xong.

đổi tên file lisp hoặc xoá đi để không chạy lisp đó nữa.

  • Like 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

đúng rồi huynh. Em đang tìm một lisp như vậy. Ngặt nỗi là không biết viết lisp :(. 

Huynh có lisp đó không? share em với

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

nó chỉ như này thôi:

bạn tự thêm tên biến và giá trị là được viết kiểu dạng (tênbiến giátrị) vào giữa là được

(mapcar

  '(lambda (x) (setvar (car x) (cadr x)))

  '(

    (OSMODE 0)

    (LTSCALE 2)

    ;thêm bao nhiêu nữa thì viết tiếp ở chỗ này

  )

)

(command "QSAVE" "CLOSE")

 

  • Like 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

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
Đăng nhập để thực hiện theo  

×