老师你好,能不能将下面的通达信公式改成文华,最好是各周期都能显示公式
N:=21;
KDCM:=(100 * WINNER(CLOSE));
主力控盘:KDCM,STICK,COLORAA0033,LINETHICK4;
VAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR2:=2*ABS(VAR1);
获利平均值:=MA(COST(99),5);
获利99:=MA(COST(80),5);
获利80:=MA(CLOSE,5);
均线5日:=MA(COST(20),5);
获利20:=MA(COST(1),5);
获利1:=(((获利平均值 - 获利99) / 获利99) * 100);
A1:=(((获利99 - 均线5日) / 均线5日) * 100);
A2:=(((均线5日 - 获利20) / 获利20) * 100);
AA3:=IF((A1 < 10),100,0);
A4:=IF((A1 < 15),50,0);
A5:=IF((A1 < 20),25,0);
A6:=HHV(KDCM,N);
STICKLINE((CLOSE > 1),KDCM,0,3,1),LINETHICK2,COLORAA0033;
STICKLINE((CLOSE > 1),KDCM,0,2.5,0),COLOR330000;
STICKLINE((CLOSE > 1),KDCM,0,2,0),COLOR440011;
STICKLINE((CLOSE > 1),KDCM,0,1.5,0),COLOR550022;
STICKLINE((CLOSE > 1),KDCM,0,1,0),COLOR660033;
STICKLINE((CLOSE > 1),KDCM,0,0.5,0),COLOR770044;
STICKLINE((CLOSE > 1),KDCM,0,0.2,0),COLOR880055;
STICKLINE((CLOSE > 1),KDCM,0,0.1,0),COLOR990066;
DDCM:=EMA((100 * WINNER(CLOSE)),13);
STICKLINE(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,3,1),LINETHICK2,COLORAA0033;
STICKLINE(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,2.5,0),COLORFF0000;
STICKLINE(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,2,0),COLOR11FF00;
STICKLINE(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,1.5,0),COLOR22FF00;
STICKLINE(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,1,0),COLOR33FF00;
STICKLINE(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,0.5,0),COLOR44FF00;
STICKLINE(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,0.2,0),COLOR55FF00;
STICKLINE(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,0.1,0),COLOR66FF00;
绿柱:IF(((CLOSE > 1) AND (DDCM < KDCM)),1,0),COLORGREEN,LINETHICK0;
DRAWICON((KDCM < 2),0,1);
小红旗:IF((KDCM < 2),1,0),COLOR0000FF,NODRAW;
不同软件函数处理机制不同,加载效果可能略有差异,改写参考:
N:=21;
KDCM:=(100 * WINNER(CLOSE));
主力控盘:KDCM,STICK,COLORAA0033,LINETHICK4;
VAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR2:=2*ABS(VAR1);
获利平均值:=MA(COST(99),5);
获利99:=MA(COST(80),5);
获利80:=MA(CLOSE,5);
均线5日:=MA(COST(20),5);
获利20:=MA(COST(1),5);
获利1:=(((获利平均值 - 获利99) / 获利99) * 100);
A1:=(((获利99 - 均线5日) / 均线5日) * 100);
A2:=(((均线5日 - 获利20) / 获利20) * 100);
AA3:=IF((A1 < 10),100,0);
A4:=IF((A1 < 15),50,0);
A5:=IF((A1 < 20),25,0);
A6:=HHV(KDCM,N);
STICKLINE1((CLOSE > 1),KDCM,0,3,1),LINETHICK2,COLOR3300AA;
STICKLINE1((CLOSE > 1),KDCM,0,2.5,0),COLOR000033;
STICKLINE1((CLOSE > 1),KDCM,0,2,0),COLOR110044;
STICKLINE1((CLOSE > 1),KDCM,0,1.5,0),COLOR220055;
STICKLINE1((CLOSE > 1),KDCM,0,1,0),COLOR330066;
STICKLINE1((CLOSE > 1),KDCM,0,0.5,0),COLOR440077;
STICKLINE1((CLOSE > 1),KDCM,0,0.2,0),COLOR550088;
STICKLINE1((CLOSE > 1),KDCM,0,0.1,0),COLOR660099;
DDCM:=EMA((100 * WINNER(CLOSE)),13);
STICKLINE1(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,3,1),LINETHICK2,COLOR3300AA;
STICKLINE1(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,2.5,0),COLOR0000FF;
STICKLINE1(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,2,0),COLOR00FF11;
STICKLINE1(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,1.5,0),COLOR00FF22;
STICKLINE1(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,1,0),COLOR00FF33;
STICKLINE1(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,0.5,0),COLOR00FF44;
STICKLINE1(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,0.2,0),COLOR00FF55;
STICKLINE1(((CLOSE > 1) AND (DDCM < KDCM)),KDCM,DDCM,0.1,0),COLOR00FF66;
绿柱:IF(((CLOSE > 1) AND (DDCM < KDCM)),1,0),COLORGREEN,LINETHICK1;
DRAWICON((KDCM < 2),0,1);
小红旗:IF((KDCM < 2),1,0),COLOR0000FF,NODRAW;
老师你好,期货品种不显示图啊,还有办法修改吗
谢谢老师,下面的公式也是升级变色了,帮我改正一下,谢谢
VAR1:=EMA(EMA(CLOSE,3),1);
VAR2:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VAR3:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VAR4:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VAR5:=(((VAR2 + (2 * VAR3)) + (3 * VAR4)) / 6);
VAR6:=MA(VAR5,3);
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3.5,0),COLOR00AAFF;
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3.5,0),COLOR0044FF;
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),2.5,0),COLOR0088FF;
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3,0),COLOR00AAFF;
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,3.5,0),COLORFFAA00;
STICKLINE(控盘<0,控盘,0,3.52,0),COLORFF4400;
STICKLINE(控盘<0,控盘,0,2.5,0),COLORFF8800;
STICKLINE(控盘<0,控盘,0,0,0),COLORFFAA00;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR000088;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR0000AA;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR0000CC;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR0000EE;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLORRED;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR00AA00;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR00CC00;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR00EE00;

文件名:qq图片20180609175725.png