home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Datafile PD-CD 4
/
DATAFILE_PDCD4.iso
/
utilities
/
utilst
/
texturgdn
/
Textures
/
Dust
/
RandRDRed
< prev
next >
Wrap
Text File
|
1996-09-22
|
707b
|
32 lines
StartColourDefinition
Seed(&B)
Phase(&2C)
Dithering(&0)
NoiseToBeFiltered(&FFFF)
LinearField(&FFFF,&0)
OneDimensionalContrast(&800)
OneDimensionalStoreBufferTwo
LinearField(&FFFF,&CC00)
OneDimensionalStoreBufferOne
LinearField(&0,&0)
LinearFieldSegment(&FFFF,&FFFF,&200,&FFFF,SimpleAddition)
CreateColoursUsingHSVData
EndColourDefinition
Seed(&4F30)
Phase(&38)
TwoDimensionalClear
NoiseToBeFiltered(&F54D)
LinearField(&1652,&4)
OneDimensionalStoreBufferOne
For(&5)
Ripples(&FFFF,&4000,Random(&FFFF,&0),Random(&CFFF,&0),Maximise)
Next
TwoDimensionalEqualization
HorizontalShear(&0,Overwrite)
GenerateTwoDimensionalDust(&0,&0,Overwrite)
Dithering(&0)
MakeSprite
Checksum(&494E)
End