home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Datafile PD-CD 4
/
DATAFILE_PDCD4.iso
/
utilities
/
utilst
/
texturgdn
/
Textures
/
WWW
/
LSandyFNBW
< prev
next >
Wrap
Text File
|
1996-09-22
|
943b
|
35 lines
StartColourDefinition
Dithering(&0)
LinearField(&FFFF,&A000)
OneDimensionalStoreBufferTwo
OneDimensionalStoreBufferOne
CreateColoursUsingRGBData
EndColourDefinition
|
| Turbulence demonstartion
|
Seed(&B)
Phase(&39)
NoiseToBeFiltered(&E8A1)
CreateOneDimensionalFilter(QuickNoise(&E5CB,&14BF))
OneDimensionalTransform
HorizontalWaves(Overwrite)
VerticalShear(&1,Overwrite)
CreateOneDimensionalFilter(QuickNoise(&B50F,&E6))
OneDimensionalTransform
HorizontalWaves(SimpleAddition)
For(&10)
CreateOneDimensionalFilter(FractalNoise(&C5FF,&44))
SmoothOneDimensionalTransform
HorizontalDistortion(Overwrite)
CreateOneDimensionalFilter(FractalNoise(&F63A,&34))
SmoothOneDimensionalTransform
VerticalDistortion(Overwrite)
Next
TwoDimensionalEqualization
If IsLessThanOrEqualTo(LogBitsPerPixel,&2) Then Dithering(&4000) Else If IsEqualTo(LogBitsPerPixel,&3) Then Dithering(&2000) Else Dithering(&0)
MakeSprite
Checksum(&4C4)
End