TRV:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),12);( h7 I; T% P' w
HD :=HIGH-REF(HIGH,1);
# @) L' \6 U+ u( D& NLD :=REF(LOW,1)-LOW;3 G; H7 p: Z* x! v# k. u- o
DMP:=EMA(IF(HD>0 and HD>LD,HD,0),12);
, n: Z- X; t! P4 A6 dDMM:=EMA(IF(LD>0 and LD>HD,LD,0),12);$ \6 d2 u- d$ V7 O2 o
PDI:= DMP*100/TRV;* X p. _9 K6 z
MDI:= DMM*100/TRV;# [9 Q& a6 @5 J* f
ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,2);
6 l; O" U' [" A, YADXR:=EMA(ADX,2);7 q+ s: l F d8 M" E9 J2 M
$ X$ L& }# p- u, t! N: _adxsc:=cross(adxr,adx) and pdi>ref(pdi,1); K3 ~1 O/ y5 K0 l
- u/ _* I, N, z
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
8 Y! [, w8 ~: b% jK:=SMA(RSV,3,1);
5 u3 b2 m7 a' T# L8 ED:=SMA(K,3,1);
) N* G; F* H5 I5 s1 B! _J:=3*K-2*D;
w: K$ @8 H- g j: n/ z. o& e
7 K+ ~; x* Z" J" Yjj:=cross(j,k);8 a9 m8 M3 @, a3 }
" |% b9 ^/ O% w3 m
vv:=count(v=2 and ref(v,1)=llv(v,3) and v>ref(v,1);
" a& b! @' }0 f* N. t' O( ]; U% @& e. M! ^ @0 u) F7 j* }
ma3:=ma(c,3);ma5:=ma(c,5);' S ?0 u0 O' ~, G! ~
pl:=abs(ma3-ma5)/ma3*100ma3 and adxsc and jj and pl |