Valid Reasons

Give me a valid reason why the blue oval is not the mirror fake out of the other oval.

Give a reason why the price would not be able to get away from the MA band by 725 pips at least like it did on the last two occassions beyond the 59 EMA.

What is the reason for me still working at this seemingly chaotic Volume & Momentum daily combo. I think the 8-days of green sequence downflip can be commented out now.

It is interesting to see that those single green squares (lifts) got aggressively killed by Pro Volume (cyan shading) coming in on the next day. Upper 19-sample Bollinger tag may be as little as a day to two days out. Perhaps a reaction from the first pro candle's upper wick, but the second wick is definitely in the cards as well.      

///fizzle out after 8 days
// if (High[i+8]<E44[i+8] && High[i+7]<E44[i+7] && High[i+6]<E44[i+6] && High[i+5]<E44[i+5] && High[i+4]<E44[i+4] && High[i+3]<E44[i+3] && High[i+2]<E44[i+2] && High[i+1]<E44[i+1] && High[i]<E44[i] &&
//   cap[i+8]>0 && cap[i+7]>0 && cap[i+6]>0 && cap[i+5]>0 && cap[i+4]>0 && cap[i+3]>0 && cap[i+2]>0 && cap[i+1]>0 && cap[i+11]<0  ) cap[i]=-1;  

Give a reason why the second daily close above the E-9 (Red) has any bearish implications.

Insert some silly stuff here, like “I wanna fart like an eagle, to the sea…”

To appreciate the difficulties of coming up with a direction-logic with a multitude of signals, inluding volume, candle sequences, MA and oscillator filters, take a look:



///Daily Cyan arrows
if (Period()==1440)
for (i=lookback; i>=0; i--){   
   momentum[i]=momentum[i+1];
   cap[i]=cap[i+1];
   
 ///Mega Candle  
   if (MathAbs(Open[i]-Close[i])>2000*Point && Close[i]>Open[i]) cap[i]=1;
   else  if (MathAbs(Open[i]-Close[i])>2000*Point) cap[i]=-1; 
   

   ////4-sample lower low
      if (iLow(symbol,0,iLowest(symbol,0,MODE_LOW,1,i))==iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i))) momentum[i]=-1;
      
   ////4-sample higher high
       if (iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,1,i))==iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,4,i))) momentum[i]=1;

