StartColourDefinition
  Seed(&9)
  Phase(&36)
  Dithering(&0)
  NoiseToBeFiltered(&C661)
  LinearField(&D2AA,&3)
  OneDimensionalContrast(&8D5)
  OneDimensionalStoreBufferTwo
  LinearField(&F42B,&AEA1)
  OneDimensionalStoreBufferOne
  LinearField(&77DC,&E70E)
  CreateColoursUsingHSVData
EndColourDefinition

Seed(&84)
Phase(&2B)
NoiseToBeFiltered(&FE24)
Percentage(&0)
CreateTwoDimensionalFilter(QuickNoise(&FFFF,&72))
TwoDimensionalTransform
For(&10)
  AddToPercentage(&5)
  CreateOneDimensionalFilter(FractalNoise(&36CE,&2C))
  SmoothOneDimensionalTransform
  HorizontalDistortion(Overwrite)
  CreateOneDimensionalFilter(FractalNoise(&3003,&20))
  SmoothOneDimensionalTransform
  VerticalDistortion(Overwrite)
Next
TwoDimensionalEqualization
Dithering(&200)
MakeSprite
Checksum(&68E8)
End

