通达信涨停雷达选股指标公式源码分享

相关简介:通达信涨停雷达选股指标公式源码分享

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

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

　　授权方式：免费版

　　指标评级：★★★★★

　　指标分类：策略

　　画线方法：副图

   主力雷达的副图指标，算是很经典的指标了，指标里面提示“升”在大多数情况下还是具有很大参考价值的，因此该指标一直作为软件付费的主要推荐功能，效果很好。鉴于优秀指标要共享，我把主力雷达的指标源码直接改为了通达信格式，并且在此基础上编写了主力雷达的条件选股，直接选出当天判断为“升”的股票，简单易上手，供大家参考使用。

通达信指标公式源码：

    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;
    BT1:=CROSS(RSI1,25);
    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;
    AAA:=(3*C+H+L+O)/6;   GUP1:(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36,LINETHICK2,COLORRED;   GUP2:=(HHV(GUP1,2)+HHV(GUP1,4)+HHV(GUP1,8))/3;   GUP3:=(LLV(GUP1,2)+LLV(GUP1,4)+LLV(GUP1,8))/3;   GUP4:(HHV(GUP2,2)+HHV(GUP2,4)+HHV(GUP2,8))/3;DJB:=BARSLASTCOUNT(C/REF(C,1)>1.096);
    DRAWNUMBER(C/REF(C,1)>1.096,H*1.015,DJB),COLORGREEN;
    DRAWTEXT_FIX(CURRBARSCOUNT=1ANDC/REF(C,1)>1.096,0.8,0.2,0,'连续第板'),COLORYELLOW;
    DRAWNUMBER_FIX(CURRBARSCOUNT=1ANDC/REF(C,1)>1.096,0.824,0.2,0,DJB),COLORGREEN;   GUP5:(LLV(GUP3,2)+LLV(GUP3,4)+LLV(GUP3,8))/3,COLORWHITE;   GUP6:=(LLV(GUP1,2)+LLV(GUP1,4)+LLV(GUP1,8))/3;   {DRAWBAND(GUP1,RGB(155,50,50),GUP6,RGB(250,250,0));}   IF((GUP1<=REF(GUP1,1)),GUP1,DRAWNULL),COLORGREEN,LINETHICK3;   IF((GUP1>=REF(GUP1,1)),GUP1,DRAWNULL),COLORRED,LINETHICK3;   STICKLINE(GUP4>GUP1,GUP4,GUP1,0,0),COLORBLUE;   DRAWKLINE(H,O,L,C);   DRAWTEXT(REF(GUP5,1)=REF(GUP1,1)ANDGUP5<GUP1,L*0.99,'买进'),COLORRED;   DRAWTEXT(REF(GUP6,1)=REF(GUP1,1)ANDGUP6<GUP1,L*0.98,'加仓'),COLORYELLOW;   DRAWTEXT(REF(GUP4,1)=REF(GUP1,1)ANDGUP4>GUP1,H,'卖出'),COLORGREEN;   ZT:=REF(C,1)*1.1-C<0.01ANDH=C;   突破:=CROSS(C,GUP4)ANDZT;   DRAWTEXT(突破,L,'起爆点');   STICKLINE(突破,CLOSE,OPEN,3.2,0),COLOR0077FF;   STICKLINE(突破,CLOSE,OPEN,2.5,0),COLOR0099FF;   STICKLINE(突破,CLOSE,OPEN,1.9,0),COLOR00BBFF;   STICKLINE(突破,CLOSE,OPEN,1.2,0),COLOR00DDFF;   STICKLINE(突破,CLOSE,OPEN,0.3,0),COLOR00FFFF;

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

   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赋值:RSI1上穿25

   当满足条件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

   AAA赋值:(3*收盘价+最高价+最低价+开盘价)/6

   输出???GUP1:(8*AAA+7*1日前的AAA+6*2日前的AAA+5*3日前的AAA+4*4日前的AAA+3*5日前的AAA+2*6日前的AAA+8日前的AAA)/36,线宽为2,画红色

   ???GUP2赋值:(2日内GUP1的最高值+4日内GUP1的最高值+8日内GUP1的最高值)/3

   ???GUP3赋值:(2日内GUP1的最低值+4日内GUP1的最低值+8日内GUP1的最低值)/3

   输出???GUP4:(2日内GUP2的最高值+4日内GUP2的最高值+8日内GUP2的最高值)/3

   DJB赋值:条件连续成立次数

   当满足条件收盘价/1日前的收盘价>1.096时,在最高价*1.015位置书写数字,画绿色

   当满足条件到最后交易的周期=1ANDC/1日前的收盘价>1.096时,在横轴0.8纵轴0.2位置书写文字,画黄色

   当满足条件到最后交易的周期=1ANDC/1日前的收盘价>1.096时,在横轴0.824纵轴0.2位置书写数字,画绿色

   输出???GUP5:(2日内GUP3的最低值+4日内GUP3的最低值+8日内GUP3的最低值)/3,画白色

   ???GUP6赋值:(2日内GUP1的最低值+4日内GUP1的最低值+8日内GUP1的最低值)/3

   ??????IF((GUP1<=1日前的GUP1),GUP1,无效数),画绿色,线宽为3

   ???IF((GUP1>=1日前的GUP1),GUP1,无效数),画红色,线宽为3

   ???STICKLINE(GUP4>GUP1,GUP4,GUP1,0,0),画蓝色

   ???DRAWKLINE(最高价,开盘价,最低价,收盘价)

   ???DRAWTEXT(1日前的GUP5=1日前的GUP1ANDGUP5<GUP1,最低价*0.99,'买进'),画红色

   ???DRAWTEXT(1日前的GUP6=1日前的GUP1ANDGUP6<GUP1,最低价*0.98,'加仓'),画黄色

   ???DRAWTEXT(1日前的GUP4=1日前的GUP1ANDGUP4>GUP1,最高价,'卖出'),画绿色

   ???ZT赋值:1日前的收盘价*1.1-收盘价<0.01ANDH=收盘价

   ???突破赋值:收盘价上穿GUP4ANDZT

   ???DRAWTEXT(突破,最低价,'起爆点')

   ???STICKLINE(突破,收盘价,开盘价,3.2,0),COLOR0077FF

   ???STICKLINE(突破,收盘价,开盘价,2.5,0),COLOR0099FF

   ???STICKLINE(突破,收盘价,开盘价,1.9,0),COLOR00BBFF

   ???STICKLINE(突破,收盘价,开盘价,1.2,0),COLOR00DDFF

   ???STICKLINE(突破,收盘价,开盘价,0.3,0),COLOR00FFFF