Join our facebook group for Amibroker afl code discussion https://www.facebook.com/groups/603980776889348

Color Coded Short Term Reversal Signals



Color Coded Short Term Reversal Signals
Color Coded Short Term Reversal Signals




//www.aflcode.com

CPRbuy=O<(L+0.2*(H-L)) AND C>(H-0.2*(H-L)) AND H<Ref(H,-1) AND L<Ref(L,-1) AND C>Ref(C,-1);
CPRsell=O>(L+0.8*(H-L)) AND C<(H-0.8*(H-L)) AND H>Ref(H,-1) AND L>Ref(L,-1) AND C<Ref(C,-1);

/*Hook Reversals*/
HRbuy=O<(L+0.2*(H-L)) AND C>(H-0.2*(H-L)) AND H<Ref(H,-1) AND L>Ref(L,-1);
HRsell=O>(L+0.8*(H-L)) AND C<(H-0.8*(H-L)) AND H<Ref(H,-1) AND L>Ref(L,-1);

/*Island Reversals*/
IRbuy=Ref(L,-2)>Ref(H,-1) AND L>Ref(H,-1); 
IRsell=Ref(H,-2)<Ref(L,-1) AND H<Ref(L,-1);

/*Key Reversals*/
KRbuy=O<Ref(C,-1) AND L<Ref(L,-1) AND C>Ref(H,-1);
KRsell=O>Ref(C,-1) AND H>Ref(H,-1) AND C<Ref(L,-1);

/*Open Close Reversals*/
OCRbuy=O<(L+0.2*(H-L)) AND C>(H-0.2*(H-L)) AND H<Ref(H,-1) AND L<Ref(L,-1) AND C<Ref(C,-1);
OCRsell=O>(L+0.8*(H-L)) AND C<(H-0.8*(H-L)) AND H>Ref(H,-1) AND L>Ref(L,-1) AND C>Ref(C,-1);

/*Pivot Point Reversals*/
PPRbuy=Ref(L,-1)<Ref(L,-2) AND Ref(L,-1)<L AND C>Ref(H,-1);
PPRsell=Ref(H,-1)>Ref(H,-2) AND Ref(H,-1)>H AND C<Ref(L,-1);

Graph0 = Close;
Graph0Style = 128;


GraphXSpace=5;

Graph0BarColor = IIf( CPRbuy, 8, IIf( CPRsell,4,  IIf( HRbuy,10, IIf( HRsell,11, IIf( IRbuy,3,  IIf( IRsell,15, IIf( KRbuy,6,  IIf( KRsell,7,  IIf( OCRbuy,9,  IIf( OCRsell,13,  IIf( PPRbuy,16,  IIf( PPRsell,12, 1 ) ) ) ) ) ) ) ) ) ) ) ) ;


ch= (Close-(Ref(Close,-1)));
chpct=ch/Ref(C,-1)*100;

 
Title =Date()+" "+Name()+" Open"+WriteVal(O)+" High"+WriteVal(H)+" Low"+WriteVal(L)+" Close" + WriteVal(Graph0) + " Previous Close " + WriteVal((Ref(Graph0,-1))) + "Change=" + WriteVal(ch)+" ("+WriteVal(chpct,format=1.2)+"%)";

Previous
Next Post »