求通達信主力資金凈流入公式：近20日內，最近2日主力資金凈流入平均數，大於前18日主力資金凈流入的最大值

AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

買量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0,COLORRED;

賣量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORGREEN;

進出量:=買量+賣量,COLOR00FFFF;STICKLINE(進出量<0,0,進出量,1,0),COLORFF6600;

STICKLINE(進出量<0,0,進出量,3,0),COLORFF9900;

STICKLINE(進出量<0,0,進出量,1.5,0),COLORFFCC00;

STICKLINE(進出量<0,0,進出量,0.5,0),COLORCYAN;

STICKLINE(進出量>0,0,進出量,3,0),COLOR000099;

STICKLINE(進出量>0,0,進出量,3,0),COLOR0000CC;

STICKLINE(進出量>0,0,進出量,1.0,0),COLOR0000FF;

STICKLINE(進出量>0,0,進出量,0.5,0),COLORCC66FF;N:=1;QJ0:=(HIGH+LOW+CLOSE)/3;

QJ1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));

QJ2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-QJ0);

QJ3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);

QJ4:=IF(HIGH=LOW,1,QJ0-MIN(CLOSE,OPEN));

QJ5:=VOL/(IF(HIGH=LOW,4,HIGH-LOW));

QJ6:="MACD.DIF">"MACD.DEA" AND "MACD.DEA"<0;

QJ7:="KDJ.K">"KDJ.D" AND "KDJ.D"<30;

QJ8:="MACD.DIF"<"MACD.DEA";

QJ9:="KDJ.K"<"KDJ.D" AND "KDJ.K">80;

特大:QJ4*QJ5,NODRAW;大單:QJ3*QJ5,NODRAW;

中單:QJ1*QJ5,NODRAW;小單:QJ2*QJ5,NODRAW;

W1:=SUM(大單,N)+SUM(特大,N);W2:=SUM(小單,N)+SUM(中單,N);

量振1:=特大>大單 AND 大單>小單;

量振2:=特大<小單 AND 大單<小單;

標振1:=QJ6 AND QJ7;

標振2:=QJ8 AND QJ9;

A:=W1-W2;A0:=IF(A>0,A,0);B0:=IF(A<0,A,0);

STICKLINE(A0,0,A0,1,0),COLOR000044;主力持倉:EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORFF00FF;主力籌碼集中度:WINNER(C)*100,COLORRED;

DRAWTEXT(ISLASTBAR,1,HYBLOCK);