Working perlin noise

Thank god for the internet.  Now that i'm looking at the source code,
this shit is crazy