{公式名称: 红十股心}

{用法注释:

上红下灰：向上拐点

上绿下蓝：向下拐点

红中有黄芯：KDJ金叉

绿中有红芯：KDJ死叉

全红：涨停  全蓝：跌停

上灰下蓝：  高开低走

VMA13:黄s表示强攻，绿色表示回调

★追财神——原则上K线变红时才追

开天眼——只适合做K线向上爬坡，波段初起时的股票，当趋势结束会消失。

出信号后—不要在纠结过往的大牛股为什么没信号,那是因为前一波段已经结束！

突破捉妖。拉升信号}

 

X_1:=INBLOCK(6);

DRAWTEXT_FIX(NOT(X_1),0,0,0,7),COLORYELLOW;

X_2:=DYBLOCK;

X_3:=STRCAT(8,X_2);

X_4:=HYBLOCK;

X_5:=ZSBLOCK;

X_6:=ZHBLOCK;

X_7:=STRCAT(X_3,X_4);

X_8:=STRCAT(X_7,X_5);

X_9:=STRCAT(X_8,X_6);

DRAWTEXT_FIX(X_1,0,0,0,X_9),COLORYELLOW;

DRAWTEXT_FIX(X_1,0.5,0,0,STRCAT(9,STRCAT(CON2STR(CAPITAL/1000000,1),10))),COLORGREEN;

DRAWTEXT_FIX(X_1,0.6,0,0,STRCAT(11,STRCAT(CON2STR(FINANCE(18),1),12))),COLORGREEN;

DRAWTEXT_FIX(X_1,0,0.04,0,13),COLORMAGENTA;

DRAWTEXT_FIX(X_1,0.05,0.04,0,GNBLOCK),COLORMAGENTA;

DRAWTEXT_FIX(X_1,0,0.08,0,14),COLORWHITE;

DRAWTEXT_FIX(X_1,0.05,0.08,0,FGBLOCK),COLORWHITE;

DRAWTEXT_FIX(X_1,0,0.12,0,STRCAT(15,STRCAT(CON2STR(FINANCE(43),1),16))),COLORWHITE;

DRAWTEXT_FIX(X_1,0.13,0.12,0,STRCAT(17,STRCAT(CON2STR(SUM(VOL,5)/CAPITAL*100,1),16))),COLORWHITE;

DRAWTEXT_FIX(X_1,0.23,0.12,0,STRCAT(18,STRCAT(CON2STR(VOL*100/CAPITAL,2),19))),COLORGREEN;

X_10:=CLOSE/REF(CLOSE,1)>=1.095;

X_11:=COUNT(X_10,BARSLAST(X_10+1));

X_12:=STRCAT(20,CON2STR(X_11,0));

X_13:=STRCAT(X_12,21);

X_14:=STRCAT(22,CON2STR(FINANCE(42),0));

X_15:=STRCAT(X_14,23);

X_16:=STRCAT(24,CON2STR(CONST(BARSLAST(X_10)),0));

X_17:=STRCAT(X_16,25);

X_18:=STRCAT(X_15,X_13);

X_19:=STRCAT(X_18,X_17);

X_20:=STRCAT(26,X_19);

DRAWTEXT_FIX(X_1,0,0.16,0,X_20),COLORYELLOW;

STICKLINE(OPEN>0,LOW,HIGH,0,0),COLORLIGRAY;

X_21:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);

X_22:=(1-7/100)*DMA(CLOSE,X_21);

X_23:=(1+7/100)*DMA(CLOSE,X_21);

X_24:=MA((LOW+HIGH+CLOSE)/3,5);

X_25:=REFDATE(X_22,DATE);

X_26:=REFDATE(X_23,DATE);

X_27:=MEMA(CLOSE,5);

X_28:=ATAN((X_27/REF(X_27,1)-1)*100)*180/3.1416;

X_29:=IF(X_28>0,X_28,X_28);

X_30:=MA(CLOSE,5);

X_31:=CLOSE=HHV(CLOSE,4) AND (REF(CLOSE,1)>=REF(CLOSE,2) OR REF(CLOSE,1)>=REF(CLOSE,3)) OR REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE>=REF(CLOSE,2) OR REF(CLOSE,2)=HHV(CLOSE,4) AND REF(CLOSE,3)=LLV(CLOSE,4) AND CLOSE>=REF(CLOSE,1) OR REF(CLOSE,3)=HHV(CLOSE,4) AND CLOSE>=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

X_32:=CLOSE=HHV(CLOSE,4) AND REF(CLOSE,1)=LLV(CLOSE,4);

X_33:=REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE>=REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)<=REF(CLOSE,3) AND REF(CLOSE,2)<REF(CLOSE,4) AND CLOSE>=REF(CLOSE,1);

X_34:=REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE<REF(CLOSE,2) OR (REF(CLOSE,2)=HHV(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,3) OR REF(CLOSE,3)=HHV(CLOSE,4) AND REF(CLOSE,1)>REF(CLOSE,2)) AND REF(CLOSE,2)>=REF(CLOSE,4) AND CLOSE<REF(CLOSE,1);

X_35:=X_24>REF(X_24,1) AND REF(X_24,1)<REF(X_24,2);

