[ЛысыЙ_Чук-Иванчук]

Вот функция создания огня . Но я немогу понять почему количевство создаваемых световых источников ограничено (примерно 8.) .

Type lig_type
Field entity
End Type

Function light(Parr,par, tip, range#, y#, r, g, b, point=0)
s.lig_type=New lig_type
If parr=0 s\entity=CreateLight(tip)
If parr<>0 s\entity=CreateLight(tip,par)
PositionEntity s\entity,EntityX(par,True),y+EntityY(par,True),Ent ityZ(par,True)
LightRange s\entity,range
LightColor s\entity,r,g,b
If point=0:Else PointEntity s\entity,point : EndIf
End Function