home *** CD-ROM | disk | FTP | other *** search
- StartColourDefinition
- Dithering(&0)
- LinearField(&FFFF,&A000)
- OneDimensionalStoreBufferTwo
- OneDimensionalStoreBufferOne
- CreateColoursUsingRGBData
- EndColourDefinition
-
- Seed(&699D)
- Phase(&1A)
- NoiseToBeFiltered(&949F)
- CreateOneDimensionalFilter(QuickNoise(&D37A,&F8))
- OneDimensionalTransform
- OneDimensionalEqualization
- OneDimensionalStoreBufferOne
- CreateOneDimensionalFilter(FractalNoise(&BCFE,&2E))
- SmoothOneDimensionalTransform
- OneDimensionalContrast(&419)
- HorizontalWaveWarp(Overwrite)
- VerticalShear(&2,Overwrite)
- HorizontalShear(&1,Overwrite)
- CreateOneDimensionalFilter(Noise(&81B0,&168))
- SmoothOneDimensionalTransform
- OneDimensionalEqualization
- OneDimensionalStoreBufferOne
- CreateOneDimensionalFilter(Noise(&7EFA,&E5))
- SmoothOneDimensionalTransform
- OneDimensionalContrast(&20C)
- VerticalWaveWarp(SimpleAddition)
- HorizontalShear(&FFFC,Overwrite)
- CreateOneDimensionalFilter(Noise(&C901,&10B))
- SmoothOneDimensionalTransform
- OneDimensionalEqualization
- OneDimensionalStoreBufferOne
- CreateOneDimensionalFilter(Noise(&F4DB,&102))
- SmoothOneDimensionalTransform
- OneDimensionalContrast(&1D4)
- HorizontalWaveWarp(SimpleAddition)
- HorizontalShear(&3,Overwrite)
- If IsLessThanOrEqualTo(LogBitsPerPixel,&2) Then Dithering(&4000) Else If IsEqualTo(LogBitsPerPixel,&3) Then Dithering(&2000) Else Dithering(&0)
- MakeSprite
- Checksum(&7F8D)
- End
-