///pro volume resistance
       if (gr[i+1] && Close[i]<Close[i+1]){
       momentum[i]=-1;
          j=i;
      while (j>0){
         if (High[j]>iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))) break;
         j--;
      }
        ObjectCreate(0,"PDH"+IntegerToString(i),OBJ_RECTANGLE,0,Time[i],High[i],Time[j],High[i+1]);
        ObjectSet("PDH"+IntegerToString(i),OBJPROP_COLOR,clrCyan);
        ObjectSet("PDH"+IntegerToString(i),OBJPROP_BACK,0); 
        ObjectSet("PDH"+IntegerToString(i),OBJPROP_WIDTH,3); 
        
         ObjectCreate("Bing"+IntegerToString(i), OBJ_TEXT, 0, Time[i], High[i]+160*Point); 
       ObjectSetText("Bing"+IntegerToString(i), CharToStr(242), 36, "Wingdings", Navy); 
        
   }
   
   ///pro volume support
      if (gr[i+1] && Close[i]>Close[i+1]){
      momentum[i]=1;
          j=i;
      while (j>0){
         if (Low[j]<iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))) break;
         j--;
      }
        ObjectCreate(0,"PDH"+IntegerToString(i),OBJ_RECTANGLE,0,Time[i],Low[i],Time[j],Low[i+1]);
        ObjectSet("PDH"+IntegerToString(i),OBJPROP_COLOR,clrCyan);
        ObjectSet("PDH"+IntegerToString(i),OBJPROP_BACK,0); 
        ObjectSet("PDH"+IntegerToString(i),OBJPROP_WIDTH,3); 
        
         ObjectCreate("Bing"+IntegerToString(i), OBJ_TEXT, 0, Time[i], Low[i]+20*Point); 
       ObjectSetText("Bing"+IntegerToString(i), CharToStr(241), 36, "Wingdings", Navy); 
   }
 
   ///////3-candle serving reversal arrows up
   if (Low[i]>Low[i+1] && Low[i+2]>Low[i+1] && Low[i]<((High[i+1]+Low[i+1])/2)  && Close[i]>Open[i] && Close[i]>iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))+270*Point
         && !gr[i]){
         //momentum[i]=1;
      ObjectCreate("Binga"+IntegerToString(i), OBJ_TEXT, 0, Time[i], Low[i]+20*Point); 
       ObjectSetText("Binga"+IntegerToString(i), CharToStr(241), 26, "Wingdings", Blue);   
       if (i>0 && Close[i]<Close[i-1]) cap[i]=1;
       if (High[i]<High[i+1] && Low[i]>Low[i+1]) { ObjectSetText("Binga"+IntegerToString(i), CharToStr(241), 26, "Wingdings", Red);  
       
       ObjectCreate("Bingzzz"+IntegerToString(i), OBJ_TEXT, 0, Time[i], Low[i]-80*Point); 
    ObjectSetText("Bingzzz"+IntegerToString(i), " HDG@ "+DoubleToStr(NormalizeDouble(Low[i]-10*Point,4),4), 16, "Impact", White); 
       
     ObjectCreate("Bingzz"+IntegerToString(i), OBJ_TEXT, 0, Time[i], Low[i]-80*Point); 
    ObjectSetText("Bingzz"+IntegerToString(i), "HDG@ "+DoubleToStr(NormalizeDouble(Low[i]-10*Point,4),4), 16, "Impact", Red);
    if (i>0 && Close[i]>Close[i-1]) cap[i]=-1;
     }
        
   }
      ///////3-candle serving reversal arrows down
   if (High[i]<High[i+1] && High[i+2]<High[i+1] && High[i]>((High[i+1]+Low[i+1])/2)  && Close[i]<Open[i] && Close[i]<iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))-270*Point
         && Close[i]-Low[i]<270*Point && !gr[i]
         ){
         //momentum[i]=-1;
      ObjectCreate("Binga"+IntegerToString(i), OBJ_TEXT, 0, Time[i], High[i]+230*Point); 
       ObjectSetText("Binga"+IntegerToString(i), CharToStr(242), 26, "Wingdings", Blue); 
       if (i>0 && Close[i]>Close[i-1]) cap[i]=-1;
       
             
       if (High[i]<High[i+1] && Low[i]>Low[i+1]) {ObjectSetText("Binga"+IntegerToString(i), CharToStr(242), 26, "Wingdings", Green);      
       ObjectCreate("Bingzz"+IntegerToString(i), OBJ_TEXT, 0, Time[i], High[i]+180*Point); 
    ObjectSetText("Bingzz"+IntegerToString(i), "HDG@ "+DoubleToStr(NormalizeDouble(High[i]+10*Point,4),4), 16, "Impact", DarkGreen);
       }
   }

