通达信买脉加仓主图选股指标公式源码

通达信买脉加仓主图选股指标公式源码

源码正文：

ma5:MA(CLOSE,5){XG51};
MA10:MA(CLOSE,10){XG51};
MA20:MA(CLOSE,20){XG51};
MA60:MA(CLOSE,60){XG51};
BB:=REF(INDEXC,1)<REF(INDEXC,2) AND REF(C,2)*0.95>=REF(C,1) AND REF(O,1)/REF(C,1)>=1.05
AND REF(C,1)<REF(O,1) AND C>O AND C/O>=1.05 AND C>REF(O,1)
AND REF(vol,1)<REF(VOL,2){XG51};
stICKLINE(BB,O,C,4,0),COLORWHITE{XG51};
STICKLINE(BB,O,H,0,0),COLORWHITE{XG51};
STICKLINE(BB,L,C,0,0),COLORWHITE{XG51};
DRAWTEXT(BB,L*0.95,'追！'),COLORBLUE{XG51};
VAR1:=4*SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1),3.2,1){XG51};
VAR2:=8;
CC:=crOSS(VAR1,VAR2);
DRAWTEXT(CC,L*0.95,'买！'),COLOR0099FF{XG51};
TYP:=(H+L+C)/3{XG51};
TYP1:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14))<=20 AND REF(MA(C,21),1)<MA(C,21){XG51};
TJ1:=O<MAX(REF(C,1),REF(O,1)){XG51};
TJ2:=REF(C,1)>=MA(C,21) AND L/MA(C,21)>=1.015 AND MA(C,144)>MA(C,250) AND V<MA(V,10) AND MIN(REF(V,2),REF(V,1))>V{XG51};
TJ3:=REF(MA(C,250),90)<REF(MA(C,144),90) AND MA(C,144)>MA(C,250) AND O>MA(C,250){XG51};
TJ4:=MAX(REF(H,10)AND REF(H,9)AND REF(H,8)AND REF(H,7), REF(H,6)){XG51};
TOUJI:=TYP1 AND TJ1 AND TJ2 AND REF(C,2)/REF(O,2)<1.06 AND C/O<=1.05 AND HHV(H,5)/LLV(L,30)>=1.65 AND REF(H,5)/REF(L,1)>=1.15 AND REF(C,1)/REF(O,1)<=0.995 AND (L<REF(L,2) OR (REF(H,2)-REF(L,2))/(H-L)>=2) AND O/REF(L,1)<=1.04
OR TYP1 AND TJ1 AND O/REF(L,1)<1.05 AND REF(L,1)/REF(O,4)<=0.85 AND REF(C,1)/REF(O,1)<=1.03 AND O<REF(C,1) AND HHV(H,5)/LLV(L,35)>1.35 AND V<MA(V,10){XG51};
TOUJI2:=TYP1 AND TJ1 AND TJ2 AND O/REF(L,1)<1.05 AND O/LLV(L,3)<1.1 AND REF(C,1)/REF(0,1)<=1.05 AND HHV(H,4)/LLV(L,16)>=1.35 AND REF(O,4)/REF(C,2)>=1.08 AND REF(C,2)/REF(O,2)<=0.995 AND (REF(L,2)<REF(L,3) OR (REF(H,3)-REF(L,3))/(REF(H,1)-REF(L,1))>=2) AND L<MIN(REF(C,1),REF(O,1))
OR TYP1 AND TJ1 AND HHV(H,10)/LLV(L,25)>=1.3 AND REF(C,5)<REF(H,5) AND REF(C,4)<REF(C,5) AND REF(C,3)<REF(C,4) AND REF(C,2)<REF(C,3) AND REF(C,1)<REF(C,2) AND L<REF(L,1) AND MA5/O<1.1{XG51};
DATOUJI:=TYP1 AND TJ3 AND O<REF(C,5) AND O<=REF(C,1) AND REF(H,10)/O>=1.17 AND HHV(H,10)/LLV(L,30)>1.4 AND (MA(V,10)/HHV(V,10)>0.5 AND V/HHV(V,10)>0.2 AND V/HHV(V,10)<0.4 OR REF(V,3)>REF(V,2) AND REF(V,2)>REF(V,1)) AND REF(C,1)/REF(C,2)<=1.02{XG51};
DATOUJI1:=TYP1 AND TJ3 AND O<REF(L,6) AND O<MIN(REF(C,5)AND REF(O,5),5) {XG51};
DRAWTEXT(TOUJI OR TOUJI2 OR DATOUJI OR DATOUJI1,L*0.98,'△'),COLORBLUE{XG51};
DRAWTEXT(CROSS(MA(VOL,10),MA(VOL,20)) AND MA(VOL,5)>MA(VOL,10) AND L<MA(C,20) AND C>=MA(C,20),L*0.98,'量托'),COLORRED{XG51};
卖出:=CROSS(90,SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(Abs(CLOSE-REF(CLOSE,1)),6,1)*100){XG51};
DRAWTEXT(卖出,H*1.05,'短卖'),COLORCYAN{XG51};
C3:=REF(C,1){XG51};
涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0){XG51};
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORWHITE{XG51};
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0){XG51};
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORCYAN{XG51};
W1:=C=HHV(C,20);
W2:=BArslAST(W1);
W3:=IF(W2>0,REF(C,W2),REF(C,W2));
W4:=CROSS(C,REF(W3,1));
突破盘整:=W4 AND COUNT(W4,5)=1;
DRAWICON(突破盘整,L-0.10,1){XG51};
红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORBLUE{XG51};
绿轨道:=MA(MA(CLOSE,3),3){XG51};
上升:IF(红轨道>=绿轨道,绿轨道,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
AA1:=3*SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1)-2*SMA(SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1),3,1){XG51};
加仓:=IF(CROSS(AA1,REF(AA1+0.01,1)) AND LLV(AA1,2)=LLV(AA1,8) AND BETWEEN(AA1,20,60),1,0){XG51};
波段底:=(3)*(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1)) -
(2)*(SMA(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1),3,1)){XG51};
DRAWICON(加仓,L*0.97,7){XG51};
DRAWICON(CROSS(波段底,3),L*0.97,1){XG51};
A:=(3*C+L+O+H)/6{XG51};
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210{XG51};
mtm:=C-REF(C,1){XG51};
DX:=100*ema(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6){XG51};
CB:=EMA(X,13){XG51};
卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0){XG51};
DRAWTEXT(FILTER(卖=1,1),HIGH*1.02,'卖'),COLORRED{XG51};
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
DRAWTEXT(FILTER(买=1,5),LOW-0.03,'买'),COLORWHITE{XG51};
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
BDGD:=HHV(J,2)=HHV(J,8) AND J>80{XG51};
注意:=IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),1,0){XG51};
DRAWTEXT(注意 AND 卖!=1,HIGH*1.02,'减'),COLORFFFF50{XG51};
加仓A:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10{XG51};
DRAWTEXT(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,CB)) AND 买!=1,3),LOW-0.03,'加'),COLOR0080FF{XG51};
MA18:=MA(C,18){XG51};
跟:=IF(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),1,0){XG51};
DRAWTEXT(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),LOW*0.96,'跟'),COLOR7F52AF{XG51};
买价:=((C-REF(MA5,1))/5+MA5)*1.004;  
买条件:=CROSS(C,买价) AND 买价>REF(买价,1);  
醉白K买进:IF(买条件,L,H),COLORRED,POINTDOT;  
STICKLINE(买条件,H,L,0,1),COLORRED,LINETHICK2;  
STICKLINE(买条件,O,C,4,1),COLORRED,LINETHICK2;  
加码价:=((C-REF(MA10,1))/20+MA10)*1.004;  
加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);  
醉黄K加码:IF(加码条件,L,H),COLORBLUE,POINTDOT;  
STICKLINE(加码条件,H,L,0,1),COLORBLUE,LINETHICK2;  
STICKLINE(加码条件,O,C,4,1),COLORBLUE,LINETHICK2{X?G^5-1?C?N?{};