Função Colisao

Foi minimamente testada.
Alguma reorganização do código