If Seeker = "curr" Then
		Machine DoorClose
		Machine DoorLidClose
	EndIf