{百法百中}
Var7:=MA(INDEXC,62)[Var8:=MA(INDEXC,32)>MA(INDEXC,6)*1.11 AND MA(INDEXC,24)>MA(INDEXC,6)*1.095;
]
Var9:=MA(INDEXC,6)>INDEXC*0.95;
VarA:=H>L*1.078 AND COUNT(H>L*1.078,4)>2;
百法百中:VarA AND (C/MA(C,48)*100<67 OR C/MA(C,50)*100<69) OR Var7 AND Var8 AND Var9 AND C/COST(8)<=0.8 AND COUNT(c=o,2)=0;
{抄底高手}
Var1:=(C-MA(C,48))/MA(C,48)*100<-30 AND (C-MA(C,70))/MA(C,70)*100<-27 AND COUNT((C-MA(C,48))/MA(C,48)*100<-30 AND (C-MA(C,70))/MA(C,70)*100<-27,2)=1 AND (O-REF(C,1))/REF(C,1)>-0.07 and COUNT(c=o,6)=0;
Var2:=(C-DMA(EMA(C,8),SUM(V,9)/2.8/CAPITAL))/DMA(EMA(C,8),SUM(V,9)/2.8/CAPITAL)*100;
Var3:=REF(Var2,1)<-42 AND Var2>REF(Var2,1) AND REF(Var2,1)[1.8;
]
抄底高手:(Var1 OR Var3);
{乘勝追擊}
Var4:=(WINNER(C)-WINNER(O))>=0.3 AND MA(V,6)/MA(V,26)>=1.9 AND V>REF(V,1) AND COUNT(SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100<20,20)>=1 AND C/MA(C,3)>=1.07;
Var5:=(WINNER(C)-WINNER(O))>=0.4 AND MA(V,8)/MA(V,45)>=2.5 AND COUNT(SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100<20,20)>=1 AND C/MA(C,3)>=1.05 AND C>MA(C,85) AND V>REF(V,1);
乘勝追擊:(Var4 OR Var5);
{短線黑馬}
Varb:=(C-DMA(C,V/MA(V,4)/4))/DMA(C,V/MA(V,4)/4)*100<-11 AND (DMA(C,V/MA(V,4)/4)-DMA(C,V/MA(V,33)/33))/DMA(C,V/MA(V,33)/33)*100<-22.3 AND (O-REF(C,1))/REF(C,1)>-0.07 and COUNT(c=o,8)=0;
Varc:=(C-DMA(CLOSE,VOL/MA(VOL,3)/3))/DMA(CLOSE,VOL/MA(VOL,3)/3)*100<-5;
Vard:=(DMA(CLOSE,VOL/MA(VOL,3)/3)-DMA(C,V/MA(V,33)/33))/DMA(C,V/MA(V,33)/33)*100<-18;
Vare:=Varc AND Vard AND (O-REF(C,1))/REF(C,1)>-0.05 AND COUNT(c=o,2)=0 AND SMA(SMA((INDEXC-LLV(INDEXL,250))/(HHV(INDEXH,250)-LLV(INDEXL,250))*100,30,1),50,1)<20;
短線黑馬:(Varb OR Vare AND COUNT(Vare,2)=1);
{逆勢買入}
Varf:=(C-DMA(C,V/MA(V,4)/4))/DMA(C,V/MA(V,4)/4)*100<-8 AND (DMA(C,V/MA(V,4)/4)-DMA(C,V/MA(V,32)/32))/DMA(C,V/MA(V,32)/32)*100<-21 AND (O-REF(C,1))/REF(C,1)>-0.05 and COUNT(c=o,8)=0;
Var10:=SMA(SMA((INDEXC-LLV(INDEXL,275))/(HHV(INDEXH,275)-LLV(INDEXL,275))*100,50,1),40,1);
Var11:=(C-MA(C,70))/MA(C,70)*100<-23 AND Var10<23 AND COUNT((C-MA(C,70))/MA(C,70)*100<-23,2)=1 AND (O>C OR O0.96;
逆勢買入:(Varf OR Var11);
{牛市專利}
Var12:=(C-MIN(REF(C,3)*0.844,REF(C,13)*0.767))/C<0.07 AND SUM(100*V/CAPITAL,3)/3<2.345 AND INDEXC>MA(INDEXC,450) AND MA(INDEXV,61)/MA(INDEXV,80)>0.923 AND C>MA(C,190);
Var13:=INDEXC>MA(INDEXC,450) AND (C-MA(C,20))/MA(C,20)*100<-16.5 AND MA(INDEXV,61)/MA(INDEXV,80)>0.92
AND C>MA(C,215) AND V/CAPITAL<0.075 and COUNT(c=o,5)=0;
牛市專利:(Var12 OR Var13) AND HHV(C,440)/LLV(C,440)<4;
{市場赢家}
Var14:=H>L*1.053 AND COUNT(H>L*1.053,5)>2 AND (C/MA(C,30)*100<75 OR C/MA(C,50)*100<78);
Var15:=DMA(EMA(C,5),SUM(V,8)/2.8/CAPITAL);
市場赢家:REF((C-Var15)/Var15*100,1)<-34 AND (C-Var15)/Var15*100>REF((C-Var15)/Var15*100,1) AND REF((C-Var15)/Var15*100,1)[1.76 OR Var14;
]
{順勢搭轎}
順勢搭轎:(C-MA(C,48))/MA(C,48)*100<-28 AND SMA(MAX(C-REF(C,1),0),12,1)/SMA(ABS(C-REF(C,1)),12,1)*100>23 AND VOL>MA(VOL,18) AND COUNT(c=o,6)=0;
{旭日東升}
旭日東升:(C-MA(C,50))/MA(C,50)*100<-23 AND SMA(MAX(C-REF(C,1),0),3,1)/SMA(ABS(C-REF(C,1)),3,1)*100>16 AND CROSS(100*(HHV(H,27)-C)/(HHV(H,27)-LLV(L,27)),79) AND (O>C OR OMA(V,23);
j1:=DYNAINFO(7);
ms:=DYNAINFO(28);
mx1:=DYNAINFO(34);
mx2:=DYNAINFO(35);
zt:ms>0 and (mx1=0 and j1=ms or mx2=0 and mx1>0 and j1=mx1);
{今日漲停——隻要把漲停價後面加上等号就能選股}
CC:=C;XX:=UBOUND(CC);C1:=CC[XX];{取最後價}
GM:=STKNAME;
ST:=STRLEFT(GM,2)='ST' OR STRLEFT(GM,3)='*ST';
昨收:=REF(CC,1);
N:=IF(ST,105,110);
ZTJ:=ROUND(STRTONUM(NUMTOSTR(昨收*N,5)));
漲停價:ZTJ/100,LINETHICK0;
今日漲停:ROUND(C1*100)=ZTJ;
{近期漲停——隻要把漲停與漲停次數後面加上等号就能選股}
INPUT:P1(20,2,100);
CC:=CLOSE;XX:=UBOUND(CC);C1:=CC[XX];{取最後價}C2:=CC[XX-1];
GM:=STKNAME;
ST:=STRLEFT(GM,2)='ST' OR STRLEFT(GM,3)='*ST';{确定ST股}
N:=IF(ST,105,110);
昨收:=REF(CC,1),LINETHICK0;
ZTJ:=昨收*N;
漲停價:=ROUND(ZTJ),LINETHICK0;
今收:=CLOSE,LINETHICK0;
今日漲停:=ROUND(C1*100)=ROUND(C2*N),LINETHICK0;
漲停:ROUND(今收*100)=漲停價;
漲停次數:COUNT(漲停,IF(XX>P1,P1,0));
TJ1:=IF(今日漲停 AND 漲停次數=1,0,1);
TJ2:=漲停次數>0 ,LINETHICK0;
近期漲停:TJ2 AND TJ1;
有話要說...