TRV:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),12);" S0 v6 k, F8 r+ w* x F- A: \8 s
HD :=HIGH-REF(HIGH,1);
& F; i% g- l% X8 z- bLD :=REF(LOW,1)-LOW;
. Z0 D. W6 b' a pDMP:=EMA(IF(HD>0 and HD>LD,HD,0),12);
: _- Z9 _7 s1 R4 A& u9 YDMM:=EMA(IF(LD>0 and LD>HD,LD,0),12);% @7 j+ ]8 m- a& e- k& y7 \
PDI:= DMP*100/TRV;
) B6 s- w/ t9 `2 h( XMDI:= DMM*100/TRV;, {* K$ E% A; j" O6 F
ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,2);
' p% Y" @. S/ `8 [( Y, GADXR:=EMA(ADX,2);1 V. w8 r7 w1 N, {
8 m& F& ?) h" K/ n% w: O! o2 T' _
adxsc:=cross(adxr,adx) and pdi>ref(pdi,1);% k7 i4 r. q$ K4 Z
B2 Q6 d% T/ l1 m0 g7 \) hRSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;9 }, ?& _* _& h: @, o
K:=SMA(RSV,3,1);! [: y. [, n5 B# I# [
D:=SMA(K,3,1);2 S& ?( A: s7 i) c V8 Y$ c
J:=3*K-2*D;" r9 P1 K8 x6 e% U. _* [
2 Q- |6 y( k) B J9 g ]. v# njj:=cross(j,k);
% K" a! m5 Y0 {# R$ R! B" q- R+ `# L
vv:=count(v=2 and ref(v,1)=llv(v,3) and v>ref(v,1);
* U% W# @0 i3 F8 C: b. X2 Q
% S6 ?! R/ ^$ V% g ?ma3:=ma(c,3);ma5:=ma(c,5);
: V2 {1 O2 D" C7 _/ Hpl:=abs(ma3-ma5)/ma3*100ma3 and adxsc and jj and pl |