TRV:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),12);
4 L/ F- t( ^# R' AHD :=HIGH-REF(HIGH,1);
, \1 z/ r$ r( ILD :=REF(LOW,1)-LOW;
! @- _7 s9 _0 [DMP:=EMA(IF(HD>0 and HD>LD,HD,0),12);
% k3 ^* b" ?5 ?* m {DMM:=EMA(IF(LD>0 and LD>HD,LD,0),12);* m2 M& i& m0 k
PDI:= DMP*100/TRV;
3 W) w4 ]1 I0 hMDI:= DMM*100/TRV;' s! s1 U% L% i" y3 T e! m
ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,2);
* G( {! K# E3 R. cADXR:=EMA(ADX,2);
7 I& u+ }% |9 A6 l5 o2 b
, M3 u1 W& `+ D [5 Xadxsc:=cross(adxr,adx) and pdi>ref(pdi,1);
, q) K0 i' y6 W
J: w0 {$ M2 l# K+ T& Q: [RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
/ u! `' I5 n4 s7 g) q2 H; b+ K! x9 sK:=SMA(RSV,3,1);/ ~9 b. i! B# V
D:=SMA(K,3,1);& i" a8 I! M. X9 x5 T
J:=3*K-2*D;9 E( U9 T' ~6 k4 n
7 w$ }/ X C7 Z. @
jj:=cross(j,k);
3 A9 E1 S( v3 e& _# L- n( ?# l1 X- M: N) L
vv:=count(v=2 and ref(v,1)=llv(v,3) and v>ref(v,1);& Q" v' W m& j" [& a" ^
; j+ C* Z5 W1 u* k0 ?+ mma3:=ma(c,3);ma5:=ma(c,5);1 i+ c9 \8 @4 j. R
pl:=abs(ma3-ma5)/ma3*100ma3 and adxsc and jj and pl |