home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Datafile PD-CD 5
/
DATAFILE_PDCD5.iso
/
utilities
/
t
/
texturegnd
/
Textures
/
Misc
/
TwoLayer
< prev
next >
Wrap
Text File
|
1996-10-24
|
2KB
|
68 lines
StartColourDefinition
Dithering(Zero)
LinearField(&0,&2)
LinearSegment(&FFFF,&D7B0,&0,&D0DA,SimpleAddition)
LinearSegment(&F43B,&A848,&E1C3,&2,SimpleAddition)
LinearSegment(&DA22,&C25D,&0,&A1B3,SimpleAddition)
LinearSegment(&719D,&CE76,&E971,&0,SimpleAddition)
LinearSegment(&D014,&9BB4,&2,&81AB,SimpleAddition)
LinearSegment(&16A1,&76B4,&E617,&0,SimpleAddition)
LinearSegment(&9811,&83C0,&0,&D2EE,SimpleAddition)
LinearSegment(&B5AD,&4851,&DA4C,&2,SimpleAddition)
OneDimensionalStoreBufferTwo
LinearField(&0,&2)
LinearSegment(&FFFB,&F1B4,&2,&A6D2,SimpleAddition)
LinearSegment(&ED91,&D3AD,&C7ED,&2,SimpleAddition)
LinearSegment(&E70F,&829A,&4,&4E89,SimpleAddition)
LinearSegment(&11CD,&596E,&B184,&2,SimpleAddition)
LinearSegment(&3EE3,&A2C,&2,&ED09,SimpleAddition)
LinearSegment(&BC3B,&237F,&E187,&2,SimpleAddition)
LinearSegment(&D2B8,&51DB,&0,&E346,SimpleAddition)
LinearSegment(&CBA4,&4D32,&704F,&2,SimpleAddition)
OneDimensionalStoreBufferOne
LinearField(&2,&0)
LinearSegment(&FFFD,&E04B,&0,&D072,SimpleAddition)
LinearSegment(&C8B6,&C4FD,&7422,&2,SimpleAddition)
LinearSegment(&BD77,&622C,&2,&8197,SimpleAddition)
LinearSegment(&78CB,&BA50,&F045,&2,SimpleAddition)
LinearSegment(&B8FE,&D44,&2,&FD09,SimpleAddition)
LinearSegment(&9027,&2596,&FA38,&2,SimpleAddition)
LinearSegment(&1874,&44A,&0,&FC14,SimpleAddition)
LinearSegment(&B59F,&7441,&C1FF,&0,SimpleAddition)
CreateColoursUsingHSVData
EndColourDefinition
|
| Think Pink
|
Seed(&4782)
Phase(&1B)
NoiseToBeFiltered(&84)
CreateCosineArtefacts(&BA10)
CreateCosineSymmetry
CreateTwoDimensionalFilter(PinkNoise(&BF19,&1F6))
TwoDimensionalTransform
TwoDimensionalEqualization
Dithering(&17B9)
MakeSprite
StartColourDefinition
Dithering(Zero)
LinearField(&0,&FFFF)
OneDimensionalStoreBufferTwo
OneDimensionalStoreBufferOne
CreateColoursUsingRGBData
EndColourDefinition
Seed(&46)
TwoDimensionalClear
LinearField(&E627,&0)
For(&8)
Ripples(&F422,&206D,Random(&D3CF,&1),Random(&EAB7,&1),Maximise)
Next
Dithering(&1)
AddToSprite
Checksum(&4A25)
End