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

Seed(&79)
Phase(&2C)
NoiseToBeFiltered(&7B)
CreateTwoDimensionalFilter(BandpassNoise(&2B67,&1E8,&2F0))
SmoothTwoDimensionalTransform
TwoDimensionalEqualization
Dithering(&4000)
MakeSprite
Checksum(&DCAF)
End







