End Of The World

Should have said end of the blog.

Now that my turout has dropped to 5 views per post, I am determined to finish the destruction, and get it down to one single view.

Oh, I have the master plan for this one.

If options have Greeks, trading has Germans.

A quick word about Walls, Berlin or not.

3 walls in one direction, 2 in the other, which is the way of progression?

The white line in the Stratosphere. The 45-pip (fluctuation maximum) displacement of the E-32 as per Hourly.

The first reach outside for a big grab of nothing is the Luft.

The second, as the old German wisdom holds it, is the Luftwaffe, as where there is Luft, the Luftwaffe wouldn’t be far.

The third one is Concorde as to commemorate the British and the French.

You see, I always thought that if there would be only 2 men left on the planet, one would be German and the other one would be Japanese. You would need to truly believe in your superiority to give you the extra edge. No, being “God’s chosen people” would lot qualify, this is not upto voting.

So I started my own Eurasian Race. She goes by Zulfen Tralfen Zulfie as her German name and Zuflasyei Shusmichiro by the Japanese. With this sneaky twist she can infiltrate these people by their flank, and it is going to be a whole lot easier for her to assimilate. What’s more she would get to pick between the two guys standing. 50% chance of succeeding every time.

(The World’s Laziest Sex Tourist)

Ok, let’s proceed from where I left off last time.

We have a valid opening move to the downside, yet every move comes to an end.

A Push contains the Stab (or Stahl) and the Echo episode contains the Desperato (Deperate effort to live up to the once great nation).

Once this sequence has sailed (on a U-Boat), the Daily chart would print either a continuation divergence or a counter P-E sequence resulting in a sideways / corrective pattern.

If you look back on the history prior, you will find that for a continuation you would either need the the 18-sample stochastic to print an 88+ reading or the E-50 ribbon would be above the 2.5 std Deviation BB top, whic would cap the move. The latter does not happen often at all, certainly not likely at the beginning of a move, see the Teal ovals below.

The point is that I think you should be looking for an 80+ stochastic print, since the upper BB would not dip below the E-50 ribbon for at least a few weeks.

Whoever controls the heartland controls the world. The US blew up the gas pipe to sabotage the birth of a counterweight.

Fractal Synergy

I started out my trading journey in the field of Fractal Energies.

I guess you can say now that I am back to my fruits.

Too many Ys in this one.

Every route ended up leading to the same path.

Measuring leg & divergent leg / zero & mastodon / push & echo were of the same coin all along.

The conclusion had to be the same too. The market has to get in a higher state of charge before holding enough energy to make a change (for once in my life), step on the man in the mirror and be able to feel real good about it.

This divergence can only be measured between two well chosen reference points.

Echo thus is set at a point in space time where the inability can finally be overcome by ability.

Price/Earnings = LED Ceppelin

CiP < CiE

Why 12 sample? Because it is 7 + 5 and also 48 /4.

All I need now is somebody with some money.

If I can’t help you, I won’t help nobody, baby.

ECB Planetary Policy later today.

All Out Of Content

Don’t be oblivious to the fact that you are oblivious to facts.

Goldman Sachs, and has always Sached.

Completely out of content here, just hissing and pissing.

Yeah, I’ve said it all in the 4×3 entry. It is going to crash back down after the 360-370 pips rally, right where price is at on the 3rd week of March before proceeding lower.

Mirror Horror II.

If I give it to you now… will you keep on loving me?

#property copyright "by Macdulio in 2023" 
#property link      "forexfore.blog" 
#property description "Quarterloo"

#property indicator_chart_window
#property indicator_buffers 10

extern int lookback = 40;
extern int std = 2;
double FSize=32;
double FMax = FSize*6/5;
bool embedded[];
double e16d1[], e16d2[], e16d3[], e16d4[], E16[], RSI2[];
double E32L[], AxelU[], AxelU1[], AxelL[], AxelL2[], AxelHU[], AxelHL[];
double env_u[],env_d[];
double ws1[],ws2[],ws3[],wr1[],wr2[],wr3[];
double HighBuffer[],HighBuffer2[];
double LowBuffer[],LowBuffer2[];
bool push[], house[]; 
int Market[];
double bofu[],bofd[];
double bofup[],bofdp[];

//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
  SetIndexBuffer(0,ws1);
   SetIndexStyle(0,DRAW_LINE,2,2,clrDarkGray); 

   SetIndexBuffer(1,wr1);
   SetIndexStyle(1,DRAW_LINE,2,2,clrDarkGray); 
   
   
  SetIndexBuffer(2,ws2);
   SetIndexStyle(2,DRAW_LINE,2,1,clrBlack); 

   SetIndexBuffer(3,wr2);
   SetIndexStyle(3,DRAW_LINE,2,1,clrBlack); 

  SetIndexBuffer(4,ws3);
   SetIndexStyle(4,DRAW_LINE,3,2,clrDarkOliveGreen); 

   SetIndexBuffer(5,wr3);
   SetIndexStyle(5, DRAW_LINE,3,2,clrTomato); 
      
    
  
  SetIndexBuffer(6,env_u);
   SetIndexStyle(6,DRAW_LINE,6,2,clrBlue); 

   SetIndexBuffer(7,env_d);
   SetIndexStyle(7,DRAW_LINE,6,2,clrBlue); 
  
 
  SetIndexBuffer(8,bofup);
   SetIndexStyle(8,DRAW_LINE,6,2,clrRed); 

   SetIndexBuffer(9,bofdp);
   SetIndexStyle(9,DRAW_LINE,6,2,clrGreen);   
   
   
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
{

   int    i,j;             // Number of counted bars
  
   
  string symbol = Symbol();
 
  ArrayResize(bofu, Bars); 
  ArrayInitialize(bofu, EMPTY_VALUE);
  ArrayResize(bofd, Bars); 
  ArrayInitialize(bofd, EMPTY_VALUE);     
  ArrayResize(bofup, Bars); 
  ArrayInitialize(bofup, EMPTY_VALUE);
  ArrayResize(bofdp, Bars); 
  ArrayInitialize(bofdp, EMPTY_VALUE);  
 
  
  ArrayResize(ws1, Bars); 
  ArrayInitialize(ws1, EMPTY_VALUE);
  ArrayResize(ws2, Bars); 
  ArrayInitialize(ws2, EMPTY_VALUE);      
  ArrayResize(ws3, Bars); 
  ArrayInitialize(ws3, EMPTY_VALUE);    
  ArrayResize(wr1, Bars); 
  ArrayInitialize(wr1, EMPTY_VALUE);
  ArrayResize(wr2, Bars); 
  ArrayInitialize(wr2, EMPTY_VALUE);      
  ArrayResize(wr3, Bars); 
  ArrayInitialize(wr3, EMPTY_VALUE);    

    ArrayResize(HighBuffer, Bars); 
  ArrayInitialize(HighBuffer, EMPTY_VALUE);   
      ArrayResize(LowBuffer, Bars); 
  ArrayInitialize(LowBuffer, EMPTY_VALUE); 
     ArrayResize(HighBuffer2, Bars); 
  ArrayInitialize(HighBuffer2, EMPTY_VALUE);   
      ArrayResize(LowBuffer2, Bars); 
  ArrayInitialize(LowBuffer2, EMPTY_VALUE);   
      ArrayResize(embedded, Bars);   
 ArrayInitialize(embedded, false); 
     ArrayResize(Market, Bars);   
 ArrayInitialize(Market, 0); 
    ArrayResize(E16, Bars);   
 ArrayInitialize(E16, EMPTY_VALUE); 
   ArrayResize(env_u, Bars);   
 ArrayInitialize(env_u, EMPTY_VALUE); 
    ArrayResize(env_d, Bars);   
 ArrayInitialize(env_d, EMPTY_VALUE); 
   ArrayResize(push, Bars);   
 ArrayInitialize(push, false); 
    ArrayResize(house, Bars);   
 ArrayInitialize(house, false);  
 
   ArrayResize(e16d1, Bars);   
 ArrayInitialize(e16d1, EMPTY_VALUE);  
    ArrayResize(e16d2, lookback);   
 ArrayInitialize(e16d2, EMPTY_VALUE); 
    ArrayResize(e16d3, lookback);   
 ArrayInitialize(e16d3, EMPTY_VALUE);  
    ArrayResize(e16d4, lookback);   
 ArrayInitialize(e16d4, EMPTY_VALUE); 
    ArrayResize(E16, lookback);   
 ArrayInitialize(E16, EMPTY_VALUE);  
    ArrayResize(RSI2, lookback);   
 ArrayInitialize(RSI2, EMPTY_VALUE);  
     ArrayResize(AxelU, lookback);   
 ArrayInitialize(AxelU, EMPTY_VALUE); 
      ArrayResize(AxelHU, lookback);   
 ArrayInitialize(AxelHU, EMPTY_VALUE); 
      ArrayResize(AxelU1, lookback);   
 ArrayInitialize(AxelU1, EMPTY_VALUE); 
      ArrayResize(AxelL, lookback);   
 ArrayInitialize(AxelL, EMPTY_VALUE); 
       ArrayResize(AxelHL, lookback);   
 ArrayInitialize(AxelHL, EMPTY_VALUE); 
      ArrayResize(AxelL2, lookback);   
 ArrayInitialize(AxelL2, EMPTY_VALUE); 
 
       ArrayResize(E32L, Bars);  
  ArrayInitialize(E32L, EMPTY_VALUE);  


double dt14;
   double db14;
   double pacing;
   double oversold;
   double overbought;
   int N = 1590;
   dt14 = iHigh(NULL,240,iHighest(NULL, 240, MODE_HIGH, N));
   db14 = iLow(NULL,240,iLowest(NULL, 240, MODE_LOW, N));
   pacing = (dt14-db14)*.1;
   oversold = db14+2*pacing;
   overbought = db14+8*pacing;  

//--------------------------------------------------------------------




deletetxt1("Titus");
deletetxt1("TRIAGE");
deletetxt1("ANGL");
deletetxt1("Claim");
deletetxt1("Mile");
deletetxt1("Fracabb");
deletetxt1("PBACK");


for (i = lookback ; i >=0; i--) {
ws1[i]=ws1[i+1];
ws2[i]=ws2[i+1];
ws3[i]=ws3[i+1];
wr1[i]=wr1[i+1];
wr2[i]=wr2[i+1];
wr3[i]=wr3[i+1];
bofu[i]=bofu[i+1];
bofd[i]=bofd[i+1];


//if (iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,4,i)-Low[i]>250*Point){
if (Close[i]>iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,i)){
   ws1[i]=iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,4,i))-2500*Point;
   ws2[i]=iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,4,i))-3300*Point;
   ws3[i]=iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,4,i))-4150*Point;
   wr1[i]=EMPTY_VALUE;
   wr2[i]=EMPTY_VALUE;
   wr3[i]=EMPTY_VALUE;
}

