MFI Geek II

These are theses.

I don’t aim for multiple instruments or multiple time frames.

I’ve been talking about divergences, but market may turn without one.

Introducing the extremes. MFI is charted on a 0-100 scale.

If a median price extreme starts at 12.5, I would put the extreme of a typical price at 8.

The plot thus is an 8-ball.

On the image below there is a reminder on the right hand side for a black eight ball -> crossing over the 8 EMO (hourly denomination) -> going to the 240 SMA.

The 8 EMO is the 8-sample EMA of Opens. I usually have it in 2 different colors. Here the 240 is as the middle line of the 240-BB.

See, there is no certainty to these steps timely manner. A black 8-ball may be restrained from crossing over the magenta 8 EMO, like in this example:

And if you go back to the first image, the last RESET was not all in one direction: the 8-EMO was below whilst the 240 SMA was above (which is what made the divergence print).

  if (mfi[i]<8){
            ObjectCreate("Roe"+DoubleToStr(i), OBJ_TEXT, 2, Time[i], mfi[i]+10); 
            ObjectSetText("Roe"+DoubleToStr(i), CharToStr(147), 12, "WingDings", Black);
    }
    
       if (mfi[i]>92){
            ObjectCreate("Roe"+DoubleToStr(i), OBJ_TEXT, 2, Time[i], mfi[i]-10); 
            ObjectSetText("Roe"+DoubleToStr(i), CharToStr(147), 12, "WingDings", Black);
    }

But this is just one thing that contributes to a reading on a particular time frame.

I also use a 5-sample smoothing over a 2std banded 14 sample HL2 RSI on the 1-hour timeframe.


MFI[i]=iMFI(symbol,0,14,i);
AVG[i]=((MFI[i]+MFI[i+1]+MFI[i+3]+MFI[i+4]+MFI[i+5])/5);

The main problem with these vertical plots is getting the displacement right. For instance, if I take away the 2-point allowance for the Salmon plots (meaning an RSI-print came within 2-points of the 2 STD band), the first plot would be taken away. Yet if I give too much allowance, I may get too many not-so good signals. The MFI average here is the filter for RSI making the low above the money flow average or not.

 if ( RSI[i+1]>AVG[i+1] && RSI[i+1]<lower2[i+1] && !(RSI[i]>AVG[i] && RSI[i]<lower2[i]) && Period()==60){
  ObjectCreate("LOTUS"+IntegerToString(i),OBJ_VLINE,0, Time[i+1], 0);
      ObjectSet("LOTUS"+IntegerToString(i),OBJPROP_COLOR,clrMediumSpringGreen);
      ObjectSet("LOTUS"+IntegerToString(i),OBJPROP_WIDTH,10);
      ObjectSet("LOTUS"+IntegerToString(i),OBJPROP_BACK,1);
 
 }   
   
  if (RSI[i+1]>69 && RSI[i+1]<AVG[i+1] && RSI[i+1]+2>upper2[i+1] && !(RSI[i]<AVG[i] && RSI[i]+2>upper2[i])&& Period()==60){
  ObjectCreate("LOTUS"+IntegerToString(i),OBJ_VLINE,0, Time[i+1], 0);
      ObjectSet("LOTUS"+IntegerToString(i),OBJPROP_COLOR,clrSalmon);
      ObjectSet("LOTUS"+IntegerToString(i),OBJPROP_WIDTH,10);
      ObjectSet("LOTUS"+IntegerToString(i),OBJPROP_BACK,1);
 
 }   

You may not get the exact low or high, but you should be really close to one.

The Q’s were made for the 4 hour, yes, but seem to work here just fine.

        if (iFractals(symbol,0,MODE_UPPER,i) && High[i]<iBands(symbol,0,30,2,0,PRICE_MEDIAN,MODE_UPPER,i) && High[i]>iBands(symbol,0,216,2,0,PRICE_MEDIAN,MODE_UPPER,i) && High[i]==iHigh(symbol,0,iHighest(symbol,0,MODE_HIGH,200,i))){
        ObjectCreate("Telecom"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], High[i]+380*Point); 
         ObjectSetText("Telecom"+DoubleToStr(i), "Q", 44, "Impact",  Crimson);
         udir[i]=0;
      }
   
         if (iFractals(symbol,0,MODE_LOWER,i) && Low[i]>iBands(symbol,0,30,2,0,PRICE_MEDIAN,MODE_LOWER,i) && Low[i]<iBands(symbol,0,216,2,0,PRICE_MEDIAN,MODE_LOWER,i) && Low[i]==iLow(symbol,0,iLowest(symbol,0,MODE_LOW,200,i))){
        ObjectCreate("Telecom"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], Low[i]+180*Point); 
         ObjectSetText("Telecom"+DoubleToStr(i), "Q", 44, "Impact",  Crimson);
         udir[i]=1;
      }

