Isolate

This Rhino Script allows the user to select a piece of geometry then selects the inverse and hides it.  Use _show to reveal this geometry.

Rhino Script

Option Explicit 
'Script written by <David Mans> 
'Script copyrighted by <Neoarchaic Studio> 
'Script version Friday, January 16, 2009 9:54:03 PM 
Call Main() 
Sub Main() 
	Dim arrObjects 
	arrObjects = Rhino.getobjects("Select Objects to Isolate",,, True) 
	If isNull(arrObjects) Then Exit Sub 
	Call Rhino.EnableRedraw(False) 
	Call Rhino.SelectObjects(arrObjects) 
	Call Rhino.InvertSelectedObjects() 
	Call Rhino.Command("Hide", False) 
	Call Rhino.EnableRedraw(True) 
End Sub