通达信龙虎榜(指标/源码 副图/选股贴图)

[复制链接]
查看624 | 回复0 | 2021-8-20 01:51:49 | 显示全部楼层 |阅读模式

以下是通达信龙虎榜(指标/源码 副图/选股贴图)(无源码的请下载附件导入)

一、主图
{均线系统}
M5:MA(CLOSE,5);
M10:MA(CLOSE,10);
M20:MA(CLOSE,20);
M60:MA(CLOSE,60);
M120:MA(CLOSE,120);
M200:MA(CLOSE,200);
STICKLINE(CLOSE/REF(C,1)>=1.097,O,C,1,0),COLORYELLOW;
{龙虎榜}
LHB:=SIGNALS_USER(490,0)-SIGNALS_USER(491,0);  {龙虎榜净买入额}
DRAWTEXT(LHB>0 AND LHB<10000,L*0.95,VARCAT(VARCAT('▲龙虎: ',VAR2STR(LHB,0)),'万')),COLORMAGENTA;
DRAWTEXT(LHB>10000,L*0.95,VARCAT(VARCAT('▲龙虎: ',VAR2STR(LHB/10000,2)),'亿')),COLORMAGENTA;
DRAWTEXT(LHB<0 AND LHB>-10000,L*0.95,VARCAT(VARCAT('▲龙虎: ',VAR2STR(LHB,0)),'万')),COLORGREEN;
DRAWTEXT(LHB<-10000,L*0.95,VARCAT(VARCAT('▲龙虎: ',VAR2STR(LHB/10000,2)),'亿')),COLORGREEN;
二、副图
uu:0 1  0.97
总买:=SIGNALS_USER(490,0);
总卖:=-ABS(SIGNALS_USER(491,0));
STICKLINE(总买>0,0,总买,0.5,0),COLORRED;
STICKLINE(总卖<0,0,总卖,0.5,0),COLORGREEN;
DRAWTEXT(总买>0 AND 总买<10000,总买/1.05,VARCAT(VARCAT('总买:',VAR2STR(总买,2)),'万'));
DRAWTEXT(总买>10000,总买/1.05,VARCAT(VARCAT('总买:',VAR2STR(总买/10000,2)),'亿'));
DRAWTEXT(总卖<0 AND 总卖>-10000,总卖/1.05,VARCAT(VARCAT('总卖:',VAR2STR(总卖,2)),'万'));
DRAWTEXT(总卖<-10000,总卖/1.05,VARCAT(VARCAT('总卖:',VAR2STR(总卖/10000,2)),'亿'));
上海金碧路_买:=SIGNALS_USER(1,0),NODRAW;

