股票论坛 | 股市实战 | 股票内参 | 股票软件 | 股票知识 | 股票交流 | 指标公式 | 数据天下 | 股票图书 | 赢富研究 | 电脑软件 | 励志成功 | 情感哲理 | 全球行情 | 实时行情 | 股市指数





 17 12
发新话题
打印

请高手完善“征战股市”指标(新火焰山指标)


请高手完善“征战股市”指标(新火焰山指标)

本文来自:股神之路论坛     作者:wxp1515     点击741

征战股市指标好象是内蒙古电视台晨早财经中“炒股王”李鑫介绍的改进版火焰山指标,而本网站或其它网站上的火焰山指标是原来炒股王中的旧火焰山指标,不过我测试时发现征战股市指标的源码中有未来函数,请高手们修改后使其更加完善。
征战股市指标源码如下:公式中的红色部分为未来函数
VAR3:=REF(CLOSE,2);
VAR4:=((SMA(MAX(CLOSE-VAR3,0),7,1))/(SMA(ABS(CLOSE-VAR3),7,1)))*(100);
DRAWTEXT((VAR4<REF(VAR4,1)) AND (VAR4>79),135,'高位'),COLOR00F200;
VAR5:=((CLOSE-LLV(LOW,80))/(HHV(HIGH,80)-LLV(LOW,80)))*(200);
VARA:=SMA(VAR5,3,1);
VARB:=SMA(VARA,3,1);
VARC:=(3)*(VARA)-(2)*(VARB);
VARD:=LLV(LOW,5);
VARE:=HHV(HIGH,5);
VARF:=(EMA(((CLOSE-VARD)/(VARE-VARD))*(100),4))*(2);
VAR6:=EMA((0.66699999)*(REF(VARF,1))+(0.333)*(VARF),2);
VAR7:=(3)*(VARF)-(2)*(VAR6);
VAR8:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
VAR9:=POW(MA(LOW,5),2)+MA(LOW,5);
VAR10:=POW(MA(HIGH,5),2)+MA(HIGH,5);
VAR11:=((VAR8-LLV(VAR9,64))/(HHV(VAR10,64)-LLV(VAR9,64)))*(150)+65-10;
VAR12:=(SMA(VAR11,3,1))*(1.5)-100;
VAR13:=SMA(VAR12,3,1);
VAR14:=(3)*(VAR12)-(2)*(VAR13);
VAR15:=(HIGH+LOW+(CLOSE)*(2))/(4);
VAR1A:=EMA(VAR15,13);
VAR1B:=STD(VAR15,13);
VAR1C:=((VAR15-VAR1A)*(100))/(VAR1B);
VAR1D:=EMA(VAR1C,5);
VAR1E:=EMA(VAR1D,13);
VAR1F:=EMA(VAR1D,13)+200-100;
VAR16:=EMA(VAR1F,10);
VAR17:=(3)*(VAR1F)-(2)*(VAR16);
VAR18:=VARA+VARF+VAR12+VAR1F;
VAR19:=VARB+VAR6+VAR13+VAR16;
VAR20:=VARC+VAR7+VAR14+VAR17;
VAR21:=(HIGH+LOW+CLOSE)/(3);
VAR22:=((AMOUNT)/(VOL))/(100);
VAR23:=((SUM(AMOUNT,5))/(SUM(VOL,5)))/(100);
VAR24:=(VAR21-MA(VAR21,34))/((0.015)*(AVEDEV(VAR21,34)));
VAR25:=DMA(((AMOUNT)/(VOL))/(100),(VOL)/(CAPITAL));
VAR2A:=(HIGH+LOW+CLOSE+VAR21)/(4);
VAR2B:=EMA(VAR2A,24);
VAR2C:=STD(VAR2A,24);
VAR2D:=((VAR2A-VAR2B)/(VAR2C))*(100);
VAR2E:=(VAR21-MA(VAR21,24))/((0.015)*(AVEDEV(VAR21,24)));
VAR2F:=EMA(VAR2D,5);
VAR26:=((VAR2F+VAR2E+VAR24)/(3)+165)/(4);
VAR27:=(EMA(EMA(EMA(VAR26,15),10),5)-25)*(2)+VAR25;
VAR28:=((VAR18+VAR19+(VAR20)*(30))/(32))/(5)-15;
VAR29:=EMA(VAR28,13);
VAR30:=EMA(CLOSE,8);
VAR31:=EMA(VAR30,20);
VAR3A:=CROSS(VAR30,VAR31);
VAR3B:=(VAR30<EMA(CLOSE,120));
VAR3C:=(3)*(SMA(((CLOSE-LLV(LOW,65))/(HHV(HIGH,65)-LLV(LOW,65)))*(100),5,1))-(2)*(SMA(SMA(((CLOSE-LLV(LOW,65))/(HHV(HIGH,65)-LLV(LOW,65)))*(100),5,1),3,1));
VAR3D:=EMA(VAR3C,3);
VAR3E:=EMA((VAR27+VAR29)/(2),2);
STICKLINE((VAR3E-REF(VAR3E,1)>0),VAR3E,0,3,0),COLOR0000EC;
STICKLINE((VAR3E-REF(VAR3E,1)>0),VAR3E,0,2,0),COLOR0000E9;
STICKLINE((VAR3E-REF(VAR3E,1)<0),VAR3E,0,3,0),COLOR00E100;
STICKLINE((VAR3E-REF(VAR3E,1)<0),VAR3E,0,2,0),COLOR00F200;
STICKLINE((VAR3E-REF(VAR3E,1)<0),VAR3E,0,1,0),COLORFFFF00;
RAWTEXT(FILTER(CROSS(VAR3D,10),34),(-2),'底'),COLORYELLOW;
DRAWICON(底,5,1);
VAR3F:=((CLOSE-MA(CLOSE,6))/(MA(CLOSE,6)))*(100);
VAR32:=((CLOSE-MA(CLOSE,12))/(MA(CLOSE,12)))*(100);
VAR33:=((CLOSE-MA(CLOSE,24))/(MA(CLOSE,24)))*(100);
VAR34:=(VAR3F+(2)*(VAR32)+(3)*(VAR33))/(6);
DRAWICON(VAR3A AND VAR3B,10,5);
DRAWTEXT(VAR3A AND VAR3B,10,'可加仓'),COLORYELLOW;
附件: 您所在的用户组无法下载或查看附件
买入之前以为是黑马,骑上去觉得是跛马,然后又觉得是木马,最后发现原来这是河马,会跳水的。。。

