通达信江南雨Y源码

MACD含绝佳抄底(钱包)，逃顶指标

包含1.快速短线  2.主力出现 3.绝佳抄底 的macd变式指标。2008.10.3编

1.快速短线指标以短线操作为主，虽有T、TB、P、PB不影响使用，配合蚂蟥盯庄
 本指标以短线操作为主，能及时的做出买卖点指示，底部形态，超卖状态等
K，D指标同时向上进入80，是指示市场已经超买，如果K线掉头向下死叉D线，为短线卖出指示，
K，D指标同时向下进入20，是指示市场已经超卖，如果K线掉头向上金叉D线，为短线买进指示，
 绿色的波线为能量潮线，当出现能量潮线应该引起注意，说明已接近底部或将要反弹，量潮线向下勾头时，表示空头力量已衰弱，市场已处超卖状态，近日可有反弹出现，能量潮的数值越高，表示的准确性越高，如量潮线与长十字星等见底K线配合使用，效果更佳！准确率更高！
 绿色空心柱是空方的最后能量柱，也是见底信号，当绿色空心柱出现时说明空方已是强弩之末，当由最长的绿色空心柱逐渐变短，说明底部渐成，反弹可期。
 
对于金包和快逃，这两个指示，内含有未来。大家不要以它做为买卖依据，金包和快逃只是对前面的金叉，死叉进行进一步的验证和确认而已。

更多的细节用法请大家在使用中慢慢摸索体会，在此祝你们早发财。。。。。。。
 

参数：p1=5    p2=4

VAR2:=(HIGH+LOW+(CLOSE)*(2))/(4);
 BH:=((EMA((VAR2-LLV(VAR2,15))/(HHV(LOW,15)-LLV(VAR2,15)),2))*(38)),COLOR0000FF,LINESTICK;
 BL:=((((-1))*(EMA((VAR2-LLV(VAR2,15))/(HHV(LOW,15)-LLV(VAR2,15)),2))+0.01)*(38)),COLOR339999,LINESTICK;
 VAR22:=((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10)))*(100);
 VAR33:=EMA(VAR22,10);
 VAR44:=EMA(VAR33,10);
 VAR55:=(3)*(VAR33)-(2)*(VAR44);
 VAR66:=EMA(VAR55,5);

{(0),COLORFFFF00,LINETHICK3;}
趋势:=(5)*(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1))-(3)*(SMA(SMA(((CLOSE-LLV(LOW,27))
 /(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1),3,1))-SMA(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1),3,1),2,1);
底部:=5;
 DRAWTEXT(CROSS((趋势),底部),58,'★'),COLOR00FFFF;
 {DRAWTEXT(CROSS(趋势,底部),0,'◢◣'),COLORRED;
 DRAWTEXT(CROSS(趋势,底部),20,'●'),COLORGREEN;}
 VARA1:=((CLOSE>=REF(CLOSE,1)) AND (REF(CLOSE,1)>=REF(CLOSE,2)) AND (REF(CLOSE,1)<=REF(CLOSE,3))
 AND (REF(CLOSE,2)<=REF(CLOSE,3)) AND ((REF(CLOSE,4)>REF(CLOSE,2)) OR (REF(CLOSE,4)<=REF(CLOSE,2))
 AND (REF(CLOSE,5)>=REF(CLOSE,3))) OR (CLOSE>=REF(CLOSE,1)) AND (REF(CLOSE,1)<=REF(CLOSE,2))
 AND (CLOSE>=REF(CLOSE,2)) AND ((REF(CLOSE,3)>REF(CLOSE,1)) OR (REF(CLOSE,3)<=REF(CLOSE,1)) AND (REF(CLOSE,4)>=REF(CLOSE,2))));
 VARA2:=LLV(LOW,5);
 VARA3:=HHV(HIGH,5);
 VARA4:=EMA(((CLOSE-VARA2)/(VARA3-VARA2))*(100),1);
 VARA5:=EMA((0.66699999)*(REF(VARA4,1))+(0.333)*(VARA4),2);
 VARA6:=(VARA5<24) AND (OPEN<MA(CLOSE,20));
 {STICKLINE(VARA1 AND (VARA6),-40,40,10,1),COLOR2894FF;}
 VARB2:=((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10)))*(100);
 VARB3:=EMA(VARB2,7);
 VARB4:=EMA(VARB3,10);
 VARB5:=(3)*(VARB3)-(2)*(VARB4);
 VARB6:=EMA(VARB5,5);
趋势1:=(3)*(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))
 *(100),5,1))-(2)*(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-
 LLV(LOW,27)))*(100),5,1),3,1));
探底:=IF((趋势<=5),58,0),COLORFF00FF;

