| A1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0);成交额:=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),COLOR55FF55;强势:((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; DD1:=1;{www.tzj123.com} 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;
|