8,452
edits
Mod Tool: Difference between revisions
m
scripting: get vertex color
Paradox-01 (talk | contribs) |
Paradox-01 (talk | contribs) m (scripting: get vertex color) |
||
| Line 616: | Line 616: | ||
|- | |- | ||
| [40] layers | | [40] layers | ||
| | | [41] onisplit update | ||
| | | [42] get vertex color | ||
|} | |} | ||
| Line 1,862: | Line 1,862: | ||
Set objShell = Nothing | Set objShell = Nothing | ||
End Function | End Function | ||
' '''[42] get vertex color''' | |||
set oGeometry = selection(0).activeprimitive.geometry | |||
set oTriangles = oGeometry.Triangles | |||
for each oTriangle in oTriangles | |||
logmessage oTriangle.Name | |||
for each oVertex in oTriangle.Points | |||
set oColor = oVertex.Color | |||
logmessage vbTab & "RGBA(" & _ | |||
oColor.red & "," & _ | |||
oColor.green & "," & _ | |||
oColor.blue & "," & _ | |||
oColor.alpha & ")" | |||
next | |||
next | |||