作者 理想 天石永红老师
这是我用了一年多反复优化和改进后的“天石永红II”免FEI版指标公式，适用于大智慧和通达信等相关系统评台。它是我见过和使用过的非常实用的指标公式。

该指标是基于“周”和“日”周期的共振理念，使用量价突破算法来编写的指标公式。此免FEI版没有采用模拟法来去除week函数，但其准性和实用性也非常高。为感谢理想论坛、提供相关理念和启发我创意的相关人员，现公布源码供相关指标编写者研究参考使用（突破算法为独创，对于指标编写者来说非常有用）。

“天石永红II”金钻版指标公式在此免FEI版的基础上通过模拟法去除了week函数，在没有使用任何未来函数和未来数据的情况下，信号不会发生任何漂移，而且确保了其准确性和实用性

特别说明：要使用所提供的{ }中的源码建立公式CCII，然后再新建公式，这样才能使用。我在大智慧和通达信两个版本中都检测过，源码没有任何问题，能够通过。
 

{此源码适用于大智慧和通达信。
先使用以下源码新建公式
CCII
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));

天石永红II
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;
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,'!天石永红');

留意，这个公式使用了 周线数据