|
【使用环境】一定要用最新的通达信6.10修改版(支持辅助分时适用版)，只能在通达信分时图上看，翻翻贴里面有软件安装交流，(调分时线方法：在键盘上按F5或*键或/键切换操作走势模式到分时图，然后在下方右击进‘选择指标’--->‘其他类型’--->五指山万泉河，确定即可)。
发布最新的最令人期盼的-----
第51c版（公式版），请在此下载：
【安装方法】请自行操作通达信：“功能”-->“专家系统”--->“公式管理器”--->‘导入公式’(如果原来已建有“五指山万泉河”公式名称的要先行删除或改名原来的公式并退出一次重新进入通达信，否则不能安装，别再短信问安装之事。)
【声明】五指山万泉河逃顶抄底指标51c版公式是免FEI送你测试的。公式中有未来函数，惧怕未来函数者请慎用。公式信号只能参考，完全依公式信号操作者责任自负。香花也好毒草也好，自己去鉴别。
【信息】从9月23号发布第1版到现在的51C版，经历了42天，摆在屏幕上的这个版本，经历了51次修订，我只能说基本满意，但仍需努力精心去改进，不过以后更新速度不会像现在这么频繁了---“51号兵站”？还有一个原因，本月开始要踏上重点研制青丝断的‘上突’信号之路，改版青丝断+上突公式希望能有比较好的效果！期待吧？你若有好的公式可精选（无条件哦）送我扩充思路参考，先谢了。
第51c版样图
2009113111752113.gif
2009113111752826.gif
2009113111753366.gif
352.GIF (22.08 KB)
2009-11-1 18:59
2009113111753610.gif
2009113111753664.gif
2009113111753224.gif
2009113111753181.gif
【再次声明】本人做公式喜欢用未来函数，五指山或青丝断都有大量未来函数，对未来函数有恐惧症的请离开，我的公式只能借鉴，用不好别怪我，谢谢。
【声明】语句中有未来函数ZIG等语句，对“未来函数”有顾忌的不要使用! ，任何依据本指标操作的，盈亏操作者自负，特此声明！
不要用于通达信K线图，
不要用于大智慧！
【保留信息】如果你一定想要得到源代码、想自行参考研究的，请抄写下面的第50旧版本源代码（当然对51版而言，只是大体结构思路而已，51c版的核心代码--->我的美梦线--->旧50版没有出现，因为51c版代码做了全新改写升级）
{五指山万泉河第50旧版,本版有ZIG未来函数,心脏承受差的不要用！}
T0:=IF(TIME>093000 AND TIME<094500 ,1,0);
T1:=IF(TIME>093100 AND TIME<145500 ,1,0);
T2:=IF(TIME>100000 AND TIME<145500 ,1,0);
T3:=IF(TIME>140000 AND TIME<145500 ,1,0);
T4:=IF(TIME>142500 AND TIME<145500 ,1,0);
涨幅:=DYNAINFO(14)*100;
CCT:=DYNAINFO(8);
PPP:= FILTER(CCT=0,350) ;
DRAWTEXT(PPP,45,'★今日该股票未开盘,不能分析★'),COLORFF00FF;
VAR80:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,3,0);
VAR81:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VAR83:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR85:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR87:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
NN1:=VAR80;
NN2:=(VAR81+VAR83+VAR85+VAR87);
VAR82:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VAR84:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR86:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR88:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
MM1:=(VAR82+VAR84+VAR86+VAR88);
MM2:= IF(MM1>0,-500,0);
MM:= IF(C>1000,MM2*100,MM2),COLORRED,LINETHICK3;
CT:SUM(MM,0) AND T1=1;{统计}
五指山:EMA((CLOSE-LLV(CLOSE,55))/(HHV(CLOSE,55)-LLV(LOW,55))*100,5),LINETHICK1,COLORFF00FF;
M1:= (7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1),2,1)),COLORWHITE;
万泉河: EMA(MA(M1,5),3),LINETHICK1,COLORFFFF00;
WH:=五指山;
WL:=万泉河;
CA:=IF(T1=1 AND WH>80 AND CT=1,1,0);
P4:= FILTER(CA=1,350);
DDC:=' ★提醒：短线看跌，紫线高点出局！本信号若消失则可能转升。';
DRAWTEXT(P4,45,DDC),COLORGREEN;
VARM1:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;
VARM2:=SMA(VARM1,3,1);
VARM3:=SMA(VARM2,3,1);
VARM4:=SMA(VARM3,3,1);
A:=EMA(WINNER(CLOSE),10);
B:=EMA(WINNER(CLOSE),34);
AAD:=MA(CLOSE,32);
BAD:=MA(CLOSE,12);
DDD:=CROSS(B,A);
AAC:=MA(C,1);
BBB:=MA(AAD,2);
VAR51:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*80;
BB:=SMA(VAR51,7,1);
VAR67:=(LOW+HIGH+CLOSE)/3;
VAR68:=(VAR67-MA(VAR67,14))/(0.015*AVEDEV(VAR67,14));
WR30:=100*(HHV(HIGH,79)-CLOSE)/(HHV(HIGH,79)-LLV(LOW,79));
VAR21:=(2*CLOSE+HIGH+LOW+OPEN)/5;
VAR22:=LLV(LOW,34);
VAR23:=HHV(HIGH,34);
SK1:=EMA((VAR21-VAR22)/(VAR23-VAR22)*100,13);
WR31:=IF(WR30=0 OR SK1>=90 OR VAR68>-250,100,WR30);
舟:IF(NN1>0 OR NN2>0,35,DRAWNULL)*2,STICK,COLORMAGENTA,LINETHICK3;
岸:(T1=1 AND CT=0 AND SK1=100 OR T1=1 AND CT=0 AND SK1>0 AND WR30>98 AND SK1<=13)*60,STICK,COLORMAGENTA,LINETHICK1;
花:EMA(IF(WL<15 AND T3=1 AND L<= LLV(L,30),SMA(ABS(L-REF(L,1)),30,1)/SMA(MAX(L-REF(L,1),0),30,1),0),3)*25,STICK,COLORYELL |
