通达信精确找牛选股指标公式源码

通达信精确找牛选股指标公式源码

源码正文：

N:=7;M:=8;N8:=22;P1:=2.8;P2:=3.2;P3:=3.5{XG51};
VAR01:=ema(Ema(CLOSE,9),9){XG51};
控盘:=(VAR01-REF(VAR01,1))/REF(VAR01,1)*10000{XG51};
stICKLINE(控盘<0,控盘,0,2,0),COLORRED{XG51};
AA1:=crOSS(控盘,0){XG51};
轻度控盘:STICKLINE(控盘<0 AND 0.9*控盘>REF(控盘,1),控盘,0,2,0),COLOR0099FF{XG51};
轻度出货:STICKLINE(控盘<0 AND 1.1*控盘<REF(控盘,1),控盘,0,3,0),COLORFF6633;无庄控盘:=IF(控盘<0,控盘,0),COLORCYAN,LINETHICK2{XG51};
开始控盘:=IF(AA1,5,0),LINETHICK1,COLORBLUE{XG51};
有庄控盘:=IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORBLUE,LINETHICK2{XG51};
V1:=AMOUNT/vol/100{XG51};
V2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7{XG51};
V3:=SUM(AMOUNT,7)/V1/100{XG51};
V4:=dma(V2,VOL/V3){XG51};
V5:=(CLOSE-V4)/V4*100{XG51};
V6:=MA(V5,20)+STD(V5,20){XG51};
bias21:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100{XG51};
STICKLINE(REF(BIAS21,1)>=5 AND CROSS(V6,V5) AND REF("kdj.J"(34,3,3),1)>80 AND REF("kdJ.J"(9,3,3),1)>80,100,5,1,0),COLORRED;        
DdifF:=(EMA(CLOSE,12) - EMA(CLOSE,26)){XG51};
ddeA:=EMA(ddiFF,9){XG51};
macd:=500*(DDIFF-DDEA){XG51};
STICKLINE(MacD<0,MACD,0,3,0),COLORYELLOW{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,4,0 ),COLOR006600{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,4 ,0 ),COLOR0000AA{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,3.3 ,0 ),COLOR0011BB{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),COLOR0022CC;  
0,COLORRED{XG51};
VAR1:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*1000+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*1000+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*1000)/3{XG51};
持币区域:VAR1,COLORCYAN,LINETHICK3{XG51};
持股区域:IF(VAR1>0,VAR1,0),COLORFF00FF,LINETHICK3{XG51};
短顶:VAR1>9 AND FILTER(VAR1<REF(VAR1,1),5),COLORCYAN{XG51};
大顶:VAR1>20 AND FILTER(VAR1<REF(VAR1,1),5),COLOR00FF00{XG51};
VAR2:=HHV(VAR1>20,10);
危险: VAR2 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+20*STD(CLOSE,20));
注意止损:VAR2 AND FILTER(VAR1< REF(VAR1,1),6)
AND CROSS(MA(CLOSE,5),MA(CLOSE,2)){XG51};
短底:=VAR1<-9 AND VAR1> REF(VAR1,1),COLORWHITE{XG51};
大底:VAR1<-20 AND FILTER(VAR1> REF(VAR1,1),5),COLORBLUE{XG51};
买入准备:=VAR1<-9 AND VAR1>REF(VAR1,1),COLORRED;
DRAWTEXT(VAR1>9 AND FILTER(VAR1<REF(VAR1,1),5),VAR1+20,'高'),COLORRED{XG51};
DRAWTEXT(VAR1>20 AND FILTER(VAR1<REF(VAR1,1),5),VAR1+30,'顶'),COLORFFFF00{XG51};
DRAWTEXT(VAR2 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),VAR1+45,'危险'),COLOR00FFFF{XG51};
DRAWTEXT(VAR2 AND FILTER(VAR1< REF(VAR1,1),6) AND CROSS(MA(CLOSE,5),MA(CLOSE,2)),VAR1+40,'注意止损'),COLORFF00FF{XG51};
DRAWTEXT(VAR1<-20 AND FILTER(VAR1> REF(VAR1,1),5),VAR1-5,''); 主力追踪:=3*SMA((C-LLV(L,13))/(HHV(H,13)-LLV(L,13))*100,5,1)-2*SMA(SMA((C-LLV(L,13))/(HHV(H,13)-LLV(L,13))*100,5,1),3,1)COLORGREEN,LINETHICK2{XG51};
主力拉高出逃:IF(主力追踪>=90,70,100),COLORRED{XG51};
VAR100:4*SMA((CLOSE-LLV(LOW,N8))/(HHV(HIGH,N8)-LLV(LOW,N8))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,N8))/(HHV(HIGH,N8)-LLV(LOW,N8))*100,5,1),3.2,1),COLORRED,LINETHICK2{XG51};
VARO5:=LLV(LOW,27);
VARO6:=HHV(HIGH,34);
VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25;
IF(VAR100>REF(VAR100,1),VAR100,DRAWNULL),COLORWHITE,LINETHICK4{XG51};
IF(VAR100<REF(VAR100,1),VAR100,DRAWNULL),COLORCYAN,LINETHICK2;VAR010:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*80{XG51};
B:=SMA(VAR010,N,1){XG51};
VAR020:=SMA(B,M,1){XG51};
VAR1F:=((CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20)))*(100){XG51};
VAR21:=SMA(VAR1F,3,1){XG51};
CCD:=SMA(VAR21,3,1),COLOR0000FF,LINETHICK2{XG51};
CCC:=SMA(CCD,3,1),COLORBLUE,LINETHICK2{XG51};
FALCON:=IF(CROSS(CCD,CCC) AND (CCD<30),20,0),COLOR0000FF,LINETHICK2{XG51};
黑马:IF(CROSS(B,VAR020) AND B<65 AND CLOSE>OPEN AND FALCON AND (C/REF(C,1))>0.5,50,0)STICK,LINETHICK3,COLORBLUE{XG51};
VAR001:=1;     VAR002:=LLV(LOW,10);         VAR003:=HHV(HIGH,25){XG51};
警戒线:= P1*VAR001{XG51};
减仓线:= P2*VAR001{XG51};
卖出线:= P3*VAR001{XG51};
动力线:= EMA((CLOSE-VAR002)/(VAR003-VAR002)*4,4)*VAR001{XG51};
DRAWTEXT(CROSS(动力线,警戒线),120,'警惕'),COLORRED{XG51};
DRAWTEXT(CROSS(动力线,卖出线),180,'出局');  DRAWTEXT(CROSS(动力线,减仓线),150,'◤逢高减磅')COLORCYAN;
MACD1:=2*(DDIFF-DDEA)*300,COLORWHITE,LINETHICK1;   MACD2:=MA(MACD1,3){XG51};
MACDL:=HHV(MACD2,13){XG51};
STICKLINE(MACDL<MACD1,MACD1,MACD2,3,0),COLORBLUE;      
LCAA:=REF(CLOSE,1){XG51};
rsiA:=((SMA(MAX((CLOSE - LCAA),0),3,1) / SMA(Abs((CLOSE - LCAA)),3,1)) * 100){XG51};
LC6:=REF(CLOSE,1){XG51};
RSI:=SMA(MAX(CLOSE-LC6,0),6,1)/SMA(ABS(CLOSE-LC6),6,1)*100{XG51};
DRAWTEXT(CROSS(84,RSI) , HIGH*6,'◤逃顶')COLORCYAN;       DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26){XG51};
DEA:=EMA(DIFF,8){XG51};
A1:=BArslAST(REF(CROSS(DIFF,DEA),1)){XG51};
B12:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA){XG51};
DRAWTEXT((H-C)/REF(C,1)>0.03  AND H=HHV(H,21),H*5,'◤快跑')COLORGREEN;个股:EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3),COLOR1010FF;短线反弹:IF(CROSS(个股,9),50,0),STICK,LINETHICK3,COLORWHITE{XG51};
DRAWTEXT(CROSS(个股,9),50,'反弹'),COLORBLUE;

{X=G*5=1=C=N={}