通达信四色图指标公式源码分享

相关简介:通达信四色图指标公式源码分享

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

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

　　授权方式：免费版

　　指标评级：★★★★★

　　指标分类：策略

　　画线方法：副图

通达信指标公式源码：

   DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);

   DEA:EMA(DIFF,9);

   MACD=2*(DIFF-DEA);

   Zero:0;

   gj:=MAX(C,O);

   STICKLINE(MACD>0ANDMACD>=REF(MACD,1),0,MACD,2,0),color0000ff;

   STICKLINE(MACD>0ANDMACD

   STICKLINE(MACD<0ANDMACD>=REF(MACD,1),0,MACD,2,0),colorff00ff;

   STICKLINE(MACD<0ANDMACD

   L4:=LLV(gj,4);

   jl:=(HHV(diff,55)-LLV(diff,55))/5;

   gt:=dea>REF(dea,1)ANDREF(dea,1)

   A1:=BARSLAST(REF(gt,1));

   底背离:=REF(L4,A1+1)>CLOSEANDdiff>REF(diff,A1+1)ANDgt;

   DRAWLINE(A1=0,DEA,底背离,REF(DEA,A1),0),colorred,LINETHICK2;

   DRAWLINE(底背离,DEA,底背离,REF(DEA,A1),0),colorred,LINETHICK2;

   DRAWTEXT(底背离,REF(DEA,A1)*1.18,'底背离'),COLORFF00FF;

   H4:=HHV(gj,4);

   gt2:=deaREF(dea,2);

   A2:=BARSLAST(REF(gt2,1));

   顶背离:=REF(H4,A2+1)

   DRAWLINE(A2=0,DEA,顶背离,REF(DEA,A2),0),colorgreen,LINETHICK2;

   DRAWLINE(顶背离,DEA,顶背离,REF(DEA,A2),0),colorgreen,LINETHICK2;

   DRAWTEXT(顶背离,REF(DEA,A2)*1.18,'顶背离'),colorgreen;

   A0:=DIFF<0ANDDEA<0;

   A11:=A0>REF(A0,1);

   A3:=BARSLAST(A11);

   A4:=COUNT(DEA>0ANDDIFF>0,A3)=0;

   A5:=CROSS(DIFF,DEA);

   A6:=BARSLAST(A5);

   A7:=REF(A6,A6+1)+A6;

   A8:=(DIFF+DEA)/2;

   A9:=(HIGH+LOW)/2;

   A10:=A5ANDA7REF(A8,A7)ANDA90;

   //DRAWTEXT(A10,DIFF*0.95,'金叉买入'),coloryellow;

   VAR1:=CLOSE>REF(CLOSE,1)ANDCLOSE>REF(CLOSE,2);

   VAR2:=REF(VAR1,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);

   VAR3:=REF(VAR2,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);

   VAR4:=REF(VAR3,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);

   VAR5:=REF(VAR4,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);

   VAR6:=REF(VAR5,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);

   VAR7:=REF(VAR6,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);

   VAR8:=REF(VAR7,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);

   VAR9:=REF(VAR8,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);

   VARA:=REF(VAR9,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);

   VARB:=REF(VARA,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);

   VARC:=REF(VARB,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);

   STICKLINE(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,CLOSE,REF(CLOSE,1),8,0),COLOR0000FF;

   VARD:=CLOSE<REF(CLOSE,1)ANDCLOSE<REF(CLOSE,2);

   VARE:=REF(VARD,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);

   VARF:=REF(VARE,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);

   VAR10:=REF(VARF,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);

   VAR11:=REF(VAR10,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);

   VAR12:=REF(VAR11,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);

   VAR13:=REF(VAR12,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);

   VAR14:=REF(VAR13,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);

   VAR15:=REF(VAR14,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);

   VAR16:=REF(VAR15,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);

   VAR17:=REF(VAR16,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);

   VAR18:=REF(VAR17,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);

   STICKLINE(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,CLOSE,REF(CLOSE,1),8,0),COLORC08000;

   VAR19:=REF(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,1)ANDVAR1;

   STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),8,2),COLORYELLOW;

   VAR1A:=REF(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,1)ANDVARD;

   STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),8,2),COLOR00FF00;

   AB:=EMA(((2*C+H+L)/4-LLV(L,30))/

   (HHV(H,30)-LLV(L,30))*100,8);

   BA:=EMA(AB,5);

   A1{高}:=REFDATE(REF(HHV(H,96),5),DATE);

   B1{低}:=REFDATE(REF(LLV(L,96),5),DATE);

   箱顶:IF(AB>0ANDAB-BA<=0,A1,A1),LINETHICK3,COLORGREEN;

   箱低:IF(AB>0ANDAB-BA<=0,B1,B1),LINETHICK3,COLORWHITE;

   趋势:=EMA(C,30),LINETHICK3;

   多:IF(趋势>=REF(趋势,1),趋势,INVALID),NODRAWINVALID,COLORRED,LINETHICK3;

   空:IF(REF(趋势,1)>趋势,趋势,INVALID),NODRAWINVALID,COLORYELLOW,LINETHICK3;

   N1:=17;N2:=34;

   STICKLINE(C>0,40,60,10,0),COLOR999999;

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

   短K:SMA(RSV,3,1),COLORF580F5,LINETHICK0;

   短D:SMA(短K,3,1),COLORCCDD33,LINETHICK0;

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

   中K:SMA(RSV1,5,1),colorred,LINETHICK0;

   中D:SMA(中K,10,1),COLOR00FFFF,LINETHICK0;

   底线:10,colorwhite;

   顶线:90,Color33FF33;

   BB:=IF(BARSLAST(CROSS(短K,RSV))>=3ANDCROSS(RSV,短K)AND短K<30,20,0);

   STICKLINE(BB,0,50,8,1),Color0000bb;

   STICKLINE(BB,0,50,4,1),Color0000dd;

   STICKLINE(BB,0,50,2,1),Color0000ff;

   AA:=IF(BARSLAST(CROSS(RSV,短K))>=4ANDCROSS(短K,RSV)ANDRSV>50,20,0);

   STICKLINE(AA,80,100,8,1),ColorD8D8D8;

   STICKLINE(AA,80,100,4,1),ColorE8E8E8;

   STICKLINE(AA,80,100,2,1),ColorFFFFFF;

   STICKLINE(短K>短D,短K,短D,8,1),Color820082;

   STICKLINE(短K>短D,短K,短D,6,1),ColorB700B7;

   STICKLINE(短K>短D,短K,短D,4,1),ColorF700F7;

   STICKLINE(短K>短D,短K,短D,2,1),ColorFF37FF;

   STICKLINE(短K<=短D,短K,短D,8,1),ColorBFBF00;

   STICKLINE(短K<=短D,短K,短D,6,1),ColorE8E800;

   STICKLINE(短K<=短D,短K,短D,4,1),ColorFFFF15;

   STICKLINE(短K<=短D,短K,短D,2,1),ColorFFFF46;

   STICKLINE(中K>中D,中K,中D,8,0),COLOR000099;

   STICKLINE(中K>中D,中K,中D,6,0),COLOR0000dd;

   STICKLINE(中K>中D,中K,中D,4,0),COLOR0000cc;

   STICKLINE(中K>中D,中K,中D,2,0),COLOR0000ff;

   STICKLINE(中K<=中D,中K,中D,8,0),COLOR009FFF;

   STICKLINE(中K<=中D,中K,中D,6,0),COLOR00B5FF;

   STICKLINE(中K<=中D,中K,中D,4,0),COLOR00E4FF;

   STICKLINE(中K<=中D,中K,中D,2,0),COLOR00FFFF;

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

   a=SMA(RSV,3,1);

   b=SMA(a,3,1);

   e:=3*a-2*b;

   IF(e<0)e=0;

   IF(e>100)e=100;

   PARTLINE(e,e>REF(e,1),colorred,e

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

输出XG:条件连续成立次数>3