|
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));( @+ d5 G" c: R
VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
/ I+ ?5 p- T5 d* eVAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
# B! q% T/ T8 U! i1 HDIR1:=ABS(CLOSE-REF(CLOSE,5));
6 v2 x) v3 e; t. f6 l- [VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);) W+ g# Z$ E6 L( I( S- A
ER1:=DIR1/VIR1;
. x% S7 z& f! q( @! C% jCS1:=ER1*(0.8-2/8)+2/8;
+ L' M5 r) O" V4 `+ i1 `CQ1:=CS1*CS1;7 R e& L x3 t' r
AMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;
4 Z1 _! Q7 v4 [4 |7 g$ x0 IDIR2:=ABS(CLOSE-REF(CLOSE,10));: l1 Y$ ^, U _8 w6 X. f# d$ o9 L) v
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);
5 \! ]5 D9 L' o7 r# @2 k7 M }ER2:=DIR2/VIR2;
# I( I7 [# s& Q0 sCS2:=ER2*(0.8-2/24)+2/24;
% J0 K% j: _! K4 C+ KCQ2:=CS2*CS2;
9 A ^6 R+ k5 N3 |- A# `) AAMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;
: d) o( o% Z$ m$ ^: x0 W+ V, OAMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;
9 G* d2 |0 x; C d. V1 o- dAMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;
4 r* o5 E3 W/ L8 Y4 r% RSTICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000;
& t) X4 t5 k, g6 m5 O! a! I7 l7 _STICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED;
\1 n+ V* I8 C6 s# @, OSTICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000;; k, _& z9 g6 _$ k
STICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED;
+ I' i G6 C& X% c" o2 e$ S7 l* XSTICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000;
! _6 i; Z" g4 G. P# G" ]DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7);6 i% z6 P! k! ^4 G& ]5 M+ m6 \
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8);
8 D4 ]3 k5 c7 @0 kPT:=REF(H,1)-REF(L,1);
9 J" W- _* k- TCDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;" C- g4 D$ q2 Y$ t" n5 y! R
AH:=CDP+PT;; I" |! B' {# v
AL:=CDP-PT;
. C; p4 O: D2 w3 I! k" s7 L: E( ^) \9 vNH:=CDP*2-REF(L,1);
5 f" H6 y- P+ h. @9 c8 ~4 n7 ANL:=CDP*2-REF(H,1);
2 N# ^" V$ ?; K/ O+ d强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;$ m4 X+ U. g6 k- k
阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;
- x( F7 v! L6 X# [: @M:=IF(AL |