通达信龙虎榜主副图+选股源码

 一、主图

{均线系统}

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;

四、龙虎榜说明

1、龙虎榜分析和操作，是非常好的一门艺术；

2、别怪市场如何？怨天尤人的，指数不怎么跌，个股跌的稀巴烂，这都不是理由；

3、操作股票关键是人，有能力就操作，照样可以赚钱，没能力就学会休息。

4、以上源码全部真实，不加密，你会不会用？会不会安装？无须讨论。

5、需要手工下载数据。

6、也可以自己搞个自动下载小软件，每天会自动下载龙虎榜数据。

7、也无须感谢本人，如果你学会看懂龙虎榜数据，那你赚钱很厉害的。

8、加强自我技术，并非炒股不需要技术，而是有的技术，根本不叫技术，那是理论和瞎瓣。