Topic: Run a command as if from the command line

[hmspe]

I'm working on a routine that needs to run the MIRROR command in the middle of a lisp function.  Rather than simulating all the calls and data gathering then using (command "mirror" .... ) where I pass in the the previously gathered data I'd like to find a way to have my routine call the mirror function and let it run as a command line function (prompting for input, etc.), then returning control to my lisp function.  Is there a way to do this?

[Kerry]

Try something like :

Code - Auto/Visual Lisp: [Select]

1. (defun c:doit ()
2.   (apply 'vl-cmdf (list "_.MIRROR"))
3.   (while (> (getvar "cmdactive") 0) (vl-cmdf pause))
4.  
5.   (setq success (getstring t "Say What"))
6.   (alert (strcat "We got to here\n" success))
7.   (princ)
8. )

[hmspe]

Thanks.

[Kerry]

de nada

[Lee Mac]

A minor point, but:

Code - Auto/Visual Lisp: [Select]

1. (apply 'vl-cmdf (list "_.MIRROR"))

Could just be:

Code - Auto/Visual Lisp: [Select]

1. (vl-cmdf "_.mirror")

[David Bethel]

You may also want set CMDECHO to 1.  Otherwise you could be flying blind   

[Kerry]

A minor point, but:

Code - Auto/Visual Lisp: [Select]

1. (apply 'vl-cmdf (list "_.MIRROR"))

Could just be:

Code - Auto/Visual Lisp: [Select]

1. (vl-cmdf "_.mirror")

I'm in the habit of doing it my way because I often pass arguments in the list.
Sort of comes second nature to set up for the extended functionality.
//=================

You may also want set CMDECHO to 1.  Otherwise you could be flying blind   

yes

[Lee Mac]

A minor point, but:

Code - Auto/Visual Lisp: [Select]

1. (apply 'vl-cmdf (list "_.MIRROR"))

Could just be:

Code - Auto/Visual Lisp: [Select]

1. (vl-cmdf "_.mirror")

I'm in the habit of doing it my way because I often pass arguments in the list.
Sort of comes second nature to set up for the extended functionality.

I'm not sure I follow - surely arguments could still be passed using the single vl-cmdf statement?

Code - Auto/Visual Lisp: [Select]

1. (vl-cmdf "_.mirror" arg1 arg2 ... argN)