通达信菩提主图未加密选股指标公式源码

通达信菩提主图未加密选股指标公式源码

源码正文：

VAR1:=(C+H+O+L)/4{XG51};
卖出:=xma(VAR1,20)*(1+80/1000),POINTDOT,COLORCYAN,LINETHICK3{XG51};
买入:=Xma(VAR1,32)*(1-100/1000),POINTDOT,COLORLIMAGENTA,LINETHICK3{XG51};
幅度:=100*(卖出-买入)/买入,NODRAW{XG51};
菩提:=买入+(卖出-买入)*2/3;;
般:=XMA(CLOSE,7);
若:=Mema(CLOSE,3);
全绿K:=LONGcrOSS(若,般,3) AND H>菩提{XG51};
RSVL:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12))*100;
KL:=SMA(RSVL,3,1);
DL:=SMA(KL,3,1);
KKL:=SMA(RSVL,3,1);
DD:=SMA(KL,3,1);
NL:=KKL+DD;
买入L:=DRAWICON(CROSS(NL,50),50,1),COLORWHITE;
卖出L:=DRAWICON(CROSS(160,NL),160,2),COLORCYAN;
卖出K:=CROSS(160,NL);
TM:=(CLOSE*1.0+LOW*0.0+HIGH*0.0){XG51};
T1M:=V{XG51};
SL1M:=(TM/REF(TM,1)-1)*1000{XG51};
趋势5:=XMA(XMA(XMA(SL1M,20),20),20),COLORBLUE{XG51};
趋势6:=XMA(XMA(XMA(SL1M,10),10),10),COLORLIMAGENTA{XG51};
QA9:=趋势6-趋势5{XG51};
QA10:=EMA(QA9,89){XG51};
买入M:=(QA9-QA10)*2,COLORstICK{XG51};
M1:=EMA(C,5);M2:=EMA(C,13);M3:=EMA(C,34),COLORYELLOW,LINETHICK2{XG51};
MC1:=EMA(C,55);MC2:=EMA(C,89);MA4:=EMA(C,144){XG51};
VAR1A1H:=(REF(CLOSE,1)-REF(ATR,1)){XG51};
买线1:=REF(EMA(C,14),1)COLORRED,LINETHICK3{XG51};
卖线1:=IF(MC1>MAX(MC2,MA4),MC1,IF(MC1<MIN(MC2,MA4),MC2,MA4)),COLORFF00CC,LINETHICK3{XG51};
高1:=REF(HHV(H,150),3){XG51};
低1:=REF(LLV(L,150),3){XG51};
STICKLINE(买线1>=卖线1,REFDATE(低1,DATE),REFDATE(低1,DATE)*0.96,6,0)COLOR001050{XG51};
STICKLINE(买线1<卖线1,REFDATE(低1,DATE),REFDATE(低1,DATE)*0.96,6,0)COLOR404050{XG51};
STICKLINE(买入M>=0,REFDATE(低1,DATE),REFDATE(低1,DATE)*0.98,2,1)COLORWHITE{XG51};
STICKLINE(买入M<0,REFDATE(低1,DATE),REFDATE(低1,DATE)*0.98,2,1)COLORCYAN{XG51};
STICKLINE(买入L,REFDATE(低1,DATE),REFDATE(低1,DATE)*0.96,2,0)COLORBLUE{XG51};
STICKLINE(卖出K AND 买入M<0,REFDATE(低1,DATE),REFDATE(低1,DATE)*0.96,2,0)COLORGREEN{XG51};
多空趋势彩带:DRAWBAND(SMA(C,6.5,1),RGB(255,97,0),SMA(C,13.5,1),RGB(0,128,0)){XG51};
中线:=(卖出+买入)/2,POINTDOT,COLORRED,LINETHICK4{XG51};
MA5:=MA(C,5),COLOR000099{XG51};
MA10:=MA(C,10),COLOR006600{XG51};
MA20:=MA(C,20),COLOR005555{XG51};
ZB1:=EMA(C,34){XG51};
长期趋势:EMA(ZB1,13),COLORWHITE,LINETHICK3{XG51};
STICKLINE(C>=REF(C,1),O,C,3,1),COLOR000000{XG51};
STICKLINE(C<REF(C,1),O,C,3,1),COLOR000000{XG51};
AA3:=EMA(CLOSE,5)>EMA(CLOSE,6) AND EMA(CLOSE,6)>EMA(CLOSE,7) AND EMA(CLOSE,7)>EMA(CLOSE,8) AND EMA(CLOSE,8)>EMA(CLOSE,9)
AND EMA(CLOSE,9)>EMA(CLOSE,10) AND EMA(CLOSE,10)>EMA(CLOSE,11) AND EMA(CLOSE,11)>EMA(CLOSE,12)
AND EMA(CLOSE,12)>EMA(CLOSE,13) AND EMA(CLOSE,13)>EMA(CLOSE,14){XG51};
AA2:= EMA(CLOSE,14)>EMA(CLOSE,15)
AND EMA(CLOSE,15)>EMA(CLOSE,20) AND EMA(CLOSE,20)>EMA(CLOSE,30) AND EMA(CLOSE,30)>EMA(CLOSE,60) AND EMA(CLOSE,60)>EMA(CLOSE,90)
AND EMA(CLOSE,90)>EMA(CLOSE,120) AND EMA(CLOSE,120)>EMA(CLOSE,250){XG51};
A1:= AA2 AND AA3{XG51};
A2:=EMA(CLOSE,5)>EMA(CLOSE,6) AND EMA(CLOSE,6)>EMA(CLOSE,7) AND EMA(CLOSE,7)>EMA(CLOSE,8) AND EMA(CLOSE,8)>EMA(CLOSE,9)
AND EMA(CLOSE,9)>EMA(CLOSE,10) AND EMA(CLOSE,10)>EMA(CLOSE,11) AND EMA(CLOSE,11)>EMA(CLOSE,12)
AND EMA(CLOSE,12)>EMA(CLOSE,13) AND EMA(CLOSE,13)>EMA(CLOSE,14){XG51};
B1:=IF(A1,1,2){XG51};
VAR1MZ:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2))){XG51};
VAR2MZ:=((REF(VAR1MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR3MZ:=((REF(VAR2MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR4MZ:=((REF(VAR3MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR5MZ:=((REF(VAR4MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR6MZ:=((REF(VAR5MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR7MZ:=((REF(VAR6MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR8MZ:=((REF(VAR7MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR9MZ:=((REF(VAR8MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VARAMZ:=((REF(VAR9MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VARBMZ:=((REF(VARAMZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VARCMZ:=((REF(VARBMZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),L,H,0,0),COLOR0000DD{XG51};
STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,REF(C,1),3,0),COLOR000099{XG51};
STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,REF(C,1),2,0),COLOR0000BB{XG51};
STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,REF(C,1),1,0),COLOR0000DD{XG51};
VARDMZ:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2))){XG51};
VAREMZ:=((REF(VARDMZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VARFMZ:=((REF(VAREMZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR10MZ:=((REF(VARFMZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR11MZ:=((REF(VAR10MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR12MZ:=((REF(VAR11MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR13MZ:=((REF(VAR12MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR14MZ:=((REF(VAR13MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR15MZ:=((REF(VAR14MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR16MZ:=((REF(VAR15MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
VAR17MZ:=((REF(VAR16MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))){XG51};
VAR18MZ:=((REF(VAR17MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))){XG51};
STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,REF(C,1),3 ,0 ),COLOR00BB00{XG51};
STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,REF(C,1),2 ,0 ),COLOR00DD00{XG51};
STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,REF(C,1),1 ,0 ),COLOR00FF00{XG51};
STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),H,L,0,0 ),COLOR00DD00{XG51};
VAR19MZ:=(REF((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),1) AND VAR1MZ){XG51};
VAR1AMZ:=(REF((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),1) AND VARDMZ){XG51};
STICKLINE(VAR19MZ,REF(CLOSE,1),REF(CLOSE,2),3 ,0 ),COLORFF11FF{XG51};
STICKLINE(VAR19MZ,REF(CLOSE,1),REF(CLOSE,2),2 ,0 ),COLORFF44FF{XG51};
STICKLINE(VAR19MZ,REF(CLOSE,1),REF(CLOSE,2),1 ,0 ),COLORFF66FF{XG51};
STICKLINE(VAR1AMZ,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00AAFF{XG51};
STICKLINE(VAR1AMZ,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR00CCFF{XG51};
STICKLINE(VAR1AMZ,REF(CLOSE,1),REF(CLOSE,2),1,0),COLOR00EEFF{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};
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0){XG51};
DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0){XG51};
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱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};
W18:=EXIST(XGQ,1){XG51};
DRAWTEXT(XGQ,L-0.1,'●放心买'),COLORWHITE{XG51};
SQX:=(C-MA(CLOSE,13))*100{XG51};
difF:=EMA(MA(SQX,7),1),COLORRED{XG51};
DEA:=EMA(DIFF,7),COLORBLUE{XG51};
macd:=(DIFF-DEA)*2,COLORSTICK{XG51};
奉献理想专用:IF((CROSS(DIFF,DEA) AND DIFF<-0.1) ,L-0.2,DRAWNULL),COLORLIMAGENTA,LINETHICK9,CROSSDOT{XG51};
低位金叉:=IF(CROSS(DIFF,DEA) AND DIFF<-0.1,15,DRAWNULL),COLORLIMAGENTA,LINETHICK9,CROSSDOT{XG51};
IF(CROSS(DIFF,DEA) AND DIFF<-0.1,L-0.2,DRAWNULL),COLORBLUE,LINETHICK4,POINTDOT{XG51};
MA1:=MA(C,5){XG51};
MA2:=MA(C,10){XG51};
MA3:=MA(C,21){XG51};
破N:=REF(MA1,1)<REF(MA2,1)AND MA2>REF(MA2,1){XG51};
试摸N:=C>MA(C,10) OR H>=MA2{XG51};
再上N:=C>O AND REF(C,1)< MA(C,10) AND 试摸N AND 破N AND MA(C,21)<MA(C,10){XG51};
有行情:=再上N AND (CROSS(C,长期趋势) OR CROSS(L,长期趋势) OR CROSS(H,长期趋势)){XG51};
DRAWTEXT(有行情,LOW-0.2,'●有行情'),COLORCYAN{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};
BB:=IF(买1B>0 OR 买2B>0 ,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORBLUE{XG51};
红买绿卖:IF(CROSS(BB,买1B),LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK5,COLORRED{XG51};
牛节点:=CROSS(EMA(C,5),EMA(C,30))AND CROSS(EMA(C,10),EMA(C,20)){XG51};
DRAWICON(牛节点,L-0.1,13){XG51};
CSAR:=SAR(10,2,20);
持币:=IF(CSAR>=H,CSAR,0),CIRCLEDOT,COLORCYAN;
持股:=IF(CSAR<=L,CSAR,0),CIRCLEDOT,COLORWHITE{XG51};
生命线2:=EMA(SLOPE(C,21)*20+C,42),LINETHICK2,COLORBLUE;
止损:=EMA(C,5),COLORBLUE,LINETHICK1;
菩提B:=XMA(H,20);{XG51};
参买:=IF(止损>=REF(止损,1),止损,DRAWNULL),LINETHICK2,COLORWHITE;
DRAWICON(CROSS(L,CSAR) AND 参买>0 AND H<菩提B AND 持股>0
AND H>长期趋势,(LOW- 0.1),5){XG51};
VVAR1D:=((((OPEN + LOW) + HIGH) + CLOSE) / 4){XG51};
短底:=EMA(VVAR1D,5){XG51};
支撑:=HHV(短底,60){XG51};
MAN:=(SMA(HIGH,21,2) * 1.05){XG51};
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100){XG51};
中D:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6){XG51};
X1D:=EMA(中D,10){XG51};
RSVD:=SMA(下档线,3,1){XG51};
K大:=SMA(RSVD,3,1){XG51};
D大:=((3 * RSVD) - (2 * K大)){XG51};
J12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100){XG51};
RSV24:=SMA(J12,3,1){XG51};
K24:=SMA(RSV24,3,1){XG51};
D24:=((3 * RSV24) - (2 * K24)){XG51};
压力位:=IF(CROSS(D24,D大),HIGH,REF(HIGH,BARSLAST(CROSS(D24,D大)))),COLORFFFFFF{XG51};
牛浮面:=CROSS(CLOSE,MA20) AND HIGH < 压力位 AND OPEN < MA20
AND HIGH < 支撑 AND MAN - REF(MAN,1) > 0 AND X1D - REF(X1D,1)>0 AND
D大 < 63 AND MA20 - REF(MA20,1) > 0,COLORRED{XG51};
DRAWTEXT(牛浮面,L,'●牛浮面'),COLORRED{XG51};
CO:=(C-O){XG51};
绿K:=(卖出>LOW AND 卖出<HIGH) OR (卖出>MIN(C,O) AND 卖出<MAX(C,O))
OR 卖出<LOW{XG51};
全绿K2:=C>卖出 OR (H>卖出 AND O>C){XG51};
STICKLINE(全绿K2,C,O,3,0),COLOR00BB00{XG51};
STICKLINE(全绿K2,C,O,2,0),COLOR00DD00{XG51};
STICKLINE(全绿K2,C,O,1,0),COLOR00FF00{X*G.5=1*C*N*{};

通达信极准短线未加密选股指标公式源码

源码正文：

VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR2:=SMA(Abs(LOW-VAR1),15,1)/Sma(MAX(LOW-VAR1,0),10,1)LINETHICK2{XG51};
VAR3:=ema(VAR2,10){XG51};
VAR4:=LLV(LOW,33){XG51};
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3){XG51};
猎庄:IF(VAR5>REF(VAR5,1),VAR5,0),COLORLICYAN,POINTDOT,LINETHICK5{XG51};
stICKLINE(VAR5>REF(VAR5,1),0,VAR5,3,0 ),COLORWHITE,POINTDOT,LINETHICK9{XG51};
跟庄:IF(VAR5<REF(VAR5,1),VAR5,0),COLORCYAN{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,3,0),COLORCYAN{XG51};
LOWV:=LLV(LOW,6){XG51};
HIGHV:=HHV(HIGH,6){XG51};
RSV:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)*100,2){X_G_5!1_C_N_{};