home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilst / texturgdn / Textures / FFT_1D / LineDent < prev    next >
Text File  |  1996-09-22  |  2KB  |  56 lines

  1. StartColourDefinition
  2.   Dithering(&0)
  3.   LinearField(&0,&2)
  4.   LinearFieldSegment(&0,&D0DA,&0,&284F,SimpleAddition)
  5.   LinearFieldSegment(&E1C3,&2,&BC4,&57B7,SimpleAddition)
  6.   LinearFieldSegment(&0,&A1B3,&25DD,&3DA2,SimpleAddition)
  7.   LinearFieldSegment(&E971,&0,&8E62,&3189,SimpleAddition)
  8.   LinearFieldSegment(&2,&81AB,&2FEB,&644B,SimpleAddition)
  9.   LinearFieldSegment(&E617,&0,&E95E,&894B,SimpleAddition)
  10.   LinearFieldSegment(&0,&D2EE,&67EE,&7C3F,SimpleAddition)
  11.   LinearFieldSegment(&DA4C,&2,&4A52,&B7AE,SimpleAddition)
  12.   OneDimensionalStoreBufferTwo
  13.   LinearField(&0,&2)
  14.   LinearFieldSegment(&2,&A6D2,&4,&E4B,SimpleAddition)
  15.   LinearFieldSegment(&C7ED,&2,&126E,&2C52,SimpleAddition)
  16.   LinearFieldSegment(&4,&4E89,&18F0,&7D65,SimpleAddition)
  17.   LinearFieldSegment(&B184,&2,&EE32,&A691,SimpleAddition)
  18.   LinearFieldSegment(&2,&ED09,&C11C,&F5D3,SimpleAddition)
  19.   LinearFieldSegment(&E187,&2,&43C4,&DC80,SimpleAddition)
  20.   LinearFieldSegment(&0,&E346,&2D47,&AE24,SimpleAddition)
  21.   LinearFieldSegment(&704F,&2,&345B,&B2CD,SimpleAddition)
  22.   OneDimensionalStoreBufferOne
  23.   LinearField(&2,&0)
  24.   LinearFieldSegment(&0,&D072,&2,&1FB4,SimpleAddition)
  25.   LinearFieldSegment(&7422,&2,&3749,&3B02,SimpleAddition)
  26.   LinearFieldSegment(&2,&8197,&4288,&9DD3,SimpleAddition)
  27.   LinearFieldSegment(&F045,&2,&8734,&45AF,SimpleAddition)
  28.   LinearFieldSegment(&2,&FD09,&4701,&F2BB,SimpleAddition)
  29.   LinearFieldSegment(&FA38,&2,&6FD8,&DA69,SimpleAddition)
  30.   LinearFieldSegment(&0,&FC14,&E78B,&FBB5,SimpleAddition)
  31.   LinearFieldSegment(&C1FF,&0,&4A60,&8BBE,SimpleAddition)
  32.   CreateColoursUsingHSVData
  33. EndColourDefinition
  34.  
  35. Seed(&B)
  36. Phase(&2C)
  37. CreateOneDimensionalFilter(QuickNoise(&8116,&215))
  38. OneDimensionalTransform
  39. HorizontalWaves(Overwrite)
  40. VerticalShear(&2,Overwrite)
  41. CreateOneDimensionalFilter(QuickNoise(&AC24,&76))
  42. OneDimensionalTransform
  43. HorizontalWaves(SimpleAddition)
  44. VerticalShear(&FFFF,Overwrite)
  45. TwoDimensionalEqualization
  46. LinearField(&EFFF,&6000)
  47. OneDimensionalStoreBufferOne
  48. For(&8)
  49.   Ripples(&FFFF,&2000,Random(&FFFF,&0),Random(&FFFF,&0),Maximise)
  50. Next
  51. Dithering(&2000)
  52. MakeSprite
  53. Checksum(&5590)
  54. End
  55.  
  56.