|
TRV:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),12);* n: T% L+ S% p4 Q- |' ]
HD :=HIGH-REF(HIGH,1);& }. y% ^+ p2 ?( M
LD :=REF(LOW,1)-LOW;6 [) I8 v, b; Y/ i0 R+ x
DMP:=EMA(IF(HD>0 and HD>LD,HD,0),12);9 a ]! \. S' K ?; O. }( J) j S
DMM:=EMA(IF(LD>0 and LD>HD,LD,0),12);% j0 X: R O& q X/ L4 _$ ?
PDI:= DMP*100/TRV;$ a* {- ?7 W0 U6 k3 P* q
MDI:= DMM*100/TRV;* O$ M. h1 s/ b
ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,2);. d, v3 s8 T, ^
ADXR:=EMA(ADX,2);
. J' C# n/ I5 T% ]
8 h+ |' R; y% {9 Y6 c! nadxsc:=cross(adxr,adx) and pdi>ref(pdi,1);
O" c- w9 A) ?3 X; D5 c% h$ K) W+ B; @1 L* {
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;' f+ q5 r: g: S3 \2 \
K:=SMA(RSV,3,1);# J9 A& ~3 e: d7 S5 u
D:=SMA(K,3,1);. ]( R* g/ ~ H0 a$ K9 E. t6 n
J:=3*K-2*D;
" |* }, z9 c- }! N1 u$ p8 z% R, i j6 q! t' U5 D+ i- C
jj:=cross(j,k);
& M3 b. _& _8 O: J# C/ s O' X. w& n$ I4 N6 h
vv:=count(v=2 and ref(v,1)=llv(v,3) and v>ref(v,1);3 C# K) H5 I+ a1 i
( D4 w6 K+ m" Q2 q, }( ~
ma3:=ma(c,3);ma5:=ma(c,5);% V9 m1 [( U' e. V# e
pl:=abs(ma3-ma5)/ma3*100ma3 and adxsc and jj and pl |