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.
Nguyen Hoanh

Để AutoCAD tự động thực thi 1 lisp

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

Xin mọi người chỉ giáo!

 

Hiện nay, tôi chỉ biết có 2 cách:

1. Cho vào file acad.lsp

2. Cho vào Startup suite

 

Còn một số cách ngầm khác thì chịu. Ví dụ ở đây:

AutoCADautorun.gif

Không hiểu khai báo ở đâu thì ACAD sẽ load các file này?

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
Xin mọi người chỉ giáo!

 

Hiện nay, tôi chỉ biết có 2 cách:

1. Cho vào file acad.lsp

2. Cho vào Startup suite

 

Còn một số cách ngầm khác thì chịu. Ví dụ ở đây:

AutoCADautorun.gif

Không hiểu khai báo ở đâu thì ACAD sẽ load các file này?

Mình thì hay dùng Acad.mnl, bổ xung 1 chút vào phần cuối tệp :

Ví dụ :

...

(defun c:vlisp ()

(if (/= nil c:vlide) (c:vlide))

)

(setvar "menuecho" 1)

(load "c:/program files/autocad 2002/support/acad1")

(load "c:/program files/autocad 2002/support/DDMODIFY")

(load "c:/program files/autocad 2002/support/BLOCKU")

(load "c:/program files/autocad 2002/support/BURCRA")

(load "c:/program files/autocad 2002/support/CRAME10")

(princ "loaded.")

(princ)

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
A có thể nói rõ hơn đc không?

Các file trên được AutoCAD cấp cho "đặc quyền" autoload, bạn có thể lợi dụng để "ăn theo" mọi biểu thức lisp bạn muốn. Ví dụ, bạn thêm vào sau file acad.mnl biểu thức: (princ "\nWELCOME TO CADVIET"). Khi khởi động Cad, Open hoặc New, bạn sẽ thấy dòng chữ trên xuất hiện trong TextWindow (nếu không thấy, bấm F2 sẽ thấy)

Các file acad.mnl, acaddoc.lsp (hoặc dạng acadxxxxdoc.lsp - xxxx là số phiên bản Cad) có sẵn trong thư mục "...\Support". Còn acad.lsp do người dùng tự tạo và có thể đặt ở bất cứ chỗ nào đã được thiết lập Support File Search Path.

Toàn bộ vấn đề chỉ có vậy. Điều quan trọng là những cái "ăn theo" của bạn phải đúng cú pháp lsp!

Còn Startup Suite đã được đề cập nhiều lần, chắc không cần nói thê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
Xin mọi người chỉ giáo!

 

Hiện nay, tôi chỉ biết có 2 cách:

1. Cho vào file acad.lsp

2. Cho vào Startup suite

 

Còn một số cách ngầm khác thì chịu. Ví dụ ở đây:

AutoCADautorun.gif

Không hiểu khai báo ở đâu thì ACAD sẽ load các file này?

theo em thì nên tạo 1 đuờng Support File Search Path. thì hay hơn chỉ đến 1 Folder có chưa file lisp dạng sau:

(vmon)
(Defun s::startup ()
(setvar "cmdecho" 1)
(setvar "cmdecho" 1)
(load "MHPRO.VLX")
(load "MH-inertia.lsp")
(princ)
)

Tiện lợ ở chỗ

1-không làm ảnh hwởng tới các *.MNL của cad

2-Khi khôngmuốn có thể "gỡ" nó đi không hề hấn gì

3-Có thể gói gọn chuơng trình riêng của mình

(cách này là cách mà cái ông EXPRESS của cad dùng)

Thực tế có thể dùng VBA gì gì đó (em đã từng thấy ở các phần mền như TKXD 2.0 trên Kêtcấu.com, ), có bác nào có mã nguồn khoản này xin chỉ giáo!

  • 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
theo em thì nên tạo 1 đuờng Support File Search Path. thì hay hơn chỉ đến 1 Folder có chưa file lisp dạng sau:

(vmon)
(Defun s::startup ()
(setvar "cmdecho" 1)
(setvar "cmdecho" 1)
(load "MHPRO.VLX")
(load "MH-inertia.lsp")
(princ)
)

Tiện lợ ở chỗ

1-không làm ảnh hwởng tới các *.MNL của cad

2-Khi khôngmuốn có thể "gỡ" nó đi không hề hấn gì

3-Có thể gói gọn chuơng trình riêng của mình

(cách này là cách mà cái ông EXPRESS của cad dùng)

Thực tế có thể dùng VBA gì gì đó (em đã từng thấy ở các phần mền như TKXD 2.0 trên Kêtcấu.com, ), có bác nào có mã nguồn khoản này xin chỉ giáo!

Vậy khi dùng file lệnh tắt này khi AP EXPRESS vào Cad thi lênh tắt và mở layer là lệnh gì.

Đối với ATD 2002 thi dung 11-dể tắt ; còn 22-để mở.

Nhưng với ATD 2008 thì bất lưc. E dùng 11 thì nó lock tất cả các Layer lại phải vào LA mới mở nó ra được

http://www.cadviet.com/upfiles/acad.pgp

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
Vậy khi dùng file lệnh tắt này khi AP EXPRESS vào Cad thi lênh tắt và mở layer là lệnh gì.

Đối với ATD 2002 thi dung 11-dể tắt ; còn 22-để mở.

Nhưng với ATD 2008 thì bất lưc. E dùng 11 thì nó lock tất cả các Layer lại phải vào LA mới mở nó ra được

http://www.cadviet.com/upfiles/acad.pgp

 

Tôi ít dùng cái express tôi hay dùng cái này(qua điểm cổ) các lệnh II, BM, FM

http://www.cadviet.com/upfiles/MHPro6.lsp

  • 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

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


×