if (Close[i]<iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,i)){
   wr1[i]=iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i))+2500*Point;
   wr2[i]=iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i))+3300*Point;
   wr3[i]=iLow(symbol,0,iLowest(symbol,0,MODE_LOW,4,i))+4150*Point;
   ws1[i]=EMPTY_VALUE;
   ws2[i]=EMPTY_VALUE;
   ws3[i]=EMPTY_VALUE;
}


Market[i]=Market[i+1];

if (iStochastic(symbol,10080,18,3,3,MODE_SMA,0,MODE_SIGNAL,i+2)<24 && iStochastic(symbol,10080,18,3,3,MODE_SMA,0,MODE_SIGNAL,i+1)<24 && iStochastic(symbol,10080,18,3,3,MODE_SMA,0,MODE_SIGNAL,i)<24 ){
 
                     ObjectCreate("Fracabbb"+IntegerToString(i), OBJ_RECTANGLE, 1,  Time[i+1], 24, Time[i], 0);
                     ObjectSetInteger(0,"Fracabbb"+IntegerToString(i),OBJPROP_COLOR,clrSalmon);
                     ObjectSet("Fracabbb"+IntegerToString(i),OBJPROP_BACK,1);
                     ObjectSet("Fracabbb"+IntegerToString(i),OBJPROP_WIDTH,5);   
                     embedded[i]=true;
}

if (iStochastic(symbol,10080,18,3,3,MODE_SMA,0,MODE_SIGNAL,i+2)>78 && iStochastic(symbol,10080,18,3,3,MODE_SMA,0,MODE_SIGNAL,i+1)>78 && iStochastic(symbol,10080,18,3,3,MODE_SMA,0,MODE_SIGNAL,i)>78){
                      ObjectCreate("Fracabbbb"+IntegerToString(i), OBJ_RECTANGLE, 1,  Time[i+1], 80, Time[i], 100);
                     ObjectSetInteger(0,"Fracabbbb"+IntegerToString(i),OBJPROP_COLOR,clrChartreuse);
                     ObjectSet("Fracabbbb"+IntegerToString(i),OBJPROP_BACK,1);
                     ObjectSet("Fracabbbb"+IntegerToString(i),OBJPROP_WIDTH,5);   
                     embedded[i]=true;
}
  
  


   if (Period()==30) E16[i]=iMA(NULL,0,32,0,MODE_EMA, PRICE_MEDIAN,i);       
   else E16[i]=iMA(NULL,0,16,0,MODE_EMA, PRICE_MEDIAN,i);
          
   if (Period()==60) E32L[i]=iMA(NULL,0,32,0,MODE_EMA, PRICE_MEDIAN,i);
   else E32L[i]=iMA(NULL,0,32*2,0,MODE_EMA, PRICE_MEDIAN,i);
   
         e16d1[i]=E16[i]+450*Point;
         
         e16d2[i]=E16[i]-450*Point;
           
        if (iMA(NULL,60,67,0,MODE_EMA, PRICE_HIGH,0)>iMA(NULL,60,207,0,MODE_EMA, PRICE_HIGH,0)) e16d4[i]=e16d2[i];
        if (iMA(NULL,60,67,0,MODE_EMA, PRICE_HIGH,0)<iMA(NULL,60,207,0,MODE_EMA, PRICE_HIGH,0)) e16d3[i]=e16d1[i];
        
     AxelU[i]=(High[i+1]-Low[i+1])/100*15+High[i+1];
     AxelHU[i]=(High[i+1]-Low[i+1])/2+High[i+1];
     AxelU1[i]=(High[i+1]-Low[i+1])/2+Low[i+1];
    
     
     AxelL[i]=Low[i+1]-(High[i+1]-Low[i+1])/100*15;
     
     AxelHL[i]=Low[i+1]-(High[i+1]-Low[i+1])/2;

   env_u[i]=iEnvelopes(symbol,0,14,0,0,0,2,MODE_UPPER,i);
   env_d[i]=iEnvelopes(symbol,0,14,0,0,0,2,MODE_LOWER,i);  
   
 if (i<346){
 
      if (push[i+1] && Close[i+1]<iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i+1) && Low[i]<Low[i+1] && i>0 && Low[i]<Low[i-1]){
          ObjectCreate("Miles"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], Low[i]-40*Point); 
          ObjectSetText("Miles"+DoubleToStr(i), "D", 29, "Webdings", clrMagenta);
          house[i]=true;
      }
      if (push[i+2] && Close[i+2]<iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i+1)  && (Low[i+1]>Low[i+2] || Low[i]<Low[i+1] )){
          ObjectCreate("Miles"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], Low[i]-40*Point); 
          ObjectSetText("Miles"+DoubleToStr(i), "D", 29, "Webdings", clrMagenta);
         house[i]=true;
      }
    if (push[i+1] && Close[i+1]>iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i+1) && High[i]>High[i+1] && i>0 && High[i]>High[i-1]){
          ObjectCreate("Miles"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], High[i]+1170*Point); 
          ObjectSetText("Miles"+DoubleToStr(i), "D", 29, "Webdings", clrMagenta);
         house[i]=true;
      }
      if (push[i+2] && Close[i+2]>iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i+1) && (High[i+1]<High[i+2] || High[i]>High[i+1]) ){
          ObjectCreate("Miles"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], High[i]+1170*Point); 
          ObjectSetText("Miles"+DoubleToStr(i), "D", 29, "Webdings", clrMagenta);
         house[i]=true;
      }
        if (push[i+3] && Close[i+3]>iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i+2) && (High[i]>High[i+1] && High[i+1]>High[i+2]) ){
          ObjectDelete("Miles"+DoubleToStr(i+1));
          ObjectCreate("Miles"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], High[i]+1170*Point); 
          ObjectSetText("Miles"+DoubleToStr(i), "D", 29, "Webdings", clrMagenta);
         house[i+1]=false;
         house[i]=true;
      }
      
      
      if (i==0) ObjectSetText("Miles"+DoubleToStr(i), "D", 29, "Webdings", clrGray);
 
 
 
      if (iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_MAIN,i)<25 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_MAIN,i+1)<25 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_MAIN,i+2)<25 && iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i)>AxelU[i]){
         HighBuffer[i]=iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i);
         LowBuffer[i]=AxelHU[i];
      }
      else {
         HighBuffer[i]=AxelHU[i];
         LowBuffer[i]=AxelU[i];
      }
      
      
          if (iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_MAIN,i)>75 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_MAIN,i+1)>75 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_MAIN,i+2)>75 && iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i)<AxelL[i]){
         HighBuffer2[i]=AxelHL[i];
         LowBuffer2[i]=iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i);
      }
      else {
         HighBuffer2[i]=AxelL[i];
         LowBuffer2[i]=AxelHL[i];
      }
      if (iLow(symbol,10080,i)<AxelHL[i]) {
          HighBuffer2[i]=iLow(symbol,0,i);
         LowBuffer2[i]=iBands(symbol,0,18,std,4,PRICE_LOW,MODE_LOWER,i);
         if (iLow(symbol,0,iLowest(symbol,0,MODE_LOW,8,i))==iLow(symbol,0,i)
                  
         ){
         j=i+2;
         while (j<i+5){
         if (Low[j]<Low[j+1] && Low[j]<Low[j-1]) break;   
         j++;
         }
         if (!push[j] && !push[i+3]){
         ObjectCreate("Mile"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], Low[i]-40*Point); 
          if (Close[i]<Low[i]+100*Point && !embedded[i]) ObjectSetText("Mile"+DoubleToStr(i), CharToStr(73), 29, "Wingdings", clrWhite);
          else if (Close[i]<env_d[i]) {ObjectSetText("Mile"+DoubleToStr(i), CharToStr(73), 39, "Wingdings", clrMagenta);
           ObjectCreate(0,"TRIAGE"+IntegerToString(i),OBJ_TRIANGLE,0,Time[i],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))-250*Point,Time[i+3],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))-250*Point,Time[i+4],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i)));
            ObjectSetInteger(0,"TRIAGE"+IntegerToString(i),OBJPROP_COLOR,clrLightGray);  ObjectSetInteger(0,"TRIAGE"+IntegerToString(i),OBJPROP_WIDTH,1); ObjectSetInteger(0,"TRIAGE"+IntegerToString(i),OBJPROP_BACK,1); 
            
               ObjectCreate("ANGL"+IntegerToString(i), OBJ_TEXT, 0, Time[i+3],  iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))-250*Point+99*Point);  
             ObjectSetText("ANGL"+IntegerToString(i),"              c1_"+DoubleToString(NormalizeDouble(iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))-250*Point,4),4), 16, "Impact",  Blue);  
            
            ObjectCreate(0,"TRIAGES"+IntegerToString(i),OBJ_TRIANGLE,0,Time[i],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))-1100*Point,Time[i+4],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))-1100*Point,Time[i+4],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i)));
            ObjectSetInteger(0,"TRIAGES"+IntegerToString(i),OBJPROP_COLOR,clrLightGray);  ObjectSetInteger(0,"TRIAGES"+IntegerToString(i),OBJPROP_WIDTH,1); ObjectSetInteger(0,"TRIAGES"+IntegerToString(i),OBJPROP_BACK,1); 
       
        ObjectCreate("ANGLia"+IntegerToString(i), OBJ_TEXT, 0, Time[i+3],  iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))-1100*Point+99*Point);  
             ObjectSetText("ANGLia"+IntegerToString(i),"              c2_"+DoubleToString(NormalizeDouble(iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))-1100*Point,4),4), 16, "Impact",  Blue);  
       
                ObjectCreate(0,"TRIAGEZ"+IntegerToString(i),OBJ_TRIANGLE,0,Time[i],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))-1250*Point,Time[i+4],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))-1250*Point,Time[i+4],iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i)));
            ObjectSetInteger(0,"TRIAGEZ"+IntegerToString(i),OBJPROP_COLOR,clrLightGray);  ObjectSetInteger(0,"TRIAGEZ"+IntegerToString(i),OBJPROP_WIDTH,1); ObjectSetInteger(0,"TRIAGEZ"+IntegerToString(i),OBJPROP_BACK,1); 
            
             ObjectCreate("PBACK"+IntegerToString(i), OBJ_RECTANGLE, 0,  Time[i+1], Low[i]+1100*Point, Time[i], Low[i]+1700*Point);
                   
            ObjectSetInteger(0,"PBACK"+IntegerToString(i),OBJPROP_COLOR,clrPurple);
            ObjectSet("PBACK"+IntegerToString(i),OBJPROP_BACK,0);
            ObjectSet("PBACK"+IntegerToString(i),OBJPROP_WIDTH,5);
            
            push[i]=true;
            bofd[i]=iLow(symbol,0,iLowest(symbol,0,MODE_LOW,2,i))-1320*Point;         
          }
          else ObjectSetText("Mile"+DoubleToStr(i), CharToStr(73), 29, "Wingdings", clrBlack);     
         ObjectSet("Mile"+DoubleToStr(i), OBJPROP_BACK, 1 );    }
         
         if (embedded[i] && Low[i]>Close[i]-400*Point && Low[i]<Close[i]-300*Point){
             ObjectCreate("Milef"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], Low[i]-340*Point); 
           ObjectSetText("Milef"+DoubleToStr(i), CharToStr(182), 29, "Wingdings", clrBlack);     
         ObjectSet("Milef"+DoubleToStr(i), OBJPROP_BACK, 1 );  
         }
         
         
                  
      }
     }
          if (iHigh(symbol,10080,i)>AxelHU[i] ) {
          //&& !(iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_MAIN,i)<25 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_MAIN,i+1)<25 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_MAIN,i+2)<25)
          HighBuffer[i]=iHigh(symbol,10080,i);
         LowBuffer[i]=iBands(symbol,0,18,std,4,PRICE_LOW,MODE_UPPER,i);
         if (iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,8,i))==iHigh(symbol,0,i)
         //iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,i)>9 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,i)<80
         ){
          j=i+2;
         while (j<i+5){
         if (High[j]>High[j+1] && High[j]>High[j-1]) break;   
         j++;
         }
         if (!push[j] && !push[i+3]){
         
         ObjectCreate("Mile"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], High[i]+990*Point); 
         if (Close[i]>High[i]-100*Point && !embedded[i]) ObjectSetText("Mile"+DoubleToStr(i), CharToStr(73), 29, "Wingdings", clrWhite);
         else if (Close[i]>env_u[i]) {ObjectSetText("Mile"+DoubleToStr(i), CharToStr(73), 39, "Wingdings", clrMagenta);               
           ObjectCreate(0,"TRIAGE"+IntegerToString(i),OBJ_TRIANGLE,0,Time[i],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))+250*Point,Time[i+3],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))+250*Point,Time[i+4],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i)));
            ObjectSetInteger(0,"TRIAGE"+IntegerToString(i),OBJPROP_COLOR,clrLightGray);  ObjectSetInteger(0,"TRIAGE"+IntegerToString(i),OBJPROP_WIDTH,1); ObjectSetInteger(0,"TRIAGE"+IntegerToString(i),OBJPROP_BACK,1); 
            
               ObjectCreate("ANGL"+IntegerToString(i), OBJ_TEXT, 0, Time[i+3],  iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))+250*Point+99*Point);  
             ObjectSetText("ANGL"+IntegerToString(i),"              c1_"+DoubleToString(NormalizeDouble(iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))+250*Point,4),4), 16, "Impact",  Blue);  
            
            ObjectCreate(0,"TRIAGES"+IntegerToString(i),OBJ_TRIANGLE,0,Time[i],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))+1100*Point,Time[i+4],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))+1100*Point,Time[i+4],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i)));
            ObjectSetInteger(0,"TRIAGES"+IntegerToString(i),OBJPROP_COLOR,clrLightGray);  ObjectSetInteger(0,"TRIAGES"+IntegerToString(i),OBJPROP_WIDTH,1); ObjectSetInteger(0,"TRIAGES"+IntegerToString(i),OBJPROP_BACK,1); 
       
        ObjectCreate("ANGLia"+IntegerToString(i), OBJ_TEXT, 0, Time[i+3],  iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))+1100*Point+99*Point);  
             ObjectSetText("ANGLia"+IntegerToString(i),"              c2_"+DoubleToString(NormalizeDouble(iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))+1100*Point,4),4), 16, "Impact",  Blue);  
       
                ObjectCreate(0,"TRIAGEZ"+IntegerToString(i),OBJ_TRIANGLE,0,Time[i],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))+1250*Point,Time[i+4],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))+1250*Point,Time[i+4],iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i)));
            ObjectSetInteger(0,"TRIAGEZ"+IntegerToString(i),OBJPROP_COLOR,clrLightGray);  ObjectSetInteger(0,"TRIAGEZ"+IntegerToString(i),OBJPROP_WIDTH,1); ObjectSetInteger(0,"TRIAGEZ"+IntegerToString(i),OBJPROP_BACK,1); 
            
            
             ObjectCreate("PBACK"+IntegerToString(i), OBJ_RECTANGLE, 0,  Time[i+1], High[i]-800*Point, Time[i], High[i]-1300*Point);
                   
            ObjectSetInteger(0,"PBACK"+IntegerToString(i),OBJPROP_COLOR,clrPurple);
            ObjectSet("PBACK"+IntegerToString(i),OBJPROP_BACK,0);
            ObjectSet("PBACK"+IntegerToString(i),OBJPROP_WIDTH,5);
            
            push[i]=true;
            bofu[i]=iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,2,i))+1350*Point;
         }
          else ObjectSetText("Mile"+DoubleToStr(i), CharToStr(73), 29, "Wingdings", clrBlack);     
         ObjectSet("Mile"+DoubleToStr(i), OBJPROP_BACK, 0 );
         if (i>1 && Market[i]<0){
            ObjectCreate("MileLOPEZ"+IntegerToString(i), OBJ_ELLIPSE, 0, Time[i], Open[i-1]+250*Point, Time[i-2], Open[i-1]-250*Point);
            ObjectSetInteger(0,"MileLOPEZ"+IntegerToString(i),OBJPROP_COLOR,clrPowderBlue);
            ObjectSetDouble(0,"MileLOPEZ"+IntegerToString(i),OBJPROP_SCALE,.05);
            ObjectSet("MileLOPEZ"+IntegerToString(i),OBJPROP_WIDTH,8);
            ObjectSet("MileLOPEZ"+IntegerToString(i),OBJPROP_BACK,0);
          }
         }   
      }
      }
}   

