Hi,
I’m trying lately create recursive function to crawl whole material structure. I got stuck on :
SubAnim:RGB_Color_Map where as the Maxscript help says that points SubAnim:Point_1 are
not accessible til they are animated, how to animate them then to access the values?
I
Regards
Eryk
My Script :
clearlistener()
fn GofindMtl MtlTex imersion=
(
PrefixTex=""
PropertiesFormated=""
SubAnimsFormated =""
local imersion
imersion+=1
for i=0 to imersion do PrefixTex+="\__"
for i=1 to (getPropNames MtlTex).count do PropertiesFormated+=(" "+i as string +": "+(getPropNames MtlTex)[i])
for i=1 to (getSubAnimNames MtlTex).count do
(
subAnimAnim=""
--if getSubAnimNames(getSubAnimNames MtlTex)[i]> 0 then subAnimAnim+=(" "+i as string +": "+(getPropNames MtlTex)[i])
SubAnimsFormated+=(" "+i as string +": "+(getSubAnimNames MtlTex)[i])
---Check for subanims
)
print (PrefixTex+(MtlTex as string )+"Number of Subtex Maps: "+(getNumSubTexmaps MtlTex)as string+" Subanim Count: "+(getPropNames MtlTex).count as string )
print (PrefixTex+"=========================="+"___Subanims:"+SubAnimsFormated)
print (PrefixTex+"=========================="+"___Properties:"+PropertiesFormated)
-- print ((getSubAnimNames (getSubMtl MtlTex 1)))
if MtlTex.name == "FindMe" then print "I FOUND IT"
try( if (getNumSubMtls MtlTex) > 0 then
(
for i=1 to (getNumSubMtls MtlTex) do
(
if (getSubMtl MtlTex i) != undefined then
(
GofindMtl (getSubMtl MtlTex i) imersion
)
)
)
)catch()
try( if (getNumSubTexmaps MtlTex) >0 then
(
for j=1 to (getNumSubTexmaps MtlTex) do
(
if (getSubTexmap MtlTex j) != undefined then
(
GofindMtl (getSubTexmap MtlTex j) imersion
)
)
)
)catch()
)
MtlTex= $.material
GofindMtl MtlTex -2 ---Function GofindMtl:material Imersion:tab fro make output look cleaner
----CODE Below only for test and debug
MtlTex_CHECK=getSubAnimNames(getSubTexmap(getSubTexmap (getSubMtl $.material[1]1)1)1)
theBitmap=(getSubTexmap(getSubTexmap (getSubMtl $.material[1]1)1)1)
for i=1 to MtlTex_CHECK.count do print ( ( getSubAnimNames (getSubAnim theBitmap MtlTex_CHECK[i])))
(getSubAnim (getSubAnim (getsubanim (getSubAnim theBitmap MtlTex_CHECK[7]) 5)1)1).keys
addnewkey (getSubAnim (getsubanim (getSubAnim theBitmap MtlTex_CHECK[7]) 5)1) 1


