AutoLISP function to move selected text to them nearest point or vertex where the text is not intersected by a single line

[nemanja.kantar]

Hi, is it possible to create this LISP function, it's a bit complicated for me to explain this.
In this case, numbers should be selected and moved to the nearest point or vertex, and when moved, the text should not intersect any lines or polygons. Moving isn't that much of a problem, but the latter is.

My idea is to create a rectangle around the text using the TCIRCLE function and then move the rectangle along the edge of the circle (where the center of the circle is the moving point) of some radius until it is not intersected by lines, if there is no such place then the radius increases by some value, it doesn't matter which one.

Anyway, maybe I'm asking to much let me know guys if you have a suggestion. 

THANKS

[pbejse]

Will there be any objects outside the polygon? so i take it the best location is inside? 

[nemanja.kantar]

Yes, there will be lines and polylines that connect back to those points. In this case from screenshot, every point have two lines that text must avoid. It would be ideal if he would place it in the first place that is available to him in terms of width, for example a meter from the point.

Something like this...

[Sea-Haven]

Also posted here https://www.cadtutor.net/forum/topic/88192-autolisp-functio-to-move-selected-text-to-them-nearest-po...

I can see a problem with point 15 may need a moved point to far away so try outside rather than in. 

[pbejse]

---

@Sea-Haven wrote:

I can see a problem with point 15 may need a moved point to far away so try outside rather than in. 

---

Thats true

@nemanja.kantar 

At point 17, there appears to be  3 closed polygons intersecting at the same point, can you confirm that these are closed polylines?

[nemanja.kantar]

Yes, i think that doesn’t matter are they closed polygons. It may be lines too… 

For point 15 i move manualy.

[Sea-Haven]

If have lines & Plines making shape then need to select inside the shape and use Bpoly to make a new pline for the text searching, working on something.