|
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));- p/ l {* X, g9 b0 ]4 C' t2 G7 q
VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));4 O$ }/ W& _9 Z+ O2 _/ E. {, K
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));5 C6 f* r6 w/ s' ?/ s) r9 |
DIR1:=ABS(CLOSE-REF(CLOSE,5));
* ]9 U& R( K$ T* K( X1 xVIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);
Q3 [! s1 X7 s- [- s& W) a3 [ER1:=DIR1/VIR1;
+ d* m3 e8 S2 L' C+ z' E4 i. n6 QCS1:=ER1*(0.8-2/8)+2/8;" \/ D& q. x$ i* c5 K
CQ1:=CS1*CS1;% @# A9 C2 e; t: j
AMA1:EMA(DMA(CLOSE,CQ1),2) ,COLORWHITE;; C3 Z3 m" S$ h- y" l: R: D8 [
DIR2:=ABS(CLOSE-REF(CLOSE,10));
) I6 I5 ^+ g# @7 U$ u z; o0 p5 F0 U) @VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);3 ]1 w5 w5 m: |8 k$ h9 Q R
ER2:=DIR2/VIR2;3 x7 P2 O H% c
CS2:=ER2*(0.8-2/24)+2/24;
5 N" Q. N/ l: \8 C8 a5 vCQ2:=CS2*CS2;
6 ] N& {2 ]$ |7 l m1 rAMA2:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;" J0 C! b& p5 M% V# ?3 E- B" o
AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;
- m( `& E) C. g* z$ s* k4 ^AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORRED,LINETHICK2;/ f% E2 X6 b0 a' O
STICKLINE((VAR2 < MA(VAR3,6)),CLOSE,OPEN,3,1),COLOR008000;7 a3 q4 Z. `" n
STICKLINE((VAR2 > MA(VAR3,6)),OPEN,CLOSE,3,1),COLORRED;
5 F) L. }: Q ^: ]4 C# w/ ZSTICKLINE(((OPEN > CLOSE) AND (VAR2 > MA(VAR3,6))),(OPEN * 0.998),(CLOSE * 1.0001),2.3,0),COLOR008000;
$ q& Q0 I$ R! ~# R* ^$ zSTICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2.3,0),COLORRED;4 p1 w9 `4 K& ~4 h* Y0 v$ t+ x$ X
STICKLINE(((OPEN > CLOSE) AND (VAR2 < MA(VAR3,6))),CLOSE,OPEN,2.3,0),COLOR008000;# p Z" z; w: p4 `4 K5 `
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.04)),7);
# N1 \' D& v+ h% t! H5 N; CDRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.03)),8);* n) i3 v* }& m2 u+ c' O
PT:=REF(H,1)-REF(L,1);0 K! J+ s7 L/ _
CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
! z/ E5 d# |" Y6 \AH:=CDP+PT;# g" Y! v- i1 w! K4 U. }1 M% E
AL:=CDP-PT;6 w2 l8 e) ^6 J- i: G
NH:=CDP*2-REF(L,1);6 A( Z( T8 w- I- H* P
NL:=CDP*2-REF(H,1);
* n: m1 ?( M/ |7 E强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;
4 _3 A( m m! o- x6 T阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;
}7 J! y/ S) d/ m0 d5 P( |M:=IF(AL |