|
源码如下:6 m- ~5 j4 B* c B( B9 {2 t
K2:=EMA(C,5),COLORFFFF00;$ P8 M" x: j4 c- A) f
K3:=EMA(C,10),COLORFFFF00;
+ T: f8 a# j5 |6 y O2 }0 {4 [: `8 dK5:=EMA(C,30),COLORFFFF00;
3 Z' I8 N& j6 k. f* N+ Z- f7 rKK5:=EMA(INDEXC,30),COLORFFFF00;
1 V2 G5 Z. \- {0 wA10:=EMA(C,10);) z- @+ n# N/ Q* N6 n+ e% h
K6:=2*(K2-K5);K7:=2*(K2-K3);. D* h5 f' b- {* X1 |
K8:=2*(K7+K6),COLORRED;7 q. s1 g5 t" i. r3 J% v( j+ h
VAR1:=(100-((90*(HHV(HIGH,21)-CLOSE))/(HHV(HIGH,21)-LLV(LOW,21))));2 E/ @2 a, ~3 y6 z$ [1 a" x# S
VAR2:=(100-((90*(HHV(HIGH,21)-CLOSE))/(HHV(HIGH,21)-LLV(LOW,21))));
! \& b7 ~8 ^. VVAR3:=(100-MA(((100*(HHV(HIGH,6)-CLOSE))/(HHV(HIGH,6)-LLV(LOW,6))),34));) g: ]8 u _% q; Q. n9 B/ Z
年:=MA(CLOSE,26),COLORGREEN,LINETHICK0;
1 _7 H9 n) R) [+ J箱底 LV(MA((LOW),5),30),COLORGREEN,LINETHICK1;
( m2 Y7 ^8 I+ |6 @& G8 {, Y* D长箱底:LLV(MA((LOW),5),60),LINETHICK1;$ K" M% ~ R9 i6 {% `7 |
长长箱底:LLV(MA((LOW),5),100),COLORCYAN,LINETHICK1;
3 X0 \) `& N; E ~. a# [长长箱顶:HHV(MA((HIGH),6),120),LINETHICK1;4 ?1 t- H6 F* ^7 A
长箱顶:HHV(MA((HIGH),6),60),COLORRED,LINETHICK1;1 p% h% O. t8 W ]% g
箱顶:HHV(MA((HIGH),6),30),COLOR00AAFF,LINETHICK1;! V+ q& b6 f7 [ G6 ~
中央 箱顶+箱底)/2,COLORFF00FF,LINETHICK3;
: f$ p+ z) X* p$ x8 A$ }* F2 {启动线:EMA(C,2),COLOR00FF00,LINETHICK2;
1 @/ Q. C( J' M& M, ~- wWX:EMA(C,5),COLORWHITE,LINETHICK2;9 T% c4 l2 n) Y
STICKLINE(CROSS(WX,中央),中央-0.8,中央+0.8,8,0) ,COLORWHITE;# V4 W$ t9 t1 F) _2 R
STICKLINE(CROSS(WX,长箱顶),长箱顶-0.8,长箱顶+0.8,10,0) ,COLORYELLOW,LINETHICK2;* C- d7 k- K, c' c, p3 E
STICKLINE(CROSS(WX,箱顶),箱顶-0.5,箱顶+0.5,10,0) ,COLORGREEN;
" T# R* r Q% P3 Q+ [; kSTICKLINE(WX>中央,中央,WX,0,-1),COLORFF00FF; 3 z1 ^$ q( z/ [2 p
STICKLINE(中央>WX,WX,中央,0,-1),COLORLIGREEN;; z6 E, v- r- I# r' D3 k3 D$ d
STICKLINE(CLOSEREF(CLOSE,1),OPEN,CLOSE,5,0),COLORRED; |