Показать сообщение отдельно
Старый 16.03.2007, 23:37   #5
HolyDel
 
Регистрация: 26.09.2006
Сообщений: 6,035
Написано 1,474 полезных сообщений
(для 2,707 пользователей)
Re: Проблема с AnimMesh

Function AnimEntityTexture(aent,tex)
Local ent
EntityTexture aent,tex,0,0
For c=1 To CountChildren(aent)
	ent=GetChild(aent,c)
	If CountChildren(ent)>0
	AnimEntityTexture(ent,tex)
	Else
	EntityTexture ent,tex,0,0
	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
	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
	EntityAlpha ent,a
	EndIf
Next
End Function
(Offline)
 
Ответить с цитированием