Scriptname "ripples"

Start:
	Rate	2,0

rippleLoop:
	
	Tex	0

	Repeat
	  TexAdj	1,0,31
	  UntilTex = 31

	Goto rippleLoop