Primeira versão.

Loop com problemas e código extenso :D