通达信珍藏的跟庄指标公式源码分享

相关简介:   通达信珍藏的跟庄指标公式源码分享                              

     通达信指标公式源码概况：

　　指标类别：通达信指标公式

　　授权方式：免费版

　　指标评级：★★★★★

　　指标分类：策略

　　画线方法：副图

找热门板块   短线精灵出现3次以上的票  红色坚决买入  绿色坚决卖出   翻翻不是梦

通达信指标公式源码：

  STICKLINE(C>0,-100,200,8,0),COLOR444444;
    N:=1.5;
    M:=3;
    P:=64;
    DIFF:=EMA((EMA(CLOSE,N*12)-EMA(CLOSE,N*26))/EMA(CLOSE,N*26)*1000,M);
    DEA:=EMA(DIFF,N*9),COLOR000088;
    MACD:=2*(DIFF-DEA);
    MACDX:=MACD;
    MACDO:=EMA(MACD,5),COLORFF77FF;
    DIFFO:=EMA(DEA,P)*1.8;
    B:=MACD-REF(MACD,1);
    (MACD>0ANDB>0,0,MACD,0,1),COLOR0000CD;
    STICKLINE(MACD>0ANDB<0,0,MACD,0,0),COLOR0000CD;
    STICKLINE(MACD<0ANDB>0,0,MACD,0,1),COLORCYAN;
    STICKLINE(MACD<0ANDB<0,0,MACD,0,0),COLORCYAN;
    STICKLINE(DIFF>DEA,DIFF,DEA,4,0),COLOR0089FF;
    STICKLINE(DIFF<DEA,DIFF,DEA,4,0),COLORBLUE;
    发现机构入场:IF(DIFF>=REF(DIFF,1)ANDDEA<REF(DEA,1),DIFF,DRAWNULL),COLOR00C500,LINETHICK4;
    短线出局:IF(DIFF<REF(DIFF,1)ANDDEA>REF(DEA,1),DIFF,DRAWNULL),COLORYELLOW,LINETHICK4;
    IF(DIFF>=REF(DIFF,1)ANDDEA>REF(DEA,1),DIFF,DRAWNULL),COLORGRAY;
    IF(DIFF<REF(DIFF,1)ANDDEA<REF(DEA,1),DIFF,DRAWNULL),COLORBLUE;
    IF(DIFFO>=REF(DIFFO,1),DIFFO,DRAWNULL),COLORYELLOW;
    IF(DIFFO=REF(DIFFO,1),DIFFO,DRAWNULL),COLORYELLOW;
    IF(DIFFO<REF(DIFFO,1),DIFFO,DRAWNULL),COLORMAGENTA;
    DRAWTEXT(C=CANDCURRBARSCOUNT=150,180,'操作:蓝转绿试买;见橙加仓;维持橙持股'),COLOR008987;
    DRAWTEXT(C=CANDCURRBARSCOUNT=150,150,'橙转黄减仓;蓝色空仓'),COLOR008987;
    LC:=REF(CLOSE,1);
    RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
    AR:=SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100;
    卖点雷达:=CROSS(85,RSI1)*30,COLOR00FF00,LINETHICK2;
    DRAWTEXT(CROSS(85,RSI1),20,'顶'),COLOR00FF00;
    STICKLINE(卖点雷达,0,20,3,0),COLOR00FF00;
    VARB:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
    VARC:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100;
    VARD:=BARSCOUNT(CLOSE);
    买点雷达:(VARB<20ANDVARC<25ANDVARD>50ANDAR<70)*30,LINETHICK2,COLOR0078FF;
    DRAWTEXT(BT1,-80,'底'),COLOR0000FF;
    STICKLINE(BT1,-100,-80,3,0),COLOR0000FF;
    主力:EMA((CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5,LINETHICK1,COLOR0000FF;
    散户:EMA((CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5,LINETHICK2,COLORC87800;
    BT2:=CROSS(主力,散户)AND主力<-10;
    DRAWICON(CROSS(RSI1,25),主力,26);
    DRAWICON(CROSS(主力,散户)AND主力<-10,主力,23);
    BT:=FILTER(COUNT(BT1ORBT2,3)>=2,3);
    STICKLINE(BT,0,50,4,1),COLOR0000FF;
    DRAWTEXT(BT,50,'金底'),COLOR0000FF;
    STICKLINE(BT2,0,20,3,0),COLORFF00FF;
    DRAWTEXT(BT2,20,'升'),COLORFF00FF;

[源码注释]通达信公式动态翻译结果

   当满足条件收盘价>时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

   0,-100,200,8,0),COLOR444444

   N赋值:1.5

   M赋值:3

   P赋值:64

   DIFF赋值:(收盘价的N*12日指数移动平均-收盘价的N*26日指数移动平均)/收盘价的N*26日指数移动平均*1000的M日指数移动平均

   DEA赋值:DIFF的N*9日指数移动平均,COLOR000088

   MACD赋值:2*(DIFF-DEA)

   MACDX赋值:MACD

   MACDO赋值:MACD的5日指数移动平均,COLORFF77FF

   DIFFO赋值:DEA的P日指数移动平均*1.8

   B赋值:MACD-1日前的MACD

   (MACD>

   0ANDB>

   0,0,MACD,0,1),COLOR0000CD

   当满足条件MACD>时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

   0ANDB<

   0,0,MACD,0,0),COLOR0000CD

   当满足条件MACD<时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

   0ANDB>

   0,0,MACD,0,1),画青色

   当满足条件MACD<时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

   0ANDB<

   0,0,MACD,0,0),画青色

   当满足条件DIFF>时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

   DEA,DIFF,DEA,4,0),COLOR0089FF

   当满足条件DIFF<时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.

   DEA,DIFF,DEA,4,0),画蓝色

   输出发现机构入场:如果DIFF>,返回?,否则返回?

   =1日前的DIFFANDDEA<

   1日前的DEA,DIFF,无效数),COLOR00C500,线宽为4

   输出短线出局:如果DIFF<,返回?,否则返回?

   1日前的DIFFANDDEA>

   1日前的DEA,DIFF,无效数),画黄色,线宽为4

   如果DIFF>,返回?,否则返回?

   =1日前的DIFFANDDEA>

   1日前的DEA,DIFF,无效数),画深灰色

   如果DIFF<,返回?,否则返回?

   1日前的DIFFANDDEA<

   1日前的DEA,DIFF,无效数),画蓝色

   如果DIFFO>,返回?,否则返回?

   =1日前的DIFFO,DIFFO,无效数),画黄色

   如果DIFFO=1日前的DIFFO,返回DIFFO,否则返回无效数,画黄色

   如果DIFFO<,返回?,否则返回?

   1日前的DIFFO,DIFFO,无效数),画洋红色

   当满足条件收盘价=CANDCURRBARSCOUNT=150时,在180位置书写文字

   见橙加仓

   维持橙持股’),COLOR008987

   当满足条件收盘价=CANDCURRBARSCOUNT=150时,在150位置书写文字

   蓝色空仓’),COLOR008987

   LC赋值:1日前的收盘价

   RSI1赋值:收盘价-LC和0的较大值的6日[1日权重]移动平均/收盘价-LC的绝对值的6日[1日权重]移动平均*100

   AR赋值:最高价-开盘价的26日累和/开盘价-最低价的26日累和*100

   卖点雷达赋值:85上穿RSI1*30,COLOR00FF00,线宽为2

   当满足条件85上穿RSI1时,在20位置书写文字,COLOR00FF00

   当满足条件卖点雷达时,在0和20位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00FF00

   VARB赋值:收盘价-LC和0的较大值的7日[1日权重]移动平均/收盘价-LC的绝对值的7日[1日权重]移动平均*100

   VARC赋值:收盘价-LC和0的较大值的13日[1日权重]移动平均/收盘价-LC的绝对值的13日[1日权重]移动平均*100

   VARD赋值:收盘价的有效数据周期数

   输出买点雷达:(VARB<20ANDVARC<25ANDVARD>50ANDAR<70)*30,线宽为2,COLOR0078FF

   当满足条件BT1时,在-80位置书写文字,COLOR0000FF

   当满足条件BT1时,在-100和-80位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR0000FF

   输出主力:(收盘价-收盘价的7日简单移动平均)/收盘价的7日简单移动平均*480的2日指数移动平均*5,线宽为1,COLOR0000FF

   输出散户:(收盘价-收盘价的11日简单移动平均)/收盘价的11日简单移动平均*480的7日指数移动平均*5,线宽为2,COLORC87800

   BT2赋值:主力上穿散户AND主力<-10

   当满足条件RSI1上穿25时,在主力位置画26号图标

   当满足条件主力上穿散户AND主力<-10时,在主力位置画23号图标

   BT赋值:统计3日中满足BT1ORBT2的天数>=2的3日过滤

   当满足条件BT时,在0和50位置之间画柱状线,宽度为4,1不为0则画空心柱.,COLOR0000FF

   当满足条件BT时,在50位置书写文字,COLOR0000FF

   当满足条件BT2时,在0和20位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF00FF

   当满足条件BT2时,在20位置书写文字,COLORFF00FF