把这个附图指标值改成日净流入超过零的选股公式

编写标准：

编写方式：网民求助：

源代码以下：

jj:=(HIGH LOW CLOSE)/3;qj0:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW);

TD1:=qj0*(MIN(OPEN,CLOSE)-LOW);

XD1:=qj0*(jj-MIN(CLOSE,OPEN));

XD2:=qj0*(HIGH-MAX(OPEN,CLOSE));

TD2:=qj0*(MAX(CLOSE,OPEN)-jj);

日净额:((TD1 XD1)-(TD2 XD2))/10000,PRECIS2,linethick0;

周净额:sum(日净额,5),PRECIS2,linethick0;

月净额:sum(日净额,22),PRECIS2,linethick0;

FILLRGN(周净额,0,周净额>0,RGB(80,0,0),周净额<0,RGB(0,50,0));

stickline(日净额>0,0,日净额,6,0),color0000aa;

stickline(日净额>0,0,日净额,3,0),color0000cc;

stickline(日净额>0,0,日净额,1,0),color0000ff;

stickline(日净额<0,日净额,0,6,0),color00aa00;

stickline(日净额<0,日净额,0,3,0),color00cc00;

stickline(日净额<0,日净额,0,1,0),color00ff00;

DRAWTEXTREL(0,0,'茶舍现金流(万余元)'),COLORYELLOW;

DRAWTEXTREL(0,80,'证券代码: ' STKLABEL ' 证劵名字: ' STKNAME ''),ColorFFAA00;

解释以下：

jj:=(HIGH LOW CLOSE)/3;qj0:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW);

TD1:=qj0*(MIN(OPEN,CLOSE)-LOW);

XD1:=qj0*(jj-MIN(CLOSE,OPEN));

XD2:=qj0*(HIGH-MAX(OPEN,CLOSE));

TD2:=qj0*(MAX(CLOSE,OPEN)-jj);

((TD1 XD1)-(TD2 XD2))/10000>0;