MMGP logo
Присоединяйтесь к нашему инвестиционному форуму, на котором уже 648,886 пользователей. Чтобы получить доступ ко многим закрытым разделам и начать общение - зарегистрируйтесь прямо сейчас.
Программы для торговли на Форекс и Фондовом рынке: MetaTrader, Metastock и др. Торговые стратегии на базе этих программ (MetaQuotes Language 4 (MQL4). Советники, индикаторы, скрипты и прочие программы для торговли.
Первый пост Опции темы
Старый 03.01.2009, 14:08
#1
Интересующийся
 
Пол: Мужской
Адрес: Читинская область
Инвестирую в: ?
Регистрация: 29.10.2008
Сообщений: 24
Благодарностей: 0
Торговый робот Fundamental Trader DailyFX_MQL4

Подскажите пожалуйста кто то работал с этим роботом.Новости показывает но не торгует сам.Что нужно сделать чтобы он стал сам торговать разрешение на торговлю я ему делаю.
ЕСергей вне форума
Старый 03.01.2009, 14:14
#2
Мастер
 
Имя: Дмитрий
Пол: Мужской
Возраст: 37
Адрес: Пермь
Инвестирую в: Свой бизнес
Регистрация: 17.05.2007
Сообщений: 2,022
Благодарностей: 458
Ответ: Торговый робот Fundamental Trader DailyFX_MQL4

для начала приатач его к своему посту..чтоб люди хоть посмотрели что за зверь..к сожалению мы не телепаты чтоб по названию сказать в чём проблема..
__________________
ещё 500 вёдер и золотой ключик наш!
ХЫШНИК вне форума
Старый 03.01.2009, 15:03
#3
Интересующийся
 
Пол: Мужской
Адрес: Читинская область
Инвестирую в: ?
Регистрация: 29.10.2008
Сообщений: 24
Благодарностей: 0
Автор темы Ответ: Торговый робот Fundamental Trader DailyFX_MQL4

Этот робот работает при выходе новостей
Time.mq4 в папку include

Time.mqh в папку library или libraries
str2double.dll в корневую папку
нужно скачать еще GetRight менеджер закачек с помощью его советник получает новости настройках нужно указать куда будет идти закачка C:Program fles/MT/expert/files/html
https://codebase.mql4.com/4543 ссылка где сам светник.Еще нужны индикаторы.
Вот сам советник если нужно.
//+------------------------------------------------------------------+
//| Fundamental Trader DailyFX.mq4 |
//| Fundamental Trader Freeware |
//| |
//+------------------------------------------------------------------+
//v0.04 | Fixed Risk/Reward
//v0.04 | Fixed Invalid Lots Issue
//v0.04 | Fixed to download calendar only when event is released, and not every minute of the Day
//v0.04 | Implemented to close position after an X amount of minutes
//v0.04 | Fixed, NZD order direction

#property copyright "Fundamental Trader Freeware"
#property link ""
//extern string HtmlAdress = "https://www.dailyfx.com/calendar/Dailyfx_Global_Economic_Calendar.csv";
//extern string HtmlAdress = "https://www.dailyfx.com/calendar/Dailyfx_Global_Economic_Calendar.csv?currentWeek=/events-calendar/2008/0921/&direction=none&collector=allInFolderDateDesc&view =week&timezone=GMT&currencyFilter=|&importanceFilt er=|";
extern string HtmlAdress = "https://www.dailyfx.com/calendar/Dailyfx_Global_Economic_Calendar.csv?currentcalend ar.csv";
extern string GetrightAdress = "c:\progra~1\getright\getright.exe";

extern int xTime=27; //time for EA to wait for news to be released
extern int MagicNumber=815; //order magicnumber
extern bool enable_close_time=false; //set to true to enable the function to close orders after certain amount of time has passed
extern int wait_time=20; //time the EA waits after the orders were executed, to close orders based on a time frame


//Risk and Reward Setup
extern int risk=20; //20 pip risk
extern int reward=3;//reward ratio multiplier, if risk is 20pip, then reward is 60pip

//external specification of minimim lots to trade and maximum lots to trade when news events are released
extern double lot1=0.01;extern double lot2=0.02;extern double lot3=0.03;extern double lot4=0.04;
extern double lot5=0.05;extern double lot6=0.06;extern double lot7=0.07;extern double lot8=0.08;
extern double lot9=0.09;extern double lot10=0.1;extern double lot11=0.11;extern double lot12=0.12;
extern double lot13=0.13;extern double lot14=0.14;extern double lot15=0.15;extern double lot16=0.16;
extern double lot17=0.17;extern double lot18=0.17;
//end of lots specification

#include <Time.mqh>
#import "kernel32.dll"
int WinExec(string NameEx, int dwFlags);
#import

#import "str2double.dll"
double StringToDouble(string str);
#import



int Max = 0;
datetime LastTimeDownloading = 0;
datetime OrderTime=0;
bool down_flag;

void DownloadCalendar()
{
Print("Downloading "+HtmlAdress+" to experts\files\html\Calendar.csv");
//FileDelete("\Html\Calendar.csv");
if(down_flag!=true){WinExec(GetrightAdress+" /URL:"+HtmlAdress+" /FILE:Calendar.csv /W /O",0);}
down_flag=true;
}

void CloseOrders()//function which closes opened orders after x amount of time has passed!
{
int opened_orders=OrdersTotal();
for (int fe=0;fe<opened_orders;fe++)
{
OrderSelect(fe, SELECT_BY_POS, MODE_TRADES); //check opened orders
if(enable_close_time==true && OrderMagicNumber()==MagicNumber && TimeCurrent()>OrderTime+wait_time*60 && OrderType()==OP_BUY)
{
double order_bid=MarketInfo(OrderSymbol(),MODE_BID);
OrderClose(OrderTicket(),OrderLots(),order_bid,3,V iolet);
}

if(enable_close_time==true && OrderMagicNumber()==MagicNumber && TimeCurrent()>OrderTime+wait_time*60 && OrderType()==OP_SELL)
{
double order_ask=MarketInfo(OrderSymbol(),MODE_ASK);
OrderClose(OrderTicket(),OrderLots(),order_ask,3,V iolet);
}
}
return;
}



void DownloadCal_prior_to_event()
{
int file1 = FileOpen("\Html\Calendar.csv",FILE_READ|FILE_CSV,' ,');
while (!FileIsEnding(file1))
{
string stDate1="";
while (!FileIsEnding(file1) && stDate1=="")
stDate1 = FileReadString(file1);
string stTime1 = FileReadString(file1);
string stTimeZone1 = FileReadString(file1);
string stCurrency1 = FileReadString(file1);
string stDescription1 = FileReadString(file1);
string stImportance1 = FileReadString(file1);
string stActual1 = FileReadString(file1);
string stForecast1 = FileReadString(file1);
string stPrevious1 = FileReadString(file1);
//Alert(stDate1,stTime1,stTimeZone1,stCurrency1,stDe scription1,stImportance1,stActual1,stForecast1,stP revious1);
datetime Date1 = ToDate(stDate1,stTime1);
if(Date1>(TimeCurrent()-(xTime*60)))
{
if(TimeCurrent()>Date1 && stTime1!="Time")
{
//Alert("time before event"+stTime1);
FileClose(file1);
WinExec(GetrightAdress+" /URL:"+HtmlAdress+" /FILE:Calendar.csv /W /O",0);
return;
}
}
}
//WinExec(GetrightAdress+" /URL:"+HtmlAdress+" /FILE:Calendar.csv /W /O",0);
FileClose(file1);
}

datetime PerviousMonday(datetime d)
{
datetime res = d - (TimeDayOfWeek(d)-1)*24*60*60;
return(res);
}


datetime ToDate(string stDate,string stTime)
{
string WeekDay = StringSubstr(stDate,0,3);
int WeekPlus = 0;
if (WeekDay=="Mon") WeekPlus=0;
if (WeekDay=="Tue") WeekPlus=1;
if (WeekDay=="Wed") WeekPlus=2;
if (WeekDay=="Thu") WeekPlus=3;
if (WeekDay=="Fri") WeekPlus=4;
if (WeekDay=="Sat") WeekPlus=5;
if (WeekDay=="Sun") WeekPlus=-1;

datetime Res = PerviousMonday(GetTimeGMT())+WeekPlus*24*60*60;
datetime Tm = StrToTime(stTime);
Res=Res+TimeHour(Tm )*60*60+TimeMinute(Tm )*60+TimeSeconds(Tm )
-TimeHour(Res)*60*60-TimeMinute(Res)*60-TimeSeconds(Res);
if((StringFind(stTime,"12"))>=0 && (StringFind(stTime,"AM"))>=0){Res=Res-(TimeHour(Tm )*60*60)-(TimeMinute(Tm )*60);}
if (StringFind(stTime,"PM")>=0)
Res+=12*60*60;
Res=Res-GetShiftGMT();
if((StringFind(stTime,"12"))>=0 && (StringFind(stTime,"PM"))>=0){Res=Res-(TimeHour(Tm )*60*60)-(TimeMinute(Tm )*60);}
//if(stTime=="12:15 PM" || stTime=="12:30 PM" || stTime=="12:45 PM"){Res=Res-(TimeHour(Tm )*60*60)-(TimeMinute(Tm )*60);}
return (Res);
}

void GrabNews()
{
int file = FileOpen("\Html\Calendar.csv",FILE_READ|FILE_CSV,' ,');
if (file==-1||FileSize(file)==0)
return;

int i=0;
while (!FileIsEnding(file))
{
string stDate="";
while (!FileIsEnding(file) && stDate=="")
stDate = FileReadString(file);


string stTime = FileReadString(file);
string stTimeZone = FileReadString(file);
string stCurrency = FileReadString(file);
string stDescription = FileReadString(file);
string stImportance = FileReadString(file);
string stActual = FileReadString(file);
string stForecast = FileReadString(file);
string stPrevious = FileReadString(file);
//Alert(stDate,stTime,stTimeZone,stCurrency,stDescri ption,stImportance,stActual,stForecast,stPrevious) ;


datetime Date = ToDate(stDate,stTime);
//Alert(TimeCurrent()+" "+(TimeCurrent()-(15*60)));
if(Date>(TimeCurrent()-(xTime*60)))//give xTime minutes to the EA to wait for news to be released

{
//Alert(Date+" "+(TimeCurrent()));//-(15*60)));
Comment("Date: ",stDate,
"\n","Time: ",stTime,
"\n","TimeZone: ",stTimeZone,
"\n","Currency: ",stCurrency,
"\n","Description: ",stDescription,
"\n","Importance: ",stImportance,
"\n","Actual: ",stActual,
"\n","Forecast: ",stForecast,
"\n","Previous: ",stPrevious);

//double myvalue = StringToDouble("-$610");
//Alert("My value: " + myvalue);//DoubleToStr(myvalue, 2));
//Alert(Date+" "+TimeCurrent());

string ordercurrency="";
if(stCurrency=="EUR" ){ordercurrency="EURUSD";} //trading eurusd
if(stCurrency=="USD" ){ordercurrency="EURUSD";} //trading eurusd
if(stCurrency=="JPY" ){ordercurrency="USDJPY";} //trading usdjpy
if(stCurrency=="GBP" ){ordercurrency="GBPUSD";} //trading usdgbp
if(stCurrency=="CHF" ){ordercurrency="USDCHF";} //trading usdchf
if(stCurrency=="AUD" ){ordercurrency="AUDUSD";} //trading audusd
if(stCurrency=="CAD" ){ordercurrency="USDCAD";} //trading usdcad
if(stCurrency=="NZD" ){ordercurrency="NZDUSD";} //trading nzdusd
double atr=iATR(ordercurrency, 0, 14, 0);

//evaluation of SAR as stoploss and takeprofit
//double SAR=iSAR(ordercurrency,0,0.02,0.2,0);
//double close_price=iClose(ordercurrency,0,0);
//double diff=MathAbs(close_price-SAR);
//double cbid=MarketInfo(ordercurrency,MODE_BID); //buy is ask, sell is bid
//double cask=MarketInfo(ordercurrency,MODE_ASK);
//Alert("currentprice:"+close_price+" "+"Takeprofit: "+(cbid+diff)+" "+"Stoploss: "+(cask-diff));


//(2) states to enter the MarketInfo
//(1) when actual data is released, and it is compared to forecast, and make sure not to trade if event contains a symbol before integers, e.g. $56, the "$" causes the EA to stop
if(StringLen(stActual)>0 && StringLen(stForecast)>0 && stTime!="Time" && stImportance=="High")//&& StrToDouble(stActual)!=0 && StrToDouble(stForecast)!=0) //not zero, takes care of the symbol in front of event
{
//int percent_d_AF=MathAbs((MathAbs(StrToDouble(stActual )-StrToDouble(stForecast))/StrToDouble(stForecast))*100);//percent difference actual to forecast
double percent_d_AF=MathAbs((MathAbs(StringToDouble(stAct ual)-StringToDouble(stForecast))/StringToDouble(stForecast))*100);//percent difference actual to forecast
double lot_p=0;
if((percent_d_AF>0 && percent_d_AF<=3)){lot_p=lot1;}//0.1 lot
if((percent_d_AF>3 && percent_d_AF<=6)){lot_p=lot2;}//0.2 lots
if((percent_d_AF>6 && percent_d_AF<=9)){lot_p=lot3;}//0.3 lots
if((percent_d_AF>9 && percent_d_AF<=12)){lot_p=lot4;}//0.4 lots
if((percent_d_AF>12 && percent_d_AF<=15)){lot_p=lot5;}//0.5 lots
if((percent_d_AF>15 && percent_d_AF<=18)){lot_p=lot6;}//0.6 lots
if((percent_d_AF>18 && percent_d_AF<=21)){lot_p=lot7;}//0.7 lots
if((percent_d_AF>21 && percent_d_AF<=24)){lot_p=lot8;}//0.8 lots
if((percent_d_AF>24 && percent_d_AF<=27)){lot_p=lot9;}//0.9 lots
if((percent_d_AF>27 && percent_d_AF<=30)){lot_p=lot10;}//1 lots
if((percent_d_AF>30 && percent_d_AF<=40)){lot_p=lot11;}//2 lots
if((percent_d_AF>40 && percent_d_AF<=50)){lot_p=lot12;}//3 lots
if((percent_d_AF>50 && percent_d_AF<=60)){lot_p=lot13;}//4 lots
if((percent_d_AF>60 && percent_d_AF<=70)){lot_p=lot14;}//5 lots
if((percent_d_AF>70 && percent_d_AF<=80)){lot_p=lot15;}//6 lots
if((percent_d_AF>80 && percent_d_AF<=90)){lot_p=lot16;}//7 lots
if((percent_d_AF>90 && percent_d_AF<=100)){lot_p=lot17;}//8 lots
if((percent_d_AF>100)) {lot_p=lot18;}//8 lots

if(StringToDouble(stActual)>StringToDouble(stForec ast))
{
Alert("Stronger(actual vs forecast): "+stCurrency+" "+"Time: "+stTime);
int total=OrdersTotal();
for(int cnt=0;cnt<total;cnt++)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES); //check opened orders
if(OrderComment()==stCurrency+stActual+stForecast+ "BUY" || OrderComment()==stCurrency+stActual+stForecast+"SE LL"){FileClose(file);Comment("\n"+"Live Trade Open"+OrderTicket());return(0);}
}
int historytotal=OrdersHistoryTotal();
for(cnt=0;cnt<historytotal;cnt++)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_HISTORY); //check opened orders
if(OrderComment()==stCurrency+stActual+stForecast+ "BUY" || OrderComment()==stCurrency+stActual+stForecast+"SE LL" || OrderComment()==stCurrency+stActual+stForecast+"BU Y[sl]" || OrderComment()==stCurrency+stActual+stForecast+"SE LL[sl]" ||OrderComment()==stCurrency+stActual+stForecast+" BUY[tp]" || OrderComment()==stCurrency+stActual+stForecast+"SE LL[tp]"){FileClose(file);Comment("\n"+"Trade Executed"+OrderTicket());return(0);}
}
if(stCurrency=="EUR"||stCurrency=="GBP"||stCurrenc y=="AUD"||stCurrency=="NZD"){double ask=MarketInfo(ordercurrency,MODE_ASK);double point1=MarketInfo(ordercurrency,MODE_POINT); OrderSend(ordercurrency,OP_BUY,lot_p,ask,3,ask-(risk*point1),ask+(reward*risk*point1),stCurrency+ stActual+stForecast+"BUY",MagicNumber);OrderTime=T imeCurrent();}
if(stCurrency=="CHF"||stCurrency=="CAD"||stCurrenc y=="JPY"||stCurrency=="USD"){double bid=MarketInfo(ordercurrency,MODE_BID); double point2=MarketInfo(ordercurrency,MODE_POINT);OrderS end(ordercurrency,OP_SELL,lot_p,bid,3,bid+(risk*po int2),bid-(reward*risk*point2),stCurrency+stActual+stForecas t+"SELL",MagicNumber);OrderTime=TimeCurrent();}

}


if(StringToDouble(stActual)<StringToDouble(stForec ast))
{
int total1=OrdersTotal();
for(cnt=0;cnt<total1;cnt++)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES); //check opened orders
if(OrderComment()==stCurrency+stActual+stForecast+ "BUY" || OrderComment()==stCurrency+stActual+stForecast+"SE LL"){FileClose(file);Comment("\n"+"Live Trade Open"+OrderTicket());return(0);}
}
int historytotal1=OrdersHistoryTotal();
for(cnt=0;cnt<historytotal1;cnt++)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_HISTORY); //check opened orders
if(OrderComment()==stCurrency+stActual+stForecast+ "BUY" || OrderComment()==stCurrency+stActual+stForecast+"SE LL" || OrderComment()==stCurrency+stActual+stForecast+"BU Y[sl]" || OrderComment()==stCurrency+stActual+stForecast+"SE LL[sl]" || OrderComment()==stCurrency+stActual+stForecast+"BU Y[tp]" || OrderComment()==stCurrency+stActual+stForecast+"SE LL[tp]"){FileClose(file);Comment("\n"+"Trade Executed"+OrderTicket());return(0);}
}
Alert("Weaker(actual vs forecast): "+stCurrency+" "+"Time: "+stTime);
if(stCurrency=="EUR"||stCurrency=="GBP"||stCurrenc y=="AUD"||stCurrency=="NZD"){double bidd=MarketInfo(ordercurrency,MODE_BID); double point3=MarketInfo(ordercurrency,MODE_POINT);OrderS end(ordercurrency,OP_SELL,lot_p,bidd,3,bidd+(risk* point3),bidd-(reward*risk*point3),stCurrency+stActual+stForecas t+"SELL",MagicNumber);OrderTime=TimeCurrent();}
if(stCurrency=="CHF"||stCurrency=="CAD"||stCurrenc y=="JPY"||stCurrency=="USD"){double askk=MarketInfo(ordercurrency,MODE_ASK); double point4=MarketInfo(ordercurrency,MODE_POINT);OrderS end(ordercurrency,OP_BUY,lot_p,askk,3,askk-(risk*point4),askk+(reward*risk*point4),stCurrency +stActual+stForecast+"BUY",MagicNumber);OrderTime= TimeCurrent();}

}

