{高低点}
高:=REF(HHV(H,80),3);
低:=REF(LLV(L,80),3);
顶点:REFDATE(高,DATE),DOTLINE,LINETHICK2,COLORRED;
低点:REFDATE(低,DATE),DOTLINE,LINETHICK2,COLORBLUE;
DRAWTEXT(ISLASTBAR,顶点,’顶点’),COLORRED;
DRAWTEXT(ISLASTBAR,低点,’低点’),COLORBLUE;
{上穿均线}
MA5:=MA(C,5);
MA20:MA(C,20);
MA60:MA(C,60),COLORFF00FF,LINETHICK2;
DRAWICON(CROSS(MA5,MA20),L*0.98,1);
DRAWICON(CROSS(MA60,C),H*1.05,2);
IF(C>MA20,MA20,DRAWNULL),COLORYELLOW,LINETHICK2;
IF(C
{全线开花部分}
{MACD部分}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA:=EMA(DIF,9);MACD1:=(DIF-DEA)*2;
{KDJ部分}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;
{DMI部分}
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);
PDI:=DMP*100/MTR;
MDI:=DMM*100/MTR;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6);
ADXR:=EXPMEMA(ADX,6);
{DMI部分}
ROC:=100*(CLOSE-REF(CLOSE,12))/REF(CLOSE,12);MAROC:=MA(ROC,6);
AA:=ROC>MAROC AND PDI>ADXR AND PDI>ADX AND PDI>MDI AND K>D AND DIF>DEA AND C>REF(C,1) AND REF(H,1)>REF(C,2);
STICKLINE(AA,C,O,2,0),COLORYELLOW;
DRAWTEXT(AA AND CROSS(MA5,MA20),L*0.9,’开花’),COLORRED;
2. 分享目的仅供大家学习和交流,请不要用于商业用途!
3. 如果你也有好源码或者教程,可以到用户中心发布,分享有积分奖励和额外收入!
4. 本站提供的源码、模板、插件等等其他资源,都不包含技术服务请大家谅解!
5. 如有链接无法下载、失效或广告,请联系管理员处理!
6. 本站资源售价只是赞助,收取费用仅维持本站的日常运营所需!
7. 如遇到加密压缩包,默认解压密码为"dtmb.taobao.com",如遇到无法解压的请联系管理员!
8. 因为资源和程序源码均为可复制品,所以不支持任何理由的退款兑现,请斟酌后支付下载
声明:如果标题没有注明"已测试"或者"测试可用"等字样的资源源码均未经过站长测试.特别注意没有标注的源码不保证任何可用性
指标资源网 » 通达信二六分界主图指标公式源码
常见问题FAQ
- 免费下载或者VIP会员专享资源能否直接商用?
- 本站所有资源版权均属于原作者所有,这里所提供资源均只能用于参考学习用,请勿直接商用。若由于商用引起版权纠纷,一切责任均由使用者承担。更多说明请参考 VIP介绍。
- 提示下载完但解压或打开不了?
- 你们有qq群吗怎么加入?