[ZD261002]动能短线副图-通达信指标源码分享

01 动能先拐头，背离才敢认

眼睛盯背离，盯到眼花也未必盯得准。动能短线副图把背离这件事做成了雷达：三套一起扫，谁先出谁后出，图上写得明明白白。副图里一条动能线打底，柱线跟着动能走，背离来了自动写字，不用你肉眼去量。

速查卡（五秒扫完）：

02 指标源码分享｜动能短线

指标编号：ZD261002

完整指标源码：

OSC:=C-REF(MA(C,13),5){动能线};分界:=MA(OSC,8);DIFF:=EMA(OSC,12)-EMA(OSC,26);DEA:=EMA(DIFF,9);MACD:=2*(DIFF-DEA);ZF:=IF(C>REF(H,1),EMA(L,5),IF(C<REF(EMA(L,5),1),H,EMA(L,5)));KD:=BARSLAST(C<=ZF);XH:=KD=1ANDBARSLAST(MACD<REF(MACD,1));{柱线}STICKLINE(MACD<REF(MACD,1)ANDMACD<0,0,MACD*4,0,0),COLORFF6600;STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD*4,0,0),COLOR0088FF;STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD*4,0,0),COLORFF88FF;STICKLINE(MACD>REF(MACD,1)ANDMACD>0,0,MACD*4,0,0),COLORFFCCFF;{K柱}STICKLINE(OSC<REF(OSC,1)(AMOUNT/REF(AMOUNT,1)<0.97),OSC,REF(OSC,1),3,0),COLORWHITE;{位置标注}STICKLINE(CROSS(REF(MACD,1),MACD)ANDMACD<REF(MACD,1),OSC,REF(OSC,1),3,0),COLOR0088FF;{高位标注}STICKLINE(OSC>=REF(OSC,1),OSC,REF(OSC,1),3,1),COLORRED;{信号位}STICKLINE(BARSLAST(XH)<2,OSC,REF(OSC,1),3,1),COLORRED;{延时}STICKLINE(XH,OSC,REF(OSC,1),2,0),COLORFF00FF;{启动}STICKLINE(OSC<分界,OSC,REF(OSC,1),3,1),COLORFFFF00;{低位区}黄高位白位置:IF(1=1,DRAWNULL,DRAWNULL),COLORYELLOW;{高位标注}梅红启动:IF(1=1,DRAWNULL,DRAWNULL),COLORMAGENTA;{启动}红信号兰低位:IF(1=1,DRAWNULL,DRAWNULL),COLORFFA900;{低位区};{DIFF:EMA(C,12)-EMA(C,26);DEA:EMA(DIFF,9);MACD:2*(DIFF-DEA),COLORSTICK;STICKLINE(MACD<REF(MACD,1)ANDMACD>0,0,MACD,0,0),COLORFF6666;STICKLINE(MACD>=REF(MACD,1)ANDMACD>0,0,MACD,0,0),COLORRED;STICKLINE(MACD>REF(MACD,1)ANDMACD<0,0,MACD,0,0),COLOR00FFFF;STICKLINE(MACD<=REF(MACD,1)ANDMACD<0,0,MACD,0,0),COLORFF6666;DD1:=EMA(C,3)-EMA(C,8);DD2:=EMA(O,3)-EMA(O,8);DD3:=EMA(H,3)-EMA(H,8);DD4:=EMA(L,3)-EMA(L,8);DRAWICON(CROSS(DD1,DIFF)ANDDIFF<-0.05,DD4-0.5,1);DRAWICON(CROSS(DIFF,DD1)ANDDIFF>0.1,DD3+0.5,2);STICKLINE(DD1>=DD2,DD1,DD2,4,1),COLOR0099FF;STICKLINE(DD1<=DD2,DD1,DD2,4,1),COLOR00FF00};A1:=BARSLAST(REF(CROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9)),1));B1:=REF(C,A1+1)>CANDREF("MACD.DIF"(12,26,9),A1+1)<"MACD.DIF"(12,26,9)ANDCROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9));MACD底背离:=FILTER(B1>0,5);DRAWTEXT(MACD底背离,-1.68,'M底'),COLOR00FF00;C1:=BARSLAST(REF(CROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9)),1));D11:=REF(C,C1+1)<CANDREF("MACD.DIF"(12,26,9),C1+1)>"MACD.DIF"(12,26,9)ANDCROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9));MACD顶背离:=FILTER(D11>0,5);DRAWTEXT(MACD顶背离,2.28,'M顶'),COLOR00DD00;A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));B2:=REF(C,A2+1)>CANDREF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3)ANDCROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));KDJ底背离:=FILTER(B2>0,5);DRAWTEXT(KDJ底背离,-1.98,'K底'),COLOR00FFFF;C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));D22:=REF(C,C2+1)<CANDREF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3)ANDCROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3));KDJ顶背离:=FILTER(D22>0,5);DRAWTEXT(KDJ顶背离,1.98,'K顶'),COLOR0066FF;A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));B3:=REF(C,A3+1)>CANDREF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24)ANDCROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));RSI底背离:=FILTER(B3>0,5);DRAWTEXT(RSI底背离,-2.28,'R底'),COLORFFCC66;C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));D3:=REF(C,C3+1)<CANDREF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24)ANDCROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));RSI顶背离:=FILTER(D3>0,5);DRAWTEXT(RSI顶背离,1.68,'R顶'),COLORFF00FF;

