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

[Nguyen Hoanh 4.663]

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:

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

[lamtecco2 856]

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:

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)

[Ar_Chanwoo 39]

A có thể nói rõ hơn đc không?

[ssg 1.102]

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?

[MANHHUNGXDA 458]

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:

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!

[nguyenbakien 31]

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

[MANHHUNGXDA 458]

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