home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Datafile PD-CD 4
/
DATAFILE_PDCD4.iso
/
utilities
/
utilst
/
texturgdn
/
Textures
/
WWW
/
MRipScl
< prev
next >
Wrap
Text File
|
1996-09-22
|
676b
|
24 lines
StartColourDefinition
Dithering(&0)
LinearField(&8000,&FFFF)
OneDimensionalStoreBufferTwo
OneDimensionalStoreBufferOne
CreateColoursUsingRGBData
EndColourDefinition
Seed(&7661)
Phase(&2D)
TwoDimensionalClear
CreateOneDimensionalFilter(Noise(&F48B,&2CC))
SmoothOneDimensionalTransform
OneDimensionalEqualization
Ripples(&4933,&E2D,&CD,&B7,Maximise)
Ripples(&F612,&11F6,&DE89,&10B0,Maximise)
Ripples(&CB53,&1012,&1433,&C96D,Maximise)
SmoothTwoDimensionalTransform
TwoDimensionalEqualization
If IsLessThanOrEqualTo(LogBitsPerPixel,&2) Then Dithering(&4000) Else If IsEqualTo(LogBitsPerPixel,&3) Then Dithering(&2000) Else Dithering(&0)
MakeSprite
Checksum(&65E9)
End