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

Seed(&79)
Phase(&2C)
NoiseToBeFiltered(&7B)
CreateCosineArtefacts(&639C)
CreateTwoDimensionalFilter(Combine(CeilingAddition,Combine(CeilingAddition,ShiftedNoise(&383C,&16C,&121,&17B),ShiftedNoise(&5556,&187,&1C5,&E9)),ShiftedNoise(&3EA9,&100,&1AA,&1A7)))
TwoDimensionalTransform
TwoDimensionalEqualization
VerticalShear(&1,Overwrite)
Dithering(&2000)
MakeSprite
Checksum(&FAA4)
End

