1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
|
#include "stdafx.h"
#include "PerlinNoise.h"
#include "Mth.h"
PerlinNoise::PerlinNoise(int levels)
{
Random random;
init(&random, levels);
}
PerlinNoise::PerlinNoise(Random *random, int levels)
{
init(random, levels);
}
void PerlinNoise::init(Random *random, int levels)
{
MemSect(2);
this->levels = levels;
noiseLevels = new ImprovedNoise *[levels];
for (int i = 0; i < levels; i++)
{
noiseLevels[i] = new ImprovedNoise(random);
}
MemSect(0);
}
PerlinNoise::~PerlinNoise()
{
for( int i = 0; i < levels; i++ )
{
delete noiseLevels[i];
}
delete [] noiseLevels;
}
double PerlinNoise::getValue(double x, double y)
{
double value = 0;
double pow = 1;
for (int i = 0; i < levels; i++)
{
value += noiseLevels[i]->getValue(x * pow, y * pow) / pow;
pow /= 2;
}
return value;
}
double PerlinNoise::getValue(double x, double y, double z)
{
double value = 0;
double pow = 1;
for (int i = 0; i < levels; i++)
{
value += noiseLevels[i]->getValue(x * pow, y * pow, z * pow) / pow;
pow /= 2;
}
return value;
}
doubleArray PerlinNoise::getRegion(doubleArray buffer, int x, int y, int z, int xSize, int ySize, int zSize, double xScale, double yScale, double zScale)
{
if (buffer.data == NULL) buffer = doubleArray(xSize * ySize * zSize);
else for (unsigned int i = 0; i < buffer.length; i++)
buffer[i] = 0;
double pow = 1;
for (int i = 0; i < levels; i++)
{
// value += noiseLevels[i].getValue(x * pow, y * pow, z * pow) / pow;
double xx = x * pow * xScale;
double yy = y * pow * yScale;
double zz = z * pow * zScale;
int64_t xb = Mth::lfloor(xx);
int64_t zb = Mth::lfloor(zz);
xx -= xb;
zz -= zb;
xb %= 16777216;
zb %= 16777216;
xx += xb;
zz += zb;
noiseLevels[i]->add(buffer, xx, yy, zz, xSize, ySize, zSize, xScale * pow, yScale * pow, zScale * pow, pow);
pow /= 2;
}
return buffer;
}
doubleArray PerlinNoise::getRegion(doubleArray sr, int x, int z, int xSize, int zSize, double xScale, double zScale, double pow)
{
return getRegion(sr, x, 10, z, xSize, 1, zSize, xScale, 1, zScale);
}
|
