软件名称：[B]通达信背离猎庄主图+波段趋势副图公式源码(附图)[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：2.00 KB
官方主页：Home Page
更新时间：2012-04-24 04:03:59
软件简介:

ZF:=(H-L)/REF(C,1)*100;
 TJ:=ZF/REF(ZF,1)>1.1 AND V/REF(V,1)>1.1 AND C>O;
 A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
 B1:=REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA");
 DRAWTEXT(FILTER(B1>0,5),L-0.38,'MACD底背'),COLORGREEN;
 A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
 B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D");
 DRAWTEXT(FILTER(B2>0,5),L-0.39,'KDJ底背'),COLORYELLOW;
 A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
 B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");
 DRAWTEXT(FILTER(B3>0,5),L,'RSI底背'),COLORCYAN;
 C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
 D1:=REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF");
 DRAWTEXT(FILTER(D1>0,5),H+0.08,'MACD顶背'),COLORWHITE;
 C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
 D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K");
 DRAWTEXT(FILTER(D2>0,5),H+0.32,'KDJ顶背'),COLORWHITE;
 C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
 D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1");
 DRAWTEXT(FILTER(D3>0,5),H+0.1,'RSI顶背'),COLORMAGENTA;
 

{猎庄拐点㊣}
 

MA5:EMA(CLOSE,5),COLORYELLOW;
 MA10:EMA(CLOSE,10),COLORFFFFFF;
 MA30:EMA(CLOSE,30),COLORFF0000;
 MA60:EMA(CLOSE,60),COLORRED;
 VAR37:=EMA(EMA(EMA(CLOSE,2),2),2);
 VAR47:=(MA(VAR37,47))*(0.99);
 分水岭:(MA(VAR37,13))*(0.99),LINETHICK2,COLORFF00FF;
 DRAWTEXT((MA(CLOSE,13) > MA(CLOSE,18)) AND CROSS(CLOSE,MA(CLOSE,4)) AND (MA(CLOSE,4) < MA(CLOSE,13)),(LOW)*(0.97),'赢'),COLOR00FF00;
 B36:=MA(CLOSE,3) - MA(CLOSE,6);
 B612:=MA(CLOSE,6) - MA(CLOSE,12);
 J:=((B36)/(CLOSE))*(10);
 J1:=((B612)/(CLOSE))*(10);
 DRAWTEXT((J < (-0.2)) AND (J1 < (-0.2)) AND CROSS(J,J1),(LOW)*(0.95),'猎庄'),COLORRED;
 KS:=((CLOSE - MA(CLOSE,13))/(MA(CLOSE,13)))*((-200));
 RKS:=REF(KS,1);
 FT:=((RKS)/(KS) >= 1.23) AND (RKS >= 8) AND ((CLOSE)/(REF(CLOSE,1)) >= 1.03);
 反弹:STICKLINE(FT,HIGH,LOW,0,1),LINETHICK2,COLOR00FF00;
 STICKLINE(FT,OPEN,CLOSE,8,0),COLORYELLOW;
 VAR10:=MA(CLOSE,80) - (MA(CLOSE,10))/(3);
 VAR11:=REF(CLOSE,1);
 VAR12:=((SMA(MAX(CLOSE - VAR11,0),18,1))/(SMA(ABS(CLOSE - VAR11),18,1)))*(100);
 DRAWICON(CROSS(79,VAR12),(HIGH)*(1.035),2),COLOR008000;
 DRAWTEXT(CROSS(79,VAR12),(HIGH)*(1.04),' 抛↓'),COLORFFFFFF;
 VAR1:=LLV(LOW,22);
 VAR2:=HHV(HIGH,22);
 AK1:=EMA(((CLOSE - VAR1)/(VAR2 - VAR1))*(100),5);
 AK:=EMA(((CLOSE - VAR1)/(VAR2 - VAR1))*(50),13);
 DD:=EMA((0.667)*(REF(AK1,1)) + (0.333)*(AK1),2);
 VAR3:=LLV(LOW,55);
 VAR4:=HHV(HIGH,34);
 VAR5:=EMA(((CLOSE - VAR3)/(VAR4 - VAR3))*(100),3);
 VAR6:=(AK + VAR5)/(2);
 VAR7:=EMA((0.667)*(REF(VAR5,1)) + (0.333)*(AK1),2);
 VAR8:=EMA(VAR6,5);
 BB:=EMA((0.667)*(REF(VAR8,1)) + (0.333)*(VAR8),2);
 AB:=CROSS(AK1,AK);
 BB1:=CROSS(AK1,BB) AND (BB < 30);
 CD:=(BB1)*(0.6);
 DRAWTEXT((CD = 0.6),(LOW)*(0.98),'□'),LINETHICK1,COLORFFFFFF;
 DRAWTEXT((AB = 1),(LOW)*(0.98),'■'),LINETHICK1,COLOR66FFCC;
 DRAWTEXT((AB = 1),(LOW)*(0.94),'拐点 '),COLOR33CC99;
 VAR111:=(((CLOSE - MA(CLOSE,6))/(MA(CLOSE,6)))*(200) + ((CLOSE - MA(CLOSE,24))/(MA(CLOSE,24)))*(200) + ((CLOSE - MA(CLOSE,32))/(MA(CLOSE,32)))*(200))/(3);
 DRAWICON((VAR111 > 20) AND FILTER((VAR111 < REF(VAR111,1)),5),(HIGH)*(1.02),2),COLORFF00FF;
 
 
 

{优化实站助手}
 AR2:=REF(LOW,1);
 AR3:=((SMA(ABS((LOW - AR2)),3,1) / SMA(MAX((LOW - AR2),0),3,1)) * 100);
 AR4:=EMA(IF((CLOSE * 1.2),(AR3 * 10),(AR3 / 10)),3);
 AR5:=LLV(LOW,38);
 AR6:=HHV(AR4,38);
 AR7:=IF(LLV(LOW,90),1,0);
 AR8:=((EMA(IF((LOW <= AR5),((AR4 + (AR6 * 2)) / 2),0),3) / 1618) * AR7);
 STICKLINE(AR8,0,AR8,4,1),,COLORFFFFA6;
 VAR3:=((((2 * CLOSE) + HIGH) + LOW) / 4);
 VAR4:=LLV(LOW,34);
 VAR5:=HHV(HIGH,34);
 散户:EMA((((VAR3 - VAR4) / (VAR5 - VAR4)) * 100),13),,COLORFFCAFF;
 新庄:EMA(((0.667 * REF(散户,5)) + (0.333 * 散户)),2),,COLORFC6FFF;
 高抛低吸分界线:50;
 DRAWTEXT((CROSS(散户,新庄) AND (散户 < 22)),30,'买'),,COLORFF00FF;
 DRAWICON((CROSS(散户,30) AND (新庄 < 散户)),35,4),;
 STICKLINE((CROSS(散户,65) AND (新庄 < 散户)),70,50,8,1),;
 DRAWICON((CROSS(散户,75) AND (新庄 < 散户)),80,10),;
 DRAWTEXT((CROSS(新庄,散户) AND (新庄 > 75)),75,'卖'),,COLORFFFF00;
 逢低吸呐:IF((CROSS(散户,新庄) AND (散户 < 40)),20,0),,COLOR5798FF;
 逢高减磅:IF((CROSS(新庄,散户) AND (新庄 > 75)),75,90),,COLORFCD100;
 
 

[url=http://www.70822.com/soft/sort013/sort05/down-47816.html]通达信背离猎庄主图+波段趋势副图公式源码(附图)[/url]