Topic: loading lisp routines

[danny]

I have my ACAD search path browsing to a folder which contains .lsp files and .mns file.  For some reason ACAD does not recognize the .lsp files.  How can I get this to work?

[Mark]

Do get any error messages? What if you drag-n-drop from windows explorer into acad? What command are you using to load the .lsp files?

[Kerry]

So this doesn't work ??

(findfile "TheHidingLispFile.lsp")

[danny]

mark,
if I use the appload command the files will work, but I've seen it done through the search path before.  The reason is because I don't want to load all lisp files in the startup or 1 by 1 when I need them.
kerry

(findfile "TheHidingLispFile.lsp")

??

[MP]

Unusual, I've never seen it return question marks before.

Is it possible the search path is too long?

What value is returned from this?

(strlen (getvar "acadprefix"))

[nivuahc]

Try putting this in your .MNL file (one for each lisp you want to load).

Code: [Select]

(defun C:LISP_COMMAND    () (prompt "\nLoading...") (load"path:/to/Lisp/Lisp_File")    (prompt "\nloaded.")(C:LISP_COMMAND))

For example, let's say I have a routine called OT that I store in my LISP folder on my C drive. The command that runs the routine is also OT so my line in my MNL file would look like this:

Code: [Select]

(defun C:OT      () (prompt "\nLoading...") (load"C:/LISP/OT")      (prompt "\nloaded.")(C:OT))

don't forget to use forward slashes (/)

[danny]

MP,
I got this

Code: [Select]

Command: (strlen(getvar"acadprefix"))
600
kerry,
Igot this

Code: [Select]

Command: (findfile"thehidinglispfile.lsp")
nil

[ELOQUINTET]

i only have this single file in my startup suite which will load whatever lisps i include. works great thanks to the smart peps here  

Code: [Select]

(defun danloader (/ filelst)

  (setq
    filelst
    (list
      "ADDEMUP.LSP"<<<<<<<INSERT YOUR LISPS HERE
      )
    )
  (setvar 'cmdecho 0)
  (foreach n filelst
           (if (not
                 (findfile n)
                 )
             (progn
               (prompt (strcat "\n" n " not found"))
               (princ)
               ); progn
             ;else
             (load n)
             ); if
           )
  (setvar 'cmdecho 1)
  (prompt "\nFiles Loaded.....")(princ)

  ); defun

[nivuahc]

That works too!

Mine loads them on demand.

[Kerry]

MP,
I got this

Code: [Select]

Command: (strlen(getvar"acadprefix"))
600
kerry,
Igot this

Code: [Select]

Command: (findfile"thehidinglispfile.lsp")
nil

uhm, Danny, replace the "thehidinglispfile.lsp" with the name of the file you want to find.
This will not load it, just returns the address if the file is found ...
If you get the address, then we can look at loading the file ..

[MP]

600 is reasonable, so that can be ruled out.

Now run this --

Code: [Select]

(progn
    (princ (getvar "acadprefix"))
    (princ)
)
What did it dump?

[danny]

MP,
That listed what was in my search path

Code: [Select]

Command: (progn(princ(getvar"acadprefix"))(princ))
C:\Documents and Settings\derek\Application Data\Autodesk\Autodesk
Architectural Desktop 2004\R16.0\enu\SUPPORT;C:\Program Files\Autodesk
Architectural Desktop 2004\SUPPORT;C:\Program Files\Autodesk Architectural
Desktop 2004\FONTS;C:\Program Files\Autodesk Architectural Desktop
2004\HELP;C:\Program Files\Autodesk Architectural Desktop
2004\EXPRESS;C:\Program Files\Autodesk Architectural Desktop
2004\SUPPORT\COLOR;C:\DOCUMENTS AND SETTINGS\ALL USERS\APPLICATION
DATA\AUTODESK\AUTODESK ARCHITECTURAL DESKTOP
2004\R16.0\ENU\LAYERS;C:\2004CADMENU\MENU;M:\_Cad Support\AutoCAD
2004\2004dannyCAD\MENU;G:\AutoCADD misc\lisp files\UCS&Crosshairs;

kerry,
that found the path

Code: [Select]

Command: (findfile"35.lsp")
"G:\\AutoCADD misc\\lisp files\\UCS&Crosshairs\\35.lsp"

[danny]

dan,
thanks for that, but I'm not sure how to run that?  Is that a .lsp file that I put in the startup?

[MP]

I believe the ampersand (&) in the path

G:\\AutoCADD misc\\lisp files\\UCS&Crosshairs

may be throwing the load function for a loop. I always advise our users to avoid directory and files names with embedded ampersands.

What happens if you rename the directory and modify the acadprefix variable accordingly?

[danny]

MP,
renamed path to G:\\AutoCADD misc\\lisp files\\UCS and reloaded in the search path.  Still doesn't reconize the .lsp files in that folder.  
I don't understand cause I have a folder with lisp in it which works fine.  If I put a new .lsp file in that folder, ACAD will not reconize it.