[求助]：我怎么让lsp程序自动加载

ghl_729

我自己编了一个lsp程序，但是每次用的时候总是要用appload函数加载，有什么办法可以让cad打开的时候自动加载呢？

lxch

在加载的对话框中还有一个启动组按钮，将你的程序加到启动组中就可以了。

taner

2. 
   
3.   [FONT=courier new]
   
4. Loading AutoLISP Files.
   
5. Note!!
   
6. One of the most important things to remember about loading AutoLisp Routines is to
   
7. ensure that your Lisp files and any support files (i.e DCL Files; DAT Files; etc) are in your
   
8. AutoCad search path. (I dedicate a directory to all my Lisp files and relevant support
   
9. files.
   
10. There are numerous ways of loading AutoLisp Files :
    
11. Command Line Loading.
    
12. The simplest is from the AutoCad command line.
    
13. The syntax for loading AutoLisp files is :
    
14. (load "filename")
    
15. The.lsp extension is not required.
    
16. Menu Loading.
    
17. The following code samples are one way of loading AutoLisp files from a menu.
    
18. Pull Down Menu's :
    
19. ***POP12
    
20. T_Steel [Steel Menu]
    
21. T_Beams [Drawing Setup]^C^C^P+
    
22. (cond ((null C:DDSTEEL) (prompt "Please Wait...")(load "DDSTEEL"))) DDSTEEL
    
23. Toolbars :
    
24. ***TOOLBARS
    
25. **STEEL
    
26. TB_DDSTEEL [_Button("Steel", "STEEL.bmp", "STEEL32.bmp")]^C^C^P+
    
27. (cond ((null C:ddsteel) (prompt "Please Wait...")(load "ddsteel"))) ddsteel
    
28. This method of loading Lisp files first checks to see if the routine is already loaded. If it
    
29. is, it runs the routine. If it is not, it first loads the routine, then runs it. Clever Hey...
    
30. AcadDoc.Lsp File.
    
31. The AcadDoc.Lsp file is a useful way of loading a library of AutoLisp routines.
    
32. Each time you start a drawing AutoCad searches the library path for an AcadDoc.Lsp
    
33. file. If it finds one, it loads the file into memory.
    
34. You could use the normal load function (load "filename") in your AcadDoc.Lsp file but if
    
35. an error occurs whilst attempting to load one of your routines, the remainder of the file is
    
36. ignored and is not loaded.
    
37. Therefore, you must use the on failure argument with the load function :
    
38. (load "Lispfile1" "\nLispfile1 not loaded")
    
39. (load "Lispfile2" "\nLispfile2 not loaded")
    
40. (load "Lispfile3" "\nLispfile3 not loaded")
    
41. The .MNL File
    
42. The other type of file that AutoCad loads automatically is the .MNL file.
    
43. If you have a partial menu file it can also have it's own .MNL file.
    
44. Just remember that the .MNL file must have exactly the same name as your partial menu
    
45. file. (except for the .MNL extension, of course.)
    
46. You can load Lisp files from this file using the load function exactly the same as you did
    
47. in the AcadDoc.Lsp file.
    
48. Command Autoloader
    
49. When you automatically load a command from your AcadDoc.Lsp file (or a .MNL file) the
    
50. commands definition consumes your systems resources whether you actually use the
    
51. command or not. The Autoload function makes a command available without loading the
    
52. entire routine into memory.
    
53. (Autoload "Utils" '("Utils1" Utils2" "Utils3"))
    
54. (Autoload "DDSteel" '("DDSteel"))
    
55. This would automatically load the commands Utils1, Utils2 and Utils3 from the Utils.Lsp
    
56. file and DDSteel from the DDSteel.Lsp file.
    
57. S::Startup Function.
    
58. If the user defined function S::Startup is included in the AcadDoc.lsp or a .MNL file,
    
59. it is called when you enter a new drawing or open an existing drawing.
    
60. e.g. Say that you wanted to override the standard AutoCad LINE and COPY commands
    
61. with versions of your own, your AcadDoc.Lsp file would something like this :
    
62. (defun C:LINE ()
    
63. .....Your Definition.....
    
64. )
    
65. (defun C:COPY ()
    
66. .....Your Definition.....
    
67. )
    
68. (defun S::Startup ()
    
69. (command "Undefine" "LINE")
    
70. (command "Undefine" "COPY")
    
71. )
    
72. Before the drawing is initialised, new definitions for LINE and COPY are defined. After
    
73. the drawing is initialised, the S::Startup function is called and the standard definitions of
    
74. LINE and COPY are undefined.
    
75.   [/FONT]
    

<br />   [FONT=courier new]<br /> Loading AutoLISP Files.<br /> Note!!<br /> One of the most important things to remember about loading AutoLisp Routines is to<br /> ensure that your Lisp files and any support files (i.e DCL Files; DAT Files; etc) are in your<br /> AutoCad search path. (I dedicate a directory to all my Lisp files and relevant support<br /> files.<br /> There are numerous ways of loading AutoLisp Files :<br /> Command Line Loading.<br /> The simplest is from the AutoCad command line.<br /> The syntax for loading AutoLisp files is :<br /> (load "filename")<br /> The.lsp extension is not required.<br /> Menu Loading.<br /> The following code samples are one way of loading AutoLisp files from a menu.<br /> Pull Down Menu's :<br /> ***POP12<br /> T_Steel [Steel Menu]<br /> T_Beams [Drawing Setup]^C^C^P+<br /> (cond ((null C:DDSTEEL) (prompt "Please Wait...")(load "DDSTEEL"))) DDSTEEL<br /> Toolbars :<br /> ***TOOLBARS<br /> **STEEL<br /> TB_DDSTEEL [_Button("Steel", "STEEL.bmp", "STEEL32.bmp")]^C^C^P+<br /> (cond ((null C:ddsteel) (prompt "Please Wait...")(load "ddsteel"))) ddsteel<br /> This method of loading Lisp files first checks to see if the routine is already loaded. If it<br /> is, it runs the routine. If it is not, it first loads the routine, then runs it. Clever Hey...<br /> AcadDoc.Lsp File.<br /> The AcadDoc.Lsp file is a useful way of loading a library of AutoLisp routines.<br /> Each time you start a drawing AutoCad searches the library path for an AcadDoc.Lsp<br /> file. If it finds one, it loads the file into memory.<br /> You could use the normal load function (load "filename") in your AcadDoc.Lsp file but if<br /> an error occurs whilst attempting to load one of your routines, the remainder of the file is<br /> ignored and is not loaded.<br /> Therefore, you must use the on failure argument with the load function :<br /> (load "Lispfile1" "\nLispfile1 not loaded")<br /> (load "Lispfile2" "\nLispfile2 not loaded")<br /> (load "Lispfile3" "\nLispfile3 not loaded")<br /> The .MNL File<br /> The other type of file that AutoCad loads automatically is the .MNL file.<br /> If you have a partial menu file it can also have it's own .MNL file.<br /> Just remember that the .MNL file must have exactly the same name as your partial menu<br /> file. (except for the .MNL extension, of course.)<br /> You can load Lisp files from this file using the load function exactly the same as you did<br /> in the AcadDoc.Lsp file.<br /> Command Autoloader<br /> When you automatically load a command from your AcadDoc.Lsp file (or a .MNL file) the<br /> commands definition consumes your systems resources whether you actually use the<br /> command or not. The Autoload function makes a command available without loading the<br /> entire routine into memory.<br /> (Autoload "Utils" '("Utils1" Utils2" "Utils3"))<br /> (Autoload "DDSteel" '("DDSteel"))<br /> This would automatically load the commands Utils1, Utils2 and Utils3 from the Utils.Lsp<br /> file and DDSteel from the DDSteel.Lsp file.<br /> S::Startup Function.<br /> If the user defined function S::Startup is included in the AcadDoc.lsp or a .MNL file,<br /> it is called when you enter a new drawing or open an existing drawing.<br /> e.g. Say that you wanted to override the standard AutoCad LINE and COPY commands<br /> with versions of your own, your AcadDoc.Lsp file would something like this :<br /> (defun C:LINE ()<br /> .....Your Definition.....<br /> )<br /> (defun C:COPY ()<br /> .....Your Definition.....<br /> )<br /> (defun S::Startup ()<br /> (command "Undefine" "LINE")<br /> (command "Undefine" "COPY")<br /> )<br /> Before the drawing is initialised, new definitions for LINE and COPY are defined. After<br /> the drawing is initialised, the S::Startup function is called and the standard definitions of<br /> LINE and COPY are undefined.<br />   [/FONT]<br />