1st

The first touch of the Daily E-9 (orange band) and the 80-pip line.

A triple resistance was built (green rectangles) and we saw a piercing move outside.

I believe this to be the end of an ABC correction.

The arrows show how the 200-sample high got closer and closer. Whenever you have a displacement, picture the actual stronghold as another 9 pips out (i.e. for measuring risk) 1.0539 was exceeded but has not been closed above.

If the market was to consolidate between the 53 and 63 lines above that would mean having found support (& a complete regime change), but that would require a drop first, as this move is out of steam.

The resistance zone above is 51 pips wide. It is not going to give for a simple pass. Price would have to consolidate in that body to have any hope of clearing it.

As for the downside, the gap hasn’t been fully filled. Keep an eye on retesting Friday’s close at 1.0418 for a possible buy. I think a 30-pip undercut would be another option.

For a low close on the 15-min, there’s 1.0339.

Total Calibration Horror

Conclusions.

The market is either moving away from a thrust or a displacement. This is the basis of the directional logic.

I had to go into town to adjust the Displacements to my liking. You have the next short coming up when the RSI2 goes above 76.

////Displacements
      if (Low[i]<iBands(symbol,0,120,2,0,PRICE_MEDIAN,MODE_MAIN,i) && Low[i]<iBands(symbol,0,30,2,0,PRICE_MEDIAN,MODE_LOWER,i)
      && L53[i+1]>L80[i+1]) {
              ObjectCreate("PINUSXZZZ"+IntegerToString(i),OBJ_TEXT, 0, Time[i+5],Low[i]-20*Point);
              ObjectSetText("PINUSXZZZ"+IntegerToString(i),"Displacement", 16, "Impact", clrBlue);
              disp[i]=1;
              if (MFI[i]<30 && iRSI(symbol,0,2,PRICE_MEDIAN,i)<13) {ObjectSetText("PINUSXZZZ"+IntegerToString(i),"Displacement - STOP", 16, "Impact", clrRed); disp[i]=-1;}
         else if (MFI[i]<8) {ObjectSetText("PINUSXZZZ"+IntegerToString(i),"Displacement", 16, "Impact", clrGreen); 
      }}
   
      if (High[i]>iBands(symbol,0,120,2,0,PRICE_MEDIAN,MODE_MAIN,i) && High[i]>iBands(symbol,0,30,2,0,PRICE_MEDIAN,MODE_UPPER,i)
      && (L53[i+1]<L80[i+1] || L53[i+1]<L80[i+1]) && MFI[i]>60) {
              ObjectCreate("PINUSXZZZ"+IntegerToString(i),OBJ_TEXT, 0, Time[i+5],High[i]+90*Point);
              ObjectSetText("PINUSXZZZ"+IntegerToString(i),"Displacement", 16, "Impact", clrBlue);
              disp[i]=-1;
      }
      
      if (
      ((High[i]>iMA(symbol,0,70,2,MODE_SMA,PRICE_MEDIAN,i) && iRSI(symbol,0,2,PRICE_MEDIAN,i)>96) ||
      High[i]>iMA(symbol,0,80,2,MODE_SMA,PRICE_MEDIAN,i))
      && High[i]>iBands(symbol,0,30,2,0,PRICE_MEDIAN,MODE_UPPER,i)
      && L53[i+1]<L80[i+1] && MFI[i]>62 
      && High[i]>=iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,28,i))-50*Point
       ) {
           ObjectCreate("PINUSXZZZ"+IntegerToString(i),OBJ_TEXT, 0, Time[i+5],High[i]+50*Point);
           ObjectSetText("PINUSXZZZ"+IntegerToString(i),"Displacement", 16, "Impact", clrTeal);
           if (MFI[i]>84 && iRSI(symbol,0,2,PRICE_MEDIAN,i)>96) ObjectSetText("PINUSXZZZ"+IntegerToString(i),"Displacement - STOP + 10 pips", 16, "Impact", clrGreen);
           disp[i]-1;
      }

