:Stellar000
if
	turn > meteorevent
then
	set meteorevent (((rnd%25000) + 50000) + turn)
	set meteorand (rnd%16)
end