5,linethick1,color0066ee;
ag:=stkcount('a股板块')*1000000;
aa:=if(c>ema(c,7),amount,0);
bb:=if(c<ema(c,7),amount,0);
jj:=amount/vol/100;
cc:=sum((aa-bb),10)/if(capital<1,jj*ag,capital*jj);
机构线:=ema(cc,28);
partline(机构线>80,机构线),color00ff00,linethick1;
partline(机构线>40 and 机构线<80,机构线),color0000ff,linethick1;
partline(机构线>5 and 机构线<40,机构线),colorff33ff,linethick1;
partline(机构线<5,机构线),colorffdd00,linethick1;
bk:='板块指数';stksum:=stkcount(bk);dcount:=datacount;yygs4:='涨幅引用.a0';
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
dm:=stkfromblk(bk,k);
dmstr[k]:=dm;
temp1:=stkindi(dm,yygs4,0,-1);
var_px[k]:=temp1[dcount];
var_indi[k]:=temp1[dcount];
end;
num1:=sortpos(var_indi,1,1,stksum);
dm_max1:=var_indi[1]; dm_max2:=var_indi[2];dm_max3:=var_indi[3]; dm_max4:=var_indi[4];dm_max5:=var_indi[5];
max1:=var_px[dm_max1]; max2:=var_px[dm_max2]; max3:=var_px[dm_max3];max4:=var_px[dm_max4]; max5:=var_px[dm_max5];
drawtextex(c,1,40,0,'【涨幅前五名】'),color00ffff;
drawtextex(c,1,20,150,'1:'+stknameex(dmstr[dm_max1])+':'+numtostr(max1,2)),color0000ff;
drawtextex(c,1,20,300,'2:'+stknameex(dmstr[dm_max2])+':'+numtostr(max2,2)),color0000ff;
drawtextex(c,1,20,450,'3:'+stknameex(dmstr[dm_max3])+':'+numtostr(max3,2)),color0000ff;
drawtextex(c,1,20,600,'4:'+stknameex(dmstr[dm_max4])+':'+numtostr(max4,2)),color0000ff;
drawtextex(c,1,20,750,'5:'+stknameex(dmstr[dm_max5])+':'+numtostr(max5,2)),color0000ff;
yygs5:='涨幅引用.a0';
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
dm:=stkfromblk(bk,k);
dmstr[k]:=dm;
temp1:=stkindi(dm,yygs5,0,-1);
var_px[k]:=temp1[dcount];
var_indi[k]:=temp1[dcount];
end;
num1:=sortpos(var_indi,0,1,stksum);
dm_max1:=var_indi[1];dm_max2:=var_indi[2];dm_max3:=var_indi[3]; dm_max4:=var_indi[4];dm_max5:=var_indi[5];
max1:=var_px[dm_max1]; max2:=var_px[dm_max2]; max3:=var_px[dm_max3];max4:=var_px[dm_max4]; max5:=var_px[dm_max5];
drawtextex(c,1,255,0,'【跌幅前五名】'),colorffff00;
drawtextex(c,1,240,150,'1:'+stknameex(dmstr[dm_max1])+':'+numtostr(max1,2)),colorgreen;
drawtextex(c,1,240,300,'2:'+stknameex(dmstr[dm_max2])+':'+numtostr(max2,2)),colorgreen;
drawtextex(c,1,240,450,'3:'+stknameex(dmstr[dm_max3])+':'+numtostr(max3,2)),colorgreen;
drawtextex(c,1,240,600,'4:'+stknameex(dmstr[dm_max4])+':'+numtostr(max4,2)),colorgreen;
drawtextex(c,1,240,750,'5:'+stknameex(dmstr[dm_max5])+':'+numtostr(max5,2)),colorgreen;
yygs:='涨幅引用.zja';stksum:=stkcount(bk);dcount:=datacount;
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
dm:=stkfromblk(bk,k);
dmstr[k]:=dm;
temp1:=stkindi(dm,yygs,0,-1);
var_px[k]:=temp1[dcount];
var_indi[k]:=temp1[dcount];
end;
num1:=sortpos(var_indi,1,1,stksum);
dm_max1:=var_indi[1];dm_max2:=var_indi[2];dm_max3:=var_indi[3]; dm_max4:=var_indi[4];dm_max5:=var_indi[5];
max1:=var_px[dm_max1]; max2:=var_px[dm_max2]; max3:=var_px[dm_max3]; max4:=var_px[dm_max4]; max5:=var_px[dm_max5];
drawtextex(c,1,540,0,'【入场前五名】'),,color00ffff;
drawtextex(c,1,520,150,'1:'+stknameex(dmstr[dm_max1])+':'+numtostr(max1,2)),color0000ff;
drawtextex(c,1,520,300,'2:'+stknameex(dmstr[dm_max2])+':'+numtostr(max2,2)),color0000ff;
drawtextex(c,1,520,450,'3:'+stknameex(dmstr[dm_max3])+':'+numtostr(max3,2)),color0000ff;
drawtextex(c,1,520,600,'4:'+stknameex(dmstr[dm_max4])+':'+numtostr(max4,2)),color0000ff;
drawtextex(c,1,520,750,'5:'+stknameex(dmstr[dm_max5])+':'+numtostr(max5,2)),color0000ff;
yygs2:='涨幅引用.zjb';
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
dm:=stkfromblk(bk,k);
dmstr[k]:=dm;
temp1:=stkindi(dm,yygs2,0,-1);
var_px[k]:=temp1[dcount];
var_indi[k]:=temp1[dcount];
end;
num1:=sortpos(var_indi,1,1,stksum);
dm_max1:=var_indi[1];dm_max2:=var_indi[2];dm_max3:=var_indi[3]; dm_max4:=var_indi[4];dm_max5:=var_indi[5];
max1:=var_px[dm_max1]; max2:=var_px[dm_max2]; max3:=var_px[dm_max3]; max4:=var_px[dm_max4]; max5:=var_px[dm_max5];
drawtextex(c,1,795,0,'【退场前五名】'),colorffff00;
drawtextex(c,1,770,150,'1:'+stknameex(dmstr[dm_max1])+':'+numtostr(max1,2)),colorgreen;
drawtextex(c,1,770,300,'2:'+stknameex(dmstr[dm_max2])+':'+numtostr(max2,2)),colorgreen;
drawtextex(c,1,770,450,'3:'+stknameex(dmstr[dm_max3])+':'+numtostr(max3,2)),colorgreen;
drawtextex(c,1,770,600,'4:'+stknameex(dmstr[dm_max4])+':'+numtostr(max4,2)),colorgreen;
drawtextex(c,1,770,750,'5:'+stknameex(dmstr[dm_max5])+':'+numtostr(max5,2)),colorgreen;
yygs6:='涨幅引用.aa';
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
dm:=stkfromblk(bk,k);
dmstr[k]:=dm;
temp1:=stkindi(dm,yygs6,0,-1);
var_px[k]:=temp1[dcount];
var_indi[k]:=temp1[dcount];
end;
num1:=sortpos(var_indi,1,1,stksum);
dm_max1:=var_indi[1];dm_max2:=var_indi[2]; dm_max3:=var_indi[3]; dm_max4:=var_indi[4];dm_max5:=var_indi[5];
max1:=var_px[dm_max1]; max2:=var_px[dm_max2]; max3:=var_px[dm_max3];max4:=var_px[dm_max4]; max5:=var_px[dm_max5];
explain(islastbar,'【周涨幅--前五名】'),color00eeff;
explainex(islastbar,'1:'+stknameex(dmstr[dm_max1])+':',max1,2,0),color0000ff;
explainex(islastbar,'2:'+stknameex(dmstr[dm_max2])+':',max2,2,0),color0000ff;
explainex(islastbar,'3:'+stknameex(dmstr[dm_max3])+':',max3,2,0),color0000ff;
explainex(islastbar,'4:'+stknameex(dmstr[dm_max4])+':',max4,2,0),color0000ff;
explainex(islastbar,'5:'+stknameex(dmstr[dm_max5])+':',max5,2,1),color0000ff;
yygs7:='涨幅引用.aa';
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
dm:=stkfromblk(bk,k);
dmstr[k]:=dm;
temp1:=stkindi(dm,yygs7,0,-1);
var_px[k]:=temp1[dcount];
var_indi[k]:=temp1[dcount];
end;
num1:=sortpos(var_indi,0,1,stksum);
dm_max1:=var_indi[1];dm_max2:=var_indi[2];dm_max3:=var_indi[3]; dm_max4:=var_indi[4];dm_max5:=var_indi[5];
max1:=var_px[dm_max1]; max2:=var_px[dm_max2]; max3:=var_px[dm_max3];max4:=var_px[dm_max4]; max5:=var_px[dm_max5];
explain(islastbar,'【周跌幅--前五名】'),colorffff00;
explainex(islastbar,'1:'+stknameex(dmstr[dm_max1])+':',max1,2,0),colorgreen;
explainex(islastbar,'2:'+stknameex(dmstr[dm_max2])+':',max2,2,0),colorgreen;
explainex(islastbar,'3:'+stknameex(dmstr[dm_max3])+':',max3,2,0),colorgreen;
explainex(islastbar,'4:'+stknameex(dmstr[dm_max4])+':',max4,2,0),colorgreen;
explainex(islastbar,'5:'+stknameex(dmstr[dm_max5])+':',max5,2,1),colorgreen;
yygs1:='涨幅引用.时段a';
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
dm:=stkfromblk(bk,k);
dmstr[k]:=dm;
temp1:=stkindi(dm,yygs1,0,-1);
var_px[k]:=temp1[dcount];
var_indi[k]:=temp1[dcount];
end;
num1:=sortpos(var_indi,1,1,stksum);
dm_max1:=var_indi[1];dm_max2:=var_indi[2];dm_max3:=var_indi[3]; dm_max4:=var_indi[4];dm_max5:=var_indi[5];
max1:=var_px[dm_max1]; max2:=var_px[dm_max2]; max3:=var_px[dm_max3]; max4:=var_px[dm_max4]; max5:=var_px[dm_max5];
explain(islastbar,'【周资金流入前五名】'),color00ffff;
explainex(islastbar,'1:'+stknameex(dmstr[dm_max1])+':',max1,2,0),color0000ff;
explainex(islastbar,'2:'+stknameex(dmstr[dm_max2])+':',max2,2,0),color0000ff;
explainex(islastbar,'3:'+stknameex(dmstr[dm_max3])+':',max3,2,0),color0000ff;
explainex(islastbar,'4:'+stknameex(dmstr[dm_max4])+':',max4,2,0),color0000ff;
explainex(islastbar,'5:'+stknameex(dmstr[dm_max5])+':',max5,2,1),color0000ff;
yygs3:='涨幅引用.时段b';
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
dm:=stkfromblk(bk,k);
dmstr[k]:=dm;
temp1:=stkindi(dm,yygs3,0,-1);
var_px[k]:=temp1[dcount];
var_indi[k]:=temp1[dcount];
end;
num1:=sortpos(var_indi,1,1,stksum);
dm_max1:=var_indi[1]; dm_max2:=var_indi[2];dm_max3:=var_indi[3]; dm_max4:=var_indi[4]; dm_max5:=var_indi[5];
max1:=var_px[dm_max1]; max2:=var_px[dm_max2]; max3:=var_px[dm_max3]; max4:=var_px[dm_max4]; max5:=var_px[dm_max5];
explain(islastbar,'【周资金流出前五名】'),color00ff00;
explainex(islastbar,'1:'+stknameex(dmstr[dm_max1])+':',max1,2,0),,colorffff00;
explainex(islastbar,'2:'+stknameex(dmstr[dm_max2])+':',max2,2,0),,colorffff00;
explainex(islastbar,'3:'+stknameex(dmstr[dm_max3])+':',max3,2,0),,colorffff00;
explainex(islastbar,'4:'+stknameex(dmstr[dm_max4])+':',max4,2,0),,colorffff00;
explainex(islastbar,'5:'+stknameex(dmstr[dm_max5])+':',max5,2,1),,colorffff00;
drawtextex(c,1,455,0,'一'),colorffff00;drawtextex(c,1,455,150,'发'),colorffff00;
drawtextex(c,1,455,300,'千'),colorffff00;drawtextex(c,1,455,450,'钧'),colorffff00;
drawtextex(c,1,455,600,'制'),colorffff00;drawtextex(c,1,455,750,'作'),colorffff00;
drawtextex(c,1,220,960,'========2008==【理想论坛荣誉出品】==0615========'),color00ff00;
//
上一指标公式:成功率78.52%公式 飞狐成功率指标 源码
下一指标公式:成功率77.57%公式 飞狐成功率指标 源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文千钧板块涨跌资金流向公式 飞狐流向板块指标 源码仅供学习研究。