投资者咨询：谢谢老师通达信改文华 (文华财经WH6赢顺V6.7)
来源:文华财经 日期:2018-6-29 15:29
WY1001:=(2*CLOSE+HIGH+LOW)/3;
WY1002:=EMA(WY1001,3);
WY1003:=EMA(WY1002,3);
WY1004:=EMA(WY1003,3);
X0:(WY1004-REF(WY1004,1))/REF(WY1004,1)*1000;
STICKLINE(X0>=0,X0,0,8,0),colorred;
STICKLINE(X0<0,X0,0,8,0),colorgreen;
PJGJ:=AMOUNT/VOL/1000;
SSRYDJX:=MA(PJGJ,13);
SSRCJL:=EMA(VOL,13);
SSRCJE:=EMA(AMOUNT,13);
SSRCBJX:=SSRCJE/SSRCJL/1000;
CYS13:=(CLOSE-SSRCBJX)/SSRCBJX*1000;
XYSHSL:=EMA(VOL/CAPITAL*100,13);
STICKLINE(XYSHSL>6.1 AND CYS13>5 ,2 ,0 ,8,0 ),colorgreen;
STICKLINE(XYSHSL>3.8 AND CYS13>5 ,1.5 ,0 ,8 ,0 ),coloryellow;
STICKLINE(XYSHSL>2.1 AND CYS13>5 ,1 ,0 ,8,0 ),colorcyan;
STICKLINE(XYSHSL>1.8 AND CYS13>5 ,0.5 ,0 ,8,0 ),colorblue;
X1:MA(X0,2);
X2:MA(X0,1);
WY1003:=EMA(WY1002,3);
WY1004:=EMA(WY1003,3);
X0:(WY1004-REF(WY1004,1))/REF(WY1004,1)*1000;
STICKLINE(X0>=0,X0,0,8,0),colorred;
STICKLINE(X0<0,X0,0,8,0),colorgreen;
PJGJ:=AMOUNT/VOL/1000;
SSRYDJX:=MA(PJGJ,13);
SSRCJL:=EMA(VOL,13);
SSRCJE:=EMA(AMOUNT,13);
SSRCBJX:=SSRCJE/SSRCJL/1000;
CYS13:=(CLOSE-SSRCBJX)/SSRCBJX*1000;
XYSHSL:=EMA(VOL/CAPITAL*100,13);
STICKLINE(XYSHSL>6.1 AND CYS13>5 ,2 ,0 ,8,0 ),colorgreen;
STICKLINE(XYSHSL>3.8 AND CYS13>5 ,1.5 ,0 ,8 ,0 ),coloryellow;
STICKLINE(XYSHSL>2.1 AND CYS13>5 ,1 ,0 ,8,0 ),colorcyan;
STICKLINE(XYSHSL>1.8 AND CYS13>5 ,0.5 ,0 ,8,0 ),colorblue;
X1:MA(X0,2);
X2:MA(X0,1);
HHJSJDA:=(3*CLOSE+OPEN+LOW+HIGH)/6;
HHJSJDB:(20*HHJsjda+19*REF(HHJsjda,1)+18*REF(HHJsjda,2)+17*REF(HHJsjda,3 )+16*REF(HHJsjda,4)+15*REF(HHJsjda,5)+14*REF(HHJsjda,6)+13*REF(HHJsjda,7)+12*REF(HHJsjda,8)+11*REF(HHJsjda,9)+10*REF(HHJsjda,10 )+9*REF(HHJsjda,11)+8*REF(HHJsjda,12)+7*REF(HHJsjda,13)+6*REF(HHJsjda,14)+5*REF(HHJsjda,15)+4*REF(HHJsjda,16) +3*REF(HHJsjda,17)+2*REF(HHJsjda,18)+REF(HHJsjda,20))/210,coloryellow;
HHJSJDC:MA(HHJSJDB,5),colorred;
HHJSJDB:(20*HHJsjda+19*REF(HHJsjda,1)+18*REF(HHJsjda,2)+17*REF(HHJsjda,3 )+16*REF(HHJsjda,4)+15*REF(HHJsjda,5)+14*REF(HHJsjda,6)+13*REF(HHJsjda,7)+12*REF(HHJsjda,8)+11*REF(HHJsjda,9)+10*REF(HHJsjda,10 )+9*REF(HHJsjda,11)+8*REF(HHJsjda,12)+7*REF(HHJsjda,13)+6*REF(HHJsjda,14)+5*REF(HHJsjda,15)+4*REF(HHJsjda,16) +3*REF(HHJsjda,17)+2*REF(HHJsjda,18)+REF(HHJsjda,20))/210,coloryellow;
HHJSJDC:MA(HHJSJDB,5),colorred;
DIFF:EMA(CLOSE,9)-EMA(CLOSE,17);
DEA:EMA(DIFF,8),COLOrffaa00;
MACD:=2*(DIFF-DEA);
STICKLINE(MACD>=0,MACD,0,4,1),COLORF00FF0;
STICKLINE(MACD<0,MACD,0,4,1),colorwhite;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,4,0 ),COLOR00aaff;
X1:IF(diff<0,diff,0),COLOR0000FF,LINETHICK2;
X2:IF(diff<0,0,diff),colormagenta,LINETHICK1;
X3:IF(diff<dea,diff,dea),COLOR00ff00,linethick1;
X4:IF(diff>dea,dea,dea),linethick1,COLORffbb11;
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(低位金叉,DEA*0.86,DEA*0.66,6,0),coloryellow;
DRAWTEXT(低位金叉,dea*0.86,' 低位金叉'),coloryellow;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,DEA*0.96,DEA*0.76,6,0),ColorFF00FF;
DRAWICON(二次金叉,dea*1.1,'BUY') ;
DRAWTEXT(二次金叉,DEA*0.96,' 二次金叉'),ColorFF00FF;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背离,DEA*1.09,DEA*0.86,6,0),Color00FF00;
DRAWLINE(A1=0,DEA,底背离,DEA,0),colorred,linethick1;
DRAWTEXT(底背离,DEA*1.09,' 底背离'),Color6600FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
DRAWLINE(A2=0,DEA,顶背离,DEA,0),colorgreen,linethick1;
DRAWTEXT(顶背离,DEA*1.2,' 顶背离'),Color00FF00;
技术人员回复
日期:2018-6-29 15:38
参考1：
WY1001:=(2*CLOSE+HIGH+LOW)/3;
WY1002:=EMA(WY1001,3);
WY1003:=EMA(WY1002,3);
WY1004:=EMA(WY1003,3);
X0:(WY1004-REF(WY1004,1))/REF(WY1004,1)*1000;
STICKLINE1(X0>=0,X0,0,8,0),COLORRED;
STICKLINE1(X0<0,X0,0,8,0),COLORGREEN;
AMOUNT:=AVPRICE*V;
PJGJ:=AMOUNT/VOL/1000;
SSRYDJX:=MA(PJGJ,13);
SSRCJL:=EMA(VOL,13);
SSRCJE:=EMA(AMOUNT,13);
SSRCBJX:=SSRCJE/SSRCJL/1000;
CYS13:=(CLOSE-SSRCBJX)/SSRCBJX*1000;
CAPITAL:=GETPRICE1('流通股本');
XYSHSL:=EMA(VOL/CAPITAL*100,13);
STICKLINE1(XYSHSL>6.1 AND CYS13>5 ,2 ,0 ,8,0 ),COLORGREEN;
STICKLINE1(XYSHSL>3.8 AND CYS13>5 ,1.5 ,0 ,8 ,0 ),COLORYELLOW;
STICKLINE1(XYSHSL>2.1 AND CYS13>5 ,1 ,0 ,8,0 ),COLORCYAN;
STICKLINE1(XYSHSL>1.8 AND CYS13>5 ,0.5 ,0 ,8,0 ),COLORBLUE;
X1:MA(X0,2);
X2:MA(X0,1);
HHJSJDA:=(3*CLOSE+OPEN+LOW+HIGH)/6;
HHJSJDB:(20*HHJSJDA+19*REF(HHJSJDA,1)+18*REF(HHJSJDA,2)+17*REF(HHJSJDA,3 )+16*REF(HHJSJDA,4)+15*REF(HHJSJDA,5)+14*REF(HHJSJDA,6)+13*REF(HHJSJDA,7)+12*REF(HHJSJDA,8)+11*REF(HHJSJDA,9)+10*REF(HHJSJDA,10 )+9*REF(HHJSJDA,11)+8*REF(HHJSJDA,12)+7*REF(HHJSJDA,13)+6*REF(HHJSJDA,14)+5*REF(HHJSJDA,15)+4*REF(HHJSJDA,16) +3*REF(HHJSJDA,17)+2*REF(HHJSJDA,18)+REF(HHJSJDA,20))/210,COLORYELLOW;
DIFF:EMA(CLOSE,9)-EMA(CLOSE,17);
DEA:EMA(DIFF,8),COLORFFAA00;
MACD:=2*(DIFF-DEA);
STICKLINE1(MACD>=0,MACD,0,4,1),COLORF00FF0;
STICKLINE1(MACD<0,MACD,0,4,1),COLORWHITE;
STICKLINE1(MACD<REF(MACD,1) AND MACD>0,0,MACD,4,0 ),COLOR00AAFF;
X1:IF(DIFF<0,DIFF,0),COLOR0000FF,LINETHICK2;
X2:IF(DIFF<0,0,DIFF),COLORMAGENTA,LINETHICK1;
X3:IF(DIFF<DEA,DIFF,DEA),COLOR00FF00,LINETHICK1;
X4:IF(DIFF>DEA,DEA,DEA),LINETHICK1,COLORFFBB11;
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE1(低位金叉,DEA*0.86,DEA*0.66,6,0),COLORYELLOW;
DRAWTEXT(低位金叉,DEA*0.86,' 低位金叉'),COLORYELLOW;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE1(二次金叉,DEA*0.96,DEA*0.76,6,0),COLORFF00FF;
DRAWICON(二次金叉,DEA*1.1,'BUY') ;
DRAWTEXT(二次金叉,DEA*0.96,' 二次金叉'),COLORFF00FF;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE1(底背离,DEA*1.09,DEA*0.86,6,0),COLOR00FF00;
DRAWLINE1(A1=0,DEA,底背离,DEA,0),COLORRED,LINETHICK1;
DRAWTEXT(底背离,DEA*1.09,' 底背离'),COLOR6600FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
DRAWLINE1(A2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK1;
DRAWTEXT(顶背离,DEA*1.2,' 顶背离'),COLOR00FF00;
