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 ....
Find Out More Here

WiseTrader Toolbox

#1 Selling Amibroker Plugin featuring:

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

NIFTYTIGER'S MAGIC LINES for Amibroker (AFL)

Rating:
3 / 5 (Votes 8)
Tags:
trading system, amibroker, oscillator

Go with buy and sell arrows and ejoy.

Similar Indicators / Formulas

Rahul Mohindar Oscillator (RMO)
Submitted by kaiji about 8 years ago
Trending Wave 2 System
Submitted by Dryden almost 6 years ago
Price Oscillator
Submitted by ariful_islam over 7 years ago
Stochastic
Submitted by expert over 7 years ago
STOCH RSI CROSSOVER
Submitted by sonia.b almost 6 years ago
CCI ZERO CROSS WITH ALERT
Submitted by thanigay2k over 4 years ago

Indicator / Formula

Copy & Paste Friendly
       
 _SECTION_BEGIN("SIROC");

_SECTION_BEGIN("Background");
	SetChartOptions(0,chartShowArrows|chartShowDates);
	SetChartBkColor(ParamColor("Outer panel",colorCustom6)); 
// color of outer border 
	SetChartBkGradientFill( ParamColor("Inner panel 
upper",colorBlack),ParamColor("Inner panel lower",colorBlack));
	tchoice=Param("Title Selection ",2,1,2,1);
GfxTextOut("NIFTYTIGER'S MAGIC LINES ", 760 , 100);

//////////////////////////////////////////////////////////////////
 
   
// --- Niftytiger's SIROC --- //   
prd1 = Param("First period",36,5,300,1);   
prd2 = Param("Second period",8,1,100,1);   
prdCrs = Param("Crossover",3,1,300,1);   
prd2 = prd2*2-1;   
Src= EMA((C-EMA(C,30)) /(Ref(EMA(C,30),-30)+0.000001),prd1);   
SIROC =100-100/(1   
+IIf(   
EMA(IIf(Src-Ref(Src,-1)<0,-(Src-Ref(Src,-1)),0),prd2)==0, 
1000000,   
EMA(IIf (Src-Ref(Src,-1)>0,Src-Ref(Src,-1),0),prd2)   
/(EMA(IIf(Src-Ref(Src,-1)< 0,-(Src-Ref(Src,-1)),0),prd2)+0.000001)));   
DTrigger = EMA(SIROC,prdCrs);   
Plot(siroc,"siroc",colorBlue,1);   
Plot(dtrigger,"trigger",colorBrown,1);   
Plot(90,"90",colorGrey40,1);   
Plot(10,"10",colorGrey40,1);   
GraphXSpace = 5;   
Buy=Cross(siroc,dtrigger); 
Sell=Cross(dtrigger,siroc);
PlotShapes(IIf(Buy, shapeUpArrow , shapeNone), colorGreen); 
PlotShapes(IIf(Sell, shapeDownArrow , shapeNone), colorRed);      
//--- end --- //   
_SECTION_END();


_SECTION_BEGIN("Stochastic Slow");
periods = Param( "Periods", 20, 1, 200, 1 );
Ksmooth = Param( "%K avg", 12, 1, 200, 1 );
Plot( StochK( periods , Ksmooth), "%K"+_PARAM_VALUES(), ParamColor( "%K color", colorCycle ), ParamStyle("%K style") );
Dsmooth = Param( "%D avg", 10, 1, 200, 1 );
Plot( StochD( periods , Ksmooth, DSmooth ), "%D"+_PARAM_VALUES(), ParamColor( "%D color", colorCycle ), ParamStyle("%D style",styleDashed) );

y0=LastValue(Trough(StochD(periods , Ksmooth, DSmooth ),1,2)); 
y1=LastValue(Trough(StochD(periods , Ksmooth, DSmooth ),1,1)); 
x0=BarCount - 1 - LastValue(TroughBars(StochD(periods , Ksmooth, DSmooth ),1,2));
price_start=Close[x0];
x1=BarCount - 1 - LastValue(TroughBars(StochD(periods , Ksmooth, DSmooth ),1,1)); 
price_end=Close[x1];
Line = LineArray( x0, y0, x1, y1, 0 );
Plot( Line, "Support line", colorBlack );
Buy = y1>y0 AND price_end<price_start;
PlotShapes(shapeUpArrow * Buy, colorGreen,0,Line);

y00=LastValue(Peak(StochD(periods , Ksmooth, DSmooth ),1,2)); 
y11=LastValue(Peak(StochD(periods , Ksmooth, DSmooth ),1,1)); 
x00=BarCount - 1 - LastValue(PeakBars(StochD(periods , Ksmooth, DSmooth ),1,2)); 
price_start1=Close[x00];
x11=BarCount - 1 - LastValue(PeakBars(StochD(periods , Ksmooth, DSmooth ),1,1));
price_end1=Close[x11]; 
Line = LineArray( x00, y00, x11, y11, 0 );
Plot( Line, "Resistance line", colorWhite );
Sell = y11<y00 AND price_end1>price_start1;
PlotShapes(shapeDownArrow * Sell, colorRed,0,Line);


if( Status("action") == actionCommentary )
{
 printf("(Interpretation is not available yet)");
}
_SECTION_END();



       
 

0 comments

Leave Comment

Please login here to leave a comment.

Back