通达信百万顶底买卖未加密选股指标公式源码

源码正文：

VAR2A:=LLV(LOW,10){XG51};
VAR3A:=HHV(HIGH,25){XG51};
动力线:= ema((CLOSE-VAR2A)/(VAR3A-VAR2A)*4,4){XG51};
趋势:ma(动力线,2){XG51};
IF(趋势>REF(趋势,1),趋势,DRAWNULL),COLORWHITE{XG51};
IF(趋势<REF(趋势,1),趋势,DRAWNULL),COLORYELLOW{XG51};
stICKLINE(趋势>REF(趋势,1) ,趋势 ,REF(趋势,1),1,0),COLORWHITE{XG51};
STICKLINE(趋势<=REF(趋势,1) ,趋势 ,REF(趋势,1),1,0),COLOR00FF00{XG51};
AA:=REF(CLOSE,1){XG51};
BBB:=SMA(MAX(CLOSE-AA,0),5,1)/SMA(Abs(CLOSE-AA),5,1)*1000{XG51};
HHH:=BBB-LLV(BBB,10){XG51};
SS:=(MA(HHH,2)*3+HHH*13)/16{XG51};
短线买点:=IF(SS>13,MA(SS,2),SS)/6{XG51};
指标:=macd.dif>MacD.DEA AND MACD.DIF<0.2 AND MACD.DIF>0{XG51};
短线出击:IF(crOSS(短线买点,1) AND (短线买点<30) AND 指标,1,0){XG51};
短线出击=30{XG51};
X:=MA(AMOUNT,5)/MA(V,5)/100{XG51};
VAR13A:=(X-MA(AMOUNT,125)/MA(V,125)/100)/X{XG51};
VAR14A:=MA((LLV(L,45)-C)/(HHV(H,45)-LLV(L,45))*100,3){XG51};
VAR15A:=C/MA(C,60)-1{XG51};
大底:IF(CROSS(-5,VAR14A) AND VAR13A<-0.4,-0.01,-1){XG51};
中底:IF(CROSS(-5,VAR14A) AND VAR13A<-0.25 AND VAR13A>-0.4,-0.3,-1){XG51};
小底:IF(CROSS(-5,VAR14A) AND VAR13A<-0.15 AND VAR13A>-0.25,-0.6,-1){XG51};
减仓:IF(CROSS(VAR14A,-95) AND VAR15A<0.2 AND VAR15A>=0.1,0.6,1){XG51};
中顶:IF(CROSS(VAR14A,-95) AND VAR15A<0.35 AND VAR15A>=0.2,0.3,1),COLORBLUE{XG51};
大顶:IF(CROSS(VAR14A,-95) AND VAR15A>=0.35,0,1)COLORWHITE{X_G~5=1_C_N_{};

源码正文：

Z1:=stRCAT(HYBLOCK,' '){XG51};
Z2:=STRCAT(Z1,DYBLOCK){XG51};
Z3:=STRCAT(Z2,' '){XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0.03,0,STRCAT(Z3,GNBLOCK)),COLORLICYAN{XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0.09,0,FGBLOCK),COLORLImaGENTA{XG51};
MAA5:MA(C,5),COLORFF00FF,LINETHICK2{XG51};
MAA10:=MA(C,10){XG51};
MAA30:MA(C,30),COLORWHITE{XG51};
KS:IF(MAA10>MAA30,MAA10,MAA30),COLORYELLOW{XG51};
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
A4:=SMA(A3,3,1){XG51};
A5:=SMA(A4,3,1){XG51};
A6:=3*A4-2*A5{XG51};
A7:=C-REF(C,1){XG51};
A8:=100*ema(EMA(A7,6),6)/EMA(EMA(Abs(A7),6),6){XG51};
买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND crOSS(A8,MA(A8,2)){XG51};
DRAWTEXT(FILTER(买=1,5),LOW-0.05,'↖跟庄买进'),COLORBLUE{XG51};
STICKLINE(买,OPEN,CLOSE,2,0),COLORBLUE{XG51};
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3,1),COLORWHITE{XG51};
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2){XG51};
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3,0),COLORFFCC66{XG51};
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),4,1),COLORBLUE{XG51};
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),5,2),COLOR00FF00{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00C8FF{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10ECFF{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10FFFF{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00D900{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORYELLOW{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),0,0),COLOR090FF2{XG51};
PMA:MA(C,5),COLORRED,LINETHICK2{XG51};
IF(PMA>REF(PMA,1),PMA,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(PMA<REF(PMA,1),PMA,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
T:=150{XG51};
TT:=3{XG51};
N1:=0{XG51};
高1:=REF(HHV(H,T),TT){XG51};
低1:=REF(LLV(L,T),TT){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};
顶:REFDATE(高1,DATE),COLORFFFF00{XG51};
一:REFDATE(H1,DATE),DOTLINE,COLORBLUE{XG51};
二:REFDATE(H2,DATE),DOTLINE,COLORLIMAGENTA{XG51};
三:REFDATE(H3,DATE),DOTLINE,COLOR00FFFF{XG51};
四:REFDATE(H4,DATE),DOTLINE,COLORLIMAGENTA{XG51};
五:REFDATE(H5,DATE),DOTLINE,COLORBLUE{XG51};
低:REFDATE(低1,DATE),COLOR00FF00{XG51};
TT4:=(CURRBARSCOUNT=1){XG51};
DRAWTEXT(TT4 AND 顶,顶,'顶'),COLOR208FFF{XG51};
DRAWTEXT(TT4 AND 一,一,'0.809'),COLOR208FFF{XG51};
DRAWTEXT(TT4 AND 二,二,'0.618'),COLOR208FFF{XG51};
DRAWTEXT(TT4 AND 三,三,'0.5'),COLOR208FFF{XG51};
DRAWTEXT(TT4 AND 四,四,'0.382'),COLOR208FFF{XG51};
DRAWTEXT(TT4 AND 五,五,'0.191'),COLOR208FFF{XG51};
DRAWTEXT(TT4 AND 低,低*1.009,'底'),COLOR208FFF{X~G!5-1~C~N~{};