[AG261111]MACD主升浪副图-通达信指标源码分享

01 夜里那根柱还没落定,我盯着DI的八级台阶
收盘那阵,副图那根红柱我盯着发呆,翻回白天才回过味来——主升浪副图里最值钱的不是金叉那一下,是DI后面拖的那排八档均线,像水缸上的一道道刻度线,一道压一道齐刷刷往上抬才叫势,塌一档势就散了,道理就这么直白。
这套东西说白了是把MACD和一组短周期均线缝在一块:其中DIF和DEA负责快慢交叉,把八条从4日到250日的均线排成台阶则是DI的主业,末了再用一根红柱子把"八档同时抬头"这件事画出来。夜里再滑一遍,哪一段台阶密、哪一段开始稀,心里就有数。
先认这几个零件,我把常用的四块挑出来:
✓ DIF1与DEA1|快慢均线的差与它九日的平滑,负责画金叉死叉✓ DI与D1到D8|四日减十三日的DI,再摊成八条不同周期均线✓ AA红柱|八档均线一起抬头、且价在十一日线上方才亮✓ 底背离顶背离|价格和DIF拧着走时,用线把它们连起来
02 指标源码分享|主升浪副图

指标编号:AG261111
指标完整源码:
DIF1:=EMA(CLOSE,12)-EMA(CLOSE,26),COLOR00FF00,LINETHICK1;DEA1:=EMA(DIF1,9),COLOR00FF00,LINETHICK1;DRAWICON(CROSS(DIF1,DEA1),DEA1,1);DRAWICON(CROSS(DEA1,DIF1),DEA1,2);{主升浪消失出局}DI:=EMA(CLOSE,4)-EMA(CLOSE,13),COLORMAGENTA,LINETHICK2;D1:=EMA(DI,5),COLORGRAY;D2:=EMA(DI,10),COLORGRAY;D3:=EMA(DI,20),COLORGRAY;D4:=EMA(DI,30),COLORGRAY;D5:=EMA(DI,60),COLORGRAY;D6:=EMA(DI,90),COLORGRAY;D7:=EMA(DI,120),COLORGRAY;D8:=EMA(DI,250),COLORGRAY;AA:=STICKLINE(DI>=REF(DI,1)ANDD1>=REF(D1,1)ANDD2>=REF(D2,1)ANDD3>=REF(D3,1)ANDD4>=REF(D4,1)ANDD5>=REF(D5,1)ANDD6>=REF(D6,1)ANDD7>=REF(D7,1)ANDD8>=REF(D8,1)ANDC>EMA(C,11)ANDDI>-0.8,DI,0,2,0),COLORRED;STICKLINE(AA,DIF1,DEA1,3,0),COLORE6E8FA;{柱状线}MACD1:=(DIF1-DEA1)*2;STICKLINE(MACD1>REF(MACD1,1),0,MACD1,3.2,0),COLOR0000FF;STICKLINE(MACD1>REF(MACD1,1),0,MACD1,2.7,0),COLOR0000FF;STICKLINE(MACD1>REF(MACD1,1),0,MACD1,2.1,0),COLOR0000FF;STICKLINE(MACD1>REF(MACD1,1),0,MACD1,1.5,0),COLOR0000FF;STICKLINE(MACD1>REF(MACD1,1),0,MACD1,0.9,0),COLOR0000FF;STICKLINE(MACD1>REF(MACD1,1),0,MACD1,0.3,0),COLORCC66FF;STICKLINE(MACD1<REF(MACD1,1),0,MACD1,3.2,0),COLORFF9900;STICKLINE(MACD1<REF(MACD1,1),0,MACD1,2.7,0),COLORFF9900;STICKLINE(MACD1<REF(MACD1,1),0,MACD1,2.1,0),COLORFF9900;STICKLINE(MACD1<REF(MACD1,1),0,MACD1,1.5,0),COLORFF9900;STICKLINE(MACD1<REF(MACD1,1),0,MACD1,0.9,0),COLORFF9900;STICKLINE(MACD1<REF(MACD1,1),0,MACD1,0.3,0),COLORFFCC00;STICKLINE(MACD1>=0ORMACD1<=0,0,0,50,1),COLORWHITE;{信号位提示}A1:=BARSLAST(REF(CROSS(DIF1,DEA1),1));BL:=REF(CLOSE,A1+1)>CLOSEANDDIF1>REF(DIF1,A1+1)ANDCROSS(DIF1,DEA1);DRAWICON(BL,DEA1,23);A2:=BARSLAST(REF(CROSS(DEA1,DIF1),1));DBL:=REF(CLOSE,A2+1)<CLOSEANDREF(DIF1,A2+1)>DIF1ANDCROSS(DEA1,DIF1);DRAWICON(DBL,DEA1,12);低位金叉:=CROSS(DIF1,DEA1)ANDDIF1<-0.1;DRAWTEXT(低位金叉,DIF1,' 低位金叉');JCCOUNT:=COUNT(CROSS(DIF1,DEA1),BARSLAST(DEA1>=0));二次金叉:=CROSS(DIF1,DEA1)ANDDEA1<0ANDCOUNT(JCCOUNT=2,21)=1;DRAWICON(二次金叉,DEA1*1.04,13);DRAWTEXT(二次金叉,-0.1,' 二次金叉'),COLORFF00FF;A10:=BARSLAST(REF(CROSS(DIF1,DEA1),1));底背离:=REF(CLOSE,A10+1)>CLOSEANDDIF1>REF(DIF1,A10+1)ANDCROSS(DIF1,DEA1);DRAWLINE(A10=0,DEA1,底背离,DEA1,0),COLORRED,LINETHICK2;DRAWTEXT(底背离,-0.50,' 底背离'),COLOR00FF00;A20:=BARSLAST(REF(CROSS(DEA1,DIF1),1));顶背离:=REF(CLOSE,A20+1)<CLOSEANDREF(DIF1,A20+1)>DIF1ANDCROSS(DEA1,DIF1);DRAWLINE(A20=0,DEA1,顶背离,DEA1,0),COLORWHITE,LINETHICK2;{趋势柱状线}WY1001:=(2*CLOSE+HIGH+LOW)/4;WY1002:=EMA(WY1001,4);WY1003:=EMA(WY1002,4);WY1004:=EMA(WY1003,4);X:=(WY1004-REF(WY1004,1))/REF(WY1004,1)*100;X1:=IF(X<REF(X,1),X,DRAWNULL),COLORWHITE,LINETHICK2;XO:=MA(X,2),COLOR9932CD;SI:=REF(X,1);STICKLINE(X>SI,X,SI,2.3,0),COLOR0000FF;STICKLINE(X>SI,X,SI,0.3,0),COLORCC66FF;STICKLINE(X<SI,X,SI,2.3,0),COLOR00BB00;STICKLINE(X<SI,X,SI,0.3,0),COLOR00FF00;STICKLINE(底背离,X,SI,1,0),COLORYELLOW;STICKLINE(低位金叉,X,SI,1,0),COLORWHITE;STICKLINE(低位金叉AND底背离,X,SI,0.1,0),COLORYELLOW;{另一信号可省}VAR2:=REF(LOW,1);VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);VAR5:=LLV(LOW,13);VAR6:=HHV(VAR4,13);VAR7:=IF(MA(CLOSE,34),1,0);VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;VAR9:=IF(VAR8>100,100,VAR8);VAR10:=IF(VAR9>-120,VAR9,0);VAR11:=VAR10<REF(VAR10,1);DRAWTEXT(VAR11ANDREF(NOT(VAR11),1),0,'☆'),COLORYELLOW;{走势线}DIF:DIF1,LINETHICK1,COLORGREEN;DEA:DEA1,LINETHICK1,COLORGREEN;DIF2:IF(MACD>REF(MACD,1),DIF1,DRAWNULL),COLORRED,LINETHICK1;DEA2:IF(DEA1<DIF1,DEA1,DRAWNULL),COLORFF00FF,LINETHICK1;{主力进场}VAR12:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);VAR13:=SMA(ABS(LOW-VAR12),13,1)/SMA(MAX(LOW-VAR12,0),10,1);VAR14:=EMA(VAR13,10);VAR15:=LLV(LOW,33);VAR16:=EMA(IF(LOW<=VAR15,VAR14,0),3);主力进场:=IF(VAR16>REF(VAR16,1),VAR16,0),COLORRED,NODRAW;STICKLINE(主力进场,X,SI,0.1,0),COLORRED;
聊到这个我把 #主升浪# 归进 MACD 那一档存着,#均线台阶# #底背离# 也顺手记一笔,回头翻图好找。
03 八档台阶凭什么算数,得从DI那一步说起
先看最上层的DIF1,它就是十二日线减二十六日线,跟老MACD一模一样,没什么新花样,图省事的直接把老MACD抄过来。有意思的是参数12与26这对组合,取太短比如六对十三,一根DIF一天能翻三回脸、满屏都是毛刺;取太长二十四对六十,等它抬头黄花菜都凉了,两头都不落好,得往中间找。
12和26是拿A股一轮完整波段试出来的落点,短的那头贴着五到八日的节奏,长的那头正好盖住一个来月的震荡,两者一相减,就把"快慢谁压过谁"这件事剥得干干净净。那会儿还没这么多花头,好多写法就是照着老MACD改出来的,这图也不例外,抄归抄,参数落点才是它真正想说的意思。
再往下是DEA1,它是给DIF做的九日平滑。九这个数也有讲究,它其实是DIF的一个钝化窗,专门过滤掉那种窜上去又掉回来的假交叉,你要是把9改成3,柱子当天就抖个不停;改成18,信号又慢上半拍,卡在九这个中间,等于给DIF配了个记性还不错的搭档。
DEA1:=EMA(DIF1,9)
真正的骨架在这儿,就是DI,注意它跟DIF是两路人:前者看十二对二十六的慢节奏,后者盯四日减十三日的快节奏专抓短线那一口气。原作者把这快家伙又摊成八条,从五日一路铺到二百五十日,等于同一股劲被反反复复看了八遍,八遍里全说"在往上",那才是真往上,糊弄不得。
8
八档均线
DI:=EMA(CLOSE,4)-EMA(CLOSE,13)
台阶就是这么来的,也是那根红柱AA的判断门。三个条件缺一不可,八档均线各自不低于前一日管的是台阶齐不齐,C压在十一日线上方管的是当下价别太虚,那道DI大过负0.8则是水位闸,台阶哪怕都抬头、只要整体还泡在零轴下方的深水区,这柱也照样点不亮。
AA:=DI>=REF(DI,1) AND ... AND D8>=REF(D8,1) AND C>EMA(C,11) AND DI>-0.8
这里我留个钩子,那个负0.8的门槛看着像随手写的,其实砍不得,它把整副图的脾气从"追高"生生拽回到"只认强势区"。至于柱子的高度来自MACD1,末尾乘2并不是乘完数值才有意义,柱子本来就是DIF减DEA的两倍,乘2只是把振幅拉到肉眼能分辨的量级,纯粹给眼睛看,方向大小一概不动。
MACD1:=(DIF1-DEA1)*2
底背离顶背离那两笔用BARSLAST记住上一次交叉的位置,再拿价格和DIF对着表,价创了新低、可DIF反倒比上回高,这根连线一拉就写着"拧着来"三个字。台阶、柱子、连线各管一摊,缝在一块才叫主升浪副图,缺了哪一样都差那么一口气。
我把台阶从八档削成四档跑过一回,图上直接轻了一半,稍有点回抽就凑不齐、红柱半天不亮,反倒不如八档耐看,所以这八道刻度线的数目我是真舍不得动一下。
夜里那根柱到底会不会落,其实谁也没写死,我也就没往下想。
