Untitled Page

Noise object

'implementation of improved perlin

Sub Init()
'not needed, but can be used for reseeding the randomness.

Function Noise1D(ByVal x As Single) As Single

Function Noise2D(ByVal x As Single, ByVal y As Single) As Single

Function Layered1D(ByVal x As Single, ByVal y As Single) As Single

Function Layered2D(ByVal x As Single, ByVal y As Single) As Single

Function Layered3D(ByVal x As Single, ByVal y As Single, ByVal z As Single) As Single

Function Noise3D(ByVal x As Single, ByVal y As Single, ByVal z As Single) As Single

Property Let Octaves(ByVal octs As Single)

Property Get Octaves() As Single

Property Let SpotSize(ByVal spt_sz As Single)

Property Get SpotSize() As Single

Sub FillBuf2D(buf(), ByVal frequency As Single, ByVal low As Single, ByVal high As Single)