« Предыдущий пост | На главную страницу | Следующий пост »

Глобальные массивы: функция AddItem()

В этомы выпуске я опишу функцию AddItem(), которую мы будем использовать для добавления нового элемента в массив.

Вот ее исходный код:

//+--------------------------------------------------------------------------------------------------------+
//| Функция AddItem()                                                                            |
//|                                                                                                       |
//| Добавляет элемент в массив. Возвращает новое количество элементов|
//| в случае успешного добавления и -1 - в случае ошибки                       |
//|                                                                                                       |
//| Параметры:                                                                                      |
//|   array     - имя массива                                                                     |
//|   item      - новый элемент массива                                                     |
//|   is_sorted - флаг отсортированности массива (может быть изменен      |
//|               в процессе выполнения функции, если возникнут                  |
//|               ошибки при сортировке)                                                      |
//+--------------------------------------------------------------------------------------------------------+
int AddItem(string array, double item, bool &is_sorted)
  {
    // Залокировать критическую секцию
    string critical_section = array+"Lock";
    if (Lock(critical_section)!=0) return(-1); 

    // Количество элементов массива хранится в переменной с именем, 
    // равным имя массива + "Count"
    string gv_count;
    gv_count = array+"Count";
    
    int count, err;
    
    // Если глобальная переменная не существует, то элементов нет
    if (!GlobalVariableCheck(gv_count))
      {
       err = GetLastError();
       if (err!=0) 
        {
         // Разлокировать критическую секцию
         Unlock(critical_section);
         
         // Вывести сообщение об ошибке и выйти
         Print("AddItem()->GlobalVariableCheck(): ошибка ", err);
         return(-1);
        }
       else 
         count = 0;
      }
    else
       // переменная существует, получим количество элементов
       count = GlobalVariableGet(gv_count);

    // Увеличим число элементов массива
    count = count + 1;
    
    // добавим в массив элемент
    if (GlobalVariableSet(array+DoubleToStr(count, 0),item)==0)
      {
       // произошла ошибка при добавлении элемента
       
       // Разлокировать критическую секцию
       Unlock(critical_section);
         
       // Вывести сообщение об ошибке и выйти
       Print("AddItem()->GlobalVariableSet(item): ошибка ", GetLastError());
       return(-1);
      }

    // запишем новое число элементов в массиве
    if (GlobalVariableSet(gv_count,count)==0)
      {
       // произошла ошибка при изменении числа элементов
       
       // Разлокировать критическую секцию
       Unlock(critical_section);
         
       // Вывести сообщение об ошибке и выйти
       Print("AddItem()->GlobalVariableSet(count): ошибка ", GetLastError());
       return(-1);
      }    

    // массив сортированный?
    if (is_sorted)
      {
       // да, поэтому отсортируем массив
       int i;       
       for (i=count; i>1; i--)
         {
          double cur_item  = GlobalVariableGet(array+DoubleToStr(i, 0));
          double prev_item = GlobalVariableGet(array+DoubleToStr(i-1, 0));
          if (cur_item>prev_item) break;
          // поменять элементы местами
          if (GlobalVariableSet(array+DoubleToStr(i, 0),prev_item)==0)
            {
             is_sorted = false;
             break;
            }
          if (GlobalVariableSet(array+DoubleToStr(i-1, 0),cur_item)==0)
            {
             is_sorted = false;
             // пытаемся вернуть перезаписанный текущий элемент в первоначальное 
             // состояние
             if (GlobalVariableSet(array+DoubleToStr(i, 0),cur_item)==0) 
               {
                Print("AddItem()->GlobalVariableSet: данные безвозвратно испорчены");

                // Разлокировать критическую секцию
                Unlock(critical_section);

                return(-1);
               }  
             break;
            }    
         }
      }
    
    // Разлокировать критическую секцию
    Unlock(critical_section);
    
    return(count);
  }