There is no exact scienece here, there are not even right conclusions. There are pushes towards a decision that you can live with for it works off of a lot of variables and filters.

MFI Geek

Like I said, geeky stuff.

You must ask the question, which is the prevailing divergence.

Why? Because until the corresponding continuation divergence sets in and lays out, price movement is safe in the given direction.

I had to figure out what can you be holding for from the continuation entry. Yes, I had the auto hedge clicked on below 16 mfi.

The answer, as it turns out, an entire 5-wave structure. 3 pops on the 30 sample BB (aim 5-pips out),

Stable Diffusion – almost confusion

Hitching a Glitch

This was a German ambition. The wanted to come up with lyrics containing English words only. They did not have to make sense.

I suffer from a rumor

I suffer from a new born

I suffer from a tumor ✓

A strange kind of humor

in regards to dilettante stuff like “my inner soul”, well, unless you have multiple ones, this does not make sense. You don’t have brains either.

Terrific picture, but the arm isn’t connected to the body.

3 hands come standard with stable diffusion, random number of fingers and impossible angles.

Camouflage is an ahead of its time prime specimen.

Great music and total nonsense lyrics.

If you figure out what the above means, you’ll get a Kugel with Strudel.

Or mit ohne fleisch – just the way I ordered my lunch in Stuttgart when I was a performer at the Bunte Bühne’s Gegen Gewalt festival.

This call…

…worked like a zentralhoff spielen.

Y.O.U.R.S.

The Bear Question

…is a fair question.

I have made this suggestion before that a Weekly E-59 HL2 (in Violet) is a good place to look for a market type switch, especially after 3 clean closes on the new side. Yes, things can be this simple…

…but not always are this clean. A major break up and an immediate RSI2 embedding without any gap fill attemt would be hard to miss clues. Remember those 3 horizontal lines.

Time forward. Other times the clues may still work, but the start may turn out to be sluggish and frustrating. The first conclusion that I would like to draw based on the next image is that 3 weeks of closes on the other side is merely a confirmation that the previous market has ended – a gear shift to neutral.

The second thing is the proof of the pudding. Yes, there are basically no closes above the line afterwards, but what is more important is that the first pullback’s high does not get violated. Now, pay attention to the RSI2. The one with the vertical line and circle is the closest approach of the overbought (87.5). I would call that the beginning of the bear market – gear shift. Even then, the next week makes a higher high and fails it with an engulf, but that rebound swing high remains untouched. It took 19 weeks after crossing the line to call the new market in this example.

The next example is an early bird special.

Let’s call the first E-59 violation a question mark. With the higher high the next week this could be deemed neutral. Pay attention to the drop that followed and was unable to go oversold (12.5) no matter how it tried. The confirmation of the new market was therefore an overbought reading with 3 closes above the E-59, and the best entry was below the low of candle 3, as close as you could get a fill to the E-59.

The incubation on the next one was 5-6 weeks with the neutral confirmation being in place first.

What about now? Back at the big debate zone again. Market is neutral after the 3 red count.

There was an embedding attempt on the upside that failed on the 4th week. There was 120 pips tagged on for a fake out before the engulfing. My preferred outcome here would be the mirror image to leave question for the next market type hanging for longer.

Talk about gulfing…

Theory of Reversal

Don’t mind me, I need to jot things down to draw some conclusions and overcome anticipation bias somehow.

What truns price?

MFI Divergence, MFI Coninuation Divergence, MFI Taper* *, Big Bow Divergence and Sudden Volatlity Rise Reversal

  • in the direction away from and outside the E9D
    ** outside excessive volatility – price hasn’t just recently popped the Ionosphere

MFI Divergences requrie the presence of a White Line: MFI oversold / overbought Or a crossing over the Stratosphere line.
There are two kinds, the Real and the Early Divergences.

The Red, Real Divergence may have a span of 36-54 pips between the start and the end of the divergence.

Another form of a Real Divergence would have a bow in excess of 2/3 of the way between the OS and OB lines.

(Less than 4 pips drop from the swing low, but look at the depth – 66+ read on the bow up!)

The Magenta, Early Divergence may a span of 20-36 pips between the start and the end of the divergence.
An Early Divergence can be rounded up to a Real divergence upon a re-visit and add on extra leg.

(20 pips between the Magenta legs)

Respect the reversal divergences as they may have a lasting effect.

An MFI Continuation divergence requires the presence of an MFI Divergence prior for the shoulder reference level to beat.

A succesful MFI Taper (purple) is as powerful and overriding as a Real Divergence. It requires price falling short from the E9D.

