
Label Loop
	Select Int(Rnd * 6)
		Case 0
			s1 = "Chinese 特雷门乐器"
		Case 1
			s1 = "Random  " + Format(Rnd, "0.000000")
		Case 2
			s1 = "LONG TEXT UPPERCASE"
		Case 3
			s1 = "Numbers 0123456789"
		Case 4
			s1 = "Letters abcdefghijk"
		Case 5
			s1 = ""
	EndSelect
	SlotText Rnd * 24  = s1
	Slot Rnd * 24 = Rnd * 1000
	Wait Seconds 0.01
Goto Loop


'WATCH SewTo_Speed
'EXEC Button 5 Text Button5
