分享

通达信全功能龙虎主图

 冷雨雪 2022-08-21 发布于上海

1.操盘铁律主图左边都显示

2.加入了支撑、压力,以及明天的预测

3.红色龙线上穿绿色虎线多头趋势,反之空头趋势;

4.加入了解盘

5.加入了买卖等辅助信号

6.指标不含未来函数

图片

图片

指标源码:

量化研究所:=(3*C+LOW+O+HIGH)/6;

龙线:(20*量化研究所+19*REF(量化研究所,1)+18*REF(量化研究所,2)+17*REF(量化研究所,3)+16*REF(量化研究所,4)+15*REF(量化研究所,5)+14

*REF(量化研究所,6)+13*REF(量化研究所,7)+12*REF(量化研究所,8)+11*REF(量化研究所,9)+10*REF(量化研究所,10)+9*REF(量化研究所,11)+8

*REF(量化研究所,12)+7*REF(量化研究所,13)+6*REF(量化研究所,14)+5*REF(量化研究所,15)+4*REF(量化研究所,16)+3*REF(量化研究所,17)

+2*REF(量化研究所,18)+REF(量化研究所,20))/210,COLORRED;

E:=(HIGH+LOW+O+2*C)/5;

明日阻力:=2*E-LOW;

明日支撑:=2*E-HIGH;

明日突破:=E+(HIGH-LOW);

明日反转:=E-(HIGH-LOW);

今日阻力:=REF(明日阻力 , 1);

今日支撑:=REF(明日支撑 , 1);

DRAWTEXT_FIX(C!=0,0.2,0.05,0,STRCAT('今日阻力:',STRCAT(CON2STR(今日阻力,2),' 元'))),COLORFFFF00;

DRAWTEXT_FIX(C!=0,0.2,0.1,0,STRCAT('今日支撑:',STRCAT(CON2STR(今日支撑,2),' 元'))),COLORRED;

DRAWTEXT_FIX(C!=0,0.2,0.15,0,STRCAT('明日突破:',STRCAT(CON2STR(明日突破,2),' 元'))),COLORFF00FF;

DRAWTEXT_FIX(C!=0,0.2,0.2,0,STRCAT('明日阻力:',STRCAT(CON2STR(明日阻力,2),' 元'))),COLORFFFF00;

DRAWTEXT_FIX(C!=0,0.2,0.25,0,STRCAT('明日支撑:',STRCAT(CON2STR(明日支撑,2),' 元'))),COLORRED;

DRAWTEXT_FIX(C!=0,0.2,0.3,0,STRCAT('明日反转:',STRCAT(CON2STR(明日反转,2),' 元'))),COLORYELLOW;

虎线:MA(龙线,6),COLORGREEN;

MTRYT0:=SMA(MAX(C-REF(C,1),0),12,1)/SMA(ABS(C-REF(C,1)),15,1)*100;

DRAWTEXT(CROSS(82,MTRYT0),H*1.04,'快卖'),COLORWHITE;

S:=C-REF(C,1);

牛牛:=100*EMA(EMA(S,6),6)/EMA(EMA(ABS(S),6),6);

买:=IF(LLV(牛牛,2)=LLV(牛牛,7) AND COUNT(牛牛<0,2) AND CROSS(牛牛,MA(牛牛,2)),1,0);

DRAWTEXT(FILTER(买=1,5),L*0.96,'拉升'),COLORFFDE00;

DA:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4;

DB:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4;

DRAWICON(CROSS(DA-DB,0),L*0.98,7);

JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;

DRAWICON(CROSS(84,JH),H*1.04,8);

字:=STRCAT(STRCAT(STRCAT(STRCAT('名称: ',STKNAME),' 代码: '),CODE),' ' );

板块:=STRCAT('概念板块: ',GNBLOCK);

DRAWTEXT_FIX(ISLASTBAR,0.2,0,0,STRCAT(字,板块)),COLORYELLOW;

YC:=REF(C,1);

止损价位:=(YC*1.0035*97+0.2)/99.65;

DRAWTEXT_FIX(C!=0,0.02,0.05,0,'★ =================='),COLORRED;

DRAWTEXT_FIX(C!=0,0.02,0.1,0,'操 '),COLORRED;

