// Downloaded From https://www.WiseStockTrader.com
SetChartOptions(0,chartShowArrows|chartShowDates);

_SECTION_BEGIN("DEMA BUY");
Cond1 = DEMA(  Close , 5 ) > DEMA(  Open , 36 ); 
Cond2 = DEMA(  Close , 7 ) > DEMA(  Open , 36 );
Cond3 = DEMA(  Close , 9 ) > DEMA(  Open , 36 );
Cond4 = DEMA(  Close , 11 ) > DEMA(  Open , 36 ); 
Cond5 = DEMA(  Close , 13 ) >  DEMA(  Open , 36 );

Cond6= DEMA(  Close , 5 ) < DEMA(  Open , 21 ); 
Cond7= DEMA(  Close , 7 ) < DEMA(  Open , 21 ); 
Cond8= DEMA(  Close , 9 ) < DEMA(  Open , 21 ); 
Cond9= DEMA(  Close , 11 ) < DEMA(  Open , 21 ); 
Cond10= DEMA(  Close , 13 ) < DEMA(  Open , 21 );
 
Buy =  Cond1 AND Cond2 AND Cond3 AND Cond4 AND Cond5;
Sell =  Cond6 AND Cond7 AND Cond8 AND Cond9 AND Cond10;
 
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);

PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorGreen, 0, L, Offset=-20);
PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorLime, 0,L, Offset=-30);
PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorWhite, 0,L, Offset=-25);
PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorOrange, 0, H, Offset=20);
PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorGreen, 0,H, Offset=30);
PlotShapes(IIf(Sell, shapeDownArrow, shapeNone),colorWhite, 0,H, Offset=-25);


dist = 3*ATR(10);
dist1 = 3*ATR(10);
for( i = 0; i < BarCount; i++ ) 
{ 
 if( Buy[i] ) 
 {
  PlotText( "\nBuy@:" + C[ i ], i, C[ i ]-dist[i], colorGreen, colorDarkOliveGreen );
 }
 if( Sell[i] )
 {
  PlotText( "Sel@:" + C[ i ], i, C[ i ]+dist1[i], colorRed, colorDarkOliveGreen ); 
 }
 
}
 _SECTION_END();
 
 _SECTION_BEGIN("DEMA SELL");

Cond11 = DEMA(  Close , 5 ) < DEMA(  Open , 36 ); 
Cond12 = DEMA(  Close , 7 ) < DEMA(  Open , 36 );
Cond13 = DEMA(  Close , 9 ) < DEMA(  Open , 36 );
Cond14 = DEMA(  Close , 11 ) < DEMA(  Open , 36 ); 
Cond15 = DEMA(  Close , 13 ) < DEMA(  Open , 36 );



Cond16= DEMA(  Close , 5 ) > DEMA(  Open , 21 ); 
Cond17= DEMA(  Close , 7 ) > DEMA(  Open , 21 ); 
Cond18= DEMA(  Close , 9 ) > DEMA(  Open , 21 ); 
Cond19= DEMA(  Close , 11 ) > DEMA(  Open , 21 ); 
Cond20= DEMA(  Close , 13 ) > DEMA(  Open , 21 );
 
Buy =  Cond16 AND Cond17 AND Cond18 AND Cond19 AND Cond20;
Sell =  Cond11 AND Cond12 AND Cond13 AND Cond14 AND Cond15;
 
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);

PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorGreen, 0, L, Offset=-20);
PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorOrange, 0,L, Offset=-30);
PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorWhite, 0,L, Offset=-25);
PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorRed, 0, H, Offset=20);
PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorOrange, 0,H, Offset=30);
PlotShapes(IIf(Sell, shapeDownArrow, shapeNone),colorWhite, 0,H, Offset=-25);

dist = 3*ATR(10);
dist1 = 3*ATR(10);
for( i = 0; i < BarCount; i++ ) 
{ 
 if( Buy[i] ) 
 {
  PlotText( "\nCov@:" + C[ i ], i, C[ i ]-dist[i], colorGreen, colorDarkOliveGreen );
 }
 if( Sell[i] )
 {
  PlotText( "Sht@:" + C[ i ], i, C[ i ]+dist1[i], colorRed, colorDarkOliveGreen ); 
 }
 
}

 _SECTION_END(); 

 _SECTION_BEGIN("DEMA COLOR");
 
Cond1 = DEMA(  Close , 5 ) > DEMA(  Open , 36 ); 
Cond2 = DEMA(  Close , 7 ) > DEMA(  Open , 36 );
Cond3 = DEMA(  Close , 9 ) > DEMA(  Open , 36 );
Cond4 = DEMA(  Close , 11 ) > DEMA(  Open , 36 ); 
Cond5 = DEMA(  Close , 13 ) >  DEMA(  Open , 36 );

Cond11 = DEMA(  Close , 5 ) < DEMA(  Open , 36 ); 
Cond12 = DEMA(  Close , 7 ) < DEMA(  Open , 36 );
Cond13 = DEMA(  Close , 9 ) < DEMA(  Open , 36 );
Cond14 = DEMA(  Close , 11 ) < DEMA(  Open , 36 ); 
Cond15 = DEMA(  Close , 13 ) < DEMA(  Open , 36 );

CondA=  Cond1 AND Cond2 AND Cond3 AND Cond4 AND Cond5;
CondB=  Cond11 AND Cond12 AND Cond13 AND Cond14 AND Cond15;
BarColor  = IIf(CondA,colorGreen,IIf(CondB,colorRed,colorWhite));
 
Plot( C, "Close", BarColor, styleNoTitle | ParamStyle("Style") |
GetPriceStyle() );

GraphXSpace=10;
 
 _SECTION_END();