Двойная анимация

[JeSss]

Как сделать чтобы при нажатии кнопки проигравалось сразу 2 анимации?

[HolyDel]

а как ты делаеш чтобы у тебя проиграывалась одна?

[JeSss]

Сообщение от HolyDel

а как ты делаеш чтобы у тебя проиграывалась одна?

Сначала
box = LoadAnimMesh("normal.b3d")
LoadAnimSeq box, ("left.b3d")
LoadAnimSeq box, ("right.b3d")

затем в цикле
If KeyDown(17)
If AnimSeq(Box)=0 Animate Box,2,1,2,10
Else
If AnimSeq(Box)=1 Or AnimSeq(Box)=2 Animate Box, 2,1,0,10
EndIf

[HolyDel]

Сначала

box = LoadAnimMesh("normal.b3d")
LoadAnimSeq box, ("left.b3d")

box2 = LoadAnimMesh("normal2.b3d")
LoadAnimSeq box2, ("left2.b3d")


затем в цикле
If KeyDown(17)
If AnimSeq(Box)=0
Animate Box,2,1,2,10
Animate Box2,2,1,2,10
endif
Else
If AnimSeq(Box)=1 Or AnimSeq(Box)=2 Animate Box, 2,1,0,10
If AnimSeq(Box2)=1 Or AnimSeq(Box2)=2 Animate Box2, 2,1,0,10

EndIf

найди 10 отличий

[JeSss]

теперь ни 1 из 2 анимаций непашет(

[HolyDel]

эмм. а у тебя есть файлы
"normal2.b3d"
и
"left2.b3d"?


далее правочка:

If KeyDown(17)
If AnimSeq(Box)=0
Animate Box,2,1,2,10
endif
If AnimSeq(Box2)=0
Animate Box2,2,1,2,10
endif
Else
If AnimSeq(Box)=1 Or AnimSeq(Box)=2 Animate Box, 2,1,0,10
If AnimSeq(Box2)=1 Or AnimSeq(Box2)=2 Animate Box2, 2,1,0,10

EndIf

[JeSss]

да, эти файлы я сделал, но нифига непашет...
Кстати, и этот тоже нет(

[HolyDel]

даже хз.
может ето из за забытого
LoadAnimSeq box, ("right.b3d")
и соответственно
LoadAnimSeq box2, ("right2.b3d")
?

[JeSss]

не, наврятли, я кстати ту страку удалил...

[moka]

Пролистай чайлды в корню модельки, и пробуй анимацию грузить к чайлду с именем модельки, и анимировать непосредственно этот чайлд.

[JeSss]

Я непонял чё ты щас сказал т.к. я про чайлды ..... хз)

[moka]

Тогда го справка, учи функции: CountChildren, GetChild, FindChild, LoadAnimSeq.

[HolyDel]

Итак, дамы и господа, если вы хотите, затекстурить, установить альфу, режим блендинга, или еще что либо для анимированной модели, то делайте ето в рекурсии. Марк - жопа, и не написал необходимых функций, но мы то с вами, тоже не дураки, поетому можем написать сами.

вот всякие ф-ии для работы с анимированными объектами

Function AnimEntityTexture(aent,tex,frame=0,layer=0)
Local ent
EntityTexture aent,tex,frame,layer
For c=1 To CountChildren(aent)
	ent=GetChild(aent,c)
	If CountChildren(ent)>0
	AnimEntityTexture(ent,tex,frame,layer)
	Else
	If EntityClass(ent)="Mesh" Then EntityTexture ent,tex,frame,layer
	EndIf
Next
End Function

Function AnimEntityColor(aent,r,g,b)
Local ent
EntityColor aent,r,g,b
For c=1 To CountChildren(aent)
	ent=GetChild(aent,c)
	If CountChildren(ent)>0
	AnimEntityColor(ent,r,g,b)
	Else
	If EntityClass(ent)="Mesh" Then EntityColor ent,r,g,b
	EndIf
Next
End Function

Function AnimEntityAlpha(aent,a#)
Local ent
EntityAlpha aent,a
For c=1 To CountChildren(aent)
	ent=GetChild(aent,c)
	If CountChildren(ent)>0
	AnimEntityAlpha(ent,a)
	Else
	If EntityClass(ent)="Mesh" Then EntityAlpha ent,a
	EndIf
Next
End Function


Function AnimEntityFX(aent,fx)
Local ent
EntityFX aent,fx
For c=1 To CountChildren(aent)
	ent=GetChild(aent,c)
	If CountChildren(ent)>0
		AnimEntityFX(ent,fx)
	Else
		If EntityClass(ent)="Mesh" Then EntityFX ent,blend
	EndIf
Next
End Function

Function AnimEntityBlend(aent,blend)
Local ent
EntityBlend aent,blend
For c=1 To CountChildren(aent)
	ent=GetChild(aent,c)
	If CountChildren(ent)>0
		AnimEntityBlend(ent,blend)
	Else
		If EntityClass(ent)="Mesh" Then EntityBlend ent,blend
	EndIf
Next
End Function

Function AnimEntityPickMode(aent,mode)
	EntityPickMode aent,mode,0
	For i=1 To CountChildren(aent)
		AnimEntityPickMode(GetChild(aent,i),mode)
	Next
End Function

Function AnimEntityAnimate(aent,mode=1,speed#=1,sequence=0,transition#=0)
	Local ent
	Animate(aent,mode,speed#,sequence,transition#)
	For c=1 To CountChildren(aent)
		ent=GetChild(aent,c)
		If CountChildren(ent)>0
			AnimEntityAnimate(ent,mode,speed#,sequence,transition#)
		Else
			Animate(ent,mode,speed#,sequence,transition#)
		EndIf
	Next	
End Function