编写标准:
编写方式:网民求助:
源代码以下:
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;