RSI2 highlights

if (dire[i]>0 && iRSI(symbol,0,2,PRICE_MEDIAN,i)<16.5){
          ObjectCreate("Bacardisz"+IntegerToString(i), OBJ_RECTANGLE, 1,  Time[i+1], iRSI(symbol,0,2,PRICE_MEDIAN,i)+10, Time[i], iRSI(symbol,0,2,PRICE_MEDIAN,i)-10);
          ObjectSetInteger(0,"Bacardisz"+IntegerToString(i),OBJPROP_COLOR,clrGreen);
          ObjectSet("Bacardisz"+IntegerToString(i),OBJPROP_BACK,1);
          ObjectSet("Bacardisz"+IntegerToString(i),OBJPROP_WIDTH,3);
   }
   if (dire[i]<0 && iRSI(symbol,0,2,PRICE_MEDIAN,i)>76){
          ObjectCreate("Bacardisz"+IntegerToString(i), OBJ_RECTANGLE, 1,  Time[i+1], iRSI(symbol,0,2,PRICE_MEDIAN,i)+10, Time[i], iRSI(symbol,0,2,PRICE_MEDIAN,i)-10);
          ObjectSetInteger(0,"Bacardisz"+IntegerToString(i),OBJPROP_COLOR,clrCrimson);
          ObjectSet("Bacardisz"+IntegerToString(i),OBJPROP_BACK,1);
          ObjectSet("Bacardisz"+IntegerToString(i),OBJPROP_WIDTH,3);
   }

Price going outside the cover line by 15 pips initiates the extended time play (extra large thrust).

 if ((Low[i]<cover[i]-150*Point && Low[i]<iBands(symbol,0,120,2,0,PRICE_MEDIAN,MODE_LOWER,i)) || (High[i]>cover[i]+150*Point && High[i]>iBands(symbol,0,120,2,0,PRICE_MEDIAN,MODE_UPPER,i)) && cover[i]!=EMPTY_VALUE) {

The calculation of the Cover is ten sample hourly high minus 53 pips / low plus 53 pips.

cover[i]=iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,10,i))-530*Point; 
cover[i]=iLow(symbol,0,iLowest(symbol,0,MODE_LOW,10,i))+530*Point;

The Storno of the thrust:

  if (thrust[i+5]==1 && Close[i]<Close[i+5] && Close[i]<Close[i+4] && Close[i+5]<L80[i+5] && Low[i+5]<cover[i+5] && High[i+1]<High[i+2]){
            ObjectSetText("PINUSX"+IntegerToString(i+5),"Storno!", 26, "Impact", clrCrimson);
            thrust[i]=-1;
             ObjectSetInteger(0,"Thrust"+IntegerToString(i+5),OBJPROP_COLOR,clrOrangeRed);
         ObjectSetInteger(0,"Thrust"+IntegerToString(i+3),OBJPROP_COLOR,clrOrangeRed);
      }

Displacement

The sensitive condition that would precede a complete regime change. 2 Bollinger Bands for filter + configuration.

   if (Low[i]<iBands(symbol,0,120,2,0,PRICE_MEDIAN,MODE_MAIN,i) && Low[i]<iBands(symbol,0,30,2,0,PRICE_MEDIAN,MODE_LOWER,i)
      && L53[i]>L80[i]) {
              ObjectCreate("PINUSXZZ"+IntegerToString(i),OBJ_TEXT, 0, Time[i],Low[i]+40*Point);
              ObjectSetText("PINUSXZZ"+IntegerToString(i),"Displacement", 26, "Impact", clrBlue);
      }
   
      if (High[i]>iBands(symbol,0,120,2,0,PRICE_MEDIAN,MODE_MAIN,i) && High[i]>iBands(symbol,0,30,2,0,PRICE_MEDIAN,MODE_UPPER,i)
      && L53[i]<L80[i]) {
              ObjectCreate("PINUSXZZ"+IntegerToString(i),OBJ_TEXT, 0, Time[i],High[i]+90*Point);
              ObjectSetText("PINUSXZZ"+IntegerToString(i),"Displacement", 26, "Impact", clrBlue);
      }

