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

Goldfish Dynamic Heikin Ashi for Amibroker (AFL)
Ilyas
over 8 years ago
Amibroker (AFL)

Rating:
3 / 5 (Votes 6)
Tags:
amibroker, Heiken Ashi

This is a Heikin Ashi Indicator with Moving Averages of open and close. Beautiful Indicator.

Indicator / Formula

Copy & Paste Friendly
SetChartBkGradientFill( ParamColor("BgTop", colorBlack),ParamColor("BgBottom", colorBlack),ParamColor("Titleblock",colorLightGrey )); 
SetChartOptions(0,chartShowArrows|chartShowDates);
GraphXSpace=5;
p=Param("Period",6,2,30,1);
Om=MA(O,p);
hm=MA(H,p);
lm=MA(L,p);
Cm=MA(C,p);
HACLOSE=(Om+Hm+Lm+Cm)/4;
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(), colorWhite, styleCandle | styleNoLabel );
//GOLD FISH INTRADAY TRADING SYSTEM 
//By Abdul,realsenseindia@yahoo.com
//good for Equity, F&O, Currency and mcx.
//visit my website for suitable trading strategy for this Indicator.
k=MA(C,6)*0.04/100;
ab=(MA(H,Param("EF",39,6,100,1,0))+k);
ba=(MA(L,Param("EF",39,6,100,1,0))-k);
Plot(ab,"",colorBlue,styleLine);
Plot(ba,"",colorBlue,styleLine);
Color=IIf(C>ab,colorGreen,IIf(C<ba,colorRed,colorLightGrey));
//Plot(C,"",color,styleCandle|styleThick);

function Momentum( array, period )
{
  return array - Ref( array, -period );
}


XXX=Momentum(C,10);




Buy=xxx>0 AND C>ab;Short=xxx<0 AND C<ba;

Buy=ExRem(Buy,Short);
Short=ExRem(Short,Buy);
PlotShapes(IIf(Buy,shapeUpArrow,shapeNone) ,colorBrightGreen);

PlotShapes(IIf(Short,shapeDownArrow,shapeNone),colorRed);


 
_SECTION_END();



_SECTION_BEGIN("Heiken Ashi Smoothed");
SetChartBkGradientFill( ParamColor("BgTop", colorBlack),ParamColor("BgBottom", colorBlack),ParamColor("Titleblock",colorLightGrey )); 
SetChartOptions(0,chartShowArrows|chartShowDates);
GraphXSpace=5;
p=Param("Period",6,2,30,1);
Om=MA(O,p);
hm=MA(H,p);
lm=MA(L,p);
Cm=MA(C,p);
HACLOSE=(Om+Hm+Lm+Cm)/4;
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(), colorWhite, styleCandle | styleNoLabel );
_SECTION_END();
Line=ParamToggle("Show Line chart also","Hide|Show",0);
if(Line==1) {
Plot(C,"Close",colorWhite,styleLine);
}


a=LinearReg(HaClose, 5 ) ;
b=LinearReg( HaClose, 5 ) ;

Plot( IIf(HaHigh>HaOpen,a,b), _DEFAULT_NAME(), colorRed, ParamStyle("Style") ); 

Plot( LinearReg( HaOpen, 5 ), _DEFAULT_NAME(), colorWhite, ParamStyle("Style") );

_SECTION_BEGIN("kgs 12 26 ma buy sell");


a=MA(C,3) ;
b=MA(C,15) ;

Buy = Cross( a,b );
Sell = Cross( b,a );
//Short = Sell;
//Cover = Buy;

//AlertIf( Buy, "", "MA cross BUY", 1,1+2 );

//AlertIf( Sell, "", "MA cross SELL", 2 ,1+2);

PlotShapes( shapeUpTriangle*Buy, colorWhite, 0, L, -10 );
PlotShapes( shapeDownTriangle*Sell, colorRed, 0, H, -10 );
_SECTION_END();



_SECTION_BEGIN("Magnified Market Price");
//by Vidyasagar, vkunisetty@yahoo.com//
FS=Param("Font Size",30,30,100,1);
GfxSelectFont("Arial", FS, 900, italic = False, underline = False, True );
GfxSetBkMode( colorWhite );
GfxSetTextColor( ParamColor("Color",colorYellow) );
//Hor=Param("Horizontal Position",800,800,800,800);

Hor=Param("Horizontal Position",20,20,500,20);




Ver=Param("Vertical Position",50,50,250,50);
GfxTextOut(""+C,Hor , Ver );
YC=TimeFrameGetPrice("C",inDaily,-1);
DD=Prec(C-YC,2);
xx=Prec((DD/YC)*100,2);
GfxSelectFont("Arial", 12, 700, italic = False, underline = False, True );
GfxSetBkMode( colorWhite );
GfxSetTextColor(ParamColor("Color",colorYellow) );
GfxTextOut(""+DD+" ("+xx+"%)", Hor+5, Ver+45 );
_SECTION_END();




_SECTION_BEGIN("Price Line");


PriceLevel = ParamField("PriceField", field = 3 ); 

Daysback = Param("Bars Back",100,10,500,1); 
FirstBar = BarCount - DaysBack; 
YY = IIf(BarIndex() >= Firstbar,EndValue(PriceLevel),Null); 




side = Param("side",1,0,1000,1);

dist = 0; 

for( i = 0; i < BarCount; i++ ) 
{ 
if(i+side== BarCount) PlotText( "\n " + PriceLevel[ i ], i, YY[ i ]-dist[i], colorLightBlue ); 
} 


_SECTION_END();

_SECTION_BEGIN("Price1");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
//Plot( C, "Close", ParamColor("Color", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); 
_SECTION_END();

5 comments

1. rahuldnayak9

excellent

2. rahuldnayak9

what time frame for banknifty n crudeoil

3. rajenvyas

Future Referencing one

4. vikas1moon

very nice high accuracy with 1 hour chart and for better result use it with macd

5. trade12

very nice.

Leave Comment

Please login here to leave a comment.

Back