Всем привет. Такая проблема: у меня есть два типа. Тип снарядов и тип танков. При создании снаряда значению sn\cel присваевается мешь танка- цели снаряда.
For tank1.tank=Each Tank
-//-
Tank1\zar=Tank1\zar+1
If Tank1\zar>100 Then
PointEntity Tank1\bahn,Tank1\ent_dr
Tank1\zar=0
sn.puli=New puli
sn\entity=CopyEntity(snar,Tank1\bahn)
sn\cel=Tank1\ent_dr
PointEntity sn\entity,Tank1\ent_dr
PositionEntity sn\entity,0,0.5,9
;PositionEntity sn\entity, EntityX(bahna),EntityY(bahna),EntityZ(bahna)
EntityParent sn\entity,0
EntityType sn\entity, SHOT
EndIf
; If Tank1\zar<100 Then Tank1\zar = Tank1\zar+1
DebugLog +Tank1\storona+" "+Tank1\zar
-//-
next
Далее в функции полёта снаряда проверяется, если дистанция между снарядом и танком- целью меньше 3 то идёт анимация взрыва, удаление снаряда, и ещё я хочу чтобы в типе , к которому принадлежит этот мешь танка- цели значение "жизнь" те Tank1\live=Tank1\live=-50.
Function up_wsp()
For sn.puli= Each puli
MoveEntity sn\entity ,0,0,1
sn\time_live =sn\time_live +1
If sn\time_live >100 Or EntityDistance(sn\entity,sn\cel)<3 Then
wz.wzriww=New wzriww
wz\ent=CopyEntity(wzriw)
PositionEntity wz\ent,EntityX(sn\entity),EntityY(sn\entity),EntityZ(sn\entity)
wz\frame=1
FreeEntity sn\entity:Delete sn: Return
EndIf
;DebugLog +a\time_live
Next
End Function
Собственно вопрос, как получить доступ к полю списка, к которому принадлежит эта мешь.
Вродебы объяснил нормально, по крайне мере смысл уловить можно...