|
如果免费资源下载的文件为TXT文档 请联系站长更新！站长微信：Lv596999 Telegram：@eapoj “Mql5官网”板块的EA基本都有，大部分是无限制NODLL版，NODLL版本MT1420升级，大多数不可用！这些EA来源为国外花钱买过来的 如有需要，请联系站长！ “EA测评”板块资源全部现有，看见不错的，可以联系站长，看EA在确定是否收费。 “无限制EA”板块，大部分免费，下载文件全部存在，都可以免费下载。 站长硬盘EA太多，因大部分时间做交易，做风控，没太多时间更新下载地址，请谅解！ 需要更新下载文件，请联系站长微信！国外朋友请联系Telegram。  |
算法武士EA源代码带有零错误。EA使用对冲策略它是开源代码，您可以根据需要进行修改。
#property copyright "EA侦探社"
#property copyright " Algo Samurai "
#property link "imql5.com"
#property link "Email: 14117225@qq.com"
#property version "V22"
enum Option1 {Expert = 10,Moderate = 20,Safe = 30 };
//------------------
extern string Configuration="==== Setting ====" ;
extern int magicnumber=777 ; // can change any number
extern bool AutoLot=true ;
extern Option1 AutoLotMode=30 ;
extern double FixLot=0.1 ;
extern string OrderSetting="=== Leave as Default ====" ;
extern int stoploss=150 ;
extern int takeprofit=1250 ;
extern int step=90 ;
extern string Config="==== Time Filter ====" ; // change time for your need
extern int StartHour=4 ;
extern int StopHour=22 ;
double zong_1_do = 0.3;
double zong_2_do = AutoLotMode * 100;
int zong_3_in = 250;
int zong_4_in = 200;
int zong_5_in = 100;
int zong_6_in = 50;
int zong_7_in = 100;
int zong_8_in = 50;
int zong_9_in = 800;
int zong_10_in = 100;
int zong_11_in = 50;
int xt = 0;
double zong_18_do = 0.0;
int zong_19_in = 0;
int zong_20_in = 10;
int zong_21_in = 0;
int zong_22_in = 0;
int zong_23_in = 5;
int zong_24_in = 30;
double zong_25_do = 0.0;
double zong_26_do = 0.0;
int LotDigits = 0;
double lots = 0.0;
int init()
{
double Local_2_do;
double Local_3_do;
//----- -----
double tmp_do_1;
double tmp_do_2;
if ( ( Digits() == 3 || Digits() == 5 ) )
{
xt = 10 ;
}
else
{
xt = 1 ;
}
zong_18_do = MarketInfo(Symbol(),14) ;
tmp_do_1 = zong_18_do / xt;
if ( stoploss <= tmp_do_1 )
{
tmp_do_1 = tmp_do_1;
}
else
{
tmp_do_1 = stoploss;
}
stoploss = tmp_do_1 ;
if ( takeprofit <= zong_18_do / xt )
{
tmp_do_2 = zong_18_do / xt;
}
else
{
tmp_do_2 = takeprofit;
}
takeprofit = tmp_do_2 ;
Local_2_do = MarketInfo(Symbol(),10) ;
Local_3_do = MarketInfo(Symbol(),9) ;
zong_26_do = MarketInfo(Symbol(),24) ;
if ( zong_26_do==1.0 )
{
LotDigits = 0 ;
}
if ( zong_26_do==0.1 )
{
LotDigits = 1 ;
}
if ( zong_26_do==0.01 )
{
LotDigits = 2 ;
}
if ( zong_26_do==0.001 )
{
LotDigits = 3 ;
}
if ( zong_26_do==0.0001 )
{
LotDigits = 4 ;
}
if ( zong_26_do==0.00001 )
{
LotDigits = 5 ;
}
zong_25_do = (Local_2_do - Local_3_do) / Point() / xt ;
return(0);
}
//init <<==-------- --------
int start()
{
int Local_2_in;
double Local_3_do;
double Local_4_do;
double Local_5_do;
double Local_6_do;
int Local_7_in;
int Local_8_in;
double Local_9_do;
int Local_10_in;
double Local_11_do;
int Local_12_in;
double Local_13_do;
double Local_14_do;
int Local_15_in;
int Local_16_in;
//int Local_17_in;
int i;
//----- -----
Display_Info();
Local_2_in = 0 ;
Local_3_do = 0.0 ;
Local_4_do = 0.0 ;
Local_5_do = 0.0 ;
Local_6_do = 0.0 ;
Local_7_in = 0 ;
Local_8_in = 0 ;
Local_9_do = 0.0 ;
Local_10_in = 0 ;
Local_11_do = 0.0 ;
Local_12_in = 0 ;
Local_13_do = 0.0 ;
Local_14_do = 0.0 ;
Local_15_in = 0 ;
Local_16_in = 0 ;
lots = NormalizeDouble(LotsOptimized ( ),LotDigits) ;
zong_19_in = MarketInfo(Symbol(),14) ;
for (i = 0 ; i < OrdersTotal() ; i = i + 1)
{
if ( !(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) || OrderSymbol() != Symbol() || magicnumber != OrderMagicNumber() ) continue;
Local_2_in = OrderType() ;
Local_3_do = NormalizeDouble(OrderStopLoss(),Digits()) ;
Local_4_do = NormalizeDouble(OrderOpenPrice(),Digits()) ;
Local_5_do = Local_3_do ;
if ( Local_2_in == 0 )
{
Local_7_in = Local_7_in + 1;
if ( Local_3_do<Local_4_do )
{
Local_15_in = zong_4_in ;
Local_16_in = zong_3_in ;
}
else
{
if ( Local_3_do - Local_4_do<=NormalizeDouble(zong_4_in * Point(),Digits()) )
{
Local_15_in = zong_6_in ;
Local_16_in = zong_5_in ;
}
else
{
if ( Local_3_do - Local_4_do<=NormalizeDouble(zong_9_in * Point(),Digits()) )
{
Local_15_in = zong_8_in ;
Local_16_in = zong_7_in ;
}
else
{
Local_15_in = zong_11_in ;
Local_16_in = zong_10_in ;
}
}
}
Local_13_do = NormalizeDouble(Local_15_in * Point() + Local_3_do,Digits()) ;
Local_14_do = NormalizeDouble(Bid - Local_16_in * Point(),Digits()) ;
if ( Local_14_do>Local_3_do && Local_13_do<=NormalizeDouble(Bid - zong_19_in * Point(),Digits()) )
{
Local_5_do = Local_13_do ;
}
if ( Local_5_do>Local_3_do )
{
if ( !(OrderModify(OrderTicket(),Local_4_do,Local_5_do,0.0,0,White)) )
{
Print("Error ",GetLastError()," Order Modify Buy SL ",Local_3_do,"->",Local_5_do);
}
else
{
Print("Order Buy Modify SL ",Local_3_do,"->",Local_5_do);
}
}
}
if ( Local_2_in == 1 )
{
Local_8_in = Local_8_in + 1;
if ( Local_3_do>Local_4_do )
{
Local_15_in = zong_4_in ;
Local_16_in = zong_3_in ;
}
else
{
if ( Local_3_do - Local_4_do>=NormalizeDouble(zong_4_in * Point(),Digits()) )
{
Local_15_in = zong_6_in ;
Local_16_in = zong_5_in ;
}
else
{
if ( Local_3_do - Local_4_do>=NormalizeDouble(zong_9_in * Point(),Digits()) )
{
Local_15_in = zong_8_in ;
Local_16_in = zong_7_in ;
}
else
{
Local_15_in = zong_11_in ;
Local_16_in = zong_10_in ;
}
}
}
Local_13_do = NormalizeDouble(Local_3_do - Local_15_in * Point(),Digits()) ;
Local_14_do = NormalizeDouble(Local_16_in * Point() + Ask,Digits()) ;
if ( Local_14_do<Local_3_do && Local_13_do>=NormalizeDouble(zong_19_in * Point() + Ask,Digits()) )
{
Local_5_do = Local_13_do ;
}
if ( Local_5_do<Local_3_do )
{
if ( !(OrderModify(OrderTicket(),Local_4_do,Local_5_do,0.0,0,White)) )
{
Print("Error ",GetLastError()," Order Modify Buy SL ",Local_3_do,"->",Local_5_do);
}
else
{
Print("Order Buy Modify SL ",Local_3_do,"->",Local_5_do);
}
}
}
if ( Local_2_in == 4 )
{
Local_9_do = Local_4_do ;
Local_10_in = OrderTicket() ;
if ( !(dTime ( )) )
{
if ( !(OrderDelete(Local_10_in,0xFFFFFFFF)) )
{
Print("Error ",GetLastError()," Order Delete ");
}
else
{
Print("Order Delete ");
}
}
}
if ( Local_2_in != 5 ) continue;
Local_11_do = Local_4_do ;
Local_12_in = OrderTicket() ;
if ( dTime ( ) ) continue;
if ( !(OrderDelete(Local_12_in,0xFFFFFFFF)) )
{
Print("Error ",GetLastError()," Order Delete ");
continue;
}
Print("Order Delete ");
}
if ( Local_7_in + Local_10_in == 0 && dTime ( ) )
{
if ( stoploss - step >= zong_19_in && stoploss != 0 )
{
Local_5_do = NormalizeDouble(Ask - (stoploss - step) * Point(),Digits()) ;
}
else
{
Local_5_do = 0.0 ;
}
if ( takeprofit + step >= zong_19_in && takeprofit != 0 )
{
Local_6_do = NormalizeDouble((takeprofit + step) * Point() + Ask,Digits()) ;
}
else
{
Local_6_do = 0.0 ;
}
if ( OrderSend(Symbol(),OP_BUYSTOP,lots,NormalizeDouble(step * Point() + Ask,Digits()),zong_20_in,Local_5_do,Local_6_do,"TradingSB.com_AlgoSamurai",magicnumber,0,0xFFFFFFFF) != -1 )
{
zong_21_in = TimeCurrent() ;
}
}
if ( Local_8_in + Local_12_in == 0 && dTime ( ) )
{
if ( stoploss - step >= zong_19_in && stoploss != 0 )
{
Local_5_do = NormalizeDouble((stoploss - step) * Point() + Bid,Digits()) ;
}
else
{
Local_5_do = 0.0 ;
}
if ( takeprofit + step >= zong_19_in && takeprofit != 0 )
{
Local_6_do = NormalizeDouble(Bid - (takeprofit + step) * Point(),Digits()) ;
}
else
{
Local_6_do = 0.0 ;
}
if ( OrderSend(Symbol(),OP_SELLSTOP,lots,NormalizeDouble(Bid - step * Point(),Digits()),zong_20_in,Local_5_do,Local_6_do,"TradingSB.com_AlgoSamurai",magicnumber,0,0xFFFFFFFF) != -1 )
{
zong_22_in = TimeCurrent() ;
}
}
if ( Local_10_in != 0 && dTime ( ) && zong_21_in < TimeCurrent() - zong_23_in && (MathAbs(NormalizeDouble(step * Point() + Ask,Digits()) - Local_9_do)) / Point()>zong_24_in )
{
if ( stoploss - step >= zong_19_in && stoploss != 0 )
{
Local_5_do = NormalizeDouble(Ask - (stoploss - step) * Point(),Digits()) ;
}
else
{
Local_5_do = 0.0 ;
}
if ( takeprofit + step >= zong_19_in && takeprofit != 0 )
{
Local_6_do = NormalizeDouble((takeprofit + step) * Point() + Ask,Digits()) ;
}
else
{
Local_6_do = 0.0 ;
}
if ( OrderModify(Local_10_in,NormalizeDouble(step * Point() + Ask,Digits()),Local_5_do,Local_6_do,0,0xFFFFFFFF) )
{
zong_21_in = TimeCurrent() ;
}
}
if ( Local_12_in != 0 && dTime ( ) && zong_22_in < TimeCurrent() - zong_23_in && (MathAbs(NormalizeDouble(Bid - step * Point(),Digits()) - Local_11_do)) / Point()>zong_24_in )
{
if ( stoploss - step >= zong_19_in && stoploss != 0 )
{
Local_5_do = NormalizeDouble((stoploss - step) * Point() + Bid,Digits()) ;
}
else
{
Local_5_do = 0.0 ;
}
if ( takeprofit + step >= zong_19_in && takeprofit != 0 )
{
Local_6_do = NormalizeDouble(Bid - (takeprofit + step) * Point(),Digits()) ;
}
else
{
Local_6_do = 0.0 ;
}
if ( OrderModify(Local_12_in,NormalizeDouble(Bid - step * Point(),Digits()),Local_5_do,Local_6_do,0,0xFFFFFFFF) )
{
zong_22_in = TimeCurrent() ;
}
}
return(0);
}
//start <<==-------- --------
int deinit()
{
ObjectsDeleteAll(-1,-1);
return(0);
}
//deinit <<==-------- --------
void Display_Info()
{
int Local_1_in;
string Local_2_st;
int Local_3_in;
//----- -----
if ( Seconds() >= 0 && Seconds() < 10 )
{
Local_1_in = 8388608 ;
}
if ( Seconds() >= 10 && Seconds() < 20 )
{
Local_1_in = 0 ;
}
if ( Seconds() >= 20 && Seconds() < 30 )
{
Local_1_in = 2139610 ;
}
if ( Seconds() >= 30 && Seconds() < 40 )
{
Local_1_in = 25600 ;
}
if ( Seconds() >= 40 && Seconds() < 50 )
{
Local_1_in = 2970272 ;
}
if ( Seconds() >= 50 && Seconds() <= 59 )
{
Local_1_in = 8519755 ;
}
Local_2_st = "-------------------------------------------" ;
Local_3_in = 0 ;
if ( Seconds() >= 0 && Seconds() < 10 )
{
Local_3_in = 8519755 ;
}
if ( Seconds() >= 10 && Seconds() < 20 )
{
Local_3_in = 16119285 ;
}
if ( Seconds() >= 20 && Seconds() < 30 )
{
Local_3_in = 25600 ;
}
if ( Seconds() >= 30 && Seconds() < 40 )
{
Local_3_in = 2970272 ;
}
if ( Seconds() >= 40 && Seconds() < 50 )
{
Local_3_in = 2139610 ;
}
if ( Seconds() >= 50 && Seconds() <= 59 )
{
Local_3_in = 8388608 ;
}
LABEL ( "L01","Webdings",64,2,40,Gold,0,"gg");
LABEL ( "L02","Webdings",63,2,41,0,0,"gg");
LABEL ( "L03","Webdings",21,2,40,WhiteSmoke,0,"gggggg");
LABEL ( "L04","Tahoma",15,23,41,MintCream,0,"ALGO SAMURAI");
LABEL ( "L05","Tahoma",15,22,40,Local_1_in,0,"ALGO SAMURAI");
LABEL ( "L06","Arial",10,10,75,WhiteSmoke,0,"Name :: " + AccountName());
LABEL ( "L09","Arial",10,10,90,WhiteSmoke,0,"Broker :: " + ServerAddress());
LABEL ( "L10","Arial",10,10,105,Local_1_in,0,"Copyright tradingsb.com");
LABEL ( "L11","Arial",10,11,106,LightGray,0,"Copyright tradingsb.com");
LABEL ( "L13","Arial",10,21,9,0,3,"Copyright tradingsb.com");
LABEL ( "L14","Arial",10,20,8,MintCream,3,"Copyright tradingsb.com");
LABEL ( "L15","Tahoma",15,21,26,Gold,3,"ALGO SAMURAI");
LABEL ( "L16","Tahoma",15,20,25,Local_3_in,3,"ALGO SAMURAI");
}
//Display_Info <<==-------- --------
void LABEL( string Para_0_st,string Para_1_st,int Para_2_in,int Para_3_in,int Para_4_in,color Para_5_co,int Para_6_in,string Para_7_st)
{
if ( ObjectFind(Para_0_st) < 0 )
{
ObjectCreate(Para_0_st,OBJ_LABEL,0,0,0.0,0,0.0,0,0.0);
}
ObjectSetText(Para_0_st,Para_7_st,Para_2_in,Para_1_st,Para_5_co);
ObjectSet(Para_0_st,OBJPROP_CORNER,Para_6_in);
ObjectSet(Para_0_st,OBJPROP_XDISTANCE,Para_3_in);
ObjectSet(Para_0_st,OBJPROP_YDISTANCE,Para_4_in);
}
//LABEL <<==-------- --------
bool dTime()
{
bool ans;
//----- -----
if ( TimeHour(TimeCurrent()) >= StartHour && TimeHour(TimeCurrent()) < StopHour )
{
ans = true ;
}
return(ans);
}
//dTime <<==-------- --------
double LotsOptimized()
{
double Local_2_do;
double Local_3_do;
double Local_4_do;
double Local_5_do;
double Local_6_do;
//----- -----
Local_2_do = FixLot ;
Local_3_do = 0.0 ;
Local_4_do = MarketInfo(Symbol(),23) ;
Local_5_do = MarketInfo(Symbol(),24) ;
if ( AutoLot )
{
Local_6_do = AccountBalance() ;
Local_3_do = Local_6_do / zong_2_do * zong_1_do ;
Local_2_do = Local_3_do ;
if ( Local_3_do<Local_4_do )
{
Local_2_do = Local_4_do ;
}
}
return(Local_2_do);
}
//<<==LotsOptimized <<==
© 版权声明
文章版权归作者所有，未经允许请勿转载。
THE END
