分享

通达信六脉神剑指标(副图)

 ab0000ab 2023-07-14 发布于天津

图片

图片

图片

副图源码:

DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13);

DEA:=EMA(DIFF,5);

B1:=DIFF>DEA;

MACD金叉:IF(B1,1,0),COLORRED;

RSV1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;

K:=SMA(RSV1,3,1);

D:=SMA(K,3,1);

DRAWICON(K>D,2,1);

DRAWICON(K<D,2,2);

DRAWTEXT(ISLASTBAR=1,2,'.KDJ'),COLORFFFFFF;

B2:=K>D;

KDJ金叉:IF(B2,2,0),COLORRED;

LC:=REF(CLOSE,1);

RSI1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(ABS(CLOSE-LC),5,1))*100;

RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100;

DRAWICON(RSI1>RSI2,3,1);

DRAWICON(RSI1<RSI2,3,2);

DRAWTEXT(ISLASTBAR=1,3,'.RSI'),COLORFFFFFF;

B3:=RSI1>RSI2;

RSI金叉:IF(B3,3,0),COLORRED;

RSV:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100;

LWR1:=SMA(RSV,3,1);

LWR2:=SMA(LWR1,3,1);

DRAWICON(LWR1>LWR2,4,1);

DRAWICON(LWR1<LWR2,4,2);

DRAWTEXT(ISLASTBAR=1,4,'.LWR'),COLORFFFFFF;

B4:=LWR1>LWR2;

LWR金叉:IF(B4,4,0),COLORRED;

BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;

DRAWICON(CLOSE>BBI,5,1);

DRAWICON(CLOSE<BBI,5,2);

DRAWTEXT(ISLASTBAR=1,5,'.BBI'),COLORFFFFFF;

B5:=CLOSE>BBI;

BBI金叉:IF(B5,5,0),COLORRED;

MTM:=CLOSE-REF(CLOSE,1);

MMS:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3);

MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8);

DRAWICON(MMS>MMM,6,1);

DRAWICON(MMS<MMM,6,2);

DRAWTEXT(ISLASTBAR=1,6,'.MTM'),COLORFFFFFF;

B6:=MMS>MMM;

MTM金叉:IF(B6,6,0),COLORRED;

涨买入:IF((B1 AND B2 AND B3 AND B4 AND B5 AND B6) AND REF(B1 AND B2 AND B3 AND B4 AND B5 AND B6,1)=0,7,0),COLORYELLOW,LINETHICK2;

上涨:IF(B1 AND B2 AND B3 AND B4 AND B5 AND B6,7,0),COLORYELLOW,LINETHICK2;

晴天:BARSLASTCOUNT(B1 AND B2 AND B3 AND B4 AND B5 AND B6),LINETHICK0;

雨天:BARSLASTCOUNT(MACD金叉+KDJ金叉+RSI金叉+LWR金叉+BBI金叉+MTM金叉>0 AND MACD金叉+KDJ金叉+RSI金叉+LWR金叉+BBI金叉+MTM金叉<21 ),LINETHICK0;

雪天:BARSLASTCOUNT(MACD金叉+KDJ金叉+RSI金叉+LWR金叉+BBI金叉+MTM金叉=0),LINETHICK0;

选股源码:

DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13);

DEA:=EMA(DIFF,5);

B1:=DIFF>DEA;

RSV1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;

K:=SMA(RSV1,3,1);

D:=SMA(K,3,1);

B2:=K>D;

LC:=REF(CLOSE,1);

RSI1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(ABS(CLOSE-LC),5,1))*100;

RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100;

B3:=RSI1>RSI2;

RSV:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100;

LWR1:=SMA(RSV,3,1);

LWR2:=SMA(LWR1,3,1);

B4:=LWR1>LWR2;

BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;

B5:=CLOSE>BBI;

MTM:=CLOSE-REF(CLOSE,1);

MMS:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3);

MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8);

B6:=MMS>MMM;

涨买入:IF((B1 AND B2 AND B3 AND B4 AND B5 AND B6) AND REF(B1 AND B2 AND B3 AND B4 AND B5 AND B6,1)=0,7,0);

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

    0条评论

    发表

    请遵守用户 评论公约