A Sudden Volatlity Rise Reversal would have a temporary effect unless accompanied by an MFI divergence.
Consider the halfway mark faliure between the Stratosphere and Ionosphere to be a rather potent Volatility Rise Reversal Signal.

This Purple taper was doomed after price popped the Ionosphere line (Red w/ Yellow in it) on the downside. Franly, I should not even have a mark up for this one. Volatility reversal arrows plus Magenta divergence below.

There should be a leg up from where the MFI drops below / exceeds the Magenta Divergences shoulder marked up by the interrupted line in the indicator window.

Setup:

30-minute chart.

MFI 14-sample HL2

Stratosphere: + or – 45 pips from the E-64 HL2

Ionosphere: + or – 87 pips from the E-64 HL2

E9D: E-414 HL2 High & Low

Arrows:

   if (High[i]>stratou[i] && Close[i]<High[i]-(High[i]-Low[i])*.8 && High[i]-Low[i]>100*Point){
          ObjectCreate("Poe"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], (High[i]+Low[i])/2+150*Point); 
            ObjectSetText("Poe"+DoubleToStr(i), CharToStr(222), 32, "WingDings", Crimson);
     } 
      
    
       if (Low[i]<stratod[i]+50*Point && Close[i]>Low[i]+(High[i]-Low[i])*.8 && High[i]-Low[i+1]>90*Point && iStochastic(symbol,0,120,3,3,MODE_SMA,PRICE_MEDIAN,0,i)<15.5 && iStochastic(symbol,0,120,3,3,MODE_SMA,PRICE_MEDIAN,0,i)>4 && Low[i]>stratod2[i]){
          ObjectCreate("Poe"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], (High[i]+Low[i])/2-60*Point); 
            ObjectSetText("Poe"+DoubleToStr(i), CharToStr(221), 32, "WingDings", DarkGreen);
     } 

Megaphone Mega Fan

Short & sweet this’ll be.

The last mega effect went like that:

Gap to nearby the lower end – cover your directional holdings) at once – scale back in inside the structure in the same direction for up to the middle axle.

Ira always says that a higher high and a lower low is not a trend. There would be a spectacular showing very soon. Weekend incoming.

Obviously, the favored direction would be the continuation of the last move.

I would look at the 14-sample 2.0 std dev window envelope to exit the next leg (either a stall at 1.0464-54 – cyan leg up) or at the 3.5 std dev window envelope at 1.0314 (yellow leg up)

Money Blows

— an absolutely no audience special –

First question: has there been an end of wave weekly swing low lately (in 20 weeks) that did not come off of the 14-sample Window Envelope?

(see arrows)

Second question: is a 38.9 stochacstic reading close enough to 40 to be calling a continuation divergence?

If so, then the C leg merely started a few days back. The Energy curve is printing the first hump, that preceeds the Push and the Echo. I have no name for it yet, but measuring leg was used before, so maybe measuring hump. Both the Push and the Echo would have to arrive with incrementally higher energy hunches, the Push – as mentioned prior – would print a Stab (a quick, linear move appearing as an energy plummet – red verticals) and the Echo would arrive even later with the Desperato / desperate reach (usually a lower low / higher high – green vertical) before this whole ABC structure would come to an end.

Now, Money Flow affairs.

After the Euro peak was mode, the first money flow rebound I marked up in white. I did not quite know what to do with it at the time. I did notice that when money flow had exceeded this reading, that was a perfect continuation entry (red block).

Here we are again with the white bag above my door, money flow rapidly approaching the continuation level. Stochastic is embedded oversold. Notice that the swing high and the money flow high did not coincide, and a lower high could easily show a more overbought level.

37% of the people are net short. I am one of them.

Question #3: have we seen the low?

The red arrows? A recent idea.

    if (High[i]>stratou[i] && Close[i]<High[i]-(High[i]-Low[i])*.8 && High[i]-Low[i]>90*Point){
          ObjectCreate("Poe"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], (High[i]+Low[i])/2+150*Point); 
            ObjectSetText("Poe"+DoubleToStr(i), CharToStr(222), 32, "WingDings", Crimson);
     } 
      
    
       if (Low[i]<stratod[i]+50*Point && Close[i]>Low[i]+(High[i]-Low[i])*.8 && High[i]-Low[i+1]>140*Point && iStochastic(symbol,0,120,3,3,MODE_SMA,PRICE_MEDIAN,0,i)<15.5 && iStochastic(symbol,0,120,3,3,MODE_SMA,PRICE_MEDIAN,0,i)>4 && Low[i]>stratod2[i]){
          ObjectCreate("Poe"+DoubleToStr(i), OBJ_TEXT, 0, Time[i], (High[i]+Low[i])/2-60*Point); 
            ObjectSetText("Poe"+DoubleToStr(i), CharToStr(221), 32, "WingDings", DarkGreen);
     } 

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.