Topic: New user to 2008 from 2002 - lisp question

[rktect3j]

I tried to load a lisp routine but it just wont work.  I am hoping this has nothing to do with that .cui thingy as I don't know squat about it.  I went to tools, autolisp, load application.  Found the lisp, placed it in the suitcase and loaded it.  closed and reopened autocad and typed in the dos command and in return I got "unknown command"

Should be simple, right?

[ronjonp]

Drag it into your screen and see if it works....if it does then you startup suite has issues.

[rktect3j]

That don't make a lick of sense, so I did it anyways.  Still nothing happened.  It's just a simple routine that puts the command zoom and extents together with a ZE command.

[deegeecees]

Could you post the Lisp File?

[rktect3j]

;**********************************ZE.LSP***************************************
; Written by:
; Date:
;
; This function will zoom the drawing to the "Virtual Screen" size.
;

(defun l:ZE ()
   (setvar "cmdecho" 0)
   (command "'ZOOM" "W" (getvar "VSMIN") (getvar "VSMAX"))
(prin1)
)
;*******************************END ZE.LSP*************************************

[rktect3j]

I don't write these things but I do enjoy using them.  This is one I use all the time and it should have been super simple compared to the rest of the ones I want to load.

[LE]

Change the I:ZE to C:ZE

also, give a try to a double click(on the scroll button) on the screen and see if you get the zoom extents.

[rktect3j]

Well, now its even odder since it does something it shouldn't be doing.  If I type "z" enter and then "e" enter I will get zoom extents.  Now when i type "ZE" enter I zoom way farther back then the actual extents.  :ugly:  :pissed:

[rktect3j]

;**********************************ZE.LSP***************************************
; Written by:
; Date:
;
; This function will zoom the drawing to the "Virtual Screen" size.
;

(defun l:ZE ()
   (setvar "cmdecho" 0)
   (command "'ZOOM" "W" (getvar "VSMIN") (getvar "VSMAX"))
(prin1)
)
;*******************************END ZE.LSP*************************************

Should this read (command "'zoom" "e".... instead of "w"?

[LE]

(defun C:ZE ()
   (setvar "cmdecho" 0)
   (command "'ZOOM" "W" (getvar "VSMIN") (getvar "VSMAX"))
(prin1)
)


and load the above code again, and try ZE

[rktect3j]

(defun C:ZE ()
   (setvar "cmdecho" 0)
   (command "'ZOOM" "W" (getvar "VSMIN") (getvar "VSMAX"))
(prin1)
)


and load the above code again, and try ZE

I did the change to C:ZE and got what seems to be a zoom to somewhere beyond extents???  So I thought maybe the "w" should maybe be "e"

[LE]

You need to load the lisp again.... that's why is not working.

[LE]

Or copy the lisp code from the first "(" to the last ")" and paste it in your command line.... HTH

[rktect3j]

It's working now.  Thanks.