A1:=(VOL/CLOSE)/3;
A2:=SUM((IF(((A1>40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0); A3:=SUM((IF(((A1>40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0); A4:=SUM((IF(((A1<40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0); A5:=SUM((IF(((A1<40) AND (CLOSE<(REF(CLOSE,1)))),A1,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))); 機構買盤:(A2),LINETHICK3,COLORFF55FF; 機構賣盤:(A3),LINETHICK3,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; OK:A2/A3>2; |
|