StartColourDefinition
Seed(&1D)
Phase(&2C)
Dithering(&2000)
NoiseToBeFiltered(&FFFF)
LinearField(&3FFF,&111)
OneDimensionalStoreBufferTwo
LinearField(&FFFF,&F000)
OneDimensionalStoreBufferOne
LinearField(&FFFF,&7700)
CreateColoursUsingHSVData
EndColourDefinition

Seed(&79)
Phase(&2C)
NoiseToBeFiltered(&7B)
CreateTwoDimensionalFilter(ShiftedSymmetricFractalNoise(&CACA,&ED,&259,&147))
TwoDimensionalTransform
TwoDimensionalEqualization
Dithering(&3000)
MakeSprite
Checksum(&A36D)
End







