这是益盟操盘手大单比率的源码
n:=10;
dd:=LN(FINANCE(7)/(n*10))*ATAN(FINANCE(7))*100;
主动买入:=SUM(BUYVOL,0);
主动卖出:=SUM(SELLVOL,0);
大单买:=if(BUYVOL>=dd,BUYVOL,0);
大单卖:=if(SELLVOL>dd,SELLVOL,0);
大单买入:=SUM(大单买,0);
大单卖出:=SUM(大单卖,0);
小单买入:=主动买入-大单买入;
小单买出:=主动卖出-大单卖出;
大买金:=sum(if(BUYVOL>=dd,BUYVOL,0)*c,0);
大单买均价:=大买金/大单买入;
大卖金:=sum(if(SELLVOL>dd,SELLVOL,0)*c,0);
大单卖均价:=大卖金/大单卖出;
成交笔数:=sum(if(BUYVOL>0,1,0),0)+sum(if(SELLVOL>0,1,0),0);
大单净量:=大单买入-大单卖出;
DRAWTEXTABS(30,70,'■ 大单净量:'),Color00FFFF,LINETHICK2;
DRAWTEXTABS(115,70,''+大单净量),Color00FFFF,LINETHICK2;
DRAWTEXTABS(200,70,'占'+FLOOR(大单净量/(主动买入+主动卖出)*100)+' %'),Color00FFFF,LINETHICK2;
DRAWTEXTABS(30,10,'■ 大单买入: '+大单买入),Color8000FF,LINETHICK2;
DRAWTEXTABS(200,10,'占'+FLOOR(大单买入/(主动买入+主动卖出)*100)+'%'),Color8000FF,LINETHICK2;
DRAWTEXTABS(300,10,'大单买均价: '+大单买均价),Color8000FF,LINETHICK2;
DRAWTEXTABS(30,25,'■ 小单买入: '+小单买入),Color2F73FF,LINETHICK2;
DRAWTEXTABS(200,25,'占'+FLOOR(小单买入/(主动买入+主动卖出)*100)+' %'),Color2F73FF,LINETHICK2;
DRAWTEXTABS(30,40,'■ 大单卖出: '+大单卖出),Color00FF00,LINETHICK2;
DRAWTEXTABS(200,40,'占'+FLOOR(大单卖出/(主动买入+主动卖出)*100)+' %'),Color00FF00,LINETHICK2;
DRAWTEXTABS(300,25,'大单卖均价: '+大单卖均价),Color00FF00,LINETHICK2;
DRAWTEXTABS(30,55,'■ 小单买出: '+小单买出),ColorB4B043,LINETHICK2;
DRAWTEXTABS(200,55,'占'+FLOOR(小单买出/(主动买入+主动卖出)*100)+' %'),ColorA8A800,LINETHICK2;
DRAWTEXTABS(300,40,'总成交笔数: '+成交笔数),ColorFFFFFF,LINETHICK2;
DRAWTEXTABS(300,55,'每笔成交手: '+INTPART((主动买入+主动卖出)/成交笔数)),LINETHICK2;
总:=DYNAINFO(8);
STICKLINE((总 AND DISPSTATUS=2),0,总,150,1),COLORFFFFFF;
STICKLINE((大单买入+大单卖出+小单买入+小单买出 AND DISPSTATUS=2),0,总,150,0),Color8000FF;
STICKLINE((大单卖出+小单买入+小单买出 AND DISPSTATUS=2),0,大单卖出+小单买入+小单买出,150,0),Color2F73FF;
STICKLINE((小单买出+大单卖出 AND BARSTATUS=2),0,小单买出+大单卖出,150,0),Color00FF00;
STICKLINE((小单买出 AND BARSTATUS=2),0,小单买出,150,0),ColorB4B043;仅提供源码{点击看本软件截图：58股票 公式网 http://www. 58gu. com 整理} |
