StartColourDefinition
  Seed(&1D)
  Phase(&36)
  Dithering(&800)
  LinearField(&37EF,&D2)
  OneDimensionalStoreBufferTwo
  LinearField(&D87A,&FBF8)
  OneDimensionalStoreBufferOne
  LinearField(&E2C8,&7C4E)
  LinearSegment(&0,&7FF,&0,&0,Overwrite)
  CreateColoursUsingHSVData
EndColourDefinition

Seed(&FA95)
Phase(&2B)
NoiseToBeFiltered(&D248)
TwoDimensionalClear
CreateOneDimensionalFilter(QuickNoise(&D82A,&13EF))
SmoothOneDimensionalTransform
OneDimensionalEqualization
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(QuickNoise(&AFF6,&1EA))
SmoothOneDimensionalTransform
StopMutating
OneDimensionalProcess(&0,&FFFF,OneDimensionalPoint(LogicalShiftLeft(X,&1)),Overwrite)
OneDimensionalEqualization
OneDimensionalStoreBufferTwo
LinearField(&FFFF,&FFFF)
Radials(&FFFF,&8000,&0,&0,UnboundedAddition,Maximise)
LinearField(&0,&0)
Ripples(&FFFF,&2000,&0,&0,Minimise)
TwoDimensionalEqualization
Dithering(Zero)
MakeSprite
Checksum(&923C)
End

