Module checkSelect {
	long m, i, k
	for k=1 to 10
	m=10
	i=random(5, 10)
	select case i
	case <6
		print "less than 6"
	case 6
	{
		m++: break   // break case block, and continue to next block
	}
	case 7
	{
		m++: break
	}
	case 8
	{
		m++: continue // exit after end select
	}
	case 9
		print "is 9"
	case else
		print "more than 9"
	end select
	print m, i
	next
}
checkSelect