| M1:=3;M2:=5;M3:=7;M4:=13;M5:=15;M6:=21; VAR1:=LLV(HIGH,240); VAR2:=100*(CLOSE-VAR1)/VAR1; VAR3:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100; VAR4:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100; VAR5:=0; VAR6:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/ SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100; VAR7:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/ SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100; VARA:=BARSCOUNT(CLOSE); VARB:=VAR6<20 AND VAR7<23 AND VARA>35; VARC:=VARB AND COUNT(VARB,1)=1; VARD:=EMA(CLOSE,21)-EMA(CLOSE,8); VARE:=EMA(VARD,5); VARF:=TROUGHBARS(3,6,1)<4 AND CROSS(VARD,VARE); VAR8:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0); VAR9:=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); VAR10:=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); VAR11:=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); VAR12:=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); VAR13:=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); VAR14:=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); VAR15:=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); VAR16:=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); VAR17:=EMA(CLOSE,2)-EMA(CLOSE,150); VAR1A:=EMA(VAR17,100); VAR1B:=2*(VAR17-VAR1A); VAR1C:=POW(VAR1B,3)*0.1+POW(VAR1B,1); VAR1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE)); VAR1E:=EMA(VAR1D*0.97,3); VAR1F:=(HIGH+LOW+CLOSE)/3; VAR18:=(VAR1F-MA(VAR1F,14))/(0.015*AVEDEV(VAR1F,14)); VAR19:=CROSS(VAR1E,LOW); 选股买点:= VAR8,colorred; 组合买:=(VAR9+VAR11+VAR13+VAR15); 组合卖:=(VAR10+VAR12+VAR14+VAR16); 黑马线:=IF(YEAR<2098 AND VAR1B>0.1,VAR1C,0); VAR20:=选股买点 AND VARF AND VARC AND VAR19 AND VAR2<0 AND VAR3=0 AND VAR4=0 AND VAR18<(-110); DRAWTEXT(VAR11,LOW,'●介入'),colormagenta , LINETHICK4; STICKLINE(组合买,CLOSE,OPEN,1,0),colorblue; DRAWTEXT(组合买,LOW,'B'),colorgreen; STICKLINE(组合卖,CLOSE,OPEN,1,0),colorgreen; DRAWTEXT(组合卖,HIGH,'S'),coloryellow; STICKLINE(选股买点,CLOSE,OPEN,1,0),colorblue; DRAWTEXT(选股买点>0,LOW,'B'),colormagenta; DRAWTEXT(VAR14,HIGH,'空仓'), LINETHICK3, colorcyan; DRAWTEXT(VAR18<-110 AND 选股买点>0,LOW,'买入'),colorred , LINETHICK3 ; VAA1:=(ZIG(3,10) < REF(ZIG(3,10),1)) AND (REF(ZIG(3,10),1) > REF(ZIG(3,10),2)); VAA2:=(ZIG(3,10) > REF(ZIG(3,10),1)) AND (REF(ZIG(3,10),1) < REF(ZIG(3,10),2)); DRAWTEXT(VAA1,HIGH,'卖出'),coloryellow; DRAWTEXT(VAA2 AND (DATE < 1070804),LOW,'买入'),coloryellow; STICKLINE(VAA1 AND (DATE < 1070804),CLOSE,OPEN,1.5,0),coloryellow; STICKLINE(VAA1 AND (DATE < 1070804),HIGH,LOW,1.5,0),coloryellow; STICKLINE(VAA2 AND (DATE < 1070804),CLOSE,OPEN,1.5,0),COLORFF00FF; STICKLINE(VAA2 AND (DATE < 1070804),HIGH,LOW,1.5,0),COLORFF00FF; 周线:MA(CLOSE,M1),colorwhite; 半月线:MA(CLOSE,M2),coloryellow; 月线:MA(CLOSE,M3),colormagenta; 季度线:MA(CLOSE,M4),colorgreen; 半年线:MA(CLOSE,M5),colorcyan; 年线:MA(CLOSE,M6),colorblue; A:=BARSCOUNT(C); AH:=HHV(H,200); AL:=LLV(L,200); A0:=(AH-AL)/40; B1:=L-A0; STICKLINE((A+0)/34=FLOOR((A+0)/34),B1,B1-1.5*A0,3,0),COLORF00FF0; DRAWTEXT((A+0)/34=FLOOR((A+0)/34),B1-1*A0,'时间窗'),colorwhite; X1:=(C+L+H)/3;BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10; SQX:=(C-MA(CLOSE,13))*100; DIFF:EMA(MA(SQX,7),1),COLOR00FFFF; DEA:EMA(DIFF,7),COLORFF33FF;MACD:(DIFF-DEA)*2,COLORSTICK; 低位金叉:IF(CROSS(DIFF,DEA) AND DIFF<-0.1,0.3,0),coloryellow,POINTDOT; STICKLINE(低位金叉,0,15,8,0),coloryellow;DRAWICON(低位金叉,0.3,1); JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0)); 二次金叉:IF(CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1,0.2,0),COLORFF00FF,POINTDOT; STICKLINE(二次金叉,30,15,8,0),COLORFF00FF; A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)); 底背离:IF(REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA),0.1,0),colorred,POINTDOT; STICKLINE(底背离,45,30,8,0),colorred;DRAWLINE(A1=0,DEA,底背离,DEA,0),colorred; A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)); 顶背离:REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF),colorgreen; DRAWLINE(A2=0,DEA,顶背离,DEA,0),colorgreen; A3:=CROSS(DIFF,DEA) AND DEA<0; 零下二次金叉:IF(FILTER(COUNT(A3,21)=2,10),0.05,0),colorwhite,POINTDOT; STICKLINE(零下二次金叉,45,60,8,0),colorwhite; DRAWTEXT(CROSS(DIFF,DEA),DIFF,'始'); DRAWTEXT(CROSS(DEA,DIFF),DEA,'终'); | 

 
 




