盘口分析-
个人感觉不错的指标。
副图指标,适用周期:分笔。
总买、总卖、大单、小单、资金进出等一清二楚!
若好用别忘了加分鼓励啊!呵呵!!!
{盘口分析副图}
input:n1(2,1,50),n2(18,1,100);
drawtextrel(29,29,stklabel),linethick6,colorcc99ff;
drawtextrel(144,29,stkname),linethick6,colorff0000;
drawtextrel(30,30,stklabel),linethick6,colorffff00;
drawtextrel(145,30,stkname),linethick6,color00ffff;
drawtextrel(746,189,'盘 口 分 析'),linethick6,color00ffff;
drawtextrel(748,191,'盘 口 分 析'),linethick6,color0000ff;
drawtextrel(295,45,'流通:'+numtostrn(finance2(37),0)+' 收益:'+numtostrn(finance2(3),2)+' 市盈:'+numtostrn(dynainfo(39),2)+' 市净:'+numtostrn(dynainfo(58),2)+' 换手:'+numtostrn(dynainfo(37),2)),linethick3,color9999ff;
drawtextrel(20,120,'---------------------------------------------------------'),linethick3,colorffffff;
mr:=buyvol*c/100;
zmr:=sum(mr,0);
mc:=sellvol*c/100;
zmc:=sum(mc,0);
rch:=zmr+zmc;
rcc:=zmr-zmc;
mr0:=if(mr<5 ,mr,0);
zmr0:=sum(mr0,0);
mc0:=if(mc<5 ,mc,0);
zmc0:=sum(mc0,0);
mr5:=if(mr<10 and mr>=5 ,mr,0);
zmr5:=sum(mr5,0);
mc5:=if(mc<10 and mc>=5,mc,0);
zmc5:=sum(mc5,0);
mr10:=if(mr<25 and mr>=10 ,mr,0);
zmr10:=sum(mr10,0);
mc10:=if(mc<25 and mc>=10 ,mc,0);
zmc10:=sum(mc10,0);
mr25:=if(mr<50 and mr>=25 ,mr,0);
zmr25:=sum(mr25,0);
mc25:=if(mc<50 and mc>=25 ,mc,0);
zmc25:=sum(mc25,0);
mr50:=if(mr<75 and mr>=50 ,mr,0);
zmr50:=sum(mr50,0);
mc50:=if(mc<75 and mc>=50 ,mc,0);
zmc50:=sum(mc50,0);
mr75:=if(mr<100 and mr>=75,mr,0);
zmr75:=sum(mr75,0);
mc75:=if(mc<100 and mc>=75,mc,0);
zmc75:=sum(mc75,0);
mr100:=if(mr>=100 ,mr,0);
zmr100:=sum(mr100,0);
mc100:=if(mc>=100 ,mc,0);
zmc100:=sum(mc100,0);
jg:=10*n2;mr200:=if(mr>jg ,mr,0);
zmr200:=sum(mr200,0);
mc200:=if(mc>jg,mc,0);
zmc200:=sum(mc200,0);
mmc200:=zmr200-zmc200;
mmc0:=zmr0-zmc0;
mmc5:=zmr5-zmc5;
mmc10:=zmr10+zmr25+zmr50-zmc10-zmc25-zmc50;
mmc75:=zmr75+zmr100-zmc75-zmc100;
drawtextrel(20,492,'---------------------------------------------------------'),linethick3,colorffffff;
if barstatus=2 and (zmr) then begin drawtextrel(34,545,' 总买入: '+numtostrn(zmr,2)),linethick2,colorff00ff;end;
if barstatus=2 and (zmc) then begin drawtextrel(261,545,' 总卖出: '+numtostrn(zmc,2)),linethick2,colorffff00;end;
if barstatus=2 and (zmr0) then begin drawtextrel(17,608,' 5万下小单买入: ' +numtostrn(zmr0,2)),linethick1,color0000ff;end;
if barstatus=2 and (zmc0) then begin drawtextrel(264,608,' 5万下小单卖出: '+numtostrn(zmc0,2)),linethick1,color00ff00;end;
if barstatus=2 and (zmr5) then begin drawtextrel(17,660,' 5 万中单买入: '+numtostrn(zmr5,2)),linethick1,color9900ff;end;
if barstatus=2 and (zmc5) then begin drawtextrel(264,660,' 5 万中单卖出: '+numtostrn(zmc5,2)),linethick1,color99ff00;end;
if barstatus=2 and (zmr10) then begin drawtextrel(17,712,' 10 万大单买入: '+numtostrn(zmr10,2)),linethick1,color0000ff;end;
if barstatus=2 and (zmc10) then begin drawtextrel(264,712,' 10 万大单卖出: '+numtostrn(zmc10,2)),linethick1,color00ff00;end;
if barstatus=2 and (zmr25) then begin drawtextrel(17,764,' 25 万大单买入: '+numtostrn(zmr25,2)),linethick1,color9900ff;end;
if barstatus=2 and (zmc25) then begin drawtextrel(264,764,' 25 万大单卖出: '+numtostrn(zmc25,2)),linethick1,color99ff00;end;
if barstatus=2 and (zmr50) then begin drawtextrel(17,816,' 50 万大单买入: '+numtostrn(zmr50,2)),linethick1,color0000ff;end;
if barstatus=2 and (zmc50) then begin drawtextrel(264,816,' 50 万大单卖出: '+numtostrn(zmc50,2)),linethick1,color00ff00;end;
if barstatus=2 and (zmr75) then begin drawtextrel(17,868,' 75 万大单买入: '+numtostrn(zmr75,2)),linethick1,color9900ff;end;
if barstatus=2 and (zmc75) then begin drawtextrel(264,868,' 75 万大单卖出: '+numtostrn(zmc75,2)),linethick1,color99ff00;end;
if barstatus=2 and (zmr100) then begin drawtextrel(17,920,'100 万大单买入: '+numtostrn(zmr100,2)),linethick1,color0000ff;end;
if barstatus=2 and (zmc100) then begin drawtextrel(264,920,' 100 万大单卖出: '+numtostrn(zmc100,2)),linethick1,color00ff00;end;
if barstatus=2 and (zmr+zmc) then begin drawtextrel(475,545,' 成交总额: '+numtostrn(zmr+zmc,2)),linethick2,color6699ff;end;
if barstatus=2 and (rcc) and rcc<0 then begin drawtextrel(480,608,' 总成交净额: '+numtostrn(rcc,2)),linethick1,colorffff00;end;
if barstatus=2 and (rcc) and rcc>0 then begin drawtextrel(480,608,' 总成交净额: '+numtostrn(rcc,2)),linethick1,color9966ff;end;
if barstatus=2 and (mmc0) and mmc0<0 then begin drawtextrel(480,660,' 小单净额: '+numtostrn(mmc0,2)),linethick1,colorff9900;end;
if barstatus=2 and (mmc0) and mmc0>0 then begin drawtextrel(480,660,' 小单净额: '+numtostrn(mmc0,2)),linethick1,color9966ff;end;
if barstatus=2 and (mmc5) and mmc5<0 then begin drawtextrel(480,712,' 中单净额: '+numtostrn(mmc5,2)),linethick1,colorff6600;end;
if barstatus=2 and (mmc5) and mmc5>0 then begin drawtextrel(480,712,' 中单净额: '+numtostrn(mmc5,2)),linethick1,color9966ff;end;
if barstatus=2 and (mmc10) and mmc10<0 then begin drawtextrel(480,764,' 大单净额: '+numtostrn(mmc10,2)),linethick1,colorff9900;end;
if barstatus=2 and (mmc10) and mmc10>0 then begin drawtextrel(480,764,' 大单净额: '+numtostrn(mmc10,2)),linethick1,color0000ff;end;
if barstatus=2 and (mmc75) and mmc75<0 then begin drawtextrel(480,816,' 特大净额: '+numtostrn(mmc75,2)),linethick1,colorff6600;end;
if barstatus=2 and (mmc75) and mmc75>0 then begin drawtextrel(480,816,' 特大净额: '+numtostrn(mmc75,2)),linethick1,color0000ff;end;
xzj:=mmc0+mmc5;dzj:=mmc10+mmc75; if barstatus=2 and (xzj) and xzj<0 then begin drawtextrel(725,640,'小资金流出: '+numtostrn(abs(xzj),2)),linethick3,colorff9900;end;
if barstatus=2 and (xzj) and xzj>0 then begin drawtextrel(725,640,'小资金流入: '+numtostrn(xzj,2)),linethick3,color9966ff;end;
if barstatus=2 and (dzj) and dzj<0 then begin drawtextrel(725,734,'大资金流出: '+numtostrn(abs(dzj),2)),linethick3,colorff9900;end;
if barstatus=2 and (dzj) and dzj>0 then begin drawtextrel(720,734,'大资金流入: '+numtostrn(dzj,2)),linethick3,color0000ff;end;
if barstatus=2 and (mmc200) and mmc200<0 then begin drawtextrel(479,898,' 大机构减仓: '+numtostrn(abs(mmc200),2)),linethick4,coloreeeeee;end;
if barstatus=2 and (mmc200) and mmc200<0 then begin drawtextrel(480,899,' 大机构减仓: '+numtostrn(abs(mmc200),2)),linethick4,colorff0000;end;
if barstatus=2 and (mmc200) and mmc200>0 then begin drawtextrel(479,898,' 大机构增仓: '+numtostrn(mmc200,2)),linethick4,coloreeeeee;end;
if barstatus=2 and (mmc200) and mmc200>0 then begin drawtextrel(480,899,' 大机构增仓: '+numtostrn(mmc200,2)),linethick4,color0000ff;end;
mrl:=sum(buyvol,0);
mcl:=sum(sellvol,0);
dydd:=100*n1;
tddr:=sum(if(buyvol>800,buyvol,0),0);
tddc:=sum(if(sellvol>800,sellvol,0),0);
ddr:=sum(if(buyvol>dydd,buyvol,0),0);
ddc:=sum(if(sellvol>dydd,sellvol,0),0);
xdr:=mrl-ddr;
xdc:=mcl-ddc;
dr:=sum(if(buyvol>dydd,buyvol,0)*c,0);
drj:=dr/ddr;
dc:=sum(if(sellvol>dydd,sellvol,0)*c,0);
dcj:=dc/ddc;
zb:=sum(if(buyvol>0,1,0),0)+sum(if(sellvol>0,1,0),0);
drawtextabs(20,55,' 总买入量: '+mrl),color0099ff,linethick2;
drawtextabs(215,55,' 总卖入量: '+mcl),colorffff66,linethick2;
drawtextabs(20,74,'■ 特大买入: '+tddr),color0000ff,linethick2;
drawtextabs(170,74,''+floor(tddr/(mrl+mcl)*100)+' %'),color0000ff,linethick2;
drawtextabs(215,74,'■ 特大卖出: '+tddc),color00ff00,linethick2;
drawtextabs(365,74,''+floor(tddc/(mrl+mcl)*100)+' %'),color00ff00,linethick2;
drawtextabs(20,93,'■ 大单买入: '+ddr),colorcc66ff,linethick2;
drawtextabs(170,93,''+floor(ddr/(mrl+mcl)*100)+' %'),colorcc66ff,linethick2;
drawtextabs(215,93,'■ 大单卖出: '+ddc),colorff9966,linethick2;
drawtextabs(365,93,''+floor(ddc/(mrl+mcl)*100)+' %'),colorff9966,linethick2;
drawtextabs(20,112,'■ 小单买入: '+xdr),color99ccff,linethick2;
drawtextabs(170,112,''+floor(xdr/(mrl+mcl)*100)+' %'),color99ccff,linethick2;
drawtextabs(215,112,'■ 小单卖出: '+xdc),colorccffcc,linethick2;
drawtextabs(365,112,''+floor(xdc/(mrl+mcl)*100)+' %'),colorccffcc,linethick2;
drawtextabs(20,131,' 大单买均价: '+drj),color6600ff,linethick2;
drawtextabs(215,131,' 大单卖均价: '+dcj),color99ff33,linethick2;
drawtextabs(415,55,' 总成交量: '+(mrl+mcl)),colorccccff,linethick2;
drawtextabs(415,74,' 特大净量: '+(tddr-tddc)),colorcc66ff,linethick2;
drawtextabs(415,93,' 大单净量: '+(ddr-ddc)),colorccff33,linethick2;
drawtextabs(415,112,' 小单净量: '+(xdr-xdc)),colorffcc66,linethick2;
drawtextabs(415,131,' 总买净量: '+(mrl-mcl)+' 总笔数: '+zb+' 每笔 '+numtostrn(((mrl+mcl)/zb),0)+' 手'),color00ffff,linethick2;
drawtextabs(562,96,'参数1:'+dydd+' 参数2:'+jg),linethick3,colorffffff; stickline((dynainfo(8) and dispstatus=2),0,dynainfo(8),60,1),colorffffff;
stickline((tddr+tddc+ddr+ddc+xdr+xdc and dispstatus=2),0,dynainfo(8),60,0),color99ccff;
stickline((tddr+tddc+ddr+ddc+xdc and dispstatus=2),0,tddr+tddc+ddr+ddc+xdc,60,0),colorcc66ff;
stickline((tddr+tddc+ddc+xdc and dispstatus=2),0,tddr+tddc+ddc+xdc,60,0),color0000ff;
stickline((tddc+ddc+xdc and dispstatus=2),0,tddc+ddc+xdc,60,0),color00ff00;
stickline((ddc+xdc and dispstatus=2),0,ddc+xdc,60,0),colorff9966;
stickline((xdc and dispstatus=2),0,xdc,60,0),colorccffcc;
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文盘口分析-公式下载 大智慧盘口仅供学习研究。