天石永红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.72gu.com}
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,'!天石永红');