StartColourDefinition
  Seed(&1D)
  Phase(&2C)
  Dithering(&0)
  LinearField(&FFFF,&0)
  OneDimensionalStoreBufferTwo
  OneDimensionalStoreBufferOne
  CreateColoursUsingRGBData
EndColourDefinition

Seed(&79)
Phase(&2C)
NoiseToBeFiltered(&7B)
CreateTwoDimensionalFilter(Max(ShiftedNoise(&FFFF,&58,&1EA,&6DE),ShiftedNoise(&E000,&9A,&15A,&179)))
TwoDimensionalTransform
TwoDimensionalEqualization
Dithering(&2000)
MakeSprite
Checksum(&4FEA)
End