DRAWTEXT_FIX(C!=0,0.02,0.15,0,'盘 '),COLORRED;

DRAWTEXT_FIX(C!=0,0.02,0.2,0,'铁 '),COLORRED;

DRAWTEXT_FIX(C!=0,0.02,0.25,0,'律 '),COLORRED;

DRAWTEXT_FIX(C!=0,0.02,0.3,0,'★ =================='),COLORRED;

DRAWTEXT_FIX(C!=0,0.04,0.1,0,'买入条件 E13 CCI'),COLORYELLOW;

DRAWTEXT_FIX(C!=0,0.04,0.15,0,'买入条件 2:30以后'),COLORYELLOW;

DRAWTEXT_FIX(C!=0,0.04,0.2,0,STRCAT('止损价位 ',STRCAT(CON2STR(止损价位,2),' 元'))),COLORYELLOW;

DRAWTEXT_FIX(C!=0,0.04,0.25,0,'线上:开仓 线下:休息'),COLORYELLOW;

A:=HHV(HIGH,13)=HIGH AND HIGH>REF(HIGH,1);

A1:=FILTER(A,12);

B:=LLV(LOW,13)=LOW AND LOW<REF(LOW,1);

B1:=FILTER(B,12);

TS1:=BARSLAST(A1);

箱顶:REF(HIGH,TS1),COLORFF00FF,NODRAW;

STICKLINE(1,箱顶,箱顶,1.5,0),COLORFF00FF;

TS2:=BARSLAST(B1);

箱底:REF(LOW,TS2),COLORFFBB80,NODRAW;

STICKLINE(1,箱底,箱底,1.5,0),COLORFFBB80;

箱高:100*(箱顶-箱底)/箱底,NODRAW;

四平:=(3*C+H+L+O)/6;

MTRYT1:=(8*四平+7*REF(四平,1)+6*REF(四平,2)+5*REF(四平,3)+

4*REF(四平,4)+3*REF(四平,5)+2*REF(四平,6)+REF(四平,8))/36;

MTRYT2:=(LLV(MTRYT1,2)+LLV(MTRYT1,4)+LLV(MTRYT1,6))/3;

SZ1:=REF(MTRYT1,1)=REF(MTRYT2,1) AND MTRYT1>MTRYT2 AND C>MTRYT1;

SZ2:=MTRYT1>MTRYT2 AND MTRYT1>REF(MTRYT1,1) AND MTRYT2>REF(MTRYT2,1)

AND H/MTRYT1<1.1 AND L>MTRYT2 AND C>MTRYT1;

SZ3:=MTRYT1>MTRYT2 AND MTRYT1>REF(MTRYT1,1) AND MTRYT2>=REF(MTRYT2,1) AND H/MTRYT1>1.1;

SZ4:=MTRYT1>MTRYT2 AND MTRYT1>REF(MTRYT1,1) AND MTRYT2>REF(MTRYT2,1)

AND C>MTRYT2 AND C<MTRYT1;

SZ5:=(MTRYT1>MTRYT2 AND MTRYT2>REF(MTRYT2,1) AND MTRYT1<>REF(MTRYT1,1)

AND C<MTRYT2) OR (MTRYT1>MTRYT2 AND MTRYT1<REF(MTRYT1,1)

AND MTRYT2<REF(MTRYT2,1) AND C<MTRYT2);

SZ6:=REF(MTRYT1,1)>REF(MTRYT2,1) AND MTRYT1=MTRYT2 AND C<MTRYT2;

XD1:=MTRYT1=MTRYT2 AND C<MTRYT2 OR (MTRYT1<REF(MTRYT1,1) AND MTRYT2<REF(MTRYT2,1)

AND REF(MTRYT1,1)=REF(MTRYT2,1) AND C<MTRYT2);

XD2:=MTRYT1=MTRYT2 AND C>MTRYT1;

饱和:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));

量能饱和度:=IF(饱和>1,1,饱和)*100;

DRAWTEXT_FIX(BARSTATUS=2 AND SZ1,0.8,0.05,0,'调整结束短线介入'),COLORRED;

DRAWTEXT_FIX(BARSTATUS=2 AND SZ2,0.8,0.05,0,'上升通道走势良好'),COLORRED;

