以下是【一生平安分时一代】【2016大小单机构数据再优化与同学们共享共进】
〖人间有爱,希望长在。股市无情,盈亏在心。赢钱莫傲,输钱莫恼。常来,共同分享。〗
量:=SUM(V,FROMOPEN);
现:=100*(C-REF(C,1))/REF(C,1);
大买:=SUM(IF(现>0 AND V>=500 AND PERIOD=0,V,0),FROMOPEN);
大卖:=SUM(IF(现<0 AND V>=500 AND PERIOD=0,V,0),FROMOPEN);
B1:=100*大买/量;
B2:=100*大卖/量;
DRAWRECTREL(646,CONST(100-B1)*1000/100,665,1000,RGB(255,0,0))NOFRAME;
DRAWRECTREL(675,CONST(100-B2)*1000/100,693,1000,RGB(0,255,0))NOFRAME;
小买:=SUM(IF(现>0 AND V<500 AND PERIOD=0,V,0),FROMOPEN);
小卖:=SUM(IF(现<0 AND V<500 AND PERIOD=0,V,0),FROMOPEN);
B3:=100*小买/量;
B4:=100*小卖/量;
DRAWRECTREL(710,CONST(100-B3)*1000/100,720,1000,RGB(128,0,0))NOFRAME;
DRAWRECTREL(730,CONST(100-B4)*1000/100,740,1000,RGB(0,128,0))NOFRAME;
DRAWTEXT_FIX(PERIOD=0,0.54,8,0,STRCAT(STRCAT('大买 ',CON2STR(B1,0)),'°')) COLOR0000FF;
DRAWTEXT_FIX(PERIOD=0,0.76,8,0,STRCAT(STRCAT('大卖 ',CON2STR(B2,0)),'°')) COLOR00FF00;
上: "【量】.上#DAY" COLOR0000FF;
下: "【量】.下#DAY" COLOR00FF00;
阻:="【量】.阻#DAY";
撑:="【量】.撑#DAY";
DRAWICON(LONGCROSS(撑,C,2) AND PERIOD=0,C*0.99,1);
DRAWICON(LONGCROSS(C,阻,2) AND PERIOD=0,C*1.01,2);
IF(PERIOD=0,REF(HHV(H,240),1),DRAWNULL) DOTLINE COLORFFFF00;
IF(PERIOD=0,REF(LLV(L,240),1),DRAWNULL) DOTLINE COLORFFFF00;
IF(C>上 AND PERIOD=0,C,DRAWNULL) LINETHICK9 COLOR0000FF;
{IF(C<下 AND PERIOD=0,C,DRAWNULL) LINETHICK9 COLOR00FF00;}
DRAWTEXT_FIX(ISLASTBAR AND C>500 AND "【量】.期#DAY"=1,0.768,0.18,1,'【大盘加仓】')COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR AND C>500 AND "【量】.期#DAY"=0,0.768,0.18,1,'【大盘清仓】')COLORFFB824;
V1:=SUM(IF(V*C>16000 AND 现>0,V*C,0),0);
V2:=SUM(IF(V*C>16000 AND 现<0,V*C,0),0);
V3:=SUM(IF(V*C<16000 AND 现>0,V*C,0),0);
V4:=SUM(IF(V*C<16000 AND 现<0,V*C,0),0);
V5:=V1+V2+V3+V4;
V6:=STRCAT(STRCAT('【机构 ',CON2STR(100*(V1+V2)/V5,0)),'°】');
DRAWTEXT_FIX(PERIOD=0 AND C<500,0.765,0.3,1,V6)COLORFF00FF;