Вот так работает:
вызываю ф-ию
AddBang(n1#,y,n2#) описание
Function AddBang(n1#,y,n2#)
b.bang=New bang
b\obj=CopyEntity(bangsprite)
PositionEntity b\obj,n1#,y,n2#
RotateSprite b\obj,Rnd(-20,20)
End Function
Function UpdateBangs()
For b.bang=Each bang
If b\frame#>38.5
FreeEntity b\obj
Delete b
Else
EntityTexture b\obj,boomtex,b\frame#
b\frame#=b\frame#+1
EndIf
Next
End Function
Но мне нужно вот так:
вызываю ф-ию
AddBang(bomb\entity)
описание
Function AddBang(bomb)
b.bang=New bang
b\obj=CopyEntity(bangsprite, bomb)
;PositionEntity b\obj,n1#,y,n2#
RotateSprite b\obj,Rnd(-20,20)
End Function
Function UpdateBangs()
For b.bang=Each bang
If b\frame#>38.5
FreeEntity b\obj
Delete b
Else
EntityTexture b\obj,boomtex,b\frame#
b\frame#=b\frame#+1
EndIf
Next
End Function
Выдаёт ошибку Entity does not exist на строку EntityTexture b\obj,boomtex,b\frame#
Добавлено (21.03.2010, 13:48)
---------------------------------------------
как я понял он не находит b\obj, почему? или не то ...
Добавлено (21.03.2010, 14:24)
---------------------------------------------
Тему закрыть, сам исправил всё, забыл просто привязку убрать EntityParent b\obj,0