FileClose(file);
return(0); }


//(2) when actual data is released, and it is compared to the previous(string length of forecast==0)
if(StringLen(stActual)>0 && StringLen(stForecast)==0 && StringLen(stPrevious)>0 && stTime!="Time" && stImportance=="High")// && StrToDouble(stActual)!=0 && StrToDouble(stPrevious)!=0)
{
//int percent_d_AP=MathAbs((MathAbs(StrToDouble(stActual )-StrToDouble(stPrevious))/StrToDouble(stPrevious))*100);//percent difference actual to previous
double percent_d_AP=MathAbs((MathAbs(StringToDouble(stAct ual)-StringToDouble(stPrevious))/StringToDouble(stPrevious))*100);//percent difference actual to previous
double lot_pp=0;
if((percent_d_AP>0 && percent_d_AP<=3)){lot_pp=lot1;}//0.1 lot
if((percent_d_AP>3 && percent_d_AP<=6)){lot_pp=lot2;}//0.2 lots
if((percent_d_AP>6 && percent_d_AP<=9)){lot_pp=lot3;}//0.3 lots
if((percent_d_AP>9 && percent_d_AP<=12)){lot_pp=lot4;}//0.4 lots
if((percent_d_AP>12 && percent_d_AP<=15)){lot_pp=lot5;}//0.5 lots
if((percent_d_AP>15 && percent_d_AP<=18)){lot_pp=lot6;}//0.6 lots
if((percent_d_AP>18 && percent_d_AP<=21)){lot_pp=lot7;}//0.7 lots
if((percent_d_AP>21 && percent_d_AP<=24)){lot_pp=lot8;}//0.8 lots
if((percent_d_AP>24 && percent_d_AP<=27)){lot_pp=lot9;}//0.9 lots
if((percent_d_AP>27 && percent_d_AP<=30)){lot_pp=lot10;}//1 lots
if((percent_d_AP>30 && percent_d_AP<=40)){lot_pp=lot11;}//2 lots
if((percent_d_AP>40 && percent_d_AP<=50)){lot_pp=lot12;}//3 lots
if((percent_d_AP>50 && percent_d_AP<=60)){lot_pp=lot13;}//4 lots
if((percent_d_AP>60 && percent_d_AP<=70)){lot_pp=lot14;}//5 lots
if((percent_d_AP>70 && percent_d_AP<=80)){lot_pp=lot15;}//6 lots
if((percent_d_AP>80 && percent_d_AP<=90)){lot_pp=lot16;}//7 lots
if((percent_d_AP>90 && percent_d_AP<=100)){lot_pp=lot17;}//8 lots
if((percent_d_AP>100)) {lot_pp=lot18;}//8 lots


if(StringToDouble(stActual)>StringToDouble(stPrevi ous))
{
Alert("Stronger(actual vs previous): "+stCurrency+" "+"Time: "+stTime);
int total2=OrdersTotal();
for(cnt=0;cnt<total2;cnt++)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES); //check opened orders
if(OrderComment()==stCurrency+stActual+stPrevious+ "BUY" || OrderComment()==stCurrency+stActual+stPrevious+"SE LL"){FileClose(file);Comment("\n"+"Live Trade Open"+OrderTicket());return(0);}
}
int historytotal2=OrdersHistoryTotal();
for(cnt=0;cnt<historytotal2;cnt++)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_HISTORY); //check opened orders
if(OrderComment()==stCurrency+stActual+stPrevious+ "BUY" || OrderComment()==stCurrency+stActual+stPrevious+"SE LL" || OrderComment()==stCurrency+stActual+stPrevious+"BU Y[sl]" || OrderComment()==stCurrency+stActual+stPrevious+"SE LL[sl]" || OrderComment()==stCurrency+stActual+stPrevious+"BU Y[tp]" || OrderComment()==stCurrency+stActual+stPrevious+"SE LL[tp]"){FileClose(file);Comment("\n"+"Trade Executed"+OrderTicket());return(0);}
}
if(stCurrency=="EUR"||stCurrency=="GBP"||stCurrenc y=="AUD"||stCurrency=="NZD"){double askz=MarketInfo(ordercurrency,MODE_ASK);double point5=MarketInfo(ordercurrency,MODE_POINT);OrderS end(ordercurrency,OP_BUY,lot_pp,askz,3,askz-(risk*point5),askz+(reward*risk*point5),stCurrency +stActual+stPrevious+"BUY",MagicNumber);OrderTime= TimeCurrent();}
if(stCurrency=="CHF"||stCurrency=="CAD"||stCurrenc y=="JPY"||stCurrency=="USD"){double bidz=MarketInfo(ordercurrency,MODE_BID); double point6=MarketInfo(ordercurrency,MODE_POINT);OrderS end(ordercurrency,OP_SELL,lot_pp,bidz,3,bidz+(risk *point6),bidz-(reward*risk*point6),stCurrency+stActual+stPreviou s+"SELL",MagicNumber);OrderTime=TimeCurrent();}
}



