分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册
当前位置：分析家公式网 → 股票公式 → 大智慧L2公式 → 一键转帖：持仓图谱

软件名称：[B]持仓图谱[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：22.0 KB
官方主页：Home Page
更新时间：2011-10-22 01:13:42
软件简介:

{DDEMPT-Level2-DDE分类持仓图谱}
INPUT:P1(5,0,20),P(1,1,999);
TODAY:="ddx.ddx"<>0;{判断是否有正版数据}
{比例}
特单买:IF(TODAY,bigorder(1,3),"DATA@DDE"(4));
特单卖:IF(TODAY,bigorder(2,3),"DATA@DDE"(5));
大单买:IF(TODAY,bigorder(1,2)-bigorder(1,3),"DATA@DDE"(6)-"DATA@DDE"(4));
大单卖:IF(TODAY,bigorder(2,2)-bigorder(2,3),"DATA@DDE"(7)-"DATA@DDE"(5));
中单买:IF(TODAY,bigorder(1,1)-bigorder(1,2),"DATA@DDE"(8)-"DATA@DDE"(6));
中单卖:IF(TODAY,bigorder(2,1)-bigorder(2,2),"DATA@DDE"(9)-"DATA@DDE"(7));
散单买:IF(TODAY,1-bigorder(1,1),1-"DATA@DDE"(8));
散单卖:IF(TODAY,1-bigorder(2,1),1-"DATA@DDE"(9));
HS:=vol/capital;
超1:=特单买-特单卖;
超2:=HS*超1*100;
大1:=大单买-大单卖;
大2:=HS*大1*100;
中1:=中单买-中单卖;
中2:=HS*中1*100;
小1:=散单买-散单卖;
小2:=HS*小1*100;
超大持仓: 25+Sum(超2,0),LINETHICK0,colorred,PRECIS2;
大户持仓: 25+Sum(大2,0),LINETHICK0,colorcyan,PRECIS2;
中户持仓: 25+Sum(中2,0),LINETHICK0,COLORBLUE,PRECIS2;
散户持仓: 25+Sum(小2,0),LINETHICK0,colorgreen,PRECIS2;{
ABCDEFGHIJKLM0:10000000000000000,LineThick0,color000000;
ABCDEFGHIJKLM1:10000000000000000,LineThick0,color000000;
ABCDEFGHIJKLM2:10000000000000000,LineThick0,color000000;
ABCDEFGHIJKLM3:10000000000000000,LineThick0,color000000;}
a:=超大持仓+大户持仓;
b:=超大持仓+大户持仓+中户持仓;
e:=100;
FILLRGN(0,超大持仓,1,rgb(255,0,0));
FILLRGN(超大持仓,a,1,rgb(0,255,255));
FILLRGN(a,b,1,rgb(0,0,255));
FILLRGN(b,e,1,rgb(0,255,0));
N:=3;
M:=5;
T:=BARSLAST(C<>REF(C,1));
DRAWTEXTABS(100,1+1,' '+IFS(TODAY,'正版数据','新游客数据')+'  '+NUMTOSTRN((YEAR),0)+'年'+NUMTOSTRN((MONTH),0)+'月'+NUMTOSTRN((DAY),0)+'日'),COLORWHITE;
DRAWRECTABS(0,0,400,999,RGB(30,40,40)),COLORBLACK;
x:=103;
Y:=20-P1;
z:=13.5+y;
w:=280;
cc:=超大持仓+大户持仓;
cb:=ref(cc,p);
cd:=ref(cc,n);
ce:=ref(cc,m);
DRAWRECTABS(x,y-1,x+200,z+1,RGB(0,0,0)),COLOR5E5752,linethick1;
DRAWRECTABS(x,y-1,x+CC*3/2,z-0,RGB(255,0,0)  ),COLOR008888;
DRAWRECTABS(x,y+0,x+CC*3/2,z-1,RGB(255,255,30)  ),COLOR009999;
DRAWRECTABS(x,y+1,x+cc*3/2,z-2,RGB(255,255,60)  ),COLOR00AAAA;
DRAWRECTABS(x,y+2,x+cc*3/2,z-3,RGB(255,255,90)  ),COLOR00BBBB;
DRAWRECTABS(x,y+3,x+cc*3/2,z-4,RGB(255,255,110)  ),COLOR00DDDD;{
DRAWRECTABS(x,y+4,x+cc*3/2,z-5,RGB(255,255,120)  ),color00FFFF;}
drawtextabs(5,1,'分类持仓'),Color66CCFF,linethick1;
drawtextabs(60,1,' 比例%'),Color66CCFF,linethick1;
drawtextabs(w+0, 1,STRRIGHT('        '+NUMTOSTRN(n,0),5)+'日增减'),Color66CCFF;
drawtextabs(w+60,1,STRRIGHT('        '+NUMTOSTRN(m,0),3)+'日增减'),Color66CCFF;
drawtextabs(60,y+1,STRRIGHT('        '+NUMTOSTRN(cc,1),5)+'%'),Color9DFFFF;
drawtextabs(5 ,y+1,'主力持仓'),Color9DFFFF;
drawtextabs(w+5 ,y+1,STRRIGHT('        '+NUMTOSTRN(cc-cd,2),9)+'%'),Color9DFFFF;
drawtextabs(w+65,y+1,STRRIGHT('        '+NUMTOSTRN(cc-ce,2),7)+'%'),Color9DFFFF;
drawtextabs(x+cc*3/2+1,y+3,NUMTOSTRN(p,0)+'日:'+NUMTOSTRN(cc-cb,2)+'%'),Color9DFFFF;
Y1:=Y+(25-P1)*1;
z1:=13.5+y1;
cc1:=100-cc;
cb1:=ref(cc1,p);
cd1:=ref(cc1,n);
ce1:=ref(cc1,m);
DRAWRECTABS(x,y1-1 ,x+200, z1+1 ,  RGB(0,0,0)  ),COLOR5E5752;
DRAWRECTABS(x,y1-1,x+ABS(cc1)*3/2,z1-0,RGB(0,128,128)),COLOR808000;
DRAWRECTABS(x,y1+0,x+ABS(cc1)*3/2,z1-1,RGB(0,148,148)),COLOR949400;
DRAWRECTABS(x,y1+1,x+ABS(cc1)*3/2,z1-2,RGB(0,188,188)),COLORBCBC00;
DRAWRECTABS(x,y1+2,x+ABS(cc1)*3/2,z1-3,RGB(0,218,218)),COLORDADA00;
DRAWRECTABS(x,y1+3,x+ABS(cc1)*3/2,z1-4,RGB(0,238,238)),COLOREEEE00;{
DRAWRECTABS(x,y1+4,x+ABS(cc1)*3/2,z1-5,RGB(0,248,248)),COLORF8F800;}
drawtextabs(60,y1,STRRIGHT('        '+NUMTOSTRN(cc1,1),5)+'%'),ColorABFF46;
drawtextabs(5,y1,'个人持仓'),ColorABFF46,linethick1;
drawtextabs(w+5,y1,STRRIGHT('        '+NUMTOSTRN(cc1-cd1,2),9)+'%'),ColorABFF46;
drawtextabs(w+65,y1,STRRIGHT('        '+NUMTOSTRN(cc1-ce1,2),7)+'%'),ColorABFF46;
drawtextabs(x+cc1*3/2+1,y1,NUMTOSTRN(p,0)+'日:'+NUMTOSTRN(cc1-cb1,2) +'%'),ColorABFF46;
drawtextabs(0,Y+(25-P1)+11,' ------------------------------------------------------------------'),Color4B4AFF,linethick1;

Y2:=Y+(25-P1)*2;
z2:=13.5+y2;
cc2:=超大持仓;
cb2:=ref(cc2,p);
cd2:=ref(cc2,n);
ce2:=ref(cc2,m);
DRAWRECTABS(x,y2-1,x+200, z2+1 ,  RGB(0,0,0)  ),COLOR5E5752;
DRAWRECTABS(x,y2-1,x+CC2*3/2,z2-0,RGB(255,0,0)  ),COLOR0000AA;
DRAWRECTABS(x,y2+0,x+CC2*3/2,z2-1,RGB(255,30,30)  ),COLOR0011BB;
DRAWRECTABS(x,y2+1,x+cc2*3/2,z2-2,RGB(255,60,60)  ),COLOR0022CC;
DRAWRECTABS(x,y2+2,x+cc2*3/2,z2-3,RGB(255,90,90)  ),COLOR0033DD;
DRAWRECTABS(x,y2+3,x+cc2*3/2,z2-4,RGB(255,110,110)  ),COLOR0044EE;{
DRAWRECTABS(x,y2+4,x+cc2*3/2,z2-5,RGB(255,120,120)  ),COLOR0055FF;}
drawtextabs(60,y2,STRRIGHT('        '+NUMTOSTRN(cc2,1),5)+'%'),colorred;
drawtextabs(5,y2,'超大持仓'),colorred,linethick1;
drawtextabs(w+5,y2,STRRIGHT('        '+NUMTOSTRN(cc2-cd2,2),9)+'%'),colorred;
drawtextabs(w+65,y2,STRRIGHT('        '+NUMTOSTRN(cc2-ce2,2),7)+'%'),colorred;
drawtextabs(x+cc2*3/2+1,y2,NUMTOSTRN(p,0)+'日:'+NUMTOSTRN(cc2-cb2,2) +'%'),colorred;

Y3:=Y+(25-P1)*3;
z3:=13.5+y3;
cc3:=大户持仓;
cb3:=ref(cc3,p);
cd3:=ref(cc3,n);
ce3:=ref(cc3,m);
DRAWRECTABS(x,y3-1,x+200, z3+1 ,  RGB(0,0,0)  ),COLOR5E5752;
DRAWRECTABS(x,y3-1,x+ABS(cc3)*3/2, z3-0,RGB(0,255,255)),COLORFFFF00;
DRAWRECTABS(x,y3+0,x+ABS(cc3)*3/2, z3-1,RGB(30,255,255)),COLORFFFF1E;
DRAWRECTABS(x,y3+1,x+ABS(cc3)*3/2, z3-2,RGB(60,255,255)),COLORFFFF3C;
DRAWRECTABS(x,y3+2,x+ABS(cc3)*3/2, z3-3,RGB(90,255,255)),COLORFFFF5A;
DRAWRECTABS(x,y3+3,x+ABS(cc3)*3/2, z3-4,RGB(110,255,255)),COLORFFFF6E;{
DRAWRECTABS(x,y3+4,x+ABS(cc3)*3/2, z3-5, RGB(120,255,255)),COLORFFFF78;}
drawtextabs(60,y3,STRRIGHT('        '+NUMTOSTRN(cc3,1),5)+'%'),colorcyan;
drawtextabs(5,y3,'大户持仓'),colorcyan,linethick1;
drawtextabs(w+5,y3,STRRIGHT('        '+NUMTOSTRN(cc3-cd3,2),9)+'%'),colorcyan;
drawtextabs(w+65,y3,STRRIGHT('        '+NUMTOSTRN(cc3-ce3,2),7)+'%'),colorcyan;
drawtextabs(x+ABS(cc3)*3/2+1,y3,NUMTOSTRN(p,0)+'日:'+NUMTOSTRN(cc3-cb3,2) +'%'),colorcyan;

Y4:=Y+(25-P1)*4;
z4:=13.5+y4;
cc4:=中户持仓;
cb4:=ref(cc4,p);
cd4:=ref(cc4,n);
ce4:=ref(cc4,m);
DRAWRECTABS(x, y4-1 ,x+200, z4+1 ,  RGB(0,0,0)  ),COLOR5E5752;
DRAWRECTABS(x, y4-1 ,x+CC4*3/2, z4-1,RGB(0,0,255)  ),COLORFF0000;
DRAWRECTABS(x, y4+0 ,x+CC4*3/2, z4-1,RGB(30,30,255)  ),COLORFF1E1E;
DRAWRECTABS(x, y4+1 ,x+cc4*3/2, z4-2,RGB(60,60,255)  ),COLORFF3C3C;
DRAWRECTABS(x, y4+2 ,x+cc4*3/2, z4-3,RGB(90,90,255)  ),COLORFF5A5A;
DRAWRECTABS(x, y4+3 ,x+cc4*3/2, z4-4,RGB(110,110,255)  ),COLORFF6E6E;
DRAWRECTABS(x, y4+4 ,x+cc4*3/2, z4-5,RGB(120,120,
[url=http://www.70822.com/soft/sort013/sort03/down-39549.html]持仓图谱[/url]

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