分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册
当前位置：分析家公式网 → 股票公式 → 飞狐公式 → 一键转帖：千钧【板块涨跌、资金流向】

软件名称：[B]千钧【板块涨跌、资金流向】[/B]
软件类型：国产软件
运行环境：Win9X/2000/XP/2003/
软件语言：简体中文
授权方式：解密版
软件大小：4.00 KB
官方主页：Home Page
更新时间：2008-11-30 12:32:35
软件简介:

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;  
[url=http://www.70822.com/soft/sort013/sort02/down-4729.html]千钧【板块涨跌、资金流向】[/url]

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明：本站所有股票公式软件资料均网上公开收集，如侵权请联系删帖。站内所有广告，均与本站无关！
Copyright © 2003-2024 70822.Com. All Rights Reserved .
页面执行时间：62.50000 毫秒