|
TRV:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),12);5 Q" g* d& [" {$ B
HD :=HIGH-REF(HIGH,1);
; ?) y# ?/ M1 d; \/ b; oLD :=REF(LOW,1)-LOW;5 V7 g* V* i6 a! }, H0 R2 [
DMP:=EMA(IF(HD>0 and HD>LD,HD,0),12);
# m) ^- p, r, |# a1 VDMM:=EMA(IF(LD>0 and LD>HD,LD,0),12);0 u6 u6 A" |' H7 S
PDI:= DMP*100/TRV;/ H6 I4 v3 F+ ~
MDI:= DMM*100/TRV;
# R) \3 V& q) f" q, ]2 O1 |' DADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,2);5 Y+ M4 ]3 O. c$ o3 |" }+ ]
ADXR:=EMA(ADX,2);
4 E0 ~% `6 T5 o$ `; l
5 V* T7 U/ t: E3 Jadxsc:=cross(adxr,adx) and pdi>ref(pdi,1);
1 }/ @+ o: [ Y( L& s7 F
" S# q) J. N. p& e% @RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;( R. ` _( q+ s) L5 \
K:=SMA(RSV,3,1);( G/ j% R" Q1 _9 o) Q% t9 h
D:=SMA(K,3,1);+ [' \; H' D; `' N$ ]
J:=3*K-2*D;
6 L. w3 \9 T) Y
0 H" P o4 b7 sjj:=cross(j,k);
0 I# c& {( S; r7 u% |# |1 d: W* A' x
vv:=count(v=2 and ref(v,1)=llv(v,3) and v>ref(v,1);
2 J3 L- J* F' L% V+ O- L! E" ?
! Q0 }. W, |" ?ma3:=ma(c,3);ma5:=ma(c,5);
8 r' J" j9 u; R# W! W1 m! Tpl:=abs(ma3-ma5)/ma3*100ma3 and adxsc and jj and pl |