home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilst / texturgdn / Textures / FFT_1D / RandRipp3 < prev    next >
Text File  |  1996-09-22  |  842b  |  37 lines
  1. StartColourDefinition
  2.   StopAnimating
  3.     Seed(&B)
  4.     Phase(&2C)
  5.     Dithering(&6000)
  6.     DitheringOne(&6000)
  7.     DitheringTwo(&6000)
  8.     NoiseToBeFiltered(&FFFF)
  9.     CreateOneDimensionalFilter(Noise(&7938,&83))
  10.     OneDimensionalTransform
  11.     OneDimensionalEqualization
  12.     OneDimensionalStoreBufferTwo
  13.     LinearField(&FCE3,&FFFF)
  14.     OneDimensionalStoreBufferOne
  15.     LinearField(&8748,&F560)
  16.     CreateColoursUsingHSVData
  17.   StartAnimating
  18. EndColourDefinition
  19.  
  20. Seed(&B11)
  21. Phase(&2C)
  22. TwoDimensionalClear
  23. LinearField(&FFFF,&0)
  24. OneDimensionalStoreBufferOne
  25. CreateOneDimensionalFilter(QuickNoise(&F52D,&7B3))
  26. SmoothOneDimensionalTransform
  27. OneDimensionalMaskBufferOne(ScaledMultiplication)
  28. For(&10)
  29.   Ripples(&FFFF,&4000,Random(&FFFF,&0),Random(&FFFF,&0),Maximise)
  30. Next
  31. TwoDimensionalEqualization
  32. Dithering(&80)
  33. MakeSprite
  34. Checksum(&2F04)
  35. End
  36.  
  37.