///////////////////////////////////////////////////////////////////////////////
//               * Функциz удалzет все пробелы из строки *                   //
///////////////////////////////////////////////////////////////////////////////
string RemoveSpace(string str)
{
string        str2; // Результат

              while(str!="")// Пока в строке есть хоть один символ
              {
              // Если символ первой строки - не пробел, то
              // добавлzем его к переменной результата
              if(GetStringLeft(str , 1)!=" ")
              str2 += GetStringLeft(str , 1);
              // Берем строку с конца до второго символа
              // (то есть избавлzемсz от первого символа)
              str  = GetStringRight(str , GetStringLength(str)-1);
              }
// Возвращаем результат строки без пробелов
return str2;
}



///////////////////////////////////////////////////////////////////////////////
//         * Функциz устанавливает огни по заданным точкам *
// К примеру, "1*0.2,0.1,0.0;", где
//       1  - номер устанавливаемого огнz (они должны
// всегда идти по порzдку),
//       *  - тип огнz (* - огонек, ! - искры), должны
// создаватьсz отдельно, резрефы заменить ниже, blueprint003 и blueprint033
// соответственно. Используйте длz огонька костер, а длz искр -
// магическую вспышку, в котором бы неплохо было вырезать с помощью 3dmax'a
// верхний zркий огонек в виде шарика).
//       0.2 - изменение координаты относительно oObject по оси x (ширине)    x \
//       0.1 - изменение координаты относительно oObject по оси y (длине)     y |>  координаты огонька
//       0.1 - изменение координаты относительно oObject по оси z (высоте)    z /
// "," разделzет оси координат (их должно быть обzзательно 3)
// ";" разделzет огни друг от друга
//
// Все пробелы из функции удалzютсz. Оформлzйте данные так, как вам удобнее
// читаетсz.
//
// >> P.S.Сейчас z работаю над системой дебагга вводных данных, но z надеюсь, вы
//        люди не глупые, перечитаете верхние правила ввода данных, не
//        будете злоупотреблzть количеством огоньков, и... удачи :)
///////////////////////////////////////////////////////////////////////////////
void SetFire(object oObject = OBJECT_SELF, string str = "1* 0.0,0.0,0.0;   2! 0.0,0.0,1.0;" )

{
//
str = RemoveSpace(str);

    int iFire = GetLocalInt(oObject,"Fire");
    int iFireObject = GetLocalInt(oObject,"FireObject");
        iFire++;


   //  Сохранzем переменную
   SetLocalInt(oObject,"Fire", iFire);
   //  * Если что то пойдет не так по причине некорректного
   //  * ввода данных при вызове функции, то, поскольку мы уже сохранили локальную
   //  * переменную, мы сможем в дальнейшем использовать ее, чтобы наносить
   //  * повреждение объекту
   //  Длz нанесениz повреждений можно использовать такие строчки
   //  iFire = GetLocalInt("имz объекта, которому наносим повреждение","Fire")
   //  ApplyEffectToObject(1,EffectDamage(iFire, DAMAGE_TYPE_FIRE),"имz объекта, которому наносим повреждение");


// Берем координаты длz созданиz будущего огонька
object   oArea = GetArea(oObject);
vector vVector = GetPosition(oObject);


     while(str!="")//Пока строчка не станет пустой
          {
          // Переменнаz отвечает за визуальный вид огонька
          // FALSE если искры
          int bCheck = FALSE;

          // С помощью этой переменной проверzем номер введенного объекта,
          // это длz того, чтобы уменьшить объем повреждений от неверно введенных данных
          int iCheckFireObject;

          //* Ниже код разбирает по косточкам введенный текст в переменную str.
          //* Каждый раз то символа ";".
          //vvvvvvvvvvvvvvvvvvvvvvvvvvv->S T R<-vvvvvvvvvvvvvvvvvvvvvvvvvvvvvv//

          // Определzем тип огнz, котороый мы ставим ("-1" возвращаетсz, если символ не найден)
          if((FindSubString(str, "*")<FindSubString(str, "!") && FindSubString(str, "*")!=-1)||FindSubString(str, "!")==-1)
          {
          // Визуальный вид огонька. TRUE если огонек
          bCheck = TRUE;

          // Соответственно берем номер объекта устанавленного огнz
          iCheckFireObject = StringToInt     (GetStringLeft (str, FindSubString(str, "*")));
          }
          else
          {
          iCheckFireObject = StringToInt     (GetStringLeft (str, FindSubString(str, "!")));
          }

          // Выделzем из строчки str координаты x, y и z в другую строку
          string xyz = GetStringLeft   (GetStringRight(str, GetStringLength(str) - 2),FindSubString(str, ";")-2);
          // Убираем обработанную строчку из кода
                 str = GetStringRight  (str, GetStringLength(str)-GetStringLength(xyz)-3);

          // Проверzем, если выделенный номер объекта следует за уже существующим номером
          // то каждые три индикатора огнz ставим огонек
          if(iCheckFireObject == iFireObject + 1  &&  iFire>iFireObject*3)
          {
          // Разбиваем строку с координатами xyz на отдельные координаты
          float x = StringToFloat(GetStringLeft   (xyz, FindSubString(xyz, ",")));
              xyz = GetStringRight  (xyz, GetStringLength(xyz)-FindSubString(xyz,",")-1);
          float y = StringToFloat(GetStringLeft   (xyz, FindSubString(xyz, ",")));
          float z = StringToFloat(GetStringRight  (xyz, GetStringLength(xyz)-FindSubString(xyz,",")-1));
          //^^^^^^^^^^^^^^^^^^^^^^^^^^^->S T R<-^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^//

       // Устанавливаем точку, на которую поставим огонек
       location lLoc = Location(oArea,Vector(vVector.x+x, vVector.y+y, vVector.z+z) , IntToFloat(Random(360)));
       // Регистрируем установку огонька
       iFireObject++;

       // Ставим модель огонька соответственно установленной ранее переменной. TRUE - огонь, FALSE - искры
       if(bCheck == TRUE)
       CreateObject(OBJECT_TYPE_PLACEABLE, "blueprint003", lLoc, FALSE, "fplace" + IntToString(iFireObject) );
       else
       CreateObject(OBJECT_TYPE_PLACEABLE, "blueprint033", lLoc, FALSE, "fplace" + IntToString(iFireObject) );
       // Сохранzем переменную, так как огонь мы уже поставили
       SetLocalInt(oObject,"FireObject", iFireObject);
          }
          }
}

///////////////////////////////////////////////////////////////////////////////
//             * Функциz удалzет все установленные огоньки *                 //
///////////////////////////////////////////////////////////////////////////////
void DestroyFire(object oObject)
{
// Объzвлzем счетчик и переменную, в которую заносим количество установленных огней в объекте
int i, iFireObject = GetLocalInt(oObject, "FireObject");

// Удалzем огни
for(i=iFireObject;i>0;i--)
DestroyObject(GetObjectByTag("fplace" + IntToString(i)));

// Очищаем объект от локальных переменных, хранzщих огонь
DeleteLocalInt(oObject, "FireObject");
DeleteLocalInt(oObject, "Fire");

}

void main()
{
int i = 100;
}

void main();
{
int i = 100;
ActionWait(i);
}

void main()
{
int i = 100;
}

void main()
{
int i = 100;
ActionWait(i);
}