[QUOTE=SilverWarior;95468]you only need to set the seed once. changing the seed will change everything and you will never get the chunks to match;
Perlin01.jpgCode:for y:=0 to height-1 do begin for x:=0 to width-1 do begin vNoise:=PerlinNoise2d(x+vOffsetX,y+vOffsetY,Persistence,Frequency,Octaves);// Noise is -1 to 1; vColor:=NoiseToColor(vNoise); //Clamp Color values to MinMax 0,255 because Noise isn't perfect. Map(x,y):=vColor; //do not use multi dementional arrays for bitmaps must be a single block of memory. end; end;
Bookmarks