九毛八公式指标
源码: MA5:MA(CLOSE,5); MA10:MA(CLOSE,10); MA20:MA(CLOSE,20); MA60:MA(CLOSE,60); MA120:MA(CLOSE,120); {} GET:=ZIG(3,7); PL5:=ZIG(3,5); EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3); EX1:=ZIG(3,5)=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3); PL10:=ZIG(3,10); EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3); EX2:=ZIG(3,10)=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3); PL20:=ZIG(3,20); EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3); EX3:=ZIG(3,20)=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3); PL40:=ZIG(3,40); 走强一:=BARSLAST(PL5REF(PL5,1)); 走强二:=BARSLAST(PL10REF(PL10,1)); 走强三:=BARSLAST(PL20REF(PL20,1)); ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强二),0); ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强二),0); DTJZ5:=IF(PL10REF(PL20,1),COUNT(EN2,走强三),0); ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强三),0); DTJZ10:=IF(PL20REF(PL20,1) AND ZTJD10=1,H,'③'),LINETHICK3,COLOR00FF00,ALIGN1,LAYER0; DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L,'②'),LINETHICK3,Color0000FF,ALIGN1,LAYER0; DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H,'③'),LINETHICK3,COLOR00FF00,ALIGN1,LAYER0; DRAWGBKLAST(CLOSE,STRIP(RGB(80,105,180),RGB(0,0,0),0)); {大盘走势} VAR1:="SH000001$CLOSE"; VAR2:=MA(VAR1,13); VAR3:=VAR1>VAR2; VAR4:=VAR2>VAR1; IF BARSTATUS=2 AND VAR3 THEN BEGIN DRAWTEXTABS(10,20,'大盘走势:★·强·★·重仓参与,积极操作'),COLORRED,LINETHICK3; END ELSE IF BARSTATUS=2 AND VAR4 THEN BEGIN DRAWTEXTABS(10,20,'大盘走势:★·弱·★·严控仓位,谨慎操作'),COLORffffff,LINETHICK3; END; {①} AA:=TROUGHBARS(3,15,1)<4; XG1:=FILTER(AA=1,5); DRAWTEXT(XG1,L,'①'),LINETHICK3,COLOR00FFFF,ALIGN1,LAYER0; {太阳选股} WF:=TROUGHBARS(3,5,2)<4 or troughbars(3,5,1)<4; wd:=((REF(C,1)-C)/C*100>1.5 OR ((REF(C,2)-C)/C*100>1.5) AND CMA(C,13)*0.94; XG3:=FILTER(WF=1,1) AND WD; DRAWICON(XG3,l,12),ALIGN1,LAYER0; TJ:=IF((C-REF(C,1))/REF(C,1)>0.025,1,0); yl:=IF(C>REF(O,BARSLAST(TJ =1)),REF(O,BARSLAST(TJ =1)),0); FT:=BARSLAST(yl); YLX:=REF(yl,FT); bt:=IF(C
公式模块:
PL10:=zig(3,10);
PL20:=ZIG(3,20); EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3); EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3); 走强二:=BArslAST(PL10<REF(PL10,1)); 走强三:=BARSLAST(PL20<REF(PL20,1)); ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强二),0); ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强三),0); (EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2 OR (EN2 AND ZTJZ5=1)) AND C>MA(C,20);