codigo proporcionado por Armando