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

Market Shiksha - Stochastics01 for Amibroker (AFL)

3 / 5 (Votes 3)
amibroker, support, resistance

Just like the Donchians(uses n-days High-Low) or Supertrend(uses ATR or Volatility). This System is based on Stochastic Indicator, to capture Swing Points and Reversal. The System can be used on any TF.

System can be used as Trailing SL in combination to ur current system as it gives u Very Short(Dashed), Medium(Aqua and Lime) and Long Term(Blue and Yellow Trailing Lines) Support & Resistance Levels Extracted from Different Settings of Stochastic. Sometimes, they r in Confluence.

As a Standalone System,, Buy/Short when all three Signals comes in the Same Bar or in Confluence, OR When, at least, two Signals comes in same or Consecutive Bars.
Best is When we have long term intact and Short and Medium term Buy/Short Signals show in Same or Consecutive Bars. Example given in the Screenshot(Circled in Black).

This may not be the Perfect System as there is always room for improvement.
One can add his/her own Targets by calculating the risks.

Criticism is most welcome.


Indicator / Formula

Copy & Paste Friendly
_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", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); 

k= StochK(45,15);
d= StochD(45,15,15);

sh= Cross(k,d);
sl= Cross(d,k);

Hh= HighestSince(sh,H,1);
Ll= LowestSince(sl,L,1);
Hhc= ValueWhen(sl,Hh,1);
Llc= ValueWhen(sh,Ll,1);

x1 = IIf(C>Hhc,1,IIf(C<Llc,-1,0));
y1 = IIf(C<Llc,1,IIf(C>Hhc,-1,0));
x2 = ValueWhen(x1!=0,x1,1);
y2 = ValueWhen(y1!=0,y1,1);
sts = IIf(x2==1,Llc,Null);
str = IIf(y2==1,Hhc,Null);

Buy0= C>Hhc;
Short0= C<Llc;
Buy0= ExRem(Buy0,Short0);
Short0= ExRem(Short0,Buy0);

k1= StochK(5,3);
d1= StochD(5,3,3);
sh1= Cross(k1,d1);
sl1= Cross(d1,k1);

Hh1= HighestSince(sh1,H,1);
Ll1= LowestSince(sl1,L,1);
Hhc1= ValueWhen(sl1,Hh1,1);
Llc1= ValueWhen(sh1,Ll1,1);

x5 = IIf(C>Hhc1,1,IIf(C<Llc1,-1,0));
y5 = IIf(C<Llc1,1,IIf(C>Hhc1,-1,0));
x6 = ValueWhen(x5!=0,x5,1);
y6 = ValueWhen(y5!=0,y5,1);
sts1 = IIf(x6==1,Llc1,Null);
str1 = IIf(y6==1,Hhc1,Null);

Buy1= C>Hhc1;
Short1= C<Llc1;
Buy1= ExRem(Buy1,Short1);
Short1= ExRem(Short1,Buy1);

k2= StochK(15,5);
d2= StochD(15,5,5);

sh2= Cross(k2,d2);
sl2= Cross(d2,k2);

Hh2= HighestSince(sh2,H,1);
Ll2= LowestSince(sl2,L,1);
Hhc2= ValueWhen(sl2,Hh2,1);
Llc2= ValueWhen(sh2,Ll2,1);

x3 = IIf(C>Hhc2,1,IIf(C<Llc2,-1,0));
y3 = IIf(C<Llc2,1,IIf(C>Hhc2,-1,0));
x4 = ValueWhen(x3!=0,x3,1);
y4 = ValueWhen(y3!=0,y3,1);
sts2 = IIf(x4==1,Llc2,Null);
str2 = IIf(y4==1,Hhc2,Null);

Buy2= C>Hhc2;
Short2= C<Llc2;
Buy2= ExRem(Buy2,Short2);
Short2= ExRem(Short2,Buy2);



Leave Comment

Please login here to leave a comment.