///2 closes above 20
   if (iMA(symbol,0,9,0,MODE_SMA, PRICE_MEDIAN,i+2)<iMA(symbol,0,20,0,MODE_SMA, PRICE_CLOSE,i+2) && 
   iMA(symbol,0,9,0,MODE_SMA, PRICE_CLOSE,i)<E44[i] && Close[i]>iMA(symbol,0,20,0,MODE_SMA, PRICE_CLOSE,i) && Close[i+1]>iMA(symbol,0,20,0,MODE_SMA, PRICE_CLOSE,i+1) && Close[i+2]<iMA(symbol,0,20,0,MODE_SMA, PRICE_CLOSE,i+2)) cap[i]=1;
   

   
   ///////4-candle low closing back up 27-pips cover
   if (iStochastic(symbol,0,18,3,3,MODE_SMA,0,MODE_MAIN,i)>69.5 && iStochastic(symbol,0,18,3,3,MODE_SMA,0,MODE_MAIN,i)<89.5 && !gr[i+1] && !gr[i+2] && !gr[i+3] && Low[i]<iMA(symbol,0,9,0,MODE_EMA, PRICE_MEDIAN,i) && Close[i]>iMA(symbol,0,9,0,MODE_EMA, PRICE_MEDIAN,i) && iMA(symbol,0,9,0,MODE_EMA, PRICE_MEDIAN,i)>iMA(symbol,0,44,0,MODE_EMA, PRICE_MEDIAN,i)
   && Low[i]>iMA(symbol,0,20,0,MODE_SMA, PRICE_MEDIAN,i)-150*Point
   )   {ObjectCreate("Bingi"+IntegerToString(i), OBJ_TEXT, 0, Time[i], Low[i]+20*Point); ObjectSetText("Bingi"+IntegerToString(i), "CLOW", 26, "Impact", Green); if (RSI2[i]>1) cap[i]=1;} 
   
   if ( iLow(symbol,0,iLowest(symbol,0,MODE_LOW,1,i))==iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i)) && Close[i]>iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))+270*Point
         //&& !gr[i]
          ){
        //if (i>0 && Low[i-1]>Low[i]) momentum[i]=1;
      ObjectCreate("Bingo"+IntegerToString(i), OBJ_TEXT, 0, Time[i], Low[i]+20*Point); 
       ObjectSetText("Bingo"+IntegerToString(i), "C", 26, "Impact", DimGray); 
       if (Low[i]<iBands(symbol,1440,20,2,0,PRICE_CLOSE,MODE_LOWER,i) && Close[i]>iBands(symbol,1440,20,2,0,PRICE_CLOSE,MODE_LOWER,i) && MathAbs(Open[i]-Close[i])>55*Point) {ObjectSetText("Bingo"+IntegerToString(i), "C", 26, "Impact", LimeGreen); cap[i]=1;
         if (st18[i]>32) ObjectSetText("Bingo"+IntegerToString(i), "C-"+DoubleToStr(NormalizeDouble(Low[i]-10*Point,4),4), 26, "Impact", Crimson); 
       }
       if (st18[i]<9.5) { ObjectSetText("Bingo"+IntegerToString(i), "CAP", 26, "Impact", DarkGreen); momentum[i]=1;
           if(i>0 && Close[i-1]>Low[i]) cap[i]=1;
            if (st18[ArrayMinimum(st18,10,i+1)]<4.4) {ObjectSetText("Bingo"+IntegerToString(i), "Cos,+90,-DVG", 26, "Impact", LimeGreen); c77[i]=true;
               if (c77[i+1]) {
               ObjectSetText("Bingo"+IntegerToString(i), "C111-os,+175,-DVG", 26, "Impact", LimeGreen); c77[i]=true;}
            }
       }
       if (st18[i]<9.0 && i>0 && Close[i-1]<Open[i-1]) {ObjectSetText("Bingo"+IntegerToString(i), "C77uc", 26, "Impact", LimeGreen); c77[i]=true;
       momentum[i]=-1; momentum[i-1]=-1; cap[i]=1;
       }
       
       if (i>0 
       && Close[i-1]-Low[i-1]<270*Point
        && Close[i-1]<Open[i] && Close[i-1]<Low[i]+250*Point && Close[i-1]<iMA(symbol,0,44,0,MODE_EMA, PRICE_MEDIAN,i-1)-100*Point
        && Low[i]<iBands(symbol,0,19,2,0,PRICE_CLOSE,MODE_LOWER,i)){
          ObjectCreate("Bingd"+IntegerToString(i), OBJ_TEXT, 0, Time[i+2], Low[i-1]+20*Point); 
       ObjectSetText("Bingd"+IntegerToString(i), "CAPITULATION!", 26, "Impact", Crimson); 
        }
       
       if (st18[ArrayMinimum(st18,10,i)]>4 && st18[ArrayMaximum(st18,6,i)]<66){
       if (i<50){
        ObjectCreate("Bingcc"+IntegerToString(i), OBJ_TEXT, 0, Time[i+3], Low[i]-350*Point); 
       ObjectSetText("Bingcc"+IntegerToString(i), " MUST "+DoubleToStr(NormalizeDouble(Low[i]-300*Point,4),4), 16, "Impact", Crimson);
       
      ObjectCreate("Bingc"+IntegerToString(i), OBJ_TEXT, 0, Time[i+3], Low[i]-350*Point); 
       ObjectSetText("Bingc"+IntegerToString(i), "MUST "+DoubleToStr(NormalizeDouble(Low[i]-300*Point,4),4), 16, "Impact", White);
      }
      }    
   }
   
   ////szaloncukor
 
   if (High[i]-Low[i]>1000*Point && High[i]-Open[i]>270*Point && Close[i]-Low[i]>270*Point && i<30){
   ObjectCreate(0,"Bing;"+IntegerToString(i),OBJ_RECTANGLE,0,Time[i],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,1,i)),Time[0],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,1,i)));
