CN1:=HHV(V,5);{5日最高量}
CN2:=O> C;
CN02:=C> O;
CN03:=C= O;
CN04:=((SUM(V,5)/CN1));
CN05:=IF(CN04> 0.3,1,0);{大資金}
CN06:=IF(CN2 AND CN05,V,0);{大資金流出}
CN07:=IF(CN02 AND CN05,V,0);{大資金流入}
CN08:=IF(CN03 AND CN05,V,0);{不明流向大資金}
累積資金流入:SUM(CN07,9),COLORMAGENTA;
累積資金流出:SUM(CN06,9);
凈流入:(累積資金流入-累積資金流出),COLOR0000FF;
凈流入MA3:MA(凈流入,3),DOTLINE,COLORBLUE;
凈流入MA5:MA(凈流入,5),DOTLINE,COLORWHITE;
不明流向大資金:SUM(CN08,9),COLORGREEN;
{資金流向}
QJJ:=VOL / ((H - L) * 2 - ABS(C - O));
XVL:=IF(C > O,QJJ * (H - L),IF(C <
O,QJJ * (H - O + (C - L)),VOL / 2)) + IF(C > O,0 - QJJ * (H - C
+ (O - L)),IF(C < O,0 - QJJ * (H - L),0 - VOL / 2));
HSL:=XVL / 20 / 1.15;
攻擊流量:=HSL * 0.55 + REF(HSL,1) * 0.33 + REF(HSL,2) *
0.22;
GJJ:=EMA(攻擊流量,8);
{流量基線‰:GJJ*1000,COLOR00BBBB,COLORGREEN;};
{----------------------}
GJTJ1:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5));
GJTJ2:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10));
GJTJ3:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20));
GJTJ4:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30));
BAIJIN1:=BARSLAST(CROSS(30,GJTJ1))< 2 AND
BARSLAST(CROSS(GJTJ1,50))< 2;
BAIJIN2:=BARSLAST(CROSS(GJTJ4,GJTJ1))< 2
AND GJTJ1> GJTJ4;
BAIJIN3:=GJTJ1> 60 AND GJTJ4>
70;
DRAWTEXT(BAIJIN1 AND BAIJIN2 AND
BAIJIN3,凈流入*0.96,'白金'),COLORWHITE;
HUANGJIN1:=BARSLAST(CROSS(50,GJTJ1))< 3
AND BARSLAST(CROSS(GJTJ1,50))< 3;
HUANGJIN2:=BARSLAST(CROSS(GJTJ4,GJTJ1))<
2 AND GJTJ1> GJTJ4;
DRAWTEXT(HUANGJIN1 AND
HUANGJIN2,凈流入*0.98,'黃金'),COLORYELLOW;
XG:=BARSLAST(CROSS(GJTJ4,GJTJ1))<
5 AND GJTJ1> GJTJ4;
ZHENCANG1:=BARSLAST(CROSS(GJTJ4,GJTJ1))> 3 AND
BARSLAST(CROSS(GJTJ1,GJTJ4))< 3;
ZHENCANG2:=BARSLAST(CROSS(GJTJ4,GJTJ2));
ZHENCANG3:=GJTJ3< GJTJ4 AND GJTJ2<
GJTJ4;
ZHENCANG4:=BARSLAST(CROSS(GJTJ4,GJTJ3))>
3 AND BARSLAST(CROSS(GJTJ1,GJTJ4))< 3;
ZHENCANG5:=GJTJ2< GJTJ3 AND GJTJ2<
GJTJ4 AND GJTJ2< GJTJ1 AND GJTJ1= 100;
ZCB1:=ZHENCANG1> 0 AND REF(ZHENCANG1,1)=
0 AND REF(ZHENCANG1,2)> 0;
DRAWTEXT(ZHENCANG1 AND ZHENCANG2 AND
ZHENCANG3 AND ZHENCANG4 AND ZHENCANG5,凈流入*0.94,'震倉(cāng)買入');
AA:=BARSLAST(CROSS(97,GJTJ1))<= 1 AND
BARSLAST(CROSS(GJTJ1,85))<= 1;
BB:=BARSLAST(CROSS(97,GJTJ2))<= 1 AND
BARSLAST(CROSS(GJTJ2,85))<= 1;
AA1:=AA AND BB;
AAA:=BARSLAST(CROSS(97,GJTJ1))<= 2 AND
BARSLAST(CROSS(GJTJ1,85))<= 1;
BAA:=BARSLAST(CROSS(97,GJTJ2))<= 2 AND
BARSLAST(CROSS(GJTJ2,85))<= 1;
AA2:=AA AND BB ;
AAAA:=BARSLAST(CROSS(97,GJTJ1))<= 3 AND
BARSLAST(CROSS(GJTJ1,85))<= 1;
BAAA:=BARSLAST(CROSS(97,GJTJ2))<= 3 AND
BARSLAST(CROSS(GJTJ2,85))<= 1;
AA3:=AAAA AND BAAA ;
BB1:=REF(AA1,1);
BB2:=REF(AA2,1);
BB3:=REF(AA3,1);
DD1:=GJTJ1= 100 AND GJTJ2=
100 AND AA1 ;
DD2:=GJTJ1= 100 AND GJTJ2=
100 AND AA2 ;
DD3:=GJTJ1= 100 AND GJTJ2=
100 AND AA3 ;
AW:=BARSLAST(CROSS(95,GJTJ1))<= 2;
BW:=BARSLAST(CROSS(95,GJTJ2))<= 2;
EW:= GJTJ4< GJTJ1 AND GJTJ1< GJTJ2 AND
GJTJ1< GJTJ3;
FW:=GJTJ2> 50 AND GJTJ3> 50;
GW:=GJTJ1= 100 AND GJTJ2= 100;
TXW:=COUNT(GW,2)= 1;
DRAWTEXT(AW AND BW AND EW AND FW AND
TXW,凈流入*0.90,'起漲');
AQ:=GJTJ3= 100;
BQ:=GJTJ4< 90;
DRAWTEXT(COUNT(AQ,2) = 2 AND
BQ,凈流入*0.88,'波啟前兆');
{}
強(qiáng)弱分界線: 50,POINTDOT ,LINETHICK2, COLORFFFF00;
VAR2:IF(MONTH< 12,1,1);
VAR3:=(2*CLOSE+HIGH+LOW)/4;
VAR4:=LLV(LOW,34);
VAR5:=HHV(HIGH,34);
主力:=EMA((VAR3-VAR4)/(VAR5-VAR4)*100,13)*VAR2,LINETHICK4,COLORRED;
散戶:=EMA(0.667*REF(主力,1)+0.333*主力,2),LINETHICK2,COLORFF9933;
DRAWTEXT(CROSS(主力,散戶) AND 主力<
22,凈流入*1.12,'快買入**'),LINETHICK2,COLOR0099FF;
DRAWICON(CROSS(主力,散戶) AND 主力<
22,25,1);{51.63%/5655}
DRAWTEXT(CROSS(主力,30) AND 散戶<
主力,凈流入*1.14,'上漲 '),LINETHICK2,COLOR00CCFF;
DRAWICON(CROSS(主力,30) AND 散戶<
主力,35,1);{51.99%/5258}
DRAWTEXT(CROSS(主力,65) AND 散戶<
主力,凈流入*1.16,'小心 '),LINETHICK2,COLOR9933FF;
DRAWICON(CROSS(主力,65) AND 散戶<
主力,50,2);
DRAWTEXT(CROSS(主力,75) AND 散戶<
主力,凈流入*1.18,'加倉(cāng)買入'),LINETHICK2,COLOR009900;
DRAWICON(CROSS(主力,75) AND 散戶<
主力,100,2);
DRAWTEXT(CROSS(散戶,主力)AND 散戶>
75,凈流入*1.20,'頭部') ,COLORYELLOW;
DRAWICON(CROSS(散戶,主力)AND 散戶>
75,凈流入*1.22,2);
DRAWTEXT(CROSS(主力,散戶) AND 主力<
35,凈流入*0.84,'買入脈沖');{49.46%/8651}
DRAWTEXT(CROSS(散戶,主力) AND 散戶> 75,凈流入*1.24,'賣出脈沖');
