home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilst / texturgdn / Textures / 3D / TemplQ3d < prev    next >
Encoding:
Text File  |  1996-09-22  |  1.7 KB  |  51 lines
  1. StartColourDefinition
  2.   Dithering(&0)
  3.   LinearField(&FFFF,&0)
  4.   OneDimensionalStoreBufferTwo
  5.   OneDimensionalStoreBufferOne
  6.   CreateColoursUsingRGBData
  7. EndColourDefinition
  8.  
  9. Seed(&699D)
  10. Phase(&22)
  11. NoiseToBeFiltered(&8E6F)
  12. StopAnimating
  13.   CreateOneDimensionalFilter(QuickNoise(&B99C,&D6))
  14.   OneDimensionalTransform
  15.   OneDimensionalEqualization
  16.   OneDimensionalStoreBufferOne
  17.   CreateOneDimensionalFilter(FractalNoise(&DE4D,&39))
  18.   SmoothOneDimensionalTransform
  19.   OneDimensionalContrast(&378)
  20.   HorizontalWaveWarp(Overwrite)
  21.   VerticalShear(&1,Overwrite)
  22.   HorizontalShear(&0,Overwrite)
  23.   CreateOneDimensionalFilter(Noise(&9860,&164))
  24.   SmoothOneDimensionalTransform
  25.   OneDimensionalEqualization
  26.   OneDimensionalStoreBufferOne
  27.   CreateOneDimensionalFilter(Noise(&68C6,&FE))
  28.   SmoothOneDimensionalTransform
  29.   OneDimensionalContrast(&1D0)
  30.   VerticalWaveWarp(SimpleAddition)
  31.   HorizontalShear(&FFFD,Overwrite)
  32.   CreateOneDimensionalFilter(Noise(&B090,&F8))
  33.   SmoothOneDimensionalTransform
  34.   OneDimensionalEqualization
  35.   OneDimensionalStoreBufferOne
  36.   CreateOneDimensionalFilter(Noise(&CB90,&139))
  37.   SmoothOneDimensionalTransform
  38.   OneDimensionalContrast(&222)
  39.   HorizontalWaveWarp(SimpleAddition)
  40.   HorizontalShear(&2,Overwrite)
  41.   |
  42.   StopMutating
  43.   | When aniamted, a sphere moves through a three dimensional static texture block.
  44. StartAnimating
  45. DefineSolidBlock(QuickTwoDimensionalPoint(Combine(UnboundedAddition,Y,Z),Combine(UnboundedAddition,X,AnimationFrameNumber)))
  46. Sculpture(ScaledSignedMultiply(SignedCos(X),Absolute(SignedCos(LogicalShiftRight(Y,&1)))),SignedCos(LogicalShiftRight(Y,&1)),ScaledSignedMultiply(SignedSin(X),Absolute(SignedCos(LogicalShiftRight(Y,&1)))))
  47. Dithering(&2A45)
  48. MakeSprite
  49. Checksum(&3456)
  50. End
  51.