|
TRV:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),12);
+ F8 i* g- q& Z/ _; W2 _1 ?2 EHD :=HIGH-REF(HIGH,1);3 \' |% c J2 F- @9 x
LD :=REF(LOW,1)-LOW;1 C6 F2 ~& {6 D7 T
DMP:=EMA(IF(HD>0 and HD>LD,HD,0),12);% D! Y5 R [/ q9 _9 _* r, f7 |1 i
DMM:=EMA(IF(LD>0 and LD>HD,LD,0),12);
4 e5 `( X0 V- x @4 XPDI:= DMP*100/TRV;
% \ g! ?; n) Q' w; YMDI:= DMM*100/TRV;( X; a/ v( D1 [0 p2 a
ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,2);+ A; I+ F6 d0 B+ d; d" y4 [& x$ f
ADXR:=EMA(ADX,2);
1 S+ J% g. M" ?7 h) }: R
( }9 S' ^' [7 O& S* nadxsc:=cross(adxr,adx) and pdi>ref(pdi,1);
6 J# t7 _& |+ d& _0 ^( \) c1 a \& i# `1 x# [5 |4 _ }
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;' ?1 K, t& K$ e0 j
K:=SMA(RSV,3,1);
' A6 Y$ P$ @% c1 _D:=SMA(K,3,1);
: y7 I; l. O* o, L# sJ:=3*K-2*D;' E( C; M4 I8 _' v% J
3 Q ~5 u8 a1 o G U
jj:=cross(j,k);- V) k' m3 t5 m4 k* }2 F! j
/ Q* B+ s: d7 e- Q' E5 {
vv:=count(v=2 and ref(v,1)=llv(v,3) and v>ref(v,1);2 _, Y, s7 A' H- ~- o/ }; |4 I9 q0 y* O
" @! G5 j* }, s) W4 k- _' Ema3:=ma(c,3);ma5:=ma(c,5);
3 M& b4 h; N$ I/ U4 n4 N+ I" r# Npl:=abs(ma3-ma5)/ma3*100ma3 and adxsc and jj and pl |