Stock Portfolio Organizer

The ultimate porfolio management solution.

Shares, Margin, CFD's, Futures and Forex
EOD and Realtime
Dividends and Trust Distributions
And Much More ....
For Portfolio Manager Click Here

WiseTrader Toolbox

#1 Selling Amibroker Plugin featuring:

Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Find Out More Here

For Intraday Trading for Amibroker (AFL)
over 8 years ago
Amibroker (AFL)

4 / 5 (Votes 10)
trading system, amibroker

This indicaror given by my friend & its giving good result in
intraday trading…so plz first check from your side…do back testing &
if u satisfy then ENJOY TRADING….Thx

•Entry Rules

Going Long

When the lowest TF (For example 15 min) bar turns from red to blue we are alert of an impending reversal. When the bar of the next higher time frame changes from red blue we get a confirmation of the trend change. This is the time to enter. If the still higher TF bar changes from red to blue we get the confirmation the current move is strong. If the highest TF bar also changes from red to blue we are in a strong move.


When the lowest time frame color change from blue to red we are alerted that that current move may end. Confirmation come in terms of the next higher TF bar also changes from blue to red. Then we exit the trade.

There is also a riskier approach. When all the four TF are blue (meaning the move is strong) and the reversal occurs we wait till three lower TFs to change color blue to red. Here the peak drawdown could be huge.

Going short and exits

The exact conditions mentioned above for long but the color change from blue to red.

Also note the HA bars themselves give many clues to the state of the move. long bars with long shadows indicate strength. Small bars with small shadows indicate weak moves

Similar Indicators / Formulas

EMA crossover
Submitted by Ketan-0 over 10 years ago
Kase Peak Osc. V2 batu
Submitted by batu1453 almost 7 years ago
Kase CD V2batu
Submitted by batu1453 almost 7 years ago
Submitted by prashantrdx almost 7 years ago
buy and sell two EMAS
Submitted by mundo0007 about 9 years ago
Adaptive Price Zone (APZ)
Submitted by AndrewThomas over 10 years ago

Indicator / Formula

Copy & Paste Friendly

Title = ("" + Name()+" " + Date() +" "+Interval(2) +" "+ EncodeColor(colorLime)+",Open "+Open +" ,High "+H+" ,Low "+L+" ,Close "+C+" "+"{{VALUES}}");

per1=Param("First Period",6,2,30,1);
per2=Param("Second Period",2,2,30,1);


HaOpen = AMA( Ref( HaClose, -1 ), 0.5 );
HaHigh = Max( Hm, Max( HaClose, HaOpen ) );
HaLow = Min( Lm, Min( HaClose, HaOpen ) );
//PlotOHLC( HaOpen, HaHigh, HaLow, HaClose, "" + Name(), colorBlack, styleCandle | styleNoLabel );


PlotOHLC( Of, Hf, Lf, Cf, "" + Name(), colorGreen, styleCandle | styleNoLabel );





_SECTION_BEGIN("Background text");
C13=Param("fonts",20,10,30,1 );
C14=Param("left-right",2.1,1.0,5.0,0.1 );
C15=Param("up-down",12,1,20,1 );
Miny = Status("axisminy");
Maxy = Status("axismaxy");
lvb = Status("lastvisiblebar");
fvb = Status("firstvisiblebar");
pxwidth = Status("pxwidth");
pxheight = Status("pxheight");
GfxSelectFont("Tahoma", Status("pxheight")/C13 );
GfxSetTextAlign( 6 );
GfxSetTextColor( ColorRGB (217,217,213));
GfxTextOut( Name(), Status("pxwidth")/C14, Status("pxheight")/C15 );
GfxSelectFont("Tahoma", Status("pxheight")/C13*0.5 );
GfxSetTextColor( ColorRGB (103,103,103));
GfxSelectFont("Tahoma", Status("pxheight")/C13*0.5 );
GfxSetTextColor( ColorRGB (103,103,103));
GfxSelectFont("MS Sans Serif", 10, 500, False, False, 0);
_SECTION_BEGIN("Background Color");
BKswitch = ParamToggle("Background Color","On,Off");

OUTcolor = ParamColor("Outer Panel Color",colorLightBlue);
INUPcolor = ParamColor("Inner Panel Upper",colorLightYellow);
INDNcolor = ParamColor("Inner Panel Lower",colorSeaGreen);
TitleColor = ParamColor("Title Color ",ColorRGB(245,245,245));

if (NOT BKswitch)
SetChartBkColor(OUTcolor); // color of outer border
SetChartBkGradientFill(INUPcolor,INDNcolor,TitleColor); // color of inner panel

