|
TRV:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),12);6 t( b g* O% `- H
HD :=HIGH-REF(HIGH,1);
) k! @, k' N5 p5 o/ ?0 A% gLD :=REF(LOW,1)-LOW;
$ e% ~" F% h" m; v5 NDMP:=EMA(IF(HD>0 and HD>LD,HD,0),12);! E6 Z* t$ F6 K* k7 {
DMM:=EMA(IF(LD>0 and LD>HD,LD,0),12);
/ U( p) \! e/ l( E7 x" h2 sPDI:= DMP*100/TRV;
7 S& f8 f( k& W. ]2 AMDI:= DMM*100/TRV;- u6 K& l% ?) Q( Y; Y
ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,2);
2 d. p" J. B0 X/ F) g" P( P6 q0 yADXR:=EMA(ADX,2);
3 @/ @, J% O$ r1 t& x
2 z; r8 l2 h6 t* sadxsc:=cross(adxr,adx) and pdi>ref(pdi,1);$ b3 M6 {* a4 h+ c# @& H
. }' U7 Z y n6 z' U0 J: ?$ HRSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;( b9 F% _0 A; N/ A6 t+ j0 q
K:=SMA(RSV,3,1);
* `4 k. \1 U8 A: \8 ?5 k6 F- bD:=SMA(K,3,1);
9 M( x. l# ]. }6 b2 L$ |; _6 fJ:=3*K-2*D;
) `6 T" J- o; O, p0 F
' e/ ~( W5 T" g4 _# A9 V; @ n* k" Pjj:=cross(j,k);9 U: R# G% D" Z2 g
, c8 n6 z/ P9 L& w
vv:=count(v=2 and ref(v,1)=llv(v,3) and v>ref(v,1);
# N% Z4 h/ E5 v+ i6 H' s+ i, |$ u9 ~6 e% a/ n( p2 M8 L' y
ma3:=ma(c,3);ma5:=ma(c,5);
" C6 r& ^$ Z$ I/ F l1 R0 D3 }pl:=abs(ma3-ma5)/ma3*100ma3 and adxsc and jj and pl |