Delete everything inside circles

[stephenwFKTB4]

Hi, 

i have a lisp routine to trim scribe lines and add circles but i need something to select everything inside the yellow circle and delete it, then delete the circle. 

i have  the code to select all my circles but am struggling with the rest

(if (setq ss (ssget "_X" '((0 . "CIRCLE") (8 . "TEXT"))))
    (progn ; then
	(repeat (setq n (sslength ss))
		(setq
          cir (ssname ss (setq n (1- n)))
		)
	
	)
	  ); progn
	)

 i attached the whole code and the dxf i am working with

thanks

[paullimapa]

This thread may point you in the right direction to select objects inside a circle 

[Sea-Haven]

I  think this will do what you want, select circle select inside.

Need to add delete circle, but should be there to remember the object selected. Maybe line 703.

[stephenwFKTB4 · Accepted solution]

Thanks guys,  while trying to get those suggestions to work i figured out i could just use a rectangle since i will only ever need to select those 5 lines.