首发通达信和大智慧绝密指标公式“天石永红II"免费版源码和截图介绍
首发通达信和大智慧绝密指标公式“天石永红II"免费版源码和截图
这是我用了一年多反复优化和改进后的“天石永红II”免费版指标公式，适用于大智慧和通达信等相关系统平台。它是我见过和使用过的非常实用的指标公式。
该指标是基于“周”和“日”周期的共振理念，使用量价突破算法来编写的指标公式。此免费版没有采用模拟法来去除week函数，但其准性和实用性也非常高。为感谢理想论坛、提供相关理念和启发我创意的相关人员，现公布源码供相关指标编写者研究参考使用（突破算法为独创，对于指标编写者来说非常有用）。
{此源码适用于大智慧和通达信。
先使用以下源码新建公式CCII：
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));}
GJ:=(("CCII.CCI#WEEK")/10)+40;
WR:=REF(C,5);
ZFU:=((C/WR)-1)*100;
WRG:=((GJ/REF(GJ,1))-1)*100;
ZSH:=((C/REF(C,10))-1)*100;
ZES:=((C/REF(C,20))-1)*100;
SG:=((GJ/REF(GJ,6))-1)*100;
ESG:=((GJ/REF(GJ,16))-1)*100;
len:=(ESG-ZES)+30;
men:=(SG-ZSH)+30;
sen:=(WRG-ZFU)+30;
ten:=len+men+sen;{www.guziyuan.cn}
ench:=ten>90 AND HHV(REF(ten,1),14)<=ten;
ljgj:=(len>80 OR men>80 OR sen>80) AND len>30 AND men>30 AND sen>30;
tenMAVOL:=HHV(REF(ten,1),15);
tenMDAY:=BARSLAST(tenMAVOL);
zntp:=ten>tenMAVOL AND CLOSE>REF(CLOSE,tenMDAY+1);
天石永红:ljgj AND ench AND zntp;
DRAWTEXT(天石永红,0.24,'!天石永红');
gd34212