if (Close[i]<iMA(NULL,0,21,0,MODE_EMA, PRICE_MEDIAN,i) && !house[i+1])   bofdp[i]=bofd[i];
if (Close[i]>iMA(NULL,0,21,0,MODE_EMA, PRICE_MEDIAN,i) && (push[i+1] || push[i+2] || push[i+3]) &&!house[i+2]) bofup[i]=bofu[i];

if (Low[i]<bofd[i] && Close[i]>bofd[i+1] && Low[i]<env_d[i]){
          ObjectCreate("Miless"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], Low[i]+5900*Point); 
          ObjectSetText("Miless"+DoubleToStr(i), "TGT:"+DoubleToStr(NormalizeDouble(Low[i]+4600*Point,4),4) , 29, "Impact", clrDarkGreen);
        }
        
if (High[i]>bofu[i] && Close[i]<bofu[i+1] && High[i]>env_u[i]){
          ObjectCreate("Miless"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], High[i]-3900*Point); 
          ObjectSetText("Miless"+DoubleToStr(i), "TGT:"+DoubleToStr(NormalizeDouble(High[i]-4700*Point,4),4) , 29, "Impact", clrCrimson);
        }        
        


}
 


    deletetxt1("Batch");
    for(i=lookback; i>=0; i--){
          ObjectCreate("Batch"+DoubleToStr(i), OBJ_TEXT, 1, Time[i], 50); 
          if (Market[i]<0) ObjectSetText("Batch"+DoubleToStr(i), CharToStr(174), 16, "Wingdings", Tomato); 
          else if (Market[i]>0)  ObjectSetText("Batch"+DoubleToStr(i), CharToStr(174), 16, "Wingdings", SpringGreen);
          else ObjectSetText("Batch"+DoubleToStr(i), CharToStr(174), 16, "Wingdings", Yellow);
          ObjectSet("Batch"+DoubleToStr(i),OBJPROP_BACK, 1);
    }


