StartColourDefinition
  Dithering(Zero)
  LinearField(&FFFF,&A000)
  OneDimensionalStoreBufferTwo
  OneDimensionalStoreBufferOne
  CreateColoursUsingRGBData
EndColourDefinition

Seed(&27D)
Phase(&18)
NoiseToBeFiltered(&5D)
CreateTwoDimensionalFilter(Or(ShiftedNoise(&3BFD,&4F,&D7,&250),ShiftedNoise(&5A1E,&BD,&2AE,&223)))
TwoDimensionalTransform
CreateOneDimensionalFilter(QuickNoise(&E4B4,&67))
SmoothOneDimensionalTransform
OneDimensionalContrast(&A1)
VerticalDistortion(Overwrite)
TwoDimensionalEqualization
ScaledDithering(&4000)
MakeSprite
Checksum(&DE84)
End

