TREND VISION for Amibroker (AFL)

chatpurpose

about 8 years ago

Amibroker (AFL)

Histogram based indicator. Rules….
1.colorblue stick on upside — uptrend
2.colorteal stick on upside — uptrend is weak
3.colorred signal on down side — downtrend.
4.colorred signal on upside — uptrend may reverse
5.colorblue stick on downside — uptrend may resume soon.
6.colorteal signal downside — downtrend is weakening.
7.increasing blue sticks on upside — strengthy uptrend.
8.increasing red sticks on down side — strengthy downtrend.
9.check the higher highs of blue sticks and red sticks for overall strength of trend.
10. plum star is only a guide for start of uptrend. judge with other indicators you have.

The ratio of difference of highs and lows with defined pivots is taken. Also, the
sum of positive and negative volumes (sum of volumes on green candles and red candles)
is taken for drawing the histogram.

Hope you like the indicator. Please comment and rate my work.

Screenshots

Indicator / Formula

SetChartBkColor(colorOrange);
P1=(Ref(C,-1)+C+L+H)/4;
P2=Ref(P1,-1);
P3=Ref(P1,-2);

PR=(P1-P2)/P2;
PH=(H-P2)/P2;
PL=(L-P2)/P2;

MYPERIOD=Param("EMA PERIOD",10,5,50);

EPR=EMA(PR,MYPERIOD);
EPH=EMA(PH,MYPERIOD);
EPL=EMA(PL,MYPERIOD);

HL=(PH-PL);

DIV=(EPH+EPL);



M=N=0;
M=IIf(C>Ref(C,-1),(M+V),M);
N=IIf(C<Ref(C,-1),(N+V),N);
P=Sum(M,6);
Q=Sum(N,6);
R=Sum(M,12);
S=Sum(N,12);
T=EMA(M,6);
U=EMA(M,12);
W=PDI()*MACD(5);
X=EMA(W,5);






/*Plot(EPR,"MY PIVOT LINE",colorBlack,styleLine);*/
/*Plot(EPH,"MY HIGHS LINE",colorGreen,styleDots);*/
/*Plot(EPL,"MY LOWS LINE",colorRed,styleLine);*/

/*PlotOHLC(O,H,L,C,"",IIf(C>O,colorGreen,colorRed));*/

MYCOLOR=IIf(R>S*1.3,colorDarkBlue,IIf(R>S,colorTeal,colorRed));



Plot(DIV,"TREND.VISION",MYCOLOR,styleHistogram);

A=LLV(DIV,10);
B=LLV(DIV,30);
D=DIV>Ref(DIV,-1) AND A>B;

Buy=MYCOLOR==colorDarkBlue  AND EMA(DIV,10)>EMA(DIV,20) AND EMA(C,5)< EMA(C,10) AND C>Ref(C,-1);
Sell=MYCOLOR==colorRed;
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);
PlotShapes(Buy*shapeStar,colorPlum,Layer=0,yposition=0,Offset=-12);

4 comments

Leave Comment

Please login here to leave a comment.