程序源码 VAR1:=((CLOSE-REF(MA(CLOSE,6),1))/6+MA(CLOSE,6))*1.004; VAR2:=crOSS(CLOSE,VAR1) AND VAR1>REF(VAR1,1); VAR3:=((CLOSE-REF(MA(CLOSE,18),1))/18+MA(CLOSE,18))*1.004; VAR4:=CROSS(CLOSE,VAR3) AND VAR3>REF(VAR3,1); VAR5:=CROSS(0.9,1/vol*1000>0 AND kdj.J<0) OR CROSS(0.9,1/VOL*1000>0.01 AND kdJ.J<0); VAR6:=EMA(CLOSE,34); VAR7:=EMA(VAR6,13); VAR8:=MacD.DIF#MONTH; VAR9:=MACD.DEA#MONTH; VAR10:=MACD.DIF#WEEK; VAR11:=MACD.DEA#WEEK; VAR12:=CROSS(VAR10,VAR11) OR VAR10>VAR11; VAR13:=cci#WEEK; VAR14:=CROSS(VAR13,100) OR VAR13>100; VAR15:=SAR.sar#WEEK; VAR16:=CROSS(CLOSE,VAR15) OR VAR15>0; VAR17:=VAR12 AND VAR14 AND VAR16; VAR18:=MA(CLOSE,27); VAR19:=(CLOSE-VAR18)/VAR18*100; VAR20:=MA(VAR19,2); VAR21:=BArslAST(CROSS((-10),VAR20)=1); VAR22:=BARSLAST(CROSS(VAR20,10)=1); VAR23:=VAR20<(-10) AND VAR21>3; VAR24:=VAR20>10 AND VAR22>3; VAR25:=MACD.MACD#WEEK; 周J:KDJ.J#WEEK,COLORFF0099,LINETHICK2; 周D:KDJ.D#WEEK,COLOR3388AA,LINETHICK2; VAR26:=VAR25-REF(VAR25,5)>0.05; VAR27:=VAR25-REF(VAR25,5)>0.12; VAR28:=HHV(VOL,5); VAR29:=OPEN>CLOSE; VAR30:=CLOSE>OPEN; VAR31:=CLOSE=OPEN; VAR32:=SUM(VOL,5)/VAR28; VAR33:=IF(VAR32>0.3,1,0); VAR34:=IF(VAR29 AND VAR33,VOL,0); VAR35:=IF(VAR30 AND VAR33,VOL,0); VAR36:=IF(VAR31 AND VAR33,VOL,0); VAR37:=SUM(VAR35,3); VAR38:=SUM(VAR34,3); VAR39:=VAR37-VAR38; VAR40:=MACD.DEA<0 AND MACD.DEA>REF(MACD.DEA,1) AND (MACD.DIF>0 OR MACD.DIF>REF(MACD.DIF,1)); VAR41:=REF(bbi,1)>=OPEN AND REF(BBI,1)<CLOSE OR (OPEN>=REF(BBI,1) AND OPEN>REF(CLOSE,1) AND REF(LOW<REF(BBI,1),1)) AND CLOSE>OPEN; VAR42:=BBI>=OPEN AND BBI<CLOSE OR (OPEN>=BBI AND OPEN>REF(CLOSE,1) AND REF(LOW<BBI,1)) AND CLOSE>OPEN; VAR43:=FILTER(VAR41 OR VAR42 AND CLOSE>MA(CLOSE,5) AND (VAR40 OR MACD.DIF>REF(MACD.DIF,1)) AND (VOL>REF(VOL,1) AND VOL>REF(VOL,2) AND CLOSE/REF(CLOSE,1)>=1.055 OR (VOL>REF(VOL,1) AND REF(VOL,1)<REF(VOL,2) AND CLOSE/REF(CLOSE,1)>=1.055) OR (REF(VOL,1)>REF(VOL,2) AND CLOSE/REF(CLOSE,1)>=1.055)),3); VAR44:=WINNER(CLOSE)*100>=90; VAR45:=EMA(EMA(CLOSE,VAR44),80); VAR46:=EMA(EMA(CLOSE,VAR44),55); VAR47:=VAR46<VAR45 AND VAR45>=REF(VAR45,1) OR (VAR46>=VAR45 AND VAR45>REF(VAR45,1)); VAR48:=Abs((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20); VAR49:=DMA((2*CLOSE+LOW+HIGH)/4,VAR48); VAR50:=CLOSE/VAR49; VAR51:=MA(VAR50*(2*CLOSE+HIGH+LOW)/4,3); VAR52:=(VAR51-VAR49)/VAR49/3; VAR53:=VAR51-VAR52*VAR51; VAR54:=COST(100-22); VAR55:=MA(REF(HHV((CLOSE+LOW+OPEN+HIGH)/4,30),1),3); VAR56:=COUNT(COUNT(CLOSE/REF(CLOSE,1)>=1.05,6)>=1 AND REF(VAR24>0,1),40)>=1 AND (REF(VAR37<1,1) OR VAR37<1 OR VAR39<0 OR REF(VAR39<0,1) OR REF(VAR39<(-2),2)) AND (VAR27 OR (VAR26 AND VAR25>0)) AND VAR17 AND (VAR2 OR VAR5); 牛回头吸:26*(COUNT(REF(VAR43,3) AND VAR47 AND REF(VAR25<0,10),25)>=1 AND COUNT(CROSS(VAR54,VAR53) OR CROSS(VAR55,VAR53),8)>=1 AND (VAR56 OR (VAR2 OR VAR5 AND VAR17) OR REF(VAR56 AND CLOSE/REF(CLOSE,1)>=1.95,1)) AND OPEN/REF(CLOSE,1)<=1.035 AND COUNT(REF(CROSS(VAR55,MA(CLOSE,3)),1),3)<1),COLORWHITE; 注: 馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。 发文不易,如获益,欢迎赞赏,赞赏必复! |
|
来自: 追梦文库 > 《牛妖庄股黑马主力机构》