Stock Portfolio Organizer
The ultimate porfolio management solution.
WiseTrader Toolbox
#1 Selling Amibroker Plugin featuring:
Ocean NDX NXC for Amibroker (AFL)
this AFL is just Modified AFL of Ocen Theory Posted Here with differnt AFL….!
i have tried of cross over & found very good result….!
thnx to wildeazoscar………!
for NSE use Defolt 75 Period
for MCX use 162 Periods according to Ocean Theory…..!
as starts @ 10A.M. & ends @ 11:30 P.M. so 162 bar during trading Sesson….!
so have to use 5 min Time Frame………
Screenshots
Similar Indicators / Formulas
Indicator / Formula
_SECTION_BEGIN("@Ocean NDX");
NDX_period = Param("NDX Period",75,40,375);
NDX_SmLen = round(NDX_Period*20/40);
SumWght = 0;
SumDnom = 0;
for(i = 1; i < NDX_period+1; i++)
{
DifAry = ln(Ref(Close,-i+1)) - ln(Ref(Close,-i));
if(i == 1)
DnomAry = abs(DifAry);
else
DnomAry =DNomAry+ abs(DifAry);
FracAry =IIf(DNomAry==0, 0,(ln(Close) - ln(Ref(Close,-i))) / DnomAry);
TimeAry = 1 / (i^( 0.5));
WghtAry = FracAry * TimeAry;
SumWght =SumWght+ WghtAry;
SumDnom =SumDnom+ TimeAry;
}
RawNDX = 100 * SumWght / SumDnom;
TemaNDX= TEMA(RawNDX,NDX_SmLen);
Plot(TemaNDX,"NDX",colorRed,styleLine);
_SECTION_END();
_SECTION_BEGIN("@Ocean NXC");
NDX_period = Param("NDX Period",75,40,375);
NDX_SmLen = round(NDX_Period*20/40);
NST_period = round(NDX_Period*20/40);
NST_SmLen = round(NDX_Period*10/40);
SumWght = 0;
SumDnom = 0;
for(i = 1; i < NDX_period+1; i++)
{
DifAry = ln(Ref(Close,-i+1)) - ln(Ref(Close,-i));
if(i == 1)
DnomAry = abs(DifAry);
else
DnomAry =DNomAry+ abs(DifAry);
FracAry =IIf(DNomAry==0, 0,(ln(Close) - ln(Ref(Close,-i))) / DnomAry);
TimeAry = 1 / (i^( 0.5));
WghtAry = FracAry * TimeAry;
SumWght =SumWght+ WghtAry;
SumDnom =SumDnom+ TimeAry;
}
RawNDX = 100 * SumWght / SumDnom;
TemaNDX= TEMA(RawNDX,NDX_SmLen);
SumWgt = 0;
SumDnm = 0;
for(i = 0; i <NST_period+1; i++)
{
if(i < 2)
{
HghAry = High;
LowAry = Low;
}
HghAry = HHV(High, i);
LowAry=LLV(Low,i);
RngAry = HghAry - LowAry;
FrcAry =IIf(RngAry==0, 0,(Close- LowAry) / RngAry);
TmeAry = 1 / ((i+1)^(0.5));
WgtAry = TmeAry * FrcAry;
SumWgt =SumWgt+ WgtAry;
SumDnm =SumDnm+ TmeAry;
}
RawNST = Nz((200 * SumWgt / SumDnm) - 100);
TemaNST= TEMA(RawNST,NST_SmLen);
NAvg = (abs(TemaNDX) * TemaNST + abs(TemaNST) * TemaNDX) / 2;
Nsign= IIf(NAvg>0,1,IIf(NAVG<0,-1,0));
NXC =round(Nsign * sqrt(abs(NAvg)));
Plot(NXC,"NXC",colorBlue,styleLine);
_SECTION_END();
Buy=Cross(NXC,TemaNDX);
Sell=Cross(TemaNDX,NXC);
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);
PlotShapes(Buy*shapeUpTriangle,colorPaleGreen,0);
PlotShapes(Buy*shapeSmallUpTriangle,colorGreen,0);
PlotShapes(Sell*shapeDownTriangle,colorOrange,0);
PlotShapes(Sell*shapeSmallDownTriangle,colorBrown,0);2 comments
Leave Comment
Please login here to leave a comment.
Back
for NCDX use Period 84 !
I AM INTERESTED IN THE CHART IN THE SCREEN SHOT. WHERE IS IT AVAILABLE FOR DOWNLOAD?