For h2:ht=EachIn min_h_list If h2.x>h.x-1 And h2.x<h.x+1 And h2.y>h.y-1 And h2.y<h.y+1 min_h_list.remove(h2) EndIf Next For h2:ht=EachIn max_h_list If h2.x>h.x-1 And h2.x<h.x+1 And h2.y>h.y-1 And h2.y<h.y+1 max_h_list.remove(h2) EndIf Next
OK - there was a lot of code but narrowed it down -
both lists contain the same type, and it doesn crash if you comment out one or other of these loops (i.e: they both work individually.)