local handle,obj = FindFirstObject()
	if handle ~= -1 then
		repeat
			-- do something
			status,obj = FindNexObject(handle)
		until not status
		EndFindObject(handle)
	end