home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / t / texturegnd / Textures / FFT_1D / RandRPsy < prev    next >
Encoding:
Text File  |  1996-11-11  |  696 b   |  33 lines
  1. StartColourDefinition
  2.   Dithering(&0)
  3.   LinearField(&FFFF,&0)
  4.   OneDimensionalContrast(&800)
  5.   OneDimensionalStoreBufferTwo
  6.   LinearField(&FFFF,&CC00)
  7.   OneDimensionalStoreBufferOne
  8.   LinearField(&7FFF,&FFFF)
  9.   CreateColours(HSV)
  10. EndColourDefinition
  11.  
  12. Seed(&B11)
  13. Phase(&3A)
  14. NoiseToBeFiltered(&D0BB)
  15. TwoDimensionalClear
  16. LinearField(&19DD,&1)
  17. OneDimensionalStoreBufferOne
  18. For(&5)
  19.   AddToPercentage(&12)
  20.   Ripples(&FFFF,&8000,Random(&FFFF,&0),Random(&FFFF,&0),SimpleAddition)
  21. Next
  22. TwoDimensionalEqualization
  23. HorizontalShear(&0,Overwrite)
  24. Dithering(&300)
  25. MakeSprite
  26. Checksum(&6498)
  27. End
  28.  
  29. |
  30. | For fertility.
  31. |
  32. CreateTwoDimensionalFilter(Or(ShiftedFractalNoise(&FD5D,&14B,Noise(&C75,&108C),&AA9),&14CE))
  33.