
Slot_Speed = 1

Label loop1
	Gosub ExecSpeed
Goto loop1

End

Variable Numeric Slot_Speed

Label ExecSpeed
	v9 = Slot(Slot_Speed)
	v9 = 4 + 5 * v9 / 1000
	Option Speed V9
Return


'WATCH v1
'WATCH SLevelLow_SPEAKER_L
'EXEC SLevelLow_SPEAKER_L
