[板块个股分析]供短线抓牛股
先建立引用公式,再建立主公式
板块个股分析(引用)
{ggzj}
cc:=c;
hh:=h;
ll:=l;
a1:=amount/(100*vol);
a:=(cc-a1)/(h-l);
aa:=sum(a*v,1);
一日:aa/capital*10000;
aa1:=ref(aa,1);
昨日:aa1/capital*10000;
aa2:=ref(aa,2);;
前天:aa2/capital*10000;
aa3:=sum(a*v,5);
一周:aa3/capital*10000;
vv:v/capital*100;
vv1:1/2*v/capital*100;
dd:date;
日涨幅:(c/ref(c,1)-1)*100;
周涨幅:(c/ref(c,5)-1)*100;
{板块个股分析2}
drawgbk((close > 0),colorrgb(0,0,0),colorrgb(0,0,0),1);
rq:=date;//取日期
a:=blkname;
hy:=strleft(a,strfind(a,',',1)-1);
hys:=stkcount(hy);
板块个股数:hys,linethick0;
dyzb:=if(c>0,'ggzj.一日',if(c<0,'ggzj.vv','ggzj.vv1'));
das:=datacount;
d0:=rq[das];//取最后日期
variable:dm[hys]='',vcp[hys]=0,vci[hys]=0,tp=0;
for k=1 to hys dobegin
ddd:=stkfromblk(hy,k);
dm[k]:=ddd;
tmp:=stkindi(ddd,dyzb,0,6);
tmpd:=stkindi(ddd,'ggzj.dd',0,6);
vcp[k]:=tmp[das];
vci[k]:=if(tmpd[das]=d0,tmp[das],-1000);//去除当天停牌股
tp:=tp+if(vci[k]=-1000,1,0);
end;
px1:=sortpos(vci,1,1,hys);
drawtextex(islastbar,1,115,50,'[当日攻击资金前十名]'),color1080fa;
drawtextex(islastbar,1,10,250,'1: '+stknameex(dm[vci[1]])+':'+numtostr(vcp[vci[1]],2)),color0000ff;
drawtextex(islastbar,1,10,400,'2: '+stknameex(dm[vci[2]])+':'+numtostr(vcp[vci[2]],2)),color0000ff;
drawtextex(islastbar,1,10,550,'3: '+stknameex(dm[vci[3]])+':'+numtostr(vcp[vci[3]],2)),color0000ff;
drawtextex(islastbar,1,10,700,'4: '+stknameex(dm[vci[4]])+':'+numtostr(vcp[vci[4]],2)),color0000ff;
drawtextex(islastbar,1,10,850,'5: '+stknameex(dm[vci[5]])+':'+numtostr(vcp[vci[5]],2)),color0000ff;
drawtextex(islastbar,1,275,250,'6: '+stknameex(dm[vci[6]])+':'+numtostr(vcp[vci[6]],2)),color0000ff;
drawtextex(islastbar,1,275,400,'7: '+stknameex(dm[vci[7]])+':'+numtostr(vcp[vci[7]],2)),color0000ff;
drawtextex(islastbar,1,275,550,'8: '+stknameex(dm[vci[8]])+':'+numtostr(vcp[vci[8]],2)),color0000ff;
drawtextex(islastbar,1,275,700,'9: '+stknameex(dm[vci[9]])+':'+numtostr(vcp[vci[9]],2)),color0000ff;
drawtextex(islastbar,1,275,850,'10: '+stknameex(dm[vci[10]])+':'+numtostr(vcp[vci[10]],2)),color0000ff;
dyzb:=if(c>0,'ggzj.一日',if(c<0,'ggzj.vv','ggzj.vv1'));
das:=datacount;
d0:=rq[das];//取最后日期
variable:dm[hys]='',vcp[hys]=0,vci[hys]=0,tp=0;
for k=1 to hys dobegin
ddd:=stkfromblk(hy,k);
dm[k]:=ddd;
tmp:=stkindi(ddd,dyzb,0,6);
tmpd:=stkindi(ddd,'ggzj.dd',0,6);
vcp[k]:=tmp[das];
vci[k]:=if(tmpd[das]=d0,tmp[das],-1000);//去除当天停牌股
tp:=tp+if(vci[k]=-1000,1,0);
end;
px1:=sortpos(vci,0,1,hys);
drawtextex(islastbar,1,650,50,'[当日攻击资金后十名]'),color00ff33;
drawtextex(islastbar,1,545,250,'1: '+stknameex(dm[vci[1]])+':'+numtostr(vcp[vci[1]],2)),color00ff33;
drawtextex(islastbar,1,545,400,'2: '+stknameex(dm[vci[2]])+':'+numtostr(vcp[vci[2]],2)),color00ff33;
drawtextex(islastbar,1,545,550,'3: '+stknameex(dm[vci[3]])+':'+numtostr(vcp[vci[3]],2)),color00ff33;
drawtextex(islastbar,1,545,700,'4: '+stknameex(dm[vci[4]])+':'+numtostr(vcp[vci[4]],2)),color00ff33;
drawtextex(islastbar,1,545,850,'5: '+stknameex(dm[vci[5]])+':'+numtostr(vcp[vci[5]],2)),color00ff33;
drawtextex(islastbar,1,815,250,'6: '+stknameex(dm[vci[6]])+':'+numtostr(vcp[vci[6]],2)),color00ff33;
drawtextex(islastbar,1,815,400,'7: '+stknameex(dm[vci[7]])+':'+numtostr(vcp[vci[7]],2)),color00ff33;
drawtextex(islastbar,1,815,550,'8: '+stknameex(dm[vci[8]])+':'+numtostr(vcp[vci[8]],2)),color00ff33;
drawtextex(islastbar,1,815,700,'9: '+stknameex(dm[vci[9]])+':'+numtostr(vcp[vci[9]],2)),color00ff33;
drawtextex(islastbar,1,815,850,'10: '+stknameex(dm[vci[10]])+':'+numtostr(vcp[vci[10]],2)),color00ff33;
dyzb4:=if(c>0,'ggzj.日涨幅',if(c<0,'ggzj.vv','ggzj.vv1'));
das:=datacount;
d0:=rq[das];//取最后日期
variable:dm[hys]='',vcp[hys]=0,vci[hys]=0,tp=0;
for k=1 to hys dobegin
ddd:=stkfromblk(hy,k);
dm[k]:=ddd;
tmp:=stkindi(ddd,dyzb4,0,6);
tmpd:=stkindi(ddd,'ggzj.dd',0,6);
vcp[k]:=tmp[das];
vci[k]:=if(tmpd[das]=d0,tmp[das],-1000);//去除当天停牌股
tp:=tp+if(vci[k]=-1000,1,0);
end;
px1:=sortpos(vci,1,1,hys);
//px2:=sortpos(vcp,1,1,hys);
khys:=hys-tp,linethick;
if khys<2 then exit;
explain(islastbar,'[日涨跌幅领先前十五名]'),color00ffff;
explain(islastbar,' 1: '+stknameex(dm[vci[1]])+' '+numtostr(vcp[vci[1]],2)+'%'),color0000f9;
explain(islastbar and khys>1,' 2: '+stknameex(dm[vci[2]])+' '+numtostr(vcp[vci[2]],2)+'%'),color0000f9;
if khys<3 then exit;
explain(islastbar and khys>2,' 3: '+stknameex(dm[vci[3]])+' '+numtostr(vcp[vci[3]],2)+'%'),color0000f9;
if khys<4 then exit;
explain(islastbar and khys>3,' 4: '+stknameex(dm[vci[4]])+' '+numtostr(vcp[vci[4]],2)+'%'),color0000f9;
if khys<5 then exit;
explain(islastbar and khys>4,' 5: '+stknameex(dm[vci[5]])+' '+numtostr(vcp[vci[5]],2)+'%'),color0000f9;
if khys<6 then exit;
explain(islastbar and khys>5,' 6: '+stknameex(dm[vci[6]])+' '+numtostr(vcp[vci[6]],2)+'%'),color0000f9;
if khys<7 then exit;
explain(islastbar and khys>6,' 7: '+stknameex(dm[vci[7]])+' '+numtostr(vcp[vci[7]],2)+'%'),color0000f9;
if khys<8 then exit;
explain(islastbar and khys>7,' 8: '+stknameex(dm[vci[8]])+' '+numtostr(vcp[vci[8]],2)+'%'),color0000f9;
if khys<9 then exit;
explain(islastbar and khys>8,' 9: '+stknameex(dm[vci[9]])+' '+numtostr(vcp[vci[9]],2)+'%'),color0000f9;
if khys<10 then exit;
explain(islastbar and khys>9,' 10: '+stknameex(dm[vci[10]])+' '+numtostr(vcp[vci[10]],2)+'%'),color0000f9;
if khys<11 then exit;
explain(islastbar and khys>10,' 11: '+stknameex(dm[vci[11]])+' '+numtostr(vcp[vci[11]],2)+'%'),color0000f9;
if khys<12 then exit;
explain(islastbar and khys>11,' 12: '+stknameex(dm[vci[12]])+' '+numtostr(vcp[vci[12]],2)+'%'),color0000f9;
if khys<13 then exit;
explain(islastbar and khys>12,' 13: '+stknameex(dm[vci[13]])+' '+numtostr(vcp[vci[13]],2)+'%'),color0000f9;
if khys<14 then exit;
explain(islastbar and khys>13,' 14: '+stknameex(dm[vci[14]])+' '+numtostr(vcp[vci[14]],2)+'%'),color0000f9;
if khys<15 then exit;
explain(islastbar and khys>14,' 15: '+stknameex(dm[vci[15]])+' '+numtostr(vcp[vci[15]],2)+'%'),color0000f9;
if khys<16 then exit;
explain(islastbar,'\n[日涨跌幅滞后前十名]'),color00ccff;
explain(islastbar,' 1: '+stknameex(dm[vci[khys]])+' '+numtostr(vcp[vci[khys]],2)+'%'+' \n 2: '+stknameex(dm[vci[khys-1]])+' '+numtostr(vcp[vci[khys-1]],2)+'%'+' \n 3: '+
stknameex(dm[vci[khys-2]])+' '+numtostr(vcp[vci[khys-2]],2)+'%'+' \n 4: '+stknameex(dm[vci[khys-3]])+' '+numtostr(vcp[vci[khys-3]],2)+'%'+
' \n 5: '+stknameex(dm[vci[khys-4]])+' '+numtostr(vcp[vci[khys-4]],2)+'%'+' \n 6: '+stknameex(dm[vci[khys-5]])+' '+numtostr(vcp[vci[khys-5]],2)+'%'+' \n 7: '+
stknameex(dm[vci[khys-6]])+' '+numtostr(vcp[vci[khys-6]],2)+'%'+' \n 8: '+stknameex(dm[vci[khys-7]])+' '+numtostr(vcp[vci[khys-7]],2)+'%'+
' \n 9: '+ stknameex(dm[vci[khys-8]])+' '+numtostr(vcp[vci[khys-8]],2)+'%'+' \n 10: '+
stknameex(dm[vci[khys-9]])+' '+numtostr(vcp[vci[khys-9]],2)+'%'),color00a800;
上一指标公式:宝塔线翻红修改版公式下载 大智慧修改版宝塔
下一指标公式:百万主图公式下载 大智慧公式
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文[板块个股分析]供短线抓牛股公式下载 大智慧牛股板块仅供学习研究。