下面是（飞狐）的：
INPUT:M(5,1,9999);
MM:=9*M;
SHORT:=MM*4/3;
LONG:=MM*26/9;
DIF:1000*(EMA(CLOSE,SHORT)-EMA(CLOSE,LONG))/abs(EMA(CLOSE,SHORT));
MACD:EMA(DIF,MM),COLOR58FF58;
DEF:2*(DIF-MACD),COLORFFFF00,LINETHICK0;
STICKLINE(DEF>=0 AND DEF>=REF(DEF,1),0,DEF,6,1),COLOR6058FF;
STICKLINE(DEF>=0 AND DEF< REF(DEF,1),0,DEF,6,0),COLOR6058FF;
STICKLINE(DEF<0 AND DEF>=REF(DEF,1),0,DEF,6,1),COLORFFFF00;
STICKLINE(DEF<0 AND DEF< REF(DEF,1),0,DEF,6,0),COLORFFFF00;
PARTLINE(DIF<1000,0),COLORBROWN;
多头趋势:=IF(DIF>=0 AND MACD>=0 OR (DIF<0 AND MACD>=0),1,0);
空头趋势:=DIF<0 AND MACD<0 OR (DIF>=0 AND MACD<0);
缩头:=IF(DEF>0 AND REF(DEF,1)>REF(DEF,2) AND DEF< REF(DEF,1),1,0);
缩脚:=IF(DEF<0 AND REF(DEF,1)< REF(DEF,2) AND DEF>REF(DEF,1),1,0);
阻力:=IF(CROSS(C,MA(C,20)) OR CROSS(C,MA(C,60)),1,0);
支撑:=IF(CROSS(MA(C,20),C) OR CROSS(MA(C,60),C),1,0);
做多:=IF(CROSS(MACD,DIF) AND DIF>0 AND MACD>0,1,0);
放空:=IF(CROSS(DIF,MACD) AND DIF<0 AND MACD<0,1,0);
DRAWICON(多头趋势,DIF,10),ALIGN4;
DRAWICON(空头趋势,DIF,11),ALIGN5;
PARTLINE(DIF<1000,DIF),,COLORCCFFFF,LINETHICK1;
PARTLINE(MACD<1000,MACD),COLOR58FF58;
DRAWICON(FILTER(缩头,3) AND 缩头,DEF+0.01,5),ALIGN0;
DRAWICON(FILTER(缩脚,3) AND 缩脚,DEF,4),ALIGN1;
BV:=求和(DEF,0);
BA:=条件函数(最大值(BV,向前引用(BV,2))<向前引用(BV,1) OR 最小值(BV,向前引用(BV,2))>向前引用(BV,1),1,0);
BC:=上一次条件成立位置(BA)+1;
SMACD:=BV-向前引用(BV,BC);
var3:=条件函数(DEF>0,最高值(绝对值(DEF),bc),最低值(DEF,bc));
var4:=(DEF)/20;{图形比例缩小1/20,可修改}
var5:=SMACD;
显示数字(向前引用(var4,1)>0 and var4<=0 ,向前引用(var3,1),向前引用(var5,1),0){,pxup100},colorgreen;
显示数字(向前引用(var4,1)<0 and var4>=0 ,向前引用(var3,1),向前引用(绝对值(var5),1),0),{pxdn40,}colorff00ff;
显示数字(是否最后周期 and var4<0,向前引用(var3,1),绝对值(var5),0),align2,colorff00ff{,pxup40};
显示数字(是否最后周期 and var4>0,向前引用(var3,1),var5,0),align2,colorgreen{,pxdn100};
M1:=向前引用(DEF,1);
jc := MACD-dif;
绿柱面积:条件函数 (DEF<0,求和(DEF,上一次条件成立位置(jc<0)),0),linethick0,colorblue;
红柱面积:条件函数 (DEF>0,求和(DEF,上一次条件成立位置(jc>0)),0),linethick0,colorred;
说明：使用多组MACD的目的是，在一个周期的图形中就能全览短中长各个周期的MACD指标，把握住短中长的涨跌，互相照应，看MACD指标的方法为背驰看法，这样在一个图中就可以长中短同时操作（缠论操作），具体多级别配合看，大家总结交流。
级别的搭配这里只是一组范例：这里按5倍级数
第一组：
M:=1;
第二组：上一组数字乘5
M:=5;
来源：(http://www.55188.com/s/blog_5175bcee0100e9rh.html) - 原创用法：MACD指标组_赤脚火麒麟_新浪博客 第三组：上一组数字乘5;
M:=25;
组数和级别大家可以不拘一格，比如可以是4组，5组......，可以是5倍，6倍等其他的级数，也可以是随便的一组1、5、15、30、60......或斐波那契数列，目的是一下就看清各个级别现在的涨跌状态。现在正在探索最佳组数和倍数，欢迎大家探讨改进。
要看得清爽，要求显示器要足够大，我用28寸显示器看四组，看1分周期，显示1年的1分周期，也可以看其他5F等的周期，意思都一样。
(以上由流云无音收集修改,欢迎大家探讨改进）
大智慧的如下：还未调试，不能通过请告知，再修改
INPUT:M(5,1,9999);
MM:=9*M;
SHORT:=MM*4/3;
LONG:=MM*26/9;
DIF:1000*(指数平滑移动平均(收盘价,SHORT)-指数平滑移动平均(收盘价,LONG))/绝对值(指数平滑移动平均(收盘价,SHORT));
MACD:指数平滑移动平均(DIF,MM),COLOR58FF58;
DEF:2*(DIF-MACD),COLORFFFF00,LINETHICK0;
画柱线(DEF>=0 AND DEF>=向前引用(DEF,1),0,DEF,6,1),COLOR6058FF;
画柱线(DEF>=0 AND DEF< 向前引用(DEF,1),0,DEF,6,0),COLOR6058FF;
画柱线(DEF<0 AND DEF>=向前引用(DEF,1),0,DEF,6,1),COLORFFFF00;
画柱线(DEF<0 AND DEF< 向前引用(DEF,1),0,DEF,6,0),COLORFFFF00;
画分段线(DIF<1000,0),COLORBROWN;
BV:=求和(DEF,0);
BA:=条件函数(最大值(BV,向前引用(BV,2))<向前引用(BV,1) OR 最小值(BV,向前引用(BV,2))>向前引用(BV,1),1,0);
BC:=上一次条件成立位置(BA)+1;
SMACD:=BV-向前引用(BV,BC);
var3:=条件函数(DEF>0,最高值(绝对值(DEF),bc),最低值(DEF,bc));
var4:=(DEF)/20;{图形比例缩小1/20,可修改}
var5:=SMACD;
显示数字(向前引用(var4,1)>0 and var4<=0 ,向前引用(var3,1),向前引用(var5,1),0){,pxup100},colorgreen;
显示数字(向前引用(var4,1)<0 and var4>=0 ,向前引用(var3,1),向前引用(绝对值(var5),1),0),{pxdn40,}colorff00ff;
显示数字(是否最后周期 and var4<0,向前引用(var3,1),绝对值(var5),0),align2,colorff00ff{,pxup40};
显示数字(是否最后周期 and var4>0,向前引用(var3,1),var5,0),align2,colorgreen{,pxdn100};
M1:=向前引用(DEF,1);
jc := MACD-dif;
绿柱面积:条件函数 (DEF<0,求和(DEF,上一次条件成立位置(jc<0)),0),linethick0,colorblue;
红柱面积:条件函数 (DEF>0,求和(DEF,上一次条件成立位置(jc>0)),0),linethick0,colorred;{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
