Rank: Advanced Member
Groups: Registered, Registered Users, Subscribers Joined: 10/29/2004(UTC) Posts: 1,394 Location: Glastonbury, CT
Was thanked: 2 time(s) in 2 post(s)
|
Per1:=Input("max length",1,100,8);
RWH:=(H-Ref(L,-Per1))/(ATR(Per1)*Sqrt(Per1));
RWL:=(Ref(H,-Per1)-L)/(ATR(Per1)*Sqrt(Per1));
Pk:=Mov(Mov((RWH-RWL),3,W),3,S);
KCD:=PK-Mov(PK,8,S);
MN:=Mov(KCD,Per1,S);
SD:=Stdev(KCD,Per1);
Val1:=If(MN+(1.33*SD)>2.08,MN+(1.33*SD),2.08);
Val2:=If(MN-(1.33*SD)<-1.92,MN-(1.33*SD),-1.92);
LN:=If(Ref(KCD,-1)>=0 AND KCD>0,Val1,If(Ref(KCD,-1)<=0 AND KCD<0,Val2,0));
Red:=If(Ref(KCD,-1)>KCD,KCD,0);
Green:=If(KCD>Ref(KCD,-1),KCD,0);
Red;Green;LN;
The values of red and green are the KCD.
It is just for a display,
You will have to change the colors, once the indicator is plotted, using the color bar, select one rising line and color it green and then change the style to plot as a histogram.
Once you have finished aranging your chart, save it as a template
|