ObjectSet("Bing;"+IntegerToString(i),OBJPROP_COLOR,clrGray);
ObjectSet("Bing;"+IntegerToString(i),OBJPROP_BACK,1); 
ObjectSet("Bing;"+IntegerToString(i),OBJPROP_STYLE,2); 
ObjectSet("Bing;"+IntegerToString(i),OBJPROP_WIDTH,2); 

ObjectCreate("Bingd"+IntegerToString(i), OBJ_TEXT, 0, Time[i], (High[i]+Low[i])/2+100*Point); 
       ObjectSetText("Bingd"+IntegerToString(i), "R      ", 26, "Impact", Magenta); 
   }
   
      ////szaloncukor kombo
 
   if (High[i+1]-Low[i]>1000*Point && High[i+1]-Open[i+1]>240*Point && Close[i]-Low[i]>240*Point && i<30){
   ObjectCreate(0,"Bing;"+IntegerToString(i),OBJ_RECTANGLE,0,Time[i+1],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i)),Time[0],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i)));
ObjectSet("Bing;"+IntegerToString(i),OBJPROP_COLOR,clrGray);
ObjectSet("Bing;"+IntegerToString(i),OBJPROP_BACK,1); 
ObjectSet("Bing;"+IntegerToString(i),OBJPROP_STYLE,2); 
ObjectSet("Bing;"+IntegerToString(i),OBJPROP_WIDTH,2); 
   }
   
      ////szaloncukor kombo2
 
  // if (Close[i+1]-Low[i+1]>270*Point && High[i]-Close[i]>270*Point && Open[i]<Close[i] && i<10){
  // ObjectCreate(0,"Bing;;"+IntegerToString(i),OBJ_RECTANGLE,0,Time[i+1],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i)),Time[0],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i)));
