subclass BSwitch of WorldObjectBase
{
	scratch         = $0
	pModule         = $ffff		; -1
	pLine           = $ffff		; -1
	pName           = $0
	pSelf           = $0
	pType           = $15		; 21, nsBottom
	pOwner          = $0
	pApproach       = $1
	pOpen           = $0

	buildVerbList()
	handlesAction()
	open()
	close()
}

string_002a	= "BSwitch"