Search block on polyline

[llmb0611]

Hi. I'm trying to find a lisp routine that would solve my problem. I have a lot of polylines, and each polyline should have one block placed on a midpoint (doesn't matter where, it just has to be midpoint). But when I select all polylines and blocks I don't have the same number. So now I should search for polylines that maybe have 2 or more blocks on one polyline, and polylines that don't have any blocks placed on them. Is that even possible? Thank you. If needed I can place a sample file. 

[hosneyalaa]

Can you attached example drawing 

[llmb0611]

Here's a sample file. In the sample green lines are ok. They have a block placed on midpoint.

The red lines are not ok. One has a block near the polyline, and one polyline doesn't have a block. 

sample.dwg

[llmb0611]

here's a new sample file. I added one more polyline that contains 2 blocks. that's also not ok.

sample.dwg

[Steven P]

Is the block insert point (generally point 0,0 in the block) on the polyline, or very close to it or does the placed on a polyline mean any part of the block overlaps the polyline?

 

 

This might be a starting point (weekend, CAD is off so have to come back to this)

 

 

 

 

[BIGAL]

Using (SSGET "F" pts) this should find any object that touches or crosses a pline, the pts are the pline vertices. Obviously depend on the block.