http://forum.quik.ru Новое в теме КАК ВЗЯТЬ ЗНАЧЕНИЕ ПРЕДЫДУЩАЯ СВЕЧИ форума на сайте Форум QUIK [forum.quik.ru] ru http://backend.userland.com/rss2 Sat, 04 Apr 2026 20:41:05 +0300 КАК ВЗЯТЬ ЗНАЧЕНИЕ ПРЕДЫДУЩАЯ СВЕЧИ в форуме Программирование на языке QPILE.
ДОБРЫЙ ДЕНЬ ! ПОДСКАЖИТЕ  , В ПОРТФЕЛИ НАПИСАН КОД ОН РАБОТАЕТ ВСЁ НОРМАЛЬНО НО Я ХОТЕЛ УЗНАТЬ ТАКУЮ ВЕЩЬ ,КОД ПОКАЖЫВАЕТ ТЕКУЩУЮ СВЕЧУ НАЗОВЁМ ЕЁ НУЛЕВОЙ ,А МНЕ НУЖНЫ ЗНАЧЕНИЯ ПРЕДЫДУЩЕЙ СВЕЧИ , КАК ЭТО СДЕЛАТЬ ПОЖАЛУЙСТА ПОДСКАЖИТЕ И НАПИШИТЕ КОД

PORTFOLIO_EX робокоп;
DESCRIPTION робокоп;
CLIENTS_LIST ALL_CLIENTS;
FIRMS_LIST FIRMID;
USE_CASE_SENSITIVE_CONSTANTS;

PROGRAM

'=== БЛОК ПОЛУЧЕНИЯ ДАТЫ И ВРЕМЕНИ ===
NEW_GLOBAL("DT", GET_DATETIME())
DTLINE = GET_VALUE(DT,"DATETIME")
DAY = SUBSTR(DTLINE, 0 , 2)      'ДЕНЬ
MONTH = SUBSTR(DTLINE, 3 , 2)    'МЕСЯЦ
YEAR = SUBSTR(DTLINE, 6 , 4)     'ГОД
DATE = YEAR & MONTH & DAY        'СКЛЕЙКА ДАТЫ

HOUR = SUBSTR(DTLINE, 11 , 2)    'ЧАСЫ
MINUTE = SUBSTR(DTLINE, 14 , 2)  'МИНУТЫ
SECOND = SUBSTR(DTLINE, 17 , 2)  'СЕКУНДЫ
TIME = HOUR & MINUTE & SECOND    'СКЛЕЙКА ВРЕМЕНИ
'=== КОНЕЦ ПОЛУЧЕНИЯ ДАТЫ И ВРЕМЕНИ ===

DT = GET_DATETIME() 'ОБНОВЛЕНИЕ ДАТЫ И ВРЕМЕНИ В СЛЕДУЩЕЙ ИТЕРАЦИИ

'=== БЛОК ПОЛУЧЕНИЕ ДАННЫХ С ГРАФИКА ===
FUNC GET_LINE(TAG)
  CANDLE = GET_CANDLE_EX(TAG, DATE, TIME)
  LINES = GET_VALUE(CANDLE,"LINES")
  LINE = GET_COLLECTION_ITEM(LINES,0)
  OPEN = GET_VALUE(LINE,"OPEN")+0
  HIGH = GET_VALUE(LINE,"HIGH")+0
  LOW = GET_VALUE(LINE,"LOW")+0  
  RESULT = GET_VALUE(LINE,"CLOSE")+0    
END FUNC
'===КОНЕЦ ПОЛУЧЕНИЕ ДАННЫХ С ГРАФИКА ===



P = GET_LINE("PRICE_LINE") 'ИДЕНТИФИКАТОР ЦЕНЫ

LOG(P)

'=== БЛОК ВЫВОД ДАННЫХ В ТАБЛИЦУ ===
FUNC LOG(CLOSE,OPEN,HIGH,LOW)
OUTPUT = CREATE_MAP()
OUTPUT = SET_VALUE(OUTPUT,"DATE",DATE)
OUTPUT = SET_VALUE(OUTPUT,"TIME",TIME)
OUTPUT = SET_VALUE(OUTPUT,"OPEN",OPEN)
OUTPUT = SET_VALUE(OUTPUT,"HIGH",HIGH)
OUTPUT = SET_VALUE(OUTPUT,"LOW",LOW)
OUTPUT = SET_VALUE(OUTPUT,"CLOSE",CLOSE)
END FUNC
DELETE_ALL_ITEMS() 'ФУНКЦИЯ УДАЛЕНИЯ СТАРЫХ ДАННЫХ ИЗ ТАБЛИЦЫ
ADD_ITEM(1,OUTPUT)
'=== КОНЕЦ ВЫВОД ДАННЫХ В ТАБЛИЦУ ===





END_PROGRAM

PARAMETER DATE;
PARAMETER_TITLE ДАТА;
PARAMETER_DESCRIPTION ДАТА;
PARAMETER_TYPE STRING(30);
END

PARAMETER TIME;
PARAMETER_TITLE ВРЕМЯ;
PARAMETER_DESCRIPTION ВРЕМЯ;
PARAMETER_TYPE STRING(30);
END

PARAMETER OPEN;
PARAMETER_TITLE ЦЕНА ОТК.;
PARAMETER_DESCRIPTION ЦЕНА ;
PARAMETER_TYPE STRING(30);
END

PARAMETER HIGH;
PARAMETER_TITLE ЦЕНА МАКС.;
PARAMETER_DESCRIPTION ЦЕНА ;
PARAMETER_TYPE STRING(30);
END

PARAMETER LOW;
PARAMETER_TITLE ЦЕНА МИН.;
PARAMETER_DESCRIPTION ЦЕНА ;
PARAMETER_TYPE STRING(30);
END

PARAMETER CLOSE;
PARAMETER_TITLE ЗАКР.;
PARAMETER_DESCRIPTION CLOSE;
PARAMETER_TYPE STRING(30);
END

END_PORTFOLIO_EX
23.04.2016 09:44:43, дмитрий б.]]> http://forum.quik.ru/messages/forum9/message15555/topic1728/ http://forum.quik.ru/messages/forum9/message15555/topic1728/ Sat, 23 Apr 2016 09:44:43 +0300 Программирование на языке QPILE