火焰之王优化指标及选股公式 源码
火焰之王指标也叫火焰山指标，是论坛上一个比较早的指标，本周五我在实战区发表《长阴下杀有伏兵，火焰助你断多空》帖子后，有些朋友发短信要我优化后的指标，由于论坛新规定指标要在专区发表，所以特意拿在这里送给需要的朋友，希望对朋友有所帮助！说是优化，其实只去掉了一些自己认为可有可无的东西，让火焰显示直观清晰，其它并未做大的发动。在这里首先谢谢指标的原作者，如果您认为侵犯了你的权利，可以建议版主或通知琪新给予删除，再次致谢！
大智慧、分析家、通达信、飞狐源码通用。
用法：1、在振荡市或股票下跌的末端（其K线显示为双底或多底），火焰大于70以上时可以关注，当火焰由最大值依次递减时，可以小仓位试探性介入，当底确认有效时加仓。对于单边下跌市，慎用！
2、火焰之王指标对判断股票底部区域虽然有一定参考作用，但由于市场变化的不确定性和主力手法的不同，指标失效是经常遇到的，因此，如果用该指标抄底一定结合其它指标综合判断，同时还要做好应对失败的准备，一旦判断错误要及时止损，切莫过于依赖指标，让自己蒙受更大损失。
参数N设置：
大智慧：默认70，最小0，最大1000，步长1；
通达信：最小0，最大1000，默认70；
分析家、飞狐参照大智慧设置即可。
{火焰之王副图指标};
Var1:=EMA(HHV(HIGH,500),21);
Var2:=EMA(HHV(HIGH,250),21);
Var3:=EMA(HHV(HIGH,90),21);
Var4:=EMA(LLV(LOW,500),21);
Var5:=EMA(LLV(LOW,250),21);
Var6:=EMA(LLV(LOW,90),21);
Var7:=EMA((Var4*0.96+Var5*0.96+Var6*0.96+Var1*0.558+Var2*0.558+Var3*0.558)/6,21);
Var8:=EMA((Var4*1.25+Var5*1.23+Var6*1.2+Var1*0.55+Var2*0.55+Var3*0.65)/6,21);
Var9:=EMA((Var4*1.3+Var5*1.3+Var6*1.3+Var1*0.68+Var2*0.68+Var3*0.68)/6,21);
VarA:=EMA((Var7*3+Var8*2+Var9)/6*1.738,21);
VarB:=REF(LOW,1);
VarC:=SMA(ABS(LOW-VarB),3,1)/SMA(MAX(LOW-VarB,0),3,1)*100;
VarD:=EMA(IF(CLOSE*1.35<=VarA,VarC*10,VarC/10),3);
VarE:=LLV(LOW,30);
VarF:=HHV(VarD,30);
Var10:=IF(MA(CLOSE,58),1,0);
火焰山:=EMA(IF(LOW<=VarE,(VarD+VarF*2)/2,0),3)/618*Var10;
火焰:=STICKLINE(火焰山>0,0,火焰山,4,1);
今量:火焰山,LINETHICK0;
STICKLINE(火焰山>0,0,今量*1.0,8,0), COLOR0000ff;
STICKLINE(火焰山>0,0,今量*0.8,8,0), COLOR0066ff;
STICKLINE(火焰山>0,0,今量*0.6,8,0), COLOR0099ff;
STICKLINE(火焰山>0,0,今量*0.4,8,0), COLOR00ccff;
STICKLINE(火焰山>0,0,今量*0.2,8,0), COLOR00ffff;
{火焰之王选股指标};
{n,1,1000,70,1};
Var1:=EMA(HHV(HIGH,500),21);
Var2:=EMA(HHV(HIGH,250),21);
Var3:=EMA(HHV(HIGH,90),21);
Var4:=EMA(LLV(LOW,500),21);
Var5:=EMA(LLV(LOW,250),21);
Var6:=EMA(LLV(LOW,90),21);
Var7:=EMA((Var4*0.96+Var5*0.96+Var6*0.96+Var1*0.558+Var2*0.558+Var3*0.558)/6,21);
Var8:=EMA((Var4*1.25+Var5*1.23+Var6*1.2+Var1*0.55+Var2*0.55+Var3*0.65)/6,21);
Var9:=EMA((Var4*1.3+Var5*1.3+Var6*1.3+Var1*0.68+Var2*0.68+Var3*0.68)/6,21);
VarA:=EMA((Var7*3+Var8*2+Var9)/6*1.738,21);
VarB:=REF(LOW,1);
VarC:=SMA(ABS(LOW-VarB),3,1)/SMA(MAX(LOW-VarB,0),3,1)*100;
VarD:=EMA(IF(CLOSE*1.35<=VarA,VarC*10,VarC/10),3);
VarE:=LLV(LOW,30);
VarF:=HHV(VarD,30);
Var10:=IF(MA(CLOSE,58),1,0);
火焰山:EMA(IF(LOW<=VarE,(VarD+VarF*2)/2,0),3)/618*Var10>=n;