if(StringToDouble(stActual)<StringToDouble(stPrevi ous))
{
Alert("Weaker(actual vs previous): "+stCurrency+" "+"Time: "+stTime);
int total3=OrdersTotal();
for(cnt=0;cnt<total3;cnt++)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES); //check opened orders
if(OrderComment()==stCurrency+stActual+stPrevious+ "BUY" || OrderComment()==stCurrency+stActual+stPrevious+"SE LL"){FileClose(file);Comment("\n"+"Live Trade Open"+OrderTicket());return(0);}
}
int historytotal3=OrdersHistoryTotal();
for(cnt=0;cnt<historytotal3;cnt++)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_HISTORY); //check opened orders
if(OrderComment()==stCurrency+stActual+stPrevious+ "BUY" || OrderComment()==stCurrency+stActual+stPrevious+"SE LL" || OrderComment()==stCurrency+stActual+stPrevious+"BU Y[sl]" || OrderComment()==stCurrency+stActual+stPrevious+"SE LL[sl]" || OrderComment()==stCurrency+stActual+stPrevious+"BU Y[tp]" || OrderComment()==stCurrency+stActual+stPrevious+"SE LL[tp]"){FileClose(file);Comment("\n"+"Trade Executed"+OrderTicket());return(0);}
}
if(stCurrency=="EUR"||stCurrency=="GBP"||stCurrenc y=="AUD"||stCurrency=="NZD"){double bidx=MarketInfo(ordercurrency,MODE_BID); double point7=MarketInfo(ordercurrency,MODE_POINT);OrderS end(ordercurrency,OP_SELL,lot_pp,bidx,3,bidx+(risk *point7),bidx-(reward*risk*point7),stCurrency+stActual+stPreviou s+"BUY",MagicNumber);OrderTime=TimeCurrent();}
if(stCurrency=="CHF"||stCurrency=="CAD"||stCurrenc y=="JPY"||stCurrency=="USD"){double askx=MarketInfo(ordercurrency,MODE_ASK); double point8=MarketInfo(ordercurrency,MODE_POINT);OrderS end(ordercurrency,OP_BUY,lot_pp,askx,3,askx-(risk*point8),askx+(reward*risk*point8),stCurrency +stActual+stPrevious+"SELL",MagicNumber);OrderTime =TimeCurrent();}
}

