通达信成交量温度计副图指标公式

安装后如下图，友情提示（指标只是辅助，不作建议） 所有程序均为免费分享。

不会安装点击 安装指南 步骤操作。

成交量:=VOL,VOLSTICK;

MA5:=MA(VOL,5);

MA10:=MA(VOL,10);

MA20:=MA(VOL,20),LINETHICK0;

MA35:=MA(VOL,35),LINETHICK0;

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

主买:=IF(CLOSE>OPEN,AAA*(HIGH-LOW),IF(CLOSE<OPEN,AAA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2))*0.8,LINETHICK0;

主卖:=-IF(CLOSE>OPEN,0-AAA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AAA*(HIGH-LOW),0-VOL/2))*0.9,LINETHICK0;

主力净量:=(主买-主卖),LINETHICK0;

总量:100,LINETHICK0;

主买%:主买/成交量*100,COLORRED,LINETHICK0;

主卖%:主卖/成交量*100,COLOR00FF00,LINETHICK0;

比差:=主买%-主卖%;

STICKLINE(CURRBARSCOUNT=1 AND 100>0,100,0,3.3,1),COLORYELLOW;

STICKLINE(CURRBARSCOUNT=1 AND 主买%>0,主买%,0,2,0),COLORRED;

STICKLINE(CURRBARSCOUNT=1 AND 主卖%>0,主卖%,0,2.8,0),COLORBLUE;

DRAWICON(CURRBARSCOUNT=1 AND 5>0,2.6,97);

DRAWTEXT(CURRBARSCOUNT=1,主买%+5,'____*主买'),COLORRED;

DRAWTEXT(CURRBARSCOUNT=1,主卖%+5,'____*主卖'),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=1,105,'*总量'),COLORLIMAGENTA;

DRAWTEXT(CURRBARSCOUNT=1,22,'----20'),COLORFFFFFF;

DRAWTEXT(CURRBARSCOUNT=1,32,'----30'),COLORFFFFFF;

DRAWTEXT(CURRBARSCOUNT=1,42,'----40'),COLORFFFFFF;

DRAWTEXT(CURRBARSCOUNT=1,52,'----50'),COLORFFFFFF;

DRAWTEXT(CURRBARSCOUNT=1,62,'----60'),COLORFFFFFF;

DRAWTEXT(CURRBARSCOUNT=1,72,'----70'),COLORFFFFFF;

DRAWTEXT(CURRBARSCOUNT=1,82,'----80'),COLORFFFFFF;

V1:=MA(C,3)=HHV(MA(C,3),7);

V2:=MA(C,3)>MA(C,5);

V3:=MA(V,5)>MA(V,10)*1.01;

V4:=COUNT(MA(C,1)>REF(C,1),2)=2;

LC20:=REF(CLOSE,1);

RSI20:=SMA(MAX(CLOSE-LC20,0),4.1,1)/SMA(ABS(CLOSE-LC20),4.1,1)*100; 

STICKLINE(CROSS(RSI20,11)*1,0,16,3,0),COLORFF0080;

VAR3A:=3;

VAR2A:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);

MTM:=C-REF(C,1);

DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);

YXF:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);

加仓:IF(FILTER(YXF=1,5),26,0),STICK,COLORRED,LINETHICK5;

A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV

(L,55))*100,5,1);

FY:=EMA(A51,5);

A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;

地量:DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,' 地量'),COLORYELLOW;

STICKLINE(地量>0,0,20,2,0),COLOR330033;

STICKLINE(地量>0,0,20,1.5,0),COLOR770077;

STICKLINE(地量>0,0,20,0.8,0),COLORBB00BB;

STICKLINE(地量>0,0,20,0.3,0),COLORFF00FF;