求大神把通达信指标换成金字塔，不胜感谢！ - 公式模型编写问题提交 - 金字塔客服中心 - 专业程序化交易软件提供商

MTR:=EMA(EMA(EMA(CLOSE,N),N),9);{原为12 12 12}

DIF:(MTR-REF(MTR,1))/REF(MTR,1)*20000;

DEA:MA(DIF,M),COLOR0066FF ;

MACD:(DIF-DEA)*2,COLORSTICK;

{底部信号}

BB值:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3);

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

DRAWTEXT(CROSS(BB值,9),0, '‘底部'),COLORYELLOW;

DRAWICON(CROSS(BB值,9),0,11);

STICKLINE(CROSS(BB值,9),0-0.1,MACD-0.1,1,0),COLORYELLOW;

MACD空中加油:=MACD>=0 AND REF(MACD,1)>=0 AND REF(MACD,2)>=0 AND

REF(MACD,3)>=0 AND MACD>REF(MACD,1) AND REF(MACD,1)<REF(MACD,2)

AND REF(MACD,2)<REF(MACD,3) ;

DRAWICON(MACD空中加油,0,23);

STICKLINE(MACD空中加油,0-0.1,MACD-0.1,0.2,0),COLORLIRED;

DRAWTEXT(MACD空中加油,0, '‘空中加油'),COLORLIRED;

{DRAWICON(REF(DIF,1)>REF(DIF,2) AND DIF<REF(DIF,1) AND DIF>0 AND DIF>DEA,DIF*1.1,2),COLORGREEN;

DRAWICON(CROSS(DEA,DIF) AND DIF>0,DIF,37),COLORGREEN;

DRAWICON(REF(DIF,1)<REF(DIF,2) AND DIF>REF(DIF,1) AND DIF<0 AND DIF<DEA,DIF*1.1,1),COLORRED;

DRAWICON(CROSS(DIF,DEA) AND DIF<0,DIF,36),COLORRED;}

X_2:=BARSLAST(REF(MACD,1)<0 AND MACD>0);

X_3:=LLVBARS(MACD,X_2+20);

X_4:=IF(X_3>X_2,REF(MACD,X_3),0);

X_5:=MACD<0 AND MACD>X_4 AND LOW=LLV(LOW,X_2+20) AND X_4<0;

X_6:=REF(X_5,1)=1 AND MACD>REF(MACD,1) AND REF(DIF,X_3)<0 AND MACD<0;

低积背:DRAWLINE(X_4=X_3,MACD,X_6,MACD,0),COLORMAGENTA,LINETHICK2;

DRAWICON(X_6,MACD*1.2,26);

X_7:=HHVBARS(MACD,X_2+20);

X_8:=IF(X_7>X_2,REF(MACD,X_7),0);

X_9:=MACD>0 AND MACD<X_8 AND HIGH=HHV(HIGH,X_2+20) AND X_8>0;

X_10:=REF(X_9,1)=1 AND MACD>REF(MACD,1) AND REF(DIF,X_7)>0;

顶积背:DRAWLINE(X_8=X_7,MACD,X_10,MACD,0)COLORCYAN,LINETHICK2;

DRAWICON(X_10,MACD*1.2,15);

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

底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);

STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;

底背:DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORRED,LINETHICK2;

DRAWTEXT(底背离,0.12,' 底背离'),COLORFF00FF;

A2:=BARSLAST(REF(CROSS(DEA,DIF),1));

顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF);

顶背:DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK2;

DRAWICON(顶背离,DIF,15);

X_11:=CLOSE/MA(CLOSE,40)*100<78;

X_12:=CLOSE/MA(CLOSE,60)*100<74;

X_13:=HIGH>LOW*1.051;

X_14:=X_13 AND COUNT(X_13,5)>1;

X_15:=IF(X_14 AND (X_11 OR X_12),2,0);

X_16:=CLOSE/REF(CLOSE,25)<=1.1;

