|
A1:=(VOL/CLOSE)/3; A2:=SUM((IF(((A1>40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0); A3:=SUM((IF(((A1>40) AND (CLOSE<> A4:=SUM((IF(((A1<40) and="" (close="">(REF(CLOSE,1)))),A1,0)),0); A5:=SUM((IF(((A1<40) and=""><> 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))); 機構買:(A2),LINETHICK2,COLORFF55FF; 機構賣:(A3),LINETHICK2,COLORFFFF55; 散戶買:(A4),COLOR5555FF; 散戶賣:(A5),COLOR55FF55; DRAWTEXTREL(1003,870,'機構買'),LINETHICK2,COLORFF55FF; DRAWTEXTREL(1003,570,'機構賣'),LINETHICK2,COLORFFFF55; DRAWTEXTREL(1003,320,'散戶買'),LINETHICK2,COLOR5555FF; DRAWTEXTREL(1003,50,'散戶賣'),LINETHICK2,COLOR55FF55; IF ((BARSTATUS=2) ) THEN DRAWTEXTREL(1020,750,''+FLOOR(A7)+'%'),LINETHICK2,COLORFF55FF; IF ((BARSTATUS=2) ) THEN DRAWTEXTREL(1020,460,''+FLOOR(A8)+'%'),LINETHICK2,COLORFFFF55; IF ((BARSTATUS=2) ) THEN DRAWTEXTREL(1020,200,''+FLOOR(A9)+'%'),LINETHICK2,COLOR5555FF; IF ((BARSTATUS=2) ) THEN DRAWTEXTREL(1020,-50,''+FLOOR(A10)+'%'),LINETHICK2,COLOR55FF55; 增減倉:A1; 機構進出:機構買-機構賣,LINETHICK0; 強勢:((100*A2)/A6>50); STICKLINE(強勢,機構買*1.02,機構買*1.1,1,0),COLORYELLOW; 拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18; STICKLINE(拉升,機構買*1.1,機構買*1.2,1,0),COLORFF00FF; DRAWTEXT(BARSTATUS=2,機構買*0.95,'●機構買'),LINETHICK2,COLORRED; DRAWTEXT(BARSTATUS=2,機構賣*0.95,'○機構賣'),LINETHICK2,COLORFFFF55; DRAWTEXT(機構進出>0 AND REF(機構進出,1)<> DRAWTEXT(機構進出<0 and="" ref(機構進出,1)="">=0,機構買*0.98,'○機賣'),COLORFFFF55; |
|
|