FileClose(file);
return(0); }


//Alert(stDate,stTime,stTimeZone,stCurrency,stDescri ption,stImportance,stActual,stForecast,stPrevious) ;

FileClose(file);
break;
}
//FileClose(file);
i++;


}
Max = i;
//if (file!=-1)
FileClose(file);}





//+------------------------------------------------------------------+
//| expert initialization function |
//+------------------------------------------------------------------+
int init()
{
//----

//----
return(0);
}
//+------------------------------------------------------------------+
//| expert deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----

//----
return(0);
}
//+------------------------------------------------------------------+
//| expert start function |
//+------------------------------------------------------------------+

int start()
{
if (TimeCurrent()>LastTimeDownloading+1*60)
{

DownloadCalendar(); //this function, only downloads the calendar once, to find next event
DownloadCal_prior_to_event(); //function to download the calendar, starting from when the news event is released!
LastTimeDownloading = TimeCurrent();
CloseOrders(); //function to close orders at a certain time after the order is executed
int file=-1;
while (file==-1)
file = FileOpen("\Html\Calendar.csv",FILE_READ|FILE_CSV,' ,');
GrabNews();
FileClose(file);
}
//FileClose(file);
return(0);


}
Вложения
Тип файла: zip Эксперт.zip (87.6 Кб, 27 просмотров)
ЕСергей вне форума
Старый 03.01.2009, 15:57
#4
Специалист
 