The market would have gone a bit too far if it exceeded the 30-sample BB and is beyond the 120 SMA, although it would a great fade for the most part, but it could be prone to trigger a regime change if it was doing it within 80 pips of the 200-sample hourly high.

LL

Honed in on the LL and plotting reminders now for the entry.

With the thrust, W3F should be the target.

  //////////LL
      if (i>0 && MFI[i]>22 && MFI[i]<68 && Drive[ArrayMinimum(Drive,28,i)]<0 && Low[i]==iLow(symbol,0,iLowest(symbol,0,MODE_LOW,40,i))
      && Low[i-1]>Low[i] && thrust[i]<1 && thrust[i+1]<1 && thrust[i+2]<1  && thrust[i-1]<1
      && L80[i]>L63[i]
      ){
                            ObjectCreate("PINUSXY"+IntegerToString(i),OBJ_TEXT, 0, Time[i],Low[i]-50*Point);
                           ObjectSetText("PINUSXY"+IntegerToString(i),"LL", 26, "Impact", clrCrimson);
                           ObjectCreate("PINUSXX"+IntegerToString(i),OBJ_TEXT, 2, Time[i],70);
                           ObjectSetText("PINUSXX"+IntegerToString(i),"S/L53+/S30+", 26, "Impact", clrCrimson);
                     }

To my surprise, the main filter was actually an MFI range.

…The yellow trendline was undercut.

The upside configuration would start printing as soon as the 8.3-day high would be within 80 pips.

From 1.05278 to 1.0413 is no man’s land, and the price does not have a lot of profile to work with. A consolidation of 17+ pips above 1.05278 would be a complete regime change. One possibility is marking time and bringing the upper limit closer. 6 more days sideways would bring the upper line lower by 55 pips. The close was just below the required 91+ pips to call a swing low yet.


Album #39

Blastar

What can I say, the system is smarter than I, it picked up the drive. Even the 8-hour delay applied before the thrust.

The touchdown received a devoid with the re-visit of the low.

I had to remove 1 filter for the thrust plot to appear.