/*1. Here are some observations to keep in mind that will help assure
you are in a good trending move which is detrimental to the success 
of the trade moving higher before the inevitable over exhausted trend.
2 Consider only going long on the 5M if the 30M (two rows above) is also blue.

3 Consider the 1hr row as well being blue since it has an effect too.

4 The 15M row has to be blue with NO exceptions

5 The 30M row if blue has less effect on the trade as compared to the 15M row 
but keep this in mind. The 30M row being blue helps the 15M row continue to stay blue. 

6 The 1hr row has even less effect OR importance but it too keeps the 30M 
from weakening to some minor degree. 
// Define label bar (x) position location

blankRightBars = 5; //insert actual blank right bars specified in Preferences 
barsInView = Status("lastvisiblebarindex") - Status("firstvisiblebarindex") - blankRightBars;
Offset = Param("Offset Bar", 0.95, 0, 1, 0.01);
textOffset = BarCount - (Offset * barsInView);

HaClose =EMA((O+H+L+C)/4,3); 
HaOpen = AMA( Ref( HaClose, -1 ), 0.5 ); 
HaHigh = Max( H, Max( HaClose, HaOpen ) ); 
HaLow = Min( L, Min( HaClose, HaOpen ) );
PlotText("Heinkein 4T tf :"+Interval(2), textoffset, 41.01, colorYellow);

Color = IIf( Haopen > Haclose,4, IIf( Haopen == Haclose,colorYellow, 6));
Plot(10,"", Color,  styleHistogram+styleThick|styleOwnScale|styleNoLabel, 0, 100 );
Plot( 11,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );

Compress2= Param("Compression",2,1,3,1); 
TimeFrameSet(Compress2* Interval());
HaClose2 =EMA((O+H+L+C)/4,3); 
HaOpen2 = AMA( Ref( HaClose2, -1 ), 0.5 ); 
HaHigh2 = Max( H, Max( HaClose2, HaOpen2 ) ); 
HaLow2 = Min( L, Min( HaClose2, HaOpen2 ) ); 
PlotText("Heinkein 4T tf :"+Interval(2), textoffset, 41.055, colorYellow);
HAopen2f=TimeFrameExpand( Haopen2, Compress2* Interval()); 
Haclose2f=TimeFrameExpand( Haclose2, Compress2* Interval()); 
HaHigh2f=TimeFrameExpand( Hahigh2, Compress2* Interval());
HaLow2f=TimeFrameExpand( Halow2, Compress2* Interval());
Color2 = IIf( Haopen2f > Haclose2f,4, IIf(Haopen2f == Haclose2f,colorYellow, 6));
Plot(20,"", Color2,  styleHistogram+styleThick|styleOwnScale|styleNoLabel, 0, 100 );
Plot( 21,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );

Compress3= Param("Compression3",4,2,6,1); 
TimeFrameSet(Compress3* Interval());
HaClose3 =EMA((O+H+L+C)/4,3); 
HaOpen3 = AMA( Ref( HaClose3, -1 ), 0.5 ); 
HaHigh3 = Max( H, Max( HaClose3, HaOpen3 ) ); 
HaLow3 = Min( L, Min( HaClose3, HaOpen3 ) ); 
PlotText("Heinkein 4T tf :"+Interval(2), textoffset,41.10, colorYellow);
HAopen3f=TimeFrameExpand( Haopen3, Compress3* Interval());  
Haclose3f=TimeFrameExpand( Haclose3, Compress3* Interval()); 
HaHigh3f=TimeFrameExpand( Hahigh3, Compress3* Interval());
HaLow3f=TimeFrameExpand( Halow3, Compress3* Interval());
color3 = IIf( Haopen3f > Haclose3f,4, IIf( Haopen3f == Haclose3f,colorYellow,6));
Plot(30,"", Color3,  styleHistogram+styleThick|styleOwnScale|styleNoLabel, 0, 100 );
Plot( 31,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );

Compress4= Param("Compression4",8,2,10,1); 
TimeFrameSet(Compress4* Interval());
HaClose4 =EMA((O+H+L+C)/4,3); 
HaOpen4 = AMA( Ref( HaClose4, -1 ), 0.5 ); 
HaHigh4 = Max( H, Max( HaClose4, HaOpen4 ) ); 
HaLow4 = Min( L, Min( HaClose4, HaOpen4 ) ); 
PlotText("Heinkein 4T tf :"+Interval(2), textoffset, 41.14, colorYellow);
HAopen4f=TimeFrameExpand( Haopen4, Compress4* Interval());  
Haclose4f=TimeFrameExpand( Haclose4, Compress4* Interval());
HaHigh4f=TimeFrameExpand( Hahigh4, Compress4* Interval());
HaLow4f=TimeFrameExpand( Halow4, Compress4* Interval());
Color4 = IIf( Haopen4f > Haclose4f,4, IIf( Haopen4f == Haclose4f ,colorYellow, 6));
Plot(40,"", Color4,  styleHistogram+styleThick|styleOwnScale|styleNoLabel, 0, 100 );
Plot( 41,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );
_N(Title = "{{NAME}} - {{INTERVAL}} {{DATE}} "+_DEFAULT_NAME()+" : {{OHLCX}} {{VALUES}}" );


1. anandnst

Good n helpful.

2. varadan

Very Good

3. ravinderg911


4. vputcha

Thanks for sharing the AFL. I did test it in 15-minute in a range bound market and the scrip being Nifty future of Feb.14. The result appears to be pleasing as it has less whipsaws compared to other AFL. May be if being feasible a buy or sell signal may be incorporated (while not a necessity). Please do talk with your friend who was good enough to share this AFL through you to us, and let us know the recommended time frame for intraday purpose please.

Vishnu Vandana

5. suvo1987

Sir, can you please add color changing option for Blue and Red histograms..??

6. dexige4194


Leave Comment

Please login here to leave a comment.