麻烦帮忙写下这个,谢谢-- (文华财经WH6赢顺V6.7)

投资者咨询:麻烦帮忙写下这个,谢谢-- (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-24 14:11

收盘价大于EMA60时,EMA均线为红色,小于时为绿色

当EMA为红色后,第一个MACD金叉对应的K线下标注红色“1”,第2个MACD金叉对应的K线下标注红色“2”,依次类推

当EMA为绿色后,第一个MACD死叉对应的K线上标注绿色“1”,第2个MACD死叉对应的K线上标注绿色“2”,依次类推



图片点击可在新窗口打开查看
图片点击可在新窗口打开查看 文件名:screenshot20180524140716.png
技术人员回复
日期:2018-5-24 14:12

以红绿柱各标记2个数字为例

 

参考:

 

DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA  := EMA(DIFF,9);
MACD:=2*(DIFF-DEA),COLORSTICK;
JC:CROSS(DIFF,DEA);
SC:CROSSDOWN(DIFF,DEA);
N1:=SUMBARS(JC,2);
N2:=SUMBARS(JC,1);
A1:=BACKSET(ISLASTBAR,N1);
A2:=BACKSET(ISLASTBAR,N2);
M1:=SUMBARS(SC,2);
M2:=SUMBARS(SC,1);
B1:=BACKSET(ISLASTBAR,M1);
B2:=BACKSET(ISLASTBAR,M2);
DRAWTEXT(CROSS(B1,0.5),H,'1'),COLORGREEN,FONTSIZE16;
DRAWTEXT(CROSS(B2,0.5),H,'2'),COLORGREEN,FONTSIZE16;
DRAWTEXT(CROSS(A1,0.5),L,'1'),COLORRED,FONTSIZE16,VALIGN0;
DRAWTEXT(CROSS(A2,0.5),L,'2'),COLORRED,FONTSIZE16,VALIGN0;

投资者咨询:麻烦帮忙写下这个,谢谢-- (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-24 14:11
加载了 有点问题

1、2是从EMA均线变红或者变绿之后开始数的
EMA均线为红色时,只要MACD金叉时显示数值,绿色时只要MACD死叉时显示数值


技术人员回复
日期:2018-5-24 15:37

参考:

 

EMA60:EMA(C,60);
DRAWCOLORLINE(C>EMA60,EMA60,COLORRED,COLORGREEN);
S1:=BARSLAST(C>EMA60)+1;
S2:=BARSLAST(C<EMA60)+1;
Q1:=BARSLAST(CROSSDOWN(S1,S2))+1;
Q2:=BARSLAST(CROSSDOWN(S2,S1))+1;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA),COLORSTICK;
JC:=CROSS(DIFF,DEA);
SC:=CROSSDOWN(DIFF,DEA);

DRAWTEXT(C<EMA60&&COUNT(SC,Q2)=1&&SC,H,'1'),COLORGREEN,FONTSIZE19;
DRAWTEXT(C<EMA60&&COUNT(SC,Q2)=2&&SC,H,'2'),COLORGREEN,FONTSIZE19;
DRAWTEXT(C<EMA60&&COUNT(SC,Q2)=3&&SC,H,'3'),COLORGREEN,FONTSIZE19;
DRAWTEXT(C<EMA60&&COUNT(SC,Q2)=4&&SC,H,'4'),COLORGREEN,FONTSIZE19;
DRAWTEXT(C<EMA60&&COUNT(SC,Q2)=5&&SC,H,'5'),COLORGREEN,FONTSIZE19;
DRAWTEXT(C<EMA60&&COUNT(SC,Q2)=6&&SC,H,'6'),COLORGREEN,FONTSIZE19;
DRAWTEXT(C<EMA60&&COUNT(SC,Q2)=7&&SC,H,'7'),COLORGREEN,FONTSIZE19;
DRAWTEXT(C<EMA60&&COUNT(SC,Q2)=8&&SC,H,'8'),COLORGREEN,FONTSIZE19;
DRAWTEXT(C>EMA60&&COUNT(JC,Q1)=1&&SC,L,'1'),COLORRED,VALIGN0,FONTSIZE19;
DRAWTEXT(C>EMA60&&COUNT(JC,Q1)=2&&SC,L,'2'),COLORRED,VALIGN0,FONTSIZE19;
DRAWTEXT(C>EMA60&&COUNT(JC,Q1)=3&&SC,L,'3'),COLORRED,VALIGN0,FONTSIZE19;
DRAWTEXT(C>EMA60&&COUNT(JC,Q1)=4&&SC,L,'4'),COLORRED,VALIGN0,FONTSIZE19;
DRAWTEXT(C>EMA60&&COUNT(JC,Q1)=5&&SC,L,'5'),COLORRED,VALIGN0,FONTSIZE19;
DRAWTEXT(C>EMA60&&COUNT(JC,Q1)=6&&SC,L,'6'),COLORRED,VALIGN0,FONTSIZE19;
DRAWTEXT(C>EMA60&&COUNT(JC,Q1)=7&&SC,L,'7'),COLORRED,VALIGN0,FONTSIZE19;
DRAWTEXT(C>EMA60&&COUNT(JC,Q1)=8&&SC,L,'8'),COLORRED,VALIGN0,FONTSIZE19;