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

Seed(&2642)
Phase(&2A)
NoiseToBeFiltered(&A45C)
CreateOneDimensionalFilter(QuickNoise(QuickNoise(QuickNoise(&94CB,&AF),&BF),&F6))
OneDimensionalTransform
OneDimensionalEqualization
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(QuickNoise(QuickNoise(&BF52,&108),&107))
SmoothOneDimensionalTransform
OneDimensionalContrast(&3DC)
HorizontalWaveWarp(Overwrite)
VerticalShear(&3,Overwrite)
HorizontalShear(&2,Overwrite)
CreateOneDimensionalFilter(Noise(QuickNoise(QuickNoise(&953F,&C6),QuickNoise(&C05D,&9F)),&15D))
SmoothOneDimensionalTransform
OneDimensionalEqualization
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(QuickNoise(QuickNoise(QuickNoise(QuickNoise(&CF87,&B7),&10E),&DA),&10E))
SmoothOneDimensionalTransform
OneDimensionalContrast(&1BE)
VerticalWaveWarp(SimpleAddition)
HorizontalShear(&FFFF,Overwrite)
CreateOneDimensionalFilter(Noise(QuickNoise(QuickNoise(&9499,&C9),QuickNoise(&B1D1,&A9)),&A4))
SmoothOneDimensionalTransform
OneDimensionalEqualization
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(QuickNoise(QuickNoise(&9F6A,&AF),&106))
SmoothOneDimensionalTransform
OneDimensionalContrast(&20A)
HorizontalWaveWarp(SimpleAddition)
HorizontalShear(&FFFE,Overwrite)
|
StopMutating
DefineSolidBlock(TwoDimensionalPoint(Add(Y,Z),X))
Sculpture(ScaledMultiply(Cos(X),Sin(LogicalShiftRight(Y,&1))),Cos(LogicalShiftRight(Y,&1)),Combine(ScaledMultiplication,Sin(X),Sin(LogicalShiftRight(Y,&1))))
Dithering(&2A4)
MakeSprite
Checksum(&11E7)
End
