StartColourDefinition
  Seed(&B)
  Phase(&2C)
  Dithering(&4000)
  DitheringOne(&4000)
  DitheringTwo(&4000)
  NoiseToBeFiltered(&FFFF)
  CreateOneDimensionalFilter(Noise(&4938,&4))
  OneDimensionalTransform
  OneDimensionalEqualization
  OneDimensionalStoreBufferTwo
  LinearField(&FCE3,&FFFF)
  OneDimensionalStoreBufferOne
  LinearField(&A748,&F560)
  CreateColoursUsingHSVData
EndColourDefinition

Seed(&84)
Phase(&2E)
NoiseToBeFiltered(&FFFF)
CreateCosineArtefacts(&FFFF)
CreateCosineSymmetry
CreateTwoDimensionalFilter(QuickNoise(&D405,&79))
TwoDimensionalTransform
TwoDimensionalEqualization
Dithering(Zero)
MakeSprite
Checksum(&78AC)
End

