home *** CD-ROM | disk | FTP | other *** search
- StartColourDefinition
- Dithering(&0)
- LinearField(&FFFF,&A000)
- OneDimensionalStoreBufferTwo
- OneDimensionalStoreBufferOne
- CreateColoursUsingRGBData
- EndColourDefinition
-
- Seed(&27D)
- Phase(&18)
- NoiseToBeFiltered(&5D)
- CreateTwoDimensionalFilter(Or(ShiftedNoise(&3BFD,&4F,&D7,&250),ShiftedNoise(&5A1E,&BD,&2AE,&223)))
- TwoDimensionalTransform
- CreateOneDimensionalFilter(QuickNoise(&E4B4,&67))
- SmoothOneDimensionalTransform
- OneDimensionalContrast(&A1)
- VerticalDistortion(Overwrite)
- TwoDimensionalEqualization
- If IsLessThanOrEqualTo(LogBitsPerPixel,&2) Then Dithering(&4000) Else If IsEqualTo(LogBitsPerPixel,&3) Then Dithering(&2000) Else Dithering(&0)
- MakeSprite
- Checksum(&8155)
- End
-