通达信WR绝技指标公式源码分享

相关简介:通达信WR绝技指标公式源码分享

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

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

　　授权方式：免费版

　　指标评级：★★★★★

　　指标分类：策略

　　画线方法：副图

   （1）短线买点

   A、慢线在80以上交叉快线，慢线大于快线，收阳线日买入（激进买点）；

   B、两线同时下穿80且慢线大于快线买入（稳健买点）。

   （2）中线买点

   A、两线同时下穿50进入强势买入（激进买点）；

   B、两线同时下穿20且两线大于0买入（稳健买点）。

   （3）卖点提示

   它的卖点也有几种：

   （1）两条线分开就卖掉；

   （2）分开后若慢线大于快线仍可持有，直到快线大于慢线卖出；

   （3）当两条线同时上穿50必须卖出，说明市场进入弱势；

   （4）虽然两条线粘合，但是触及到0，尤其是三次触及到0，预示短期头部的到来。

通达信指标公式源码：

    A:=MA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),21);
    D:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),2);
    DIF:D+100,COLOR9933FF;
    DEA:A+100,COLOR00FF00;
    MACD:50+(DIF-DEA),COLORFF00FF,NODRAW;
    DRAWBAND(DIF,RGB(150,50,50),DEA,RGB(0,0,255));
    STICKLINE(MACD>50,MACD,50,0,0),COLORFF00FF;
    STICKLINE(MACD<=50,MACD,50,0,0),COLORFFFF00;
    STICKLINE(20,20,20,0.1,0),COLOR00FF00;
    STICKLINE(80,80,80,0.1,0),COLOR00FF00;
    STICKLINE(50,50,50,10,0),COLOR00FFFF;
    STICKLINE(100,100,100,10,0),COLORFFCC00;
    STICKLINE(10,0,0,10,0),COLORFFCC00;
    WR:100-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),COLORFFFFFF;
    STICKLINE(WR=100,110,100,3,0),COLORFFFF00;
    STICKLINE(WR=0,0,-10,3,0),COLOR0000FF;
    底部:=IF((((1/WINNER(CLOSE))>100)AND(ABS((((COST(50)-CLOSE)/CLOSE)*100))>(100-ABS(((((((CLOSE-MA(CLOSE,10))/MA(CLOSE,10))*100)+(((CLOSE-MA(CLOSE,20))/MA(CLOSE,20))*100))+(((CLOSE-MA(CLOSE,30))/MA(CLOSE,30))*100))/3))))),100,0);
    大底:IF(((REF(底部,1)>0)AND(底部=0)),100,0),STICK,LINETHICK3,colorFF;
    DRAWTEXT(大底,50.2,'大底'),LINETHICK2,colorFFFFFF;
    DRAWTEXT(IF(CROSS(85,((3*SMA((((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*100),5,1))-(2*SMA(SMA((((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*100),5,1),3,1)))),100,0),96,'逃'),colorFFFFFF;
    买入:IF(((((1/WINNER(CLOSE))>100)AND(ABS((((COST(50)-CLOSE)/CLOSE)*100))>50))ANDIF((((1/WINNER(CLOSE))<REF((1/WINNER(CLOSE)),1))AND(REF((1/WINNER(CLOSE)),1)>REF((1/WINNER(CLOSE)),2))),120,0)),100,0),STICK,colorFF;
    DRAWTEXT((买入>0),90,'买50'),LINETHICK2,colorCCCCFF;
    买入A:IF(((((1/WINNER(CLOSE))>100)AND(ABS((((COST(50)-CLOSE)/CLOSE)*100))>30))ANDIF((((1/WINNER(CLOSE))<REF((1/WINNER(CLOSE)),1))AND(REF((1/WINNER(CLOSE)),1)>REF((1/WINNER(CLOSE)),2))),120,0)),30,0),STICK,LINETHICK2,colorFF;
    DRAWTEXT((买入A>0),25,'买30'),LINETHICK3,colorFFFF;
    VAR1:=REF(CLOSE,2);
    短线:((SMA(MAX((CLOSE-VAR1),0),7,1)/SMA(ABS((CLOSE-VAR1)),7,1))*100),colorFFFF00;
    车弩机:IF((短线<12),30,0);
    VAR2:=REF(CLOSE,1);
    VAR3:=((SMA(MAX((CLOSE-VAR2),0),7,1)/SMA(ABS((CLOSE-VAR2)),7,1))*100);
    弯弓:IF((VAR3<12),30,0);
    逢高派发区:STICKLINE((短线>80),(短线+10),(短线-10),1.5,0),colorFF;
    VAR1J:=((CLOSE/(EMA(EMA((((CLOSE+LOW)+HIGH)/3),3),26)*0.9))<0.95);
    放箭:IF(VAR1J,15,0),STICK,LINETHICK3,colorFF;
    DRAWTEXT(VAR1J,8,'箭'),colorF0F000;
    VARE1:=((INDEXC-REF(INDEXC,1))/REF(INDEXC,1));
    VARE2:=((CLOSE-REF(CLOSE,1))/REF(CLOSE,1));
    VARE3:=(IF((VARE1>0.01),0.9,1)ANDIF((VARE1>(0-0.025)),1,1.2));
    VARE4:=((VARE3*(VARE2-VARE1))*100);
    VARE5:=SUM(VARE4,10);
    VARE6:=SMA(VARE5,40,1);
    VARE7:=IF((((CLOSEAND(MA(VOL,5)/240))AND(CLOSE>(REF(CLOSE,1)*1)))ANDCLOSE),88,0);
    VARE8:=IF(((((((CLOSE/REF(CLOSE,1))>1.05)AND(((VOL/CAPITAL)*100)<10))AND(CLOSE<17))AND((HIGH/CLOSE)<1.01))AND(VARE7>0)),91,0);
    追击:IF((VARE8>90),30,0),STICK,LINETHICK3,colorFF0000;
    DRAWTEXT((VARE8>90),30,'追击'),colorFFFF;
    PARTLINE(1,80),colorAA;
    PARTLINE(1,20),colorAA00;
    RED:=(((HIGH+LOW)+(CLOSE*2))/4);
    HYS:=LLV(LOW,34);
    VAR3:=HHV(HIGH,34);
    B:=EMA((((RED-HYS)/(VAR3-HYS))*100),8);
    B1:=EMA(B,5);
    STICKLINE(((B>0)AND((B-B1)>=0)),49,50,6,0),colorFF;
    STICKLINE(((B>0)AND((B-B1)<0)),49,50,6,0),colorFF00;
    波段:EMA((((RED-HYS)/(VAR3-HYS))*100),9),LINETHICK0,colorFF;
    B1:=EMA(((0.667*REF(波段,1))+(0.333*波段)),2);
    FILLRGN((波段>B1),波段,B1),colorFF;
    FILLRGN((波段<B1),波段,B1),colorFF00;

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

   A赋值:-100*(34日内最高价的最高值-收盘价)/(34日内最高价的最高值-34日内最低价的最低值)的21日简单移动平均

   D赋值:-100*(34日内最高价的最高值-收盘价)/(34日内最高价的最高值-34日内最低价的最低值)的2日指数移动平均

   输出DIF:D+100,COLOR9933FF

   输出DEA:A+100,COLOR00FF00

   输出平滑异同平均线:50+(DIF-DEA),COLORFF00FF,NODRAW

   画带状线

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

   50,MACD,50,0,0),COLORFF00FF

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

   =50,MACD,50,0,0),COLORFFFF00

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

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

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

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

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

   输出WR:100-100*(34日内最高价的最高值-收盘价)/(34日内最高价的最高值-34日内最低价的最低值),COLORFFFFFF

   当满足条件WR=100时,在110和100位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFFFF00

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

   底部赋值:如果(((1/以收盘价计算的获利盘比例)>100)AND((((获利盘为50%的成本分布-收盘价)/收盘价)*100)的绝对值>(100-((((((收盘价-收盘价的10日简单移动平均)/收盘价的10日简单移动平均)*100)+(((收盘价-收盘价的20日简单移动平均)/收盘价的20日简单移动平均)*100)的绝对值,返回+(((收盘价-收盘价的30日简单移动平均)/收盘价的30日简单移动平均)*100))/3))))),否则返回100

   输出大底:如果((1日前的底部>0)AND(底部=0)),返回100,否则返回0,STICK,线宽为3,COLORFF

   当满足条件大底时,在50.2位置书写文字,线宽为2,COLORFFFFFF

   当满足条件如果85上穿((3*(((收盘价-27日内最低价的最低值)/(27日内最高价的最高值-27日内最低价的最低值))*100)的5日[1日权重]移动平均)-(2*(((收盘价-27日内最低价的最低值)/(27日内最高价的最高值-27日内最低价的最低值))*100)的5日[1日权重]移动平均的3日[1日权重]移动平均)),返回?,否则返回?时,在100,0)位置书写文字,COLORFFFFFF

   输出买入:如果((((1/以收盘价计算的获利盘比例)>100)AND((((获利盘为50%的成本分布-收盘价)/收盘价)*100)的绝对值>50))ANDIF((((1/以收盘价计算的获利盘比例)<1日前的(1/以收盘价计算的获利盘比例))AND(1日前的(1/以收盘价计算的获利盘比例)>?日前的(1/WIN,返回ER(收盘价)),2))),120,0)),否则返回100,STICK,COLORFF

   当满足条件(买入>0)时,在90位置书写文字,线宽为2,COLORCCCCFF

   输出买入A:如果((((1/以收盘价计算的获利盘比例)>100)AND((((获利盘为50%的成本分布-收盘价)/收盘价)*100)的绝对值>30))ANDIF((((1/以收盘价计算的获利盘比例)<1日前的(1/以收盘价计算的获利盘比例))AND(1日前的(1/以收盘价计算的获利盘比例)>?日前的(1/WIN,返回ER(收盘价)),2))),120,0)),否则返回30,STICK,线宽为2,COLORFF

   当满足条件(买入A>0)时,在25位置书写文字,线宽为3,COLORFFFF

   VAR1赋值:2日前的收盘价

   输出短线:(((收盘价-VAR1)和0的较大值的7日[1日权重]移动平均/(收盘价-VAR1)的绝对值的7日[1日权重]移动平均)*100),COLORFFFF00

   输出车弩机:如果(短线<12),返回30,否则返回0

   VAR2赋值:1日前的收盘价

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

   输出弯弓:如果(VAR3<12),返回30,否则返回0

   输出逢高派发区:当满足条件(短线>80)时,在(短线+10)和(短线-10)位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLORFF

   VAR1J赋值:((收盘价/((((收盘价+最低价)+最高价)/3)的3日指数移动平均的26日指数移动平均*0.9))<0.95)

   输出放箭:如果VAR1J,返回15,否则返回0,STICK,线宽为3,COLORFF

   当满足条件VAR1J时,在8位置书写文字,COLORF0F000

   VARE1赋值:((大盘的收盘价-1日前的大盘的收盘价)/1日前的大盘的收盘价)

   VARE2赋值:((收盘价-1日前的收盘价)/1日前的收盘价)

   VARE3赋值:(如果(VARE1>0.01),返回0.9,否则返回1ANDIF((VARE1>(0-0.025)),1,1.2))

   VARE4赋值:((VARE3*(VARE2-VARE1))*100)

   VARE5赋值:VARE4的10日累和

   VARE6赋值:VARE5的40日[1日权重]移动平均

   VARE7赋值:如果(((CLOSEAND(成交量(手)的5日简单移动平均/240))AND(收盘价>(1日前的收盘价*1)))ANDCLOSE),返回88,否则返回0

   VARE8赋值:如果((((((收盘价/1日前的收盘价)>1.05)AND(((成交量(手)/当前流通股本(手))*100)<10))AND(收盘价<17))AND((最高价/收盘价)<1.01))AND(VARE7>0)),返回91,否则返回0

   输出追击:如果(VARE8>90),返回30,否则返回0,STICK,线宽为3,COLORFF0000

   当满足条件(VARE8>90)时,在30位置书写文字,COLORFFFF

   PARTLINE(1,80),COLORAA

   PARTLINE(1,20),COLORAA00

   RED赋值:(((最高价+最低价)+(收盘价*2))/4)

   HYS赋值:34日内最低价的最低值

   VAR3赋值:34日内最高价的最高值

   B赋值:(((RED-HYS)/(VAR3-HYS))*100)的8日指数移动平均

   B1赋值:B的5日指数移动平均

   当满足条件((B>0)AND((B-B1)>=0))时,在49和50位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFF

   当满足条件((B>0)AND((B-B1)<0))时,在49和50位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFF00

   输出波段:(((RED-HYS)/(VAR3-HYS))*100)的9日指数移动平均,线宽为0,COLORFF

   B1赋值:((0.667*1日前的波段)+(0.333*波段))的2日指数移动平均

   FILLRGN((波段>B1),波段,B1),COLORFF

   FILLRGN((波段<B1),波段,B1),COLORFF00