TRV:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),12);
9 p8 [0 f* E) J( n& aHD :=HIGH-REF(HIGH,1);2 t( y% `# O; O1 S$ \* S4 c
LD :=REF(LOW,1)-LOW;/ D {) R1 G& Z
DMP:=EMA(IF(HD>0 and HD>LD,HD,0),12);
0 q5 E1 ?: A- ~" ?3 I7 P5 cDMM:=EMA(IF(LD>0 and LD>HD,LD,0),12);# g) ]7 f6 o1 q5 D# t
PDI:= DMP*100/TRV;
: X0 P$ {. S! ^7 pMDI:= DMM*100/TRV;' l+ D+ U- Y* ~" ? n
ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,2);
3 L' O% m% {( vADXR:=EMA(ADX,2);" t5 E8 p) M* u% b+ \2 S
, [5 W/ V& s7 \" c; [
adxsc:=cross(adxr,adx) and pdi>ref(pdi,1);5 k+ P4 f) { e8 C, f+ X \5 b4 m e
# i( ~0 b3 x3 A( r/ F }RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;$ b1 B8 L" S: L0 M3 }& M
K:=SMA(RSV,3,1);
$ W2 f+ g' a; X+ g( |D:=SMA(K,3,1);
3 ~6 l& z! t0 A# H$ D# M' VJ:=3*K-2*D;1 i. c+ \& Z6 f/ T/ z: D2 V* h" i/ i
# v9 _6 I7 v0 D J5 g. d7 Bjj:=cross(j,k);$ m9 _- J7 ]( e; ]; y- ^- L$ D/ z
) g/ {0 J% r( Jvv:=count(v=2 and ref(v,1)=llv(v,3) and v>ref(v,1);
5 r n6 P( x. t& R, L! g
9 h' m- q1 x3 R3 v0 dma3:=ma(c,3);ma5:=ma(c,5);. w8 @+ ]( b2 d; n; f( L# P+ M# h. p% u
pl:=abs(ma3-ma5)/ma3*100ma3 and adxsc and jj and pl |