通达信掌股专家指标公式源码分享

相关简介:通达信掌股专家指标公式源码分享

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

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

　　授权方式：免费版

　　指标评级：★★★★★

　　指标分类：策略

　　画线方法：副图

   指标说明：

   资金动能A：资金动能短期参考线；

   资金动能B：资金动能长期参考线；

   AA：资金动能买点提示。

   研判方法：

   当资金动能A向上穿越资金动能B，资金动能买点提示信号出现时，多为买点；

   当资金动能A向下穿越资金动能B，多为卖点；

   当绿柱由长变短并且有变红迹象时我们可以密切关注该股，当资金动能A向上穿越0轴，绿柱转红柱，多为买点，当红柱由短变长，建议买入并且持有股票；

   当红柱由长变短，应注意股价下跌风险，当资金动能A向下穿越0轴，红柱转绿柱时，多为卖点。

通达信指标公式源码：

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

   DEA:=EMA(DIFF,9);

   A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));

   A2:=IF(CROSS(diff,dea)anddiff>0anddea>0,0,1);

   能量线:IF(A2,A1/10,A1/100);

   Var1:=EMA(MA(IF(CLOSE>OPEN,(CLOSE-OPEN)*VOL,IF(CLOSE<OPEN,(CLOSE-OPEN)*VOL,0)),5),1);

   Var2:=EMA(MA(IF(CLOSE>REF(CLOSE,1),(CLOSE-REF(CLOSE,1))*VOL,IF(CLOSE<REF(CLOSE,1),(CLOSE-REF(CLOSE,1))*VOL,0)),5),1);

   Var3:=EMA(MA(IF(OPEN>REF(CLOSE,1),(OPEN-REF(CLOSE,1))*VOL,IF(OPEN<REF(CLOSE,1),(OPEN-REF(CLOSE,1))*VOL,0)),5),1);

   Var4:=EMA(MA(IF(CLOSE<OPEN,(OPEN-CLOSE)*VOL,IF(CLOSE>OPEN,(OPEN-CLOSE)*VOL,0)),10),1);

   Var5:=EMA(MA(IF(CLOSE<REF(CLOSE,1),(REF(CLOSE,1)-CLOSE)*VOL,IF(CLOSE>REF(CLOSE,1),(REF(CLOSE,1)-CLOSE)*VOL,0)),10),1);

   Var6:=EMA(MA(IF(OPEN<REF(CLOSE,1),(REF(CLOSE,1)-OPEN)*VOL,IF(OPEN>REF(CLOSE,1),(REF(CLOSE,1)-OPEN)*VOL,0)),10),1);

   DX:=(Var1+Var2+Var3)/3/100;

   CX:=(Var4+Var5+Var6)/3/100;

   B1:=BARSLAST(REF(CROSS(DX,CX),1));

   买:IF(CROSS(DX,CX)AND能量线>0.5and能量线<2anddiff>REF(diff,1)ANDB1>5,0,-7);

   {卖：IF(A1>2,-7,0);}

   Sar1:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;

   Sar2:=SMA(SMA(Sar1,3,1),3,1);

   Sar3:=EMA(Sar2,5);

   Sar4:=3*Sar2-2*Sar3;

   Sar5:=IF(Sar4<REF(Sar4,1),1,0);

   buyp:=REF(CLOSE,BARSLAST(REF(买=0,1)))*1.07;

   buyk:=REF(CLOSE,BARSLAST(REF(买=0,1)))*0.9;

   buyd:=BARSLAST(REF(买=0,1));

   卖1:=IF(HIGH>buypand买=-7,1,0);{已获利}

   卖2:=IF(Sar5and买=-7,1,0);{注意顶部}

   卖3:=IF(buyd>10and买=-7,1,0);{超出短线操作持股天数}

   卖4:=IF(LOW<buykand买=-7,1,0);{听天由命吧~已亏损10%}

   x11:=买=0;

   x12:=卖1=1;

   a11:=BARSLAST(买=0);{买成立到现在的周期数}

   x13:=IF(卖1=1Or卖2=1Or卖3=1Or卖4=1,1,0);

   a12:=COUNT(x13=1,a11);

   s1:DRAWTEXT(卖1=1anda12=2,1,'已获利'),COLORRED;

   s2:DRAWTEXT(卖1=0and卖2=1anda12=2,1,'注意顶部'),COLORRED;

   s3:DRAWTEXT(卖1=0and卖2=0and卖3=1anda12=2,1,'超出持股天数'),COLORRED;

   s4:DRAWTEXT(卖1=0and卖2=0and卖3=0and卖4=1anda12=2,1,'止损'),COLORGREEN;

   A1:=((CLOSE-(LLV(LOW,27)))/((HHV(HIGH,27))-(LLV(LOW,27))))*100;

   A2:=SMA(A1,9,1);

   A3:=SMA(A2,5,1);

   A4:=SMA(A3,3,1);

   A5:=(3*A3)-(2*A4);

   A6:=(((MA(CLOSE,68))-((MA(CLOSE,68))/3)));

   A7:=((CLOSE/A6)-1)*100;

   A8:=BETWEEN(A7,1,-10);

   A9:=IF((A8>1),5,88);

   A10:=(MA(WINNER(CLOSE),9))*100;

   A11:=(CROSS(A2,2.5))*85;

   出击:IF((A11>0),100,0),LINETHICK3,colorred;

   DRAWTEXT((出击>0),80,'出击'),coloryellow;

   A12:=IF(((A11>0)OR(出击>0)),2,20);

   A13:=(2);

   AP6:=(((3*(SMA(A1,5,1)))-(2*(SMA((SMA(A1,5,1)),3,1)))));

   买点准备:IF(((A6<=9)AND(A5<38)),62,0),LINETHICK1,colorgreen;

   买入时间:IF(((CROSS(A6,A13))AND(A5<20)),88,0),LINETHICK2,colorcyan;

   A14:=((REF(((((LOW+OPEN)+CLOSE)+HIGH)/4),1)));

   A15:=(SMA(ABS((LOW-A14)),13,1))/(SMA((MAX((LOW-A14),0)),10,1));

   A16:=EMA(A15,10);

   A19:=((((HHV(HIGH,9))-CLOSE)/((HHV(HIGH,9))-(LLV(LOW,9))))*100)-70;

   A20:=(SMA(A19,9,1))+100;

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

   A22:=SMA(A21,3,1);

   A23:=(SMA(A22,3,1))+100;

   A24:=A23-A20;

   A25:=(IF((A24>100),(A24-100),0))*1.2;

   A26:=MA(A25,2);

   A27:=((CLOSE-(REF(CLOSE,1)))/(REF(CLOSE,1)))*100;

   A28:=((EMA(CLOSE,12))-(EMA(CLOSE,26)))*100;

   A29:=EMA(A28,9);

   A30:=2*(A28-A29);

   DRAWTEXT((((A28<-50)AND(A27>7))AND(A28<A29)),28,'底'),LINETHICK2,colorred;

   DRAWTEXT((((A28<-50)AND(A27>7))AND(A28>=A29)),5,'追'),colorwhite;

   STICKLINE(((A28<-50)AND(A27>7)),0,10,3,0),COLORFFFF66;

   A31:=((HIGH+LOW)+(3*CLOSE))/5;

   A32:=EMA(A31,5);

   A33:=EMA(A31,21);

   A34:=MA(CLOSE,60);

   A35:=(COUNT((CLOSE<A34),33))>31;

   A36:=CROSS(CLOSE,A34);

   A37:=(CLOSE/(REF(CLOSE,1)))>1.045;

   A38:=IF((((((CLOSE/(REF(CLOSE,1)))-1)*100)>=5)AND(CLOSE>(OPEN*1.04))),20,0);

   A39:=BARSLAST(A38);

   A40:=IF((((A39<=13)AND(LOW<(REF(OPEN,A39))))AND((CLOSE/(REF(CLOSE,1)))<=0.98)),10,0);

   A41:=(((COUNT((CLOSE<(REF(CLOSE,1))),4))>=3)OR((COUNT((CLOSE<(REF(CLOSE,1))),5))>=4))OR((COUNT((CLOSE<(REF(CLOSE,1))),6))>=5);

   A42:=(((((HHV(HIGH,5))/LOW)-1)*100)>18)OR(((((HHV(HIGH,7))/LOW)-1)*100)>18);

   超跌:IF((((A41AND(A26<0.3))ANDA42)AND(CLOSE<=(REF(CLOSE,1)))),50,0),LINETHICK2,colorwhite;

   A43:=(100*((HHV(HIGH,5))-CLOSE))/((HHV(HIGH,5))-(LLV(LOW,5)));

   A44:=(100*((HHV(HIGH,6))-CLOSE))/((HHV(HIGH,6))-(LLV(LOW,6)));

   A45:=80-(((A43*3)+(A44*2))/5);

   低吸:IF((((超跌ORA40)AND(A26<0.3))AND(A45<-18)),65,0),LINETHICK2,COLORFFFF99;

   A47:=REF(CLOSE,2);

   A48:=((SMA((MAX((CLOSE-A47),0)),7,1))/(SMA(ABS((CLOSE-A47)),7,1)))*100;

   超卖1:IF((A48<12),25,0),LINETHICK3,colorred;

   A49:=((SMA((MAX((CLOSE-(REF(CLOSE,1))),0)),7,1))/(SMA(ABS((CLOSE-(REF(CLOSE,1)))),7,1)))*100;

   超卖2:IF((A49<12),30,0),LINETHICK3,colorblue;

   派发:STICKLINE((A48>90),(A48+1),(A48-1),3,0),colorred;

   闪:IF(((A48<(REF(A48,1)))AND(A48>88)),A48,0),colorred;

   DRAWTEXT((闪>88),68,'出'),coloryellow;

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

   A51:=((SMA((MAX((CLOSE-(REF(CLOSE,1))),0)),10,1))/(SMA(ABS((CLOSE-(REF(CLOSE,1)))),10,1)))*100;

   A52:=A50AND(A50>A51);

   A53:=LLV(LOW,10);

   A54:=HHV(HIGH,25);

   A55:=EMA((((CLOSE-A53)/(A54-A53))*4),4);

   {DRAWTEXT((CROSS(A55,0.3)),25,'买'),COLORFFFFCC;}

   DRAWTEXT((CROSS(3.6,A55)),95,'卖'),colorgreen;

   A56:=(MA(HIGH,30))*(1+(22/100));

   A57:=(MA(LOW,30))*(1-(22/100));

   A58:=CLOSE<(REF(CLOSE,3));

   A59:=COUNT((A58=1),30);

   STICKLINE((A59>25),38,20,3,1),coloryellow;

   A60:=CLOSE>(REF(CLOSE,3));

   A61:=COUNT((A60=1),30);

   STICKLINE((A61>22),38,20,3,1),colorgreen;

   A62:=((CLOSE-(LLV(LOW,36)))/((HHV(HIGH,36))-(LLV(LOW,36))))*100;

   A63:=SMA(A62,3,1);

   A64:=SMA(A63,3,1);

   A65:=SMA(A64,3,1);

   波:(A64),colorred;

   段:(A65),colorgreen;

   A66:=(CROSS(A64,A65))AND(A64<12);

   DRAWTEXT(((FILTER(A66,10))=1),20,'㊣'),LINETHICK4,coloryellow;

   STICKLINE(((FILTER(A66,10))=1),0,50,2,0),coloryellow;

   A67:=(CROSS(A65,A64))AND(A64>90);

   STICKLINE(((FILTER(A67,5))=1),100,60,2,0),coloryellow;

   DRAWTEXT(((FILTER(A67,5))=1),78,'顶'),LINETHICK3,coloryellow;

   A68:=((CROSS(A63,A64))AND(A64>82))AND(A64>A65);

   STICKLINE(A68,100,68,3,0),COLORF00FF0;

   A69:=((CLOSE-(LLV(CLOSE,124)))/((HHV(CLOSE,124))-(LLV(CLOSE,124))))*100;

   A70:=A69=0;

   A71:=IF(((CLOSE/COST(5))<0.7),1,0);

   A72:=LLV(HIGH,240);

   A73:=(100*(CLOSE-A72))/A72;

   A74:=A73<0;

   A75:=IF(((CLOSE/COST(26))<0.7),1,0);

   A76:=((A71ORA75)ANDA70)ANDA74;

   A77:=((CLOSE-(MA(CLOSE,13)))/(MA(CLOSE,13)))*-100;

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

   A79:=SMA(A78,3,2);

   A80:=SMA(A79,3,2);

   A81:=SMA(A80,5,1);

   A82:=IF(((CLOSE/COST(10))<0.65),1,0);

   底部来临:IF(((FILTER(A76,10))=1),120,0),LINETHICK2,colorgreen;

   止跌:(IF(((FILTER(A82,3))=1),100,0)),COLORFFCC66;

   牛势股票:(((REF(A77,1))>=16)AND(((REF(A77,1))/A77)>=1.23))AND(CROSS(A80,A81)),colorred;

   STICKLINE((牛势股票>0),0.9,80,1,0),colorred;

   DRAWTEXT(底部来临,25,'底部买点'),colorgreen;

   DRAWTEXT(牛势股票,68,'牛势再现'),colorwhite;

   DRAWTEXT(止跌,50,'止跌转牛势'),coloryellow;

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

输出XG:最近5日一直存在成交量(手)<1日前的成交量(手)