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

best accuresy for Amibroker (AFL)

Copy & Paste Friendly
_SECTION_BEGIN("MA Diff");
T=26;
KMA=((C-MA(C,T))/MA(C,T))*100;
Graph0=KMA;
Graph0Style=2+4;
Graph0BarColor=IIf(KMA>0,5,4);
GraphXSpace=5;

_SECTION_END();


SetChartBkColor(colorGrey40);
cx=Param("cxposn",1000,0,1000,1);
cy=Param("cyposn",6,0,1000,1);

GfxSetBkColor(ColorRGB(200,50,300));
GfxSelectFont( "Bodoni MT",18,98, False);
GfxSetTextColor( colorWhite); 
GfxTextOut(" "+C+" ", cx, cy );
_SECTION_BEGIN("Name");
GfxSetOverlayMode(1);
GfxSelectFont("Tahoma", Status("pxheight")/20);
GfxSetTextAlign( 6 );// center alignment
GfxSetTextColor( ColorHSB( 10, 300, 20 ) );
GfxSetBkMode(0); // transparent
GfxTextOut( Name(), Status("pxwidth")/2, Status("pxheight")/20 );

GfxSelectFont("Tahoma", Status("pxheight")/22);
GfxTextOut( "SUBHAS801", Status("pxwidth")/8, Status("pxheight")/8 );


//GfxSelectFont("Tahoma", Status("pxheight")/10 );
//GfxSelectFont("Tahoma", Status("pxheight")/26 );
_SECTION_END();
e30 = EMA(Close,240);
f30 = EMA(Close,20);
Plot(EMA(Close,20),"fine2",colorBrightGreen,styleDots);
Plot(EMA(Close,240),"fine3",colorWhite,styleDots);



_SECTION_BEGIN("trend candle");
////////////////////////////////////
// Heikin_Ashi For Amibroker
////////////////////////////////////

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 ) );
PlotOHLC( Open, High, Low, Close, "Modified " + Name(), colorBrown, styleCandle | styleNoLabel );
//SetChartBkGradientFill( ParamColor("BgTop", colorBrightGreen),ParamColor("BgBottom", colorSeaGreen));
Title="";
_SECTION_END();

Buy = Cross(f30, e30); 
Sell = Cross(e30, f30 );
AlertIf( Cross( f30,e30), "SOUND C:\\Windows\\Media\\Ringin.wav", "BUY-STRONG SIGNAL stockxray", 2 );
AlertIf( Cross( e30, f30 ), "SOUND C:\\Windows\\Media\\Ringin.wav","SELL-STRONG SIGNAL stockxray", 2 );

_SECTION_BEGIN("MABIUTS");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 )) ));

Buy=EMA(C,13)>EMA(EMA(C,13),9) AND Cross (C,Peak(C,5,1));
Sell=Cross (EMA(EMA(C,13),9),EMA(C,13));
MYcolor = IIf( EMA(C,13)>EMA(EMA(C,13),9) AND C>Peak(C,2,1), colorGreen, IIf(EMA(C,13)>EMA(EMA(C,13),9) AND C<Peak(C,2,1),colorBlue, colorBrown ));

//PlotOHLC( Open, High, Low, Close, "", Mycolor, styleBar );

shape = Buy * shapeHollowStar + Sell * shapeHollowStar;
PlotShapes( shape, IIf( Buy, colorGreen, colorRed ),0, IIf( Buy, Low, High ) );

GraphXSpace = 5;
dist = 1.5*ATR(10);

for( i = 0; i < BarCount; i++ )

if( Buy[i] )
//PlotText( "Buy\n@" + C[ i ], i, L[ i ]-dist[i], colorGreen );
if( Sell[i] )
//PlotText( "Sell\n@" + C[ i ], i, H[ i ]+dist[i], colorRed);



_SECTION_END();

//P = ParamField("Price field",-1);
//Periods = Param("Periods", 89, 2, 300, 1, 10 );
//Plot( WMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") ); 
//m = 0;

_SECTION_BEGIN("WMA89");
P = ParamField("Field");
Type = ParamList("Type", "Weighted,Simple,Exponential,Double Exponential,Tripple Exponential,Wilders");

Periods89 = Param("Periods89", 89, 2, 300 ); 
Displacement2 = Param("Displacement2", 2, -50, 50 );
//Plot( WMA( P, Periods89 ), _DEFAULT_NAME(), colorBlue, styleStaircase+styleLine, 0, 0, Displacement2 );

