'
'       VBScript example
'
set cmd = Application.Commands("Duplicate/Instantiate Options")
cmd.Execute

# This sample demonstrates how to execute commands with specific arguments and inspect the return values.
Application.CreatePrim("Grid", "MeshSurface", "", "")
# Note: The base commands for 'Quick Stretch', 'Bend' and 'Bevel' return the newly created operators in a list 
# so you have get the operator at position 0 in the list.
op = Application.Commands( "Quick Stretch" ).Execute()[0]
op2 = Application.Commands( "Bend" ).Execute()[0]
bevelCmd = Application.Commands( "Bevel" )
setarg = bevelCmd.Arguments("ConnectionSet")
setarg.Value = "grid.poly[52,53]"
op3 = bevelCmd.Execute()[0]
ops = [op, op2, op3]
Application.InspectObj( ops )
# History log
# Application.CreatePrim("Grid", "MeshSurface", "", "")
# Application.ApplyKinematicOp("QStretch", "grid", "")
# Application.ApplyOp("Bend", "grid", 3, "siPersistentOperation", "", 0)
# Application.ApplyTopoOp("BevelComponent", "grid.poly[52,53]", "siUnspecified", "siPersistentOperation", "")