;Alan's random animation script
ON ENTER { 0 ME SETALARM }
ON ALARM 
{
;***Set parameters***
	2 nbrpics =		;nbr of pics in animation
	30 dtime =		;display time.  Each multiple of 60 is one second.
;***End of paras***
	ME GETSPOTSTATE DUP sstate = rnd =
		{ nbrpics RANDOM rnd = } { sstate rnd == } WHILE
	rnd ME SETSPOTSTATELOCAL
	dtime ME SETALARM
}