How can I create a lisp protected file.

[Arben.Allaraj]

Hello all.

I want to protect a lisp file with suffix .lsp.
How can I do it.

Thanks for suggestion.

[rkmcswain]

If maintaining the .LSP file extension is a requirement, then grab protect.exe. It will "compile" a .lsp file, leaving the file extension the same. Note that unprotect.exe is readily available also.

If you really just want to compile it (in a much more protected manner) and the file extension is not important, then compile the LSP file to FAS using the (vlisp-compile) function. -or- compile the a .VLX file using the Make Application tools in the VLIDE. (details on how to do both are available in HELP)

[stephen.coff]

Well it's not often tht I can assist with anything though here goes.
I was wanting the exact same thing and decided to try write a routine that would convert the files to a ".fas" file for me. My attempt is below:

(defun c:FAS (/ name lispname outfilename findfas rewritefas)
  (setvar "cmdecho" 0)
  (setq name (strcase (getstring "Enter Lisp Name: ")))
  (setq lispname 
         (strcat "S:\\DSA CAD\\Lisp for AutoCad\\Used LISp Files\\" 
                 name 
                 ".LSP"
         ) ;_end strcat
  ) ;_end setq
  (setq	outfilename
	 (strcat "S:\\DSA CAD\\Lisp for AutoCad\\Used LISp Files\\FAS Files\\"
		 name
		 ".FAS"
	 ) ;_end strcat
  ) ;_end setq
  (setq findfas (findfile outfilename))
  (if (not findfas)
    (vlisp-compile 'st lispname outfilename)
    (progn
      (initget "Y N")
      (setq rewritefas
	     (getkword "Save Over Existing FAS? [Yes or No]: ")
      ) ;_end setq
      (if (= rewritefas "Y")
	(vlisp-compile 'st lispname outfilename)
	(alert "FAS Compiling Aborted")
      ) ;_end if
    ) ;_end progn
  ) ;_end if
  (setvar "cmdecho" 1)
  (princ)
) ;_end defun

So just save the file and load the routine. Type "FAS" and then just the lisp file name without the extension.
Oh that reminds me, change the folder locations for the variables lispname & outfilename to your own directory paths.

Stephen

[Arben.Allaraj]

If maintaining the .LSP file extension is a requirement, then grab
protect.exe. It will "compile" a .lsp file, leaving the file extension the same. Note that unprotect.exe is readily available also.

If you really just want to compile it (in a much more protected manner) and the file extension is not important, then compile the LSP file to FAS using the (vlisp-compile) function. -or- compile the a .VLX file using the Make Application tools in the VLIDE. (details on how to do both are available in HELP)

Thanks for the answer.
This file work in DOS Mode but function.

[josea_diazm]

Hi I try to do your sample, bat I get an error:
; error: no function definition: VLISP-COMPILE

Do you know why?

Thanks...

[rkmcswain]

Hi I try to do your sample, bat I get an error:
; error: no function definition: VLISP-COMPILE

Do you know why?

Thanks...

you may need to run (vl-load-com) first

[josea_diazm]

Thanks,
I try to run both:
(vl-load-com) first
and then de function (VLISP-COMPILE), bat the error is the same.

Im wait.

[alanjt]

Thanks,
I try to run both:
(vl-load-com) first
and then de function (VLISP-COMPILE), bat the error is the same.

Im wait.

Run (vl-load-com) once, then execute FAS.

[josea_diazm]

Thanks...
--------------------------------------------------
Command: (vl-load-com)
Command: FAS
Enter Lisp Name: IGUALQUE
; error: no function definition: VLISP-COMPILE
Command:
--------------------------------------------------
What's wrong?, my program?, i don't know.
Thanks...

[alanjt]

What does AutoCad return when you paste this into the commandline:

(member "vl.arx" (arx))

What version of acad are you running?