input:n(1000,1,10000);
drawgbklast(c>0, strip(rgb(0,0,30),rgb(0,0,120),0));
drawtextrel(10,5,stklabel),linethick4,colorffff00;
drawtextrel(140,5,stkname),linethick4,color00ffff;
drawtextabs(310,145,'收益:'+numtostrn(finance2(3),2)+' 市盈:'+numtostrn(dynainfo(39),2)+' 市净:'+numtostrn(dynainfo(58),2)),linethick1,color00ff00;
drawtextrel(20,500,'-------------------------2007-07-24-(一发千钧制作)-------------------------------------------------------'),linethick1,color0068ff;
a:=buyvol*c/100;
bz:=sum(a,0);
b:=sellvol*c/100;
sz:=sum(b,0);
z:=bz+sz;
cz:=bz-sz;
xb5:=if(a<=5 ,a,0);b5:=sum(xb5,0);
xs5:=if(b<=5 ,b,0);s5:=sum(xs5,0);
xb10:=if(a<=10 and a>5 ,a,0);b10:=sum(xb10,0);
xs10:=if(b<=10 and b>5,b,0);s10:=sum(xs10,0);
xb30:=if(a<=30 and a>10 ,a,0);b30:=sum(xb30,0);
xs30:=if(b<=30 and b>10 ,b,0);s30:=sum(xs30,0);
xb50:=if(a<=50 and a>30 ,a,0);b50:=sum(xb50,0);
xs50:=if(b<=50 and b>30 ,b,0);s50:=sum(xs50,0);
xb70:=if(a<=70 and a>50 ,a,0);b70:=sum(xb70,0);
xs70:=if(b<=70 and b>50 ,b,0);s70:=sum(xs70,0);
xb100:=if(a<=100 and a>70,a,0);b100:=sum(xb100,0);
xs100:=if(b<=100 and b>70,b,0);s100:=sum(xs100,0);
xb150:=if(a>100 ,a,0);b150:=sum(xb150,0);
xs150:=if(b>100 ,b,0);s150:=sum(xs150,0);
j5:=b5-s5;
j10:=b10-s10;
j30:=b30-s30;
j50:=b50-s50;
j70:=b70-s70;
j100:=b100-s100;
j150:=b150-s150;
if barstatus=2 and (z) then begin drawtextrel(260,5,' ■总成交金额(万元):'+numtostrn(dynainfo(10)/10000,2)),linethick4,colorccffcc;end;
if barstatus=2 and (bz) then begin drawtextrel(30,550,'■■■买入金额:'+numtostrn(bz,2)),linethick1,colorred;end;
if barstatus=2 and (sz) then begin drawtextrel(250,550,' ■■■卖出金额:'+numtostrn(sz,2)),linethick1,colorgreen;end;
if barstatus=2 and (b5) then begin drawtextrel(30,600,' 5 万大单买入:' +numtostrn(b5,2)),linethick1,colorred;end;
if barstatus=2 and (s5) then begin drawtextrel(250,600,' 5 万大单卖出:'+numtostrn(s5,2)),linethick1,colorgreen;end;
if barstatus=2 and (b10) then begin drawtextrel(30,650,' 10 万大单买入:'+numtostrn(b10,2)),linethick1,colorred;end;
if barstatus=2 and (s10) then begin drawtextrel(250,650,' 10 万大单卖出:'+numtostrn(s10,2)),linethick1,colorgreen;end;
if barstatus=2 and (b30) then begin drawtextrel(30,700,' 30 万大单买入:'+numtostrn(b30,2)),linethick1,colorred;end;
if barstatus=2 and (s30) then begin drawtextrel(250,700,' 30 万大单卖出:'+numtostrn(s30,2)),linethick1,colorgreen;end;
if barstatus=2 and (b50) then begin drawtextrel(30,750,' 50 万大单买入:'+numtostrn(b50,2)),linethick1,colorred;end;
if barstatus=2 and (s50) then begin drawtextrel(250,750,' 50 万大单卖出:'+numtostrn(s50,2)),linethick1,colorgreen;end;
if barstatus=2 and (b70) then begin drawtextrel(30,800,' 70 万大单买入:'+numtostrn(b70,2)),linethick1,colorred;end;
if barstatus=2 and (s70) then begin drawtextrel(250,800,' 70 万大单卖出:'+numtostrn(s70,2)),linethick1,colorgreen;end;
if barstatus=2 and (b100) then begin drawtextrel(30,850,'100 万大单买入:'+numtostrn(b100,2)),linethick1,colorred;end;
if barstatus=2 and (s100) then begin drawtextrel(250,850,' 100 万大单卖出:'+numtostrn(s100,2)),linethick1,colorgreen;end;
if barstatus=2 and (b150) then begin drawtextrel(30,900,'150 万大单买入:'+numtostrn(b150,2)),linethick1,colorred;end;
if barstatus=2 and (s150) then begin drawtextrel(250,900,' 150 万大单卖出:'+numtostrn(s150,2)),linethick1,colorgreen;end;
if barstatus=2 and (cz) then begin drawtextrel(470,550,' ■■ 净买入金额:'+numtostrn(cz,2)),linethick1,colorccff00;end;
if barstatus=2 and (j5) then begin drawtextrel(470,600, ' 5 万大单净买入; '+numtostrn(j5,2)),linethick1,colorccff00;end;
if barstatus=2 and (j10) then begin drawtextrel(470,650, ' 10万大单净买入; '+numtostrn(j10,2)),linethick1,colorccff00;end;
if barstatus=2 and (j30) then begin drawtextrel(470,700, ' 30万大单净买入; '+numtostrn(j30,2)),linethick1,colorccff00;end;
if barstatus=2 and (j50) then begin drawtextrel(470,750, ' 50万大单净买入; '+numtostrn(j50,2)),linethick1,colorccff00;end;
if barstatus=2 and (j70) then begin drawtextrel(470,800, ' 70万大单净买入; '+numtostrn(j70,2)),linethick1,colorccff00;end;
if barstatus=2 and (j100) then begin drawtextrel(470,850,' 100万大单净买入; '+numtostrn(j100,2)),linethick1,colorccff00;end;
if barstatus=2 and (j150) then begin drawtextrel(470,900,' 150万大单净买入; '+numtostrn(j150,2)),linethick1,colorccff00;end;
委买总量:=sum((bidvol(1)+bidvol(2)+bidvol(3)),0);
委卖总量:=sum((askvol(1)+askvol(2)+askvol(3)),0);
www1:=sum(buyvol,0)-sum(sellvol,0);
买卖存量:=ref(www1,1)+www1;
日换手:dynainfo(36)*100,linethick0,color00ffff;
买入:=buyvol;
卖出:=sellvol;
流通:finance2(36)/10000,colorffff00,linethick0;
市值:dynainfo(7)*流通/10000,colorff00ff,linethick0;
买卖意愿:=(sum(buyvol,0)-sum(sellvol,0))/dynainfo(8)*100;
系数:=if(流通>20,1.25,if(流通<20,0.75,0));
门限:=市值*系数/10*n;
var1:=if(buyvol<=ref(askvol(1),1) and dynainfo( 7)=ref(askprice(1),1),buyvol,0);
var2:=if(buyvol<=(ref(askvol(1),1)+ref(askvol(2),1)) and dynainfo( 7)=ref(askprice(2),1),buyvol,0);
var3:=if(buyvol<=(ref(askvol(1),1)+ref(askvol(2),1)+ref(askvol(3),1)) and dynainfo( 7)=ref(askprice(3),1),buyvol,0);
var3a:=if(buyvol>(ref(askvol(1),1)+ref(askvol(2),1)+ref(askvol(3),1)) and dynainfo( 7)>ref(askprice(3),1),buyvol,0);
var41:=if(dynainfo( 7)<ref(askprice(1),1) and ref(bidvol(1),1)>0 and ref(askvol(1),1)>0,buyvol,0);
var42:=if((buyvol>ref(askvol(1),1) and dynainfo( 7)=ref(askprice(1),1) and ref(bidvol(1),1)>0),buyvol,0);
var42a:=if(var42>0,var42-ref(askvol(1),1),0);
var4b:=var41+var42a;
var51:=if(buyvol>ref(askvol(1),1) and dynainfo( 7)>ref(askprice(1),1) and dynainfo( 7)<ref(askprice(2),1),buyvol,0);
var52:=if(buyvol>(ref(askvol(1),1)+ref(askvol(2),1)) and dynainfo( 7)=ref(askprice(2),1) and ref(bidvol(1),1)>0,buyvol,0);
var52a:=if(var52>0,var52-(ref(askvol(1),1)+ref(askvol(2),1)),0);
var5b:=var51+var52a;
var61:=if(buyvol>ref(askvol(1),1)+ref(askvol(2),1) and dynainfo( 7)>ref(askprice(2),1) and dynainfo( 7)<ref(askprice(3),1),buyvol,0);
var62:=if(buyvol>(ref(askvol(1),1)+ref(askvol(2),1)+ref(askvol(3),1)) and dynainfo( 7)=ref(askprice(3),1) and ref(bidvol(1),1)>0,buyvol,0);
var62a:=if( var62>0,var62-(ref(askvol(1),1)+ref(askvol(2),1)+ref(askvol(3),1)),0);
var6b:=var61+var62a;
var9a:=if(sellvol>(ref(bidvol(1),1)+ref(bidvol(2),1)+ref(bidvol(3),1)) and dynainfo( 7)<ref(bidprice(3),1),sellvol,0);
vara1:=if(dynainfo( 7)>ref(bidprice(1),1) and ref(askvol(1),1)>0 and ref(bidvol(1),1)>0,sellvol,0);
vara2:=if(sellvol>ref(bidvol(1),1) and dynainfo( 7)=ref(bidprice(1),1) and ref(askvol(1),1)>0,sellvol,0);
varaa:=if(vara2>0,sellvol-ref(bidvol(1),1),0);
varb1:=if(sellvol>ref(bidvol(1),1) and dynainfo( 7)<ref(bidprice(1),1) and dynainfo( 7)>ref(bidprice(2),1),sellvol,0);
varb2:=if(sellvol>(ref(bidvol(1),1)+ref(bidvol(2),1)) and dynainfo( 7)=ref(bidprice(2),1) and ref(askvol(1),1)>0,sellvol,0);
varba:=if(varb2>0,sellvol-(ref(bidvol(1),1)+ref(bidvol(2),1)),0);
varab:=varb1+varba;
varc1:=if(sellvol>ref(bidvol(1),1)+ref(bidvol(2),1) and dynainfo( 7)<ref(bidprice(2),1) and dynainfo( 7)>ref(bidprice(3),1),sellvol,0);
varc2:=if(sellvol>(ref(bidvol(1),1)+ref(bidvol(2),1)+ref(bidvol(3),1)) and dynainfo( 7)=ref(bidprice(3),1) and ref(askvol(1),1)>0,sellvol,0);
varca:=if(varc2>0,sellvol-(ref(bidvol(1),1)+ref(bidvol(2),1)+ref(bidvol(3),1)),0);
varac:=varc1+varca;
varf:=if(askvol(1)<ref(askvol(1),1) and askprice(1)=ref(askprice(1),1) and dynainfo( 7)<ref(askprice(1),1) and (ref(askvol(1),1)-askvol(1))<>sellvol,ref(askvol(1),1)-askvol(1),0);
var10:=if(askvol(3)<ref(askvol(3),1) and askprice(3)=ref(askprice(3),1) and dynainfo( 7)<ref(askprice(3),1),ref(askvol(3),1)-askvol(3),0);
var11:=if((ref(bidvol(1),1)+ref(bidvol(2),1)+ref(bidvol(3),1))=0 and ref(askvol(1),1)>0 and (ref(askvol(1),1)-askvol(1))<sellvol and askvol(1)<ref(askvol(1),1) and askprice(1)=ref(askprice(1),1) and dynainfo( 7)<ref(askprice(1),1),ref(askvol(1),1)-askvol(1),0);
var12:=if(askvol(2)<ref(askvol(3),1) and askprice(2)=ref(askprice(3),1) and dynainfo( 7)<ref(askprice(3),1),ref(askvol(3),1)-askvol(2),0);
var13:=if(askvol(3)<ref(askvol(2),1) and askprice(3)=ref(askprice(2),1) and dynainfo( 7)<ref(askprice(2),1),ref(askvol(2),1)-askvol(3),0);
var14:=if(bidvol(1)<ref(bidvol(1),1) and bidprice(1)=ref(bidprice(1),1) and dynainfo( 7)>ref(bidprice(1),1) and ref(bidvol(1),1)-bidvol(1)<>buyvol,ref(bidvol(1),1)-bidvol(1),0);
var15:=if(bidvol(3)<ref(bidvol(3),1) and bidprice(3)=ref(bidprice(3),1) and dynainfo( 7)>ref(bidprice(3),1),ref(bidvol(3),1)-bidvol(3),0);
var16:=if(ref(askvol(1),1)+ref(askvol(2),1)+ref(askvol(3),1)=0 and ref(bidvol(1),1)>0 and ref(bidvol(1),1)-bidvol(1)<buyvol and bidvol(1)<ref(bidvol(1),1) and bidprice(1)=ref(bidprice(1),1) and dynainfo( 7)=ref(bidprice(1),1),ref(bidvol(1),1)-bidvol(1),0);
var17:=if(bidvol(2)<ref(bidvol(3),1) and bidprice(2)=ref(bidprice(3),1) and dynainfo( 7)>ref(bidprice(3),1),ref(bidvol(3),1)-bidvol(2),0);
var18:=if(bidvol(3)<ref(bidvol(2),1) and bidprice(3)=ref(bidprice(2),1) and dynainfo( 7)>ref(bidprice(2),1),ref(bidvol(2),1)-bidvol(3),0);
对敲买:=(var4b+var5b+var6b);
对敲卖:=(varaa+varab+varac);
撤卖:=if((varf+var10+var11+var12+var13)>buyvol,varf+var10+var11+var12+var13-buyvol,0);
撤买:=if((var14+var15+var16+var17+var18)>sellvol,var14+var15+var16+var17+var18-sellvol,0);
阻比:=(dynainfo(18)*dynainfo(11)-dynainfo(19)*dynainfo (11))/(dynainfo(18)*dynainfo(11)+dynainfo(19)*dynainfo (11))*100;
每笔均额:=amount/tickcount;
量比:=dynainfo(17)*100;
上一指标公式:骑牛打熊公式详解 大智慧骑牛打熊
下一指标公式:组合的公式详解 大智慧组合
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文千钧盯盘公式详解 大智慧千钧仅供学习研究。