Думаю, что у Вас не возникло проблем с пониманием этой функции. Возможно, что единственным непонятным местом может быть сортировка массива после вставки нового элемента. В этом случае мы просто "опускаем" новый элемент до тех пор, пока он не встанет на свое место:

    // массив сортированный?
    if (is_sorted)
      {
       // да, поэтому отсортируем массив
       int i;       
       for (i=count; i>1; i--)
         {
          double cur_item  = GlobalVariableGet(array+DoubleToStr(i, 0));
          double prev_item = GlobalVariableGet(array+DoubleToStr(i-1, 0));
          if (cur_item>prev_item) break;
          // поменять элементы местами
          if (GlobalVariableSet(array+DoubleToStr(i, 0),prev_item)==0)
            {
             is_sorted = false;
             break;
            }
          if (GlobalVariableSet(array+DoubleToStr(i-1, 0),cur_item)==0)
            {
             is_sorted = false;
             // пытаемся вернуть перезаписанный текущий элемент в первоначальное 
             // состояние
             if (GlobalVariableSet(array+DoubleToStr(i, 0),cur_item)==0) 
               {
                Print("AddItem()->GlobalVariableSet: данные безвозвратно испорчены");

                // Разлокировать критическую секцию
                Unlock(critical_section);

                return(-1);
               }  
             break;
            }    
         }
      }

Сортировку массива после добавления нового элемента мы производим только в том случае, если массив уже до этого был отсортирован, т.е. флаг is_sorted был равен true.

Если во время сортировки мы столкнулись с критической ошибкой (данные массива были испорчены), то мы выйдем с кодом -1. А если ошибка была некритическая (т.е. данные испорчены не были, но сортировка была прервана), то мы изменим значение флага is_sorted на false.

В следующем выпуске я расскажу о функции поиска в массиве.


Все статьи по теме "Пишем советников для MetaTrader 4".

Автор: Андрей Ведихин   |   Дата размещения: 19.12.2006 19:02
Постоянный адрес статьи:

« Предыдущий пост | На главную страницу | Следующий пост »

Комментарии по теме "Глобальные массивы: функция AddItem()"

Андрюша привет!
Я рад твоему продвижению вперёд,тем более,что у меня прекрасные вепчатления осталысь от общения с тобой в Москве на Форекс-експо в Радисон Славянская в прошлом году в Марте!
Очень ценью что ты так образованный человек и трудишься!
Прошу елси тебя не затруднит,войды в контакт со мной по АСКЕ 157358993,буду рад пообщатся и есть что сказать
Это Мераб из Харькова
Спасибо за вниманые!

Автор: Merab | 21.12.2006 17:24

Спасибо за комментарий.

Если честно, то практически перестал использовать аську для общения. Мой емейл все тот же.

Рабочий телефон: +44 20 7648 4560 (но возьмут трубку вначале англоговорящие сотрудники).

Автор: Андрей Ведихин | 26.12.2006 18:29

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: oprosrabota | 13.02.2008 12:19

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: oprosrabotka | 15.02.2008 08:40

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadom | 19.02.2008 02:34

Электронная Библия бармена. Видеоуроки рабочего и шоу-флейринга. Фото и новости в мире флейринга. Чемпионы и чемпионаты мира по флейрингу. Рекомендации по организации коктейльных вечеринок. Выступление Bar-show под руководством Сергея Владимировича Грибкова. Бармен-шоу.
Рецепты классических коктейлей, проведение мастер-классов по приготовлению коктейлей.

Автор: Sergey V Gribkov | 20.02.2008 10:59

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomkjgdfs | 25.02.2008 08:06

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomkjgdurt | 28.02.2008 07:47

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomkjgdurt | 28.02.2008 07:49

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomkjgdurt | 28.02.2008 07:50

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomkjgdurt | 28.02.2008 07:51

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomplgdurt | 04.03.2008 19:28

Блог для секретарей

Автор: raireappy | 04.03.2008 20:21

Блог для секретарей

Автор: raireappy | 04.03.2008 20:22

Блог для секретарей

Автор: raireappy | 04.03.2008 20:23

Блог для секретарей

Автор: raireappy | 04.03.2008 20:24

Всё для правоведов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 04.03.2008 21:20

Всё для правоведов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 04.03.2008 21:21

Всё для правоведов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 04.03.2008 21:22

Всё для правоведов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 04.03.2008 21:23

Блог для секретарей

Автор: raireappy | 04.03.2008 22:19

Блог для секретарей

Автор: raireappy | 04.03.2008 22:20

Всё для правоведов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 04.03.2008 23:16

Всё для правоведов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 04.03.2008 23:17