DRAWTEXT_FIX(BARSTATUS=2 AND SZ3,0.8,0.05,0,'股价偏离注意调整'),COLORRED;

DRAWTEXT_FIX(BARSTATUS=2 AND SZ4,0.8,0.05,0,'上升通道调整洗盘'),COLORGREEN;

DRAWTEXT_FIX(BARSTATUS=2 AND SZ5,0.8,0.05,0,'转向特征注意离场'),COLORGREEN;

DRAWTEXT_FIX(BARSTATUS=2 AND SZ6,0.8,0.05,0,'通道改变坚决离场'),COLORGREEN;

DRAWTEXT_FIX(BARSTATUS=2 AND XD1,0.8,0.05,0,'下跌通道只宜观望'),COLORGREEN;

DRAWTEXT_FIX(BARSTATUS=2 AND XD2,0.8,0.05,0,'短期底部准备进入'),COLORYELLOW;

STICKLINE(C>O,O,LOW,0,0 ),COLOR0000FF;

STICKLINE(C>O,C,HIGH,0,0 ),COLOR0000FF;

STICKLINE(O>=C,C,LOW,0,0 ),COLOR00FF00;

STICKLINE(O>=C,O,HIGH,0,0 ),COLOR00FF00;

STICKLINE(O>=C,C,O,3,0 ),COLORFF5500;

STICKLINE(O>=C,C,O,2.8,0 ),COLORFF8800;

STICKLINE(O>=C,C,O,2,3 ),COLORFFBB00;

STICKLINE(O>=C,C,O,1.5,0 ),COLORFFDD00;

STICKLINE(O>=C,C,O,0.5,0 ),COLORFFFF00;

STICKLINE(C>O,C,O,3,0),COLOR000055;

STICKLINE(C>O,C,O,2.8,0),COLOR000077;

STICKLINE(C>O,C,O,2,3),COLOR000099;

STICKLINE(C>O,C,O,1.5,0),COLOR0000BB;

STICKLINE(C>O,C,O,0.5,0),COLOR0000DD;

MTRYT9Q:=C= HHV(C,4)AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3)) OR REF(C,1)=HHV(C,4)

AND C>=REF(C,2) OR REF(C,2)=HHV(C,4) AND REF(C,3)=LLV(C,4) AND C>=REF(C,1)

OR REF(C,3)=HHV(C,4) AND C>=REF(C,1) AND C>=REF(C,2);

STICKLINE(MTRYT9Q,C,(O+C)/2,3,0),COLOR000055;

STICKLINE(MTRYT9Q,C,(O+C)/2,2.8,0),COLOR000077;

STICKLINE(MTRYT9Q,C,(O+C)/2,2,3),COLOR000099;

STICKLINE(MTRYT9Q,C,(O+C)/2,1.5,0),COLOR0000DD;

STICKLINE(MTRYT9Q,C,(O+C)/2,0.5,0),COLOR0000FF;

MYUPER:=C=HHV(C,4) AND REF(C,1)=LLV(C,4);

STICKLINE(MYUPER,C,(O+C)/2,3,0),COLORFF11FF;

STICKLINE(MYUPER,C,(O+C)/2,2.8,0),COLORFF33FF;

STICKLINE(MYUPER,C,(O+C)/2,2,5),COLORFF66FF;

STICKLINE(MYUPER,C,(O+C)/2,1.5,0),COLORFF99FF;

STICKLINE(MYUPER,C,(O+C)/2,0.5,0),COLORFFDDFF;

MTERG:=C=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3))

OR REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4)

AND REF(C,1)<>HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4)

AND C<REF(C,1) AND C<REF(C,2);

STICKLINE(MTERG,C,(O+C)/2,3,0),COLOR333333;

STICKLINE(MTERG,C,(O+C)/2,2.8,0),COLOR666666;

STICKLINE(MTERG,C,(O+C)/2,2,5),COLORAAAAAA;

STICKLINE(MTERG,C,(O+C)/2,1.5,0),COLORDDDDDD;

STICKLINE(MTERG,C,(O+C)/2,0.5,0),COLORFFFFFF;

MTRYTCQ:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4)

AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1);

STICKLINE(MTRYTCQ,O,(O+C)/2,3,0),COLOR008800;

图片

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约