通达信吸筹抄底逃顶未加密选股指标公式源码

源码正文：

N:=9{XG51};
M1:=3{XG51};
M2:=3{XG51};
P:=9{XG51};
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100{XG51};
K:=SMA(RSV,M1,1),COLORWHITE,LINETHICK2{XG51};
D:=Sma(K,M2,1),COLOR00FF00{XG51};
JJ:=P*(3*D-2*K),COLOR00FF00{XG51};
J:=((3 * K) - (2 * D)){XG51};
MAIRU:= crOSS(K,D) AND K<20{XG51};
MAICHU:= CROSS(D,K) AND D>80{XG51};
VAR2:=REF(LOW,1){XG51};
VAR3:=SMA(Abs(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100{XG51};
VAR4:=ema(IF(CLOSE*1.3,VAR3*10,VAR3/10),3){XG51};
VAR5:=LLV(LOW,13){XG51};
VAR6:=HHV(VAR4,13){XG51};
VAR7:=IF(MA(CLOSE,34),1,0){XG51};
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7{XG51};
VAR9:=IF(VAR8>100,100,VAR8){XG51};
吸筹:VAR9,LINETHICK1,COLORWHITE{XG51};
stICKLINE(VAR9>-120,0,VAR9,8,-1),COLORLICYAN{XG51};
短线:(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,COLORLIMAGENTA,LINETHICK2{XG51};
中线:SMA(短线,M1,1),COLORBLUE{XG51};
长线:SMA(中线,M2,1),COLORLIGREEN{XG51};
超强吸筹:IF(BArslAST(CROSS(中线,长线))<P AND CROSS(中线,长线) AND 中线<20,90,DRAWNULL),STICK,COLORFF937F{XG51};
STICKLINE(超强吸筹,0,90,3,1),COLORFF937F{XG51};
BB:=IF(BARSLAST(CROSS(中线,短线))>=3 AND CROSS(短线,中线) AND 中线<30,20,0){XG51};
STICKLINE(BB,0,20,4,1),COLORBLUE{XG51};
DRAWICON(BB>0,10,1){XG51};
AA:=IF(BARSLAST(CROSS(短线,中线))>=4 AND CROSS(中线,短线) AND 短线>50,20,0){XG51};
STICKLINE(AA,80,100,4,1),COLORRED{XG51};
DRAWICON(AA>0,90,2){XG51};
买进:IF(CROSS(J,0) AND C>REF(C,1),8,0),COLORBLUE {XG51};
低位区翻红买进:IF(J<5 AND J>REF(J,1) AND C>REF(C,1),16,0),COLORWHITE{XG51};
X:=LLV(J,2)=LLV(J,8){XG51};
不涨二次全仓:IF(CROSS(J,REF(J+0.01,1)) AND X AND J<10 AND C>REF(C,1),24,0),COLORYELLOW{XG51};
火焰抄底:IF(REF(COUNT(K<REF(K,1),5)>=5,1) AND COUNT(K<30,5)>=2 AND COUNT(J<0,3)>0
AND CROSS(J,0),10,0),COLORRED{XG51};
J1:=C<REF(C,1) AND REF(C,1)<REF(C,2) AND REF(C,2)<REF(C,3){XG51};
J2:=J>REF(J,1){XG51};
抄底:IF(J1 AND J2,10,0),COLORCYAN;
bias1:=(C-MA(C,6))/MA(C,6)*100{XG51};
BIAS2:=(C-MA(C,12))/MA(C,12)*100{XG51};
BIAS3:=(C-MA(C,24))/MA(C,24)*100{XG51};
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6{XG51};
乖离:=MA(BIAS,3){XG51};
极品底:IF(CROSS(BIAS,乖离) AND 乖离<-9,10,0),LINETHICK0,COLORWHITE{XG51};
STICKLINE(CROSS(BIAS,乖离) AND 乖离<-9,50,0,1,0),COLORWHITE{X~G_5!1~C~N~{};

源码正文：

XG:HHV(H,480),DOTLINE,COLORGREEN{XG51};
stICKLINE(FILTER(crOSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.995,C,1,0),COLORmaGENTA{XG51};
DRAWTEXT(FILTER(CROSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.995,'突'),COLORBLUE{XG51};
RQ:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1{XG51};
JY:=BArslAST((RQ-REF(RQ,1))!=WEEkdAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1{XG51};
MA1:=REF(C,JY){XG51};
MA2:=REF(MA1,JY){XG51};
MA3:=REF(MA2,JY){XG51};
MA4:=REF(MA3,JY){XG51};
MA5:=REF(MA4,JY){XG51};
MA6:=REF(MA5,JY){XG51};
MA7:=REF(MA6,JY){XG51};
MA8:=REF(MA7,JY){XG51};
MA9:=REF(MA8,JY){XG51};
H1:=MAX(DYnaINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:L1+P1*8/9,COLORLICYAN,DOTLINE;
支撑:L1+P1*0.5/9,COLORCYAN,DOTLINE{XG51};
均线:IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(vol*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORBLUE,DOTLINE{XG51};
dif:=(ema(CLOSE,12)-EMA(CLOSE,26))+DYNAINFO(3){XG51};
DEA:=EMA(DIF,9){XG51};
macd1:=10*(DIF-DEA){XG51};
MacD2:=EMA(MACD1,2){XG51};
STICKLINE(MACD1>=MACD2 AND MACD1>=0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORBLACK{XG51};
STICKLINE(MACD1<MACD2 AND MACD1>0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORLIRED{XG51};
STICKLINE(MACD1>=MACD2 AND MACD1<0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORBLACK{XG51};
STICKLINE(MACD1<MACD2 AND MACD1<0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORLIBLUE{XG51};
XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE)){XG51};
主力:=expma(CLOSE/XX,20);大户:=EXPMA(CLOSE/XX,60);散户:=EXPMA(CLOSE/XX,120){XG51};
底:=1;1.022,NODRAW;高:=1.033{XG51};
DRAWTEXT(CROSS(主力,1.02),C*0.999,' 拉'),COLORLIMAGENTA{XG51};
DRAWICON(CROSS(主力,1.04),C,26){XG51};
DRAWTEXT(CROSS(主力,1.04),C*0.999,' 冲'),COLORWHITE{XG51};
A1:=(VOL/CLOSE)/3{XG51};
A2:=SUM((IF(((A1>40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0){XG51};
A3:=SUM((IF(((A1>40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0){XG51};
A4:=SUM((IF(((A1<40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0){XG51};
A5:=SUM((IF(((A1<40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0){XG51};
A6:=((A2+A3)+A4)+A5{XG51};
A7:=IF((BARSTATUS=2),((100*A2)/A6),0){XG51};
A8:=((IF((BARSTATUS=2),((100*A3)/A6),0))){XG51};
A9:=((IF((BARSTATUS=2),((100*A4)/A6),0))){XG51};
A10:=((IF((BARSTATUS=2),((100*A5)/A6),0))){XG51};
DRAWTEXT(LONGCROSS(支撑,C,2),C-0.01,' 买'),COLORBLUE{XG51};
DRAWICON(LONGCROSS(支撑,C,2),C-0.01,23){XG51};
STICKLINE(LONGCROSS(支撑,C,2),C,阻力,0,-1),COLORGREEN{XG51};
DRAWTEXT(LONGCROSS(C,阻力,2),C+0.01,' 卖'),COLORCYAN{XG51};
DRAWICON(LONGCROSS(C,阻力,2),C+0.01,15){XG51};
STICKLINE(LONGCROSS(C,阻力,2),C,支撑,0,-1),COLORWHITE{XG51};
量价:=(VOL/CLOSE)/3{XG51};
B2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0){XG51};
B3:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0){XG51};
B6:=B2+B3;DD1:=1;比:=B2/B3{XG51};
D1:=YEAR AND MONTH AND DAY{XG51};
BA1:=STRCAT(CON2STR(YEAR,0),'年'){XG51};
BA2:=STRCAT(CON2STR(MONTH,0),'月'){XG51};
BA3:=STRCAT(CON2STR(DAY,0),'日'){XG51};
BA4:=STRCAT('星期',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));
AA:=STRCAT(STRCAT(STRCAT(BA1,BA2),STRCAT(BA3,BA4)),''){XG51};
DRAWTEXT_FIX(D1,0.905,0,0,AA),COLORBROWN{XG51};
WA1:=V*C/100{XG51};
WA2:=SUM((IF(((WA1/8>20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0){XG51};
WA3:=SUM((IF(((WA1/8>20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0){XG51};
WA4:=SUM((IF(((WA1/8<20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0){XG51};
WA5:=SUM((IF(((WA1/8<20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0){XG51};
WA6:=((A2+A3)+A4)+A5{XG51};
WA7:=IF((ISLASTBAR),((100*WA2)/WA6),0){XG51};
WA8:=IF((ISLASTBAR),((100*WA3)/WA6),0){XG51};
WA9:=IF((ISLASTBAR),((100*WA4)/WA6),0){XG51};
WA10:=IF((ISLASTBAR),((100*WA5)/WA6),0){XG51};
机构买盘:=(WA2){XG51};
机构卖盘:=(WA3){XG51};
散户买盘:=(WA4){XG51};
散户卖盘:=(WA5){XG51};
DRAWTEXT_FIX(1,0.752,1-0.088,0,STRCAT(STRCAT('【机构买盘】',CON2STR(机构买盘,2)),' 万')),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.752,1-0.001,0,STRCAT(STRCAT('【机构卖盘】',CON2STR(机构卖盘,2)),' 万')),COLORCYAN{XG51};
DRAWTEXT_FIX(1,0.883,1-0.088,0,STRCAT(STRCAT('【散户买盘】',CON2STR(散户买盘,2)),' 万')),COLORLIMAGENTA{XG51};
DRAWTEXT_FIX(1,0.883,1-0.001,0,STRCAT(STRCAT('【散户卖盘】',CON2STR(散户卖盘,2)),' 万')),COLORGREEN{X-G+5*1-C-N-{};