sub main
obs=rhino.hiddenobjects
if isarray(obs) then 
  rhino.command"show"
  rhino.deleteobjects obs
  rhino.print"Deleted "&cstr(ubound(obs)+1)&" objects"
else
  rhino.print"No hidden object"
end if
end sub

main