[07-03] 让新股民都能掌握短买短卖，变色MACD又有了新的改进
很多朋友喜欢有金叉信号，加上了，很好。为方便短周期上使用，再次改进。让新股民都能掌握短买短卖，不上软件、公式骗子的当。
图上一分钟、日线都很明白。
[quote]DIF:=EMA(CLOSE,9)-EMA(CLOSE,18);
DEA:EMA(DIF,7),LINETHICK1,COLORFFFFFF;
MACD:=2*(DIF-DEA);
QDIF:IF(DEA,DIF,DRAWNULL),COLORRED,LINETHICK2;
D:=BACKSET(DIF<REF(DIF,1),2);
RDIF:IF(D ,DIF,DRAWNULL),COLOR33FF33,LINETHICK2;
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,0,0),COLOR0000FF;
STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,0,0),COLORFFFF00;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,0,0),COLORFF99FF;
STICKLINE(MACD<0 AND MACD< REF(MACD,1),0,MACD,0,0),COLORFFFF00;
金叉:=CROSS(DIF,DEA) AND DIF<0.3,COLOR0000FF;
DRAWICON((CROSS(DIF,DEA) AND DIF<0.3),0,1);
[/quote]
{BACKSET函数只是影响变色，不影响数值的正确性。}
[[i] 本帖最后由 本本 于 2008-7-19 16:03 编辑 [/i]] 大智慧中用不了:time: :time:
另外想提个小小的建议：有很多人喜欢根据MACD的背离来买卖，有的背离很容易看出来，有的呢则很细微不太容易看出来，希望高手可以编一个MACD的背离公式，让电脑根据MACD的数值变化来提示背离的发生。谢谢！！smi70lies smi12lies smi12lies smi12lies
请楼主帮忙.谢了
DIFF:EMA(DCLOSE,9)-EMA(CLOSE,18),COLORGRAY,LINETHICK2;DEA:EMA(DIFF,9),COLORYELLOW,LINETHICK2;
MACD:(DIFF-DEA)*2,COLORSTICK;
低位金:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(低位金,0,0.15,8,0),COLORYELLOW;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,34)=1;
STICKLINE(二次金,0,0.1,8,0),COLORFF80FF;
DRAWICON(二次金,DEA*0.85,1) ;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背离,0,0.05,8,0),,COLORFF00FF;
DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORFF00FF,LINETHICK2;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK2;
强:IF(DIFF>=DEA,DIFF,DRAWNULL),COLORRED,LINETHICK2;
这是一个MACD背离的公式(通达信).很好用.楼主的变色MACD我也很喜欢.
楼主能帮忙把这两个公式的功能结合起来编一个公式吗?也就是在楼主的公式中加入画顶背离和底背离线的功能.谢谢了 有飞狐的吗？smi82lies smi82lies smi12lies smi12lies 飞狐也用不来 高手，这个东东要怎么来使用啊 smi49lies smi49lies smi49lies
回复 1楼 的帖子
请问是用同花顺吗？怎么设置啊？期待中 楼主，好人做到底，要告诉咱这玩艺怎么用啊 又是一件利器啊，拿来试试，吼吼............回复 1楼 的帖子
QDIF:IF(DEA,DIF,DRAWNULL),COLORRED,LINETHICK2系统显示DRAWNULL未定义 QDIF:IF(DEA,DIF,DRAWNULL),COLORRED,LINETHICK2系统显示DRAWNULL未定义smi87lies smi49lies smi49lies smi49lies 谢谢楼主的指标，已经在通达信软件上安装。MACD1还有楼上老师的一个公式我也保存了MACD2
比较了一下，MACD2 的指标和原指标的区别还有一下，见图谢谢 ，但MACD2的背离还是不错 。
如图 ：[attach]48737[/attach] 楼主是把参数直接制定好也写进去的把我是新手别见笑 支持 不错,挺好用的,谢谢 [quote]原帖由 [i]mz510168[/i] 于 2008-7-4 08:32 发表 [url=http://bbs.dingdi.com/redirect.php?goto=findpost&pid=802771&ptid=58749][img]http://bbs.dingdi.com/images/common/back.gif[/img][/url]
大智慧中用不了:time: :time:
另外想提个小小的建议：有很多人喜欢根据MACD的背离来买卖，有的背离很容易看出来，有的呢则很细微不太容易看出来，希望高手可以编一个MACD的背离公式，让电脑根据MACD的数值变化来提 ... [/quote]
这个提议非常好，希望高手能够帮吗！！ 既然写了MACD的能否在帮忙把SKDJ指标也让其变了颜色谢谢了smi12lies smi12lies 期待........smi82lies smi82lies 大智慧用不了smi49lies [quote]原帖由 [i]nvxc888[/i] 于 2008-7-4 11:19 发表 [url=http://bbs.dingdi.com/redirect.php?goto=findpost&pid=804245&ptid=58749][img]http://bbs.dingdi.com/images/common/back.gif[/img][/url]
DIFF:EMA(DCLOSE,9)-EMA(CLOSE,18),COLORGRAY,LINETHICK2;
DEA:EMA(DIFF,9),COLORYELLOW,LINETHICK2;
MACD:(DIFF-DEA)*2,COLORSTICK;
低位金:=CROSS(DIFF,DEA) AND DIFF=0));
二次金:=CROSS(DIFF,DEA) AND DEACL ... [/quote]
谢谢两位分享公式的高手！
DIF:=EMA(CLOSE,9)-EMA(CLOSE,18);
DEA:EMA(DIF,7),LINETHICK1,COLORFFFFFF;
MACD:=2*(DIF-DEA);
QDIF:IF(DEA,DIF,DRAWNULL),COLORRED,LINETHICK2;
D:=BACKSET(DIF<REF(DIF,1),2);
RDIF:IF(D,DIF,DRAWNULL),COLOR33FF33,LINETHICK2;
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,0,0),COLOR0000FF;
STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,0,0),COLORFFFF00;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,0,0),COLORFF99FF;
STICKLINE(MACD<0 AND MACD< REF(MACD,1),0,MACD,0,0),COLORFFFF00;
DRAWICON((CROSS(DIF,DEA) AND DIF<0.3),-0.05,1);
DEA1:=EMA(DIF,9),COLORYELLOW,LINETHICK2;
MACD1:(DIF-DEA1)*2,COLORSTICK;
低位金:=CROSS(DIF,DEA1) AND DIF<-0.1;
STICKLINE(低位金,0,0.15,8,0),COLORYELLOW;
JCCOUNT:=COUNT(CROSS(DIF,DEA1),BARSLAST(DEA1>=0));
二次金:=CROSS(DIF,DEA1) AND DEA1<0 AND COUNT(JCCOUNT=2,34)=1;
STICKLINE(二次金,0,0.1,8,0),COLORFF80FF;
DRAWICON(二次金,DEA1*0.85,1) ;
A1:=BARSLAST(REF(CROSS(DIF,DEA1),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA1);
STICKLINE(底背离,0,0.05,8,0),COLORGREEN;
DRAWLINE(A1=0,DEA1,底背离,DEA1,0),COLORGREEN,LINETHICK2;
A2:=BARSLAST(REF(CROSS(DEA1,DIF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA1,DIF);
DRAWLINE(A2=0,DEA1,顶背离,DEA1,0),COLORGREEN,LINETHICK2;
强:IF(DIF>=DEA1,DIF,DRAWNULL),COLORRED,LINETHICK2;
试着综合了一下，看看是否楼主要的效果？ 谢谢提供
新MACD金叉、死叉
LONG .26. SHORT. 12. MID .9.DIFF:指数平滑移动平均(收盘价,SHORT)-指数平滑移动平均(收盘价,LONG),COLORWHITE;
DEA:指数平滑移动平均(DIFF,MID),COLORYELLOW;
MACD:(DIFF-DEA)*2,彩色棒状线;
DEA:= 指数平滑移动平均(DIFF,9),COLORGREEN;
画分段线(DIFF>DEA,DIFF),COLORRED,LINETHICK2;
画分段线(DIFF>DEA AND DIFF<0,DIFF),COLORMAGENTA,LINETHICK2;
画图标(交叉函数(DIFF,DEA),DIFF,10);
画图标(交叉函数(DEA,DIFF),DIFF,11);
周DIFF:简单移动平均("MACD.DIFF#WEEK"(LONG,SHORT,MID),5),点状线,LINETHICK1,COLORWHITE;
周DEA:简单移动平均("MACD.DEA#WEEK"(LONG,SHORT,MID),5),点状线,LINETHICK1,COLOR33FF99;
周金▲:显示文字(交叉函数("MACD.DIFF#WEEK"(LONG,SHORT,MID) ,"MACD.DEA#WEEK"(LONG,SHORT,MID)),0,'▲'),COLORred;
周死▼:显示文字(交叉函数("MACD.DEA#WEEK"(LONG,SHORT,MID) ,"MACD.DIFF#WEEK"(LONG,SHORT,MID)),0,'▼')COLORgreen;
月金个:显示文字(交叉函数("MACD.DIFF#MONTH"(LONG,SHORT,MID) ,"MACD.DEA#MONTH"(LONG,SHORT,MID)),0,'个'),COLORMAGENTA;
月死丫:显示文字(交叉函数("MACD.DEA#MONTH"(LONG,SHORT,MID) ,"MACD.DIFF#MONTH"(LONG,SHORT,MID)),0,'丫'),COLORYELLOW; smi52lies 22楼的朋友改的不错.谢谢了! 这在哪个软件上用啊 [quote]原帖由 [i]本本[/i] 于 2008-7-5 22:29 发表 [url=http://bbs.dingdi.com/redirect.php?goto=findpost&pid=817026&ptid=58749][img]http://bbs.dingdi.com/images/common/back.gif[/img][/url]
LONG .26. SHORT. 12. MID .9.
DIFF:指数平滑移动平均(收盘价,SHORT)-指数平滑移动平均(收盘价,LONG),COLORWHITE;
DEA:指数平滑移动平均(DIFF,MID),COLORYELLOW;
MACD:(DIFF-DEA)*2,彩色棒状线;
DEA:= 指 ... [/quote]通达讯不能用呢 smi54lies
页:
[1]
2