K线动能（通达信指标主图和谐源码分享）

显示全部楼层 · 2022-6-27 20:44:50

{公式名称: K线动能}

AA:=EMA((2*CLOSE+HIGH+LOW)/4,3);

A1:=SLOPE(AA*5-REF(AA,5),5)+CLOSE;

DDIF:=EMA(A1,3)-EMA(A1,13);

DDEA:=EMA(DDIF,3);

K线动能:=(DDIF-DDEA)*50;

TDXSTEP413:STICKLINE(K线动能>0,0,K线动能,2,0),COLORYELLOW;

TDXSTEP414:STICKLINE(K线动能>0,0,K线动能*0.9,2,0),COLORYELLOW;

TDXSTEP415:STICKLINE(K线动能>0,0,K线动能*0.8,2,0),COLORYELLOW;

TDXSTEP416:STICKLINE(K线动能>0,0,K线动能*0.7,2,0),COLORRED;

TDXSTEP417:STICKLINE(K线动能>0,0,K线动能*0.6,2,0),COLORRED;

TDXSTEP418:STICKLINE(K线动能>0,0,K线动能*0.5,2,0),COLORRED;

TDXSTEP419:STICKLINE(K线动能>0,0,K线动能*0.4,2,0),COLORRED;

TDXSTEP420:STICKLINE(K线动能>0,0,K线动能*0.3,2,0),COLORRED;

TDXSTEP421:STICKLINE(K线动能>0,0,K线动能*0.2,2,0),COLORRED;

TDXSTEP422:STICKLINE(K线动能>0,0,K线动能*0.1,2,0),COLORRED;

TDXSTEP423:STICKLINE(K线动能<0,0,K线动能,2,0),COLORGREEN;

TDXSTEP424:STICKLINE(K线动能<0,0,K线动能*0.9,2,0),COLORGREEN;

TDXSTEP425:STICKLINE(K线动能<0,0,K线动能*0.8,2,0),COLORGREEN;

TDXSTEP426:STICKLINE(K线动能<0,0,K线动能*0.7,2,0),COLORFF9900;

TDXSTEP427:STICKLINE(K线动能<0,0,K线动能*0.6,2,0),COLORFF9900;

TDXSTEP428:STICKLINE(K线动能<0,0,K线动能*0.5,2,0),COLORFF9900;

TDXSTEP429:STICKLINE(K线动能<0,0,K线动能*0.4,2,0),COLORFF9900;

TDXSTEP430:STICKLINE(K线动能<0,0,K线动能*0.3,2,0),COLORFF9900;

TDXSTEP431:STICKLINE(K线动能<0,0,K线动能*0.2,2,0),COLORFF9900;

TDXSTEP432:STICKLINE(K线动能<0,0,K线动能*0.1,2,0),COLORFF9900;

V1:=(CLOSE*2+HIGH+LOW)/4*10;

V2:=EMA(V1,13)-EMA(V1,34);

V3:=EMA(V2,5);

V4:=2*(V2-V3)*5.5;

{分析家公式网www.70822.com}

庄家进:IF(V4>=0,V4,0),COLORRED,LINETHICK2;

MAH:=(HIGH*18+REF(HIGH,1)*17+REF(HIGH,2)*16+REF(HIGH,3)*15+REF(HIGH,4)*14+REF(HIGH,5)*13+REF(HIGH,6)*12+REF(HIGH,7)*11+REF(HIGH,8)*10+REF(HIGH,9)*9+REF(HIGH,10)*8+REF(HIGH,11)*7+REF(HIGH,12)*6+REF(HIGH,13)*5+REF(HIGH,14)*4+REF(HIGH,15)*3+REF(HIGH,16)*2+REF(HIGH,17)*1)/171;

MAL:=(LOW*18+REF(LOW,1)*17+REF(LOW,2)*16+REF(LOW,3)*15+REF(LOW,4)*14+REF(LOW,5)*13+REF(LOW,6)*12+REF(LOW,7)*11+REF(LOW,8)*10+REF(LOW,9)*9+REF(LOW,10)*8+REF(LOW,11)*7+REF(LOW,12)*6+REF(LOW,13)*5+REF(LOW,14)*4+REF(LOW,15)*3+REF(LOW,16)*2+REF(LOW,17)*1)/171;

MA5:=MA(CLOSE,5);

MA10:=MA(CLOSE,10);

MA20:=MA(CLOSE,20);

MA60:=MA(CLOSE,60);

DK:=CLOSE>=MAH OR (CLOSE>MA5 AND CLOSE>MA10 AND CLOSE>MA20 AND CLOSE>MA60);

KK:=MAL>CLOSE OR (CLOSE<MA5 AND CLOSE<MA10 AND CLOSE<MA20 AND CLOSE<MA60);

DK1:=BARSLAST(DK);

KK1:=BARSLAST(KK);

DK2:=BARSLAST(CROSS(KK1,DK1));

KK2:=BARSLAST(CROSS(DK1,KK1));

启:=CROSS(KK2,DK2);

TDXSTEP433:DRAWTEXT(启>0,0.3,27),COLORYELLOW;