_SECTION_END();

//P = ParamField("Price field",-1);
//Periods = Param("Periods", 89, 2, 300, 1, 10 );
//Plot( WMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") ); 
//m = 0;

_SECTION_BEGIN("Volume At Price");
//PlotVAPOverlay( Param("Lines", 300, 100, 1000, 1 ), Param("Width", 5, 1, 100, 1 ), ParamColor("Color", colorCycle ), ParamToggle("Side", "Left|Right" ) | 4*ParamToggle("Z-order", "On top|Behind", 1 ) );

_SECTION_END();


//Displacement = Param("Displacement", 1, -50, 50 );

//m = 0;


_SECTION_END();
Pivot	=	ParamToggle("Pivot_day", "No|Yes", 1);

if(Pivot)
{
H1= TimeFrameGetPrice("H", inDaily, -1);	 // yesterdays high
L1 = TimeFrameGetPrice("L", inDaily, -1);	 //	 low
C1= TimeFrameGetPrice("C", inDaily, -1);	 //	 close
Op = TimeFrameGetPrice("O", inDaily)-1;	 // current day open

}
else
{
H1 = TimeFrameGetPrice("H", inDaily);	 // yesterdays high
L1 = TimeFrameGetPrice("L", inDaily);	 //	 low
C1= TimeFrameGetPrice("C", inDaily);
Op = TimeFrameGetPrice("O", inDaily);	 // current day open

}


// PIVOT Calculation
PP = (H1+ L1 +L1 + C1 )/4;
PPA = (H1+ H1 +L1 + C1 )/4;
Plot(PP, "best up",colorBlack,4+8+2048 );
Plot(PPA, "best down",colorBlack,4+8+2048 ); 
//Plot( (H1),"HH",colorBrown,4+8+2048);
//Plot( (L1),"LL",colorAqua,4+8+2048);

_SECTION_END();
//---- pivot points 
DayH = TimeFrameGetPrice("H", inDaily, -1);// yesterdays high 
DayL = TimeFrameGetPrice("L", inDaily, -1);//low 
DayC = TimeFrameGetPrice("C", inDaily, -1);//close 
DayO = TimeFrameGetPrice("O", inDaily);// current day open 
HiDay = TimeFrameGetPrice("H", inDaily); 
LoDay = TimeFrameGetPrice("L", inDaily); 

R2 = Prec(DayC+(DayH-DayL)*0.382,4);
R3 = Prec(DayC+(DayH-DayL)*0.618,4);
R4 = Prec(DayC+(DayH-DayL),4);
S2 = Prec(DayC-(DayH-DayL)*0.382,4);
S3 = Prec(DayC-(DayH-DayL)*0.618,4);
S4 = Prec(DayC-(DayH-DayL),4);
rcolor = colorLightBlue; 
scolor = colorLightBlue; 

style = styleLine | styleThick + styleNoRescale;

Plot(R2, "UP Trg 1",rcolor,style);
Plot(R3, "UP Trg 2",rcolor,style); 
Plot(R4, "UP Trg 3",rcolor,style); 


Plot(S2, "DWN Trg1",scolor,style); 
Plot(S3, "DWN Trg2", scolor, style); 
Plot(S4, "DWN Trg3", scolor, style); 




DDayO = TimeFrameGetPrice("O", inDaily);// current day open 
DHiDay = TimeFrameGetPrice("H", inDaily); 
DLoDay = TimeFrameGetPrice("L", inDaily); 

Title = "" + Name() + ", " + Interval(2) + ", " + Date() + 
EncodeColor(colorPink) + "\nO " + EncodeColor(colorYellow) + O + 
EncodeColor(colorPink) + ", H : " + EncodeColor(colorBrightGreen) + H + 
EncodeColor(colorPink) + ", L : " + EncodeColor(colorRed) + L + 
EncodeColor(colorPink) + ", C : " + EncodeColor(colorWhite) + C +
"\n DLY-OPEN : " +DDayO + " Day-High : " +DHiDay + " Day-LOW : " + DLoDay +
"\n"+ " Stoploss: " +e30 ;
//PlotOHLC( Open, High, Low, Close, "", barcolor1, styleLine+styleNoLabel|styleThick+styleCandle );
Back