文章
文章用户商铺文档快讯有问必答话题

你好 请求论坛高手帮我修改两个通达信公式为文华公式 (文华财经WH6赢顺V6.7)

投资者咨询：你好 请求论坛高手帮我修改两个通达信公式为文华公式 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-6 20:59
 第一个如下 

突破:=REF(EMA(C,10),1);
A1X:=(EMA(C,10)-突破)/突破*100;
多方:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),DRAWNULL);
空方:=IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),DRAWNULL);
STICKLINE(A1X>=0,多方,突破,10,0),COLOR000099;
STICKLINE(A1X<0,空方,突破,10,0),COLOR00CC66;



第二个如下
T:=150;
TT:=3;
N1:=0;
AMOV:=VOL*(OPEN+CLOSE)/2;
成本价:SUM(AMOV,5)/SUM(VOL,5),LINETHICK1,COLORBLUE;
MAA:MA(C,N1),COLOR209FFF;
DRAWTEXT(ISLASTBAR AND N1>0 AND MAA>REF(MAA,1),MAA,'↑'),COLORRED;
DRAWTEXT(ISLASTBAR AND N1>0 AND MAA<REF(MAA,1),MAA,'↓'),COLORRED;
高1:=REF(HHV(H,T),TT);
低1:=REF(LLV(L,T),TT);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
顶:REFDATE(高1,DATE),COLORBLACK;
一:REFDATE(H1,DATE),DOTLINE,COLORBLACK;
二:REFDATE(H2,DATE),DOTLINE,COLORBLACK;
三:REFDATE(H3,DATE),DOTLINE,COLORBLACK;
四:REFDATE(H4,DATE),DOTLINE,COLORBLACK;
五:REFDATE(H5,DATE),DOTLINE,COLORBLACK;
低:REFDATE(低1,DATE),COLORBLACK;
{TT3:=(CURRBARSCOUNT=5);}
TT4:=(CURRBARSCOUNT=1);
{DRAWNUMBER(TT3 AND 顶,顶,顶),COLORBLACK;}
DRAWTEXT(TT4 AND 顶,顶,'顶'),COLORBLACK;
{DRAWNUMBER(TT3 AND 一,一,一),COLORBLACK;}
DRAWTEXT(TT4 AND 一,一,Ɔ.809'),COLORBLACK;
{DRAWNUMBER(TT3 AND 二,二,二),COLORBLACK;}
DRAWTEXT(TT4 AND 二,二,Ɔ.618'),COLORBLACK;
{DRAWNUMBER(TT3 AND 三,三,三),COLORBLACK;}
DRAWTEXT(TT4 AND 三,三,Ɔ.5'),COLORBLACK;
{DRAWNUMBER(TT3 AND 四,四,四),COLORBLACK;}
DRAWTEXT(TT4 AND 四,四,Ɔ.382'),COLORBLACK;
{DRAWNUMBER(TT3 AND 五,五,五),COLORBLACK;}
DRAWTEXT(TT4 AND 五,五,Ɔ.191'),COLORBLACK;
{DRAWNUMBER(TT3 AND 低,低*1.01,低),COLORBLACK;}
DRAWTEXT(TT4 AND 低,低*1.009,'底'),COLORBLACK;
AS:=(O+H+L+C)/4;
BL:EMA(AS,17),LINETHICK2,COLORRED;
DRAWNUMBER(ISLASTBAR AND BL,BL*1.005,BL);
XGM:=CROSS(C,BL);
DRAWICON(XGM,BL,9);
IF(BL>REF(BL,1),BL,DRAWNULL),LINETHICK2,COLORRED;
IF(BL<REF(BL,1),BL,DRAWNULL),LINETHICK2,COLORGREEN;
DRAWTEXT(ISLASTBAR AND BL>REF(BL,1),BL,'↑'),COLORRED;
DRAWTEXT(ISLASTBAR AND BL<REF(BL,1),BL,'↓'),COLORRED;
{DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA),;
GMB:IF(CROSS(DIFF,DEA) AND DIFF>0,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLOR00FFFF;
GMC:IF(CROSS(DIFF,DEA) AND DIFF<0,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLOR208FFF;
DRAWTEXT(CROSS(DIFF,DEA) AND DIFF>0,L*0.998,'金叉>0'),COLORYELLOW;
DRAWTEXT(CROSS(DIFF,DEA) AND DIFF<0,L*0.998,'金叉<0'),COLORYELLOW;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
GJD:IF(CROSS(K,D) AND K>20 AND D<50,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLORFF00FF;
DRAWTEXT(CROSS(K,D) AND K>20 AND D<50,L*0.998,' KD金叉 '),COLOREEAAEE;};
投资者咨询：你好 请求论坛高手帮我修改两个通达信公式为文华公式 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-6 20:59
 期待有高手帮忙 改好后 可以加我微信 我私人酬谢 
技术人员回复
日期:2018-5-7 8:23
 突破:=REF(EMA(C,10),1);
A1X:=(EMA(C,10)-突破)/突破*100;
多方:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),NULL);
空方:=IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),NULL);
STICKLINE1(A1X>=0,多方,突破,10,0),COLOR000099;
STICKLINE1(A1X<0,空方,突破,10,0),COLOR00CC66;



第二个如下
T:=150;
TT:=3;
N1:=0;
AMOV:=VOL*(OPEN+CLOSE)/2;
成本价:SUM(AMOV,5)/SUM(VOL,5),LINETHICK1,COLORBLUE;
MAA:MA(C,N1),COLOR209FFF;
DRAWTEXT(ISLASTBAR AND N1>0 AND MAA>REF(MAA,1),MAA,'↑'),COLORRED;
DRAWTEXT(ISLASTBAR AND N1>0 AND MAA<REF(MAA,1),MAA,'↓'),COLORRED;
高1:=REF(HHV(H,T),TT);
低1:=REF(LLV(L,T),TT);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
顶:REFX1(高1,10000),COLORBLACK;
一:REFX1(H1,10000),DOT,COLORBLACK;
二:REFX1(H2,10000),DOT,COLORBLACK;
三:REFX1(H3,10000),DOT,COLORBLACK;
四:REFX1(H4,10000),DOT,COLORBLACK;
五:REFX1(H5,10000),DOT,COLORBLACK;
低:REFX1(低1,10000),COLORBLACK;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
TT4:=(CURRBARSCOUNT=1);

DRAWTEXT(TT4 AND 顶,顶,'顶'),COLORBLACK;

DRAWTEXT(TT4 AND 一,一,' 0.809'),COLORBLACK;

DRAWTEXT(TT4 AND 二,二,' 0.618'),COLORBLACK;

DRAWTEXT(TT4 AND 三,三,' 0.5'),COLORBLACK;

DRAWTEXT(TT4 AND 四,四,' 0.382'),COLORBLACK;

DRAWTEXT(TT4 AND 五,五,' 0.191'),COLORBLACK;

DRAWTEXT(TT4 AND 低,低*1.009,'底'),COLORBLACK;
AS:=(O+H+L+C)/4;
BL:EMA(AS,17),LINETHICK2,COLORRED;
DRAWNUMBER1(ISLASTBAR AND BL,BL*1.005,BL,0);
XGM:=CROSS(C,BL);
DRAWICON(XGM,BL,9);
IF(BL>REF(BL,1),BL,NULL),LINETHICK2,COLORRED;
IF(BL<REF(BL,1),BL,NULL),LINETHICK2,COLORGREEN;
DRAWTEXT(ISLASTBAR AND BL>REF(BL,1),BL,'↑'),COLORRED;
DRAWTEXT(ISLASTBAR AND BL<REF(BL,1),BL,'↓'),COLORRED;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
GMB:IF(CROSS(DIFF,DEA) AND DIFF>0,L*0.999,NULL),CROSSDOT,LINETHICK3,COLOR00FFFF;
GMC:IF(CROSS(DIFF,DEA) AND DIFF<0,L*0.999,NULL),CROSSDOT,LINETHICK3,COLOR208FFF;
DRAWTEXT(CROSS(DIFF,DEA) AND DIFF>0,L*0.998,'金叉>0'),COLORYELLOW;
DRAWTEXT(CROSS(DIFF,DEA) AND DIFF<0,L*0.998,'金叉<0'),COLORYELLOW;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
GJD:IF(CROSS(K,D) AND K>20 AND D<50,L*0.999,NULL),CROSSDOT,LINETHICK3,COLORFF00FF;
DRAWTEXT(CROSS(K,D) AND K>20 AND D<50,L*0.998,' KD金叉 '),COLOREEAAEE;

技术人员回复
日期:2018-5-7 8:24
另外论坛不支持其他方式沟通，您有问题论坛发帖即可
投资者咨询：你好 请求论坛高手帮我修改两个通达信公式为文华公式 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-6 20:59
 你好，我看到了，非常感谢你的帮忙，请问论坛里哪里有文华公式预警的公式可以查看？
投资者咨询：你好 请求论坛高手帮我修改两个通达信公式为文华公式 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-6 20:59
 另外再帮我修改两个，你很强大啊 如下 


JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
QJ5:=QJ1+QJ2;QJ6:=QJ3+QJ4;DD:=(QJ5-QJ6)/(QJ5+QJ6)*100;
DDZ:DD*17,LINETHICK1;
DDZ1:DD*13,LINETHICK1;
DRAWBAND(DDZ1,RGB(0,24,224),DDZ,RGB(255,0,0));
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0,COLORRED;
卖量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORCYAN;
进出量:=买量+卖量,COLOR00FFFF;
STICKLINE(进出量<0,0,进出量,4,0),COLORFF6600;
STICKLINE(进出量<0,0,进出量,3,0),COLORFF9900;
STICKLINE(进出量<0,0,进出量,1.5,0),COLORFFCC00;
STICKLINE(进出量<0,0,进出量,0.5,0),COLORCYAN;
STICKLINE(进出量>0,0,进出量,4,0),COLOR000099;
STICKLINE(进出量>0,0,进出量,3,0),COLOR0000CC;
STICKLINE(进出量>0,0,进出量,1.5,0),COLOR0000FF;
STICKLINE(进出量>0,0,进出量,0.5,0),COLORCC66FF;



第二个 如下

Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
ZK1:(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORBLUE;
ZD1:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;
ZD2:EMA(ZD1,25),LINETHICK2;
DRAWBAND(ZD1,RGB(55,0,0),ZD2,RGB(0,91,0));
DRAWKLINE(H,O,L,C);
STICKLINE(ZD1>LOW AND ZD1<HIGH,ZD1,MIN(MIN(OPEN,CLOSE),ZD1),2,0),COLORYELLOW;
STICKLINE(ZD1>MIN(C,O) AND ZD1<MAX(C,O),ZD1,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
STICKLINE(ZD1>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(ZD1>HIGH,HIGH,LOW,0,0),COLORYELLOW;
VAR23:=100*XMA(XMA((C-REF(C,1)),6),6)/XMA(XMA(ABS((C-REF(C,1))),6),6);
回调买:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));
XG:=ZD1>HIGH AND 回调买 AND L<=ZD1;
DRAWTEXT(XG,L,'▲买入'),COLORRED;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=CURRBARSCOUNT=1 AND C<REF(C,1);
DY2:=REF(V2,1)-DY;
XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<ZK1;
DRAWTEXT(XG2 AND L<ZD1,L,'�黑马暴涨'),COLORRED;



第三个 


T:=150;
TT:=3;
N1:=0;
AMOV:=VOL*(OPEN+CLOSE)/2;
成本价:SUM(AMOV,5)/SUM(VOL,5),LINETHICK1,COLORYELLOW;
MAA:MA(C,N1),COLOR00FF00;
DRAWTEXT(ISLASTBAR AND N1>0 AND MAA>REF(MAA,1),MAA,'↑'),COLOR00FF00;
DRAWTEXT(ISLASTBAR AND N1>0 AND MAA<REF(MAA,1),MAA,'↓'),COLOR00FF00;

AS:=(O+H+L+C)/4;
BL:EMA(AS,17),LINETHICK2,COLOR0000FF;
DRAWNUMBER(ISLASTBAR AND BL,BL*1.005,BL);
XGM:=CROSS(C,BL);
DRAWICON(XGM,BL,9);
IF(BL>REF(BL,1),BL,DRAWNULL),LINETHICK2,COLORYELLOW;
IF(BL<REF(BL,1),BL,DRAWNULL),LINETHICK2,COLOR00FF00;
DRAWTEXT(ISLASTBAR AND BL>REF(BL,1),BL,'↑'),COLOR00FFFF;
DRAWTEXT(ISLASTBAR AND BL<REF(BL,1),BL,'↓'),COLOR00FF00;
{DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA),;
GMB:IF(CROSS(DIFF,DEA) AND DIFF>0,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLOR00FFFF;
GMC:IF(CROSS(DIFF,DEA) AND DIFF<0,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLOR208FFF;
DRAWTEXT(CROSS(DIFF,DEA) AND DIFF>0,L*0.998,'金叉>0'),COLORYELLOW;
DRAWTEXT(CROSS(DIFF,DEA) AND DIFF<0,L*0.998,'金叉<0'),COLORYELLOW;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
GJD:IF(CROSS(K,D) AND K>20 AND D<50,L*0.999,DRAWNULL),CROSSDOT,LINETHICK3,COLORFF00FF;
DRAWTEXT(CROSS(K,D) AND K>20 AND D<50,L*0.998,' KD金叉 '),COLOREEAAEE;};
技术人员回复
日期:2018-5-8 8:27
预警公式您使用论坛搜索功能搜索一下

 为方便论坛提问，新改编指标请重新发帖提问，谢谢配合 
投资者咨询：你好 请求论坛高手帮我修改两个通达信公式为文华公式 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-6 20:59
老师你好，你帮我修改的公式 那个金叉 可否帮我换成 买入箭头符号
技术人员回复
日期:2018-5-8 13:07
指标 有未来函数的，不能和交易指令连用的

只能是符号的上箭头

3楼最后一句改成，以下语句即可

DRAWICON(CROSS(K,D) AND K>20 AND D<50,L*0.998,4),COLOREEAAEE;


投资者咨询：你好 请求论坛高手帮我修改两个通达信公式为文华公式 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-6 20:59
 非常感谢老师的帮忙。辛苦你了。