///////Thrust down         
      if (i>0 
       && (High[i+1]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+1) || High[i+2]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+2)  || High[i+3]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+3) || High[i+4]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+4)  || High[i+5]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+5) || High[i+6]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+6) )
       && High[i]<iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i)+50*Point
       && Low[i-1]>Low[i] && Low[i]<cover[i]+100*Point 
       && Drive[ArrayMinimum(Drive,40,i)]<0
       && Drive[ArrayMinimum(Drive,8,i)]==0
       //&& High[i+1]<L53[i+1]
       && High[i+2]<L53[i+2]
       && High[i+3]<L80[i+3]
       && High[i+2]<L80[i+2]
       && High[i+7]<L80[i+7]
       && High[i+8]<L80[i+8]
        ){

I do believe that running over the pro volume line magnified the effect of the capitulation.

165 pips almost.

Nothing more to aim for. The only question is how much of a retracement we would see. Weekend is prone to a gap.

The stretch achieved was 6.29x

It was almost a backtest.

2 things

There are 2 things on this chart.

The first thing is a pro-volume print at 1.0447 just below.

The second thing is a mirror analog at the top there was a 5-day bow back resulting in a higher high followed by a 3-day bow back (lower high) before the end sequence.

I know it is tempting to start dreaming about tagging the lower trendline.

Let’s see how the week finishes up. The overshoot is a common theme. I think it would be back above the blue line.

I do not have an example in the last 1200 hours when a thrust was undercut before the upper 30-sample BB was hit/pushed on at least 2 times.

For a C or Cap print, I am monitoring for a 27-pip close-up from the low – sort of out of time for that.

1.0461->1.0488 one way to fix this is making a marginally lower low come tomorrow.

So it’s a face-off of the signals. Bing and T-D.L blue stipe has never been violated on the downside versus the ECHO print that has a small moratorium field of 10 pips or so.

This is a very tricky close with the money flow getting oversold again into the close. In fact, a new drive print (orange) has just been plotted.

Lots of news tomorrow. Yesterday’s high could hold for a couple of days as per the analog.

Quantify

Heavy quantifying is going on these days.

Sure, it might look like a game, but thrust me, I’m dead serious. Not gonna write a bunch of lines of code for nothing.

//////////drive down         
      if (Low[i]<L80[i] 
      && iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,10,i))-iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i))>460*Point 
      && (Low[i]<cover[i]+100*Point || Low[i+1]<cover[i+1]+100*Point || Low[i+2]<cover[i+2]+100*Point)
       && (MFI[i]<12 || MFI[i+1]<12 || MFI[i+2]<12)
       && ((High[i+5]<L80[i+5] && High[i+9]<L80[i+9] && High[i+8]<L80[i+8] && High[i+7]<L80[i+7] && High[i+6]<L80[i+6]) || iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,10,i))-iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i))>1100*Point)  
        ){
                     ObjectCreate("Drive"+IntegerToString(i), OBJ_TREND, 0,  Time[iLowest(symbol,0,MODE_LOW,4,i)], iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i)), Time[iHighest(symbol,0,MODE_HIGH,10,i)], iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,10,i)));
                     ObjectSetInteger(0,"Drive"+IntegerToString(i),OBJPROP_COLOR,clrOrangeRed);
                     ObjectSet("Drive"+IntegerToString(i),OBJPROP_BACK,1);
                     ObjectSet("Drive"+IntegerToString(i),OBJPROP_RAY_RIGHT,false);
                     ObjectSet("Drive"+IntegerToString(i),OBJPROP_WIDTH,12);
                     
                      if (Low[i]<iBands(symbol,0,120,2,0,PRICE_MEDIAN,MODE_LOWER,i)+150*Point && Drive[i+2]>-1 && Drive[i+3]>-1 && Drive[i+4]>-1){
                            ObjectCreate("PINUSX"+IntegerToString(i),OBJ_TEXT, 0, Time[i],(Low[i]+High[i])/2-100*Point);
                           ObjectSetText("PINUSX"+IntegerToString(i),"Lift 13-39 Pips", 26, "Impact", clrDarkGreen);}
                     
                     
                     Drive[iLowest(symbol,0,MODE_LOW,4,i)]=-1;
                     }
   
   
   //////////Thrust down         
      if (i>0 && (High[i+1]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+1) || High[i+2]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+2)  || High[i+3]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+3) || High[i+4]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+4)  || High[i+5]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+5) || High[i+6]>iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i+6) )
       && High[i]<iMA(symbol,0,8,0,MODE_EMA,PRICE_MEDIAN,i)+50*Point
       && Low[i-1]>Low[i] && Low[i]<cover[i]+100*Point 
       && Drive[ArrayMinimum(Drive,40,i)]<0
       && Drive[ArrayMinimum(Drive,8,i)]==0
       && High[i+1]<L53[i+1]
       && High[i+2]<L53[i+2]
       && High[i+3]<L80[i+3]
       && High[i+2]<L80[i+2]
       
       && High[i+7]<L80[i+7]
       && High[i+8]<L80[i+8]
        ){
                     ObjectCreate("Thrust"+IntegerToString(i), OBJ_TREND, 0,  Time[iLowest(symbol,0,MODE_LOW,4,i)], iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i)), Time[iHighest(symbol,0,MODE_HIGH,5,i)], iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,5,i)));
                     ObjectSetInteger(0,"Thrust"+IntegerToString(i),OBJPROP_COLOR,clrMediumPurple);
                     ObjectSet("Thrust"+IntegerToString(i),OBJPROP_BACK,1);
                     ObjectSet("Thrust"+IntegerToString(i),OBJPROP_RAY_RIGHT,false);
                     ObjectSet("Thrust"+IntegerToString(i),OBJPROP_WIDTH,12);
        
                     if (Low[i]<cover[i] && Low[i]<iBands(symbol,0,120,2,0,PRICE_MEDIAN,MODE_LOWER,i)){
                            ObjectCreate("PINUSX"+IntegerToString(i),OBJ_TEXT, 0, Time[i],(Low[i]+High[i])/2-100*Point);
                           ObjectSetText("PINUSX"+IntegerToString(i),"Ding! Ding! Ding!", 26, "Impact", clrDarkGreen);}
                  else         {
                            ObjectCreate("PINUSX"+IntegerToString(i),OBJ_TEXT, 0, Time[i+6],(Low[i]+High[i])/2-100*Point);
                           ObjectSetText("PINUSX"+IntegerToString(i),"Weak for a thrust", 16, "Impact", clrGray);}
                                 
       }
       else if (i>0 && Low[i+1]>Low[i] && Low[i-1]>Low[i] && Low[i]<iBands(symbol,0,120,2,0,PRICE_MEDIAN,MODE_LOWER,i) && Low[i]<cover[i]
       // && Drive[ArrayMinimum(Drive,40,i)]<0
         && Drive[ArrayMinimum(Drive,38,i)]==0
       
       ){
                            ObjectCreate("PINUSX"+IntegerToString(i),OBJ_TEXT, 0, Time[i+6],(Low[i]+High[i])/2-100*Point);
                           ObjectSetText("PINUSX"+IntegerToString(i),"Strong for a thrust", 16, "Impact", clrGray);
       }