上海金碧路_卖:=-ABS(SIGNALS_USER(2,0)),NODRAW;
金碧路:SIGNALS_USER(1,0)-SIGNALS_USER(2,0),NODRAW;
STICKLINE(上海金碧路_买>0,0,上海金碧路_买,0.5,0),COLORFF0080;
STICKLINE(上海金碧路_卖<0,0,上海金碧路_卖,0.5,0),COLORFF0080;
深圳益田路_买:=SIGNALS_USER(3,0),NODRAW;
深圳益田路_卖:=-ABS(SIGNALS_USER(4,0)),NODRAW;
益田路:SIGNALS_USER(3,0)-SIGNALS_USER(4,0),NODRAW;
STICKLINE(深圳益田路_买>0,0,深圳益田路_买,0.5,0),COLORFF80FF;
STICKLINE(深圳益田路_卖<0,0,深圳益田路_卖,0.5,0),COLORFF80FF;
临安万马路_买:=SIGNALS_USER(5,0),NODRAW;
临安万马路_卖:=-ABS(SIGNALS_USER(6,0)),NODRAW;
万马路:SIGNALS_USER(5,0)-SIGNALS_USER(6,0),NODRAW;
STICKLINE(临安万马路_买>0,0,临安万马路_买,0.5,0),COLORDB518B;
STICKLINE(临安万马路_卖<0,0,临安万马路_卖,0.5,0),COLORDB518B;
无锡清扬路_买:=SIGNALS_USER(7,0),NODRAW;
无锡清扬路_卖:=-ABS(SIGNALS_USER(8,0)),NODRAW;
清扬路:SIGNALS_USER(7,0)-SIGNALS_USER(8,0),NODRAW;
STICKLINE(无锡清扬路_买>0,0,无锡清扬路_买,0.5,0),COLORFF0080;
STICKLINE(无锡清扬路_卖<0,0,无锡清扬路_卖,0.5,0),COLORFF0080;
成都南一环路_买:=SIGNALS_USER(9,0),NODRAW;
成都南一环路_卖:=-ABS(SIGNALS_USER(10,0)),NODRAW;
南一环路:SIGNALS_USER(9,0)-SIGNALS_USER(10,0),NODRAW;
STICKLINE(成都南一环路_买>0,0,成都南一环路_买,0.5,0),COLORFF8000;
STICKLINE(成都南一环路_卖<0,0,成都南一环路_卖,0.5,0),COLORFF8000;
上海淮海中路_买:=SIGNALS_USER(11,0),NODRAW;
上海淮海中路_卖:=-ABS(SIGNALS_USER(12,0)),NODRAW;
上海淮海中路:SIGNALS_USER(11,0)-SIGNALS_USER(12,0),NODRAW;
STICKLINE(上海淮海中路_买>0,0,上海淮海中路_买,0.5,0),COLORFF8000;
STICKLINE(上海淮海中路_卖<0,0,上海淮海中路_卖,0.5,0),COLORFF8000;
成都北一环_买:=SIGNALS_USER(13,0),NODRAW;
成都北一环_卖:=-ABS(SIGNALS_USER(14,0)),NODRAW;
成都北一环:SIGNALS_USER(13,0)-SIGNALS_USER(14,0),NODRAW;
STICKLINE(成都北一环_买>0,0,成都北一环_买,0.5,0), COLOR1471CD;
STICKLINE(成都北一环_卖<0,0,成都北一环_卖,0.5,0), COLOR1471CD;
上海保定路_买:=SIGNALS_USER(15,0),NODRAW;
上海保定路_卖:=-ABS(SIGNALS_USER(16,0)),NODRAW;
上海保定路:SIGNALS_USER(15,0)+SIGNALS_USER(16,0),NODRAW;
STICKLINE(上海保定路_买>0,0,上海保定路_买,0.5,0),COLORFFFF80;
STICKLINE(上海保定路_卖<0,0,上海保定路_卖,0.5,0),COLORFFFF80;
厦门厦禾路_买:=SIGNALS_USER(17,0),NODRAW;
厦门厦禾路_卖:=-ABS(SIGNALS_USER(18,0)),NODRAW;
厦禾路:SIGNALS_USER(17,0)-SIGNALS_USER(18,0),NODRAW;
STICKLINE(厦门厦禾路_买>0,0,厦门厦禾路_买,0.5,0), COLOR800080;
STICKLINE(厦门厦禾路_卖<0,0,厦门厦禾路_卖,0.5,0), COLOR800080;
上海互联网路_买:=SIGNALS_USER(19,0),NODRAW;
上海互联网路_卖:=-ABS(SIGNALS_USER(20,0)),NODRAW;
上海互联网路:SIGNALS_USER(19,0)-SIGNALS_USER(20,0),NODRAW;
STICKLINE(上海互联网路_买>0,0,上海互联网路_买,0.5,0),COLOR8080FF;
STICKLINE(上海互联网路_卖<0,0,上海互联网路_卖,0.5,0),COLOR8080FF;
上海武定路_买:=SIGNALS_USER(21,0),NODRAW;
上海武定路_卖:=-ABS(SIGNALS_USER(22,0)),NODRAW;
武定路:SIGNALS_USER(21,0)-SIGNALS_USER(22,0),NODRAW;
STICKLINE(上海武定路_买>0,0,上海武定路_买,0.5,0),COLOR0080FF;
STICKLINE(上海武定路_卖<0,0,上海武定路_卖,0.5,0),COLOR0080FF;
上海古北路_买:=SIGNALS_USER(23,0),NODRAW;
上海古北路_卖:=-ABS(SIGNALS_USER(24,0)),NODRAW;
古北路:SIGNALS_USER(23,0)-SIGNALS_USER(24,0),NODRAW;
STICKLINE(上海古北路_买>0,0,上海古北路_买,0.5,0),COLOR8000FF;
STICKLINE(上海古北路_卖<0,0,上海古北路_卖,0.5,0),COLOR8000FF;
机构专用_买:=SIGNALS_USER(498,0),NODRAW;
机构专用_卖:=-ABS(SIGNALS_USER(499,0)),NODRAW;
机构专用:SIGNALS_USER(498,0)-SIGNALS_USER(499,0),NODRAW;
STICKLINE(机构专用_买>0,0,机构专用_买,0.5,0),COLOR00FFFF;
STICKLINE(机构专用_卖<0,0,机构专用_卖,0.5,0),COLOR00FFFF;
AB:=IF(总买!=DRAWNULL,1,UU),NODRAW;
DRAWTEXT(临安万马路_买>0 AND 临安万马路_买<10000,临安万马路_买*AB,VARCAT(VARCAT('—临安万马路:',VAR2STR(临安万马路_买,2)),'万')),COLORYELLOW;
DRAWTEXT(临安万马路_买>10000,临安万马路_买*AB,VARCAT(VARCAT('—临安万马路:',VAR2STR(临安万马路_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(临安万马路_卖<0 AND 临安万马路_卖>-10000,临安万马路_卖*AB,VARCAT(VARCAT('—临安万马路:',VAR2STR(临安万马路_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(临安万马路_卖<-10000,临安万马路_卖*AB,VARCAT(VARCAT('—临安万马路:',VAR2STR(临安万马路_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(深圳益田路_买>0 AND 深圳益田路_买<10000,深圳益田路_买*AB,VARCAT(VARCAT('—深圳益田路:',VAR2STR(深圳益田路_买,2)),'万')),COLORYELLOW;
DRAWTEXT(深圳益田路_买>10000,深圳益田路_买*AB,VARCAT(VARCAT('—深圳益田路:',VAR2STR(深圳益田路_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(深圳益田路_卖<0 AND 深圳益田路_卖>-10000,深圳益田路_卖*AB,VARCAT(VARCAT('—深圳益田路:',VAR2STR(深圳益田路_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(深圳益田路_卖<-10000,深圳益田路_卖*AB,VARCAT(VARCAT('—深圳益田路:',VAR2STR(深圳益田路_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(机构专用_买>0 AND 机构专用_买<10000,机构专用_买*AB,VARCAT(VARCAT('—机构专用:',VAR2STR(机构专用_买,2)),'万')),COLORYELLOW;
DRAWTEXT(机构专用_买>10000,机构专用_买*AB,VARCAT(VARCAT('—机构专用:',VAR2STR(机构专用_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(机构专用_卖<0 AND 机构专用_卖>-10000,机构专用_卖*AB,VARCAT(VARCAT('—机构专用:',VAR2STR(机构专用_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(机构专用_卖<-10000,机构专用_卖*AB,VARCAT(VARCAT('—机构专用:',VAR2STR(机构专用_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(成都南一环路_买>0 AND 成都南一环路_买<10000,成都南一环路_买*AB,VARCAT(VARCAT('—成都南一环路:',VAR2STR(成都南一环路_买,2)),'万')),COLORYELLOW;
DRAWTEXT(成都南一环路_买>10000,成都南一环路_买*AB,VARCAT(VARCAT('—成都南一环路:',VAR2STR(成都南一环路_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(成都南一环路_卖<0 AND 成都南一环路_卖>-10000,成都南一环路_卖*AB,VARCAT(VARCAT('—成都南一环路:',VAR2STR(成都南一环路_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(成都南一环路_卖<-10000,成都南一环路_卖*AB,VARCAT(VARCAT('—成都南一环路:',VAR2STR(成都南一环路_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(成都北一环_买>0 AND 成都北一环_买<10000,成都北一环_买*AB,VARCAT(VARCAT('—成都北一环:',VAR2STR(成都北一环_买,2)),'万')),COLORYELLOW;
DRAWTEXT(成都北一环_买>10000,成都北一环_买*AB,VARCAT(VARCAT('—成都北一环:',VAR2STR(成都北一环_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(成都北一环_卖<0 AND 成都北一环_卖>-10000,成都北一环_卖*AB,VARCAT(VARCAT('—成都北一环:',VAR2STR(成都北一环_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(成都北一环_卖<-10000,成都北一环_卖*AB,VARCAT(VARCAT('—成都北一环:',VAR2STR(成都北一环_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海淮海中路_买>0 AND 上海淮海中路_买<10000,上海淮海中路_买*AB,VARCAT(VARCAT('—上海淮海中路:',VAR2STR(上海淮海中路_买,2)),'万')),COLORYELLOW;
DRAWTEXT(上海淮海中路_买>10000,上海淮海中路_买*AB,VARCAT(VARCAT('—上海淮海中路:',VAR2STR(上海淮海中路_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海淮海中路_卖<0 AND 上海淮海中路_卖>-10000,上海淮海中路_卖*AB,VARCAT(VARCAT('—上海淮海中路:',VAR2STR(上海淮海中路_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(上海淮海中路_卖<-10000,上海淮海中路_卖*AB,VARCAT(VARCAT('—上海淮海中路:',VAR2STR(上海淮海中路_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海互联网路_买>0 AND 上海互联网路_买<10000,上海互联网路_买*AB,VARCAT(VARCAT('—上海互联网路:',VAR2STR(上海互联网路_买,2)),'万')),COLORYELLOW;
DRAWTEXT(上海互联网路_买>10000,上海互联网路_买*AB,VARCAT(VARCAT('—上海互联网路:',VAR2STR(上海互联网路_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海互联网路_卖<0 AND 上海互联网路_卖>-10000,上海互联网路_卖*AB,VARCAT(VARCAT('—上海互联网路:',VAR2STR(上海互联网路_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(上海互联网路_卖<-10000,上海互联网路_卖*AB,VARCAT(VARCAT('—上海互联网路:',VAR2STR(上海互联网路_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海保定路_买>0 AND 上海保定路_买<10000,上海保定路_买*AB,VARCAT(VARCAT('—上海保定路:',VAR2STR(上海保定路_买,2)),'万')),COLORYELLOW;
DRAWTEXT(上海保定路_买>10000,上海保定路_买*AB,VARCAT(VARCAT('—上海保定路:',VAR2STR(上海保定路_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海保定路_卖<0 AND 上海保定路_卖>-10000,上海保定路_卖*AB,VARCAT(VARCAT('—上海保定路:',VAR2STR(上海保定路_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(上海保定路_卖<-10000,上海保定路_卖*AB,VARCAT(VARCAT('—上海保定路:',VAR2STR(上海保定路_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(厦门厦禾路_买>0 AND 厦门厦禾路_买<10000,厦门厦禾路_买*AB,VARCAT(VARCAT('—厦门厦禾路:',VAR2STR(厦门厦禾路_买,2)),'万')),COLORYELLOW;
DRAWTEXT(厦门厦禾路_买>10000,厦门厦禾路_买*AB,VARCAT(VARCAT('—厦门厦禾路:',VAR2STR(厦门厦禾路_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(厦门厦禾路_卖<0 AND 厦门厦禾路_卖>-10000,厦门厦禾路_卖*AB,VARCAT(VARCAT('—厦门厦禾路:',VAR2STR(厦门厦禾路_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(厦门厦禾路_卖<-10000,厦门厦禾路_卖*AB,VARCAT(VARCAT('—厦门厦禾路:',VAR2STR(厦门厦禾路_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海武定路_买>0 AND 上海武定路_买<10000,上海武定路_买*AB,VARCAT(VARCAT('—上海武定路:',VAR2STR(上海武定路_买,2)),'万')),COLORYELLOW;
DRAWTEXT(上海武定路_买>10000,上海武定路_买*AB,VARCAT(VARCAT('—上海武定路:',VAR2STR(上海武定路_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海武定路_卖<0 AND 上海武定路_卖>-10000,上海武定路_卖*AB,VARCAT(VARCAT('—上海武定路:',VAR2STR(上海武定路_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(上海武定路_卖<-10000,上海武定路_卖*AB,VARCAT(VARCAT('—上海武定路:',VAR2STR(上海武定路_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海金碧路_买>0 AND 上海金碧路_买<10000,上海金碧路_买*AB,VARCAT(VARCAT('—上海金碧路:',VAR2STR(上海金碧路_买,2)),'万')),COLORYELLOW;
DRAWTEXT(上海金碧路_买>10000,上海金碧路_买*AB,VARCAT(VARCAT('—上海金碧路:',VAR2STR(上海金碧路_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海金碧路_卖<0 AND 上海金碧路_卖>-10000,上海金碧路_卖*AB,VARCAT(VARCAT('—上海金碧路:',VAR2STR(上海金碧路_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(上海金碧路_卖<-10000,上海金碧路_卖*AB,VARCAT(VARCAT('—上海金碧路:',VAR2STR(上海金碧路_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(无锡清扬路_买>0 AND 无锡清扬路_买<10000,无锡清扬路_买*AB,VARCAT(VARCAT('—无锡清扬路:',VAR2STR(无锡清扬路_买,2)),'万')),COLORYELLOW;
DRAWTEXT(无锡清扬路_买>10000,无锡清扬路_买*AB,VARCAT(VARCAT('—无锡清扬路:',VAR2STR(无锡清扬路_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(无锡清扬路_卖<0 AND 无锡清扬路_卖>-10000,无锡清扬路_卖*AB,VARCAT(VARCAT('—无锡清扬路:',VAR2STR(无锡清扬路_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(无锡清扬路_卖<-10000,无锡清扬路_卖*AB,VARCAT(VARCAT('—无锡清扬路:',VAR2STR(无锡清扬路_卖/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海古北路_买>0 AND 上海古北路_买<10000,上海古北路_买*AB,VARCAT(VARCAT('—上海古北路:',VAR2STR(上海古北路_买,2)),'万')),COLORYELLOW;
DRAWTEXT(上海古北路_买>10000,上海古北路_买*AB,VARCAT(VARCAT('—上海古北路:',VAR2STR(上海古北路_买/10000,2)),'亿')),COLORYELLOW;
DRAWTEXT(上海古北路_卖<0 AND 上海古北路_卖>-10000,上海古北路_卖*AB,VARCAT(VARCAT('—上海古北路:',VAR2STR(上海古北路_卖,2)),'万')),COLORYELLOW;
DRAWTEXT(上海古北路_卖<-10000,上海古北路_卖*AB,VARCAT(VARCAT('—上海古北路:',VAR2STR(上海古北路_卖/10000,2)),'亿')),COLORYELLOW;
三、选股
第N天前上榜  0   500   1
龙虎榜:=SIGNALS_USER(490,0) OR SIGNALS_USER(491,0);
选出上榜的个股:REF(龙虎榜,第N天前上榜-1) AND V!=0;

611100885.jpg

611100885.jpg
 

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则