Light オブジェクトは、ライトポイントやスポットライトなど、シーン内の Softimage ライトです。Light は X3DObject.AddLight を使って作成します。

Add2DChain	Add3DChain	AddAnnotation	AddCamera
AddCameraRig	AddChild	AddControl	AddCustomOp
AddCustomProperty	AddFxTree	AddGeometry	AddICEAttribute
AddLattice	AddLight	AddLightRig	AddMaterial
AddModel	AddNull	AddNurbsCurve	AddNurbsCurveList
AddNurbsCurveList2	AddNurbsSurface	AddNurbsSurfaceMesh	AddNurbsSurfaceMesh2
AddPolygonMesh	AddPrimitive	AddProperty	AddScriptedOp
AddScriptedOpFromFile	AnimatedParameters2	ApplyEnvelope	BelongsTo
EvaluateAt	FindChild	FindChild2	FindChildren
FindChildren2	FindShaders	GetActivePrimitive2	GetActivePrimitive3
GetAllShaders	GetBoundingBox	GetICEAttributeFromName	GetLocalPropertyFromName
GetLocalPropertyFromName2	GetModels2	GetPropertyFromName	GetPropertyFromName2
GetShaderInputType	GetStaticKinematicState	HasStaticKinematicState	IsA
IsAnimated2	IsClassOf	IsEqualTo	IsKindOf
IsLocked	IsNodeAnimated	IsSelected	LockOwners
NodeAnimatedParameters	RemoveChild	RemoveFromParent	RemoveICEAttribute
SetAsSelected	SetCapabilityFlag	SetLock	SetMaterial
ShapeAnimatedClusters	TaggedParameters	UnSetLock

ActivePrimitive	AllImageClips	Application	BranchFlag
Capabilities	Categories	Children	Envelopes
EvaluationID	Families	FullName	Help
HierarchicalEvaluationID	ICEAttributes	Interest	Kinematics
LocalProperties	LocalRotation	LocalScaling	LocalTranslation
LockLevel	LockMasters	LockType	Material
Materials	Model	Models	Name
NestedObjects	OGLLight	ObjectID	Origin
OriginPath	Owners	PPGLayout	Parameters
Parent	Parent3DObject	Primitives	Properties
Selected	Shaders	Type

VBScript の例

dim pointLight

set pointLight = ActiveProject.ActiveScene.Root.AddLight("Point")

LogMessage "Point light name: " & pointLight.Name