欧洲鼠 - 交易系统 - MQL5 算法交易论坛

elmucon 2017.10.07 23:00 #21

Mickey Moose:
你在问谁？

另一个可笑的人...改变你的语气...

我想你选对了弗洛伊德的头像......。

套用一句老话："麋鹿就是命运"......

Aleksey Vyazmikin 2017.10.07 23:27 #22

elmucon:

1.要传递给函数的字符串值是什么？

2.根据代码，编译器在这一行发了誓

l_AUDUSD = 0; l_NZDUSD = 0; l_USDCAD = 0; l_USDJPY = 0; // эти для отрисовки графики

elmucon 2017.10.08 01:18 #23

Aleksey Vyazmikin:

1.要传递给函数的字符串值是什么？

2.根据代码，编译器对这个字符串发誓

试试吧--这是在图表上绘图的变量（可视化）。

(以下是旧终端的代码）。

// +--------------------------------------------------------------------------------------------------+
// входные параметры                                                                                  |
// +--------------------------------------------------------------------------------------------------+
input ENUM_MA_METHOD     Metod  = MODE_SMA;           // Усреднение
input ENUM_APPLIED_PRICE Prise  = PRICE_MEDIAN;       // Цена 
      input int Sdvig           = 3;                  // Cдвиг MA 
      input int MA              = 20;                 // Периуд MA

// +--------------------------------------------------------------------------------------------------+
// функция направления торговли                                                                       |
// +--------------------------------------------------------------------------------------------------+
int CheckSig(string sym){
    bool l_Avers;
    int  l_dn = 0, l_up = 0; 
    int  Shift_Au,  Shift_Nz,  Shift_Ca,  Shift_Jp;
    datetime iTm = iTime(_Symbol,0,1);
    if(StringFind(sym,"USD",0)==3) l_Avers = false; else l_Avers = true;
    Shift_Au = iBarShift("AUDUSD",0,iTm,true); if(Shift_Au <= 0) return(2);
    Shift_Nz = iBarShift("NZDUSD",0,iTm,true); if(Shift_Nz <= 0) return(2);
    Shift_Ca = iBarShift("USDCAD",0,iTm,true); if(Shift_Ca <= 0) return(2);
    Shift_Jp = iBarShift("USDJPY",0,iTm,true); if(Shift_Jp <= 0) return(2);
    if(iClose("AUDUSD",0,Shift_Au) > iMA("AUDUSD",0,MA,Sdvig,Metod,Prise,Shift_Au)){if(!l_Avers) l_up ++; else l_dn ++;}
    if(iClose("AUDUSD",0,Shift_Au) < iMA("AUDUSD",0,MA,Sdvig,Metod,Prise,Shift_Au)){if(!l_Avers) l_dn ++; else l_up ++;}
    if(iClose("NZDUSD",0,Shift_Nz) > iMA("NZDUSD",0,MA,Sdvig,Metod,Prise,Shift_Nz)){if(!l_Avers) l_up ++; else l_dn ++;}
    if(iClose("NZDUSD",0,Shift_Nz) < iMA("NZDUSD",0,MA,Sdvig,Metod,Prise,Shift_Nz)){if(!l_Avers) l_dn ++; else l_up ++;}
    if(iClose("USDCAD",0,Shift_Ca) < iMA("USDCAD",0,MA,Sdvig,Metod,Prise,Shift_Ca)){if(!l_Avers) l_up ++; else l_dn ++;}
    if(iClose("USDCAD",0,Shift_Ca) > iMA("USDCAD",0,MA,Sdvig,Metod,Prise,Shift_Ca)){if(!l_Avers) l_dn ++; else l_up ++;}
    if(iClose("USDJPY",0,Shift_Jp) < iMA("USDJPY",0,MA,Sdvig,Metod,Prise,Shift_Jp)){if(!l_Avers) l_up ++; else l_dn ++;}
    if(iClose("USDJPY",0,Shift_Jp) > iMA("USDJPY",0,MA,Sdvig,Metod,Prise,Shift_Jp)){if(!l_Avers) l_dn ++; else l_up ++;}
    if(l_up == 4)return( 1); 
    if(l_dn == 4)return(-1);
return(0);}

// вызов для евро

CheckSig("EURUSD");

// вызов для фунта

CheckSig("GBPUSD");

// вызов для франка

CheckSig("USDCHF");


// ну или так

CheckSig(_Symbol);
CheckSig(Symbol());