//+------------------------------------------------------------------+ //| Ichimoku TK Cross and Kumo Breakout Strategy Signal Indicator //| //| //| //+------------------------------------------------------------------+ #property copyright "" #property link "" #define PATTERN_DOJI 1 #define PATTERN_HAMMER 2 #define PATTERN_SHOOTING_STAR 3 #define PATTERN_DARK_CLOUD 4 #define PATTERN_PIERCING_LINE 5 #define PATTERN_BEARISH_ENGULFING 6 #define PATTERN_BULLISH_ENGULFING 7 #define PATTERN_BEARISH_HARAMI 8 #define PATTERN_BULLISH_HARAMI 9 #define PATTERN_BEARISH_HARAMI_CROSS 10 #define PATTERN_BULLISH_HARAMI_CROSS 11 #property indicator_chart_window #property indicator_buffers 14 #property indicator_color1 Yellow #property indicator_width1 2 #property indicator_color2 White #property indicator_width2 2 #property indicator_color3 White #property indicator_width3 2 #property indicator_color4 Magenta #property indicator_width4 2 #property indicator_color5 Khaki #property indicator_width5 2 #property indicator_color6 Green #property indicator_width6 2 #property indicator_color7 Green #property indicator_width7 2 #property indicator_color8 Yellow #property indicator_width8 2 #property indicator_color9 White #property indicator_width9 2 #property indicator_color10 White #property indicator_width10 2 #property indicator_color11 Magenta #property indicator_width11 2 #property indicator_color12 Khaki #property indicator_width12 2 #property indicator_color13 Green #property indicator_width13 2 #property indicator_color14 Green #property indicator_width14 2 //+------------------------------------------------------------------+ extern color Signal1Color = Yellow; extern string Signal1Pos = "Low"; extern string Signal1Text = ""; extern int Signal1Character = 233; // what character to display? by default it is 167 (a small square) extern color Signal2Color = White; extern string Signal2Pos = "Low"; extern string Signal2Text = ""; extern int Signal2Character = 233; // what character to display? by default it is 167 (a small square) extern color Signal3Color = White; extern string Signal3Pos = "Low"; extern string Signal3Text = ""; extern int Signal3Character = 233; // what character to display? by default it is 167 (a small square) extern color Signal4Color = Magenta; extern string Signal4Pos = "Low"; extern string Signal4Text = ""; extern int Signal4Character = 233; // what character to display? by default it is 167 (a small square) extern color Signal5Color = Khaki; extern string Signal5Pos = "Low"; extern string Signal5Text = ""; extern int Signal5Character = 233; // what character to display? by default it is 167 (a small square) extern color Signal6Color = Green; extern string Signal6Pos = "Low"; extern string Signal6Text = ""; extern int Signal6Character = 233; // what character to display? by default it is 167 (a small square) extern color Signal7Color = Green; extern string Signal7Pos = "Low"; extern string Signal7Text = ""; extern int Signal7Character = 233; // what character to display? by default it is 167 (a small square) extern color Signal8Color = Yellow; extern string Signal8Pos = "High"; extern string Signal8Text = ""; extern int Signal8Character = 234; // what character to display? by default it is 167 (a small square) extern color Signal9Color = White; extern string Signal9Pos = "High"; extern string Signal9Text = ""; extern int Signal9Character = 234; // what character to display? by default it is 167 (a small square) extern color Signal10Color = White; extern string Signal10Pos = "High"; extern string Signal10Text = ""; extern int Signal10Character = 234; // what character to display? by default it is 167 (a small square) extern color Signal11Color = Magenta; extern string Signal11Pos = "High"; extern string Signal11Text = ""; extern int Signal11Character = 234; // what character to display? by default it is 167 (a small square) extern color Signal12Color = Khaki; extern string Signal12Pos = "High"; extern string Signal12Text = ""; extern int Signal12Character = 234; // what character to display? by default it is 167 (a small square) extern color Signal13Color = Green; extern string Signal13Pos = "High"; extern string Signal13Text = ""; extern int Signal13Character = 234; // what character to display? by default it is 167 (a small square) extern color Signal14Color = Green; extern string Signal14Pos = "High"; extern string Signal14Text = ""; extern int Signal14Character = 234; // what character to display? by default it is 167 (a small square) //+------------------------------------------------------------------+ // -- Variables //+------------------------------------------------------------------+ extern double SL_ATR_Multiplier = 4; extern double TP_ATR_Multiplier = 2; extern int MagicNumber = 100; extern int MagicNumber1 = 200; extern int MagicNumber2 = 300; extern int MagicNumber3 = 400; extern int MagicNumber4 = 500; extern int MagicNumber5 = 600; extern int MaxSlippage = 3; extern int VerboseMode = 1; extern bool MT4Alert = true; extern bool EmailAlert = true; extern string EmailSubject = "Signal Alert : "; extern int LookBackForAlerts = 5; extern int LabelCorner = 0; //+------------------------------------------------------------------+ color LabelColor = White; int lastBars = 0; int OffsetHorizontal = 5; int OffsetVertical = 20; bool writeInfoMessagesToLog = false; double Signal1Buffer[]; double Signal2Buffer[]; double Signal3Buffer[]; double Signal4Buffer[]; double Signal5Buffer[]; double Signal6Buffer[]; double Signal7Buffer[]; double Signal8Buffer[]; double Signal9Buffer[]; double Signal10Buffer[]; double Signal11Buffer[]; double Signal12Buffer[]; double Signal13Buffer[]; double Signal14Buffer[]; bool started = false; double atrOffset; bool sqIsBarOpen = true; double gPointPow = 0; double gPointCoef = 0; datetime lastSignalDisplayed = 0; int lastOrderErrorCloseTime = 0; bool SupportECNBrokers = true; //+------------------------------------------------------------------+ int init() { double realDigits = Digits; if(realDigits > 0 && realDigits != 2 && realDigits != 4) { realDigits -= 1; } gPointPow = MathPow(10, realDigits); gPointCoef = 1/gPointPow; TextObject("copytext", 0, 0, "", 8, "Tahoma", LabelColor); TextObject("copyline", 0, 12, "", 8, "Tahoma", LabelColor); TextObject("signal_1_c", 5, 10 + 1*18, CharToStr(167), 14, "Wingdings", Signal1Color); TextObject("signal_1_t", 25, 12 + 1*18, "Buy Tenkan Cross Kijusen ", 8, "Tahoma", LabelColor); SetIndexStyle(0,DRAW_ARROW); SetIndexArrow(0,Signal1Character); SetIndexBuffer(0,Signal1Buffer); SetIndexLabel(0, Signal1Text); TextObject("signal_2_c", 5, 10 + 2*18, CharToStr(167), 14, "Wingdings", Signal2Color); TextObject("signal_2_t", 25, 12 + 2*18, "Buy Kumo Price Breakout Senkou Span A ", 8, "Tahoma", LabelColor); SetIndexStyle(1,DRAW_ARROW); SetIndexArrow(1,Signal2Character); SetIndexBuffer(1,Signal2Buffer); SetIndexLabel(1, Signal2Text); TextObject("signal_3_c", 5, 10 + 3*18, CharToStr(167), 14, "Wingdings", Signal3Color); TextObject("signal_3_t", 25, 12 + 3*18, "Buy Kumo Price Breakout Senkou Span B ", 8, "Tahoma", LabelColor); SetIndexStyle(2,DRAW_ARROW); SetIndexArrow(2,Signal3Character); SetIndexBuffer(2,Signal3Buffer); SetIndexLabel(2, Signal3Text); TextObject("signal_4_c", 5, 10 + 4*18, CharToStr(167), 14, "Wingdings", Signal4Color); TextObject("signal_4_t", 25, 12 + 4*18, "Buy Senkou Span A cross B ", 8, "Tahoma", LabelColor); SetIndexStyle(3,DRAW_ARROW); SetIndexArrow(3,Signal4Character); SetIndexBuffer(3,Signal4Buffer); SetIndexLabel(3, Signal4Text); TextObject("signal_5_c", 5, 10 + 5*18, CharToStr(167), 14, "Wingdings", Signal5Color); TextObject("signal_5_t", 25, 12 + 5*18, "Buy Chikou Span cross Price ", 8, "Tahoma", LabelColor); SetIndexStyle(4,DRAW_ARROW); SetIndexArrow(4,Signal5Character); SetIndexBuffer(4,Signal5Buffer); SetIndexLabel(4, Signal5Text); TextObject("signal_6_c", 5, 10 + 6*18, CharToStr(167), 14, "Wingdings", Signal6Color); TextObject("signal_6_t", 25, 12 + 6*18, "Buy Chikou Span cross Senkou Span A ", 8, "Tahoma", LabelColor); SetIndexStyle(5,DRAW_ARROW); SetIndexArrow(5,Signal6Character); SetIndexBuffer(5,Signal6Buffer); SetIndexLabel(5, Signal6Text); TextObject("signal_7_c", 5, 10 + 7*18, CharToStr(167), 14, "Wingdings", Signal7Color); TextObject("signal_7_t", 25, 12 + 7*18, "Buy Chikou Span cross Senkou Span B ", 8, "Tahoma", LabelColor); SetIndexStyle(6,DRAW_ARROW); SetIndexArrow(6,Signal7Character); SetIndexBuffer(6,Signal7Buffer); SetIndexLabel(6, Signal7Text); TextObject("signal_8_c", 5, 10 + 8*18, CharToStr(167), 14, "Wingdings", Signal8Color); TextObject("signal_8_t", 25, 12 + 8*18, "Sell Tenkan Cross Kijusen ", 8, "Tahoma", LabelColor); SetIndexStyle(7,DRAW_ARROW); SetIndexArrow(7,Signal8Character); SetIndexBuffer(7,Signal8Buffer); SetIndexLabel(7, Signal8Text); TextObject("signal_9_c", 5, 10 + 9*18, CharToStr(167), 14, "Wingdings", Signal9Color); TextObject("signal_9_t", 25, 12 + 9*18, "Sell Kumo Breakout Price Senkou Span A ", 8, "Tahoma", LabelColor); SetIndexStyle(8,DRAW_ARROW); SetIndexArrow(8,Signal9Character); SetIndexBuffer(8,Signal9Buffer); SetIndexLabel(8, Signal9Text); TextObject("signal_10_c", 5, 10 + 10*18, CharToStr(167), 14, "Wingdings", Signal10Color); TextObject("signal_10_t", 25, 12 + 10*18, "Sell Kumo Breakout Price Senkou Span B ", 8, "Tahoma", LabelColor); SetIndexStyle(9,DRAW_ARROW); SetIndexArrow(9,Signal10Character); SetIndexBuffer(9,Signal10Buffer); SetIndexLabel(9, Signal10Text); TextObject("signal_11_c", 5, 10 + 11*18, CharToStr(167), 14, "Wingdings", Signal11Color); TextObject("signal_11_t", 25, 12 + 11*18, "Sell Senkou Span A cross B ", 8, "Tahoma", LabelColor); SetIndexStyle(10,DRAW_ARROW); SetIndexArrow(10,Signal11Character); SetIndexBuffer(10,Signal11Buffer); SetIndexLabel(10, Signal11Text); TextObject("signal_12_c", 5, 10 + 12*18, CharToStr(167), 14, "Wingdings", Signal12Color); TextObject("signal_12_t", 25, 12 + 12*18, "Sell Chikou Span cross Price ", 8, "Tahoma", LabelColor); SetIndexStyle(11,DRAW_ARROW); SetIndexArrow(11,Signal12Character); SetIndexBuffer(11,Signal12Buffer); SetIndexLabel(11, Signal12Text); TextObject("signal_13_c", 5, 10 + 13*18, CharToStr(167), 14, "Wingdings", Signal13Color); TextObject("signal_13_t", 25, 12 + 13*18, "Sell Chikou Span cross Senkou Span A ", 8, "Tahoma", LabelColor); SetIndexStyle(12,DRAW_ARROW); SetIndexArrow(12,Signal13Character); SetIndexBuffer(12,Signal13Buffer); SetIndexLabel(12, Signal13Text); TextObject("signal_14_c", 5, 10 + 14*18, CharToStr(167), 14, "Wingdings", Signal14Color); TextObject("signal_14_t", 25, 12 + 14*18, "Sell Chikou Span cross Senkou Span B ", 8, "Tahoma", LabelColor); SetIndexStyle(13,DRAW_ARROW); SetIndexArrow(13,Signal14Character); SetIndexBuffer(13,Signal14Buffer); SetIndexLabel(13, Signal14Text); return(0); } //+------------------------------------------------------------------+ int deinit() { ObjectDelete("copytext"); ObjectDelete("copyline"); ObjectDelete("signal_1_c"); ObjectDelete("signal_1_t"); ObjectDelete("signal_2_c"); ObjectDelete("signal_2_t"); ObjectDelete("signal_3_c"); ObjectDelete("signal_3_t"); ObjectDelete("signal_4_c"); ObjectDelete("signal_4_t"); ObjectDelete("signal_5_c"); ObjectDelete("signal_5_t"); ObjectDelete("signal_6_c"); ObjectDelete("signal_6_t"); ObjectDelete("signal_7_c"); ObjectDelete("signal_7_t"); ObjectDelete("signal_8_c"); ObjectDelete("signal_8_t"); ObjectDelete("signal_9_c"); ObjectDelete("signal_9_t"); ObjectDelete("signal_10_c"); ObjectDelete("signal_10_t"); ObjectDelete("signal_11_c"); ObjectDelete("signal_11_t"); ObjectDelete("signal_12_c"); ObjectDelete("signal_12_t"); ObjectDelete("signal_13_c"); ObjectDelete("signal_13_t"); ObjectDelete("signal_14_c"); ObjectDelete("signal_14_t"); return(0); } //+------------------------------------------------------------------+ int start() { if(Bars == lastBars || lastBars == 0) { //return(0); } if(!started && Bars > 20) { atrOffset = 0.5 * iATR(NULL, 0, 10, 1); started = true; } int i,counted_bars=IndicatorCounted(); i=Bars-counted_bars-1; while(i>=0) { processSignal(1, i); processSignal(2, i); processSignal(3, i); processSignal(4, i); processSignal(5, i); processSignal(6, i); processSignal(7, i); processSignal(8, i); processSignal(9, i); processSignal(10, i); processSignal(11, i); processSignal(12, i); processSignal(13, i); processSignal(14, i); i--; } lastBars = Bars; return(0); } //+------------------------------------------------------------------+ void processSignal(int signalIndex, int i) { if(getSignal(signalIndex, i)) { drawSignal(signalIndex, i, getDrawOffset(signalIndex, i)); bool previousSignal = getSignal(signalIndex, i+1); if(previousSignal == false && i<=LookBackForAlerts && (lastSignalDisplayed == 0 || lastSignalDisplayed < Time[i])) { // send alerts lastSignalDisplayed = Time[i]; string alertText = getAlertText(signalIndex, i); if(MT4Alert) { Alert(alertText); } if(EmailAlert) { SendMail(StringConcatenate(EmailSubject, "Ichimoku TK Cross and Kumo Breakout Strategy"), alertText); } } } else { drawSignal(signalIndex, i, 0); } } //+------------------------------------------------------------------+ string getAlertText(int signalIndex, int i) { string text = Symbol() +"/" + getPeriodAsString() + " - " + TimeToStr(Time[i]); text = StringConcatenate(text, " Signal Alert :"); if(signalIndex == 1) { text = StringConcatenate(text, " Buy Tenkan Cross Kijusen (#1, Long) : "); text = StringConcatenate(text, Signal1Text); } if(signalIndex == 2) { text = StringConcatenate(text, " Buy Kumo Price Breakout Senkou Span A (#2, Long) : "); text = StringConcatenate(text, Signal2Text); } if(signalIndex == 3) { text = StringConcatenate(text, " Buy Kumo Price Breakout Senkou Span B (#3, Long) : "); text = StringConcatenate(text, Signal3Text); } if(signalIndex == 4) { text = StringConcatenate(text, " Buy Senkou Span A cross B (#4, Long) : "); text = StringConcatenate(text, Signal4Text); } if(signalIndex == 5) { text = StringConcatenate(text, " Buy Chikou Span cross Price (#5, Long) : "); text = StringConcatenate(text, Signal5Text); } if(signalIndex == 6) { text = StringConcatenate(text, " Buy Chikou Span cross Senkou Span A (#6, Long) : "); text = StringConcatenate(text, Signal6Text); } if(signalIndex == 7) { text = StringConcatenate(text, " Buy Chikou Span cross Senkou Span B (#7, Long) : "); text = StringConcatenate(text, Signal7Text); } if(signalIndex == 8) { text = StringConcatenate(text, " Sell Tenkan Cross Kijusen (#8, Short) : "); text = StringConcatenate(text, Signal8Text); } if(signalIndex == 9) { text = StringConcatenate(text, " Sell Kumo Breakout Price Senkou Span A (#9, Short) : "); text = StringConcatenate(text, Signal9Text); } if(signalIndex == 10) { text = StringConcatenate(text, " Sell Kumo Breakout Price Senkou Span B (#10, Short) : "); text = StringConcatenate(text, Signal10Text); } if(signalIndex == 11) { text = StringConcatenate(text, " Sell Senkou Span A cross B (#11, Long) : "); text = StringConcatenate(text, Signal11Text); } if(signalIndex == 12) { text = StringConcatenate(text, " Sell Chikou Span cross Price (#12, Long) : "); text = StringConcatenate(text, Signal12Text); } if(signalIndex == 13) { text = StringConcatenate(text, " Sell Chikou Span cross Senkou Span A (#13, Long) : "); text = StringConcatenate(text, Signal13Text); } if(signalIndex == 14) { text = StringConcatenate(text, " Sell Chikou Span cross Senkou Span B (#14, Long) : "); text = StringConcatenate(text, Signal14Text); } return(text); } //+------------------------------------------------------------------+ string getPeriodAsString() { switch(Period()) { case PERIOD_M1: return("M1"); case PERIOD_M5: return("M5"); case PERIOD_M15: return("M15"); case PERIOD_M30: return("M30"); case PERIOD_H1: return("H1"); case PERIOD_H4: return("H4"); case PERIOD_D1: return("D1"); case PERIOD_W1: return("W1"); case PERIOD_MN1: return("MN1"); } return("Unknown"); } //+------------------------------------------------------------------+ bool getSignal(int signalIndex, int signalShift) { if(signalIndex == 1) { return(((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) > High[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) >= iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+2)) <= iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+2))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && (sqIsBarOpen == true)))))))))))))); } if(signalIndex == 2) { return(((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) > High[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) >= iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && (((Close[(signalShift+1) +1] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1) +1)) && (Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1)))) && (sqIsBarOpen == true))))))))); } if(signalIndex == 3) { return(((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) > High[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) >= iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && (((Close[(signalShift+1) +1] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1) +1)) && (Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1)))) && (sqIsBarOpen == true))))))))); } if(signalIndex == 4) { return(((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) > High[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && (((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25) +1) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25) +1)) && (iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25)))) && (sqIsBarOpen == true))))))))); } if(signalIndex == 5) { return(((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && (((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27) +1) < High[(signalShift+27) +1]) && (iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) > High[(signalShift+27)])) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && (sqIsBarOpen == true))))))))); } if(signalIndex == 6) { return(((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) > High[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+27))) && (((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27) +1) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+27) +1)) && (iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+27)))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && (sqIsBarOpen == true))))))))))); } if(signalIndex == 7) { return(((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((Close[(signalShift+1)] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) > High[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+27))) && (((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27) +1) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+27) +1)) && (iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+27)))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && (sqIsBarOpen == true))))))))))); } if(signalIndex == 8) { return(((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) < Low[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) <= iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+2)) >= iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+2))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && (sqIsBarOpen == true)))))))))))))); } if(signalIndex == 9) { return(((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) < Low[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) <= iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && (((Close[(signalShift+1) +1] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1) +1)) && (Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1)))) && (sqIsBarOpen == true))))))))); } if(signalIndex == 10) { return(((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) < Low[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) <= iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && (((Close[(signalShift+1) +1] > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1) +1)) && (Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1)))) && (sqIsBarOpen == true))))))))); } if(signalIndex == 11) { return(((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) < Low[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && (((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25) +1) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25) +1)) && (iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25)))) && (sqIsBarOpen == true))))))))); } if(signalIndex == 12) { return(((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && (((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27) +1) > Low[(signalShift+27) +1]) && (iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) < Low[(signalShift+27)])) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && (sqIsBarOpen == true))))))))); } if(signalIndex == 13) { return(((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) < Low[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+27))) && (((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27) +1) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+27) +1)) && (iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+27)))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && (sqIsBarOpen == true))))))))))); } if(signalIndex == 14) { return(((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+1))) && ((Close[(signalShift+1)] < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) < Low[(signalShift+27)]) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift+27))) && (((iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27) +1) > iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+27) +1)) && (iIchimoku(NULL, 0 , 9 , 26 , 52 , 5 , (signalShift+27)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift+27)))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 1 , (signalShift+1)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 2 , (signalShift+1))) && ((iIchimoku(NULL, 0 , 9 , 26 , 52 , 3 , (signalShift-25)) < iIchimoku(NULL, 0 , 9 , 26 , 52 , 4 , (signalShift-25))) && (sqIsBarOpen == true))))))))))); } return(false); } //+------------------------------------------------------------------+ double getDrawOffset(int signalIndex, int i) { if(signalIndex == 1) { if(Signal1Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 2) { if(Signal2Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 3) { if(Signal3Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 4) { if(Signal4Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 5) { if(Signal5Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 6) { if(Signal6Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 7) { if(Signal7Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 8) { if(Signal8Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 9) { if(Signal9Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 10) { if(Signal10Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 11) { if(Signal11Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 12) { if(Signal12Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 13) { if(Signal13Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } if(signalIndex == 14) { if(Signal14Pos == "High") { return(High[i]+atrOffset + (sigCountOffsets(signalIndex, "High"))*(atrOffset*2)); } else { return(Low[i]-atrOffset - (sigCountOffsets(signalIndex, "Low"))*(atrOffset*2)); } } return(false); } //+------------------------------------------------------------------+ int sigCountOffsets(int signalIndex, string hl) { int count = 0; if(signalIndex == 1) { if(Signal1Pos == hl) { count++; } } if(signalIndex == 2) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } } if(signalIndex == 3) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } } if(signalIndex == 4) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } if(Signal4Pos == hl) { count++; } } if(signalIndex == 5) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } if(Signal4Pos == hl) { count++; } if(Signal5Pos == hl) { count++; } } if(signalIndex == 6) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } if(Signal4Pos == hl) { count++; } if(Signal5Pos == hl) { count++; } if(Signal6Pos == hl) { count++; } } if(signalIndex == 7) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } if(Signal4Pos == hl) { count++; } if(Signal5Pos == hl) { count++; } if(Signal6Pos == hl) { count++; } if(Signal7Pos == hl) { count++; } } if(signalIndex == 8) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } if(Signal4Pos == hl) { count++; } if(Signal5Pos == hl) { count++; } if(Signal6Pos == hl) { count++; } if(Signal7Pos == hl) { count++; } if(Signal8Pos == hl) { count++; } } if(signalIndex == 9) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } if(Signal4Pos == hl) { count++; } if(Signal5Pos == hl) { count++; } if(Signal6Pos == hl) { count++; } if(Signal7Pos == hl) { count++; } if(Signal8Pos == hl) { count++; } if(Signal9Pos == hl) { count++; } } if(signalIndex == 10) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } if(Signal4Pos == hl) { count++; } if(Signal5Pos == hl) { count++; } if(Signal6Pos == hl) { count++; } if(Signal7Pos == hl) { count++; } if(Signal8Pos == hl) { count++; } if(Signal9Pos == hl) { count++; } if(Signal10Pos == hl) { count++; } } if(signalIndex == 11) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } if(Signal4Pos == hl) { count++; } if(Signal5Pos == hl) { count++; } if(Signal6Pos == hl) { count++; } if(Signal7Pos == hl) { count++; } if(Signal8Pos == hl) { count++; } if(Signal9Pos == hl) { count++; } if(Signal10Pos == hl) { count++; } if(Signal11Pos == hl) { count++; } } if(signalIndex == 12) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } if(Signal4Pos == hl) { count++; } if(Signal5Pos == hl) { count++; } if(Signal6Pos == hl) { count++; } if(Signal7Pos == hl) { count++; } if(Signal8Pos == hl) { count++; } if(Signal9Pos == hl) { count++; } if(Signal10Pos == hl) { count++; } if(Signal11Pos == hl) { count++; } if(Signal12Pos == hl) { count++; } } if(signalIndex == 13) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } if(Signal4Pos == hl) { count++; } if(Signal5Pos == hl) { count++; } if(Signal6Pos == hl) { count++; } if(Signal7Pos == hl) { count++; } if(Signal8Pos == hl) { count++; } if(Signal9Pos == hl) { count++; } if(Signal10Pos == hl) { count++; } if(Signal11Pos == hl) { count++; } if(Signal12Pos == hl) { count++; } if(Signal13Pos == hl) { count++; } } if(signalIndex == 14) { if(Signal1Pos == hl) { count++; } if(Signal2Pos == hl) { count++; } if(Signal3Pos == hl) { count++; } if(Signal4Pos == hl) { count++; } if(Signal5Pos == hl) { count++; } if(Signal6Pos == hl) { count++; } if(Signal7Pos == hl) { count++; } if(Signal8Pos == hl) { count++; } if(Signal9Pos == hl) { count++; } if(Signal10Pos == hl) { count++; } if(Signal11Pos == hl) { count++; } if(Signal12Pos == hl) { count++; } if(Signal13Pos == hl) { count++; } if(Signal14Pos == hl) { count++; } } return(count); } //+------------------------------------------------------------------+ void drawSignal(int signalIndex, int i, double value) { if(signalIndex == 1) { Signal1Buffer[i] = value; } if(signalIndex == 2) { Signal2Buffer[i] = value; } if(signalIndex == 3) { Signal3Buffer[i] = value; } if(signalIndex == 4) { Signal4Buffer[i] = value; } if(signalIndex == 5) { Signal5Buffer[i] = value; } if(signalIndex == 6) { Signal6Buffer[i] = value; } if(signalIndex == 7) { Signal7Buffer[i] = value; } if(signalIndex == 8) { Signal8Buffer[i] = value; } if(signalIndex == 9) { Signal9Buffer[i] = value; } if(signalIndex == 10) { Signal10Buffer[i] = value; } if(signalIndex == 11) { Signal11Buffer[i] = value; } if(signalIndex == 12) { Signal12Buffer[i] = value; } if(signalIndex == 13) { Signal13Buffer[i] = value; } if(signalIndex == 14) { Signal14Buffer[i] = value; } } //+------------------------------------------------------------------+ void TextObject(string id, int x, int y, string text, int size, string font, int fcolor) { ObjectCreate(id, OBJ_LABEL, 0, 0, 10); ObjectSet(id, OBJPROP_CORNER, LabelCorner); ObjectSet(id, OBJPROP_YDISTANCE, OffsetVertical + y); ObjectSet(id, OBJPROP_XDISTANCE, OffsetHorizontal + x); ObjectSetText(id, text, size, font, fcolor); } void TextSet(string signalIndex, int barIndex, int signal, string text) { // draw time ObjectSetText("signal_t"+signalIndex, "AA", 8, "Tahoma", LabelColor); // draw arrow string signalTxt; int signalColor; int signalChar; if(signal == 1) { signalTxt = "LONG"; signalColor = Green; signalChar = 233; } else { signalTxt = "SHORT"; signalColor = Red; signalChar = 234; } ObjectSetText("signal_a"+signalIndex, CharToStr(signalChar), 10, "Wingdings", signalColor); // draw text ObjectSetText("signal_s"+signalIndex, text, 8, "Tahoma", LabelColor); } //---------------------------------------------------------------------------- bool getReplaceStopLimitOrder(int orderMagicNumber) { // unused function return(false); } double getOrderStopLoss(int orderMagicNumber, int orderType, double price) { return(0); } double getOrderProfitTarget(int orderMagicNumber, int orderType, double price) { return(0); } //---------------------------------------------------------------------------- double getStopDifferencePrice(int orderMagicNumber) { return(0); } //---------------------------------------------------------------------------- double sqGetAverage(int avgIndiNumber, int period, int maMethod, int signalShift) { double indicatorValue[1000]; for(int i=0; i maxnum) { maxnum = val; } } return(maxnum); } //+------------------------------------------------------------------+ double sqLowest(string symbol, int timeframe, int period, int shift) { double minnum = 1000000; double val; for(int i=shift; i maxnum) { maxnum = range; } } return(maxnum); } //+------------------------------------------------------------------+ double sqSmallestRange(string symbol, int timeframe, int period, int shift) { double minnum = 1000; double range; for(int i=shift; i0) { FileSeek(handle,0,SEEK_END); FileWrite(handle, TimeToStr(TimeCurrent()), " ", s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12); FileClose(handle); } } //+------------------------------------------------------------------+ string sqGetPeriodAsStr() { string str = TimeToStr(Time[0], TIME_DATE); int period = Period(); if(period == PERIOD_H4 || period == PERIOD_H1) { str = str + TimeHour(Time[0]); } if(period == PERIOD_M30 || period == PERIOD_M15 || period == PERIOD_M5 || period == PERIOD_M1) { str = str + " " + TimeToStr(Time[0], TIME_MINUTES); } return(str); } //+------------------------------------------------------------------+ bool sqDoublesAreEqual(double n1, double n2) { string s1 = DoubleToStr(n1, Digits); string s2 = DoubleToStr(n2, Digits); return (s1 == s2); } //+------------------------------------------------------------------+ int sqGetBarsFromOrderOpen(int expBarsPeriod) { datetime opTime = OrderOpenTime(); int numberOfBars = 0; for(int i=0; i=0; i--) { found = true; if (OrderSelect(i,SELECT_BY_POS)==true) { if(OrderType() == OP_BUY || OrderType() == OP_SELL) { sqClosePositionAtMarket(-1); } else { Verbose("Deleting pending order"); OrderDelete(OrderTicket()); } } } if(!found) { Verbose("No orders found"); } Verbose("Closing all orders finished ----------------"); } //---------------------------------------------------------------------------- void sqCloseOrderPartialPct(int orderMagicNumber, double percentage) { double lotMM = sqGetCurrentPositionSize(orderMagicNumber) * (percentage / 100.0); int rounding = 2; double lotStep = MarketInfo(Symbol(), MODE_LOTSTEP); if(lotStep == 0.01) { rounding = 2; } else if(lotStep == 0.1) { rounding = 1; } else if(lotStep >= 0) { rounding = 0; } lotMM = NormalizeDouble( lotMM, rounding); if(MarketInfo(Symbol(), MODE_LOTSIZE)==10000.0) lotMM=lotMM*10.0 ; lotMM=NormalizeDouble(lotMM, rounding); double Smallest_Lot = MarketInfo(Symbol(), MODE_MINLOT); double Largest_Lot = MarketInfo(Symbol(), MODE_MAXLOT); if (lotMM < Smallest_Lot) lotMM = Smallest_Lot; if (lotMM > Largest_Lot) lotMM = Largest_Lot; sqCloseOrderPartial(orderMagicNumber, lotMM); } //---------------------------------------------------------------------------- void sqCloseOrderPartial(int orderMagicNumber, double size) { for(int i=0; i 0) { // trade successfuly opened Verbose("Trade successfuly opened", " ----------------"); ObjectSetText("lines", "Last Signal: "+ruleName, 8, "Tahoma", LabelColor); return(true); } } if(ticket == -130) { Verbose("Invalid stops, cannot open the trade", " ----------------"); return(false); } if(ticket == -131) { // invalid volume, we cannot open the trade Verbose("Invalid volume, cannot open the trade", " ----------------"); return(false); } if(ticket == -11111) { Verbose("Trade opened, but cannot set SL/PT, closing trade", " ----------------"); return(false); } Sleep(1000); } Verbose("Retries of opening order finished", " ----------------"); return(false); } //+------------------------------------------------------------------+ int sqIsTradeAllowed(int MaxWaiting_sec = 30) { // check whether the trade context is free if(!IsTradeAllowed()) { int StartWaitingTime = GetTickCount(); Print("Trade context is busy! Wait until it is free..."); // infinite loop while(true) { // if the expert was terminated by the user, stop operation if(IsStopped()) { Print("The expert was terminated by the user!"); return(-1); } // if the waiting time exceeds the time specified in the // MaxWaiting_sec variable, stop operation, as well int diff = GetTickCount() - StartWaitingTime; if(diff > MaxWaiting_sec * 1000) { Print("The waiting limit exceeded (" + MaxWaiting_sec + " ???.)!"); return(-2); } // if the trade context has become free, if(IsTradeAllowed()) { Print("Trade context has become free!"); RefreshRates(); return(1); } // if no loop breaking condition has been met, "wait" for 0.1 // second and then restart checking Sleep(100); } } else { //Print("Trade context is free!"); return(1); } return(1); } //+------------------------------------------------------------------+ int sqOpenOrderWithErrorHandling(string symbol, int orderType, double orderLots, double price, double realSL, double realPT, string comment, int orderMagicNumber) { int ticket, error; Verbose("Sending order..."); double sl = realSL; double pt = realPT; if(SupportECNBrokers) { sl = 0; pt = 0; } if(symbol == "NULL") { ticket = OrderSend(Symbol(), orderType, orderLots, price, MaxSlippage, sl, pt, comment, orderMagicNumber); } else { ticket = OrderSend(symbol, orderType, orderLots, price, MaxSlippage, sl, pt, comment, orderMagicNumber); } if(ticket < 0) { // order failed, write error to log error = GetLastError(); Verbose("Order failed, error: ", error); return(-1*error); } OrderSelect(ticket, SELECT_BY_TICKET, MODE_TRADES); Log("Order opened with ticket: ", OrderTicket(), " at price:", OrderOpenPrice()); VerboseLog("Order with Magic Number: ",orderMagicNumber," opened with ticket: ", OrderTicket(), " at price:", OrderOpenPrice()); if(SupportECNBrokers) { // set up stop loss and profit target // it has to be done separately to support ECN brokers int retries = 3; while(true) { retries--; if(retries < 0) return(0); if((realSL == 0 && realPT == 0) || (OrderStopLoss() == realSL && OrderTakeProfit() == realPT)) { return(ticket); } if(sqIsTradeAllowed() == 1) { Verbose("Setting SL/PT, try #", 3-retries); if(sqSetSLPTForOrder(ticket, realSL, realPT, orderMagicNumber, orderType, price, symbol, retries)) { return(ticket); } if(retries == 0) { // there was eror setting SL/PT and order was deleted return(-11111); } } Sleep(1000); } Verbose("Retries of setting SL/PT order finished unsuccessfuly", " ----------------"); return(-1); } return(ticket); } //+------------------------------------------------------------------+ bool sqSetSLPTForOrder(int ticket, double realSL, double realPT, int orderMagicNumber, int orderType, double price, string symbol, int retries) { Verbose("Setting SL: ", realSL, " and PT: ", realPT, " for order"); if(OrderModify(ticket, OrderOpenPrice(), realSL, realPT, 0, 0)) { VerboseLog("Order updates, StopLoss: ", realSL,", Profit Target: ", realPT); return(true); } else { int error = GetLastError(); VerboseLog("Error modifying order: ",error, " : ", ErrorDescription(error)); if(retries == 0) { // when it is last unsuccessful retry, it tries to close the order RefreshRates(); sqClosePositionAtMarket(-1); lastOrderErrorCloseTime = TimeCurrent(); } return(false); } return(true); } //+------------------------------------------------------------------+ int sqGetMarketPosition() { for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (OrderSelect(cc, SELECT_BY_POS) && OrderSymbol() == Symbol()) { if(OrderType() == OP_BUY) { return(1); } if(OrderType() == OP_SELL) { return(-1); } } } return(0); } //+------------------------------------------------------------------+ double sqGetOrderPosition(int orderMagicNumber) { for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if((orderMagicNumber == 0 && OrderSymbol() == Symbol()) || OrderMagicNumber() == orderMagicNumber) { if(OrderType() == OP_BUY) { return(1); } if(OrderType() == OP_SELL) { return(-1); } } } return(0); } //+------------------------------------------------------------------+ double sqGetOpenPrice(int orderMagicNumber) { for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if((orderMagicNumber == 0 && OrderSymbol() == Symbol()) || OrderMagicNumber() == orderMagicNumber) { return(OrderOpenPrice()); } } return(0); } //+------------------------------------------------------------------+ double sqGetOrderStopLoss(int orderMagicNumber) { for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if(OrderMagicNumber() == orderMagicNumber && OrderSymbol() == Symbol()) { return(OrderStopLoss()); } } return(0); } //+------------------------------------------------------------------+ double sqGetOrderProfitTarget(int orderMagicNumber) { for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if(OrderMagicNumber() == orderMagicNumber && OrderSymbol() == Symbol()) { return(OrderTakeProfit()); } } return(0); } //+------------------------------------------------------------------+ void sqDeletePendingOrder(int orderMagicNumber) { for(int i=0; i= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if(OrderMagicNumber() != orderMagicNumber || OrderSymbol() != Symbol()) continue; if(OrderType() != OP_BUY && OrderType() != OP_SELL) continue; return(true); } return(false); } //+------------------------------------------------------------------+ bool sqPendingOrderExists(int orderMagicNumber) { for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if(OrderMagicNumber() != orderMagicNumber || OrderSymbol() != Symbol()) continue; if(OrderType() == OP_BUY || OrderType() == OP_SELL) continue; return(true); } return(false); } //+------------------------------------------------------------------+ bool sqIsCandlePattern(int shift, int pattern) { if(pattern == PATTERN_DOJI) return(sqCandlePatternDoji(shift)); if(pattern == PATTERN_HAMMER) return(sqCandlePatternHammer(shift)); if(pattern == PATTERN_SHOOTING_STAR) return(sqCandlePatternShootingStar(shift)); if(pattern == PATTERN_DARK_CLOUD) return(sqCandlePatternDarkCloudCover(shift)); if(pattern == PATTERN_PIERCING_LINE) return(sqCandlePatternPiercingLine(shift)); if(pattern == PATTERN_BEARISH_ENGULFING) return(sqCandlePatternBearishEngulfing(shift)); if(pattern == PATTERN_BULLISH_ENGULFING) return(sqCandlePatternBullishEngulfing(shift)); if(pattern == PATTERN_BEARISH_HARAMI) return(sqCandlePatternBearishHarami(shift)); if(pattern == PATTERN_BULLISH_HARAMI) return(sqCandlePatternBullishHarami(shift)); if(pattern == PATTERN_BEARISH_HARAMI_CROSS) return(sqCandlePatternBearishHC(shift)); if(pattern == PATTERN_BULLISH_HARAMI_CROSS) return(sqCandlePatternBullishHC(shift)); return(false); } //+------------------------------------------------------------------+ bool sqCandlePatternDoji(int shift) { if(MathAbs(Open[shift] - Close[shift])*gPointPow < 0.6) { return(true); } return(false); } //+------------------------------------------------------------------+ bool sqCandlePatternHammer(int shift) { double H = High[shift]; double L = Low[shift]; double L1 = Low[shift+1]; double L2 = Low[shift+2]; double L3 = Low[shift+3]; double O = Open[shift]; double C = Close[shift]; double CL = H-L; double BodyLow, BodyHigh; double Candle_WickBody_Percent = 0.9; double CandleLength = 12; if (O > C) { BodyHigh = O; BodyLow = C; } else { BodyHigh = C; BodyLow = O; } double LW = BodyLow-L; double UW = H-BodyHigh; double BLa = MathAbs(O-C); double BL90 = BLa*Candle_WickBody_Percent; double pipValue = gPointCoef; if ((L<=L1)&&(LUW)&&(LW>BL90)&&(CL>=(CandleLength*pipValue))&&(O!=C)&&((LW/3)<=UW)&&((LW/4)<=UW)/*&&(HUW)&&(LW>BL90)&&(CL>=(CandleLength*pipValue))&&(O!=C)&&((LW/4)<=UW)/*&&(HUW)&&(LW>BL90)&&(CL>=(CandleLength*pipValue))&&(O!=C)/*&&(HPiercing_Line_Ratio)&&(CL>=(Piercing_Candle_Length*gPointCoef))) { return(true); } return(false); } //+------------------------------------------------------------------+ bool sqCandlePatternShootingStar(int shift) { double L = Low[shift]; double H = High[shift]; double H1 = High[shift+1]; double H2 = High[shift+2]; double H3 = High[shift+3]; double O = Open[shift]; double C = Close[shift]; double CL = H-L; double BodyLow, BodyHigh; double Candle_WickBody_Percent = 0.9; double CandleLength = 12; if (O > C) { BodyHigh = O; BodyLow = C; } else { BodyHigh = C; BodyLow = O; } double LW = BodyLow-L; double UW = H-BodyHigh; double BLa = MathAbs(O-C); double BL90 = BLa*Candle_WickBody_Percent; double pipValue = gPointCoef; if ((H>=H1)&&(H>H2)&&(H>H3)) { if (((UW/2)>LW)&&(UW>(2*BL90))&&(CL>=(CandleLength*pipValue))&&(O!=C)&&((UW/3)<=LW)&&((UW/4)<=LW)/*&&(L>L1)&&(L>L2)*/) { return(true); } if (((UW/3)>LW)&&(UW>(2*BL90))&&(CL>=(CandleLength*pipValue))&&(O!=C)&&((UW/4)<=LW)/*&&(L>L1)&&(L>L2)*/) { return(true); } if (((UW/4)>LW)&&(UW>(2*BL90))&&(CL>=(CandleLength*pipValue))&&(O!=C)/*&&(L>L1)&&(L>L2)*/) { return(true); } } return(false); } //+------------------------------------------------------------------+ bool sqCandlePatternBearishEngulfing(int shift) { double O = Open[shift]; double O1 = Open[shift+1]; double C = Close[shift]; double C1 = Close[shift+1]; if ((C1>O1)&&(O>C)&&(O>=C1)&&(O1>=C)&&((O-C)>(C1-O1))) { return(true); } return(false); } //+------------------------------------------------------------------+ bool sqCandlePatternBullishEngulfing(int shift) { double O = Open[shift]; double O1 = Open[shift+1]; double C = Close[shift]; double C1 = Close[shift+1]; if ((O1>C1)&&(C>O)&&(C>=O1)&&(C1>=O)&&((C-O)>(O1-C1))) { return(true); } return(false); } //+------------------------------------------------------------------+ bool sqCandlePatternDarkCloudCover(int shift) { double L = Low[shift]; double H = High[shift]; double O = Open[shift]; double O1 = Open[shift+1]; double C = Close[shift]; double C1 = Close[shift+1]; double CL = H-L; double OC_HL; if((H - L) != 0) { OC_HL = (O-C)/(H-L); } else { OC_HL = 0; } double Piercing_Line_Ratio = 0.5; double Piercing_Candle_Length = 10; if ((C1>O1)&&(((C1+O1)/2)>C)&&(O>C)&&(C>O1)&&(OC_HL>Piercing_Line_Ratio)&&((CL>=Piercing_Candle_Length*gPointCoef))) { return(true); } return(false); } //+------------------------------------------------------------------+ bool sqCandlePatternBearishHarami(int shift) { double O = Open[shift]; double O1 = Open[shift+1]; double C = Close[shift]; double C1 = Close[shift+1]; if ((C1>O1)&&(O>C)&&(O<=C1)&&(O1<=C)&&((O-C)<(C1-O1))) { return(true); } return(false); } //+------------------------------------------------------------------+ bool sqCandlePatternBullishHarami(int shift) { double O = Open[shift]; double O1 = Open[shift+1]; double C = Close[shift]; double C1 = Close[shift+1]; if ((O1>C1)&&(C>O)&&(C<=O1)&&(C1<=O)&&((C-O)<(O1-C1))) { return(true); } return(false); } //+------------------------------------------------------------------+ bool sqCandlePatternBearishHC(int shift) { return (sqCandlePatternBearishHarami(shift) && sqCandlePatternDoji(shift)); } //+------------------------------------------------------------------+ bool sqCandlePatternBullishHC(int shift) { return (sqCandlePatternBullishHarami(shift) && sqCandlePatternDoji(shift)); } //+------------------------------------------------------------------+ double sqGetOpenPLInPips(int orderMagicNumber) { double pl = 0; for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if(OrderType() != OP_BUY && OrderType() != OP_SELL) continue; if(OrderSymbol() != Symbol() || (orderMagicNumber != 0 && OrderMagicNumber() != orderMagicNumber)) continue; if(OrderType() == OP_BUY) { pl += sqGetBid(OrderSymbol()) - OrderOpenPrice(); } else { pl += OrderOpenPrice() - sqGetAsk(OrderSymbol()); } } return(pl*gPointPow); } //+------------------------------------------------------------------+ int sqGetClosedPLInPips(int orderMagicNumber, int shift) { double pl = 0; int index = 0; for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { if(index != shift) { index++; continue; } // return the P/L of last order // or return the P/L of last order with given Magic Number if(OrderType() == OP_BUY) { pl = OrderClosePrice() - OrderOpenPrice(); } else { pl = OrderOpenPrice() - OrderClosePrice(); } return(pl*gPointPow); } } } return(0); } //+------------------------------------------------------------------+ int sqGetTotalClosedPLInPips(int orderMagicNumber, int numberOfLastOrders) { double pl = 0; int count = 0; for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { // return the P/L of last order // or return the P/L of last order with given Magic Number count++; if(OrderType() == OP_BUY) { pl = pl + (OrderClosePrice() - OrderOpenPrice()); } else { pl = pl + (OrderOpenPrice() - OrderClosePrice()); } if(count >= numberOfLastOrders) break; } } } return(pl*gPointPow); } //+------------------------------------------------------------------+ int sqGetTotalProfits(int orderMagicNumber, int numberOfLastOrders) { double pl = 0; int count = 0; int profits = 0; for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { // return the P/L of last order // or return the P/L of last order with given Magic Number count++; if(OrderType() == OP_BUY) { pl = (OrderClosePrice() - OrderOpenPrice()); } else { pl = (OrderOpenPrice() - OrderClosePrice()); } if(pl > 0) { profits++; } if(count >= numberOfLastOrders) break; } } } return(profits); } //+------------------------------------------------------------------+ int sqGetTotalLosses(int orderMagicNumber, int numberOfLastOrders) { double pl = 0; int count = 0; int losses = 0; for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { // return the P/L of last order // or return the P/L of last order with given Magic Number count++; if(OrderType() == OP_BUY) { pl = (OrderClosePrice() - OrderOpenPrice()); } else { pl = (OrderOpenPrice() - OrderClosePrice()); } if(pl < 0) { losses++; } if(count >= numberOfLastOrders) break; } } } return(losses); } //+------------------------------------------------------------------+ double sqGetOpenPLInMoney(int orderMagicNumber) { double pl = 0; for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if(OrderType() != OP_BUY && OrderType() != OP_SELL) continue; if(OrderSymbol() != Symbol()) continue; if(orderMagicNumber != 0 && OrderMagicNumber() != orderMagicNumber) continue; pl += OrderProfit(); } return(pl); } //+------------------------------------------------------------------+ int sqGetClosedPLInMoney(int orderMagicNumber, int shift) { double pl = 0; int index = 0; for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(index != shift) { index++; continue; } if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { // return the P/L of last order or the P/L of last order with given Magic Number return(OrderProfit()); } } } return(0); } //+------------------------------------------------------------------+ int sqGetTotalClosedPLInMoney(int orderMagicNumber, int numberOfLastOrders) { double pl = 0; int count = 0; for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { // return the P/L of last order or the P/L of last order with given Magic Number count++; pl = pl + OrderProfit(); if(count >= numberOfLastOrders) break; } } } return(pl); } //+------------------------------------------------------------------+ double sqGetCurrentPositionSize(int orderMagicNumber) { double lots = 0; for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if(OrderType() != OP_BUY && OrderType() != OP_SELL) continue; if(OrderSymbol() != Symbol()) continue; if(orderMagicNumber != 0 && OrderMagicNumber() != orderMagicNumber) continue; lots += OrderLots(); } return(lots); } //+------------------------------------------------------------------+ double sqGetLastPositionSize(int orderMagicNumber) { for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { return(OrderLots()); } } } return(0); } //+------------------------------------------------------------------+ void sqMoveSLTo(int orderMagicNumber, double newSL) { bool found = false; for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if(OrderMagicNumber() == orderMagicNumber && OrderSymbol() == Symbol()) { found = true; Verbose("Moving SL for order with Magic Number: ", orderMagicNumber, ", ticket: ", OrderTicket(), ", new SL: ", newSL); OrderModify(OrderTicket(), OrderOpenPrice(), newSL, OrderTakeProfit(), 0); } } if(!found) { Verbose("Moving SL - order with Magic Number: ", orderMagicNumber, " wasn't found"); } } //+------------------------------------------------------------------+ void sqMovePTTo(int orderMagicNumber, double newPT) { bool found = false; for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if(OrderMagicNumber() == orderMagicNumber && OrderSymbol() == Symbol()) { found = true; Verbose("Moving PT for order with Magic Number: ", orderMagicNumber,", ticket: ", OrderTicket(), ", new PT: ", newPT); OrderModify(OrderTicket(), OrderOpenPrice(), OrderStopLoss(), newPT, 0); } } if(!found) { Verbose("Moving PT - order with Magic Number: ", orderMagicNumber, " wasn't found"); } } //+------------------------------------------------------------------+ int sqGetBarsSinceEntry(int orderMagicNumber) { for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (OrderSelect(cc, SELECT_BY_POS) ) { if((orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) && OrderSymbol() == Symbol()) { return (sqGetBarsFromOrderOpen(1000)); } } } return(-1); } //+------------------------------------------------------------------+ int sqGetBarsSinceExit(int orderMagicNumber) { for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true) { if(OrderMagicNumber() == orderMagicNumber && OrderSymbol() == Symbol()) { return (sqGetBarsFromOrderClose(1000)); } } } return(-1); } //+------------------------------------------------------------------+ int sqGetOpenBarsForOrder(int expBarsPeriod) { datetime opTime = OrderOpenTime(); int numberOfBars = 0; for(int i=0; i= 0; cc--) { if (OrderSelect(cc, SELECT_BY_POS) && OrderSymbol() == Symbol()) { if(direction == 1) { if(OrderType() == OP_SELL || OrderType() == OP_SELLLIMIT || OrderType() == OP_SELLSTOP) { // skip short orders continue; } } else if(direction == -1) { if(OrderType() == OP_BUY || OrderType() == OP_BUYLIMIT || OrderType() == OP_BUYSTOP) { // skip long orders continue; } } if(includePending == "false") { if(OrderType() == OP_BUYLIMIT || OrderType() == OP_BUYSTOP || OrderType() == OP_SELLLIMIT || OrderType() == OP_SELLSTOP) { // skip pending orders continue; } } if(TimeToStr( OrderOpenTime(), TIME_DATE) == todayTime) { tradesOpenedToday++; } } } return(tradesOpenedToday); } //+------------------------------------------------------------------+ int sqGetLastOrderType() { for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(OrderType() == OP_BUY) { return(1); } if(OrderType() == OP_SELL) { return(-1); } } } return(0); } //+------------------------------------------------------------------+ int sqGetLastOrderTodayType() { string todayTime = TimeToStr( TimeCurrent(), TIME_DATE); for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(TimeToStr( OrderOpenTime(), TIME_DATE) != todayTime) { continue; } if(OrderType() == OP_BUY) { return(1); } if(OrderType() == OP_SELL) { return(-1); } } } return(0); } //+------------------------------------------------------------------+ bool sqOrderOpenedThisBar(int orderMagicNumber) { double pl = 0; for(int i=0; i Time[1]) { return(true); } } } } for(i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { if(OrderOpenTime() > Time[1]) { return(true); } } } } return(false); } //+------------------------------------------------------------------+ bool sqOrderClosedThisBar(int orderMagicNumber) { double pl = 0; for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { if(OrderCloseTime() > Time[1]) { return(true); } } } } return(false); } //+------------------------------------------------------------------+ bool sqOrderOpenedThisMinute(int orderMagicNumber) { datetime timeCandle = TimeCurrent() - 60; //iTime(NULL, PERIOD_M1, 1); for(int i=0; i= timeCandle) { return(true); } } } } for(i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { if(OrderOpenTime() >= timeCandle) { return(true); } } } } return(false); } //+------------------------------------------------------------------+ bool sqOrderClosedThisMinute(int orderMagicNumber) { datetime timeCandle = TimeCurrent() - 60; //iTime(NULL, PERIOD_M1, 1); for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { if(OrderCloseTime() >= timeCandle) { return(true); } } } } return(false); } //+------------------------------------------------------------------+ double sqGetAngle(double value1, double value2, int period, double coef) { double diff = value1 - value2; double fAngleRad = MathArctan(diff / (coef*period)); double PI = 3.141592654; double fAngleDegrees = (fAngleRad * 180) / PI; return((fAngleDegrees)); } //+------------------------------------------------------------------+ string sqGetOrderSymbol(int orderMagicNumber) { datetime timeCandle = TimeCurrent() - 60; //iTime(NULL, PERIOD_M1, 1); for(int i=OrdersHistoryTotal(); i>=0; i--) { if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true && OrderSymbol() == Symbol()) { if(orderMagicNumber == 0 || OrderMagicNumber() == orderMagicNumber) { if(OrderCloseTime() >= timeCandle) { return(OrderSymbol()); } } } } return(""); } //+------------------------------------------------------------------+ void sqTextFillOpens() { ObjectSetText("lineopl", "Open P/L: "+DoubleToStr(sqGetOpenPLInMoney(0), 2), 8, "Tahoma", LabelColor); ObjectSetText("linea", "Account Balance: "+DoubleToStr(AccountBalance(), 2) , 8, "Tahoma", LabelColor); } //+------------------------------------------------------------------+ void sqTextFillTotals() { ObjectSetText("lineto", "Total profits/losses so far: "+sqGetTotalProfits(0, 100)+"/"+sqGetTotalLosses(0, 100), 8, "Tahoma", LabelColor); ObjectSetText("linetp", "Total P/L so far: "+DoubleToStr(sqGetTotalClosedPLInMoney(0, 1000), 2), 8, "Tahoma", LabelColor); } //+------------------------------------------------------------------+ double sqHighestInRange(string symbol, int timeframe, string timeFrom, string timeTo) { int indexTo = -1; int indexFrom = -1; // find index of bar for timeTo for(int i=1; i<=2000; i++) { if(TimeToStr(Time[i], TIME_MINUTES) >= timeTo && TimeToStr(Time[i+1], TIME_MINUTES) < timeTo) { //Log("Found timeTo: ", TimeToStr(Time[i])); indexTo = i; break; } } if(indexTo == -1) { Log("Not found timeTo"); return(-1); } // find index of bar for timeFrom for(i=indexTo+1; i<=2000; i++) { if(TimeToStr(Time[i], TIME_MINUTES) >= timeFrom && TimeToStr(Time[i+1], TIME_MINUTES) < timeFrom) { //Log("Found timeFrom: ", TimeToStr(Time[i])); indexFrom = i; break; } } if(indexFrom == -1) { Log("Not found time From"); return(-1); } double value = -10000.0; for(i=indexTo; i<=indexFrom; i++) { if(symbol == "NULL") { value = MathMax(value, iHigh(NULL, timeframe, i)); } else { value = MathMax(value, iHigh(symbol, timeframe, i)); } } return(value); } //+------------------------------------------------------------------+ double sqLowestInRange(string symbol, int timeframe, string timeFrom, string timeTo) { int indexTo = -1; int indexFrom = -1; // find index of bar for timeTo for(int i=1; i<=2000; i++) { if(TimeToStr(Time[i], TIME_MINUTES) >= timeTo && TimeToStr(Time[i+1], TIME_MINUTES) < timeTo) { //Log("Found timeTo: ", TimeToStr(Time[i])); indexTo = i; break; } } if(indexTo == -1) { Log("Not found timeTo"); return(-1); } // find index of bar for timeFrom for(i=indexTo+1; i<=2000; i++) { if(TimeToStr(Time[i], TIME_MINUTES) >= timeFrom && TimeToStr(Time[i+1], TIME_MINUTES) < timeFrom) { //Log("Found timeFrom: ", TimeToStr(Time[i])); indexFrom = i; break; } } if(indexFrom == -1) { Log("Not found time From"); return(-1); } double value = 100000.0; for(i=indexTo; i<=indexFrom; i++) { if(symbol == "NULL") { value = MathMin(value, iLow(NULL, timeframe, i)); } else { value = MathMin(value, iLow(symbol, timeframe, i)); } } return(value); } //+------------------------------------------------------------------+ double sqGetOrdersAveragePrice(int orderMagicNumber) { double sum = 0.0; double cnt = 0.0; for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if(OrderMagicNumber() == orderMagicNumber && OrderSymbol() == Symbol()) { if(OrderType() == OP_BUY && OrderCloseTime() == 0) { sum += OrderLots() * OrderOpenPrice (); cnt += OrderLots(); } if(OrderType() == OP_SELL && OrderCloseTime() == 0) { sum += OrderLots() * OrderOpenPrice (); cnt += OrderLots(); } } } if (NormalizeDouble (cnt, Digits) == 0) return (0); return(sum / cnt); } //+------------------------------------------------------------------+ double sqGetIf (double condition, double val1, double val2) { if (NormalizeDouble(condition, Digits) > 0) return (val1); return (val2); } //+------------------------------------------------------------------+ double sqRound(double value, int digits) { double pow = MathPow(10, digits); return(MathRound(value * pow) / pow); } //+------------------------------------------------------------------+ double sqGetAsk(string symbol) { if(symbol == "NULL") { return(Ask); } else { return(MarketInfo(symbol,MODE_ASK)); } } //+------------------------------------------------------------------+ double sqGetBid(string symbol) { if(symbol == "NULL") { return(Bid); } else { return(MarketInfo(symbol,MODE_BID)); } } //+------------------------------------------------------------------+ string sqGetOrderTypeAsString(int type) { switch(type) { case OP_BUY: return("Buy"); case OP_SELL: return("Sell"); case OP_BUYLIMIT: return("Buy Limit"); case OP_BUYSTOP: return("Buy Stop"); case OP_SELLLIMIT: return("Sell Limit"); case OP_SELLSTOP: return("Sell Stop"); } return("Unknown"); } //+------------------------------------------------------------------+ void Verbose(string s1, string s2="", string s3="", string s4="", string s5="", string s6="", string s7="", string s8="", string s9="", string s10="", string s11="", string s12="" ) { if(VerboseMode == 1) { // log to standard log Print("---VERBOSE--- ", TimeToStr(TimeCurrent()), " ", s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12); } else if(VerboseMode == 2) { // log to special file int handle = FileOpen("EAW_VerboseLog.txt", FILE_READ | FILE_WRITE); if(handle>0) { FileSeek(handle,0,SEEK_END); FileWrite(handle, TimeToStr(TimeCurrent()), " VERBOSE: ", s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12); FileClose(handle); } } } //+------------------------------------------------------------------+ void VerboseLog(string s1, string s2="", string s3="", string s4="", string s5="", string s6="", string s7="", string s8="", string s9="", string s10="", string s11="", string s12="" ) { if(VerboseMode != 1) { Log(s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12); } Verbose(s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12); } //+------------------------------------------------------------------+ double sqCICheck(double value) { if(value >= 2147483647) return(0); return(value); } //+------------------------------------------------------------------+ void sqDrawUpArrow(int shift) { string name = StringConcatenate("Arrow_", MathRand()); ObjectCreate(name, OBJ_ARROW, 0, Time[shift], Low[shift]-20*Point); //draw an up arrow ObjectSet(name, OBJPROP_STYLE, STYLE_SOLID); ObjectSet(name, OBJPROP_ARROWCODE, SYMBOL_ARROWUP); ObjectSet(name, OBJPROP_COLOR, Green); } //+------------------------------------------------------------------+ void sqDrawDownArrow(int shift) { string name = StringConcatenate("Arrow_", MathRand()); ObjectCreate(name, OBJ_ARROW, 0, Time[shift], High[shift]+140*Point); //draw an down arrow ObjectSet(name, OBJPROP_STYLE, STYLE_SOLID); ObjectSet(name, OBJPROP_ARROWCODE, SYMBOL_ARROWDOWN); ObjectSet(name, OBJPROP_COLOR, Red); } //+------------------------------------------------------------------+ string sqDateCurrent(int shift) { return(TimeToStr(Time[shift], TIME_DATE)); } //+------------------------------------------------------------------+ string sqGetDate(int day, int month, int year) { string strMonth = month; if(month < 10) strMonth = "0"+strMonth; string strDay = day; if(day < 10) strDay = "0"+strDay; return(StringConcatenate(year, ".", strMonth, ".", strDay)); } //+------------------------------------------------------------------+ //| return error description | //+------------------------------------------------------------------+ string ErrorDescription(int error_code) { string error_string; //---- switch(error_code) { //---- codes returned from trade server case 0: case 1: error_string="no error"; break; case 2: error_string="common error"; break; case 3: error_string="invalid trade parameters"; break; case 4: error_string="trade server is busy"; break; case 5: error_string="old version of the client terminal"; break; case 6: error_string="no connection with trade server"; break; case 7: error_string="not enough rights"; break; case 8: error_string="too frequent requests"; break; case 9: error_string="malfunctional trade operation (never returned error)"; break; case 64: error_string="account disabled"; break; case 65: error_string="invalid account"; break; case 128: error_string="trade timeout"; break; case 129: error_string="invalid price"; break; case 130: error_string="invalid stops"; break; case 131: error_string="invalid trade volume"; break; case 132: error_string="market is closed"; break; case 133: error_string="trade is disabled"; break; case 134: error_string="not enough money"; break; case 135: error_string="price changed"; break; case 136: error_string="off quotes"; break; case 137: error_string="broker is busy (never returned error)"; break; case 138: error_string="requote"; break; case 139: error_string="order is locked"; break; case 140: error_string="long positions only allowed"; break; case 141: error_string="too many requests"; break; case 145: error_string="modification denied because order too close to market"; break; case 146: error_string="trade context is busy"; break; case 147: error_string="expirations are denied by broker"; break; case 148: error_string="amount of open and pending orders has reached the limit"; break; case 149: error_string="hedging is prohibited"; break; case 150: error_string="prohibited by FIFO rules"; break; //---- mql4 errors case 4000: error_string="no error (never generated code)"; break; case 4001: error_string="wrong function pointer"; break; case 4002: error_string="array index is out of range"; break; case 4003: error_string="no memory for function call stack"; break; case 4004: error_string="recursive stack overflow"; break; case 4005: error_string="not enough stack for parameter"; break; case 4006: error_string="no memory for parameter string"; break; case 4007: error_string="no memory for temp string"; break; case 4008: error_string="not initialized string"; break; case 4009: error_string="not initialized string in array"; break; case 4010: error_string="no memory for array\' string"; break; case 4011: error_string="too long string"; break; case 4012: error_string="remainder from zero divide"; break; case 4013: error_string="zero divide"; break; case 4014: error_string="unknown command"; break; case 4015: error_string="wrong jump (never generated error)"; break; case 4016: error_string="not initialized array"; break; case 4017: error_string="dll calls are not allowed"; break; case 4018: error_string="cannot load library"; break; case 4019: error_string="cannot call function"; break; case 4020: error_string="expert function calls are not allowed"; break; case 4021: error_string="not enough memory for temp string returned from function"; break; case 4022: error_string="system is busy (never generated error)"; break; case 4050: error_string="invalid function parameters count"; break; case 4051: error_string="invalid function parameter value"; break; case 4052: error_string="string function internal error"; break; case 4053: error_string="some array error"; break; case 4054: error_string="incorrect series array using"; break; case 4055: error_string="custom indicator error"; break; case 4056: error_string="arrays are incompatible"; break; case 4057: error_string="global variables processing error"; break; case 4058: error_string="global variable not found"; break; case 4059: error_string="function is not allowed in testing mode"; break; case 4060: error_string="function is not confirmed"; break; case 4061: error_string="send mail error"; break; case 4062: error_string="string parameter expected"; break; case 4063: error_string="integer parameter expected"; break; case 4064: error_string="double parameter expected"; break; case 4065: error_string="array as parameter expected"; break; case 4066: error_string="requested history data in update state"; break; case 4099: error_string="end of file"; break; case 4100: error_string="some file error"; break; case 4101: error_string="wrong file name"; break; case 4102: error_string="too many opened files"; break; case 4103: error_string="cannot open file"; break; case 4104: error_string="incompatible access to a file"; break; case 4105: error_string="no order selected"; break; case 4106: error_string="unknown symbol"; break; case 4107: error_string="invalid price parameter for trade function"; break; case 4108: error_string="invalid ticket"; break; case 4109: error_string="trade is not allowed in the expert properties"; break; case 4110: error_string="longs are not allowed in the expert properties"; break; case 4111: error_string="shorts are not allowed in the expert properties"; break; case 4200: error_string="object is already exist"; break; case 4201: error_string="unknown object property"; break; case 4202: error_string="object is not exist"; break; case 4203: error_string="unknown object type"; break; case 4204: error_string="no object name"; break; case 4205: error_string="object coordinates error"; break; case 4206: error_string="no specified subwindow"; break; default: error_string="unknown error"; } //---- return(error_string); } //+------------------------------------------------------------------+ //| convert red, green and blue values to color | //+------------------------------------------------------------------+ int RGB(int red_value,int green_value,int blue_value) { //---- check parameters if(red_value<0) red_value=0; if(red_value>255) red_value=255; if(green_value<0) green_value=0; if(green_value>255) green_value=255; if(blue_value<0) blue_value=0; if(blue_value>255) blue_value=255; //---- green_value<<=8; blue_value<<=16; return(red_value+green_value+blue_value); } //+------------------------------------------------------------------+ //| right comparison of 2 doubles | //+------------------------------------------------------------------+ bool CompareDoubles(double number1,double number2) { if(NormalizeDouble(number1-number2,8)==0) return(true); else return(false); } //+------------------------------------------------------------------+ //| up to 16 digits after decimal point | //+------------------------------------------------------------------+ string DoubleToStrMorePrecision(double number,int precision) { double rem,integer,integer2; double DecimalArray[17]={ 1.0, 10.0, 100.0, 1000.0, 10000.0, 100000.0, 1000000.0, 10000000.0, 100000000.0, 1000000000.0, 10000000000.0, 100000000000.0, 10000000000000.0, 100000000000000.0, 1000000000000000.0, 1000000000000000.0, 10000000000000000.0 }; string intstring,remstring,retstring; bool isnegative=false; int rem2; //---- if(precision<0) precision=0; if(precision>16) precision=16; //---- double p=DecimalArray[precision]; if(number<0.0) { isnegative=true; number=-number; } integer=MathFloor(number); rem=MathRound((number-integer)*p); remstring=""; for(int i=0; i0) retstring=retstring+"."+remstring; return(retstring); } //+------------------------------------------------------------------+ //| convert integer to string contained input's hexadecimal notation | //+------------------------------------------------------------------+ string IntegerToHexString(int integer_number) { string hex_string="00000000"; int value, shift=28; // Print("Parameter for IntegerHexToString is ",integer_number); //---- for(int i=0; i<8; i++) { value=(integer_number>>shift)&0x0F; if(value<10) hex_string=StringSetChar(hex_string, i, value+'0'); else hex_string=StringSetChar(hex_string, i, (value-10)+'A'); shift-=4; } //---- return(hex_string); } //+------------------------------------------------------------------+ //+------------------------------------------------------------------+ //+ Custom functions //+ //+ Here you can define your own custom functions that can be used //+ in EA Wizard. //+ The functions can perform some action (for example draw on chart //+ or manipulate with orders) or they can return value that //+ can be used in comparison. //+ //+ Note! All the functions below must be in valid MQL code! //+ Contents of this file will be appended to your EA code. //+ //+------------------------------------------------------------------+ double exampleFunction(double value) { return(2 * value); } double GetTotalOpenPLInPips() { double pl = 0; for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if(OrderType() != OP_BUY && OrderType() != OP_SELL) continue; if(OrderType() == OP_BUY) { pl += Bid - OrderOpenPrice(); } else { pl += OrderOpenPrice() - Ask; } } return(pl*gPointPow); } double GetMultiOrdersAveragePrice(int magic1, int magic2) { double sum = 0.0; double cnt = 0.0; for (int cc = OrdersTotal() - 1; cc >= 0; cc--) { if (!OrderSelect(cc, SELECT_BY_POS) ) continue; if((OrderMagicNumber() == magic1 || OrderMagicNumber() == magic2) && OrderSymbol() == Symbol()) { if(OrderType() == OP_BUY && OrderCloseTime() == 0) { sum += OrderLots() * OrderOpenPrice (); cnt += OrderLots(); } if(OrderType() == OP_SELL && OrderCloseTime() == 0) { sum += OrderLots() * OrderOpenPrice (); cnt += OrderLots(); } } } if (NormalizeDouble (cnt, Digits) == 0) return (0); return(sum / cnt); } bool IsFALongSignal() { if(iMA(NULL, 240 , 40, 0, MODE_EMA, 0, 0) > iMA(NULL, 240 , 80, 0, MODE_EMA, 0, 0) && iCustom(NULL, 240 , "WPR", 21 , 0, 1) < -80 && iCustom(NULL, 240 , "WPR", 21 , 0, 0) > -80 ) { return(1); // conditions are valid } else { return(0); // conditions are invalid } } bool isFAShortSignal() { if(iMA(NULL, 240 , 40, 0, MODE_EMA, 0, 0) < iMA(NULL, 240 , 80, 0, MODE_EMA, 0, 0) && iCustom(NULL, 240 , "WPR", 21 , 0, 1) > -20 && iCustom(NULL, 240 , "WPR", 21 , 0, 0) < -20 ) { return(1); // conditions are valid } else { return(0); // conditions are invalid } }