天机论坛

 找回密码
 欢迎注册

QQ登录

只需一步,快速开始

天机股票网 争做最牛的股票资讯集散地 注册 - 常见问题 - 联系方式

你有好料 就来分享 你可以将手中的好料分享赚取金币。 如何获得金币 - 金币回购计划

天天来访问 天天有收获 高端信息区区几个金币就可查看 立即注册 - QQ快速登陆

查看: 1124|回复: 0
打印 上一主题 下一主题

[通达信] 通达信一个不错的副图指标公式(源码 幅图 贴图)

[复制链接]
跳转到指定楼层
楼主
发表于 2011-8-26 15:47:24 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 小小90后 于 2011-8-26 15:52 编辑

通达信一个不错的副图指标公式(源码 幅图 贴图)
N1:=5;N2:=10;N3:=600;   
LC:=REF(CLOSE,1);   
A0:=(2*C+H+L)/4;   
A1:=(CLOSE-LLV(LOW,7))/(HHV(HIGH,7)-LLV(LOW,7))*10;   
VAR1:=C-REF(C,1);   
VAR2:=100*EMA(EMA(VAR1,6),6)/EMA(EMA(ABS(VAR1),6),6);   
MA5:=EMA(C,5);   
MA13:=EMA(C,13);   
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS   
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS   
(MA5,MA13))+1),0),COLOR0000FF;   
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS   
(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS   
(MA13,MA5))+1),0),COLOR00FF00;   
BT:=(LLV(VAR2,2)=LLV(VAR2,7) AND COUNT(VAR2<0,2) AND CROSS(VAR2,MA(VAR2,2))) AND   
REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1);
N:=10;
DIFF:(EMA(DCLOSE,10)-EMA(DCLOSE,21))*N3,COLORCYAN,LINETHICK2;   
DEA:EMA(DIFF,8),COLOR1474FF,LINETHICK3;

TJ1:EMA(DEA,3),COLORWHITE,LINETHICK3;
TJ2:EMA(DEA,10),COLORMAGENTA;   
F:=CROSS(DIFF,DEA);
G:=CROSS(DEA,DIFF);
DRAWICON(F,DEA-2.6,13);
DRAWICON(G,DEA+1.1,6);
   
DIFFA := EMA(OSC,12) - EMA(OSC,25);
DEAA  := EMA(DIFFA,8);
MACD := 2*(DIFFA-DEAA);
D1:=EMA(DIFF,3)-EMA(DIFF,8);
D2:=EMA(O,3)-EMA(O,8);
D3:=EMA(H,3)-EMA(H,8);
D4:=EMA(L,3)-EMA(L,8);

STICKLINE(DIFF>=DEA,DIFF,DEA,1,0),COLOR0055AA;
STICKLINE(DIFF<=DEA,DIFF,DEA,0.8,0),COLOR006600;
STICKLINE(DIFF>=DEA,DIFF,DEA,0.6,0),COLOR0077CC;
STICKLINE(DIFF>=DEA,DIFF,DEA,0.3,0),COLOR0099DD;
STICKLINE(DIFF>=DEA,D3,D4,0.1,0),COLOR00BBFF;
STICKLINE(DIFF<=DEA,DIFF,DEA,0.8,0),COLOR009900;
STICKLINE(DIFF<=DEA,DIFF,DEA,0.5,0),COLOR00BB00;
STICKLINE(DIFF<=DEA,DIFF,DEA,0.2,0),COLOR00EE00;
Z_F:=IF(C>REF(H,1),EMA(L,5),IF(C<REF(EMA(L,5),1),H,EMA(L,5)));
K_D:=BARSLAST(C<=Z_F);
X_H:=K_D=1 AND BARSLAST(MACD<REF(MACD,1));
{===================== ?a?£°?===================== }
{?ù}
STICKLINE(MACD<REF(MACD,1) AND MACD<0,0,MACD*4,0,0),COLORFFCF78;
STICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD*4,0,0),COLORYELLOW;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD*4,0,0),COLORMAGENTA;
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD*4,0,0),COLORRED;   
AA2:=REF(L,8)=LLV(L,2*8+1);
BB2:=BACKSET(AA2,8+1);
CC2:=FILTER(BB2,8) AND L=LLV(L,8+1);
STICKLINE(CC2,D1,D2,2.6,0),COLORMAGENTA;
STICKLINE(CC2,D3,D4,0,0),COLORMAGENTA;
AA3:=REF(H,8)=HHV(H,2*8+1),LINETHICK0;
BB3:=BACKSET(AA3,8+1),LINETHICK0;
CC3:=(FILTER(BB3,8) AND H=HHV(H,8+1));
STICKLINE(CC3,D1,D2,2.6,0),COLORGREEN;
STICKLINE(CC3,D3,D4,0,0),COLORGREEN;
DRAWTEXT(CC3,D2*1.03,'?????? '),COLOR00FF00;
DRAWTEXT(CC2,D4-D4*0.02,'?????ò '),COLORMAGENTA;
0,COLORGRAY,LINETHICK1;
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 有用有用 没用没用
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 欢迎注册

本版积分规则