I might actually have the perlin noise zoom function working