X_17:=SMA(MAX(CLOSE-REF(CLOSE,2),0),7,1)/SMA(ABS(CLOSE-REF(CLOSE,2)),7,1)*100<15;

X_18:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;

X_19:=SMA(X_18,2,1);

X_20:=SMA(X_19,2,1);

X_21:=IF(X_19>REF(X_19,1) AND REF(X_19,1)<REF(X_19,2) AND X_19<23,1.5,0);

抄底:X_16 AND X_15 AND X_17 AND X_21 ,COLORWHITE;

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

X_23:=MA(CLOSE,5);

X_24:=IF(CLOSE>SAR(10,2,20),1,0);

X_25:=IF(CLOSE<SAR(10,2,20),(-1),0);

X_26:=ATAN((X_23/REF(X_23,1)-1)*100)*180/3.1416;

X_27:=IF(X_26>30,1,0);

X_28:=IF(X_26<(-30),(-1),0);

X_29:=X_24+X_27+X_25+X_28;}

{线变色}

{IF(X_29<(-1) OR X_22<25.01,DIF,DRAWNULL),COLORGREEN,LINETHICK1;

IF(X_22>74.989998 OR X_29>0,DIF,DRAWNULL),COLORRED,LINETHICK1;}

VA1:=HHVBARS(MACD,BARSLAST(MACD<0)+1);

VA2:=CROSS(BACKSET(CROSS(0,MACD) OR (ISLASTBAR AND MACD>0),REF(VA1,1)+2),0.5);

前高:DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORYELLOW,POINTDOT ;

VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1);

VA4:=CROSS(BACKSET(CROSS(MACD,0) OR (ISLASTBAR AND MACD<0),REF(VA3,1)+2),0.5);

前低:DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1),COLORYELLOW,POINTDOT ;

启动点:=MACD<0 AND MACD>REF(MACD ,1) AND REF(MACD ,1)<REF(MACD ,2)AND REF(MACD ,2)<REF(MACD ,3)AND REF(MACD ,3)<REF(MACD ,4);

DRAWICON(启动点,0,34);

STICKLINE(启动点,0-0.1,MACD-0.1,0.3,0),COLORMAGENTA;

DRAWTEXT(启动点,0, '‘启动点'),COLORMAGENTA;

{STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,1.8,0),COLOR000055;

STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,1.1,0),COLOR000099;

STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0.6,0),COLOR0000BB;}

启动点A:0,COLORYELLOW;

{DRAWICON(启动点,2,11);}

{MACD&KDJ 金叉共振}

{DIF:EMA(CLOSE,12)-EMA(CLOSE,26);DEA:EMA(DIF,9);}

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

K:=SMA(RSV,9,3),NODRAW;

D:=SMA(K,9,3),NODRAW;

J:=3*K-2*D,NODRAW;

A:=CROSS(DIF,DEA) AND CROSS(K,D);

DRAWICON(A,DEA*1.2,25);

DRAWTEXT(A,DEA*1.2, ' 金叉共振'),COLORYELLOW;

0,COLORGRAY,DOTLINE;

{RSI买入}

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

相对强弱RSI买入:=CROSS(WRSI,20),STICK,LINETHICK2,COLORYELLOW;

{RSI买入:STICKLINE(CROSS(WRSI,20),0,70,0,0),LINETHICK2,COLORYELLOW;}

STICKLINE(相对强弱RSI买入,0-0.1,MACD-0.1,0.3,0),COLORRED;

DRAWTEXT(相对强弱RSI买入,MACD-0.1, '‘RSI入'),COLORYELLOW;

{背离}

A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));

B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");

DRAWTEXT(B3>0,-0.3,'RSI底离'),COLORCYAN;{RSI底背离};

C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));

D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1");

DRAWTEXT(D3>0,0.5,'RSI顶离'),COLORGREEN;{RSI顶背离};

主题：求大神把通达信指标换成金字塔，不胜感谢！