Всё для правоведов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 04.03.2008 23:18

Всё для правоведов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 04.03.2008 23:20

Блог для юристов

Автор: raireappy | 05.03.2008 00:14

Блог для юристов

Автор: raireappy | 05.03.2008 00:16

Всё для студентов-юристов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 05.03.2008 01:13

Всё для студентов-юристов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 05.03.2008 01:14

Всё для студентов-юристов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 05.03.2008 01:15

Всё для студентов-юристов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 05.03.2008 01:16

Блог для юристов

Автор: raireappy | 05.03.2008 02:07

Блог для юристов

Автор: raireappy | 05.03.2008 02:08

Блог для юристов

Автор: raireappy | 05.03.2008 02:09

Блог для юристов

Автор: raireappy | 05.03.2008 02:10

Всё для юристов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 05.03.2008 03:03

Всё для юристов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 05.03.2008 03:04

Всё для юристов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 05.03.2008 03:05

Всё для юристов : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 05.03.2008 03:07

Блог для юристов

Автор: raireappy | 05.03.2008 04:00

Всё для секретарей : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 05.03.2008 04:57

Всё для секретарей : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 05.03.2008 04:58

Всё для секретарей : кодексы, договоры, бланки....:

договоры]

Автор: nuancelosecop | 05.03.2008 05:00

Блог для секретарей

Автор: raireappy | 05.03.2008 05:55

Блог для секретарей

Автор: raireappy | 05.03.2008 05:56

Блог для секретарей

Автор: raireappy | 05.03.2008 05:57

Блог для секретарей

Автор: raireappy | 05.03.2008 05:58

Блог для студентов-юристов

Автор: raireappy | 05.03.2008 07:50

Блог для студентов-юристов

Автор: raireappy | 05.03.2008 07:51

Блог для студентов-юристов

Автор: raireappy | 05.03.2008 07:52

Блог для студентов-юристов

Автор: raireappy | 05.03.2008 07:53

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomplgdеurt | 05.03.2008 08:58

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomplgdеurt | 05.03.2008 09:00

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomplgdеurt | 05.03.2008 09:02

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomt | 06.03.2008 17:13

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomt | 06.03.2008 17:14

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomit | 07.03.2008 07:58

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomit | 07.03.2008 07:59

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomit | 07.03.2008 08:00

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabotadomit | 07.03.2008 08:01

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: rabdfdhadomit | 11.03.2008 08:02

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: internetrabotadom | 12.03.2008 07:50

Что такое саентология рон хаббард саентологи вся правда сайентология в питербурге дианетика.
Саентология рон хаббард саентолог хочу знать все сайентология в питербурге дианетика.

Автор: MaxExcand | 12.03.2008 07:51

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfuiyiu | 14.03.2008 08:05

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfuiyiuwr | 15.03.2008 07:56

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfuiyiuwr | 17.03.2008 08:10

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfuiyiuwr | 17.03.2008 08:11

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfuiyiuwr | 17.03.2008 08:13

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfuiyiuwrt | 18.03.2008 08:05

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfuiyiuwrtg | 19.03.2008 07:56

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfuiyiuwrtgy | 21.03.2008 08:52

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfсjjdfdjfjd | 14.04.2008 17:14

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfсjjdfdjfjd | 14.04.2008 17:15

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfсjjdfdjfjd | 14.04.2008 17:17

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: gfdgfсjjdfdjfjd | 14.04.2008 17:18

Наше Детективное агентство основано командой профессионалов, выходцев из структур МВД и ФСБ. Детективное сыскное агентство имеет хорошие рабочие отношения с действующими работниками МВД, ФСБ и Прокуратуры.
детективное агентство санкт петербург

Автор: detectrus | 17.04.2008 07:08

Предлагаем помощь в получение гражданства Украины, разрешение на ПМЖ, ВНЖ, помощь в получении Киевской прописки.
Оказываем помощь в оформлении разрешения на временное проживание на Украине.
Оказываем услуги по регистрации предприятий в Украине.
Подробнее о наших услугах Вы сможете узнать на сайте http://www.uila.biz/ (Ukraine Immigration Lawyers Association)

Автор: uilaim@rambler.ru | 17.04.2008 15:17

Интересная статья. Извлекли много полезного.

