如何将同花顺公式改成通达信公式？
VAR111:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100;VAR1:=1;VAR2:=((((2*CLOSE)+HIGH)+LOW) / 4);VAR4:=LLV(LOW,5);VAR5:=HHV(HIGH,4);C1:(EMA((((VAR2-VAR4)/(VAR5-VAR4))*100),4)*VAR1),COLORFF00FF;C2:(EMA(((0.667*REF(C1,1))+(0.333*C1)),2)*VAR1),COLORFFFFFF;DRAWTEXT(CROSS(C1,C2),REF(C2,1),'加'),colorred;DRAWTEXT(CROSS(C2,C1),REF(C1,1),'减'),colorgreen;DRAWICON(CROSS(C1,C2) AND C2>0,MIN(C1,C2),1);DRAWICON(CROSS(C1,C2) AND C2<0,MIN(C1,C2),1);DRAWICON(CROSS(C2,C1) AND C2<-100,MAX(C1,C2)*1.2,2);DRAWICON(CROSS(C2,C1) AND C2>-100,MAX(C1,C2)*1.2,2);RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);K1:=SMA(RSV,3,1);DK1:=K1-REF(K1,1);DRAWTEXT_FIX(C>O,0.01,0.1,0,'严格执行纪律，结合SAR突破前后出“加”“↑”太给力了 ' ),coloryellow;重磅出击:IF(DK1>7 AND REF(DK1,1)<0 AND (DK1-REF(DK1,1))>9,30,0), LINESTICK,coloryellow;DRAWICON(重磅出击>0,30 ,1);VAR1:=(CLOSE+HIGH+LOW)/3;VAR2:=EMA(VAR1,10);VAR3:=REF(VAR2,1);绿探底震仓:IF(VAR2,10,DRAWNULL),colorgreen,LINETHICK2;持股: IF(VAR2>VAR3,10,DRAWNULL), colorred,LINETHICK2;持币: IF(VAR2<VAR3,10,DRAWNULL),COLORFFFF00,LINETHICK2;RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;X:=LLV(J,2)=LLV(J,8);买入: IF(CROSS(J,3),50,0),colorred,LINETHICK2;M:=55;N:=34;LC:=REF(CLOSE,1);RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);FF:=EMA(CLOSE,3);卖出准备:=EMA(CLOSE,21); DRAWTEXT(CROSS(85,RSI),95,'▼高抛'),colorgreen;
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,NODRAW;
ZERO:=0;
{MACD柱线变色标识}
STICKLINE(MACD>0 AND MACD>=REF(MACD,1),0,MACD,3,0),COLORRED;
STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,3,0),COLORLIBLUE;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,3,0),COLORMAGENTA;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,3,0),COLORLIGREEN;
{DIF线变色标识}
多:IF(DIF>REF(DIF,1),DIF,DRAWNULL),COLORRED,LINETHICK2;
空:IF(DIF<REF(DIF,1),DIF,DRAWNULL),COLORLIBLUE,LINETHICK1;
{MACD顶底背离标识.【注】系统提示使用未来函数是背离画线所致.不必害怕搜索}
GJ:=MAX(C,0);
L4:=LLV(GJ,4);
JL:=(HHV(DIF,55)-LLV(DIF,55))/5;
GT:=DEA>REF(DEA,1) AND REF(DEA,1)<REF(DEA,2);
A1:=BARSLAST(REF(GT,1));
底背离:=REF(L4,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND GT,COLORRED;
DRAWLINE(A1=0,DEA,底背离,REF(DEA,A1),0),COLORRED,LINETHICK1;
DRAWLINE(底背离,DEA,底背离,REF(DEA,A1),0),COLORRED,LINETHICK1;
DRAWTEXT(底背离,REF(DEA,A1)*1.18,'底背离'),COLORRED;
H4:=HHV(GJ,4);
GT2:=DEA<REF(DEA,1) AND REF(DEA,1)>REF(DEA,2);
A2:=BARSLAST(REF(GT2,1));
顶背离:=REF(H4,A2+1)<H4 AND DIF<REF(DIF,A2+1) AND GT2,COLORLIGREEN;
DRAWLINE(A2=0,DEA,顶背离,REF(DEA,A2),0),COLORLIGREEN,LINETHICK1;
DRAWLINE(顶背离,DEA,顶背离,REF(DEA,A2),0),COLORLIBLUE,LINETHICK1;
DRAWTEXT(顶背离,REF(DEA,A2)*1.18,'顶背离'),COLORLIGREEN;
{金叉死叉用符号标识}
A0:=DIF<0 AND DEA<0;
A11:=A0>REF(A0,1);
A3:=BARSLAST(A11);
A4:=COUNT(DEA>0 AND DIF>0,A3)=0;
A5:=CROSS(DIF,DEA);
A6:=BARSLAST(A5);
A7:=REF(A6,A6+1)+A6;
A8:=(DIF+DEA)/2;
A9:=(HIGH+LOW)/2;
A10:=A5 AND A7<A3 AND A4 AND A8>REF(A8,A7) AND A9<REF(A9,A7) AND MACD>0;
DRAWICON(CROSS(DIF,DEA),DIF,7);
DRAWICON(CROSS(DEA,DIF),DIF,8);
JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1,NODRAW;
A51:=BARSLAST(REF(CROSS(DIF,DEA),1));
A52:=BARSLAST(REF(CROSS(DEA,DIF),1));
DRAWTEXT(二次金叉,ZERO-0.10,' 二次金叉'),COLORMAGENTA;
{MACD&KDJ金叉死叉共振标识}
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) AND CROSS(J,D);
DRAWICON(A,DEA*1.0,11);
DRAWTEXT(A,DEA*1.0,'金叉共振'),COLORMAGENTA;
B:=CROSS(DEA,DIF) AND CROSS(D,K) AND CROSS(D,J);
DRAWICON(B,DEA*1.0,12);
DRAWTEXT(B,DEA*1.0,'死叉共振'),COLORLIGREEN;
{MACD二次启动信号标识}
JLTS:=BARSLAST(CROSS(DEA,0));
MZJG:=CROSS(DIF,DEA) AND EVERY(DEA>0,JLTS) AND COUNT(CROSS(DIF,DEA),JLTS)=1 AND COUNT(CROSS(DEA,DIF),8)=1;
DRAWICON(MZJG,ZERO,1);
DRAWTEXT(MZJG,ZERO-0.05,'涨'),COLORMAGENTA;
修改完毕，如有其他指标问题可点击头像问我。
