Option Explicit 'Script written by Russell Loveridge 'Script copyrighted by RAL:lapa.epfl.ch Call LayerSetUp() Sub LayerSetUp() 'Manage your layers_________________________________________________________________ Rhino.AddLayer "Default" Rhino.CurrentLayer "Default" ' This sets up a temorary holder layer to make sure that all TYPICAL layers can be deleted. Rhino.DeleteLayer("Layer 01") ' You can delete a layer with Rhinoscript ONLY if it is not current and if it contains NO objects. Rhino.DeleteLayer("Layer 02") Rhino.DeleteLayer("Layer 03") Rhino.DeleteLayer("Layer 04") Rhino.DeleteLayer("Layer 05") Rhino.AddLayer "L0", RGB(255, 0, 0) 'Make new layers - where we know the exact names" Rhino.AddLayer "L1", RGB(0, 255, 0) Rhino.AddLayer "L2", RGB(0, 0, 255) Rhino.AddLayer "L3", RGB(125, 125, 0) Rhino.AddLayer "L4", RGB(0, 125, 125) Rhino.CurrentLayer("L0") ' This makes the layer L0 current - any geometry we create with the layer current will be on this layer. Rhino.DeleteLayer("Default") ' Delete the temp layer. '_________________________________________________________________________ End Sub