
' IF the first CaseElse is not present
'  then the second CaseElse is not working
Controls CloseTextBox 

Slot 1 = 1
Slot 2 = 1

Select Slot(1)
	Case 1
		Select Slot(2)
			Case 1
				Print "Slot2 = 1" + CRLF
			'CaseElse
			'	Print "Slot2 <> 1" + CRLF
		EndSelect
	CaseElse
		Print "Slot1 <> 1"
EndSelect

Wait Seconds 0.5
Print ""


'WATCH Slot(1)
'WATCH Slot(1) * 5
'WATCH sqrt(Slot(1))
'EXEC Slot 1 = 2
