DMISTOCHASTIC for Amibroker (AFL)
arunremanan about 10 years ago Amibroker (AFL)
It is trading technique using the directional movement index
and stochastic. Got it from some website that I do not remember now
Indicator / Formula
Copy & Paste Friendly
DMISTOPer = Param("DMISTOPer", 10,2,100,1);
STOPer23= Param("STOPer23", 3,2,10,1);
SMAPer= Param("SMAPer", 27,3,100,1);
BuyLevel= Param("BuyLevel", 9,2,20,1);
ShortLevel= Param("ShortLevel", 85,80,98,1);
DD= PDI(DMISTOPer )-MDI(DMISTOPer);
HV=HHV(DD,DMISTOPer);
LV=LLV(DD,DMISTOPer);
KFast = 100*(DD-LV)/(HV-LV);
KSlow= MA(KFAST,StoPer23);
pctD= MA(KSlow,StoPer23);
Buysig=Cross(KSLOW,PCTD) AND (C>MA(C,SMAPER)) AND (PCTD<BuyLEVEL);
SHORTSIG=Cross(PCTD,KSLOW) AND (C<MA(C,SMAPER)) AND (PCTD>BuyLEVEL);
Plot(KSlOW,"%KSlow", colorBlue, styleLine | styleThick);
Plot(pctd,"%DSlow", colorViolet, styleLine | styleThick);
Plot(Buylevel,"Buylevel", colorGreen, styleLine | styleThick);
Plot(Shortlevel,"Shortlevel", colorRed, styleLine | styleThick);
IIf (Buysig==1, PlotShapes(shapeUpTriangle*Buysig,colorBrightGreen), 0);
IIf (shortsig==1, PlotShapes(shapeDownTriangle*Shortsig,colorRed), 0);1 comments
Leave Comment
Please login here to leave a comment.
I tested your formula in Amibroker V. 6.10.0 and give me “WARNING” in Line # 9, and not permitt to process it.
9 KFast = 100*(DD-LV)/(HV-LV);
WARNING 505. Division by zero. Divisor array at 11 is equal zero.
I will appreciate you correcting your interesting formula
Thank you very much