home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilst / texturgdn / Textures / Misc / ~B+WWas next >
Text File  |  1996-09-22  |  2KB  |  54 lines
  1. StartColourDefinition
  2.   Dithering(&0)
  3.   LinearField(&0,&0)
  4.   LinearFieldSegment(&0,&FFFF,&0,&1FFF,SimpleAddition)
  5.   LinearFieldSegment(&FFFF,&0,&2000,&3FFF,SimpleAddition)
  6.   LinearFieldSegment(&0,&FFFF,&4000,&5FFF,SimpleAddition)
  7.   LinearFieldSegment(&FFFF,&0,&6000,&7FFF,SimpleAddition)
  8.   LinearFieldSegment(&0,&FFFF,&8000,&9FFF,SimpleAddition)
  9.   LinearFieldSegment(&FFFF,&0,&A000,&BFFF,SimpleAddition)
  10.   LinearFieldSegment(&0,&FFFF,&C000,&DFFF,SimpleAddition)
  11.   LinearFieldSegment(&FFFF,&0,&E000,&FFFF,SimpleAddition)
  12.   OneDimensionalStoreBufferTwo
  13.   LinearField(&0,&0)
  14.   LinearFieldSegment(&0,&FFFF,&0,&1FFF,SimpleAddition)
  15.   LinearFieldSegment(&FFFF,&0,&2000,&3FFF,SimpleAddition)
  16.   LinearFieldSegment(&0,&FFFF,&4000,&5FFF,SimpleAddition)
  17.   LinearFieldSegment(&FFFF,&0,&6000,&7FFF,SimpleAddition)
  18.   LinearFieldSegment(&0,&FFFF,&8000,&9FFF,SimpleAddition)
  19.   LinearFieldSegment(&FFFF,&0,&A000,&BFFF,SimpleAddition)
  20.   LinearFieldSegment(&0,&FFFF,&C000,&DFFF,SimpleAddition)
  21.   LinearFieldSegment(&FFFF,&0,&E000,&FFFF,SimpleAddition)
  22.   OneDimensionalStoreBufferOne
  23.   LinearField(&0,&0)
  24.   LinearFieldSegment(&0,&FFFF,&0,&1FFF,SimpleAddition)
  25.   LinearFieldSegment(&FFFF,&0,&2000,&3FFF,SimpleAddition)
  26.   LinearFieldSegment(&0,&FFFF,&4000,&5FFF,SimpleAddition)
  27.   LinearFieldSegment(&FFFF,&0,&6000,&7FFF,SimpleAddition)
  28.   LinearFieldSegment(&0,&FFFF,&8000,&9FFF,SimpleAddition)
  29.   LinearFieldSegment(&FFFF,&0,&A000,&BFFF,SimpleAddition)
  30.   LinearFieldSegment(&0,&FFFF,&C000,&DFFF,SimpleAddition)
  31.   LinearFieldSegment(&FFFF,&0,&E000,&FFFF,SimpleAddition)
  32.   CreateColoursUsingHSVData
  33. EndColourDefinition
  34.  
  35. Seed(&EFC3)
  36. Phase(&31)
  37. NoiseToBeFiltered(&E579)
  38. CreateTwoDimensionalFilter(QuickNoise(&F6A8,&99))
  39. TwoDimensionalTransform
  40. For(&2)
  41.   CreateOneDimensionalFilter(FractalNoise(&E342,&D))
  42.   SmoothOneDimensionalTransform
  43.   HorizontalDistortion(Overwrite)
  44.   CreateOneDimensionalFilter(FractalNoise(&BE60,&C))
  45.   SmoothOneDimensionalTransform
  46.   VerticalDistortion(Overwrite)
  47. Next
  48. TwoDimensionalEqualization
  49. Dithering(&600)
  50. MakeSprite
  51. Checksum(&3ACB)
  52. End
  53.  
  54.