X_36:=LOW<HHV(X_24,13) AND HIGH>HHV(X_24,13) AND CLOSE>REF(CLOSE,1) AND CLOSE>OPEN;

X_37:=X_36 AND COUNT(X_35,2);

X_38:=100*EMA(EMA(CLOSE-REF(CLOSE,1),6),6)/EMA(EMA(ABS(CLOSE-REF(CLOSE,1)),6),6);

X_39:=EMA(MA(CLOSE,13),13);

X_40:=FILTER((LLV(X_38,2)=LLV(X_38,7) AND COUNT(X_38<0,2) AND CROSS(X_38,MA(X_38,2)))=1,5);

X_41:=FILTER((HHV(X_38,2)=HHV(X_38,7) AND COUNT(X_38>50,2) AND CROSS(MA(X_38,2),X_38))=1,1);

X_42:=SMA(EMA((CLOSE-REF(CLOSE,1))/REF(CLOSE,1),5)*100,3,1)*10;

X_43:=FILTER((CROSS(X_42,0) OR CROSS(CLOSE,X_39) AND X_40)=1,3);

X_44:=MA(CLOSE,18)>=REF(MA(CLOSE,18),3) AND CROSS(CLOSE,MA(CLOSE,18));

X_45:=X_37 AND NOT(REF(X_37,1));

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

X_47:=SMA(X_46,3,1);

X_48:=SMA(X_47,3,1);

X_49:=3*X_47-2*X_48;

X_50:=CROSS(X_49,X_48);

X_51:=CROSS(X_48,X_49);

X_52:=X_43 OR X_44 AND X_40;

X_53:=X_43 OR X_44 AND X_33;

X_54:=X_43 OR X_44 AND X_32;

X_55:=X_32 AND X_40 OR (X_33 AND X_40);

X_56:=X_50 AND X_33 OR (X_50 AND X_32) OR (X_50 AND X_40);

STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,(-1)),COLORYELLOW;

STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,(-1)),COLORGREEN;

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.5,0),COLORFF7700;

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.2,0),COLORFF9900;

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),COLORFFBB00;

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.5,0),COLORCYAN;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3.5,0),COLOR000099;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLOR0000CC;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLORRED;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;

X_57:=CLOSE=LLV(CLOSE,4) AND (REF(CLOSE,1)<REF(CLOSE,2) OR REF(CLOSE,1)<REF(CLOSE,3)) OR REF(CLOSE,1)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,2) OR REF(CLOSE,2)=LLV(CLOSE,4) AND REF(CLOSE,1)=HHV(CLOSE,4) AND CLOSE<REF(CLOSE,1) OR REF(CLOSE,3)=LLV(CLOSE,4) AND CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);

STICKLINE(X_57,OPEN,(OPEN+CLOSE)/2,3.5,0),COLOR009900;

STICKLINE(X_57,OPEN,(OPEN+CLOSE)/2,2.2,0),COLOR00BB00;

STICKLINE(X_57,OPEN,(OPEN+CLOSE)/2,1.5,0),COLOR00DD00;

STICKLINE(X_57,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORGREEN;

STICKLINE(X_33,OPEN,(OPEN+CLOSE)/2,3.5,0),COLOR999999;

STICKLINE(X_33,OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB;

STICKLINE(X_33,OPEN,(OPEN+CLOSE)/2,1.5,0),COLORDDDDDD;

STICKLINE(X_33,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORWHITE;

STICKLINE(X_50,OPEN,CLOSE,0.5,0),COLORYELLOW;

STICKLINE(X_51,OPEN,CLOSE,0.5,0),COLOR000099;

DRAWICON(X_45,LOW-0.02,7);

DRAWICON(X_52 OR X_53 OR X_54 OR X_55 OR X_56,LOW-0.02,1);

DRAWICON(X_51 OR X_41 OR CROSS(40,X_38),HIGH+0.02,2);

VMA13:MA(CLOSE,13),COLORFF9900,LINETHICK2;

强攻:IF(X_29>REF(X_29,1) AND X_29>=0,VMA13,DRAWNULL),COLORYELLOW,LINETHICK2;

回调:IF(X_29<REF(X_29,1) AND X_29>0,VMA13,DRAWNULL),COLORGREEN,LINETHICK2;

MA5:MA(CLOSE,5),COLORWHITE;

MA10:MA(CLOSE,10),COLOR000066;

X_58:=MA(CLOSE,20);

MA30:MA(CLOSE,30),POINTDOT,COLORLIRED;

MA60:MA(CLOSE,60),DOTLINE,COLOR05ADC0;

MA120:MA(CLOSE,120),POINTDOT,COLORGREEN;

X_59:=EMA(CLOSE,3);

X_60:=EMA(SLOPE(CLOSE,22)*20+CLOSE,55);

X_61:=MA(X_60,1);

X_62:=X_61*0.985;

X_63:=MA(CLOSE,5);

X_64:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);

X_65:=REF(X_64,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

X_66:=CLOSE<REF(C
[url=http://www.70822.com/soft/sort013/sort05/down-153317.html]红股十心（通达信公式 主图 源码 测试图）[/url]