[大智慧L2] 理想送出最牛的TopView(源码+数据)
本文来自：理想论坛 www.55188.com 作者：轩辕魅 点击52755次
原文：http://www.55188.com/viewthread.php?tid=1772807
[attach]1306042[/attach][大智慧L2] 理想送出最牛的TopView(源码+数据)
本指标非本人原创，在别的论坛上看到的，拿来跟理想的兄弟们一起分享。 数据已更新到12月28日。现在是光有人下数据，没人顶贴了啊！
散户:SELFDATA('散户持仓'),linethick0;
中户:SELFDATA('中户持仓'),linethick0;
大户:SELFDATA('大户持仓'),linethick0;
法人:SELFDATA('法人持仓'),linethick0;
机构:SELFDATA('机构持仓'),linethick0;
帐户数:SELFDATA('帐户数'),linethick0;
帐户增减:SELFDATA('帐户增减'),linethick0;
月增减:=(帐户数-ref(帐户数,22))/ref(帐户数,22);
散户增减:=散户-ref(散户,3);
中户增减:=中户-ref(中户,5);
大户增减:=大户-ref(大户,3);
法人增减:=法人-ref(法人,10);
机构增减:=机构-ref(机构,5);
散中和:(散户+中户),linethick2;
大法机和:(大户+法人+机构),coloryellow,linethick2;
SZ:=(散中和-ref(散中和,1))*10;
DFJ:=(大法机和-ref(大法机和,1))*10;
STICKLINE(SZ>0,散中和+SZ,散中和,4,1),colorred;
STICKLINE(SZ<0,散中和,散中和+SZ,4,1),colorgreen;
STICKLINE(DFJ>0,大法机和+DFJ,大法机和,4,1),colorred;
STICKLINE(DFJ<0,大法机和,大法机和+DFJ,4,1),colorgreen;
S3:=ref(散户,3);
Z3:=ref(中户,3);
D3:=ref(大户,3);
F3:=ref(法人,3);
J3:=ref(机构,3);
S5:=ref(散户,5);
Z5:=ref(中户,5);
D5:=ref(大户,5);
F5:=ref(法人,5);
J5:=ref(机构,5);
S10:=ref(散户,10);
Z10:=ref(中户,10);
D10:=ref(大户,10);
F10:=ref(法人,10);
J10:=ref(机构,10);
S20:=ref(散户,20);
Z20:=ref(中户,20);
D20:=ref(大户,20);
F20:=ref(法人,20);
J20:=ref(机构,20);
BL3:=400/MAX(S3,Z3,D3,F3,J3);
BL5:=400/MAX(S5,Z5,D5,F5,J5);
BL10:=400/MAX(S10,Z10,D10,F10,J10);
BL20:=400/MAX(S20,Z20,D20,F20,J20);
DRAWRECTREL(0,0,530,999,RGB(30,40,40));
S3B:=999-S3*BL3;
Z3B:=999-Z3*BL3;
D3B:=999-D3*BL3;
F3B:=999-F3*BL3;
J3B:=999-J3*BL3;
S5B:=999-S5*BL5;
Z5B:=999-Z5*BL5;
D5B:=999-D5*BL5;
F5B:=999-F5*BL5;
J5B:=999-J5*BL5;
S10B:=999-S10*BL10;
Z10B:=999-Z10*BL10;
D10B:=999-D10*BL10;
F10B:=999-F10*BL10;
J10B:=999-J10*BL10;
S20B:=999-S20*BL20;
Z20B:=999-Z20*BL20;
D20B:=999-D20*BL20;
F20B:=999-F20*BL20;
J20B:=999-J20*BL20;
{画直方图}
DRAWRECTREL(20,S3B,40,999,RGB(0,255,0));
DRAWRECTREL(40,Z3B,60,999,RGB(180,0,100));
DRAWRECTREL(60,D3B,80,999,RGB(0,0,255));
DRAWRECTREL(80,F3B,100,999,RGB(180,100,0));
DRAWRECTREL(100,J3B,120,999,RGB(255,0,0));
DRAWTEXTREL(20,500,NUMTOSTRN(散户增减,2)),colorgreen;
DRAWTEXTREL(60,500,NUMTOSTRN(大户增减,2)),colorred;
DRAWRECTREL(150,S5B,170,999,RGB(0,255,0));
DRAWRECTREL(170,Z5B,190,999,RGB(180,0,100));
DRAWRECTREL(190,D5B,210,999,RGB(0,0,255));
DRAWRECTREL(210,F5B,230,999,RGB(180,100,0));
DRAWRECTREL(230,J5B,250,999,RGB(255,0,0));
DRAWTEXTREL(170,500,NUMTOSTRN(中户增减,2)),colorgreen;
DRAWTEXTREL(230,500,NUMTOSTRN(机构增减,2)),colorred;
DRAWRECTREL(280,S10B,300,999,RGB(0,255,0));
DRAWRECTREL(300,Z10B,320,999,RGB(180,0,100));
DRAWRECTREL(320,D10B,340,999,RGB(0,0,255));
DRAWRECTREL(340,F10B,360,999,RGB(180,100,0));
DRAWRECTREL(360,J10B,380,999,RGB(255,0,0));
DRAWTEXTREL(340,500,NUMTOSTRN(法人增减,2)),color0099ff;
DRAWRECTREL(410,S20B,430,999,RGB(0,255,0));
DRAWRECTREL(430,Z20B,450,999,RGB(180,0,100));
DRAWRECTREL(450,D20B,470,999,RGB(0,0,255));
DRAWRECTREL(470,F20B,490,999,RGB(180,100,0));
DRAWRECTREL(490,J20B,510,999,RGB(255,0,0));
DRAWTEXTREL(80,5,'散户'),color00ff00;
DRAWTEXTREL(160,5,'中户'),color003399;
DRAWTEXTREL(240,5,'大户'),colorffaa66;
DRAWTEXTREL(320,5,'法人'),color0099ff;
DRAWTEXTREL(400,5,'机构'),colorred;
DRAWTEXTREL(460,5,'帐户数'),colorddffff;
DRAWTEXTREL(460,140,'帐户增减'),colorddffff;
DRAWTEXTREL(460,280,'月增减'),colorddffff;
DRAWTEXTREL(30,70,'今日'),colorddffff;
DRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00;
DRAWTEXTREL(160,70,NUMTOSTRN(中户,2)), color003399;
DRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66;
DRAWTEXTREL(320,70,NUMTOSTRN(法人,2)), color0099ff;
DRAWTEXTREL(400,70,NUMTOSTRN(机构,2)), colorred;
DRAWTEXTREL(460,70,NUMTOSTRN(帐户数,2)), color00ffff;
DRAWTEXTREL(30,140,'3日'), colorddffff;
DRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00;
DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)), color003399;
DRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66;
DRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff;
DRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred;
DRAWTEXTREL(30,210,'5日'), colorddffff;
DRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00;
DRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)), color003399;
DRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66;
DRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff;
DRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred;
DRAWTEXTREL(460,210,NUMTOSTRN(帐户增减,2)), color00ffff;
DRAWTEXTREL(30,280,'10日'), colorddffff;
DRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00;
DRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)), color003399;
DRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66;
DRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff;
DRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred;
DRAWTEXTREL(30,350,'20日'), colorddffff;
DRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00;
DRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)), color003399;
DRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66;
DRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff;
DRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred;
DRAWTEXTREL(460,350,NUMTOSTRN(月增减,2)),color00ffff;
DRAWTEXTREL(5,800,'3'), colorbbffff;
DRAWTEXTREL(3,900,'日'), colorbbffff;
DRAWTEXTREL(135,800,'5'), colorbbffff;
DRAWTEXTREL(130,900,'日'), colorbbffff;
DRAWTEXTREL(260,800,'10'), colorbbffff;
DRAWTEXTREL(260,900,'日'), colorbbffff;
DRAWTEXTREL(390,800,'20'), colorbbffff;
DRAWTEXTREL(390,900,'日'), colorbbffff;
11月16日(周五)数据,14日数据有误,沿用13日的覆盖就可以了,对不起大家,
补发11月14日,11月15日的数据,应该覆盖引入。
TopView改版,新增了"机构成本"数据,大家需要新建一个自定义数据引入了,在上面公式中加上以下两句就可以了:
机构成本:SELFDATA('机构成本'),linethick0;
DRAWTEXTABS(420,10,'机构成本:'+NUMTOSTRN(机构成本,3)+'元'),colormagenta;
11月23日周五的数据(含:机构成本)
呵呵 这个贴有被翻上来了 说实话TopView的数据不好收集，我以后尽力上传上来，有数据的朋友希望也发扬一下风格。大家共同努力吧！
[ 本帖最后由 轩辕魅 于 2008-4-4 10:46 编辑 ]
附件
-
2007-12-10.rar
(74.26 KB)
-
2007-12-14 10:06, 下载次数: 646
-
2007-12-14.rar
(78.2 KB)
-
2007-12-17 11:49, 下载次数: 501
-
覆盖方式引入.rar
(545.04 KB)
-
2007-12-20 08:35, 下载次数: 889
-
12-21.rar
(78.97 KB)
-
2007-12-24 15:59, 下载次数: 377
-
2007-12-25txt.rar
(74.3 KB)
-
2008-1-3 08:20, 下载次数: 277
-
2007-12-28txt.rar
(74.45 KB)
-
2008-1-3 08:20, 下载次数: 319
-
2008-01-04txt.rar
(74.35 KB)
-
2008-1-8 00:06, 下载次数: 453
：1006267111;
实战区
