Changed apple value and shortened modulo function abit