Styyp老师DLL--DDE数据--新显示---附图
感谢Styyp老师DLL提供数据.刘佳2010网友提供的分时主图指标
我把原有指标加在一起显示成下图.
另外敬请各位老师帮助解决现有数据能显示出BBD指标线.DDX分时线.各单分时资金线{原文链接：http://www.55188.com/thread-4476028-1-1.html}
TC:=STRCMP(STRLEFT(MARKETLABEL,2),'SZ,SH');
DPSH:="SH000001$CLOSE"/HHV(STKINDI('SH000001','分超引用.昨收#DAY'),0);
DPSZ:="399001$CLOSE"/HHV(STKINDI('399001','分超引用.昨收#DAY'),0);
DPC:=IF(INBLOCK('A股板块'),DYNAINFO(3)*IF(TC=0,DPSZ,DPSH),C);
POLYLINE(C>0,DPC),COLOR9999ff,LINETHICK2,LAYER0;
大盘:=NUMTOSTRN(INDEXC,1);
DRAWTEXT( BARSTATUS=2,DPC ,'大盘:'+大盘),ColorFFFF00,LINETHICK2;
DRAWTEXTABS(160,6,'■上涨家数:'+NUMTOSTRN(DYNAINFO(69),0)+' 家'),COLOR0000FF,LINETHICK2;
DRAWTEXTABS(270,6,'■平盘家数:'+NUMTOSTRN(DYNAINFO(71),0)+' 家'),COLORFFFFFF,LINETHICK2;
DRAWTEXTABS(380,6,'■下跌家数:'+NUMTOSTRN(DYNAINFO(70),0)+' 家'),COLOR00FF00,LINETHICK2;
★主力净:=(("DATA@DDE"(6))- ("DATA@DDE"(7)))*SUM(AMOUNT,0)/10000;
特净:=("DATA@DDE"(4)-"DATA@DDE"(5))*SUM(AMOUNT,0)/10000;
大净:=("DATA@dde分时"(6)-"DATA@dde分时"(7))*SUM(AMOUNT,0)/10000;
中净:=((1-("DATA@DDE"(8)+"DATA@DDE"(6)+"DATA@DD"(4)))-(1-("DATA@DDE"(9)+"DATA@DDE"(7)+"DATA@DDE"(5))))*SUM(AMOUNT,0)/10000;
小净:=("DATA@DDE"(8)-"DATA@DDE"(9))*SUM(AMOUNT,0)/10000;
DRAWTEXTABS(0 ,175 ,'★主力净:'+★主力净),LINETHICK3,ColorFFFFFF;
DRAWTEXTABS(0 ,135 ,'小净:'+小净),LINETHICK3, ColorFFFF00 ;
DRAWTEXTABS(130 ,135 ,'中净:'+中净),LINETHICK3,ColorYellow;
DRAWTEXTABS(0 ,155 ,'大净:'+大净),LINETHICK3,COLOR1E90FF;
DRAWTEXTABS(130 ,155 ,'特净:'+特净),LINETHICK3,COLORcc00FF;
BBD1:="DATA@DDE"(6)-"DATA@DDE"(7);
★★DDX:=BBD1*SUM(VOL,0)/capital*100;
DRAWTEXTABS(0 ,195 ,'★★DDX: '+★★DDX),LINETHICK2,ColorFFFFFF;
gqc:=DYNAINFO(3);
gh:=DYNAINFO(5);
gL:=DYNAINFO(6);
当前波幅:=max(gh-gqc,gqc-gL);
gf:=当前波幅/gqc;
最低位置:=gqc-当前波幅;
zl:=(("DATA@DDE"(6))- ("DATA@DDE"(7)));
主力净额:zl*SUM(AMOUNT,0)/10000,linethick0,PRECIS2,colorred;
zjcbf:=max(hhvall(主力净额),0-llvall(主力净额));
p1:=主力净额*gf/zjcbf;
zjcx:=(p1+1)*gqc;
ma(zjcx,3),linethick2,PRECIS2,ColorFF0DFF;
DRAWTEXT( BARSTATUS=2,zjcx ,'BBD:'+主力净额),LINETHICK3,COLORFFFFFF;
板块:=IFS(INBLOCK('工程建筑'),'工程建筑',
IFS(INBLOCK('电力'),'电力',
IFS(INBLOCK('计算机'),'计算机',
IFS(INBLOCK('电子信息'),'电子信息',
IFS(INBLOCK('房地产'),'房地产',
IFS(INBLOCK('纺织服装'),'纺织服装',
IFS(INBLOCK('钢铁'),'钢铁',
IFS(INBLOCK('供水供气'),'供水供气',
IFS(INBLOCK('化工化纤'),'化工化纤',
IFS(INBLOCK('电器'),'电器',
IFS(INBLOCK('交通设施'),'交通设施',
IFS(INBLOCK('银hang类'),'银hang类',
IFS(INBLOCK('旅游酒店'),'旅游酒店',
IFS(INBLOCK('煤炭石油'),'煤炭石油',
IFS(INBLOCK('酿酒食品'),'酿酒食品',
IFS(INBLOCK('农林牧渔'),'农林牧渔',
IFS(INBLOCK('商业连锁'),'商业连锁',
IFS(INBLOCK('建材'),'建材',
IFS(INBLOCK('其他行业'),'其他行业',
IFS(INBLOCK('交通工具'),'交通工具',
IFS(INBLOCK('机械'),'机械',
IFS(INBLOCK('医药'),'医药',
IFS(INBLOCK('外贸'),'外贸',
IFS(INBLOCK('教育传媒'),'教育传媒',
IFS(INBLOCK('仪电仪表'),'仪电仪表',
IFS(INBLOCK('有色金属'),'有色金属',
IFS(INBLOCK('造纸印刷'),'造纸印刷',
IFS(INBLOCK('券商'),'券商',
IFS(INBLOCK('电力设备'),'电力设备',
IFS(INBLOCK('通信'),'通信',
IFS(INBLOCK('运输物流'),'运输物流',
IFS(INBLOCK('海峡西岸'),'海峡西岸',
IFS(INBLOCK('保险'),'保险','')
))))))))))))))))))))))))))))))));
DRAWTEXTABS(3,0,'所属: '+板块),LINETHICK2,COLORFFFFFF;
游客主买:=("DATA@DDE"(6))*SUM(AMOUNT,0)/10000;
游客主卖:=("DATA@DDE"(7))*SUM(AMOUNT,0)/10000;
主单净额:=游客主买-游客主卖;
{画柱图};
最大值:=300/(MAX(游客主买,游客主卖,主单净额));
主力买:=680-(游客主买*最大值);
主力卖:=680-(游客主卖*最大值);
主力净买:=680-(ABS(主单净额)*最大值);
DRAWRECTREL(960,主力买,980,680,RGB(200,0,0)),COLOR000000,LAYER5;
DRAWRECTREL(980,主力卖,1000,680,RGB(0,200,0)),COLOR000000,LAYER5;
DRAWRECTREL(940,主力净买,960,680,(IF((主单净额 >= 0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;
DRAWTEXTREL(960,690,'买'),COLOR0000FF;
DRAWTEXTREL(980,690,'卖'),ColorABFF46;
DRAWTEXTREL(940,690,'净'),COLORFFFFCC;
DRAWTEXTREL(900,720,'买'),COLOR0000FF;
DRAWTEXTREL(900,760,'卖'),ColorABFF46;
DRAWTEXTREL(900,800,'净'),COLORFFFFCC;
DRAWTEXTREL(920,620,'主'),color33FFFF;
DRAWTEXTREL(920,640,'力'),color33FFFF;
DRAWTEXTREL(960,720,NUMTOSTRN(游客主买,2)),COLOR0000FF;
DRAWTEXTREL(960,760,NUMTOSTRN(游客主卖,2)),ColorABFF46;
DRAWTEXTREL(960,800,NUMTOSTRN(主单净额,2)),COLORFFFFCC;
DRAWTEXTREL(0,48,'■千股千评：'+SELFSTRING('千股千评')),LINETHICK3,COLOR1E90FF,LAYER5;
DRAWTEXTREL(0,790,'◆主题投资：'+SELFSTRING('主题投资')),LINETHICK2,COLORFFFFFF,LAYER5;
DRAWTEXTREL(0,740,'◆主营业务：'+SELFSTRING('主营业务')),LINETHICK2,COLORFFFFFF,LAYER5;
|
