通达信聪明买卖主图未加密选股指标公式源码

源码正文：

N:=150{XG51};
VAR1:=ema(Ema(EMA(C,5),8),13){XG51};
VAR2:=((VAR1-REF(VAR1,1))/REF(VAR1,1))*618{XG51};
VAR3:=MA(VAR2,8){XG51};
VAR4:=VAR2-VAR3{XG51};
VAR5:=SMA(VAR4,3,1){XG51};
短:WMA(expma(((3*C)+(2*O)+H+L)/7,3),3),COLORFFFFFF{XG51};
道:IF(1,SMA(短,8,1),DRAWNULL),COLORCC99AA,LINETHICK2{XG51};
IF(VAR2>=VAR3,道,DRAWNULL),COLOR6600CC,LINETHICK2{XG51};
VARC:=BArslAst(VAR4>=REF(VAR4,1)){XG51};
VARD:=BARSLAST(VAR4<=REF(VAR4,1)){XG51};
神10:MA(C,10){XG51};
神30:=MA(C,30){XG51};
神60:MA(C,60){XG51};
神120:MA(C,120){XG51};
神250:MA(C,250){XG51};
STICKLINE(VARC=0 AND C>MA(C,250) AND C>MA(C,20) AND C>MA(C,60) AND C>MA(C,160) AND C<O,H,L,0,0),COLORFFCC00{XG51};
STICKLINE(VARC=0 AND C>MA(C,250) AND C>MA(C,20) AND C>MA(C,60) AND C>MA(C,160) AND C>O,H,L,0,0),COLOR0000FF{XG51};
STICKLINE(VARC=0 AND C>MA(C,250) AND C>MA(C,20) AND C>MA(C,60) AND C>MA(C,160),C,O,4 ,0 ),COLOR0000AA{XG51};
STICKLINE(VARC=0 AND C>MA(C,250) AND C>MA(C,20) AND C>MA(C,60) AND C>MA(C,160),C,O,3.3 ,0 ),COLOR0011BB{XG51};
STICKLINE(VARC=0 AND C>MA(C,250) AND C>MA(C,20) AND C>MA(C,60) AND C>MA(C,160),C,O,2.2,0 ),COLOR0022CC{XG51};
STICKLINE(VARC=0 AND C>MA(C,250) AND C>MA(C,20) AND C>MA(C,60) AND C>MA(C,160),C,O,1.65 ,0 ),COLOR0033DD{XG51};
STICKLINE(VARC=0 AND C>MA(C,250) AND C>MA(C,20) AND C>MA(C,60) AND C>MA(C,160),C,O,1.1 ,0 ),COLOR0044EE{XG51};
STICKLINE(VARC=0 AND C>MA(C,250) AND C>MA(C,20) AND C>MA(C,60) AND C>MA(C,160),C,O,0.55 ,0 ),COLOR0055FF{XG51};
STICKLINE(VARC=0 AND C<MA(C,250) AND C>O ,H,L,0,0),COLOR0000FF{XG51};
STICKLINE(VARC=0 AND C<MA(C,250) AND C<O ,H,L,0,0),COLORFFCC00{XG51};
STICKLINE(VARC=0 AND C<MA(C,250),C,O,0,0),COLORFF9900{XG51};
STICKLINE(VARC=0 AND C<MA(C,250),CLOSE,OPEN,3,0),COLORFF5500{XG51};
STICKLINE(VARC=0 AND C<MA(C,250),CLOSE,OPEN,2.8,0),COLORFF6600{XG51};
STICKLINE(VARC=0 AND C<MA(C,250),CLOSE,OPEN,2.5,0),COLORFF7700{XG51};
STICKLINE(VARC=0 AND C<MA(C,250),CLOSE,OPEN,2.2,0),COLORFF8800{XG51};
STICKLINE(VARC=0 AND C<MA(C,250),CLOSE,OPEN,1.7,0),COLORFF9900{XG51};
STICKLINE(VARC=0 AND C<MA(C,250),CLOSE,OPEN,1.2,0),COLORFFAA00{XG51};
STICKLINE(VARC=0 AND C<MA(C,250),CLOSE,OPEN,0.7,0),COLORFFCC00{XG51};
STICKLINE(VARC=0 AND C<MA(C,250),CLOSE,OPEN,0.2,0),COLORFFFF00{XG51};
STICKLINE(VARC=0 AND C<MA(C,20) AND C>O ,H,L,0,0),COLOR0000FF{XG51};
STICKLINE(VARC=0 AND C<MA(C,20) AND C<O ,H,L,0,0),COLORFFCC00{XG51};
STICKLINE(VARC=0 AND C<MA(C,20),C,O,0,0),COLORFF9900{XG51};
STICKLINE(VARC=0 AND C<MA(C,20),CLOSE,OPEN,3,0),COLORFF5500{XG51};
STICKLINE(VARC=0 AND C<MA(C,20),CLOSE,OPEN,2.8,0),COLORFF6600{XG51};
STICKLINE(VARC=0 AND C<MA(C,20),CLOSE,OPEN,2.5,0),COLORFF7700{XG51};
STICKLINE(VARC=0 AND C<MA(C,20),CLOSE,OPEN,2.2,0),COLORFF8800{XG51};
STICKLINE(VARC=0 AND C<MA(C,20),CLOSE,OPEN,1.7,0),COLORFF9900{XG51};
STICKLINE(VARC=0 AND C<MA(C,20),CLOSE,OPEN,1.2,0),COLORFFAA00{XG51};
STICKLINE(VARC=0 AND C<MA(C,20),CLOSE,OPEN,0.7,0),COLORFFCC00{XG51};
STICKLINE(VARC=0 AND C<MA(C,20),CLOSE,OPEN,0.2,0),COLORFFFF00{XG51};
STICKLINE(VARC=0 AND C<MA(C,60) AND C>O ,H,L,0,0),COLOR0000FF{XG51};
STICKLINE(VARC=0 AND C<MA(C,60) AND C<O,H,L,0,0),COLORFFCC00{XG51};
STICKLINE(VARC=0 AND C<MA(C,60),C,O,0,0),COLORFF9900{XG51};
STICKLINE(VARC=0 AND C<MA(C,60),CLOSE,OPEN,3,0),COLORFF5500{XG51};
STICKLINE(VARC=0 AND C<MA(C,60),CLOSE,OPEN,2.8,0),COLORFF6600{XG51};
STICKLINE(VARC=0 AND C<MA(C,60),CLOSE,OPEN,2.5,0),COLORFF7700{XG51};
STICKLINE(VARC=0 AND C<MA(C,60),CLOSE,OPEN,2.2,0),COLORFF8800{XG51};
STICKLINE(VARC=0 AND C<MA(C,60),CLOSE,OPEN,1.7,0),COLORFF9900{XG51};
STICKLINE(VARC=0 AND C<MA(C,60),CLOSE,OPEN,1.2,0),COLORFFAA00{XG51};
STICKLINE(VARC=0 AND C<MA(C,60),CLOSE,OPEN,0.7,0),COLORFFCC00{XG51};
STICKLINE(VARC=0 AND C<MA(C,60),CLOSE,OPEN,0.2,0),COLORFFFF00{XG51};
STICKLINE(VARC=0 AND C<MA(C,160) AND C>O,H,L,0,0),COLOR0000FF{XG51};
STICKLINE(VARC=0 AND C<MA(C,160) AND C<O,H,L,0,0),COLORFFCC00{XG51};
STICKLINE(VARC=0 AND C<MA(C,160) ,C,O,0,0),COLORFF9900{XG51};
STICKLINE(VARC=0 AND C<MA(C,160) ,CLOSE,OPEN,3,0),COLORFF5500{XG51};
STICKLINE(VARC=0 AND C<MA(C,160) ,CLOSE,OPEN,2.8,0),COLORFF6600{XG51};
STICKLINE(VARC=0 AND C<MA(C,160) ,CLOSE,OPEN,2.5,0),COLORFF7700{XG51};
STICKLINE(VARC=0 AND C<MA(C,160) ,CLOSE,OPEN,2.2,0),COLORFF8800{XG51};
STICKLINE(VARC=0 AND C<MA(C,160) ,CLOSE,OPEN,1.7,0),COLORFF9900{XG51};
STICKLINE(VARC=0 AND C<MA(C,160) ,CLOSE,OPEN,1.2,0),COLORFFAA00{XG51};
STICKLINE(VARC=0 AND C<MA(C,160) ,CLOSE,OPEN,0.7,0),COLORFFCC00{XG51};
STICKLINE(VARC=0 AND C<MA(C,160) ,CLOSE,OPEN,0.2,0),COLORFFFF00{XG51};
STICKLINE(VARD=0 AND C>O,H,L,0,0),COLOR0000FF{XG51};
STICKLINE(VARD=0 AND C<O,H,L,0,0),COLORFFCC00{XG51};
STICKLINE(VARD=0,C,O,0,0),COLORFF9900{XG51};
STICKLINE(VARD=0,CLOSE,OPEN,3,0),COLORFF5500{XG51};
STICKLINE(VARD=0,CLOSE,OPEN,2.8,0),COLORFF6600{XG51};
STICKLINE(VARD=0,CLOSE,OPEN,2.5,0),COLORFF7700{XG51};
STICKLINE(VARD=0,CLOSE,OPEN,2.2,0),COLORFF8800{XG51};
STICKLINE(VARD=0,CLOSE,OPEN,1.7,0),COLORFF9900{XG51};
STICKLINE(VARD=0,CLOSE,OPEN,1.2,0),COLORFFAA00{XG51};
STICKLINE(VARD=0,CLOSE,OPEN,0.7,0),COLORFFCC00{XG51};
STICKLINE(VARD=0,CLOSE,OPEN,0.2,0),COLORFFFF00{XG51};
STICKLINE(VARD=0 AND H>MA(C,5) AND C>MA(C,250) AND C>MA(C,60) AND C>MA(C,160) AND MA(C,5)>MA(C,20) AND C>O,H,L,0,0),COLOR0000FF{XG51};
STICKLINE(VARD=0 AND H>MA(C,5) AND C>MA(C,250) AND C>MA(C,60) AND C>MA(C,160) AND MA(C,5)>MA(C,20) AND C<O,H,L,0,0),COLORFFCC00{XG51};
STICKLINE(VARD=0 AND H>MA(C,5) AND C>MA(C,250) AND C>MA(C,60) AND C>MA(C,160) AND MA(C,5)>MA(C,20),C,O,0,0),COLOR0088EE{XG51};
STICKLINE(VARD=0 AND H>MA(C,5) AND C>MA(C,250) AND C>MA(C,60) AND C>MA(C,160) AND MA(C,5)>MA(C,20),C,O,4 ,0 ),COLOR0000AA{XG51};
STICKLINE(VARD=0 AND H>MA(C,5) AND C>MA(C,250) AND C>MA(C,60) AND C>MA(C,160) AND MA(C,5)>MA(C,20),C,O,3.3 ,0 ),COLOR0011BB{XG51};
STICKLINE(VARD=0 AND H>MA(C,5) AND C>MA(C,250) AND C>MA(C,60) AND C>MA(C,160) AND MA(C,5)>MA(C,20),C,O,2.2,0 ),COLOR0022CC{XG51};
STICKLINE(VARD=0 AND H>MA(C,5) AND C>MA(C,250) AND C>MA(C,60) AND C>MA(C,160) AND MA(C,5)>MA(C,20),C,O,1.65 ,0 ),COLOR0033DD{XG51};
STICKLINE(VARD=0 AND H>MA(C,5) AND C>MA(C,250) AND C>MA(C,60) AND C>MA(C,160) AND MA(C,5)>MA(C,20),C,O,1.1 ,0 ),COLOR0044EE{XG51};
STICKLINE(VARD=0 AND H>MA(C,5) AND C>MA(C,250) AND C>MA(C,60) AND C>MA(C,160) AND MA(C,5)>MA(C,20),C,O,0.55 ,0 ),COLOR0055FF{XG51};
情3:=VARC=0 AND C>MA(C,20) AND (BARSCOUNT(C)+1)<365 {XG51};
STICKLINE(情3 AND C>O,H,L,0,0),COLOR0000FF{XG51};
STICKLINE(情3 AND C<O,H,L,0,0),COLORFFCC00{XG51};
STICKLINE(情3,C,O,-1,0),COLOR001235{XG51};
STICKLINE(情3 AND C<O,H,L,0,0),COLORFFCC00{XG51};
STICKLINE(情3 AND C>O,H,L,0,0),COLOR0000FF{XG51};
STICKLINE(情3,C,O,4 ,0 ),COLOR0000AA{XG51};
STICKLINE(情3,C,O,3.3 ,0 ),COLOR0011BB{XG51};
STICKLINE(情3,C,O,2.2,0 ),COLOR0022CC{XG51};
STICKLINE(情3,C,O,1.65 ,0 ),COLOR0033DD{XG51};
STICKLINE(情3,C,O,1.1 ,0 ),COLOR0044EE{XG51};
STICKLINE(情3,C,O,0.55 ,0 ),COLOR0055FF{XG51};
神线1:=MA(C,20)-MA(C,250){XG51};
神线2:=MA(C,60)-MA(C,250){XG51};
神功1:=MA(神线1,1)*4{XG51};
神功2:=EMA(神线2,1)*4,COLORFFFF80{XG51};
YS1:=(HIGH+LOW+CLOSE*2)/4{XG51};
RK3:=EMA(YS1,10){XG51};
RK4:=STD(YS1,10){XG51};
RK5:=(YS1-RK3)*100/RK4{XG51};
RK6:=EMA(RK5,5){XG51};
RK7:=EMA(RK6,10){XG51};
涨:=EMA(RK6,10)+100/2-5,COLORWHITE{XG51};
股灾2:=NOT(REF(C<O,1) AND C<REF(H,1) ){XG51};
股灾3:=NOT(C<REF(H,1) AND C<REF(H,2) OR C<REF(H,3) OR C<REF(H,4) OR C<REF(H,5)){XG51};
股灾4:=NOT(COUNT(C<O,7) >=5 AND SUM(C/REF(C,1)<0.96,7)>=1){XG51};
股灾5:=NOT( 道<MA(C,60) AND MA(C,60)<REF(MA(C,60),1) AND C<MA(C,60) ){XG51};
股灾6:=NOT(道<REF(道,1) AND C<道){XG51};
股灾7:=SUM(SUM(C/REF(C,1)>1.099,7)>=5 AND C>MA(C,250),60)<1{XG51};
股灾8:=SUM(HHVBARS(HIGH,90)>LLVBARS(HIGH,90) AND (HHV( HIGH,90)-LLV( LOW,90))/LLV( LOW,90)*100>50 AND C>MA(C,250) ,90) <1{XG51};
股灾9:=NOT(MA(C,5)<MA(C,10) AND MA(C,10)<MA(C,20) AND MA(C,20)<MA(C,30) AND MA(C,20)<MA(C,120) AND MA(C,120)<MA(C,90) AND MA(C,20)<REF(MA(C,20),1) AND MA(C,30)<REF(MA(C,30),1) AND MA(C,60)<REF(MA(C,60),1) ) {XG51};
股灾12:=SUM((C/REF(C,1)<0.91 AND L=C),30)<1{XG51};
股灾13:=SUM((C/REF(C,1))<0.93,10)<1{XG51};
股灾15:=NOT( MA(C,10)<MA(C,20) AND MA(C,20)<MA(C,30) AND MA(C,30)<MA(C,60) AND MA(C,10)<REF(MA(C,10),1) AND MA(C,20)<REF(MA(C,20),1) AND MA(C,30)<REF(MA(C,30),1) AND MA(C,120)>MA(C,250) AND MA(C,90)>MA(C,120) AND O<MA(C,120) AND C<MA(C,20) ) {XG51};
股灾总:=股灾2 AND 股灾3 AND 股灾4 AND 股灾5 AND 股灾6 AND 股灾7 AND 股灾8 AND 股灾9 AND 股灾12 AND 股灾13 AND 股灾15{XG51};
P1:=涨>REF(涨,1) AND REF(涨,1)<REF(涨,2) AND H>MA(C,250) AND MA(C,10)>MA(C,250) AND MA(C,20)>MA(C,250) AND MA(C,250)>REF(MA(C,250),1) AND LLV(C,15)<MA(C,250) AND 股灾13 AND C>O{XG51};
P2:=涨>REF(涨,1) AND REF(涨,1)<REF(涨,2) AND MA(C,10)>MA(C,250) AND MA(C,20)>MA(C,250) AND MA(C,250)>REF(MA(C,250),1) AND MA(C,120)>REF(MA(C,120),1) AND LLV(C,15)<MA(C,120) AND C>O AND C>MA(C,120) AND 股灾12 AND 股灾15 AND 股灾9{XG51};
P3:=涨>REF(涨,1) AND REF(涨,1)<REF(涨,2) AND H>MA(C,60) AND MA(C,10)>MA(C,250) AND MA(C,20)>MA(C,250) AND MA(C,250)>REF(MA(C,250),1) AND MA(C,20)>REF(MA(C,20),1) AND MA(C,90)>REF(MA(C,90),1) AND C>MA(C,20) AND C>O AND C/REF(C,1)<1.099 AND LLV(C,5)<MA(C,120){XG51};
P4:=涨>REF(涨,1) AND REF(涨,1)<REF(涨,2) AND H>MA(C,20) AND MA(C,20)>MA(C,60) AND MA(C,60)>MA(C,120) AND MA(C,120)>MA(C,250) AND MA(C,250)>REF(MA(C,250),1) AND MA(C,20)>REF(MA(C,20),1) AND MA(C,60)>REF(MA(C,60),1) AND C>MA(C,20) AND C>O AND NOT(REF(C,1)/REF(C,2)<0.97) AND LLV(C,5)<MA(C,20) AND REF(C,1)/REF(C,2)<1.099 AND SUM(C<=O,7)<5 AND C>神功2 AND 神功2>REF(神功2,1)+0.01 AND Abs(MA(C,10)-MA(C,20))>ABS(MA(C,10)-MA(C,30)){XG51};
P5:=涨>REF(涨,1) AND REF(涨,1)<REF(涨,2) AND MA(C,10)>MA(C,250) AND MA(C,20)>MA(C,250) AND MA(C,250)>REF(MA(C,250),1) AND MA(C,120)>REF(MA(C,120),1) AND LLV(C,15)<MA(C,120) AND C>O AND C>MA(C,250) AND C<MA(C,120) AND 股灾12 AND 股灾15 AND 股灾9{XG51};
停牌:=NOT(naMELIKE('ST') AND NAMELIKE('*ST') OR NAMELIKE('S')) AND (BARSCOUNT(C)+1)>30 AND DYNAINFO(10)>100{XG51};
选:=P1 OR P2 OR P3 OR P4 OR P5 AND 停牌 AND 股灾总{XG51};
STICKLINE(选 AND SUM(选,10)<2,L,L-0.01,3,0) ,COLORBLUE{XG51};
DRAWTEXT( 选 AND SUM(选,10)<2,L-0.02,'↖买'),COLOR00FFFF{X.G_5!1.C.N.{};

源码正文：

RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100){XG51};
KV:=SMA(RSV,3,1){XG51};
DV:=Sma(KV,3,1){XG51};
JV:=3*KV-2*DV{XG51};
VAR1:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100){XG51};
VAR2:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100){XG51};
VAR3:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100){XG51};
VAR4:=(((VAR1 + (2 * VAR2)) + (3 * VAR3)) / 6){XG51};
VAR5:=MA(VAR4,3){XG51};
DB:=IF(VAR5,20,0){XG51};
HDY:=ema(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3){XG51};
FX:=HDY<=10{XG51};
XG:crOSS(JV,KV) AND (DB >= 20) AND FX,LINETHICK1{X=G+5~1=C=N={};