//ObjectSet("Bing;;"+IntegerToString(i),OBJPROP_COLOR,clrGray);
//ObjectSet("Bing;;"+IntegerToString(i),OBJPROP_BACK,1); 
//ObjectSet("Bing;;"+IntegerToString(i),OBJPROP_STYLE,2); 
//ObjectSet("Bing;;"+IntegerToString(i),OBJPROP_WIDTH,2); 
//   }   
   

   
   
   ///////4-candle high closing back down 27-pips cover
   
     if (iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,1,i))==iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,4,i)) && Close[i]<iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))-270*Point
        // && !gr[i]
         ){
   //   if (i>0 && High[i-1]<High[i]) momentum[i]=-1;
        ObjectCreate("Bingi"+IntegerToString(i), OBJ_TEXT, 0, Time[i], High[i]+230*Point); 
       ObjectSetText("Bingi"+IntegerToString(i), "C", 26, "Impact", DimGray); 
       if (High[i]>iBands(symbol,1440,20,2,0,PRICE_CLOSE,MODE_UPPER,i)-20*Point && Close[i]<iBands(symbol,1440,20,2,0,PRICE_CLOSE,MODE_UPPER,i) && MathAbs(Open[i]-Close[i])>55*Point && iMA(symbol,0,9,0,MODE_EMA, PRICE_MEDIAN,i+3)>iMA(symbol,0,20,0,MODE_SMA, PRICE_MEDIAN,i+3)){ ObjectSetText("Bingi"+IntegerToString(i), "C", 26, "Impact", Red); 
   //    if (Close[i]<iMA(symbol,0,44,0,MODE_EMA, PRICE_MEDIAN,i) && iMA(symbol,0,9,0,MODE_EMA, PRICE_MEDIAN,i+3)>iMA(symbol,0,20,0,MODE_SMA, PRICE_MEDIAN,i+3)) 
       cap[i]=-1; }
       if (iStochastic(symbol,0,18,3,3,MODE_SMA,0,MODE_MAIN,i)<19.5 && !gr[i+1] && !gr[i+2] && !gr[i+3])   {ObjectSetText("Bingi"+IntegerToString(i), "CHIGH", 26, "Impact", Red); if (RSI2[i]<99) cap[i]=-1;} 
   
       if (iStochastic(symbol,0,18,3,3,MODE_SMA,0,MODE_MAIN,i)>82) {ObjectSetText("Bingi"+IntegerToString(i), "CAP", 26, "Impact", Maroon); {momentum[i]=-1;}
       if (!(High[i]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i) && High[i+1]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i+1) && High[i+2]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i+2) && High[i+3]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i+3)) && RSI2[i]<99 && st18[i]<89) cap[i]=-1; 
       ///futrure step
       if (!(High[i]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i) && High[i+1]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i+1) && High[i+2]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i+2) && High[i+3]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i+3)) && RSI2[i]<99 && i>0 && st18[i-1]>95) cap[i]=-1; 
       }
      
   if (High[i]>iBands(symbol,1440,20,2,0,PRICE_CLOSE,MODE_UPPER,i) && iMA(symbol,0,9,0,MODE_EMA, PRICE_MEDIAN,i+3)>iMA(symbol,0,20,0,MODE_SMA, PRICE_MEDIAN,i+3)){  
       if (iStochastic(symbol,0,18,3,3,MODE_SMA,0,MODE_MAIN,i)>91.5) {ObjectSetText("Bingi"+IntegerToString(i), "CAP", 26, "Impact", DeepPink); if (RSI2[i]>99 && st18[i]<93) cap[i]=-1;}
       if (iStochastic(symbol,0,18,3,3,MODE_SMA,0,MODE_MAIN,i)>96) {ObjectSetText("Bingi"+IntegerToString(i), "CAP", 26, "Impact", Crimson); cap[i]=-1;}
       if (High[i]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i) && High[i+1]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i+1) && High[i+2]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i+2) && High[i+3]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i+3) && st18[i]>93) ObjectSetText("Bingi"+IntegerToString(i), "CAP", 26, "Impact", DimGray);
   }
            
       if (i>0 && High[i-1]-Close[i-1]<270*Point && Close[i-1]>Open[i] && Close[i-1]>High[i]-270*Point && Close[i-1]>iMA(symbol,0,44,0,MODE_EMA, PRICE_MEDIAN,i-1)+100*Point
    //   && High[i]>iBands(symbol,0,19,2,0,PRICE_CLOSE,MODE_UPPER,i)-200*Point
    ){
          ObjectCreate("Bingd"+IntegerToString(i), OBJ_TEXT, 0, Time[i+2], High[i-1]+390*Point); 
       ObjectSetText("Bingd"+IntegerToString(i), "CAPITULATION!", 26, "Impact", Green); 
        }  
       
       if (i<50){
         ObjectCreate("Bingvv"+IntegerToString(i), OBJ_TEXT, 0, Time[i+3], High[i]+390*Point); 
       ObjectSetText("Bingvv"+IntegerToString(i), " MUST "+DoubleToStr(NormalizeDouble(High[i]+270*Point,4),4), 16, "Impact", Green); 

       ObjectCreate("Bingv"+IntegerToString(i), OBJ_TEXT, 0, Time[i+3], High[i]+390*Point); 
       ObjectSetText("Bingv"+IntegerToString(i), "MUST "+DoubleToStr(NormalizeDouble(High[i]+270*Point,4),4), 16, "Impact", White); 
       }
   }
///NBE   
   
   else if (iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,1,i))==iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,4,i))&& Close[i]>iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))-270*Point && Open[i]<Close[i]){ 
                ObjectCreate("Bingi"+IntegerToString(i), OBJ_TEXT, 0, Time[i], High[i]+230*Point); 
       ObjectSetText("Bingi"+IntegerToString(i), "NBE", 16, "Impact", Red); 
       if (Close[i]-Open[i]<600*Point && Close[i]<iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i)) ObjectSetText("Bingi"+IntegerToString(i), "NBE", 16, "Impact", Green); 
       }       
   