deletetxt1("Penalisation");
deletetxt1("Quarter");
deletetxt1("Heat");


               ObjectCreate( "Penalisation"+IntegerToString(i), OBJ_TREND, 0,  Time[1], AxelU[0] ,  Time[0], AxelU[0] );
               ObjectSet("Penalisation"+IntegerToString(i), OBJPROP_COLOR, clrCadetBlue );
               ObjectSet("Penalisation"+IntegerToString(i), OBJPROP_WIDTH, 3 );
               ObjectSet("Penalisation"+IntegerToString(i), OBJPROP_RAY_RIGHT, true );
               ObjectSet("Penalisation"+IntegerToString(i), OBJPROP_STYLE, 1 );


               ObjectCreate( "Penalisations"+IntegerToString(i), OBJ_TREND, 0,  Time[1], AxelL[0],  Time[0], AxelL[0] );
               ObjectSet("Penalisations"+IntegerToString(i), OBJPROP_COLOR, clrCadetBlue );
               ObjectSet("Penalisations"+IntegerToString(i), OBJPROP_WIDTH, 3 );
               ObjectSet("Penalisations"+IntegerToString(i), OBJPROP_RAY_RIGHT, true );
               ObjectSet("Penalisations"+IntegerToString(i), OBJPROP_STYLE, 1 );
               
                        ObjectCreate( "Penalisationz"+IntegerToString(i), OBJ_TREND, 0,  Time[1], AxelU1[0],  Time[0], AxelU1[0] );
               ObjectSet("Penalisationz"+IntegerToString(i), OBJPROP_COLOR, clrOrangeRed );
               ObjectSet("Penalisationz"+IntegerToString(i), OBJPROP_WIDTH, 3 );
               ObjectSet("Penalisationz"+IntegerToString(i), OBJPROP_RAY_RIGHT, true );
               ObjectSet("Penalisationz"+IntegerToString(i), OBJPROP_STYLE, 1 );



   if (embedded[0]) { ObjectCreate("Quarter"+9,OBJ_LABEL,1, 0,0);
  ObjectSet("Quarter"+9,OBJPROP_CORNER,3);
    ObjectSet("Quarter"+9,OBJPROP_XDISTANCE,330);
  ObjectSet("Quarter"+9,OBJPROP_YDISTANCE,60);
  ObjectSet("Quarter"+9,OBJPROP_COLOR,clrBlue); 
  ObjectSetText("Quarter"+9,"EMBEDDED!!!",19,"Arial Black");}


