Label 1
	Slot(1) = Rnd
	Slot(2) = Round(Slot(1))	
	If Slot(2) = 0 
		Slot(3) = Slot(3) + 1
	Else
		Slot(4) = Slot(4) + 1		
	EndIf
	If Slot(3) = Slot(4)
		End
	EndIf	
goto 1

'WATCH Slot(1)
'WATCH Slot(2)
'WATCH Slot(3)
'WATCH Slot(4)
'WATCH Slot(3) / Slot(4)
'EXEC Slot(3) = 0 : Slot(4) = 0