顶部

谢谢提供!

顶部

谢谢分享啊

顶部

我给大家提供了源码,为何没有好人帮助我改改???
买入之前以为是黑马,骑上去觉得是跛马,然后又觉得是木马,最后发现原来这是河马,会跳水的。。。

顶部

看看 楼主辛苦了

顶部

可惜我不懂,愿高手早破之!!!

顶部

老大   用不了啊  怎么回事?

顶部

通信达或大智慧的可以用的呀,要不我的图片如何来呀

[ 本帖最后由 wxp1515 于 2008-6-25 00:51 编辑 ]
附件: 您所在的用户组无法下载或查看附件
买入之前以为是黑马,骑上去觉得是跛马,然后又觉得是木马,最后发现原来这是河马,会跳水的。。。

顶部

可惜我不懂,愿高手早破之!!!

顶部

愿高手早破之!!!

顶部

谢谢楼主的分享!

顶部

这个函数不能绝对的判定是未来

因为在区域判断中,这个相对来说,比ZIG之类的要安全!
我这样拉风的男人,无论在哪里,都像漆黑中的萤火虫一样,那样的鲜明,那样的出众....
此ID即日起尘封......如果在线,纯属见鬼!

顶部

回复 楼主 的帖子

本帖附件需要回复才可下载或查看

顶部

回复 楼主 的帖子

期待总班主破解

顶部

希望能成啊   谢谢了

顶部

 17 12
发新话题