lisp line from one point

[joe]

Good morning, please as I could translate into lisp the following operation, which I must repeat all the time:
draw a line, from, median point, to @0,0,1.
Thank you.
Thursday

 

[GP.]

Hi, by curiosity how it ended then qui?

 

[joe]

I'm sorry, for reasons of work I didn't answer immediately and then I forgot.
Anyway tomorrow morning I'll try again and I'll tell you
hello good evening

 

[Cristallo]

You don't find the lisp for something like that.
you make a button (icon) to which you assign a macro.
Just look at the help to know how to make a macro.

 

[joe]

the lisp works perfectly, thank you.
However if I had the possibility first to select the group of objects where I want to look for that length, it would be better. Anyway, thank you. As for the lisp I requested yesterday, could you give me a little help?

 

[joe]

the repetitive operation to perform is as follows:
draw a mid-point line of the rectangle up to a determined height, for example 1000mm. Of course I get out of the rectangle plane with the "da" command and then type @,0,0,1000. and the macro should stop here