天机论坛

 找回密码
 欢迎注册

QQ登录

只需一步,快速开始

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

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

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

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

[通达信] 通达信全新大杂烩指标公式(源码 副图 贴图)

[复制链接]
跳转到指定楼层
楼主
发表于 2011-10-4 09:59:07 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
通达信全新大杂烩指标公式(源码 副图 贴图)

M:=3;
AA:=REF(H,20)=HHV(H,2*20+1);
QY:=BACKSET(AA,20+1);
CC:=FILTER(QY,20) AND H=HHV(H,20+1);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(H,DDD),H);{顶部}
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=CONST(DINGBUTS1);
DINGBU2:=REF(DINGBU1,DDD+1);
MM:=IF(CURRBARSCOUNT>GDCS2,0,1);
高点压力:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1),COLORMAGENTA;
DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR00FF00,POINTDOT,LINETHICK2;
DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLOR00FF00,POINTDOT,LINETHICK2;
AA1:=REF(L,20)=LLV(L,2*20+1);
QY1:=BACKSET(AA1,20+1);
CC1:=FILTER(QY1,20) AND L=LLV(L,20+1);
DD1:=BARSLAST(CC1);
DDTS:=IF(CC1,CURRBARSCOUNT,0);
YDB:=IF(DD1,REF(L,DD1),L);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=CONST(DDTS1);
ZDB:=REF(YDB,DD1+1);
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=CONST(DDTS2);
DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLOR00FF00,POINTDOT,LINETHICK2;
DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLOR00FF00,POINTDOT,LINETHICK2;
LAA:=REF(H,10)=HHV(H,2*10+1);
LQY:=BACKSET(LAA,10+1);
LCC:=FILTER(LQY,10) AND H=HHV(H,10+1);
LDDD:=BARSLAST(LCC);
LGDTS:=IF(LCC,CURRBARSCOUNT,0);
LDINGBU:=IF(LDDD,REF(H,LDDD),H);{顶部}
LDINGBUTS:=IF(LDDD,REF(LGDTS,LDDD),LGDTS);
LDINGBU1:=REF(LDINGBU,LDDD+1);
LGDCS1:=CONST(LDINGBUTS);
LDINGBUTS1:=REF(LDINGBUTS,LDDD+1);
LGDCS2:=CONST(LDINGBUTS1);
LDINGBU2:=REF(LDINGBU1,LDDD+1);
LMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);
压力:DRAWLINE(CURRBARSCOUNT=LGDCS2,H,CURRBARSCOUNT=LGDCS1,H,1),COLORMAGENTA;
DRAWLINE(CURRBARSCOUNT=LGDCS2,H,ISLASTBAR,REF(H,LGDCS2-1),1),COLOR00FF00,POINTDOT;
DRAWLINE(CURRBARSCOUNT=LGDCS1,H,ISLASTBAR,REF(H,LGDCS1-1),1),COLOR00FF00,POINTDOT;
LAA1:=REF(L,10)=LLV(L,2*10+1);
LQY1:=BACKSET(LAA1,10+1);
LCC1:=FILTER(LQY1,10) AND L=LLV(L,10+1);
LDD1:=BARSLAST(LCC1);
LDDTS:=IF(LCC1,CURRBARSCOUNT,0);
LYDB:=IF(LDD1,REF(L,LDD1),L);
LDDTS1:=IF(LDD1,REF(LDDTS,LDD1),LDDTS);
LDDCS1:=CONST(LDDTS1);
LZDB:=REF(LYDB,LDD1+1);
LDDTS2:=REF(LDDTS1,DD1+1);
LDDCS2:=CONST(LDDTS2);
支撑:DRAWLINE(CURRBARSCOUNT=LDDCS2,L,CURRBARSCOUNT=LDDCS1,L,1),COLORMAGENTA;
LLAA:=REF(H,5)=HHV(H,2*5+1);
LLQY:=BACKSET(LLAA,5+1);
LLCC:=FILTER(LLQY,5) AND H=HHV(H,5+1);
LLDDD:=BARSLAST(LLCC);
LLGDTS:=IF(LLCC,CURRBARSCOUNT,0);
LLDINGBU:=IF(LLDDD,REF(H,LLDDD),H);{顶部}
LLDINGBUTS:=IF(LLDDD,REF(LLGDTS,LLDDD),LLGDTS);
LLDINGBU1:=REF(LLDINGBU,LLDDD+1);
LLGDCS1:=CONST(LLDINGBUTS);
LLDINGBUTS1:=REF(LLDINGBUTS,LLDDD+1);
LLGDCS2:=CONST(LLDINGBUTS1);
LLDINGBU2:=REF(LLDINGBU1,LLDDD+1);
LLMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);
L压力:DRAWLINE(CURRBARSCOUNT=LLGDCS2,H,CURRBARSCOUNT=LLGDCS1,H,1),COLORMAGENTA;
DRAWLINE(CURRBARSCOUNT=LLGDCS2,H,ISLASTBAR,REF(H,LLGDCS2-1),1),COLOR00FF00,POINTDOT;
DRAWLINE(CURRBARSCOUNT=LLGDCS1,H,ISLASTBAR,REF(H,LLGDCS1-1),1),COLOR00FF00,POINTDOT;
LLAA1:=REF(L,5)=LLV(L,2*5+1);
LLQY1:=BACKSET(LLAA1,5+1);
LLCC1:=FILTER(LLQY1,5) AND L=LLV(L,5+1);
LLDD1:=BARSLAST(LCC1);
LLDDTS:=IF(LLCC1,CURRBARSCOUNT,0);
LLYDB:=IF(LLDD1,REF(L,LLDD1),L);
LLDDTS1:=IF(LLDD1,REF(LLDDTS,LLDD1),LDDTS);
LLDDCS1:=CONST(LLDDTS1);
LLZDB:=REF(LLYDB,LLDD1+1);
LLDDTS2:=REF(LLDDTS1,DD1+1);
LLDDCS2:=CONST(LLDDTS2);
L支撑:DRAWLINE(CURRBARSCOUNT=LLDDCS2,L,CURRBARSCOUNT=LLDDCS1,L,1),COLORMAGENTA;
LZGSTAR:=(L压力+L支撑)/2;
LZGEND:=CONST((L压力+L支撑)/2);
LSTARDAY:=IF(LLDDCS2<LLGDCS2,LLDDCS2,LLGDCS2);
MA1:MA(CLOSE,18),COLORWHITE,LINETHICK1;
MA2:MA(CLOSE,20),COLORWHITE,LINETHICK1;

