home *** CD-ROM | disk | FTP | other *** search
- StartColourDefinition
- Dithering(&0)
- LinearField(&FFFF,&A000)
- OneDimensionalStoreBufferTwo
- OneDimensionalStoreBufferOne
- CreateColoursUsingRGBData
- EndColourDefinition
-
- Seed(&ED61)
- Phase(&30)
- NoiseToBeFiltered(&14)
- CreateTwoDimensionalFilter(Or(ShiftedNoise(&5E96,&AF,&2A5,&46),ShiftedNoise(&1C7E,&31,&89,&6A)))
- TwoDimensionalTransform
- CreateOneDimensionalFilter(QuickNoise(&42DD,&92))
- SmoothOneDimensionalTransform
- OneDimensionalContrast(&26)
- HorizontalDistortion(Overwrite)
- TwoDimensionalEqualization
- If IsLessThanOrEqualTo(LogBitsPerPixel,&2) Then Dithering(&4000) Else If IsEqualTo(LogBitsPerPixel,&3) Then Dithering(&2000) Else Dithering(&0)
- MakeSprite
- Checksum(&3C8E)
- End
-