智者见智分时图（通达信公式 主图 测试图）

 智者见智分时图

{智者见智分时图}

量价:=(VOL/CLOSE)/3;

A2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);

A3:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0);

A6:=A2+A3;DD1:=1;比:=A2/A3;

AAA1:=STRCAT(STRCAT('买= ',CON2STR((100*A2)/A6,0)),'%');

AAA2:=STRCAT(STRCAT('卖= ',CON2STR((100*A3)/A6,0)),'%');

AAA3:=STRCAT(STRCAT('差= ',CON2STR((100*(A2-A3))/A6,0)),'%');

DRAWTEXT_FIX(DD1=1,0,0.04,0,AAA1),COLORRED;

DRAWTEXT_FIX(DD1=1,0,0.12,0,AAA2),COLORGREEN;

DRAWTEXT_FIX(DD1=1,0,0.20,0,AAA3),COLOR00FFFF;

DRAWTEXT_FIX(比>2,0,0.40,0,'涨'),COLORCYAN;

DRAWTEXT_FIX(比>2,0,0.48,0,'停'),COLORMAGENTA;

DRAWTEXT_FIX(比>2,0,0.56,0,'板'),COLORRED;
......

 

202110268513879139.png