MTM1:=MA((CLOSE-REF(CLOSE,13))*31,5),LINETHICK1,COLORBLUE;
 VARF1:=MA(HHV(HIGH,485),17);
 VARF2:=MA(HHV(HIGH,222),17);
 VARF3:=MA(HHV(HIGH,96),17);
 VARF4:=MA(LLV(LOW,485),17);
 VARF5:=MA(LLV(LOW,222),17);
 VARF6:=MA(LLV(LOW,96),17);
 VARF7:=MA((VARF4*0.96+VARF5*0.96+VARF6*0.96+VARF1*0.558+VARF2*0.558+VARF3*0.558)/6,17);
 VARF8:=MA((VARF4*1.25+VARF5*1.23+VARF6*1.2+VARF1*0.55+VARF2*0.55+VARF3*0.65)/6,17);
 VARF9:=MA((VARF4*1.3+VARF5*1.3+VARF6*1.3+VARF1*0.68+VARF2*0.68+VARF3*0.68)/6,17);
 VARFA:=MA((VARF7*3+VARF8*2+VARF9)/6*1.738,17);
 VARFB:=IF(C=C,VARFA,VARFA*DAY);
 VARFC:=LOW;
 VARFD:=REF(LOW,1);
 VARFE:=SMA(ABS(VARFC-VARFD),3,1)/SMA(MAX(VARFC-VARFD,0),3,1)*100;
 VARFF:=MA(IF(CLOSE*1.35<=VARFB,VARFE*10,VARFE/10),3);
 VARF10:=LLV(LOW,30);
 VARF11:=HHV(VARFF,30);
绝佳买点:IF(C=C,MA(IF(LOW<=VARF10,(VARFF+VARF11*2)/2,0),3),100000000)/(200),COLORRED,LINETHICK2;
 I:=IF(CLOSE<REF(CLOSE,1),0,VOL/CAPITAL);
骤雨初晴:=ABS(EMA(I,13.3)-18)/WINNER(CLOSE)*IF((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)<-0.04,1,0);
 W:=COST(10)*0;
 DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26),COLORRED;
 DEA:=EMA(DIFF,9),COLORYELLOW;
 MACD:=2*(DIFF-DEA)*231,STICK,COLORRED,LINETHICK1;
 {STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,0.9,0),COLOR00FFFF;}

{STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,0.8,0 ),COLORFFEE44;}
 STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,4.0,0),COLOR0033FF;{金黄色}
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,3.0,0 ),COLOR0055FF;
 STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.5,0 ),COLOR0077FF;
 STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.0,0 ),COLOR0099FF;
 STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.8,0 ),COLOR00AAFF;
 STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.3,0 ),COLOR00CCFF;
 STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,0.8,0 ),COLOR00DDFF;
 STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,0.4,0),COLOR00EEFF;

{STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.1,0 ),COLORFF55BB;}
 {DRAWTEXT(CROSS(绝佳买点,4.50000) ,88,'买'),COLOR00FFFF,LINETHICK2;}
 {DRAWTEXT(CROSS(绝佳买点,7.00000) ,88,'3'),COLORCYAN,LINETHICK4;
 DRAWTEXT(CROSS(绝佳买点,3.60000) ,28,'2'),COLORFF00FF,LINETHICK4;
 DRAWTEXT(CROSS(绝佳买点,2.40000) ,-55,'1'),COLORFFFFCC,LINETHICK3 ;
 DRAWTEXT(CROSS(绝佳买点,1.20000) ,-32,'0'),COLORYELLOW,LINETHICK2 ;}

{VAR1:=REF(LOW,1);
 VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),13,1)*4;
 VAR3:=EMA(VAR2,13);
 VAR4:=LLV(LOW,34);
 VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3);
 VAR5>REF(VAR5,1);}

VAR7:=LLV(LOW,P1);
 VAR8:=HHV(HIGH,P1);
 K:=EMA((CLOSE-VAR7)/(VAR8-VAR7)*100,P2),COLORWHITE;
 D:=EMA(0.667*REF(K,1)+0.333*K,2),COLORYELLOW;
 VARC:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1);
 VARD:=EMA(IF(C< EMA(C,250),VARC*1000,VARC*10),3);
能量潮:EMA(IF(L<=LLV(L,30),VARD/2+HHV(VARD,30),0),3)/618,COLORGREEN;
 STICKLINE(能量潮>100,0,能量潮*1.2,8,0),COLORGREEN;
 STICKLINE(能量潮>100,0,能量潮,4,1),COLORFF00FF;
金包: IF(TROUGHBARS(3,15,1)=0 AND HIGH>LOW+0.01,20,0),COLORYELLOW ,LINETHICK1 ;
 VAR9:=PEAKBARS(3,15,1)<10;
 VAR10:=IF(VAR9=1,2,0);
顶1:= IF(VAR10=2,2,0);
顶2:IF(顶1>REF(顶1,1),50,0),COLORGREEN;
 DRAWTEXT(顶2=50,45,'快逃'),COLOR00FF00;
 DRAWTEXT(金包=20,20,'金包'),COLORRED;

80, POINTDOT;
 20, POINTDOT;