Price Data Components
Miscellaneous
3
Views
0
Downloads
0
Favorites
AllMinutes_v1
//+------------------------------------------------------------------+
//| AllMinutes.mq4 |
//| Copyright © 2006, komposter |
//| mailto:komposterius@mail.ru |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2006, komposter"
#property link "mailto:komposterius@mail.ru"
//----
#include <WinUser32.mqh>
// Ñïèñîê ãðàôèêîâ êîòîðûå íåîáõîäèìî îáðàáàòûâàòü, ðàçäåë¸ííûé çàïÿòîé (",")
extern string ChartList = "EURUSD1,GBPUSD1";
// Ðàçðåøèòü/çàïðåòèòü ðèñîâàòü áàðû â âûõîäíûå
// Åñëè == true, âûõîäíûå îñòàíóòñÿ íåçàïîëíåíûìè
// Åñëè == false, âûõîäíûå áóäóò çàïîëíåíû áàðàìè O=H=L=C
extern bool SkipWeekEnd = true;
// ×àñòîòà, ñ êîòîðîé áóäóò îáíîâëÿòüñÿ ãðàôèêè â ìèëèñåêóíäàõ
//- ×åì áîëüøå çíà÷åíèå, òåì ìåíüøå ðåñóðñîâ áóäåò èñïîëüçîâàòü ñêðèïò.
extern int RefreshLuft = 1000;
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
int init()
{
start();
return(0);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
int start()
{
int _GetLastError = 0, cnt_copy = 0, cnt_add = 0, temp[13];
int Charts = 0, pos = 0, curchar = 0, len = StringLen(ChartList);
string cur_symbol = "", cur_period = "", file_name = "";
string _Symbol[100]; int _Period[100], _PeriodSec[], _Bars[];
int HistoryHandle[], hwnd[], last_fpos[], pre_time[], now_time[];
double now_close[], now_open[], now_low[], now_high[], now_volume[];
double pre_close[], pre_open[], pre_low[], pre_high[], pre_volume[];
//---- ñ÷èòàåì êîëè÷åñòâî ãðàôèêîâ, êîòîðûå íåîáõîäèìî îáðàáîòàòü
while(pos <= len)
{
curchar = StringGetChar( ChartList, pos);
if(curchar > 47 && curchar < 58)
cur_period = cur_period + CharToStr( curchar );
else
{
if(curchar == ',' || pos == len)
{
MarketInfo(cur_symbol, MODE_BID);
if(GetLastError() == 4106)
{
Alert("Íåèçâåñòíûé ñèìâîë ", cur_symbol, "!!!");
return(-1);
}
if(iClose(cur_symbol, StrToInteger( cur_period ), 0) <= 0)
{
Alert( "Íåèçâåñòíûé ïåðèîä ", cur_period, "!!!" );
return(-1);
}
_Symbol[Charts] = cur_symbol; _Period[Charts] = StrToInteger(cur_period);
cur_symbol = ""; cur_period = "";
Charts ++;
}
else
cur_symbol = cur_symbol + CharToStr(curchar);
}
pos++;
}
Print("< - - - Íàéäåíî ", Charts, " êîððåêòíûõ ãðàôèêîâ. - - - >");
ArrayResize(_Symbol, Charts);
ArrayResize(_Period, Charts);
ArrayResize(HistoryHandle, Charts);
ArrayResize( hwnd, Charts);
ArrayResize(last_fpos, Charts);
ArrayResize( pre_time, Charts );
ArrayResize(now_time, Charts);
ArrayResize( now_close, Charts );
ArrayResize(now_open, Charts);
ArrayResize( now_low, Charts );
ArrayResize(now_high, Charts);
ArrayResize( now_volume, Charts );
ArrayResize(pre_close, Charts);
ArrayResize( pre_open, Charts );
ArrayResize(pre_low, Charts);
ArrayResize( pre_high, Charts );
ArrayResize(pre_volume, Charts);
ArrayResize( _PeriodSec, Charts );
ArrayResize(_Bars, Charts);
for(int curChart = 0; curChart < Charts; curChart++)
{
_PeriodSec[curChart] = _Period[curChart]*60;
//---- îòêðûâàåì ôàéë, â êîòîðûé áóäåì çàïèñûâàòü èñòîðèþ
file_name = StringConcatenate("ALL", _Symbol[curChart], _Period[curChart], ".hst");
HistoryHandle[curChart] = FileOpenHistory(file_name, FILE_BIN | FILE_WRITE);
if(HistoryHandle[curChart] < 0)
{
_GetLastError = GetLastError();
Alert("FileOpenHistory( \"", file_name, "\", FILE_BIN | FILE_WRITE )",
" - Error #", _GetLastError);
continue;
}
//---- Çàïèñûâàåì çàãîëîâîê ôàéëà
FileWriteInteger(HistoryHandle[curChart], 400, LONG_VALUE);
FileWriteString(HistoryHandle[curChart], "Copyright © 2006, komposter", 64);
FileWriteString(HistoryHandle[curChart],
StringConcatenate("ALL", _Symbol[curChart]), 12);
FileWriteInteger(HistoryHandle[curChart], _Period[curChart], LONG_VALUE);
FileWriteInteger(HistoryHandle[curChart],
MarketInfo(_Symbol[curChart], MODE_DIGITS), LONG_VALUE);
FileWriteInteger(HistoryHandle[curChart], 0, LONG_VALUE); //timesign
FileWriteInteger(HistoryHandle[curChart], 0, LONG_VALUE); //last_sync
FileWriteArray (HistoryHandle[curChart], temp, 0, 13);
//+------------------------------------------------------------------+
//| Îáðàáàòûâàåì èñòîðèþ |
//+------------------------------------------------------------------+
_Bars[curChart] = iBars(_Symbol[curChart], _Period[curChart]);
pre_time[curChart] = iTime(_Symbol[curChart], _Period[curChart], _Bars[curChart] - 1);
for(int i = _Bars[curChart] - 1; i >= 1; i--)
{
//---- Çàïîìèíàåì ïàðàìåòðû áàðà
now_open[curChart] = iOpen(_Symbol[curChart], _Period[curChart], i);
now_high[curChart] = iHigh(_Symbol[curChart], _Period[curChart], i);
now_low[curChart] = iLow(_Symbol[curChart], _Period[curChart], i);
now_close[curChart] = iClose(_Symbol[curChart], _Period[curChart], i);
now_volume[curChart] = iVolume(_Symbol[curChart], _Period[curChart], i);
now_time[curChart] = iTime(_Symbol[curChart], _Period[curChart], i) /
_PeriodSec[curChart];
now_time [curChart] *= _PeriodSec[curChart];
//---- åñëè åñòü ïðîïóùåííûå áàðû,
while(now_time[curChart] > pre_time[curChart] + _PeriodSec[curChart])
{
pre_time[curChart] += _PeriodSec[curChart];
pre_time[curChart] /= _PeriodSec[curChart];
pre_time[curChart] *= _PeriodSec[curChart];
//---- åñëè ýòî íå âûõîäíûå,
if(SkipWeekEnd)
{
if(TimeDayOfWeek(pre_time[curChart]) <= 0 ||
TimeDayOfWeek(pre_time[curChart]) > 5)
continue;
if(TimeDayOfWeek(pre_time[curChart]) == 5)
{
if(TimeHour(pre_time[curChart]) == 23 ||
TimeHour(pre_time[curChart] +
_PeriodSec[curChart]) == 23)
continue;
}
}
//---- çàïèñûâàåì ïðîïóùåííûé áàð â ôàéë
FileWriteInteger(HistoryHandle[curChart], pre_time[curChart], LONG_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_close[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_close[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_close[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_close[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], 1, DOUBLE_VALUE);
FileFlush(HistoryHandle[curChart]);
cnt_add ++;
}
//---- çàïèñûâàåì íîâûé áàð â ôàéë
FileWriteInteger(HistoryHandle[curChart], now_time[curChart], LONG_VALUE);
FileWriteDouble(HistoryHandle[curChart], now_open[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], now_low[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], now_high[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], now_close[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], now_volume[curChart], DOUBLE_VALUE);
FileFlush(HistoryHandle[curChart]);
cnt_copy ++;
//---- çàïîìèíàåì çíà÷åíèå âðåìåíè è öåíó çàêðûòèÿ çàïèñàííîãî áàðà
pre_close[curChart] = now_close[curChart];
pre_time[curChart] = now_time[curChart] / _PeriodSec[curChart];
pre_time[curChart] *= _PeriodSec[curChart];
}
last_fpos[curChart] = FileTell(HistoryHandle[curChart]);
//---- âûâîäèì ñòàòèñòèêó
Print("< - - - ", _Symbol[curChart], _Period[curChart], ": áûëî ", cnt_copy,
" áàðîâ, äîáàâëåíî ", cnt_add, " áàðîâ - - - >");
Print("< - - - Äëÿ ïðîñìîòðà ðåçóëüòàòîâ, îòêðîéòå ãðàôèê \"ALL",
_Symbol[curChart], _Period[curChart], "\" - - - >");
}
//+------------------------------------------------------------------+
//| Îáðàáàòûâàåì ïîñòóïàþùèå òèêè
//+------------------------------------------------------------------+
while(!IsStopped())
{
RefreshRates();
for(curChart = 0; curChart < Charts; curChart ++)
{
//---- ñòàâèì "êóðñîð" ïåðåä ïîñëåäíèì áàðîì
//---- (ýòî íåîáõîäèìî íà âñåõ çàïóñêàõ, êðîìå ïåðâîãî)
FileSeek(HistoryHandle[curChart], last_fpos[curChart], SEEK_SET);
//---- Çàïîìèíàåì ïàðàìåòðû áàðà
now_open[curChart] = iOpen(_Symbol[curChart], _Period[curChart], 0);
now_high[curChart] = iHigh(_Symbol[curChart], _Period[curChart], 0);
now_low[curChart] = iLow(_Symbol[curChart], _Period[curChart], 0);
now_close[curChart] = iClose(_Symbol[curChart], _Period[curChart], 0);
now_volume[curChart] = iVolume(_Symbol[curChart], _Period[curChart], 0);
now_time[curChart] = iTime(_Symbol[curChart], _Period[curChart], 0) /
_PeriodSec[curChart];
now_time[curChart] *= _PeriodSec[curChart];
//---- åñëè áàð ñôîðìèðîâàëñÿ,
if(now_time[curChart] >= pre_time[curChart] + _PeriodSec[curChart])
{
//---- çàïèñûâàåì ñôîðìèðîâàâøèéñÿ áàð
FileWriteInteger(HistoryHandle[curChart], pre_time[curChart], LONG_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_open[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_low[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_high[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_close[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_volume[curChart], DOUBLE_VALUE);
FileFlush(HistoryHandle[curChart]);
//---- çàïîìèíàåì ìåñòî â ôàéëå, ïåðåä çàïèñüþ 0-ãî áàðà
last_fpos[curChart] = FileTell( HistoryHandle[curChart] );
}
//---- åñëè ïîÿâèëèñü ïðîïóùåííûå áàðû,
while(now_time[curChart] > pre_time[curChart] + _PeriodSec[curChart])
{
pre_time[curChart] += _PeriodSec[curChart];
pre_time[curChart] /= _PeriodSec[curChart];
pre_time[curChart] *= _PeriodSec[curChart];
//---- åñëè ýòî íå âûõîäíûå,
if(SkipWeekEnd)
{
if(TimeDayOfWeek(pre_time[curChart]) <= 0 ||
TimeDayOfWeek(pre_time[curChart]) > 5 )
continue;
if(TimeDayOfWeek(pre_time[curChart]) == 5)
{
if(TimeHour(pre_time[curChart]) == 23 ||
TimeHour(pre_time[curChart] + _PeriodSec[curChart]) == 23)
continue;
}
}
//---- çàïèñûâàåì ïðîïóùåííûé áàð â ôàéë
FileWriteInteger(HistoryHandle[curChart], pre_time[curChart], LONG_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_close[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_close[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_close[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], pre_close[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], 1, DOUBLE_VALUE);
FileFlush(HistoryHandle[curChart]);
//---- çàïîìèíàåì ìåñòî â ôàéëå, ïåðåä çàïèñüþ 0-ãî áàðà
last_fpos[curChart] = FileTell(HistoryHandle[curChart]);
}
//---- çàïèñûâàåì òåêóùèé áàð
FileWriteInteger(HistoryHandle[curChart], now_time[curChart], LONG_VALUE);
FileWriteDouble(HistoryHandle[curChart], now_open[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], now_low[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], now_high[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], now_close[curChart], DOUBLE_VALUE);
FileWriteDouble(HistoryHandle[curChart], now_volume[curChart], DOUBLE_VALUE);
FileFlush(HistoryHandle[curChart]);
//---- çàïîìèíàåì ïàðàìåòðû çàïèñàííîãî áàðà
pre_open[curChart] = now_open[curChart];
pre_high[curChart] = now_high[curChart];
pre_low[curChart] = now_low[curChart];
pre_close[curChart] = now_close[curChart];
pre_volume[curChart] = now_volume[curChart];
pre_time[curChart] = now_time[curChart] / _PeriodSec[curChart];
pre_time[curChart] *= _PeriodSec[curChart];
//---- íàõîäèì îêíî, â êîòîðîå áóäåì "îòïðàâëÿòü" ñâåæèå êîòèðîâêè
if(hwnd[curChart] == 0)
{
hwnd[curChart] = WindowHandle(StringConcatenate( "ALL", _Symbol[curChart]),
_Period[curChart]);
if(hwnd[curChart] != 0)
{
Print("< - - - Ãðàôèê ", "ALL" + _Symbol[curChart],
_Period[curChart], " íàéäåí! - - - >");
}
}
//---- è, åñëè íàøëè, îáíîâëÿåì åãî
if(hwnd[curChart] != 0)
PostMessageA(hwnd[curChart], WM_COMMAND, 33324, 0);
}
Sleep(RefreshLuft);
}
for(curChart = 0; curChart < Charts; curChart ++)
{
if(HistoryHandle[curChart] >= 0)
{
//---- çàêðûâàåì ôàéë
FileClose(HistoryHandle[curChart]);
HistoryHandle[curChart] = -1;
}
}
return(0);
}
//+------------------------------------------------------------------+
Comments