Пол: Мужской
Адрес: Moscow
Регистрация: 20.11.2007
Сообщений: 1,066
Благодарностей: 144
Ответ: Торговый робот Fundamental Trader DailyFX_MQL4

Цитата:
Этот робот работает при выходе новостей
это плохо... советую забросить эту идею, ибо 99,9% будет слив. рынок в последнее время частенько ходит в обратную сторону от результата новости. да и к тому же многие ДЦ борятся с торговлей на новостях... если по теме, то улыбающаяся рожица в правом верхнем углу графика горит (рядом с названием эксперта)?
Tevez вне форума
Сказали спасибо:
ЕСергей (06.01.2009)
Старый 04.01.2009, 13:23
#5
Интересующийся
 
Пол: Мужской
Адрес: Читинская область
Инвестирую в: ?
Регистрация: 29.10.2008
Сообщений: 24
Благодарностей: 0
Автор темы Ответ: Торговый робот Fundamental Trader DailyFX_MQL4

Цитата:
Сообщение от Tevez Посмотреть сообщение
это плохо... советую забросить эту идею, ибо 99,9% будет слив. рынок в последнее время частенько ходит в обратную сторону от результата новости. да и к тому же многие ДЦ борятся с торговлей на новостях... если по теме, то улыбающаяся рожица в правом верхнем углу графика горит (рядом с названием эксперта)?
да горит но на графике должны отоброжатся не только новости но и баланс счета
Миниатюры
Нажмите на изображение для увеличения
Название: FundamentalvTrader.gif
Просмотров: 34
Размер:	10.6 Кб
ID:	3504  
ЕСергей вне форума
Старый 04.01.2009, 21:14
#6
Мастер
 
Пол: Мужской
Адрес: Россия
Регистрация: 08.04.2007
Сообщений: 3,399
Благодарностей: 994
Ответ: Торговый робот Fundamental Trader DailyFX_MQL4

Цитата:
Этот робот работает при выходе новостей
ЕСергей, Tevez Вас уже предупредил, на счёт новостей....

Fundamental Trader - громко, даже очень, сказано...

Совет....попробуйте его ТОЛЬКО на демо счёте...

Удачи....
alex72 вне форума
Сказали спасибо:
ЕСергей (06.01.2009)
Войдите, чтобы оставить комментарий.
Быстрый переход