RSV:=(CLOSE-LLV(LOW,M))/(HHV(HIGH,M)-LLV(LOW,M))*100,LINETHICK2;
K1:SMA(RSV,3,1),LINETHICK1;
D5:SMA(K1,3,1),LINETHICK1;
J:3*K1-2*D5,COLORFF00FF,LINETHICK1;

D1:=EMA(3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)
-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),5);
D2:=REF(D1,1);
STICKLINE(D1>=REF(D1,1),D1,D2,5,0),COLOR0055AA;
STICKLINE(D1<REF(D1,1),D1,D2,5,0),COLOR006600;
{STICKLINE(D1>=REF(D1,1),D1,D2,2,0),COLOR0077CC;}
STICKLINE(D1>=REF(D1,1),D1,D2,1,0),COLOR0099DD;
{STICKLINE(D1<REF(D1,1),D1,D2,2,0),COLOR009900;}
STICKLINE(D1<REF(D1,1),D1,D2,1,0),COLOR00BB00;

VARK1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
VARK2:=REVERSE(VARK1);
VARK3:=SMA(VARK1,3,1);
波段王:SMA(VARK3,3,1),COLORRED,LINETHICK2;
波段鬼:SMA(波段王,2.5,1),COLORBLUE,LINETHICK2;
K:=波段王>REF(波段王,1);
IF(K-1,波段王,DRAWNULL),COLORGREEN,LINETHICK2;
D:=波段鬼>REF(波段鬼,1);
IF(D-1,波段鬼,DRAWNULL),COLORGREEN,LINETHICK2;
VAR51:=LLV(LOW,75);
VAR61:=HHV(HIGH,75);
VAR71:=(VAR61-VAR51)/100;
VAR81:=SMA((CLOSE-VAR51)/VAR71,20,1);
VAR91:=SMA((OPEN-VAR51)/VAR71,20,1);
VARA1:=3*VAR81-2*SMA(VAR81,15,1);
VARB1:=3*VAR91-2*SMA(VAR91,15,1);
VARC1:=100-VARB1;
看(我)实力: (100-VARA1),LINETHICK4,COLORGREEN  ;
P:=看(我)实力>REF(看(我)实力,1);
IF(P-1,看(我)实力,DRAWNULL),COLORRED,LINETHICK4;
买点准备信号: 10;
卖点准备信号:100;
强弱分界: 50,CIRCLEDOT;
A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
B1:=REF(C,A1+1)> C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA");
DRAWTEXT(B1> 0,D1,'MACD底背离'),COLOR00FFFF;{MACD底背离};
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 有用有用 没用没用
回复

使用道具 举报

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

本版积分规则