BUY SELL ARROW NEEDED ON PRICE CHART
CONDITION WITH BELOW MENTIONED AFL...
CROSSOVER BUY SELL
I NEED THEM ON PRICE CHART
CONDITION WITH BELOW MENTIONED AFL...
CROSSOVER BUY SELL
I NEED THEM ON PRICE CHART
Code:
_SECTION_BEGIN("Unnamed 3");
period1 = Param( "Period 1", 10, 2, 200, 1 );
period2 = Param( "Period 2", 5, 2, 200, 1 );
/*ZeroLag W%R*/
"========";
GraphXSpace = 3;
R = ((HHV(H,14) - C) /(HHV (H,14) -LLV (L,14))) *-100;
MaxGraph=10;
//Period= 10;
EMA1= EMA(R,period1);
EMA2= EMA(EMA1,period2);
Difference= EMA1 - EMA2;
ZeroLagEMA= EMA1 + Difference;
PR=100-abs(ZeroLagEMA);
Graph0=PR;
MoveAvg=MA(PR,5);
Graph1=MoveAvg;
Graph1Color=colorTan;
Graph0Style=4;
upbar= PR>= MoveAvg AND PR>= Ref(PR,-1) ;
downbar=(PR < MoveAvg) OR PR>= MoveAvg AND PR< Ref(PR,-1) ;
barcolor = IIf( downbar,colorRed, IIf( upbar, colorBrightGreen, 7));
Graph0BarColor = ValueWhen( barcolor != 0, barcolor );
Graph2=30;
Graph3=70;
Graph2Style=Graph3Style=Graph4Style=1;
Graph4Color=2;
Graph2Color=5;
Graph3Color=4;
Graph5=0;
Graph6=100;
Graph5Style=Graph6Style=1;
Graph5Color=Graph6Color=2;
Title=Name()+" < ZeroLag W%R :"+WriteVal(PR)+"%";
_SECTION_END();