通达信放心买未加密选股指标公式源码

源码正文：

DPZX:=ema(C,1){XG51};
GGZX:=AMOUNT/V/100{XG51};
重心:=IF(C<300,GGZX,DPZX){XG51};
ZC1:=CONst(LLV(重心,2)){XG51};
ZC2:=CONST(LLV(重心,4)){XG51};
VAR1:=(C+H+O+L)/4{XG51};
卖出:=xma(VAR1,20)*(1+80/1000){XG51};
买入:=Xma(VAR1,32)*(1-100/1000){XG51};
MA5:=MA(C,5),COLOR000099{XG51};
MA10:=MA(C,10),COLOR006600{XG51};
MA20:=MA(C,20),COLOR005555{XG51};
ZB1:=EMA(C,34){XG51};
SQX:=(C-MA(CLOSE,13))*100{XG51};
difF:=EMA(MA(SQX,7),1){XG51};
DEA:=EMA(DIFF,7){XG51};
macd:=(DIFF-DEA)*2{XG51};
VAR10B:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0){XG51};
VAR11B:=zig(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3){XG51};
VAR12B:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3){XG51};
VAR13B:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3){XG51};
VAR14B:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3){XG51};
VAR15B:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3){XG51};
VAR16B:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3){XG51};
VAR17B:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3){XG51};
VAR18B:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3){XG51};
VAR19B:=EMA(CLOSE,2)-EMA(CLOSE,150){XG51};
买1B:=VAR10B{XG51};
买2B:=(VAR11B+VAR13B+VAR15B+VAR17B){XG51};
FF:=EMA(CLOSE,3){XG51};
MA15:=EMA(CLOSE,21){XG51};
TTJ:=crOSS(FF,MA15){XG51};
上:=EMA(C,3),COLORYELLOW,LINETHICK1{XG51};
中:=EMA(C,5),COLORRED,LINETHICK1{XG51};
下:=EMA(中,5),COLOR00FF00,LINETHICK1{XG51};
QQ:= C<中{XG51};
MM:=上>REF(上,1) AND REF(上,1)<REF(上,2) {XG51};
V1:=Abs((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
V2:=(1-7/100)*(dma(CLOSE,V1)){XG51};
V3:=(1+7/100)*(DMA(CLOSE,V1)){XG51};
V5:=MA((LOW+HIGH+CLOSE)/3,5){XG51};
MA1Q:=MEMA(CLOSE,5){XG51};
MA2Q:=ATAN((MA1Q/REF(MA1Q,1)-1)*100)*180/3.1416{XG51};
MA3Q:=IF(MA2Q>0,MA2Q,MA2Q){XG51};
MA5Q:=MA(CLOSE,5),COLOR888899{XG51};
MA13:=MA(CLOSE,13),COLORFF00F0,LINETHICK2{XG51};
VAR01:=CLOSE=HHV(C,4) AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3))
OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND
REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND
C>=REF(C,1) AND C>=REF(C,2){XG51};
VAR02:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4){XG51};
VAR03:=CLOSE=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR
REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4) AND
REF(C,1)=HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4) AND
C<REF(C,1) AND C<REF(C,2){XG51};
VAR04:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND
REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1){XG51};
VAR05:=REF(C,1)=HHV(C,4) AND C<REF(C,2) OR (REF(C,2)=HHV(C,4) AND
REF(C,1)>REF(C,3) OR REF(C,3)=HHV(C,4) AND REF(C,1)>REF(C,2)) AND
REF(C,2)>=REF(C,4) AND C<REF(C,1){XG51};
VAR06:=V5>REF(V5,1) AND REF(V5,1)<REF(V5,2){XG51};
VAR07:=LOW<HHV(V5,13) AND HIGH>HHV(V5,13) AND CLOSE>REF(C,1) AND CLOSE>OPEN{XG51};
VAR08:=VAR07 AND COUNT(VAR06,2){XG51};
VAR09:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6){XG51};
VAR10:=EMA(MA(C,13),13){XG51};
VAR11:=FILTER((LLV(VAR09,2)=LLV(VAR09,7) AND COUNT(VAR09<0,2) AND
CROSS(VAR09,MA(VAR09,2)))=1,5){XG51};
VAR12:=FILTER((HHV(VAR09,2)=HHV(VAR09,7) AND COUNT(VAR09>50,2) AND
CROSS(MA(VAR09,2),VAR09))=1,1){XG51};
VAR13:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10{XG51};
VAR14:=FILTER(((CROSS(VAR13,0) OR CROSS(C,VAR10)) AND VAR11)=1,3){XG51};
VAR15:=MA(C,18)>=REF(MA(C,18),3) AND CROSS(C,MA(C,18)){XG51};
VAR16:=VAR08 AND NOT(REF(VAR08,1)){XG51};
RSVQ:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSVQ,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
金叉:=CROSS(J,D){XG51};
死叉:=CROSS(D,J){XG51};
买1:=(VAR14 OR VAR15) AND VAR11{XG51};
买2:=(VAR14 OR VAR15) AND VAR04{XG51};
买3:=(VAR14 OR VAR15) AND VAR02{XG51};
买4:=(VAR02 AND VAR11) OR (VAR04 AND VAR11){XG51};
买5:=(金叉 AND VAR04) OR (金叉 AND VAR02) OR (金叉 AND VAR11){XG51};
TTJ0:=VAR16{XG51};
TTJ1:=买1 OR 买2 OR 买3 OR 买4 OR 买5 AND MM{XG51};
XG0:=TTJ AND TTJ0{XG51};
XG1:=TTJ AND TTJ1{XG51};
XG11:=XG0 OR XG1{XG51};
PL5:=ZIG(3,5){XG51};
EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3){XG51};
EX1:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3){XG51};
PL10:=ZIG(3,10){XG51};
EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3){XG51};
EX2:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3){XG51};
PL20:=ZIG(3,20){XG51};
EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3){XG51};
EX3:=ZIG(3,20)<REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)>=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3){XG51};
PL40:=ZIG(3,40){XG51};
走强1:=BArslAST(PL5<REF(PL5,1)){XG51};
走弱1:=BARSLAST(PL5>REF(PL5,1)){XG51};
走强2:=BARSLAST(PL10<REF(PL10,1)){XG51};
走弱2:=BARSLAST(PL10>REF(PL10,1)){XG51};
走强3:=BARSLAST(PL20<REF(PL20,1)){XG51};
走弱3:=BARSLAST(PL20>REF(PL20,1)){XG51};
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0){XG51};
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0){XG51};
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0){XG51};
DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0){XG51};
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0){XG51};
TJ11:=EN2 AND ZTJZ5=1{XG51};
TJ22:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2{XG51};
TJ33:=EN2 AND DTJZ10=1{XG51};
TJ44:=EN3 AND ZTJZ10=1{XG51};
TJ55:=EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2{XG51};
XG22:=TJ11 OR TJ22 OR TJ33 OR TJ44 OR TJ55{XG51};
XGQ:=XG11 OR XG22{XG51};
放心买:XGQ{X.G~5~1.C.N.{};

源码正文：

N1:=10;N2:=10;DISP:=2{XG51};
K:=IF(PERIOD=5,1,
IF(PERIOD=6,1,
IF(PERIOD=7,1,
IF(PERIOD=8,1,
IF(PERIOD=9,1,
IF(PERIOD=10,1,
IF(PERIOD=11,2,
IF(PERIOD=4,1,
IF(PERIOD=3,1,
IF(PERIOD=2,1,
IF(PERIOD=1,1,1)))))))))))/10{XG51};
P1:=PEAK(1,K*N1,1){XG51};
P2:=PEAK(1,K*N1,2){XG51};
WP1:=PEAKBARS(1,K*N1,1){XG51};
WP2:=PEAKBARS(1,K*N1,2){XG51};
T1:=TROUGH(2,K*N2,1){XG51};
T2:=TROUGH(2,K*N2,2){XG51};
WT1:=TROUGHBARS(2,K*N2,1){XG51};
WT2:=TROUGHBARS(2,K*N2,2){XG51};
TJ1:=P1>T1 AND P2>T2 {XG51};
ZD:=maX(T1,T2){XG51};
ZG:=MIN(P1,P2){XG51};
LL:=MIN(T1,T2){XG51};
HH:=MAX(P1,P2){XG51};
TJ2:=FILTER(ZG>ZD,2){XG51};
TJ3:=ZG=REF(ZG,BArslAst(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2)){XG51};
TJ4:=TJ1&&TJ2&&NOT(TJ3){XG51};
TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1))){XG51};
TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1))){XG51};
TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF(BARSLAST(TJ4),1)){XG51};
TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7){XG51};
ZSD:=IF(TJ8,ZD,DRAWNULL){XG51};
ZSG:=IF(TJ8,ZG,DRAWNULL){XG51};
ZSH:=IF(TJ8,HH,DRAWNULL){XG51};
ZSL:=IF(TJ8,LL,DRAWNULL){XG51};
STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORLIMAGENTA{XG51};
STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORLIMAGENTA{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};
局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)) CIRCLEDOT COLORBLUE{XG51};
DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0)COLORLICYAN{XG51};
DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0)COLORBLUE{XG51};
DD1:=BARSLAST(Abs(极点保留)!=1){XG51};
DRAWTEXT(极点保留=1,局部极点,'卖'),COLORCYAN{XG51};
DRAWTEXT(极点保留=-1,局部极点,'买'),COLORWHITE{XG51};
MA5:MA(CLOSE,5),COLORFF00FF,LINETHICK2;判:IF(MA5<REF(MA5,1),MA5,DRAWNULL),COLORRED,LINETHICK2{X_G_5-1_C_N_{};