通达信缠论背弛主图未加密选股指标公式源码

通达信缠论背弛主图未加密选股指标公式源码

源码正文：

SHORT:=7;LONG:=19{XG51};
ma5:MA(CLOSE,5);
MA13:MA(CLOSE,13);
MA21:MA(CLOSE,21);
MA34:MA(CLOSE,34);
MA55:MA(CLOSE,55);
MA89:MA(CLOSE,89);
MA144:MA(CLOSE,144);
MA233:MA(CLOSE,233);
T:=PERIOD{XG51};
D:=IF(T=0,30,
IF(T=1,25,
IF(T=8,25,
IF(T=2,20,
IF(T=3,20,
IF(T=4,20,
IF(T=5,10,
IF(T=6,10,
IF(T=7,10,
IF(T=9,10,
IF(T=10,10,10))))))))))){XG51};
RMA:=ema(CLOSE,SHORT),COLORBLACK{XG51};
NMA:=EMA(CLOSE,LONG),COLORLIMAGENTA{XG51};
RISK:=IF(NMA>RMA,NMA,DRAWNULL),COLORCYAN{XG51};
DRAWLINE(L=LLV(L,BArslAst(crOSS(NMA,RMA))+1) AND L=LLV(L,D) AND RMA<=NMA,L,H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1) AND H=HHV(H,D) AND RMA>=NMA,H,0),COLOR0000FF,LINETHICK2{XG51};
DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1) AND H=HHV(H,D) AND RMA>=NMA,H,L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1) AND L=LLV(L,D) AND RMA<=NMA,L,0),COLOR238E23,LINETHICK2{XG51};
重心线:=(H+L+O+C*3)/6{XG51};
NX:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:=(20*NX+19*REF(NX,1)+18*REF(NX,2)+17*REF(NX,3)+16*REF(NX,4)
+15*REF(NX,5)+14*REF(NX,6)+13*REF(NX,7)+12*REF(NX,8)+11*REF(NX,9)
+10*REF(NX,10)+9*REF(NX,11)+8*REF(NX,12)+7*REF(NX,13)+6*REF(NX,14)
+5*REF(NX,15)+4*REF(NX,16)+3*REF(NX,17)
+2*REF(NX,18)+REF(NX,20))/210{XG51};
牛熊线:=MA(牛线,6){XG51};
简底:=H>REF(H,1) AND REF(H,1)<REF(H,2) AND L>REF(L,1) AND REF(L,1)<REF(L,2){XG51};
简顶:=H<REF(H,1) AND REF(H,1)>REF(H,2) AND L<REF(L,1) AND REF(L,1)>REF(L,2){XG51};
包含1:=REF(H,1)>=REF(H,2) AND REF(L,1)<=REF(L,2){XG51};
包含2:=REF(H,1)<=REF(H,2) AND REF(L,1)>=REF(L,2){XG51};
包底1:=H>REF(H,2) AND REF(H,2)<REF(H,3) AND L>REF(L,1) AND REF(L,1)<REF(L,3){XG51};
包底2:=H>REF(H,1) AND REF(H,1)<REF(H,3) AND L>REF(L,2) AND REF(L,2)<REF(L,3){XG51};
包顶1:=H<REF(H,1) AND REF(H,1)>REF(H,3) AND L<REF(L,2) AND REF(L,2)>REF(L,3){XG51};
包顶2:=H<REF(H,2) AND REF(H,2)>REF(H,3) AND L<REF(L,1) AND REF(L,1)>REF(L,3){XG51};
复底:=IF(包含1,包底1,IF(包含2,包底2,简底)){XG51};
复顶:=IF(包含1,包顶1,IF(包含2,包顶2,简顶)){XG51};
底分型:=IF(BARSLAST(CROSS(牛熊线,重心线))>3,FILTER(BacKSET(FILTER(复底 AND 重心线<牛熊线,3),2),1),0){XG51};
顶分型:=IF(BARSLAST(CROSS(重心线,牛熊线))>3,FILTER(BACKSET(FILTER(复顶 AND 重心线>牛熊线,3),2),1),0){XG51};