////embedded oversold PUSHING below the envelope
if (embedded[0] && iLow(symbol,10080,1)<AxelHL[1] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)<25 && iLow(symbol,10080,1)<iEnvelopes(symbol,0,14,MODE_SMA,0,PRICE_CLOSE,2.0,MODE_LOWER,1)){
   
        ObjectCreate("Heat", OBJ_ELLIPSE, 0, Time[2], iEnvelopes(symbol,0,14,MODE_SMA,0,PRICE_CLOSE,2.0,MODE_LOWER,1)+330*Point, Time[0], iEnvelopes(symbol,0,14,MODE_SMA,0,PRICE_CLOSE,2.0,MODE_LOWER,1)-330*Point);
        ObjectSetInteger(0,"Heat",OBJPROP_COLOR,clrCrimson);
         ObjectSetDouble(0,"Heat",OBJPROP_SCALE,.015);
        ObjectSet("Heat",OBJPROP_BACK,0);
        ObjectSet("Heat",OBJPROP_WIDTH,2);
   
   ObjectCreate("QuarterWWWW", OBJ_TEXT, 0, Time[0],iLow(symbol,10080,1)-500*Point+.0022); 
                     ObjectSetText("QuarterWWWW", "                                  "+DoubleToString(NormalizeDouble(iLow(symbol,10080,1)-600*Point,4),4)+" - ANY", 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWW____", OBJ_TEXT, 0, Time[0], iLow(symbol,10080,1)-500*Point+.0022); 
                     ObjectSetText("QuarterWWW____", "                                 "+DoubleToString(NormalizeDouble(iLow(symbol,10080,1)-600*Point,4),4)+" - ANY", 12, "Arial Black", clrMagenta);
}


////embedded oversold going below the envelope
else if (embedded[0] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)<25 && iLow(symbol,10080,1)<iEnvelopes(symbol,0,14,MODE_SMA,0,PRICE_CLOSE,2.0,MODE_LOWER,1)){
   
        ObjectCreate("Heat", OBJ_ELLIPSE, 0, Time[2], iEnvelopes(symbol,0,14,MODE_SMA,0,PRICE_CLOSE,2.0,MODE_LOWER,1)+330*Point, Time[0], iEnvelopes(symbol,0,14,MODE_SMA,0,PRICE_CLOSE,2.0,MODE_LOWER,1)-330*Point);
        ObjectSetInteger(0,"Heat",OBJPROP_COLOR,clrCrimson);
         ObjectSetDouble(0,"Heat",OBJPROP_SCALE,.015);
        ObjectSet("Heat",OBJPROP_BACK,0);
        ObjectSet("Heat",OBJPROP_WIDTH,2);
   
   ObjectCreate("QuarterWWWW", OBJ_TEXT, 0, Time[0],iLow(symbol,10080,1)-300*Point+.0022); 
                     ObjectSetText("QuarterWWWW", "                                  "+DoubleToString(NormalizeDouble(iLow(symbol,10080,1)-300*Point,4),4)+", "+DoubleToString(NormalizeDouble(iLow(symbol,10080,1)-400*Point,4),4), 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWW____.", OBJ_TEXT, 0, Time[0], iLow(symbol,10080,1)-300*Point+.0022); 
                     ObjectSetText("QuarterWWW____.", "                                 "+DoubleToString(NormalizeDouble(iLow(symbol,10080,1)-300*Point,4),4)+", "+DoubleToString(NormalizeDouble(iLow(symbol,10080,1)-400*Point,4),4), 12, "Arial Black", clrMagenta);
}
///embedded oversold beat of last swing low
if (embedded[0] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)<25 && iLow(symbol,10080,1)>iEnvelopes(symbol,0,14,MODE_SMA,0,PRICE_CLOSE,2.0,MODE_LOWER,1)){
   ObjectCreate("QuarterWWWW,", OBJ_TEXT, 0, Time[0],iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-20*Point+.0022); 
                     ObjectSetText("QuarterWWWW,", "                                  "+DoubleToString(NormalizeDouble(iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-20*Point,4),4)+", ("+DoubleToString(NormalizeDouble(iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-100*Point,4),4)+")", 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWW____,", OBJ_TEXT, 0, Time[0], iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-20*Point+.0022); 
                     ObjectSetText("QuarterWWW____,", "                                 "+DoubleToString(NormalizeDouble(iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-20*Point,4),4)+", ("+DoubleToString(NormalizeDouble(iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-100*Point,4),4)+")", 12, "Arial Black", clrMagenta);
}

////embedded oversold push to the upside
if (embedded[0] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)<25){
   ObjectCreate("QuarterWWWWW", OBJ_TEXT, 0, Time[0],LowBuffer[1]+300*Point+.0022); 
                     ObjectSetText("QuarterWWWWW", "                                  "+DoubleToString(NormalizeDouble(LowBuffer[1]+300*Point,4),4)+", ("+DoubleToString(NormalizeDouble(LowBuffer[1]+400*Point,4),4)+")", 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWWW____?", OBJ_TEXT, 0, Time[0], LowBuffer[1]+300*Point+.0022); 
                     ObjectSetText("QuarterWWWW____?", "                                 "+DoubleToString(NormalizeDouble(LowBuffer[1]+300*Point,4),4)+", ("+DoubleToString(NormalizeDouble(LowBuffer[1]+400*Point,4),4)+")", 12, "Arial Black", clrMagenta);
}

///////embedded overbought with weekly low outside the envelope
if (embedded[0] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)>75 && iLow(symbol,10080,1)>iEnvelopes(symbol,0,14,MODE_SMA,0,PRICE_CLOSE,2.0,MODE_HIGH,1)){
   ObjectCreate("QuarterWWWW&", OBJ_TEXT, 0, Time[0],iHigh(symbol,10080,1)+900*Point+.0022); 
                     ObjectSetText("QuarterWWWW&", "                                  "+DoubleToString(NormalizeDouble(iHigh(symbol,10080,1)+900*Point,4),4), 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWW____&", OBJ_TEXT, 0, Time[0], iHigh(symbol,10080,1)+900*Point+.0022); 
                     ObjectSetText("QuarterWWW____&", "                                 "+DoubleToString(NormalizeDouble(iHigh(symbol,10080,1)+900*Point,4),4), 12, "Arial Black", clrMagenta);
}

///////embedded overbought going above the envelope
if (embedded[0] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)>75 && iHigh(symbol,10080,1)>iEnvelopes(symbol,0,14,MODE_SMA,0,PRICE_CLOSE,2.0,MODE_HIGH,1)){
   ObjectCreate("QuarterWWWW'", OBJ_TEXT, 0, Time[0],iHigh(symbol,10080,1)+350*Point+.0022); 
                     ObjectSetText("QuarterWWWW'", "                                  "+DoubleToString(NormalizeDouble(iHigh(symbol,10080,1)+350*Point,4),4), 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWW____'", OBJ_TEXT, 0, Time[0], iHigh(symbol,10080,1)+350*Point+.0022); 
                     ObjectSetText("QuarterWWW____'", "                                 "+DoubleToString(NormalizeDouble(iHigh(symbol,10080,1)+350*Point,4),4), 12, "Arial Black", clrMagenta);
}

///embedded overbought beat of last swing high
if (embedded[0] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)>75 && iHigh(symbol,10080,1)<iEnvelopes(symbol,0,14,MODE_SMA,0,PRICE_CLOSE,2.0,MODE_HIGH,1)){
   ObjectCreate("QuarterWWWW:", OBJ_TEXT, 0, Time[0],iHigh(symbol,10080,iHighest(symbol,10080,MODE_HIGH,10,1))+100*Point+.0022); 
                     ObjectSetText("QuarterWWWW:", "                                  "+DoubleToString(NormalizeDouble(iHigh(symbol,10080,iHighest(symbol,10080,MODE_HIGH,10,1))+100*Point,4),4), 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWW____:", OBJ_TEXT, 0, Time[0], iHigh(symbol,10080,iHighest(symbol,10080,MODE_HIGH,10,1))+100*Point+.0022); 
                     ObjectSetText("QuarterWWW____:", "                                 "+DoubleToString(NormalizeDouble(iHigh(symbol,10080,iHighest(symbol,10080,MODE_HIGH,10,1))+100*Point,4),4), 12, "Arial Black", clrMagenta);
}

////embedded overbought push to the downside
if (embedded[0] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)>75){
   ObjectCreate("QuarterWWWWW", OBJ_TEXT, 0, Time[0],HighBuffer2[1]-300*Point+.0022); 
                     ObjectSetText("QuarterWWWWW", "                                  "+DoubleToString(NormalizeDouble(HighBuffer2[1]-300*Point,4),4)+", ("+DoubleToString(NormalizeDouble(HighBuffer2[1]-400*Point,4),4)+")", 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWWW____", OBJ_TEXT, 0, Time[0], HighBuffer2[1]-300*Point+.0022); 
                     ObjectSetText("QuarterWWWW____", "                                 "+DoubleToString(NormalizeDouble(HighBuffer2[1]-300*Point,4),4)+", ("+DoubleToString(NormalizeDouble(HighBuffer2[1]-400*Point,4),4)+")", 12, "Arial Black", clrMagenta);
}


///not embedded going up - beat of last swing high
if (!embedded[0] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)>25 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)>=iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,1)){
   ObjectCreate("QuarterWWWW..", OBJ_TEXT, 0, Time[0],iHigh(symbol,10080,iHighest(symbol,10080,MODE_HIGH,10,1))+300*Point+.0022); 
                     ObjectSetText("QuarterWWWW..", "                                  "+DoubleToString(NormalizeDouble(iHigh(symbol,10080,iHighest(symbol,10080,MODE_HIGH,10,1))+300*Point,4),4)+", "+DoubleToString(NormalizeDouble(iHigh(symbol,10080,iHighest(symbol,10080,MODE_HIGH,10,1))+400*Point,4),4), 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWW____..", OBJ_TEXT, 0, Time[0], iHigh(symbol,10080,iHighest(symbol,10080,MODE_HIGH,10,1))+300*Point+.0022); 
                     ObjectSetText("QuarterWWW____..", "                                 "+DoubleToString(NormalizeDouble(iHigh(symbol,10080,iHighest(symbol,10080,MODE_HIGH,10,1))+300*Point,4),4)+", "+DoubleToString(NormalizeDouble(iHigh(symbol,10080,iHighest(symbol,10080,MODE_HIGH,10,1))+400*Point,4),4), 12, "Arial Black", clrMagenta);
}

///not embedded going up - push on the downside
if (!embedded[0] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)>25 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)>=iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,1)){
 ObjectCreate("QuarterWWWWW", OBJ_TEXT, 0, Time[0],HighBuffer2[1]-100*Point+.0022); 
                     ObjectSetText("QuarterWWWWW", "                                     "+DoubleToString(NormalizeDouble(HighBuffer2[1]-100*Point,4),4)+", ("+DoubleToString(NormalizeDouble(HighBuffer2[1]-100*Point,4),4)+")", 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWWW____", OBJ_TEXT, 0, Time[0], HighBuffer2[1]-100*Point+.0022); 
                     ObjectSetText("QuarterWWWW____", "                                    "+DoubleToString(NormalizeDouble(HighBuffer2[1]-100*Point,4),4)+", ("+DoubleToString(NormalizeDouble(HighBuffer2[1]-100*Point,4),4)+")", 12, "Arial Black", clrMagenta);
}



///not embedded going down - beat of last swing low
if (!embedded[0] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)<75 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)<=iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,1)){
   ObjectCreate("QuarterWWWW!", OBJ_TEXT, 0, Time[0],iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-160*Point+.0022); 
                     ObjectSetText("QuarterWWWW!", "                                  "+DoubleToString(NormalizeDouble(iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-160*Point,4),4)+", "+DoubleToString(NormalizeDouble(iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-260*Point,4),4), 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWW____!", OBJ_TEXT, 0, Time[0], iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-160*Point+.0022); 
                     ObjectSetText("QuarterWWW____!", "                                 "+DoubleToString(NormalizeDouble(iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-160*Point,4),4)+", "+DoubleToString(NormalizeDouble(iLow(symbol,10080,iLowest(symbol,10080,MODE_LOW,10,1))-260*Point,4),4), 12, "Arial Black", clrMagenta);
}

///not embedded going down - push on the upside
if (!embedded[0] && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)<75 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)<=iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,1)){
 ObjectCreate("QuarterWWWWW", OBJ_TEXT, 0, Time[0],LowBuffer[1]+100*Point+.0022); 
                     ObjectSetText("QuarterWWWWW", "                                     "+DoubleToString(NormalizeDouble(LowBuffer[1]+100*Point,4),4), 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWWWW____", OBJ_TEXT, 0, Time[0], LowBuffer[1]+100*Point+.0022); 
                     ObjectSetText("QuarterWWWW____", "                                    "+DoubleToString(NormalizeDouble(LowBuffer[1]+100*Point,4),4), 12, "Arial Black", clrMagenta);
}




if (Close[0]>(db14+dt14)/2){

ObjectCreate("QuarterWWW", OBJ_TEXT, 0, Time[0],overbought+.0022); 
                     ObjectSetText("QuarterWWW", "                                  "+DoubleToString(NormalizeDouble(overbought,4),4)+" OB", 12, "Arial Black", clrBlack);
ObjectCreate("QuarterWW____", OBJ_TEXT, 0, Time[0], overbought+.0022); 
                     ObjectSetText("QuarterWW____", "                                 "+DoubleToString(NormalizeDouble(overbought,4),4)+" OB", 12, "Arial Black", clrMagenta);

}


if (Close[0]<(db14+dt14)/2){
ObjectCreate("QuarterWW", OBJ_TEXT, 0, Time[0],oversold+.0022); 
                     ObjectSetText("QuarterWW", "                                  "+DoubleToString(NormalizeDouble(oversold,4),4)+" OS", 12, "Arial Black", clrBlack);
ObjectCreate("QuarterW____", OBJ_TEXT, 0, Time[0], oversold+.0022); 
                     ObjectSetText("QuarterW____", "                                 "+DoubleToString(NormalizeDouble(oversold,4),4)+" OS", 12, "Arial Black", clrMagenta);


 ObjectCreate("QuarterWWWWWZ", OBJ_TEXT, 0, Time[0],LowBuffer2[0]+.0022); 
                     ObjectSetText("QuarterWWWWWZ", "                                  "+DoubleToString(NormalizeDouble(LowBuffer2[0],4),4), 12, "Arial Black", clrWhite);
ObjectCreate("QuarterWWWWZ____", OBJ_TEXT, 0, Time[0], LowBuffer2[0]+.0022); 
                     ObjectSetText("QuarterWWWWZ____", "                                    "+DoubleToString(NormalizeDouble(LowBuffer2[0],4),4), 12, "Arial Black", clrBlack);
}



ObjectCreate("QuarterW", OBJ_TEXT, 0, Time[0], AxelU1[0]+.0022); 
                     ObjectSetText("QuarterW", "                                  "+DoubleToString(NormalizeDouble(AxelU1[0],4),4)+" MID PT.", 12, "Arial Black", clrBlack);
ObjectCreate("Quarter____", OBJ_TEXT, 0, Time[0], AxelU1[0]+.0022); 
                     ObjectSetText("Quarter____", "                                 "+DoubleToString(NormalizeDouble(AxelU1[0],4),4)+" MID PT.", 12, "Arial Black", clrMagenta);


if (Market[0]<0){

ObjectCreate("QuarterD", OBJ_TEXT, 0, Time[0], env_d[0]+.0022); 
                     ObjectSetText("QuarterD", "                                  "+DoubleToString(NormalizeDouble(env_d[0],4),4)+" TGT (2.14)", 12, "Arial Black", clrWhite);
ObjectCreate("QuarterD____", OBJ_TEXT, 0, Time[0], env_d[0]+.0022); 
                     ObjectSetText("QuarterD____", "                                 "+DoubleToString(NormalizeDouble(env_d[0],4),4)+" TGT (2.14)", 12, "Arial Black", clrBlue);

ObjectCreate("QuarterX", OBJ_TEXT, 1, Time[0], 50+.0022); 
                     ObjectSetText("QuarterX", "                                  BAER MARKET", 12, "Arial Black", clrBlack);
ObjectCreate("QuarterX____", OBJ_TEXT, 1, Time[0], 50+.0022); 
                     ObjectSetText("QuarterX____", "                                 BAER MARKET", 12, "Arial Black", clrMediumVioletRed);


ObjectCreate("QuarterF", OBJ_TEXT, 0, Time[0], iEnvelopes(symbol,0,14,0,0,0,3.5,MODE_LOWER,0)+.0022); 
                     ObjectSetText("QuarterF", "                                  "+DoubleToString(NormalizeDouble(iEnvelopes(symbol,0,14,0,0,0,3.5,MODE_LOWER,0),4),4)+" TGT (3.14)", 12, "Arial Black", clrWhite);
ObjectCreate("QuarterF____", OBJ_TEXT, 0, Time[0], iEnvelopes(symbol,0,14,0,0,0,3.5,MODE_LOWER,0)+.0022); 
                     ObjectSetText("QuarterF____", "                                 "+DoubleToString(NormalizeDouble(iEnvelopes(symbol,0,14,0,0,0,3.5,MODE_LOWER,0),4),4)+" TGT (3.14)", 12, "Arial Black", clrBlue);


}

if (Market[0]>0){

ObjectCreate("QuarterD", OBJ_TEXT, 0, Time[0], env_u[0]+.0022); 
                     ObjectSetText("QuarterD", "                                  "+DoubleToString(NormalizeDouble(env_u[0],4),4)+" TGT (0.214)", 12, "Arial Black", clrWhite);
ObjectCreate("QuarterD____", OBJ_TEXT, 0, Time[0], env_u[0]+.0022); 
                     ObjectSetText("QuarterD____", "                                 "+DoubleToString(NormalizeDouble(env_u[0],4),4)+" TGT (0.214)", 12, "Arial Black", clrBlue);

ObjectCreate("QuarterX", OBJ_TEXT, 1, Time[0], 50+.0022); 
                     ObjectSetText("QuarterX", "                                  BULK MARKET", 12, "Arial Black", clrBlack);
ObjectCreate("QuarterX____", OBJ_TEXT, 1, Time[0], 50+.0022); 
                     ObjectSetText("QuarterX____", "                                 BULK MARKET", 12, "Arial Black", clrTeal);
                     

ObjectCreate("QuarterF", OBJ_TEXT, 0, Time[0], iEnvelopes(symbol,0,14,0,0,0,3.5,MODE_UPPER,0)+.0022); 
                     ObjectSetText("QuarterF", "                                  "+DoubleToString(NormalizeDouble(iEnvelopes(symbol,0,14,0,0,0,3.5,MODE_UPPER,0),4),4)+" TGT (0.314)", 12, "Arial Black", clrWhite);
ObjectCreate("QuarterF____", OBJ_TEXT, 0, Time[0], iEnvelopes(symbol,0,14,0,0,0,3.5,MODE_UPPER,0)+.0022); 
                     ObjectSetText("QuarterF____", "                                 "+DoubleToString(NormalizeDouble(iEnvelopes(symbol,0,14,0,0,0,3.5,MODE_UPPER,0),4),4)+" TGT (0.314)", 12, "Arial Black", clrBlue);

                     
}


//ObjectCreate("Quarter_", OBJ_TEXT, 0, Time[0], AxelU[0]+.0014); 
//if (iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,2)<25 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,1)<25 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)<25 && Close[0]<iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,0)+200*Point) 
//                     ObjectSetText("Quarter_", "                                 "+DoubleToString(NormalizeDouble(AxelU[0],4),4)+" NO SELL ZONE", 12, "Arial Black", clrNONE);
//                     else ObjectSetText("Quarter_", "                                 "+DoubleToString(NormalizeDouble(AxelU[0],4),4)+" SELL ZONE 1", 12, "Arial Black", clrNavy);

//ObjectCreate("Quarter", OBJ_TEXT, 0, Time[0], AxelL[0]+.0002); 
//                     ObjectSetText("Quarter", "                                 "+DoubleToString(NormalizeDouble(AxelL[0],4),4)+" BUY ZONE 1", 12, "Arial Black", clrNavy);



//ObjectCreate("Quarter__", OBJ_TEXT, 0, Time[0], AxelHU[0]+.0014); 
//if (iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,2)<25 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,1)<25 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)<25 && Close[0]<iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,0)+200*Point) 
//ObjectSetText("Quarter__", "                                 "+DoubleToString(NormalizeDouble(AxelHU[0],4),4)+" SELL ZONE 2", 12, "Arial Black", clrCrimson);
//                     else ObjectSetText("Quarter__", "  NO SHORTING BEYOND         "+DoubleToString(NormalizeDouble(AxelHU[0],4),4), 12, "Impact", clrGreen);

//ObjectCreate("Quarter___", OBJ_TEXT, 0, Time[0], AxelHL[0]+.0002); 
//if (iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,2)>75 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,1)>75 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)>75 && Close[0]>iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,0)-400*Point) 
//ObjectSetText("Quarter___", "  DOUBLE BUY          "+DoubleToString(NormalizeDouble(AxelHL[0],4),4), 12, "Arial Black", clrGreen);
//else                 ObjectSetText("Quarter___", "                                 "+DoubleToString(NormalizeDouble(AxelHL[0],4),4)+" NO BUY ZONE", 12, "Arial Black", clrNONE);



//ObjectCreate("Quarter_1___", OBJ_TEXT, 0, Time[0], iBands(symbol,0,18,2,4,PRICE_LOW,MODE_LOWER,0)+.0002); 
//if (iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,2)>75 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,1)>75 && iStochastic(symbol,0,18,3,3,MODE_SMA,1,MODE_SIGNAL,0)>75 && Close[0]>iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,0)-400*Point) 
//ObjectSetText("Quarter_1___", "  TRIPLE BUY          "+DoubleToString(NormalizeDouble(iBands(symbol,0,18,2,4,PRICE_LOW,MODE_LOWER,0),4),4), 12, "Arial Black", clrGreen);
//else                 ObjectSetText("Quarter_1___", "                                 "+DoubleToString(NormalizeDouble(iBands(symbol,0,18,2,4,PRICE_LOW,MODE_LOWER,0),4),4)+" NO BUY ZONE", 12, "Arial Black", clrNONE);


deletetxt1("DENTURE");

  ObjectCreate("DENTURE"+4,OBJ_LABEL,0, 0,0);
  if (Close[0]>iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,0))
    ObjectSetText("DENTURE"+4,"2.5: "+NormalizeDouble(iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,5,0))-2500*Point,4),11,"Arial Black");
