home *** CD-ROM | disk | FTP | other *** search
- StartColourDefinition
- Dithering(&0)
- LinearField(&0,&0)
- LinearFieldSegment(&0,&FFFF,&0,&1FFF,SimpleAddition)
- LinearFieldSegment(&FFFF,&0,&2000,&3FFF,SimpleAddition)
- LinearFieldSegment(&0,&FFFF,&4000,&5FFF,SimpleAddition)
- LinearFieldSegment(&FFFF,&0,&6000,&7FFF,SimpleAddition)
- LinearFieldSegment(&0,&FFFF,&8000,&9FFF,SimpleAddition)
- LinearFieldSegment(&FFFF,&0,&A000,&BFFF,SimpleAddition)
- LinearFieldSegment(&0,&FFFF,&C000,&DFFF,SimpleAddition)
- LinearFieldSegment(&FFFF,&0,&E000,&FFFF,SimpleAddition)
- OneDimensionalStoreBufferTwo
- OneDimensionalStoreBufferOne
- CreateColoursUsingRGBData
- EndColourDefinition
-
- Seed(&B11)
- Phase(&3A)
- NoiseToBeFiltered(&D0BB)
- TwoDimensionalClear
- LinearField(&19DD,&1)
- OneDimensionalStoreBufferOne
- For(&5)
- Ripples(&FFFF,&8000,Random(&FFFF,&0),Random(&CFFF,&0),Maximise)
- Next
- TwoDimensionalEqualization
- HorizontalShear(&0,Overwrite)
- GenerateTwoDimensionalDust(&6444,&2FFF,SimpleAddition)
- Dithering(&300)
- MakeSprite
- Checksum(&1F9D)
- End
-