home *** CD-ROM | disk | FTP | other *** search
- StartColourDefinition
- Dithering(&0)
- LinearField(&FFFF,&0)
- OneDimensionalContrast(&800)
- OneDimensionalStoreBufferTwo
- LinearField(&FFFF,&CC00)
- OneDimensionalStoreBufferOne
- LinearField(&7FFF,&FFFF)
- CreateColours(HSV)
- EndColourDefinition
-
- Seed(&B11)
- Phase(&3A)
- NoiseToBeFiltered(&D0BB)
- TwoDimensionalClear
- LinearField(&19DD,&1)
- OneDimensionalStoreBufferOne
- For(&5)
- AddToPercentage(&12)
- Ripples(&FFFF,&8000,Random(&FFFF,&0),Random(&FFFF,&0),SimpleAddition)
- Next
- TwoDimensionalEqualization
- HorizontalShear(&0,Overwrite)
- Dithering(&300)
- MakeSprite
- Checksum(&6498)
- End
-
- |
- | For fertility.
- |
- CreateTwoDimensionalFilter(Or(ShiftedFractalNoise(&FD5D,&14B,Noise(&C75,&108C),&AA9),&14CE))
-