// Закачать все котировки.mq4
// Скрипт. Поместить в папку experts\scripts
#property copyright "mandorr@gmail.com"
#include <WinUser32.mqh>
string Tickers="EURUSD,GBPUSD,AUDUSD,USDCHF,USDJPY,USDCAD,GBPJPY,GOLD";
void start() {
string title="Скрипт", msg="Закачать все котировки? ";
if (MessageBox(msg,title,MB_YESNO|MB_ICONQUESTION)!=IDYES) return;
string list[], symbol, tickers=StringTrimRight(StringTrimLeft(Tickers));
int i , index, j;
i=0;
index=StringFind(tickers,",",0);
while (index>0) {
symbol=StringSubstr(tickers,0,index);
tickers=StringSubstr(tickers,index+1);
if (StringLen(symbol)>0) {
i++;
ArrayResize(list,i);
list[i-1]=StringTrimRight(StringTrimLeft(symbol));
}
index=StringFind(tickers,",",0);
}
if (StringLen(tickers)>0) {
i++;
ArrayResize(list,i);
list[i-1]=StringTrimRight(StringTrimLeft(tickers));
}
double x;
for (i=0; i<ArraySize(list); i++) {
symbol=list[i];
msg="Закачивание котировок "+symbol+",M1"; Comment (msg);
for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_M1 ,j);
msg="Закачивание котировок "+symbol+",M5"; Comment (msg);
for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_M5 ,j);
msg="Закачивание котировок "+symbol+",M15"; Comment (msg);
for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_M15,j);
msg="Закачивание котировок "+symbol+",M30"; Comment (msg);
for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_M30,j);
msg="Закачивание котировок "+symbol+",H1"; Comment (msg);
for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_H1 ,j);
msg="Закачивание котировок "+symbol+",H4"; Comment (msg);
for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_H4 ,j);
msg="Закачивание котировок "+symbol+",D1"; Comment (msg);
for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_D1 ,j);
msg="Закачивание котировок "+symbol+",W1"; Comment (msg);
for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_W1 ,j);
msg="Закачивание котировок "+symbol+",MN1"; Comment (msg);
for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_MN1,j);
msg="Котировки для "+symbol+" закачены"; Comment (msg);
Sleep(750);
}
msg="Котировки закачены "; Comment (msg);
MessageBox(msg,title,MB_OK|MB_ICONINFORMATION);
Comment ("");
}
// End
|
