TRV:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),12);
$ f' ]& u9 Y& J# YHD :=HIGH-REF(HIGH,1);
' O$ n$ v3 R! w. k/ bLD :=REF(LOW,1)-LOW;
+ U. g9 x k2 A7 H2 @* @DMP:=EMA(IF(HD>0 and HD>LD,HD,0),12);
* B$ `8 I( `& r ~1 d5 dDMM:=EMA(IF(LD>0 and LD>HD,LD,0),12);4 w& m" q9 ]2 }7 U: T( x- d2 x. e
PDI:= DMP*100/TRV;; {: d" j( ~7 [5 K" c* I6 ^8 ~
MDI:= DMM*100/TRV;
$ w! Z6 Y5 w5 W# f( s' ]ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,2);! X9 J( e+ @- @# \
ADXR:=EMA(ADX,2);; x2 S: h9 r0 E% _3 U9 y
; A5 l' N1 b! R k# [! Wadxsc:=cross(adxr,adx) and pdi>ref(pdi,1);
" ~; B/ A$ [$ d
' q5 I7 N z$ R0 G% L/ kRSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;% G" `4 F5 [' ?% M; X! x
K:=SMA(RSV,3,1);
0 [% q* U6 @3 q7 O0 Y; W1 OD:=SMA(K,3,1);6 C c" i4 R7 T2 b
J:=3*K-2*D;' E+ {: _( p& Z. h
; S- H, t0 R9 h l$ z
jj:=cross(j,k);
+ r1 i# i5 \ X$ M. [. ?' ]5 C, f% E5 k
vv:=count(v=2 and ref(v,1)=llv(v,3) and v>ref(v,1);2 L$ W( E+ {! d1 \
* U1 W) m" j; W: h9 V
ma3:=ma(c,3);ma5:=ma(c,5);0 Q4 t" Z, j' P& F( w/ T
pl:=abs(ma3-ma5)/ma3*100ma3 and adxsc and jj and pl |