/// 3-sample low with stoch reading below 4.5 or 9.5 to 18
   if (
   i>0 &&
    (
    !(
     c77[i+1] &&
     Low[i+1]<iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_LOWER,i+1)))
   && iLow(symbol,0,iLowest(symbol,0,MODE_LOW,5,i-1))<=iLow(symbol,0,iLowest(symbol,0,MODE_LOW,6,i-1)) 
   && iLow(symbol,0,i)==iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i-1)) 
   && (st18[i]<4.5 || (st18[i]>9.5 && st18[i]<21.5) || (st18[i+1]>9.5 && st18[i+1]<18.5))  
   && Low[i]-Low[i+1]<430*Point 
   && (Low[i]-Low[i+2]<430*Point ||  Low[i]-Low[i+2]>1000*Point)
   && (High[i]>High[i+1]-80*Point || (Open[i]<iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_LOWER,i)+50*Point && Close[i]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_LOWER,i) )  )
   && Open[i]<Close[i] 
   && High[i]<iMA(symbol,0,44,0,MODE_EMA, PRICE_MEDIAN,i)
   && High[i]<iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_MAIN,i)-290*Point 
   && (MathAbs(iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_MAIN,i)-iMA(symbol,0,44,0,MODE_EMA, PRICE_MEDIAN,i))>380*Point  ||  High[i]>High[i+1] )
   && Low[i+1]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_LOWER,i+1)-700*Point  
   && Low[i+2]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_LOWER,i+2)-700*Point
 ){
   //&& (st18[i]<4.5 || (st18[i]>9.5 && st18[i]<18))  
   
         ObjectCreate("Bingt"+IntegerToString(i),OBJ_VLINE,0, Time[i], 0);
         ObjectSet("Bingt"+IntegerToString(i),OBJPROP_COLOR,clrBlue);
         if (st18[i]>9) {ObjectSet("Bingt"+IntegerToString(i),OBJPROP_COLOR,clrPaleGreen);
         cap[i]=1;}
         ObjectSet("Bingt"+IntegerToString(i),OBJPROP_WIDTH,4);
         ObjectSet("Bingt"+IntegerToString(i),OBJPROP_STYLE,STYLE_DOT);
         ObjectSet("Bingt"+IntegerToString(i),OBJPROP_BACK,1);
        }
        
///fizzle out after 8 days
// if (High[i+8]<E44[i+8] && High[i+7]<E44[i+7] && High[i+6]<E44[i+6] && High[i+5]<E44[i+5] && High[i+4]<E44[i+4] && High[i+3]<E44[i+3] && High[i+2]<E44[i+2] && High[i+1]<E44[i+1] && High[i]<E44[i] &&
//   cap[i+8]>0 && cap[i+7]>0 && cap[i+6]>0 && cap[i+5]>0 && cap[i+4]>0 && cap[i+3]>0 && cap[i+2]>0 && cap[i+1]>0 && cap[i+11]<0  ) cap[i]=-1;  
///fizzle out at E-44
if (High[i+2]<iMA(symbol,0,44,0,MODE_EMA, PRICE_MEDIAN,i+2) && High[i+1]>iMA(symbol,0,44,0,MODE_EMA, PRICE_MEDIAN,i+1) && Close[i]<(High[i+1]+Low[i+1])/2)  cap[i]=-1;  


///fizzle out after 9 days in green closing below the BB by 20 pips
 if (cap[i+8]>0 && cap[i+7]>0 && cap[i+6]>0 && cap[i+5]>0 && cap[i+4]>0 && cap[i+3]>0 && cap[i+2]>0 && cap[i+1]>0 && cap[i+9]>0  && High[i]>iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i)+200*Point && Close[i]<iBands(symbol,0,20,2,0,PRICE_CLOSE,MODE_UPPER,i)) cap[i]=-1;  
 
//high volume, low stochastic
if (gr[i] && st18[i]<32) cap[i]=-1;   

//high volume, high stochastic
if (gr[i] && st18[i]>32) cap[i]=1;   

//high volume, high stochastic, MA Cross
if (gr[i] && st18[i]>32 && High[i]>iMA(symbol,0,9,0,MODE_EMA, PRICE_MEDIAN,i) && Low[i]<iMA(symbol,0,9,0,MODE_EMA, PRICE_MEDIAN,i)) cap[i]=-1;   
if (gr[i] && st18[i]>32 && High[i]>iMA(symbol,0,20,0,MODE_SMA, PRICE_MEDIAN,i) && Low[i]<iMA(symbol,0,20,0,MODE_SMA, PRICE_MEDIAN,i)) cap[i]=-1;