Pessoal estou desenvolvendo um lisp e encontrei o seguinte problema; Tenho uma coordenada e preciso saber qual o poligono envolvente [.] mais proximo dela.

Com a função (setq VAR2(ssget "F" LISTA)), é possivel localizar a partir de dois pontos, os objetos que cruzam, no caso utilizei o ponto conhecido 0,0 e um numa coordendada desejada.

O erro esta quando existe um objeto sobreposto ao poligono envolvente, acabo selecionando o de cima, que foi o primeiro selecionado.

HELP