else ObjectSetText("DENTURE"+4,"2.5: "+NormalizeDouble(iLow(symbol,0,iLowest(symbol,0,MODE_LOW,5,0))+2500*Point,4),11,"Arial Black");    
  ObjectSet("DENTURE"+4,OBJPROP_CORNER,3);
    ObjectSet("DENTURE"+4,OBJPROP_XDISTANCE,30);
  ObjectSet("DENTURE"+4,OBJPROP_YDISTANCE,67);
  if (Close[0]<iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,0)) ObjectSet("DENTURE"+4,OBJPROP_COLOR,clrMaroon);
   else ObjectSet("DENTURE"+4,OBJPROP_COLOR,clrBlue);

  ObjectCreate("DENTURE"+5,OBJ_LABEL,0, 0,0);
  if (Close[0]>iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,0))
    ObjectSetText("DENTURE"+5,"3.3: "+NormalizeDouble(iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,5,0))-3300*Point,4),11,"Arial Black");
else ObjectSetText("DENTURE"+5,"3.3: "+NormalizeDouble(iLow(symbol,0,iLowest(symbol,0,MODE_LOW,5,0))+3300*Point,4),11,"Arial Black");    
  ObjectSet("DENTURE"+5,OBJPROP_CORNER,3);
    ObjectSet("DENTURE"+5,OBJPROP_XDISTANCE,30);
  ObjectSet("DENTURE"+5,OBJPROP_YDISTANCE,47);
  if (Close[0]<iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,0)) ObjectSet("DENTURE"+5,OBJPROP_COLOR,clrMaroon);
    else ObjectSet("DENTURE"+5,OBJPROP_COLOR,clrBlue);
    
      ObjectCreate("DENTURE"+6,OBJ_LABEL,0, 0,0);
   if (Close[0]>iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,0))
    ObjectSetText("DENTURE"+6,"4.15: "+NormalizeDouble(iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,5,0))-4150*Point,4),11,"Arial Black");
else ObjectSetText("DENTURE"+6,"4.15: "+NormalizeDouble(iLow(symbol,0,iLowest(symbol,0,MODE_LOW,5,0))+4150*Point,4),11,"Arial Black");    
  ObjectSet("DENTURE"+6,OBJPROP_CORNER,3);
    ObjectSet("DENTURE"+6,OBJPROP_XDISTANCE,30);
  ObjectSet("DENTURE"+6,OBJPROP_YDISTANCE,27);
  if (Close[0]<iMA(symbol,0,21,0,MODE_EMA,PRICE_MEDIAN,0)) ObjectSet("DENTURE"+6,OBJPROP_COLOR,clrMaroon);
    else ObjectSet("DENTURE"+6,OBJPROP_COLOR,clrBlue);


  ObjectCreate("DENTURE"+7,OBJ_LABEL,0, 0,0);
  ObjectSetText("DENTURE"+7,"Echo in 3WKS MAX",11,"Arial Black");    
  ObjectSet("DENTURE"+7,OBJPROP_CORNER,3);
  ObjectSet("DENTURE"+7,OBJPROP_XDISTANCE,30);
  ObjectSet("DENTURE"+7,OBJPROP_YDISTANCE,107);
  ObjectSet("DENTURE"+7,OBJPROP_COLOR,clrBlue);

  ObjectCreate("DENTURE"+8,OBJ_LABEL,0, 0,0);
  ObjectSetText("DENTURE"+8,"3rd/4th WK R1/S1 MIN",11,"Arial Black");    
  ObjectSet("DENTURE"+8,OBJPROP_CORNER,3);
  ObjectSet("DENTURE"+8,OBJPROP_XDISTANCE,30);
  ObjectSet("DENTURE"+8,OBJPROP_YDISTANCE,87);
  ObjectSet("DENTURE"+8,OBJPROP_COLOR,clrBlue);


  ObjectCreate("DENTURE"+9,OBJ_LABEL,0, 0,0);
  ObjectSetText("DENTURE"+9,"4x3 BRK 1st leg 400-500",11,"Arial Black");    
  ObjectSet("DENTURE"+9,OBJPROP_CORNER,3);
  ObjectSet("DENTURE"+9,OBJPROP_XDISTANCE,30);
  ObjectSet("DENTURE"+9,OBJPROP_YDISTANCE,127);
  ObjectSet("DENTURE"+9,OBJPROP_COLOR,clrBlue);


   return(0);
  }
 
   void deletetxt1(string text){
   for(int iObj=ObjectsTotal()-1; iObj >= 0; iObj--){
      string   on = ObjectName(iObj);
      if(StringFind(on, text) == 0)  ObjectDelete(on);
}  }

Sometimes I feel like you are just too good for me.

Feel free to make a donation.

U-Demi Awards

Dementia, suicide, overdose – welcome to the show, as it must go on.

