短趋:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36; 中趋:=(LLV(短趋,2)+LLV(短趋,4)+LLV(短趋,6))/3; TTJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>短趋; 立桩量:=FILTER(TTJ1,5); TTJ2:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0))); 突破:=TTJ2=1; TTJ3:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(LOW,3),1,0))); 三天法则:=TTJ3=1; 成立:=三天法则 AND 突破; 条件成立:=FILTER(成立,3); DRAWTEXT(条件成立,L*0.93,'立桩量'),COLOR00FFFF; VAR90:=((((HHV((((EMA(DCLOSE,12)-EMA(DCLOSE,26))-(EMA((EMA(DCLOSE,12) -EMA(DCLOSE,26)),9)))*2),4)<0) AND ((((EMA(DCLOSE,12)-EMA(DCLOSE,26))- (EMA((EMA(DCLOSE,12)-EMA(DCLOSE,26)),9)))*2)>REF((((EMA(DCLOSE,12) -EMA(DCLOSE,26))-(EMA((EMA(DCLOSE,12)-EMA(DCLOSE,26)),9)))*2),1))) AND (REF((((EMA(DCLOSE,12)-EMA(DCLOSE,26))-(EMA((EMA(DCLOSE,12)- EMA(DCLOSE,26)),9)))*2),1)<REF((((EMA(DCLOSE,12)-EMA(DCLOSE,26))- (EMA((EMA(DCLOSE,12)-EMA(DCLOSE,26)),9)))*2),2))) AND (REF((((EMA(DCLOSE,12) -EMA(DCLOSE,26))-(EMA((EMA(DCLOSE,12)-EMA(DCLOSE,26)),9)))*2),2) <REF((((EMA(DCLOSE,12)-EMA(DCLOSE,26))-(EMA((EMA(DCLOSE,12)-EMA(DCLOSE, 26)),9)))*2),3))); DRAWTEXT(VAR90 AND MM,L*0.98,'买'),COLORRED; DRAWTEXT(VAR90,L*0.98,'←短买'),COLORRED; DRAWTEXT(CROSS(MA(C,3),MA(C,9)) AND C>=REF(C,1) AND C>O,L*0.98,'追'),COLORMAGENTA; DRAWTEXT(REF(C,BARSLAST(REF(CROSS('MACD.DIF','MACD.DEA'),1))+1)>C AND REF('MACD.DIF',BARSLAST(REF(CROSS('MACD.DIF','MACD.DEA'),1))+1) <'MACD.DIF' AND CROSS('MACD.DIF','MACD.DEA') >0,L-0.02,'★M'),COLORFF00FF;{MACD底背离} DRAWTEXT(REF(C,BARSLAST(REF(CROSS('KDJ.K','KDJ.D'),1))+1)>C AND REF('KDJ.K',BARSLAST(REF(CROSS('KDJ.K','KDJ.D'),1))+1)<'KDJ.K' AND CROSS('KDJ.K','KDJ.D'),L-0.10,'◎K'),COLORFF00FF;{KDJ底背离} DRAWTEXT(REF(C,BARSLAST(REF(CROSS('RSI.RSI1','RSI.RSI2'),1))+1)>C AND REF('RSI.RSI1',BARSLAST(REF(CROSS('RSI.RSI1','RSI.RSI2'),1))+1) <'RSI.RSI1' AND CROSS('RSI.RSI1','RSI.RSI2') >0,L-0.18,'◆R'),COLORFF00FF;{RSI底背离}; DRAWTEXT(REF(C,BARSLAST(REF(CROSS('MACD.DEA','MACD.DIF'),1))+1)<C AND REF('MACD.DIF',BARSLAST(REF(CROSS('MACD.DEA','MACD.DIF'),1))+1) >'MACD.DIF' AND CROSS('MACD.DEA','MACD.DIF') >0,H+0.16,'★M'),COLORGREEN;{MACD顶背离}; DRAWTEXT(REF(C,BARSLAST(REF(CROSS('KDJ.D','KDJ.K'),1))+1)<C AND REF('KDJ.K',BARSLAST(REF(CROSS('KDJ.D','KDJ.K'),1))+1) >'KDJ.K' AND CROSS('KDJ.D','KDJ.K')>0,H+0.08,'◎K'),COLORGREEN;{KDJ顶背离} DRAWTEXT(REF(C,BARSLAST(REF(CROSS('RSI.RSI2','RSI.RSI1'),1))+1)<C AND REF('RSI.RSI1',BARSLAST(REF(CROSS('RSI.RSI2','RSI.RSI1'),1))+1)>'RSI.RSI1' AND CROSS('RSI.RSI2','RSI.RSI1')>0,H+0.04,'◆R'),COLORGREEN;{RSI顶背离}; AA05:=MA(C,5); AA30:=MA(C,30); MA05:=MA(C,5); MA10:=MA(C,13); MA30:=MA(C,34); BB05:=ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416; BB10:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416; BB30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.1416; 速度5:=SMA(EMA((MA05-REF(MA05,1))/REF(MA05,1),3)*100,3,1); 加速度5:=EMA((速度5-REF(速度5,1)),3); 五日乖离率:=(C-AA05)/AA05*100; 三拾日乖离率:=(C-MA30)/MA30*100; MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30; 买入:=FILTER(MR,10); DRAWTEXT(买入,LOW*0.98,'←买入'),COLORRED; {强势狙击:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10); DRAWTEXT(强势狙击,LOW*0.98,'←强势狙击'),COLORRED;} 加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND MA05>REF(MA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA10>REF(MA10,1) AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1),10); DRAWTEXT(加仓,LOW*0.98,'←加仓'),COLORRED; |
|
来自: 常熟老李jlr5mr > 《通达信公式》