通达信主力资金附图源码

DIF:=EMA(CLOSE,13)-EMA(CLOSE,28),NODRAW;
 DEA:=EMA(DIF,8),NODRAW;
 MACD:(DIF-DEA)*5,NODRAW;
 VAR9:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100);
 VAR10:=SMA(VAR9,3,1);
 VAR11:=SMA(VAR10,3,1);
 VAR12:=SMA(VAR11,3,1);
 STICKLINE((MACD > 0),0,MACD,3.2,0),COLOR000033;
 STICKLINE((MACD > 0),0,MACD,2.7,0),COLOR000066;
 STICKLINE((MACD > 0),0,MACD,2.1,0),COLOR000099;
 STICKLINE((MACD > 0),0,MACD,1.5,0),COLOR0000CC;
 STICKLINE((MACD > 0),0,MACD,0.9,0),COLOR0000FF;
 STICKLINE((MACD > 0),0,MACD,0.3,0),COLORCC66FF;

 STICKLINE((MACD <= 0),0,MACD,3,2),COLOR990000;
 STICKLINE((MACD <= 0),0,MACD,2.7,0),COLORCC0000;
 STICKLINE((MACD <= 0),0,MACD,2.1,0),COLORFF4400;
 STICKLINE((MACD <= 0),0,MACD,1.5,0),COLORFF8800;
 STICKLINE((MACD <= 0),0,MACD,0.9,0),COLORFFCC00;
 STICKLINE((MACD <= 0),0,MACD,0.3,0),COLORCYAN;

 STICKLINE((MACD<REF(MACD,1)AND MACD>0),0,MACD,3,2),COLOR990000;
 STICKLINE((MACD<REF(MACD,1)AND MACD>0),0,MACD,2.7,0),COLORCC0000;
 STICKLINE((MACD<REF(MACD,1)AND MACD>0),0,MACD,2.1,0),COLORFF4400;
 STICKLINE((MACD<REF(MACD,1)AND MACD>0),0,MACD,1.5,0),COLORFF8800;
 STICKLINE((MACD<REF(MACD,1)AND MACD>0),0,MACD,0.9,0),COLORFFCC00;
 STICKLINE((MACD<REF(MACD,1)AND MACD>0),0,MACD,0.3,0),COLORCYAN;

 STICKLINE((MACD>REF(MACD,1)AND MACD<0),0,MACD,3.2,0),COLOR000033;
 STICKLINE((MACD>REF(MACD,1)AND MACD<0),0,MACD,2.7,0),COLOR000066;
 STICKLINE((MACD>REF(MACD,1)AND MACD<0),0,MACD,2.1,0),COLOR000099;
 STICKLINE((MACD>REF(MACD,1)AND MACD<0),0,MACD,1.5,0),COLOR0000CC;
 STICKLINE((MACD>REF(MACD,1)AND MACD<0),0,MACD,0.9,0),COLOR0000FF;
 STICKLINE((MACD>REF(MACD,1)AND MACD<0),0,MACD,0.3,0),COLORCC66FF;

 V1:=DMA((((H+L) + (C*2)) / 4),0.9);
 HY1:=REF(EMA(V1,3),1);

多空:(MA((C-HY1)*10,2))*0.1,NODRAW;
换手:=V*100/CAPITAL;
主力:=MA(换手,4);
大户:=MA(换手,9);
中户:=MA(换手,17);
散户:=MA(换手,34);
均量:=(主力+大户+中户+散户)/4;
主力量:(主力-均量)COLORMAGENTA,NODRAW;
大户量:(大户-均量)COLORYELLOW,NODRAW;
中户量:(中户-均量)COLORLIBLUE,NODRAW;
散户量:(散户-均量)COLORBLUE,NODRAW;
操盘:STICKLINE(主力量>=0 AND 主力量>=REF(主力量,1),5,5+主力量,1.5,0),COLORRED;
减仓:STICKLINE(主力量>=0 AND 主力量< REF(主力量,1),5,5+主力量,1.5,0),COLORYELLOW;
反弹:STICKLINE(主力量<0 AND 主力量>=REF(主力量,1),5,5+主力量,1.5,0),COLORGREEN;
寻底:STICKLINE(主力量<0 AND 主力量< REF(主力量,1),5,5+主力量,1.5,0),COLORGREEN;
操盘4:STICKLINE(多空>=0 AND 多空>=REF(多空,1),10,10+多空,1.5,0),COLORRED;
减仓4:STICKLINE(多空>=0 AND 多空< REF(多空,1),10,10+多空,1.5,0),COLORRED;
反弹4:STICKLINE(多空<0 AND 多空>=REF(多空,1),10,10+多空,1.5,0),COLORGREEN;
寻底4:STICKLINE(多空<0 AND 多空< REF(多空,1),10,10+多空,1.5,0),COLORGREEN;