home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Datafile PD-CD 4
/
DATAFILE_PDCD4.iso
/
utilities
/
utilst
/
texturgdn
/
Textures
/
FFT_1D
/
RandRipp
< prev
next >
Wrap
Text File
|
1996-09-22
|
701b
|
32 lines
StartColourDefinition
Seed(&A13B)
Dithering(&0)
DitheringOne(&0)
DitheringTwo(&2000)
NoiseToBeFiltered(&C215)
LinearField(&30E,&9894)
OneDimensionalStoreBufferTwo
LinearField(&EC7F,&CC9F)
OneDimensionalStoreBufferOne
LinearField(&EEA5,&811A)
CreateColoursUsingHSVData
EndColourDefinition
Seed(&B11)
Phase(&2C)
TwoDimensionalClear
LinearField(&FFFF,&0)
OneDimensionalStoreBufferOne
CreateOneDimensionalFilter(QuickNoise(&F52D,&50B3))
SmoothOneDimensionalTransform
OneDimensionalMaskBufferOne(ScaledMultiplication)
For(&20)
Ripples(&FFFF,&4000,Random(&FFFF,&0),Random(&CFFF,&0),UnboundedAddition)
Next
TwoDimensionalEqualization
Dithering(&2000)
MakeSprite
Checksum(&C368)
End