StartColourDefinition
  Seed(&4)
  Dithering(&4000)
  DitheringOne(&1000)
  DitheringTwo(&4000)
  LinearField(&7632,&E49)
  OneDimensionalStoreBufferTwo
  LinearField(&FC87,&39AA)
  OneDimensionalStoreBufferOne
  LinearField(&FA9A,&5720)
  CreateColours(HSV)
EndColourDefinition

Seed(&A6A2)
Phase(&1F)
NoiseToBeFiltered(&8B8A)
CreateOneDimensionalFilter(Noise(Noise(&7E4E,&171),&171))
OneDimensionalTransform
OneDimensionalEqualization
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(FractalNoise(Noise(&7E4E,&171),&22))
SmoothOneDimensionalTransform
HorizontalWaveWarp(Overwrite)
OneDimensionalContrast(&16E)
VerticalWaveWarp(SimpleAddition)
TwoDimensionalEqualization
Dithering(&4000)
MakeSprite
Checksum(&22E2)
End

