精准高成功率公式 强龙买点参考 现公布源码

公式运用了多元素周期启动点的特征组合，有一定的参考价值，只是运用了未来函数，特别是REFX函数的运用，是其后如果发生即成立，否则不成立，这对发生过的数据是十分准确的，具有查找功能。如果在时时数据中能否及时发生和可操作性，还没有验证。另，发现一个小BUG，重复命名语句，HV和LV，且后句的HV在程序中并未使用，属多余。略作改动放在通达信里了，慢慢研究。若楼主有使用体会

 强龙买点参考 [全周期副图]源码

装逼:DRAWGBK(1,RGB(36,38,40),RGB(24,16,51),0,1,0);
 VAR1B:=(100*(EMA(EMA(C-REF(C,1),6),6)))/(EMA(EMA(ABS(C-REF(C,1)),6),6));
抄底红箭:=((LLV(VAR1B,2)=LLV(VAR1B,7)) AND (COUNT(VAR1B<0,2))) AND CROSS(VAR1B,MA(VAR1B,2));
量能:=IF((MA((VOL-REF(VOL,1))/REF(VOL,1),10))=DRAWNULL,EMA((VOL-REF(VOL,1))/REF(VOL,1),10),MA((VOL-REF(VOL,1))/REF(VOL,1),10));
股价:=IF(((C-MA(C,22))/MA(C,22))=DRAWNULL,(C-EMA(C,22))/EMA(C,22),(C-MA(C,22))/MA(C,22));
主力量能:=IF(((股价*(100+量能))-(MA(股价*(100+量能),7)))=DRAWNULL,(股价*(100+量能))-(EMA(股价*(100+量能),7)),(股价*(100+量能))-(MA(股价*(100+量能),7)));
量能金叉:=CROSS(主力量能,0);
 TYP:=((H+L)+C)/3;
 CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
 CCI金叉:=CROSS(CCI,-100);
 A1:=EMA(C,14);
 A1X:=((A1-REF(A1,1))/REF(A1,1))*100;
出击A:=IF(A1X>=0,REF(EMA(C,14),BARSLAST(CROSS(A1X,0))+1),DRAWNULL);
出击A金叉:=CROSS(A1X,0);
 DIFF:=EMA(C,12)-EMA(C,26);
 DEA:=EMA(DIFF,9);
 MACD金叉:=CROSS(DIFF,DEA);
 MTR:=EXPMEMA(MAX(MAX(H-L,ABS(H-REF(C,1))),ABS(REF(C,1)-L)),14);
 HD:=H-REF(H,1);
 LD:=REF(L,1)-L;
 DMP:=EXPMEMA(IF((HD>0) AND (HD>LD),HD,0),14);
 DMM:=EXPMEMA(IF((LD>0) AND (LD>HD),LD,0),14);
 PDI:=(DMP*100)/MTR;
 MDI:=(DMM*100)/MTR;
 ADX:=EXPMEMA(((ABS(MDI-PDI))/(MDI+PDI))*100,6);
 ADXR:=EXPMEMA(ADX,6);
 X1:=MAX(C,O);
 X2:=MIN(C,O);
 X:=((REF(C>O,2)) AND (REF(X1,2)>=HHV(X1,2))) AND (REF(X2,2)<=LLV(X2,2));
 B:=BARSLAST(X)+2;
 A:=((REF(X1,B)>=HHV(X1,B)) AND (REF(X2,B)<=LLV(X2,B))) AND (EVERY(V<=REF(V,1),B));
肉夹馍:=(((REF(A,1) AND (C>O)) AND (C>REF(HHV(H,B),1))) AND (V>REF(HHV(V,B),1))) AND (EVERY(MA(C,5)>MA(C,10),B+1));
平台起飞:IF(((LAST(((H-L)/REF(C,1))<0.1,5,0)) AND (VOL>(REF(VOL,1)*2))) AND (C>(REF(C,1)*1.05)),1,DRAWNULL),NODRAW,COLOR6060A0;
 NH:=18;
 LV:=LLV(L,NH);
 HV:=HHV(H,NH);
 MAV:=MA(V,3);