局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4){XG51};
局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2){XG51};
局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0){XG51};
局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4){XG51};
局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2){XG51};
局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0){XG51};
缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0)){XG51};
距前高天:=BARSLAST(局部高点预选C=1){XG51};
距前低天:=BARSLAST(局部低点预选C=-1){XG51};
小值周期:=LOwrANGE(L){XG51};
大值周期:=topRANGE(H){XG51};
低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0){XG51};
低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0){XG51};
低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0){XG51};
预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0){XG51};
判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0){XG51};
高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0){XG51};
高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0){XG51};
高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0){XG51};
预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0){XG51};
判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0){XG51};
低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0){XG51};
低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0){XG51};
低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0){XG51};
距前高天A:=BARSLAST(高保留=1){XG51};
距前低天A:=BARSLAST(低保留=-1){XG51};
预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0){XG51};
判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0){XG51};
高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0){XG51};
高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0){XG51};
高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0){XG51};
预判XA:=IF((距前高天A<4 AND HHV(缺口判断,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0){XG51};
判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0){XG51};
低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0){XG51};
低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0){XG51};
低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0){XG51};
距前高天YA:=BARSLAST(高保留X=1){XG51};
距前低天YA:=BARSLAST(低保留X=-1){XG51};
预判YX:=IF((距前低天YA<4 AND HHV(缺口判断,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0){XG51};
判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 预判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0){XG51};
高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0){XG51};
高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判断,距前低天YA)=1),1,0){XG51};
高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0){XG51};
预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0){XG51};
判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0){XG51};
低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0){XG51};
低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0){XG51};
低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0){XG51};
AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0)){XG51};
极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD){XG51};
DRAWICON(极点保留=-1,L*0.96,7){XG51};
DRAWICON(极点保留=1,H*1.04,8){XG51};
DRAWICON(极点保留=-1,LOW,1){XG51};
DRAWICON(极点保留=1,HIGH,2);
difF:=EMA(CLOSE,12) - EMA(CLOSE,26){XG51};
DEA:=EMA(DIFF,8){XG51};
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);
DRAWTEXT(IF(B1>0,1,0),L-0.1,'macd底背'),COLORCYAN{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
A2:=BARSLAST(REF(CROSS(K,D),1));
B2:=REF(C,A2+1)>C AND REF(K,A2+1)<K AND CROSS(K,D);
DRAWTEXT(IF(B2>0,1,0),L-0.25,'kdj底背'),COLORBLUE{XG51};
LC:=REF(CLOSE,1){XG51};
rsi1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100{XG51};
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100{XG51};
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
DRAWTEXT(IF(B3>0,1,0),L-0.4,'RSI底背'){XG51};
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
DRAWTEXT(IF(D1>0,1,0),H+0.1,'MACD顶背'),COLORRED;
C2:=BARSLAST(REF(CROSS(D,K),1));
D2:=REF(C,C2+1)<C AND REF(K,C2+1)>K AND CROSS(D,K);
DRAWTEXT(IF(D2>0,1,0),H+0.25,'kdJ顶背'),COLORRED;
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
DRAWTEXT(IF(D3>0,1,0),H+0.4,'RSI顶背'){XG51};
TMP1:=IF(C>MA5,1,0){XG51};
TMP2:=IF(C>MA13,1,0){XG51};
TMP3:=IF(C>MA21,1,0){XG51};
TMP4:=IF(C>MA34,1,0){XG51};
TMP5:=IF(C>MA55,1,0){XG51};
TMP6:=IF(C>MA89,1,0){XG51};
TMP7:=IF(C>MA144,1,0){XG51};
TMP8:=IF(C>MA233,1,0){XG51};
类别:TMP1+TMP2+TMP3+TMP4+TMP5+TMP6+TMP7+TMP8+1,NODRAW{XG51};
{X*G!5~1*C*N*{};

通达信量价擒庄未加密选股指标公式源码

源码正文：

VV:=vol/10000{XG51};
VV*10,VOLstICK{XG51};
重心:=(2*C+H+L)/4{XG51};
YC:=(重心+c*10)/11{XG51};
jc:=(重心-REF(重心,1)+c-ref(c,1)+2*(c-重心))/4{XG51};
obv:=SUM(IF(jC>0,vv,IF(jC<0,-vv,0)),63),COLORRED{XG51};
obv2:=ema(obv,2){XG51};
obv3:=Ema(obv,3){XG51};
obv4:=EMA(obv,4){XG51};
obv5:=EMA(obv,5){XG51};
obv6:=EMA(obv,6){XG51};
obv7:=EMA(obv,7){XG51};
obv8:=EMA(obv,8){XG51};
obv9:=EMA(obv,9){XG51};
obv10:=EMA(obv,10){XG51};
obvj:=(obv2+obv3+obv4+obv5+obv6+obv7+obv8+obv9+obv10)/9{XG51};
Dobv:=MAX(obv2,MAX(obv3,MAX(obv4,MAX(obv5,MAX(obv6,MAX(obv7,MAX(obv8,MAX(obv9,obv10)))))))){XG51};
Xobv:=MIN(obv2,MIN(obv3,MIN(obv4,MIN(obv5,MIN(obv6,MIN(obv7,MIN(obv8,MIN(obv9,obv10)))))))){XG51};
obvB:EMA(((obvj+2*Dobv)/3+(Xobv+5*Dobv)/6)/2,1),COLORRED,LINETHICK1{XG51};
Gv1:=HHV(ema(obv,6),18){XG51};
Gv2:=HHV(ema(obv,9),27){XG51};
Gv3:=HHV(ema(obv,12),36){XG51};
Gv4:=HHV(ema(obv,15),45){XG51};
Gv5:=HHV(ema(obv,18),54){XG51};
Gv6:=HHV(ema(obv,21),63){XG51};
Gv7:=HHV(ema(obv,24),72){XG51};
Gv8:=HHV(ema(obv,27),81){XG51};
Gv9:=HHV(ema(obv,30),90){XG51};
XGv:=(Gv1+Gv2+Gv3+Gv4+Gv5+Gv6+Gv7+Gv8+Gv9)/9{XG51};
马线:((Gv1+Gv2+Gv3+Gv4+Gv5+Gv6)/6+xGv)/2,COLOR00CCCC,LINETHICK2{XG51};
Gv11:=HHV(ema(obv,18),54){XG51};
Gv12:=HHV(ema(obv,27),81){XG51};
Gv13:=HHV(ema(obv,36),108){XG51};
Gv14:=HHV(ema(obv,45),135){XG51};
Gv15:=HHV(ema(obv,54),162){XG51};
Gv16:=HHV(ema(obv,63),189){XG51};
Gv17:=HHV(ema(obv,72),216){XG51};
Gv18:=HHV(ema(obv,81),243){XG51};
Gv19:=HHV(ema(obv,90),270){XG51};
ZGv:=(Gv11+Gv12+Gv13+Gv14+Gv15+Gv16+Gv17+Gv18+Gv19)/9{XG51};
Gv21:=HHV(ema(obv,54),162){XG51};
Gv22:=HHV(ema(obv,81),243){XG51};
Gv23:=HHV(ema(obv,108),405){XG51};
Gv24:=HHV(ema(obv,135),486){XG51};
Gv25:=HHV(ema(obv,162),486){XG51};
Gv26:=HHV(ema(obv,189),567){XG51};
Gv27:=HHV(ema(obv,216),648){XG51};
Gv28:=HHV(ema(obv,243),729){XG51};
Gv29:=HHV(ema(obv,270),810){XG51};
DGv:=(Gv21+Gv22+Gv23+Gv24+Gv25+Gv26+Gv27+Gv28+Gv29)/9{XG51};
VTD:=MAX(XGv,MAX(ZGv,DGv)){XG51};
VTX:=MIN(XGv,MIN(ZGv,DGv)){XG51};
VTZ:=(XGv+ZGv+DGv)/3{XG51};
鉴线:EMA(((VTZ+2*VTD)/3+(VTX+5*VTD)/6)/2,9),COLORFAABEC,COLOR7F00FF,LINETHICK1{XG51};
LV1:=LLV(ema(obv,6),18){XG51};
LV2:=LLV(ema(obv,9),27){XG51};
LV3:=LLV(ema(obv,12),36){XG51};
LV4:=LLV(ema(obv,15),45){XG51};
LV5:=LLV(ema(obv,18),54){XG51};
LV6:=LLV(ema(obv,21),63){XG51};
LV7:=LLV(ema(obv,24),72){XG51};
LV8:=LLV(ema(obv,27),81){XG51};
LV9:=LLV(ema(obv,30),90){XG51};
LV:=(LV1+LV2+LV3+LV4+LV5+LV6+LV7+LV8+LV9)/9{XG51};
熊线:((LV1+LV2+LV3+LV4+LV5+LV6)/6+LV)/2,COLOR00bb00,LINETHICK2{XG51};
HOBV:REF(HHV(obvB,63),1),color888FFF{XG51};
LOBV:REF(LLV(obvB,63),1),COLORAAAA00{X_G_5~1_C_N_{};