A1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE

成交額:=V*C/100,NODRAW;

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((ISLASTBAR),((100*A2)/A6),0);

A8:=IF((ISLASTBAR),((100*A3)/A6),0);

A9:=IF((ISLASTBAR),((100*A4)/A6),0);

A10:=IF((ISLASTBAR),((100*A5)/A6),0);

機構買:(A2),LINETHICK6,COLORRED;

機構賣:(A3),LINETHICK6,COLORGREEN;

機構進出:機構買-機構賣,NODRAW;

散戶買:(A4),COLOR5555FF;

散戶賣:(A5),COLOR55FF 55;

散戶進出:散戶買-散戶賣,NODRAW;

強勢:((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),COLORRED;

DRAWTEXT(ISLASTBAR=1,機構買*0.95,""),LINETHICK2,COLORRED;

DRAWTEXT(ISLASTBAR=1,機構賣*0.95,""),LINETHICK2,COLORFFFF55;

Q:=BETWEEN(C/(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))),1.05,0.95);

Q2:=IF(Q=0,MA(C,BARSCOUNT(C)),(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))));

DRAWICON(CROSS((C/Q2),1.03),機構買,5);

XG:C/Q2;

DD1:=1;

AAA1:=STRCAT(STRCAT("機構買入",CON2STR((100*A2)/A6,0)),"%");

AAA2:=STRCAT(STRCAT("機構賣出",CON2STR((100*A3)/A6,0)),"%");

AAA0:=STRCAT(STRCAT("機構總買入",CON2STR((100*(A2-A3))/A6,0)),"%");

AAA3:=STRCAT(STRCAT("散戶買入",CON2STR((100*A4)/A6,0)),"%");

AAA4:=STRCAT(STRCAT("散戶賣出",CON2STR((100*A5)/A6,0)),"%");

AAA5:=STRCAT(STRCAT("散戶總買入",CON2STR((100*(A4-A5))/A6,0)),"%");

DRAWTEXT_FIX(DD1=1,0.001,0.05,0,AAA1),COLORRED;

DRAWTEXT_FIX(DD1=1,0.001,0.15,0,AAA2),COLORGREEN;

DRAWTEXT_FIX(DD1=1,0.001,0.25,0,AAA3),COLORRED;

DRAWTEXT_FIX(DD1=1,0.001,0.35,0,AAA4),COLORGREEN;

DRAWTEXT_FIX(DD1=1,0.001,0.45,0,AAA0),LINETHICK5,COLORCYAN;

DRAWTEXT_FIX(DD1=1,0.001,0.55,0,AAA5),LINETHICK5,COLORCYAN;

主力淨買額:=(機構進出+散戶進出)/成交額,NODRAW;

AAA6:=STRCAT(STRCAT("主力淨買額",CON2STR(主力淨買額,0)),"%");

DRAWTEXT_FIX(DD1=1,0.001,0.65,0,AAA6),COLORMAGENTA;