StartColourDefinition
  Dithering(&2)
  LinearField(&524A,&8C17)
  OneDimensionalStoreBufferTwo
  LinearField(&9520,&E6ED)
  OneDimensionalStoreBufferOne
  LinearField(&5DA2,&B4F5)
  CreateColoursUsingRGBData
EndColourDefinition

Seed(&9B82)
Phase(&13)
NoiseToBeFiltered(&E30C)
CreateOneDimensionalFilter(QuickNoise(QuickNoise(&82F3,&FF0),&A0))
OneDimensionalTransform
OneDimensionalEqualization
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(FractalNoise(QuickNoise(&90D9,&994),&19B))
SmoothOneDimensionalTransform
HorizontalWaveWarp(Overwrite)
VerticalShear(&1,Overwrite)
HorizontalShear(&1,Overwrite)
VerticalWaveWarp(SimpleAddition)
HorizontalShear(&FFFE,Overwrite)
TwoDimensionalEqualization
MakeVirtualSprite(Overwrite,Overwrite,Overwrite)
Percentage(&1)
CreateTwoDimensionalFilter(FractalNoise(Or(ShiftedNoise(&714E,&5FF,&DE,&163),ShiftedNoise(&A58,&934,&88,&8C)),&33))
SmoothTwoDimensionalTransform
TwoDimensionalEqualization
ResizeBumpMap(True,True)
SetColour(RGB,&8F0A,&6CF7,&E42F)
DefineLightSource(Gourad,&4CB5,&A07C)
SetColour(RGB,&888A,&CBDA,&2280)
DefineLightSource(Gourad,&B1CD,&E35C)
ShineLightOnVirtualSprite
Percentage(&40)
Dithering(FloydSteinberg)
MakeSpriteFromVirtualSprite
Checksum(&785)
End