Demi No More

  ////Utmost
            if (RSI[i]>upper2[i] && RSI[i]>72 && High[i]>iBands(symbol,0,30,2,0,PRICE_MEDIAN,MODE_UPPER,i)+50*Point && Close[i]<High[i]-30*Point && RSI2[i]>RSI2[i+1] && RSI2[i]>RSI2[i+2] && RSI2[i]>RSI2[i+3] && RSI2[i]>RSI2[i+4] && RSI2[i]>RSI2[i+5] && RSI2[i]>RSI2[i+6]
            ){
               ObjectCreate("Utmost"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], High[i]+890*Point); 
               ObjectSetText("Utmost"+DoubleToStr(i), "U", 34, "Impact",  Purple);
               udir[i]=-1;
            }
            if (RSI[i]<lower2[i] && RSI[i]<30 && RSI[i]>22 && Low[i]<iBands(symbol,0,30,2,0,PRICE_MEDIAN,MODE_LOWER,i) 
            && iBands(symbol,0,30,2,0,PRICE_MEDIAN,MODE_UPPER,i)-iBands(symbol,0,30,2,0,PRICE_MEDIAN,MODE_LOWER,i)>1500*Point 
             && Close[i]>Low[i]+50*Point  && RSI2[i]<RSI2[i+1] && RSI2[i]<RSI2[i+2] && RSI2[i]<RSI2[i+3] && RSI2[i]<RSI2[i+4] 
            && RSI2[i]<RSI2[i+5] && RSI2[i]<RSI2[i+6]){
               ObjectCreate("Utmost"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], Low[i]-40*Point); 
               ObjectSetText("Utmost"+DoubleToStr(i), "U", 34, "Impact",  Purple);
               udir[i]=1;
            }
 ObjectCreate("Singendex"+DoubleToStr(i), OBJ_TEXT, 1, Time[i], 68);
   if ( udir[i]>0) ObjectSetText("Singendex"+DoubleToStr(i), CharToStr(110), 9, "Wingdings", clrChartreuse);  
   else if (udir[i]<0) ObjectSetText("Singendex"+DoubleToStr(i), CharToStr(110), 9, "Wingdings", clrCrimson);  
   else ObjectSetText("Singendex"+DoubleToStr(i), " ", 9, "Wingdings", clrYellow); 
   ObjectSetInteger(0,"Singendex"+DoubleToStr(i),OBJPROP_BACK,1);

Higher for longer w/ something a whole lot stronger.

You won’t find literature anywhere about continuation divrgences, I named them that. Divergence and reverse divergence never made any sense in my mind, since they do not come with any direction by default.

Keep on exploring new horizons, such as what is a divergence and what isn’t. A taper can be upgraded (purple) by the wind arriving from the direction of the Green River. This is how I knew that I would need to take the next continuation divergence seriously and associate the next logical exit for any divergence.

This is where price ended up catching up with the Stratosphere line: 1.0553

I got hedged in at 1.05985 right after the daily re-balancing. I use the stop loss filed as a code to inform my routines which EMA displacement to target for in real time.


/////Long Target - Code 45 AXEL H STRATOSPHERE

if( OrderType()==OP_BUY && OrderStopLoss()==.45 && OrderTakeProfit()!=NormalizeDouble(iMA(symbol,30,64,0,MODE_EMA, PRICE_MEDIAN,0)+450*Point,4) && OrderOpenPrice()<NormalizeDouble(iMA(symbol,30,64,0,MODE_EMA, PRICE_MEDIAN,0)+450*Point,4)-30*Point
 ) 
       { OrderModify(OrderTicket(), OrderOpenPrice(), OrderStopLoss(), NormalizeDouble(iMA(symbol,30,64,0,MODE_EMA, PRICE_MEDIAN,0)+450*Point,4), OrderExpiration());
          Print("LONG Target Set to AXEL H-S @ "+DoubleToStr(NormalizeDouble(iMA(symbol,30,64,0,MODE_EMA, PRICE_MEDIAN,0)+450*Point,4),4));}

/////Short Target  - Code 45 AXEL H STRATOSPHERE

if( OrderType()==OP_SELL && OrderStopLoss()==4.5 && OrderTakeProfit()!=NormalizeDouble(iMA(symbol,30,64,0,MODE_EMA, PRICE_MEDIAN,0)-450*Point,4) && OrderOpenPrice()>NormalizeDouble(iMA(symbol,30,64,0,MODE_EMA, PRICE_MEDIAN,0)-450*Point,4)+30*Point
 ) 
     {  OrderModify(OrderTicket(), OrderOpenPrice(), OrderStopLoss(), NormalizeDouble(iMA(symbol,30,64,0,MODE_EMA, PRICE_MEDIAN,0)-450*Point,4), OrderExpiration());
           Print("SHORT Target Set to AXEL H-S @ "+DoubleToStr(NormalizeDouble(iMA(symbol,30,64,0,MODE_EMA, PRICE_MEDIAN,0)-450*Point,4),4));  }   

What does high volatility mean? That things turn on the high burn.

What happens when the S3/R3 gets violated by more than a Fluctuation Maxiumum (instrument dependent)? Cap sizing of the trend. The next swing high is going to be a lower high.

Wave 1 Violates S3/R3 -> potential target for Wave 2: 14-sample weekly window envelope

Could you not get s lower low around the Sunday open? Sure you could, but that would make no difference to the U print.

Jack of all tardes

You’re once, twice, three times a maybe.

Just like this guy, you don’t have to do things the same way everyone else does:

You can choose to specialize instead of believing that you are good enough to trade anything that can be charted.

// MFI Hedger by Macdulio 

#include <stdlib.mqh>
extern double mfiup = 100;
extern double mfidn = 0;
extern int magic_number = 11;
extern int magic_number2 = 12;

#property copyright "by Macdulio in 2023" 
#property link      "https://forexfore.blog" 
#property description "MFI 30-min Hedger"  

int profits;

  double nakedshorts[];
  double nakedlongs[];
  
  double open_price2;
  double stop_loss_price2;
  double take_profit_price2;
  

 double OrderOpenPrice;
 double OrderProfit;
  string symbol = Symbol();   
int init() {
   return(0);
}

int deinit() {
  return(0);
}

int start() {

  
int i, counter;
int counted_bars=IndicatorCounted();
int longcount, shortcount;
double nlongs;
double nshorts;
double longaveragebuffer;
double shortaveragebuffer;
int order_type;
  
profits = 0;
 int hstTotal=OrdersHistoryTotal();

 counter = 0;

 // Print("Ratio = ", Ratio);

 for(i=OrdersTotal()-1; i>=0 ; i--)
 {   
   
   if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false)
        { 
           Print("Access to orders list failed with error (",GetLastError(),")");
           break;
        }
          // if ( Symbol()=="EURUSD" && OrderStopLoss()==0 ) {
          // Print("OderProfit: ", OrderProfit());
          
          //Print("AB:",AccountBalance()*-1*.025);
             if (OrderType() == OP_BUY) 
             {
               nlongs = nlongs+OrderLots();
               longcount = longcount+1;
               longaveragebuffer = longaveragebuffer+(OrderOpenPrice()*OrderLots()); 
                  
             }  
               
             if (OrderType() == OP_SELL )
             {
               nshorts = nshorts+OrderLots(); 
               shortcount = shortcount+1;         
               shortaveragebuffer = shortaveragebuffer+(OrderOpenPrice()*OrderLots()); 
             }
         // }
   }
   
   if (nlongs!=nshorts){
   
   
   double comparison = AccountEquity()/AccountBalance();
   
 //   Print("comparison = ", comparison);


              
              

  // Full Hedge for shorts
  if (nlongs<nshorts && iMFI(symbol,30,14,0)<mfidn) {
  
    open_price2 = NormalizeDouble(Ask, Digits);
    stop_loss_price2 = NormalizeDouble(0.00,Digits);
    take_profit_price2 = NormalizeDouble(0,Digits);

 for (i = OrdersTotal() - 1; i >= 0; i--)

      if (OrderSelect(i, SELECT_BY_POS))
        if (OrderMagicNumber() == magic_number2) {
          order_type = OrderType();
          if (order_type == ORDER_TYPE_BUY) {
            if ((NormalizeDouble(OrderOpenPrice(), Digits) != open_price2) || (NormalizeDouble(OrderStopLoss(), Digits) != stop_loss_price2) || (NormalizeDouble(OrderTakeProfit(), Digits) != take_profit_price2)) {
              if (!OrderModify(OrderTicket(), open_price2, stop_loss_price2, take_profit_price2, OrderExpiration()))
                Print("Error: ", ErrorDescription(_LastError));
                
            }
            break;
          }
          else if (order_type == ORDER_TYPE_BUY)
            break;
        }
    if (i < 0)
      if (OrderSend(symbol, OP_BUY,  NormalizeDouble(nshorts-nlongs,2), open_price2, 3, stop_loss_price2, take_profit_price2, magic_number2+" MFI HEDGER BUY 0/0",  magic_number2) < 0)
        
               Print("Error: ", ErrorDescription(_LastError));
  }
  else
    for (i = OrdersTotal() - 1; i >= 0; i--)

      if (OrderSelect(i, SELECT_BY_POS))
        if (OrderMagicNumber() == magic_number2 )
          if (OrderType() == ORDER_TYPE_BUY_STOP)
            if (!OrderDelete(OrderTicket()))
              Print("Error: ", ErrorDescription(_LastError));              
              
 
              
              
              
              
// Full Hedge For Longs
 if (nshorts<nlongs && iMFI(symbol,30,14,0)>mfiup) {
  
    open_price2 = NormalizeDouble(Bid, Digits);
    stop_loss_price2 = NormalizeDouble(0,Digits);
    take_profit_price2 = NormalizeDouble(0,Digits);
    for (i = OrdersTotal() - 1; i >= 0; i--)
      if (OrderSelect(i, SELECT_BY_POS))
        if (OrderMagicNumber() == magic_number2) {
          order_type = OrderType();
          if (order_type == ORDER_TYPE_SELL) {
            if ((NormalizeDouble(OrderOpenPrice(), Digits) != open_price2) || (NormalizeDouble(OrderStopLoss(), Digits) != stop_loss_price2) || (NormalizeDouble(OrderTakeProfit(), Digits) != take_profit_price2)) {
              if (!OrderModify(OrderTicket(), open_price2, stop_loss_price2, take_profit_price2, OrderExpiration()))
                Print("Error: ", ErrorDescription(_LastError));
            }
            break;
          }
                    else if (order_type == ORDER_TYPE_SELL)
            break;
        }
    if (i < 0)
      if (OrderSend(symbol, OP_SELL, NormalizeDouble(nlongs-nshorts,2), open_price2, 3, stop_loss_price2, take_profit_price2, magic_number2+" MFI HEDGER SELL 0/0", magic_number2) < 0)
        Print("Error: ", ErrorDescription(_LastError));
  }
  else
    for (i = OrdersTotal() - 1; i >= 0; i--)
      if (OrderSelect(i, SELECT_BY_POS))
        if (OrderMagicNumber() == magic_number2)
          if (OrderType() == ORDER_TYPE_SELL_STOP)
            if (!OrderDelete(OrderTicket()))
              Print("Error: ", ErrorDescription(_LastError));              
 
 

        
  return(0);
}
}