A new thing is the 120-sample BB as a filter.

The upside has failed with a double divergence, and the market went Jackson 5 and said “I wanna be starting something”. The sequence of the events is always the same.

There are 3 elements. The drive section has an acceleration followed by a Lower Low. The last part is the Thrust – but it cannot be too strong or too weak.


The 3rd song for album #39 after the Sum Of All Pitbulls and the Memory Metal is

Achilles Dent: Quantify My Love


Total Regime Change

What is required for a total regime change? Data. Data needs time. 200 hours is 8.3 days.The 200 sample high / low has to come close enough that you can make a sustainable break. You need the telative to what. Until then all bteaks would fail back beyond the 80-pip line into the configuration defining range

The toal regime shift requires the other configuration to print, eith the new 53 and 63 lines.

I’m noticing check points beyond thd 80-line. 15, 31, 62 pips – double or so would mean 123 in theory beyond.

62 pips would mean 1.0640-ish.

Try to appreciate the fact that the thrust was preceded by a quadruple drive sequence (orange lines).

I know I said about the 5.16x stretch, which is an acceleration and impulse waves don’t end in strength. A C wave however could.

Maybe all you needed was an absolute conviction for DXY 110, Euro parity etc.

I believe that 2 bow-backs is all that you ‘re gonna see for downside.

