StartColourDefinition
  StopAnimating
  Seed(&1B)
  Phase(&2C)
  Dithering(&5000)
  DitheringOne(&5000)
  DitheringTwo(&5000)
  CreateOneDimensionalFilter(QuickNoise(&FBB4,&F3))
  OneDimensionalTransform
  OneDimensionalEqualization
  OneDimensionalStoreBufferTwo
  LinearField(&7D7F,&FEFF)
  OneDimensionalStoreBufferOne
  LinearField(&FF63,&9F3F)
  CreateColours(HSV)
StartAnimating
EndColourDefinition

Seed(&B)
Phase(&2C)
TwoDimensionalClear
CreateOneDimensionalFilter(QuickNoise(&C0DA,&1C0))
OneDimensionalTransform
HorizontalWaves(SimpleAddition)
VerticalShear(&2,Overwrite)
CreateOneDimensionalFilter(QuickNoise(&BBED,&106))
OneDimensionalTransform
HorizontalWaves(SimpleAddition)
VerticalShear(&FFFF,Overwrite)
TwoDimensionalEqualization
Dithering(&A)
MakeSprite
Checksum(&7DB7)
End

