StartColourDefinition
  Dithering(&0)
  LinearField(&FFFF,&2333)
  OneDimensionalStoreBufferTwo
  OneDimensionalStoreBufferOne
  LinearField(&0,&1FFF)
  CreateColoursUsingRGBData
EndColourDefinition

Seed(&699D)
Phase(&22)
NoiseToBeFiltered(&8E6F)
CreateOneDimensionalFilter(QuickNoise(&B99C,&D6))
OneDimensionalTransform
OneDimensionalEqualization
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(FractalNoise(&DE4D,&39))
SmoothOneDimensionalTransform
OneDimensionalContrast(&378)
HorizontalWaveWarp(Overwrite)
VerticalShear(&1,Overwrite)
HorizontalShear(&0,Overwrite)
CreateOneDimensionalFilter(Noise(&9860,&164))
SmoothOneDimensionalTransform
OneDimensionalEqualization
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(Noise(&68C6,&FE))
SmoothOneDimensionalTransform
OneDimensionalContrast(&1D0)
VerticalWaveWarp(SimpleAddition)
HorizontalShear(&FFFD,Overwrite)
CreateOneDimensionalFilter(Noise(&B090,&F8))
SmoothOneDimensionalTransform
OneDimensionalEqualization
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(Noise(&CB90,&139))
SmoothOneDimensionalTransform
OneDimensionalContrast(&222)
HorizontalWaveWarp(SimpleAddition)
HorizontalShear(&2,Overwrite)
|
StopMutating
DefineSolidBlock(TwoDimensionalPoint(Add(Y,Z),X))
Sculpture(ScaledMultiply(Cos(X),Cos(Y)),Sin(Y),Combine(ScaledMultiplication,Sin(X),Cos(Y)))
|
Dithering(&2A45)
MakeSprite
Checksum(&F0CB)
End
