disable right clicking.

RenderMap Sequence Script

oNM = Selection(0).name

Set Prop = ActiveSceneRoot.AddCustomProperty (“Rendermap_Sequence_”&oNM)
Set cStart = prop.AddParameter3 (“Start”,2,0)
Set cEnd = prop.AddParameter3 (“End”,2,100)
Set cName = prop.AddParameter3 (“Name”,8,”Enter A name for the Map”)

Inspectobj “Rendermap_Sequence_”&oNM, , ,4
oStart = cStart.Value
oEnd = cEnd.Value
oName = cName.value

Logmessage cStart.Value
Logmessage cEnd.Value
Logmessage cName.Value

DeleteObj “Rendermap_Sequence_”&oNM

for i = oStart to oEnd
SetValue “PlayControl.Current”, i
‘Translate , i, 0, 0, siAbsolute, siLocal, siObj, siXYZ, , , , , , , , , , 0
SetValue oNM&”.RenderMap.imagefilepath”, “F:\RnD Group\RnD_XSI\Render_Pictures\aaOcean_RenderMap\”&oName&”_0″&i&”.tga”
‘SetValue oNM&”.RenderMap.imagefilepath”, “F:\RnD Group\RnD_XSI\Render_Pictures\aaOcean_RenderMap\”&oName&”.tga”

RegenerateMaps oNM&”.RenderMap”
next

Comments are closed.