成交額:=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);
機構(gòu)買:(A2),LINETHICK3,COLORRED;
機構(gòu)賣:(A3),LINETHICK3,COLORFFFF55;
機構(gòu)進出:=機構(gòu)買-機構(gòu)賣;
散戶買:(A4),COLOR5555FF;{細紅線}
散戶賣:(A5),COLOR55FF55;{細綠線}
強勢:=((100*A2)/A6>50);
STICKLINE(強勢,機構(gòu)買*1.02,機構(gòu)買*1.1,6,0),COLORYELLOW;
拉升:=((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;
STICKLINE(拉升,機構(gòu)買*1.1,機構(gòu)買*1.2,6,0),COLORFF00FF;
{DRAWTEXT(BARSTATUS=2,機構(gòu)買*0.95,’●機構(gòu)買’),LINETHICK2,COLORRED;
DRAWTEXT(BARSTATUS=2,機構(gòu)賣*0.95,’○機構(gòu)賣’),LINETHICK2,COLORFFFF55;}
{DRAWTEXT(機構(gòu)進出>0 AND REF(機構(gòu)進出,1)<=0,機構(gòu)買*1.02,'●機買'),COLORRED;
DRAWTEXT(機構(gòu)進出<0 AND REF(機構(gòu)進出,1)>=0,機構(gòu)買*0.98,’○機賣’),COLORFFFF55;}
DD1:=1;
AAA1:=’機構(gòu)買’+(100*A2)/A6+’% ‘;
AAA2:=’機構(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;