成交額:=V*C/100;{萬元}
A2:=SUM((IF(((成交額/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交額,0)),0);
A3:=SUM((IF(((成交額/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交額,0)),0);
A4:=SUM((IF(((成交額/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交額,0)),0);
A5:=SUM((IF(((成交額/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交額,0)),0);
A6:=((A2+A3)+A4)+A5;
A7:=IF((BARSTATUS=2),((100*A2)/A6),0);
A8:=IF((BARSTATUS=2),((100*A3)/A6),0);
A9:=IF((BARSTATUS=2),((100*A4)/A6),0);
A10:=IF((BARSTATUS=2),((100*A5)/A6),0);
機(jī)構(gòu)買:(A2),LINETHICK3,COLORRED;
機(jī)構(gòu)賣:(A3),LINETHICK3,COLORFFFF55;
機(jī)構(gòu)進(jìn)出:=機(jī)構(gòu)買-機(jī)構(gòu)賣;
散戶買:(A4),COLOR5555FF;{細(xì)紅線}
散戶賣:(A5),COLOR55FF55;{細(xì)綠線}
強(qiáng)勢(shì):=((100*A2)/A6>50);
STICKLINE(強(qiáng)勢(shì),機(jī)構(gòu)買*1.02,機(jī)構(gòu)買*1.1,6,0),COLORYELLOW;
拉升:=((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;
STICKLINE(拉升,機(jī)構(gòu)買*1.1,機(jī)構(gòu)買*1.2,6,0),COLORFF00FF;
{DRAWTEXT(BARSTATUS=2,機(jī)構(gòu)買*0.95,’●機(jī)構(gòu)買’),LINETHICK2,COLORRED;
DRAWTEXT(BARSTATUS=2,機(jī)構(gòu)賣*0.95,’○機(jī)構(gòu)賣’),LINETHICK2,COLORFFFF55;}
{DRAWTEXT(機(jī)構(gòu)進(jìn)出>0 AND REF(機(jī)構(gòu)進(jìn)出,1)<=0,機(jī)構(gòu)買*1.02,'●機(jī)買'),COLORRED;
DRAWTEXT(機(jī)構(gòu)進(jìn)出<0 AND REF(機(jī)構(gòu)進(jìn)出,1)>=0,機(jī)構(gòu)買*0.98,’○機(jī)賣’),COLORFFFF55;}
DD1:=1;
AAA1:=’機(jī)構(gòu)買’+(100*A2)/A6+’% ‘;
AAA2:=’機(jī)構(gòu)賣’+(100*A3)/A6+’% ‘;
AAA3:=’散戶買’+(100*A4)/A6+’% ‘;
AAA4:=’散戶賣’+(100*A5)/A6+’%’;
DRAWTEXTREL(10,10,AAA1),colorred;
DRAWTEXTREL(100,10,AAA2),colorGREEN;
DRAWTEXTREL(200,10,AAA3),colorred;
DRAWTEXTREL(300,10,AAA4),colorGREEN;