vou ali gastar 15 minutos ajustando uma rotina num programa da @MadameSandra
(sim, eu sei que nunca são só 15 minutos