How do I code the following to a command macro?

I would like to toggle the leader command dialog box for settings and draw
the leader, all in one shot. These are the keyboard entries for the
commands.

For splined leader w/ Mtext:

LE;S;ALT+M,ALT+W,CNTRL+TAB,ALT+P,SHIFT+TAB,3,CNTRL+TAB,
(DOWN ARROW KEY), TAB,(UP ARROW KEY);

For splined leader w/ Object Copy:

LE;S;ALT+C,CNTRL+TAB,ALT+P,SHIFT+TAB,3;

These entries set the leader dialog box from the key board. I would like to
code these in command line macro's and add it to a tool palette.

Could someone assist me with this please?
Is this possible?

 

Quick and easy answer: not possible

Can be done with some AutoLISP. I have code at work I could post tomorrow. Pretty sure I found it on here and tweaked it to suit my needs.

 

After some more research, it looks like the dialog toggling is with windows
accelerator keys. I just don't know if it possible to instruct ACAD to use
these keys. I would like to learn how to do this in LISP, but I'm
inexperienced.

 

Rick,

I don't mean to discourage you. But to do what you want via LISP involves modifying
dotted pair DXF codes in a dictionary.

Do a Goggle search on this NG for (acet-ql-get) by Frank Whaley. His code and
comments will give you an idea about what's involved.

Joe Burke

 

Here's part of my script file that installs our dimension style. It is a 3 point leader with the second line set to horizontal. There is also no annotation. This is along the line that you'll need to get what you want (with modification).

Code:

(setq QLIS (dictsearch (namedobjdict) "AcadDim"))
(setq QLIS (subst (cons 60 4) (assoc 60 QLIS) QLIS))
(setq QLIS (subst (cons 67 3) (assoc 67 QLIS) QLIS))
(setq QLIS (subst (cons 71 1) (assoc 71 QLIS) QLIS))
(setq QLIS (subst (cons 170 1) (assoc 170 QLIS) QLIS))
(entmod QLIS)