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

Seed(&FA95)
Phase(&2B)
NoiseToBeFiltered(&D248)
TwoDimensionalClear
StartMutating
CreateOneDimensionalFilter(QuickNoise(&AFF6,&12EA))
SmoothOneDimensionalTransform
OneDimensionalEqualization
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(QuickNoise(&FFF6,&EA))
SmoothOneDimensionalTransform
StopMutating
OneDimensionalProcess(&0,&FFFF,OneDimensionalPoint(LogicalShiftLeft(X,&1)),Overwrite)
OneDimensionalEqualization
OneDimensionalStoreBufferTwo
LinearField(&FFFF,&FFFF)
Radials(&FFFF,&8000,&0,&0,UnboundedAddition,Maximise)
|
StartMutating
CreateOneDimensionalFilter(QuickNoise(&AFF6,&12EA))
SmoothOneDimensionalTransform
OneDimensionalEqualization
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(QuickNoise(&FFF6,&EA))
SmoothOneDimensionalTransform
StopMutating
OneDimensionalProcess(&0,&FFFF,OneDimensionalPoint(LogicalShiftLeft(X,&1)),Overwrite)
OneDimensionalEqualization
OneDimensionalStoreBufferTwo
LinearField(&FFFF,&FFFF)
Radials(&FFFF,&7000,&0,&0,Overwrite,Overwrite)
|
LinearField(&0,&FFFF)
|Ripples(&FFFF,&4000,&0,&0,Minimise)
TwoDimensionalEqualization
Dithering(Zero)
MakeSprite
Checksum(&3833)
End

