function GetNear(const Name: String = ''; Range: Cardinal = 1000): TLive; overload;
procedure Add(Obj: TSpawn);