home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilst / texturgdn / Textures / WWW / TinyGroove < prev    next >
Encoding:
Text File  |  1996-09-22  |  784 b   |  29 lines
  1. StartColourDefinition
  2.   Dithering(&0)
  3.   LinearField(&FFFF,&A000)
  4.   OneDimensionalStoreBufferTwo
  5.   OneDimensionalStoreBufferOne
  6.   CreateColoursUsingRGBData
  7. EndColourDefinition
  8.  
  9. |
  10. | Simulated light source for backdrop
  11. | Scaling invariance demonstrated
  12. |
  13. Seed(&A8BC)
  14. Phase(&24)
  15. NoiseToBeFiltered(&FFFF)
  16. TwoDimensionalClear
  17. CreateOneDimensionalFilter(Noise(Noise(&C562,&3EE),&3EE))
  18. SmoothOneDimensionalTransform
  19. OneDimensionalEqualization
  20. Ripples(&FFFF,&780,&E00,&900,Maximise)
  21. Ripples(&FFFF,&420,&3E00,&C000,Maximise)
  22. Ripples(&FFFF,&7C0,&900,&500,Maximise)
  23. TwoDimensionalTransform
  24. TwoDimensionalContrast(&8000)
  25. If IsLessThanOrEqualTo(LogBitsPerPixel,&2) Then Dithering(&4000) Else If IsEqualTo(LogBitsPerPixel,&3) Then Dithering(&2000) Else Dithering(&0) 
  26. MakeSprite
  27. Checksum(&FF39)
  28. End
  29.