通达信傻买傻卖公式分时指标

A1:=(DVOL/C)/2,NODRAW;

A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);

A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0);

A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0);

A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0);

A6:=A2+A3+A4+A5;

机买:(A2/A6)*100,LINETHICK2,COLORRED;

机卖:(A3/A6)*100,LINETHICK2,COLORGREEN;

散买:(A4/A6)*100,LINETHICK0;

散卖:(A5/A6)*100,LINETHICK0;

主力差:机买-机卖,LINETHICK2,NODRAW;

散户差:散买-散卖,LINETHICK0,NODRAW;

DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.85,'●机构'),COLORRED;

DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.85,'○机构'),COLORWHITE;

DRAWTEXT(散户差>0 AND REF(散户差,1)<=0,C*0.15,'▲散户'),COLORCYAN;

DRAWTEXT(散户差<0 AND REF(散户差,1)>=0,-C*0.15,'△散户'),COLORWHITE;

机构加仓:(主力差>=REF(主力差,1)+1.5)*50;

 

原理解析：
A1赋值:(D成交量/C)/2,NODRAW


A2赋值:SUM(IF(A1>100 AND 收盘价>1日前的收盘价,A1,0),0)


A3赋值:SUM(IF(A1>100 AND 收盘价<1日前的收盘价,A1,0),0)


A4赋值:SUM(IF(A1<100 AND 收盘价>1日前的收盘价,A1,0),0)


A5赋值:SUM(IF(A1<100 AND 收盘价<1日前的收盘价,A1,0),0)


A6赋值:A2+A3+A4+A5
输出

机买:(A2/A6)*100, 线宽为2,画红色
输出

机卖:(A3/A6)*100, 线宽为2,画绿色
输出

散买:(A4/A6)*100,LINETHICK0
输出

散卖:(A5/A6)*100,LINETHICK0
输出

主力差:机买-机卖, 线宽为2,NODRAW
输出

散户差:散买-散卖,LINETHICK0,NODRAW


DRAWTEXT(主力差>0 AND 1日前的主力差<=0,C*0.85,'●机构'),画红色


DRAWTEXT(主力差<0 AND 1日前的主力差>=0,-C*0.85,'○机构'),画白色


DRAWTEXT(散户差>0 AND 1日前的散户差<=0,C*0.15,'▲散户'),画青色


DRAWTEXT(散户差<0 AND 1日前的散户差>=0,-C*0.15,'△散户'),画白色
输出

机构加仓:(主力差>=1日前的主力差+1.5)*50