横盘:=((HV-LV)/NH)<0.15;
放量1:=V>=(1.8*MAV);
今天大阳:=((C-REF(C,1))/REF(C,1))>=0.05;
启动:IF((横盘 AND 放量1) AND 今天大阳,1,DRAWNULL),NODRAW,COLOR4080FF;
 A☆:=DMA(((H+L)+(C*2))/4,0.9);
 B☆:=VOL/(((H-L)*2)-(ABS(C-O)));
 C☆☆:=(IF(C>O,B☆*(H-L),IF(CO,0-(B☆*((H-C)+(O-L))),IF(C  A☆☆:=(C☆☆/20)/1.15;
攻击流量:=((A☆☆*0.618)+(REF(A☆☆,1)*0.382))+(REF("HSL.HSL",2)*0.168);
 B☆☆:=EMA(攻击流量,3);
流量:=IF(B☆☆>REF(B☆☆,1),1,0);
 AA☆:=((MAX(C,O)-MIN(C,O))/MIN(C,O))<0.00618;
 BB☆:=((H-MAX(C,O))/MAX(C,O))>0.00382;
 DD☆:=((MIN(C,O)-L)/L)>0.00382;
 EE☆:=((ABS(BB☆-DD☆))/C)<0.00618;
星☆星:=((AA☆ AND BB☆) AND DD☆) AND EE☆;
星线选:=((((星☆星=1) AND (流量=1)) AND (C>O)) AND ((ABS((C-MA(C,20))/MA(C,20)))>0.0382)) AND ((H-MAX(C,O))<=(MIN(C,O)-L));
星线确认:IF(((IF((REF(星线选,1)=1) AND (C>=REF(C,1)),1,0)) AND (C>O)) AND (((C-REF(C,1))/REF(C,1))>0.00618),1,DRAWNULL),NODRAW,COLORFF3399;
一阳穿三线:IF(((((CROSS(PDI,MDI) AND CROSS(PDI,ADX)) AND CROSS(PDI,ADXR)) AND (C>OPEN)) AND ((C/REF(C,1))>0.5)) AND (VOL>(MA(VOL,5)*1.5)),1,DRAWNULL),NODRAW,COLOR800080;
 T31:=(REF(C,1)/REF(C,2))>=1.095;
 T32:=(O>REF(C,1)) AND (C>O);
 T33:=((H>C) AND (O>L)) AND (L>=REF(C,1));
 T34:=V>REF(V,1);
涨停螺旋:IF(((T31 AND T32) AND T33) AND T34,1,DRAWNULL),NODRAW,COLOR002080;
 RSV:=((C-LLV(L,9))/(HHV(H,9)-LLV(L,9)))*100;
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);
 J:=(3*K)-(2*D);
 KD金叉:=CROSS(K,D);
 A1B:=EMA(((L+H)+(C*2))/4,14);
 A1XB:=((A1B-REF(A1B,1))/REF(A1B,1))*100;
出击B:=IF((A1XB>=0) AND (BARSLAST(CROSS(A1XB,0))>0),REF((C+O)/2,BARSLAST(CROSS(A1XB,0))),DRAWNULL);
出击B金叉:=CROSS(出击B,0);
 WMTM:=C-REF(C,12);
动量金叉:=CROSS(WMTM,0);
 VAR1:=(C>REF(C,1)) AND (C>REF(C,2));
 VAR2:=(REF(VAR1,1) AND (C<=REF(C,1))) AND (C>=REF(C,2));
 VAR3:=(REF(VAR2,1) AND (C>=REF(C,1))) AND (C<=REF(C,2));
 VAR4:=(REF(VAR3,1) AND (C<=REF(C,1))) AND (C>=REF(C,2));
 VAR5:=(REF(VAR4,1) AND (C>=REF(C,1))) AND (C<=REF(C,2));
 VAR6:=(REF(VAR5,1) AND (C<=REF(C,1))) AND (C>=REF(C,2));
 VAR7:=(REF(VAR6,1) AND (C>=REF(C,1))) AND (C<=REF(C,2));
 VAR8:=(REF(VAR7,1) AND (C<=REF(C,1))) AND (C>=REF(C,2));
 VAR9:=(REF(VAR8,1) AND (C>=REF(C,1))) AND (C<=REF(C,2));
 VARA:=(REF(VAR9,1) AND (C<=REF(C,1))) AND (C>=REF(C,2));
 VARB:=(REF(VARA,1) AND (C>=REF(C,1))) AND (C<=REF(C,2));
 VARC:=(REF(VARB,1) AND (C<=REF(C,1))) AND (C>=REF(C,2));
 VARD:=(C  VARE:=(REF(VARD,1) AND (C>=REF(C,1))) AND (C<=REF(C,2));
 VARF:=(REF(VARE,1) AND (C<=REF(C,1))) AND (C>=REF(C,2));
 VAR10:=(REF(VARF,1) AND (C>=REF(C,1))) AND (C<=REF(C,2));
 VAR11:=(REF(VAR10,1) AND (C<=REF(C,1))) AND (C>=REF(C,2));
 VAR12:=(REF(VAR11,1) AND (C>=REF(C,1)