AutoCad - Rutina lsp de superficie

Buenas, necesitaria una rutina de autolisp para que al picar sobre una polilinea cerrada o un espacio delimitado me calcule la superficie, y el dato se guarde en el portapapeles, para despues pegarlo en un cuadro de texto.
O algo similar a esto.
Gracias

Yo tambien necesitaria esa rutina y que alguien nos contara como podemos hacerlo, gracias

A ver. Si ponéis la orden "list" y seleccionais la polilinea os aparece la ventana de texto de autocad con los datos de la polilinea, entre ellos el area.Copias y pegáis.Otra cosa es que querias automatizar el proceso de otra manera.

Saludos,

NAcho

Pd : he generado una aplicación que al pincharle una polilinea os genera un cuadro de coordenadas, os inserta un punto y su numero de punto y os da el área : eso sí: hace todo esto en autocad.

Proximamente te envio a tu correo una rutina para esta utilidad

esta macro la puedes usar en un boton o en una orden de menu, funciona tambien en acadLT, y si le pones un asterisco al principio la repite sin salir de la orden.

^C^C_area;o;\texto;\;;$M=$(rtos,$(getvar,area));