股海网带来通达信K线公式源码 K线动能：
AA：=EMA（（2*C+H+L）/4，3）;
A1：=SLOPE（AA*5-REF（AA，5），5）+C;
DDIF：=EMA（A1，3） - EMA（A1，13）;
DDEA：=EMA（DDIF，3）;
K线动能：=（DDIF-DDEA）*50;
STICKLINE（（K线动能 》 0），0，K线动能，2，0），COLORYELLOW;
STICKLINE（（K线动能 》 0），0，K线动能*0.9，2，0），COLORYELLOW;
STICKLINE（（K线动能 》 0），0，K线动能*0.8，2，0），COLORYELLOW;
STICKLINE（（K线动能 》 0），0，K线动能*0.7，2，0），COLOR0000FF;
STICKLINE（（K线动能 》 0），0，K线动能*0.6，2，0），COLOR0000FF;
STICKLINE（（K线动能 》 0），0，K线动能*0.5，2，0），COLOR0000FF;
STICKLINE（（K线动能 》 0），0，K线动能*0.4，2，0），COLOR0000FF;
STICKLINE（（K线动能 》 0），0，K线动能*0.3，2，0），COLOR0000FF;
STICKLINE（（K线动能 》 0），0，K线动能*0.2，2，0），COLOR0000FF;
STICKLINE（（K线动能 》 0），0，K线动能*0.1，2，0），COLOR0000FF;
STICKLINE（（K线动能 《 0），0，K线动能，2，0），COLOR00FF00;
STICKLINE（（K线动能 《 0），0，K线动能*0.9，2，0），COLOR00FF00;
STICKLINE（（K线动能 《 0），0，K线动能*0.8，2，0），COLOR00FF00;
STICKLINE（（K线动能 《 0），0，K线动能*0.7，2，0），COLORFF9900;
STICKLINE（（K线动能 《 0），0，K线动能*0.6，2，0），COLORFF9900;
STICKLINE（（K线动能 《 0），0，K线动能*0.5，2，0），COLORFF9900;
STICKLINE（（K线动能 《 0），0，K线动能*0.4，2，0），COLORFF9900;
STICKLINE（（K线动能 《 0），0，K线动能*0.3，2，0），COLORFF9900;
STICKLINE（（K线动能 《 0），0，K线动能*0.2，2，0），COLORFF9900;
STICKLINE（（K线动能 《 0），0，K线动能*0.1，2，0），COLORFF9900;
M1：=（DCLOSE-CLOSE）*50;
M2:EMA（EMA（M1，2），5）;
IF（M2》0，M2，DRAWNULL）COLORRED，LINETHICK2;
IF（M2《0，M2，DRAWNULL）COLORBLUE，LINETHICK2;
STICKLINE（CROSS（M2，0），0，25，3，0）COLORMAGENTA;
STICKLINE（CROSS（0，M2），0，-25，3，0）COLORWHITE;
VC：=（2*CLOSE+HIGH+LOW）/4;
K：=SLOPE（WMA（VC，5），9）*5+VC，COLOR00FFFF;
D：=WMA（K，3），COLOR00FF00;
J：=2.8*K-1.8*D，COLOR0099FF，LINETHICK2;
K3：=EMA（K，3）;
D3：=EMA（D，3）;
KD：=（K3+D3）/2;
KDCD：=EMA（KD，5）-EMA（KD，13）;
KDCD3:EMA（KDCD，3）*50;
IF（KDCD3》REF（KDCD3，1），KDCD3，DRAWNULL），COLORRED;
IF（KDCD3《REF（KDCD3，1），KDCD3，DRAWNULL），COLORBLUE;
DRAWTEXT（CROSS（M2，KDCD3），KDCD3=M2，‘▲’），COLOR00FFFF;
DRAWTEXT（CROSS（KDCD3，M2），KDCD3=M2，‘▼’），COLOR00FF00;
