通达信老卜综合主图未加密选股指标公式源码

源码正文：

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6{XG51};
ma1:MA(MID,8),COLORRED{XG51};
MA2:MA(MID,13),COLORFFCCCC{XG51};
MA3:MA(MID,21),COLORFFCC66{XG51};
MA55:MA(MID,55),LINETHICK2{XG51};
MA144:MA(MID,144),LINETHICK2{XG51};
MA233:MA(MID,233),LINETHICK2{XG51};
乖离线:=((C-REF(MA1,1))/20+MA1)*1.20{XG51};
回调认同:ema(expma(MID,20),13),COLORWHITE,crOSSDOT{XG51};
VAR1:=CROSS(MA1,MA2) AND CROSS(MA1,MA3) AND V>REF(V,1){XG51};
VAR2:=MA1>REF(MA1,2) AND V>REF(V,1) AND CROSS(C,MA1){XG51};
VAR3:=EMA(100-(100/(1+SUM(IF(MID>REF(MID,1),MID*vol,0),14)/SUM
(IF(MID<REF(MID,1),MID*VOL,0),14))),5){XG51};
VAR4:=DRAWLINE(VAR3>=HHV(VAR3,4),VAR3,VAR3<=LLV(VAR3,4),VAR3,1){XG51};
VAR5:=VAR3=VAR4{XG51};
VAR6:=VAR3<REF(VAR3,1){XG51};
VAR7:=(((MID - MA(MID,6))/(MA(MID,6)))*(200) + ((MID - MA(MID,24))/(MA(MID,24)))*(200) + ((MID - MA(MID,32))/(MA(MID,32)))*(200))/(3){XG51};
VAR8:=MA2>=REF(MA2,1) AND CROSS(C,MA1) AND CROSS(C,MA2) AND V>REF(V,1){XG51};
VAR9:=VAR5 AND VAR6{XG51};
VAR10:=VAR2 OR VAR8 OR VAR9{XG51};
stICKLINE(VAR1,L,L-0.09,4,0),COLORBLUE{XG51};
DRAWTEXT(VAR1,L-0.13,'金叉'),COLORBLUE{XG51};
STICKLINE(CROSS(C,MA2) AND CROSS(C,MA3) AND CROSS(C,MA1),L,L-0.09,4,0),COLORBLUE{XG51};
DRAWTEXT(CROSS(C,MA2) AND CROSS(C,MA3) AND CROSS(C,MA1),L-0.13,'并线开花'),COLORBLUE{XG51};
STICKLINE(CROSS(C,乖离线),H,H+0.09,4,0),COLOR00FF00{XG51};
DRAWTEXT(CROSS(C,乖离线) ,H+0.13,'卖点(打点停板不卖)'),COLOR00FF00{XG51};
STICKLINE(MA3>=REF(MA3,1) AND MA1>=REF(MA1,1) AND CROSS(C,MA3),L,L-0.09,4,0),COLORFFCC66{XG51};
DRAWTEXT(MA3>=REF(MA3,1) AND MA1>=REF(MA1,1) AND CROSS(C,MA3),L-0.13,'牛象'),COLORFFCC66{XG51};
STICKLINE(VAR10 AND REF(NOT(VAR10),1),O,O*1.01,2,0),COLORBLUE{XG51};
DRAWICON(VAR10 AND REF(NOT(VAR10),1),L,1){XG51};
DRAWICON((VAR7 > 20) AND FILTER((VAR7 < REF(VAR7,1)),5),(HIGH)*(1.02),2),COLORCYAN{XG51};
高1:=REF(HHV(H,150),3){XG51};
低1:=REF(LLV(L,150),3){XG51};
H1:=高1-(高1-低1)*0.191{XG51};
H2:=高1-(高1-低1)*0.382{XG51};
H3:=高1-(高1-低1)*0.5{XG51};
H4:=高1-(高1-低1)*0.618{XG51};
H5:=高1-(高1-低1)*0.809{XG51};
%19.1:REFDATE(H1,DATE),POINTDOT,COLORBLUE,LINETHICK3{XG51};
%38.2:REFDATE(H2,DATE),POINTDOT,COLORLIMAGENTA,LINETHICK3{XG51};
%50:REFDATE(H3,DATE),POINTDOT,COLORBLACK,LINETHICK3{XG51};
%61.8:REFDATE(H4,DATE),POINTDOT,COLORWHITE,LINETHICK3{XG51};
%80.9:REFDATE(H5,DATE),POINTDOT,COLORRED,LINETHICK3{XG51};
{X_G-5?1_C_N_{};

源码正文：

真品:=C>REF(C,1) AND C>O AND LONGcrOSS(C,ma(C,20),1)=1 AND LONGCROSS(C,MA(C,30),1)=1{XG51};
VAB0:=13;VAB1:=1500000;VAB2:=VAB0 + VAB1; VAB3:=IF(DATE > VAB2,0,1){XG51};
LC:=REF(CLOSE,1){XG51};
SG:=ema(HHV(HIGH,1),8){XG51};
X1:=EMA(CLOSE,8){XG51};
X30:=((X1 < REF(X1,1)) AND (CLOSE < X1)){XG51};
X31:=IF(((SG < REF(SG,1)) OR X30),1,0){XG51};
操作线:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(Abs(CLOSE-LC),2,1)*100{XG51};
震仓:=45{XG51};
底线:=20{XG51};
PP:=操作线<震仓 AND REF(操作线,1)>震仓 {XG51};
PP3:=操作线<底线 AND REF(操作线,1)>底线*VAB3{XG51};
抓牛:=(((((COUNT((X31 = 1),4) = 3) AND (X31 = 0))AND O<C AND (((C-REF(C,1))/REF(C,1))>0.065))*10) >=10)OR((C-REF(C,1))/REF(C,1)>0.065 AND (REF(PP3,1) OR REF(PP,1))) AND VAB3=1{XG51};
牛:= 抓牛 AND 真品 AND C>MA(C,60){XG51};
DRAWTEXT(牛,80,'牛'),COLORFF00FF{XG51};
stICKLINE(牛,0,100,2,0),COLORWHITE{XG51};
STICKLINE(牛,0,100,2,0),COLORYELLOW{XG51};
STICKLINE(牛,10,100,2,0),COLORWHITE{XG51};
STICKLINE(牛,20,100,2,0),COLORYELLOW{XG51};
STICKLINE(牛,30,100,2,0),COLORLIMAGENTA{XG51};
STICKLINE(牛,40,100,2,0),COLORGRAY{XG51};
STICKLINE(牛,50,100,2,0),COLORBLUE{XG51};
STICKLINE(牛,60,100,2,0),COLORLICYAN{XG51};
STICKLINE(牛,70,100,2,0),COLORBLUE{X=G~5^1=C=N={};