顺手把 #动能短线# 这个话题钉一下，平时跟 #背离# #柱线# 绑在一块儿聊。

03 一根 OSC，把柱线四象限的来路讲清

整支副图打底的是 OSC。它算的是收盘价离 5 天前的 13 日平均线有多远：

OSC:=C-REF(MA(C,13),5)

价格在均线上方，差是正的；落到下方，差就变负。强不强，就看这个差跑得多远。13 日这条均线，①取 8 试试：离得太近，天天在零轴上下蹦迪。②取 26 试试：拉太远，钝得像没睡醒。③13 落在中间，两周左右的节奏。④它要的不是准，是稳，稳到柱线能分出层次。

分界线是动能的 8 日平均线，等于给动能画了条自己的零轴。源码接着把动能喂给 MACD：

DIFF:=EMA(OSC,12)-EMA(OSC,26)

DEA:=EMA(DIFF,9)

MACD:=2*(DIFF-DEA)

12 和 26 是 MACD 的看家参数，挪到动能线上照用。四象限那套色，就是 MACD 的正负乘上快慢：零轴上面还放量，浅粉；上面开始缩，蓝；下面还在缩，橙；下面开始放，粉。一套下来，动能往哪边使劲，颜色先替你说了。

柱线那层，我反而信不过，先看 OSC 的斜率，颜色只是结果。

中段还有一组位置判断：ZF 用最高最低和 5 日 EMA 比来比去，定一个参照位；KD 数的是价格贴到参照位之后过了几天，XH 把刚触位又配合 MACD 缩量的日子挑出来。K 柱那几行 STICKLINE，就是按这些状态换颜色，白、蓝、红、粉、黄各管一态。0.97 那个数，是量比缩到昨天的 0.97 倍以下才认缩量，余下 0.03 的缓冲，免得刚缩一天就乱标。

三套背离是重头。头一套盯 12、26、9，KDJ 盯 9、3、3，RSI 盯 6、12、24。逻辑同款：先找上一次交叉在哪天，再看价格创新高、指标没跟上，就标一个顶背离；反过来标底背离。6、12、24这套 RSI 参数，①取 5、10、20 试试：看着整齐，出得稀，错过好几回。②取 9、18、36 试试：太敏感，字样满天飞。③6、12、24 一组，快中慢三档，跟 KDJ 的节奏正好错开。④它标的是三套雷达的交叉验证，一套出不算数，两套同向才敢认。

前阵子有人发我一张图，问我 M 底后面怎么走，我说先看动能拐没拐。以前老版本只有 MACD 背离，后来才把 KDJ 和 RSI 加进来，我一开始还嫌多，用久了才知道三套对不上才好玩。

说个题外话，这套背离逻辑换到别的主图上一样通用。