E-21 in white

Way too oversold stochastic, good enough RSI2 for a capsize. 330-360 pips bounce.

Hound Of Dogs

L’ Ingredientes (from the banqueting research department)

30-min chart

240 Sample BB in Cadet Blue

45-pip displacements of the E-32 (hourly) E-64 on the 30 min in White (aka Stratosphere lines)

14-sample Money Flow

can add E-414 band aka Green River (approx 9-day EMA)

The warm up (to the conclusion that there are 3 different divergences that matter) for one person

Every revesal divergence (excluding tapers) requires a move beyond the startosphere line.

When not outside both the 120 sample BB, that is an early interruption, intervention the sign of aggression. Buying around the Green River is a dead Giveaway.

The Pound of Flesh above had some Eggs Over Helium included beyond the Stratosphere line, a complete meal & a match ball.

Reversal divergences come with a measuring leg and one or more divergent legs.

On the next image spot the magenta and the cyan divergences.

The Magenta is one form of the “45” divergences. It is not red. because the money flow does not make it to 2/3 of the way in the opposite direction (from the overbough to the oversold i.e. <33 read) between the measuring and the divergent leg.

The cyan divergence is the big bow (total span from white to white), when above the Green River it may be an early bird entry.

The continuation divergences are where you should commit the bigger money. I use the two Maroon interrupted lines to know when a pullback went too far on the money flow.

Below showing the anticipation of a continuation divergence and a break of of one (after a target fill at the middlle BB).

There is a taper into the cyan field above adding to / Rounding Up the Early, Magenta Divergence to a Red One.

The Red Reversal Divergence is the Real Deal. Commit extra amount of money at the continuation divergence that follows the reversal.

You can certainly ignore any threat that was made before the Red Continuation Divergence prints.

If there is a Pound of Flesh beyond the Startosphere line, there is a Ton of Flesh to be had beyond the Ionosphere Line, which is the 87-pip displacement of the same E-64.

Next image:

Pound of Flesh on the downside, on the upside and commitments in the shape of continuation divergences. As long as the highs stay lower ones, you can simply add on.

The last image comes with the broken Big Bow divergence (below the Green River) and a Magenta Early Divergence. I am looking for the continuation divergence here for a Pound of Flesh. The line is in place, waiting for the gap down / move lower.

This is how you survive in this market.

Weekly S3 reached & held, target 14-sample weekly Window Envelope in Blue.


      if (push[i+1] && Close[i+1]<iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i+1) && Low[i]<Low[i+1] && i>0 && Low[i]<Low[i-1]){
          ObjectCreate("Miles"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], Low[i]-40*Point); 
          ObjectSetText("Miles"+DoubleToStr(i), "D", 29, "Webdings", clrMagenta);
          house[i]=true;
      }
      if (push[i+2] && Close[i+2]<iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i+1)  && (Low[i+1]>Low[i+2] || Low[i]<Low[i+1] )){
          ObjectCreate("Miles"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], Low[i]-40*Point); 
          ObjectSetText("Miles"+DoubleToStr(i), "D", 29, "Webdings", clrMagenta);
         house[i]=true;
      }
    if (push[i+1] && Close[i+1]>iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i+1) && High[i]>High[i+1] && i>0 && High[i]>High[i-1]){
          ObjectCreate("Miles"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], High[i]+1170*Point); 
          ObjectSetText("Miles"+DoubleToStr(i), "D", 29, "Webdings", clrMagenta);
         house[i]=true;
      }
      if (push[i+2] && Close[i+2]>iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i+1) && (High[i+1]<High[i+2] || High[i]>High[i+1]) ){
          ObjectCreate("Miles"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], High[i]+1170*Point); 
          ObjectSetText("Miles"+DoubleToStr(i), "D", 29, "Webdings", clrMagenta);
         house[i]=true;
      }
        if (push[i+3] && Close[i+3]>iMA(symbol,0,21,0,MODE_EMA, PRICE_MEDIAN,i+2) && (High[i]>High[i+1] && High[i+1]>High[i+2]) ){
          ObjectDelete("Miles"+DoubleToStr(i+1));
          ObjectCreate("Miles"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], High[i]+1170*Point); 
          ObjectSetText("Miles"+DoubleToStr(i), "D", 29, "Webdings", clrMagenta);
         house[i+1]=false;
         house[i]=true;
      }

Shadow Painter

What’s common with Peter Reznicek, Jesus and the band called Hoobastank?

Horton Hears a Ho. Hoobastank is phonetic for Whose Butt Stank? Jesus H. Christ & the “h” pattern that is hard to break lower out of – according to the Shadow Trader.

I guess, this joke didn’t “h” well.

An “h” pattern is an ABC move with the 3rd leg undercutting the 1st leg by a little putting an end to the move in the direction.

What do you see when you are looking at that continuation lower high with the enormous wick to the 19 EMA? A major rejection?

I see a low volume high speed runway ready for take off (Chickpeas).

What about here, what about now?

How about a liquidity grab with a Wave 2 getting folded back on itself – to raid the dirt box as I always say it.

Show me how you do that trick

When you work as a Compositor / Cameraman (in an imitation 3D production) half of your time is gonna be spent with applying and animating shadows.

In the wall thrown shadows scene I used Trapcode Shine for the distortions and built the mask script with After Effects. It is stunning how complicated a simple looking scene can get. Good thing I always loved to build logical circuits. I’m showing you this to give an insight to the difficulties of making cartoons. Not even going to mention multiplaning here.

Other than the cartoon thing all of my jobs were of hard physical labor. People keep me for my strength. If only they knew…

I’ve noticed that indians & alien technology sells, so how about Chingachgook & Shinkanzen for a new comic book idea?

Cherokees & Cherry Coke. Nemo & Geronimo.

New company logo

Ramalama ping-pong. Upper Guard Rail (1x Fluctuation Max stretch), Lower Guard Rail (3 times in a row). Sweet Child of Mine, where do we go now?

…Crack! So much for the idea of the “h”.

Anywho, there’s the big bow with the full arch between the measuring and the divergent leg.

Current &

Prior example

Yes, headed for the Cyan Box

…with some delay. The 15% Fiboacci Extension is at 1.0636. 1.0615 is the weekly S3.

All we need is a faith healer…

I’ve been talking about a low 1.06xx target since the 28th of January.

Mirror Horror

I said to look for 3 factals outside the 30-sample BB.

B and T are two. The question is the location of the last fractal.

I do not think that the opening 4H candle is not going to take away the pending privilege from the low made 5 hours before the close, yet that could be a phony print. Explain? The spread would get cranked up for the pre hours, and since this is a bid chart, you may not be able to cover in gains, as the ask would stay relatively unchanged.

The mirror part. When the low was made, there were 5 legs up. Two corrective structures and a total of 3 4H fractals outside the BB.

B, T and T.

One actually fell a bit shy of the band, thus it was colored Teal. Teal hints a return to the mean, which is either the S30 or the E32. On the first chart this was the E-32.

The similarities: after the fractal gets finalized (may take 12 hours if there is a new low in the first 4 hours), 5 waves would be considered spent.

Differences: the total move up from the bottom was faster and got further. 470 pips to be exact.

With this, the R3 was violated by 45+ pips on the upside and there was no new low made afterwards. The current move is at 365 pips and has been trickling much slower, with less conviction. Even after the capsizing event, price mustered to go back to the dirt box at the end of the original Wave 2 for liquidity.

Mirroring the idea, the dirt box starts at 1.09396, and that is if this is not going to go on to start making new highs, which should be an open possibility without the capsize beat below the 1.0617 S3 by at least 45 pips.

I’m getting book deep into the divergences as you saw before, and I believe two good divergences should make this bottom solid for now, and the weekly S3 won’t be reached.

I believe that the exodus from the Dollar is not over yet.

All of the max pain levels are higher than this price until the middle of March.

Since I have already used Sandra’s Mirrored In Your Eyes here before, here’s Sandra’s voice in an Enigma song instead.

Pro weekly volume candle support + E-59 the separator of the two markets just below.

Instantly Delayed Gratification

I’ve been thinking of the time when the English are sick to death of flavour.

It’s ok, I’m allowed to say things like this, I’m British. Would you like a cucumber sandwich for tea?

Not sure why it took me forever to come around to typical prices. I now see divergences in an entirely new light.

The boxes are continuation divergences, the lines are reversals.

The first, Magenta is what I call an early divergence. There is no deep enough valley between the peaks, but there is a steep divergence.

The yellow divergences are not good enoug to be called divergences, they are tapers.

What is likely to happen after the early divergence print is that the market falls into a zigzag cycle.

The zigzags are ABC moves that are going to be going on until a real reversal divergence shows up – red line. A real reversal has one of its leg in the overbought / oversold and price trips over the startosphere line (white).

The actuality of course is the early divergence print today.

Pushing some more Stive Morgan. The guy has a thousand colors.