StartColourDefinition
  Dithering(Zero)
  LinearField(&D2A2,&1)
  OneDimensionalStoreBufferTwo
  OneDimensionalStoreBufferOne
  CreateColoursUsingRGBData
EndColourDefinition

Seed(&79)
Phase(&35)
NoiseToBeFiltered(&7D)
CreateTwoDimensionalFilter(Or(ShiftedFractalNoise(&DD24,&203,Noise(&DE5,&FEC),Noise(&10B7,&2EC1)),ShiftedNoise(&4247,&115,&814E,&1393)))
TwoDimensionalTransform
TwoDimensionalEqualization
Dithering(Zero)
MakeSprite
Checksum(&6715)
End

