⊙基金状况排序 (鹏博F10)------ 指标原码

K线商人

{基金状况排序}
{限制}
限制:=INBLOCK('基金板块');
tt1:=BARPOS=SYSPARAM(2);
Zbxz:=STRCMP(USERNAME,HARDWAREID)>0;
DRAWTEXT(tt1&&限制=0&&Zbxz,C,'注册:'+USERNAME+'  硬件:'+HARDWAREID+'  ←对不起，此公式仅限“基金”使用！'),PXDN50,align4,COLORYELLOW;
IF 限制=0 THEN EXIT;

{指标：-------------------☆功能开关------------------------}
//表格
s1:=SYSPARAM(1);
s2:=SYSPARAM(2);
s3:=SYSPARAM(3);
KS:=SYSPARAM(3)-SYSPARAM(2);
Z:=ks/80;
x:=barpos=s2;
x1:=barpos=s2+ROUND(z);
{竖线}
x0:=barpos=s2+ROUND(z*27);
x1:=barpos=s2+ROUND(z*55);
x2:=barpos=s2+ROUND(z*27);
x3:=barpos=s2+ROUND(z*55);
x5:=barpos=s2+ROUND(z*80);
{基金情况-鹏博F10}
RQW:=F10FIND('指标名称',100),LINETHICK;
JZW:=F10FIND('单位基金净值',100),LINETHICK;
XRQ:=F10TEXT(RQW+19,8);
XJZ:=F10TEXT(JZW+29,8);
LXW:=F10FIND('基金类型',JZW+200);
LXW:=F10FIND('│',LXW),LINETHICK;
GMW:=F10FIND('基金规模',LXW+800);
GMW:=F10FIND('│',GMW),LINETHICK;
DQW:=F10FIND('存续期',LXW+400);
DQW:=F10FIND('│',DQW);
LXN:=RTRIM(F10TEXT(LXW+2,20));
FGN:=RTRIM(F10TEXT(LXW+42,20));
GMN:=RTRIM(F10TEXT(GMW+2,20));
DQN:=RTRIM(F10TEXT(DQW+2,30))+RTRIM(F10TEXT(F10FIND('│',DQW+75)+2,4));
FB:=STRFIND(LXN,'封闭',1);
QSW:=F10FIND('资产净值周报',100);
{时间}
T01:=F10TEXT(QSW+187,8);
T02:=F10TEXT(QSW+197,8);
T03:=F10TEXT(QSW+207,8);         
T04:=F10TEXT(QSW+217,8);
{净值}
T1:=F10TEXT(QSW+325,6);
T2:=F10TEXT(QSW+335,6);
T3:=F10TEXT(QSW+345,6);         
T4:=F10TEXT(QSW+355,6);
{净值增长率排名}
T001:=F10TEXT(QSW+802,5);
T002:=F10TEXT(QSW+812,5);
T003:=F10TEXT(QSW+822,5);         
T004:=F10TEXT(QSW+832,5);
{转换}
转换:=STRTONUM(T1);
最新单位净值:STRTONUM(XJZ),LINETHICK,PRECISION3,COLORRED;
折价额:C-转换,LINETHICK;
折价率:(1-C/最新单位净值)*100,LINETHICK;
XMC:=STKNAME+' ('+STKLABEL+')';

{-----------------【图解模板】---------------------}
//横线
PARTLINE(1,100),COLORWHITE;
PARTLINE(1,83),POINTDOT,Color008987;
PARTLINE(1,66),POINTDOT,Color008987;
PARTLINE(1,50),POINTDOT,Color008987;
PARTLINE(1,33),POINTDOT,Color008987;
PARTLINE(1,16),POINTDOT,Color008987;  
PARTLINE(1,0),COLORWHITE;
{竖线}
STICKLINE(x,100,0,0,0),COLORWHITE;
STICKLINE(x0,100,65,0,0),Color008987;
STICKLINE(x1,100,83,0,0),Color008987;
STICKLINE(x2,65,0,0,0),Color008987;
STICKLINE(x3,65,0,0,0),Color008987;
STICKLINE(x5,100,0,0,0),COLORWHITE;
{填表}
DRAWTEXT(x,95,' '+XMC),COLORGREEN;
DRAWTEXT(x0,95,' 基金类型：'+LXN),COLORGREEN;
DRAWTEXT(x1,95,' 投资风格：'+FGN ),COLORGREEN;
DRAWTEXT(x,77,' 基金规模：'+GMN+'(亿份)'),COLORRED;
DRAWTEXT(x0,77,' 存续期：'+DQN),COLORRED;
DRAWTEXT(x,61,' 时间:'+T01),color888000;
DRAWTEXT(x2,61,' 净值:'+T1),color888000;
DRAWTEXT(x3,61,' 净值增长率排名:'+T001),color888000;
DRAWTEXT(x,45,' 时间:'+T02),color888000;
DRAWTEXT(x2,45,' 净值:'+T2),color888000;
DRAWTEXT(x3,45,' 净值增长率排名:'+T002),color888000;
DRAWTEXT(x,27,' 时间:'+T03),color888000;
DRAWTEXT(x2,27,' 净值:'+T3),color888000;
DRAWTEXT(x3,27,' 净值增长率排名:'+T003),color888000;
DRAWTEXT(x,11,' 时间:'+T04),color888000;
DRAWTEXT(x2,11,' 净值:'+T4),color888000;
DRAWTEXT(x3,11,' 净值增长率排名:'+T004),color888000;

//

iason

谢谢楼主

dahui19888

谢谢楼主，好东东

wfjwfj

谢谢发布

namtf

谢谢发布，在时间研究一下

ghwy8818

请帮改成Wind资讯f10用的

linxiao

谢谢提供 !!!

坚决追涨

不错的东东，谢谢发布，在时间研究一下

x88888888

不错啊 ,感谢

我不怕输

多谢好人！！！！！

chen777

谢谢！！顶一下！！！！

昆鹏

指标不错，谢谢！
能详细讲解一才用法吗？

sxxmmm

能否说明一下如何使用，另，我的金狐中为何没有图呢

sxxmmm

先顶了再说

学习一定要

谢谢楼主，好东东

KOKORO

谢谢!学习一下 .

zero-zero

顶一下   实用又漂亮。

能否将   ' 净值增长率排名:'  也 提出来

用于排序或选股。

[ 本帖最后由 zero-zero 于 2007-1-5 13:21 编辑 ]

chwayne

不错，学习一下

绿野浪子

指标不错，谢谢！
能详细讲解一才用法吗？

stocklyg

不好意思。我感觉你的主图“多空”指标不错，可以贴出原码吗？