In the prior example there was a 5-day bow-back followed by a 3-day (a sequence ends with the following day printing a higher low. There was a 1-pip beat of the swing low on day 8.3

Today is day 3 of the first bow-back. When the second one ends, the down move gets timed out.


Album #38. 40 this year on track.

Driven Thrusts & Stats

A Driven Thrust can start from the 53-63 zone or from beyond the 80 line,
the root typically shows up as a Money Flow divergence.

A Driven Thrust occurs in the direction of the configuration. (the sequence of the 53, 63, 80 lines)

A Driven Thrust is a terminal pattern. If a 1st leg suspect has a counter move of 25+ pips, you may be in a corrective structure or a trending move.

1 is made on strength, a measuring leg with a max bow back of 25 pips

LL / HH is an MFI divergence relative to 1, it may come from behind the 8 EMO or the S-30, from within 80 pips (extreme)

1-LL/HH sizes: 4.5, 4.6, 10, 13, 15, 16.5, 18, 33

2 is a further divergence staying out of the OS/OB field completely

2-sizes: 36, 45, 53, 57, 61, 63, 66, 98 (extreme)

 //////////drive down         
      if (Low[i]<L80[i] 
      && iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,10,i))-iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i))>460*Point 
      && (Low[i]<cover[i]+100*Point || Low[i+1]<cover[i+1]+100*Point || Low[i+2]<cover[i+2]+100*Point)
       && (MFI[i]<10 || MFI[i+1]<10 || MFI[i+2]<10)
       && ((High[i+5]<L80[i+5] && High[i+9]<L80[i+9] && High[i+8]<L80[i+8] && High[i+7]<L80[i+7] && High[i+6]<L80[i+6]) || iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,10,i))-iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i))>1100*Point)  
        ){
                     ObjectCreate("Drive"+IntegerToString(i), OBJ_TREND, 0,  Time[iLowest(symbol,0,MODE_LOW,4,i)], iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i)), Time[iHighest(symbol,0,MODE_HIGH,10,i)], iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,10,i)));
                     ObjectSetInteger(0,"Drive"+IntegerToString(i),OBJPROP_COLOR,clrOrangeRed);
                     ObjectSet("Drive"+IntegerToString(i),OBJPROP_BACK,1);
                     ObjectSet("Drive"+IntegerToString(i),OBJPROP_RAY_RIGHT,false);
                     ObjectSet("Drive"+IntegerToString(i),OBJPROP_WIDTH,12);}
   

3x Fresh Out

Some toy for the weekend.

A fresh out makes a 33-pip push beyond a previous day’s extreme, achieves a stretch of 2.x, it closes back by a certain number of pips, and you are most curious about when this happens for the 3rd time, as that high/low should not get a beat, at all.

Well, alright, this one received a 1-pip beat 8 days later.

All the other examples did not.

 
   if (Period()==1440 && i<150){
      if (MathAbs(Close[i]-iLow(symbol,0,iLowest(symbol,0,MODE_LOW,16,i)))<MathAbs(iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,16,i))-Close[i]))
      {reference[i] = iLow(symbol,0,iLowest(symbol,0,MODE_LOW,16,i));   
       L80N[i]=reference[i]+1000*Point;    
      }
      else {reference[i] = iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,16,i));   
       L80N[i]=reference[i]-1000*Point;     
      } 
      if (Close[i]>L80N[i]) L80B[i]=iMA(symbol,0,17,0,MODE_EMA,PRICE_MEDIAN,i); //L80N[i];
      if (Close[i]<L80N[i]) L80S[i]=iMA(symbol,0,17,0,MODE_EMA,PRICE_MEDIAN,i); //L80N[i];
   
      if (High[i]>iMA(symbol,0,9,0,MODE_EMA, PRICE_MEDIAN,i)+FMax*2.2*10*Point
      && High[i]>High[i+1]+33*Point && Close[i]<High[i]-60*Point &&
      High[i]-Low[i]>900*Point && Low[i]>L80N[i]
      )
          ObjectCreate("Bod"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], High[i]+330*Point); 
          ObjectSetText("Bod"+DoubleToStr(i), "F", 24, "Impact",  White); 
   
     if (Low[i]<iMA(symbol,0,9,0,MODE_EMA, PRICE_MEDIAN,i)-FMax*2.4*10*Point
      && Low[i]<Low[i+1]-33*Point && Close[i]>Low[i]+210*Point &&
      High[i]-Low[i]>430*Point && High[i]<L80N[i]
      )
          ObjectCreate("Bod"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], Low[i]-330*Point); 
          ObjectSetText("Bod"+DoubleToStr(i), "F", 24, "Impact",  White); 
   }   

The two sides are not entirely symmetrical, I just went with the stats. Not a whole lot of conclusions, only a few, for instance, that the 10th day can make a successful break – until then you should be fading the attempts.