Автор: Гражданство Украина | 26.04.2008 07:41

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: jldskjflkjsert | 29.04.2008 13:33

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: jldskjflkjsert | 29.04.2008 13:35

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: jldskjflkjsert | 29.04.2008 13:36

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: jldskjflkjsert | 29.04.2008 13:37

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: jldskjflkjsert | 01.05.2008 08:37

Салон красоты "АЖУР" в Митино представляет вашему вниманию весь комплекс услуг по ухаживанию за телом: уменьшению веса, коррекции фигуры, разнообразие обертываний, LPG и т.д. Выполняя рекомендации наших специалистов вы уверенно достигните уменьшение объема тела, повышение упругости кожи, снижение
эффекта целлюлита. Корректура качества кожи, превосходное настроение и жизненный тонус гарантированы! Очистка организма от шлаков - детокс. (495)544-23-61

Автор: Hertetapem | 01.05.2008 10:15

Салон красоты "Ажур" в Митино рекомендует вашему вниманию полный набор услуг по ухаживанию за телом: уменьшению веса, коррекции фигуры, обертывания, LPG и т.д. Соблюдая советы наших специалистов вы уверенно достигните уменьшение объема тела, повышение упругости кожи, снижение
эффекта целлюлита. Совершенствование качества кожи, отличное настроение и жизненный тонус гарантированы! Очищение организма от шлаков - детокс. (495)544-23-61

Автор: Hertetapem | 01.05.2008 10:42

Салон красоты - "Ажур" в Митино рекомендует вашему вниманию полный комплекс услуг по уходу за телом: снижению веса, коррекции фигуры, разнообразные обертывания, LPG и т.д. Соблюдая советы наших мастеров вы уверенно достигните уменьшение объема тела, повышение упругости кожи, уменьшение
эффекта целлюлита. Повышение качества кожи, замечательное настроение и жизненный тонус гарантированы! Очищение организма от шлаков - детокс. (495)544-23-61

Автор: Hertetapem | 01.05.2008 20:34

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: jldskjflkjseqw | 06.05.2008 08:32

Фирме требуются участники опросов.
Приветствуется знание английского языка (базовый уровень) и компьютера.
uxxicom. com

Автор: jldskjflkjseqw | 08.05.2008 10:09

парковая мебель из тика

ШЕЗЛОНГИ И ЛЕЖАКИ ПЛЯЖНЫЕ ИЗ ТИКА СО СКЛАДА В МОСКВЕ
эксклюзивная тиковая мебель со склада в Москве по
доступным ценам. Предложение ограничено.
http://www.hoteler.ru +7926 - 5514366 +7-495-6204609

Зонты пляжные

Автор: hotel-california | 09.05.2008 19:12

Пленка полиэтиленовая производим от 15 см до 90 см любого цвета от 500 кг. на позицию
Качество высокое гарантия ровности намотки и толщины. Нам 10 лет на рынке.
Мешки для мусора производим от 60 л. до 500 литров (до 150*150 см) любого цвета.
Мешки для шин, упаковки текстиля, товара, пакеты под картриджи, и другое.
Все цены на нашем сайте или по телефону

Автор: mirpackrus | 23.05.2008 03:26

Разместите свой комментарий по теме "Глобальные массивы: функция AddItem()"

Подписаться на мою рассылку


Рассылки Subscribe.Ru
Методы анализа рынка ФОРЕКС / FOREX. Торговые стратегии

Размещение статьи "Глобальные массивы: функция AddItem()" на Вашем сайте

Размещение статьи "Глобальные массивы: функция AddItem()" на Вашем сайте возможно при условии выполнениия следующих условий:

  • Запрещается изменение оригинального текста без согласия автора - Андрея Ведихина.
  • Должен быть указан первоисточник. В случае публикации в интернете Вы должны разместить следующий код гиперссылки без изменений:
  • Запрещается коммерческое использование материалов, взятых с блога "Интернет-трейдинг на форекс / forex". Доступ к ним должен быть свободным, без взимания какой-либо платы, без обязательной регистрации и/или заполнения опросного листа (анкеты) и т.д.

В случае выполнения данных условий не требуется согласия автора блога "Интернет-трейдинг на форекс / forex" на размещение статьи "Глобальные массивы: функция AddItem()" на Вашем сайте.