浙江阿明 发表于 2012-11-12 05:58

动能节奏付,通达信,没有未来


{动能节奏付,通达信,没有未来}
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;};

股友量 发表于 2022-10-4 23:51




{动能节奏付,通达信,没有未来}
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;};

醉亨人生 发表于 2019-4-26 08:26



{动能节奏付,通达信,没有未来}
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;};

股友量 发表于 2021-11-25 04:20

{通达信主图画阶段峰顶与峰谷,主图叠加}
TY:=L;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);
前期低位:REF(L,BARSLAST(LD)),COLOR00FF00,POINTDOT;
STICKLINE(L,前期低位,前期低位,8,0),COLORRED;
TZ:=H;
A3:=REF(TY,10)=HHV(TY,2*10+1); B3:=FILTER(A1,10); C3:=BACKSET(B1,10+1); MD:=FILTER(C1,10);
A4:=REF(TY,10)=LLV(TY,2*10+1); B4:=FILTER(A2,10); C4:=BACKSET(B2,10+1); ND:=FILTER(C2,10);
前期高位:REF(H,BARSLAST(MD)),COLOR00FF00,POINTDOT;
STICKLINE(H,前期高位,前期高位,8,0),COLORGREEN;

冷不丁 发表于 2012-11-12 06:15

谢谢分享:handshake

股海小麻雀 发表于 2012-11-12 06:47

指标怎么用?请说明

陶诺诺 发表于 2012-11-12 06:59

有用法说明吗?

田宗秘 发表于 2012-11-12 07:09

:handshake

梁栋梁 发表于 2012-11-12 07:09

xx学习

梁栋梁 发表于 2012-11-12 07:10

O(∩_∩)O谢谢

江涛汹涌 发表于 2012-11-12 07:29

分享是一种美德!分享是一种境界!谢谢您的分享!

梁栋梁 发表于 2012-11-12 07:41

学习

梁栋梁 发表于 2012-11-12 07:41

O(∩_∩)O谢谢

齐如丽 发表于 2012-11-12 07:41

不错,有参考价值。

快乐鱼儿 发表于 2012-11-12 07:43

有用法说明吗?:lol

玖月奇迹 发表于 2012-11-12 07:53

:handshake谢谢分享

快狠准 发表于 2012-11-12 08:04

:handshake

黄大帅 发表于 2012-11-12 08:06

天天向上, 努力学习
页: [1] 2 3 4 5 6
查看完整版本: 动能节奏付,通达信,没有未来