StartColourDefinition
  Dithering(&0)
  LinearField(&FFFF,&0)
  OneDimensionalStoreBufferTwo
  OneDimensionalStoreBufferOne
  CreateColours(RGB)
EndColourDefinition

|
| Turbulence demonstartion
|
Seed(&B)
Phase(&39)
NoiseToBeFiltered(&E8A1)
Percentage(&0)
CreateOneDimensionalFilter(QuickNoise(&E5CB,&14BF))
OneDimensionalTransform
HorizontalWaves(Overwrite)
VerticalShear(&1,Overwrite)
CreateOneDimensionalFilter(QuickNoise(&B50F,&E6))
OneDimensionalTransform
HorizontalWaves(SimpleAddition)
For(&10)
  AddToPercentage(&6)
  CreateOneDimensionalFilter(FractalNoise(&C5FF,&44))
  SmoothOneDimensionalTransform
  HorizontalDistortion(Overwrite)
  CreateOneDimensionalFilter(FractalNoise(&F63A,&34))
  SmoothOneDimensionalTransform
  VerticalDistortion(Overwrite)
Next
TwoDimensionalEqualization
ScaledDithering(&4000)
MakeSprite
Checksum(&B3D3)
End

