MYMU25 1 buy jfatl 4
//-----
//------
//-----
if(jfatl) { if((a[i] > a[i-1])) colors[i] = 0.0; if((a[i] < a[i-1])) colors[i] = 1.0; } if(fifty) { if((b[i] > b[i-1])) colors[i] = 0.0; if((b[i] < b[i-1])) colors[i] = 1.0; } if(hundred) { if((c[i] > c[i-1])) colors[i] = 0.0; if((c[i] < c[i-1])) colors[i] = 1.0; } if(hma) { if((e[i] > e[i-1])) colors[i] = 0.0; if((e[i] < e[i-1])) colors[i] = 1.0; } if(jjma) { if((f[i] > f[i-1])) colors[i] = 0.0; if((f[i] < f[i-1])) colors[i] = 1.0; } if(alma) { if((g[i] > g[i-1])) colors[i] = 0.0; if((g[i] < g[i-1])) colors[i] = 1.0; } if(coppock) { if((h[i] > h[i-1])) colors[i] = 0.0; if((h[i] < h[i-1])) colors[i] = 1.0; } } //--- return value of prev_calculated for next call return(rates_total); } //+------------------------------------------------------------------+
//--- get handles ahandle = iCustom(_Symbol,Period(),"jfatl"); bhandle = iMA(_Symbol,PERIOD_CURRENT,50,0,MODE_SMA,PRICE_CLOSE); chandle = iMA(_Symbol,PERIOD_CURRENT,100,0,MODE_SMA,PRICE_CLOSE); dhandle = iCustom(_Symbol,Period(),"vidyas"); ehandle = iCustom(_Symbol,Period(),"hma",10,2.0); fhandle = iCustom(_Symbol,Period(),"jjma"); ghandle = iCustom(_Symbol,Period(),"alma"); hhandle = iCustom(_Symbol,Period(),"Coppock"); // ihandle = jhandle = iCustom(_Symbol,Period(),"fatl"); khandle = iCustom(_Symbol,Period(),"satl"); lhandle = iCustom(_Symbol,Period(),"TRIX",20); mhandle = iCustom(_Symbol,Period(),"Spear"); nhandle = iTEMA(_Symbol,Period(),20,0,PRICE_CLOSE); ohandle = iDEMA(_Symbol,Period(),20,0,PRICE_CLOSE); phandle = iAO(_Symbol,Period()); qhandle = iStochastic(_Symbol,Period(), 10, 3, 6, MODE_SMA, STO_CLOSECLOSE); rhandle = iCustom(_Symbol,Period(),"hma",89,2.0); //---- string chosen = ""; if(jfatl) {chosen = "jfatl";} if(fifty) {chosen = "fifty";} if(hundred) {chosen = "hundred";} if(vidyas) {chosen = "vidyas";} if(hma) {chosen = "hma";} if(jjma) {chosen = "jjma";} if(alma) {chosen = "alma";} if(coppock) {chosen = "coppock";} if(fatl) {chosen = "fatl";} if(satl) {chosen = "satl";} if(trix) {chosen = "trix";} if(spearman) {chosen = "spearman";} if(tema) {chosen = "tema";} if(dema) {chosen = "dema";} if(ao) {chosen = "ao";} if(stochastic) {chosen = "stochastic";} if(hma89) {chosen = "hma89";} //---- Display("choice"); ObjectSetText("choice", chosen ,12,"Verdana", clrAqua); }
void ObjectSetText(const string name, const string text, const int size, string font = NULL, color clr = clrNONE) { ObjectSetString(0, name, OBJPROP_TEXT, text); ObjectSetInteger(0, name, OBJPROP_FONTSIZE, size); ObjectSetString(0, name, OBJPROP_FONT, font); ObjectSetInteger(0, name, OBJPROP_COLOR, clr); ObjectSetInteger(0, name, OBJPROP_BACK, true); } void Display(string name) { ObjectCreate(0,name, OBJ_LABEL,ChartWindowFind(ChartID(), shortname), 0, 0, 0); ObjectSetInteger(0,name, OBJPROP_CORNER, 0); ObjectSetInteger(0,name, OBJPROP_XDISTANCE, 50); ObjectSetInteger(0,name, OBJPROP_YDISTANCE, 50); }
void label(string text) { ObjectCreate(0,"base",OBJ_LABEL,0,0,0); ObjectSetInteger(0,"base",OBJPROP_XDISTANCE,50); ObjectSetInteger(0,"base",OBJPROP_YDISTANCE,100); ObjectSetInteger(0,"base",OBJPROP_COLOR,clrAqua); ObjectSetString(0,"base",OBJPROP_TEXT,text); ObjectSetString(0,"base",OBJPROP_FONT,"Verdana"); ObjectSetInteger(0,"base",OBJPROP_FONTSIZE,12); }
//--- get a user selected indicator for "ahandle"....... this allows mtf conversion for all....... if(jfatl) ahandle = iCustom(_Symbol,timeframe,"jfatl"); if(fifty) ahandle = iMA(_Symbol,timeframe,50,0,MODE_SMA,PRICE_CLOSE); if(hundred) ahandle = iMA(_Symbol,timeframe,100,0,MODE_SMA,PRICE_CLOSE); if(vidyas) ahandle = iCustom(_Symbol,timeframe,"vidyas"); if(hma) ahandle = iCustom(_Symbol,timeframe,"hma",10,2.0); if(jjma) ahandle = iCustom(_Symbol,timeframe,"jjma"); if(alma) ahandle = iCustom(_Symbol,timeframe,"alma"); if(coppock) ahandle = iCustom(_Symbol,timeframe,"Coppock");// needs to be in a second window version // ihandle = if(fatl) ahandle = iCustom(_Symbol,timeframe,"fatl"); if(satl) ahandle = iCustom(_Symbol,timeframe,"satl"); if(trix) ahandle = iCustom(_Symbol,timeframe,"TRIX",20); if(spearman) ahandle = iCustom(_Symbol,timeframe,"Spear"); // needs to be in a second window version if(tema) ahandle = iTEMA(_Symbol,timeframe,20,0,PRICE_CLOSE); if(dema) ahandle = iDEMA(_Symbol,timeframe,20,0,PRICE_CLOSE); if(ao) ahandle = iAO(_Symbol,timeframe); // needs to be in a second window version if(stochastic) ahandle = iStochastic(_Symbol,timeframe, 10, 3, 6, MODE_SMA, STO_CLOSECLOSE); // needs to be in a second window version if(hma89) ahandle = iCustom(_Symbol,timeframe,"hma",89,2.0); //----
//------ //------ void signals() { ENUM_TIMEFRAMES tf[] = {PERIOD_M1, PERIOD_M5, PERIOD_M15, PERIOD_M30, PERIOD_H1, PERIOD_H4, PERIOD_D1}; //PERIOD_M1, PERIOD_M2, PERIOD_M3, PERIOD_M4, string tfs[14] = {"1", "5", "15", "30", "60", "240", "1440"}; //"1","2","3","4", int total=SymbolsTotal(true)-1; int bars = 0; int stoch[14]; double alma[14]; double coppock[14]; double hma[14]; for(int i = 0; i < total; i++) { string symbol = SymbolName(i,true); Display(symbol, 10, 100+(i*50)); ObjectSetText(symbol, symbol, 10, "Verdana", clrAqua); //---- for(int j = 0; j < 7; j++) { alma[j] = iCustom(symbol,tf[j],"alma"); coppock[j] = iCustom(symbol,tf[j],"Coppock"); hma[j] = iCustom(symbol,tf[j],"hma",10,2.0); stoch[j] = iStochastic(symbol,tf[j], 10, 3, 6, MODE_SMA, STO_CLOSECLOSE); bars = iBars(symbol,tf[j]); } //----- for(int j = 0; j < 7; j++) for(int k = 0; k < 7; k++) { double almas[]; ArraySetAsSeries(almas,true); CopyBuffer(alma[k],0,0,20,almas); //---- double coppocks[]; ArraySetAsSeries(coppocks,true); CopyBuffer(coppock[k],0,0,20,coppocks); //---- double hmas[]; ArraySetAsSeries(hmas,true); CopyBuffer(hma[k],0,0,20,hmas); //---- double stochs[]; ArraySetAsSeries(stochs,true); CopyBuffer(stoch[k],0,0,4,stochs); //------ 5 conditions color clr = clrYellow; if((almas[1] > almas[2]) && (hmas[1] > hmas[2]) && ((stochs[1] < 80.0) && (stochs[1] > 20.0) && (stochs[1] > stochs[2]))) { clr = clrAqua; } if((almas[1] < almas[2]) && (hmas[1] < hmas[2]) && ((stochs[1] > 20.0) && (stochs[1] < 80.0) && (stochs[1] < stochs[2]))) { clr = clrMagenta;} Display(symbol+tfs[k], 300+(k*50), 100+(i*50)); // Display(symbol+tfs[k], 1900+(k*50), 100+(i*50)); ObjectSetText(symbol+tfs[k], "ÛÛ",10,"Terminal", clr); ObjectSetString(0, symbol+tfs[k], OBJPROP_TOOLTIP, symbol+" "+IntegerToString(tfs[k])); } //----- for(int k = 0; k < 7; k++) //---- } //----- for(int i = 0; i < total; i++) } //-- void signals
//------ //------ void signals() { ENUM_TIMEFRAMES tf[] = {PERIOD_M1, PERIOD_M5, PERIOD_M15, PERIOD_M30, PERIOD_H1, PERIOD_H4, PERIOD_D1}; //PERIOD_M1, PERIOD_M2, PERIOD_M3, PERIOD_M4, string tfs[14] = {"1", "5", "15", "30", "60", "240", "1440"}; //"1","2","3","4", int total=SymbolsTotal(true)-1; int stoch[14]; int alma[14]; int coppock[14]; int hma[14]; double almas[]; double coppocks[]; double hmas[]; double stochs[]; for(int i = 0; i < total; i++) { string symbol = SymbolName(i,true); Display(symbol, 10, 100+(i*50)); ObjectSetText(symbol, symbol, 10, "Verdana", clrAqua); //---- for(int j = 0; j < 7; j++) { alma[j] = iCustom(symbol,tf[j],"alma"); coppock[j] = iCustom(symbol,tf[j],"Coppock"); hma[j] = iCustom(symbol,tf[j],"hma",10,2.0); stoch[j] = iStochastic(symbol,tf[j], 10, 3, 6, MODE_SMA, STO_CLOSECLOSE); ArraySetAsSeries(almas,true); CopyBuffer(alma[j],0,0,20,almas); //---- ArraySetAsSeries(coppocks,true); CopyBuffer(coppock[j],0,0,20,coppocks); //---- ArraySetAsSeries(hmas,true); CopyBuffer(hma[j],0,0,20,hmas); //---- ArraySetAsSeries(stochs,true); CopyBuffer(stoch[j],0,0,4,stochs); //---- color clr = clrYellow; if((almas[0] > almas[1]) && (hmas[0] > hmas[1]) && ((stochs[0] > 10.0) && (stochs[0] < 90.0) && (stochs[0] > stochs[1]))) {clr = clrAqua;} if((almas[0] < almas[1]) && (hmas[0] < hmas[1]) && ((stochs[0] < 90.0) && (stochs[0] > 10.0) && (stochs[0] < stochs[1]))) {clr = clrMagenta;} if((almas[0] > almas[1]) && (hmas[0] > hmas[1]) && ((stochs[0] < 30.0) && (stochs[0] > stochs[1]))) {clr = clrBlue;} if((almas[0] < almas[1]) && (hmas[0] < hmas[1]) && ((stochs[0] > 70.0) && (stochs[0] < stochs[1]))) {clr = clrRed;} Display(symbol+tfs[j], 300+(j*50), 100+(i*50)); // Display(symbol+tfs[k], 1900+(k*50), 100+(i*50)); ObjectSetText(symbol+tfs[j], "ÛÛ",10,"Terminal", clr); ObjectSetString(0, symbol+tfs[j], OBJPROP_TOOLTIP, symbol+" "+IntegerToString(tfs[j])); } //----- for(int k = 0; k < 7; k++) //---- } //----- for(int i = 0; i < total; i++) } //---- void signals()
void polarity() { //--- datetime time = TimeCurrent(); MqlDateTime tm = {}; int hours = 24; for(int i=0;i<hours;i++) { Display(i, 10, 95+(i*50)); ObjectSetText(i, i+1,10,"Verdana", clrLime); ObjectSetString(0, i, OBJPROP_TOOLTIP, "hour"); Display(tm.day_of_year +" "+i, 100, 100+(i*50)); ObjectSetText(tm.day_of_year +" "+i, "ÛÛ",10,"Terminal", clrGray); ObjectSetString(0, tm.day_of_year +" "+i, OBJPROP_TOOLTIP, "change color"); } }
void OnStart() { //--- polarity(); Print(OrderCloseTime(3100198511)); datetime closed = OrderCloseTime(3100198511); MqlDateTime dt_struct; // Declare a variable of type MqlDateTime TimeToStruct(closed, dt_struct); // Convert datetime to MqlDateTime structure int hour = dt_struct.hour; // Access the 'hour' member of the structure int day = dt_struct.day; // Access the 'day' member of the structure int dayofweek = dt_struct.day_of_week; // Access the 'day of week' member of the structure int dayofyear = dt_struct.day_of_year; // Access the 'day of year' member of the structure Print("closed day of year: ", dayofyear + " closed day of week: ", dayofweek + " closed day: ", day + " closed hour: ", hour); } //+------------------------------------------------------------------+ datetime OrderCloseTime(const ulong Ticket) { return((HistoryOrderGetInteger(Ticket, ORDER_TICKET) == Ticket) || HistoryOrderSelect(Ticket) ? (datetime)HistoryOrderGetInteger(Ticket, ORDER_TIME_DONE) : 0); }
//---- void Display(string name, int x, int y) { ObjectCreate(0,name, OBJ_LABEL,0, 0, 0, 0); ObjectSetInteger(0,name, OBJPROP_CORNER, 0); ObjectSetInteger(0,name,OBJPROP_SELECTABLE,true); // https://www.mql5.com/en/docs/constants/objectconstants/enum_object/obj_text ObjectSetInteger(0,name, OBJPROP_XDISTANCE, x); ObjectSetInteger(0,name, OBJPROP_YDISTANCE, y); }
//----
input double a_ua = 0.0; // audusd input double a_ub = 0.0; // audusd input double b_ua = 0.0; // gbpusd input double b_ub = 0.0; // gbpusd input double c_ua = 0.0; // usdcad input double c_ub = 0.0; // usdcad input double e_ua = 0.0; // eurusd input double e_ub = 0.0; // eurusd input double j_ua = 0.0; // usdjpy inverted input double j_ub = 0.0; // usdjpy inverted input double n_ua = 0.0; // nzdusd input double n_ub = 0.0; // nzdusd input double s_ua = 0.0; // usdchf input double s_ub = 0.0; // usdchf double above[30] = {a_ua, b_ua, c_ua, e_ua, j_ua, n_ua, s_ua}; double below[30] = {a_ub, b_ub, c_ub, e_ub, j_ub, n_ub, s_ub}; //------ void alerts() { int total=SymbolsTotal(true); for(int i = 0; i < total; i++) { string symbol = SymbolName(i,true); if((above[i] != 0.0) && (SymbolInfoDouble(symbol,SYMBOL_ASK) > above[i])) {Alert(symbol+" is above level");} if((below[i] != 0.0) && (SymbolInfoDouble(symbol,SYMBOL_BID) < below[i])) {Alert(symbol+" is below level");} } }
for(int j=rates_total-1;j>0;j--) { if(mas[j] > mas[j-1]) { ObjectCreate(0,"up"+IntegerToString(j),OBJ_ARROW_BUY,0,time[j],low[j]); ObjectSetInteger(0,"up"+IntegerToString(j),OBJPROP_COLOR,clrAqua); } if(mas[j] <= mas[j-1]) { ObjectCreate(0,"dn"+IntegerToString(j),OBJ_ARROW_SELL,0,time[j],high[j]); ObjectSetInteger(0,"dn"+IntegerToString(j),OBJPROP_COLOR,clrMagenta); } }
#property indicator_label2 "ups" #property indicator_type2 DRAW_ARROW #property indicator_color2 clrAqua #property indicator_width2 5 #property indicator_label3 "dns" #property indicator_type3 DRAW_ARROW #property indicator_color3 clrMagenta #property indicator_width3 5 //----- SetIndexBuffer(1,ups,INDICATOR_DATA); PlotIndexSetInteger(1,PLOT_ARROW,241); PlotIndexSetInteger(1,PLOT_ARROW_SHIFT,50); // https://www.mql5.com/en/docs/customind/indicators_examples/draw_arrow PlotIndexSetDouble(1,PLOT_EMPTY_VALUE,0); //--- SetIndexBuffer(2,dns,INDICATOR_DATA); PlotIndexSetInteger(2,PLOT_ARROW,242); PlotIndexSetInteger(2,PLOT_ARROW_SHIFT,-50); // https://www.mql5.com/en/docs/customind/indicators_examples/draw_arrow PlotIndexSetDouble(2,PLOT_EMPTY_VALUE,0); //----- for(int j=rates_total-1;j>0;j--) { if(satls[j] > satls[j-1]) // comparing doubles can be dicey { ups[j] = low[j]; // ObjectCreate(0,"up"+IntegerToString(j),OBJ_ARROW_BUY,0,time[j],low[j]); } // ObjectSetInteger(0,"up"+IntegerToString(j),OBJPROP_COLOR,clrAqua); if(satls[j] <= satls[j-1]) { dns[j] = high[j]; // ObjectCreate(0,"dn"+IntegerToString(j),OBJ_ARROW_SELL,0,time[j],high[j]); } // ObjectSetInteger(0,"dn"+IntegerToString(j),OBJPROP_COLOR,clrMagenta); }
//--- indicator buffers mapping if(satl) { SetIndexBuffer(0,satls,INDICATOR_DATA); //ArraySetAsSeries(satls,true); shift = 50; // shift unique to each coice to avoid arrows from stepping on each other..... } if(alma) { SetIndexBuffer(0,almas,INDICATOR_DATA); //ArraySetAsSeries(almas,true); shift = 75; } if(hma) { SetIndexBuffer(0,hmas,INDICATOR_DATA); //ArraySetAsSeries(hmas,true); shift = 100; } hmahandle = iCustom(_Symbol,_Period,"hma",20,2.0); almahandle = iCustom(_Symbol,_Period,"alma"); satlhandle = iCustom(_Symbol,_Period,"satl"); //--- indicator buffers mapping SetIndexBuffer(1,ups,INDICATOR_DATA); PlotIndexSetInteger(1,PLOT_ARROW,241); PlotIndexSetInteger(1,PLOT_ARROW_SHIFT,shift); // https://www.mql5.com/en/docs/customind/indicators_examples/draw_arrow PlotIndexSetDouble(1,PLOT_EMPTY_VALUE,0); //--- SetIndexBuffer(2,dns,INDICATOR_DATA); PlotIndexSetInteger(2,PLOT_ARROW,242); PlotIndexSetInteger(2,PLOT_ARROW_SHIFT,-shift); // https://www.mql5.com/en/docs/customind/indicators_examples/draw_arrow PlotIndexSetDouble(2,PLOT_EMPTY_VALUE,0);
color clr = clrYellow; if((stochs[0] < 90.0) && (stochs[0] > 10.0) && (stochs[0] > stochs[1])) { clr = clrAqua; } // if((stochs[0] > 10.0) && (stochs[0] < 90.0) && (stochs[0] < stochs[1])) { clr = clrMagenta;} // if((stochs[0] < 10.0)) { clr = clrRed; } if((stochs[0] > 90.0)) { clr = clrBlue;} double stv = stochs[0]; Display(symbol+tfs[k]+"stoch", 1500+(k*50), 100+(i*50)); // Display(symbol+tfs[k], 1900+(k*50), 100+(i*50)); ObjectSetText(symbol+tfs[k]+"stoch", "ÛÛ",10,"Terminal", clr); ObjectSetString(0, symbol+tfs[k]+"stoch", OBJPROP_TOOLTIP, symbol+" stoch "+IntegerToString(tfs[k])+" "+DoubleToString(stv,2));
