通达信底部不后悔未加密选股指标公式源码

源码正文：

A1:=DATE <= 1070615{XG51};
A2:=(100 * (CLOSE - (ma(CLOSE,30)))) / (MA(CLOSE,30)){XG51};
A3:=100 - ((90 * ((HHV(HIGH,20)) - CLOSE)) / ((HHV(HIGH,20)) - (LLV(LOW,20)))){XG51};
A4:=100 - (MA(((100 * ((HHV(HIGH,6)) - CLOSE)) / ((HHV(HIGH,6)) - (LLV(LOW,6)))),28)){XG51};
A5:=MA(A4,6){XG51};
红持股:IF((A3 < A5),A5,A3),colorred{XG51};
绿持币:IF((A3 > A5),A5,A3),colorgreen{XG51};
强弱:(A5),LINETHICK1,coloryellow{XG51};
A6:=(3 * (SMA((((CLOSE - (LLV(LOW,27))) / ((HHV(HIGH,27)) - (LLV(LOW,27)))) * 100),5,1))) - (2 * (SMA((SMA((((CLOSE - (LLV(LOW,27))) / ((HHV(HIGH,27)) - (LLV(LOW,27)))) * 100),5,1)),3,1))){XG51};
A7:=(10){XG51};
百万测底:((crOSS(A6,A7)) * 75) * A1,LINETHICK2,COLOR0000FF{XG51};
A8:=(REF(CLOSE,1)) / CLOSE{XG51};
A9:=MIN((MA(((AMOUNT / vol) / 100),15)),(ema(((AMOUNT / VOL) / 100),15))){XG51};
A10:=((1 - ((SMA(((LOW * A8) - (A8 / 10)),6,1)) / (EMA(((AMOUNT / VOL) / 100),15)))) * 100) - (100 / 10){XG51};
A11:=((((1 - ((MA((LOW - (A8 / 10)),6)) / A9)) * (dma(CLOSE,(VOL / CAPITAL)))) / (MA(LOW,6))) * 100) - (100 / 10){XG51};
A12:=((((A10 + (A11 / 10)) > 0) AND (DATE > 1000101)) AND (DATE < 1991231)) AND ((COUNT((((1 - (CLOSE / (REF(CLOSE,1)))) > 0.099) AND ((1 - ((REF(CLOSE,1)) / (REF(CLOSE,2)))) > 0.099)),20)) < 3){XG51};
A13:=(((((((A10 + (A11 / 10)) > -3.688) AND (DATE > 1000101)) AND (DATE < 1991231)) AND ((CLOSE / (REF(CLOSE,1))) > 1.02)) AND ((COUNT((((1 - (CLOSE / (REF(CLOSE,1)))) > 0.099) AND ((1 - ((REF(CLOSE,1)) / (REF(CLOSE,2)))) > 0.099)),20)) < 3)) AND (((REF(CLOSE,1)) / (REF(CLOSE,2))) < 0.95)) AND ((CLOSE / (HHV(HIGH,20))) < 0.855){XG51};
灵桥黑马:((IF(((((100 < 100) AND ((A10 + (A11 / 10)) > 0)) AND (DATE > 1000101)) AND (DATE < 1991231)),(A12 = 1),(A13 = 1))) * 100) * A1,LINETHICK2,colorred{XG51};
A14:=EMA(CLOSE,8){XG51};
A15:=EMA(A14,20){XG51};
A16:=CROSS(A14,A15){XG51};
A17:=A14 < (EMA(CLOSE,120)){XG51};
大波黑马起步:((A16 AND A17) * 75) * A1,LINETHICK2,coloryellow{XG51};
A18:=SUM((IF((CLOSE > (REF(CLOSE,1))),VOL,(IF((CLOSE < (REF(CLOSE,1))),(0 - VOL),0)))),0){XG51};
A19:=SUMBARS(VOL,CAPITAL){XG51};
A20:=(IF((CLOSE > (LLV(CLOSE,A19))),1,-1)) * (IF((A18 > (LLV(A18,A19))),1,-1)){XG51};
A21:=IF((A20 = -1),1,0){XG51};
A22:=(COUNT((A21 = 1),8)) > 2{XG51};
A23:=((SUM(AMOUNT,13)) / ((AMOUNT / VOL) / 100)) / 100{XG51};
A24:=DMA((((((3 * HIGH) + LOW) + OPEN) + (2 * CLOSE)) / 7),(VOL / A23)){XG51};
A25:=(((CLOSE - A24) / A24) * 100) < -15{XG51};
A26:=((CLOSE - (MIN(((REF(CLOSE,5)) * 0.865),((REF(CLOSE,21)) * 0.772)))) / CLOSE) < 0.05{XG51};
A27:=REF(LOW,1){XG51};
A28:=((SMA(Abs((LOW - A27)),3,1)) / (SMA((MAX((LOW - A27),0)),3,1))) * 100{XG51};
A29:=EMA((IF((CLOSE * 1.2),(A28 * 10),(A28 / 10))),3){XG51};
A30:=LLV(LOW,38){XG51};
A31:=HHV(A29,38){XG51};
A32:=IF((LLV(LOW,90)),1,0){XG51};
A33:=((EMA((IF((LOW <= A30),((A29 + (A31 * 2)) / 2),0)),3)) / 618) * A32{XG51};
(stICKLINE(A33,0,A33,6,1)) ,colorblue{XG51};
底部不买你后悔:(IF(((A25 AND A26) AND A22),60,0)) * A1{XG51};
LC:=REF(CLOSE,1){XG51};
rsi5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100){XG51};
R:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10){XG51};
HD:=(HIGH - REF(HIGH,1)){XG51};
LD:=(REF(LOW,1) - LOW){XG51};
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10){XG51};
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10){XG51};
pdi:=((DMP * 100) / R){XG51};
mdi:=((DMM * 100) / R){XG51};
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5){XG51};
AV:=(RSI5 + ADX){XG51};
DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5){XG51};
0,COLORFF00FF{XG51};
wr10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10))){XG51};
NEWVOL:=(RSI5 - WR10){XG51};
阶段底部:=(AV + NEWVOL){XG51};
STICKLINE((阶段底部 >= 0),0,阶段底部,1,0),COLORCC6600{XG51};
STICKLINE((阶段底部 < 0),0,阶段底部,4,0),COLORWHITE{XG51};
趋势线:LLV(阶段底部,1),COLORFFFFFF{XG51};
STICKLINE((趋势线 >230 ),250,趋势线,4,0),COLORCYAN{XG51};
230,COLORFFFFFF{X_G!5^1_C_N_{};

源码正文：

dif:ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DEA:EMA(DIF,9){XG51};
macd:"MacD.MACD",NODRAW{XG51};
W1:stICKLINE(MACD>0,MACD,0,3,1),COLORWHITE{XG51};
W2:STICKLINE(MACD<0,MACD,0,3,1),COLORGREEN{XG51};
VA1:=HHVBARS(MACD,BArslAST(MACD<0)+1){XG51};
VA2:=crOSS(BACKSET(CROSS(0,MACD),REF(VA1,1)+2),0.5){XG51};
QG:=CROSS(BACKSET(CROSS(0,MACD) OR (ISLASTBAR AND MACD>0),REF(VA1,1)+2),0.5){XG51};
前高:DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORLIMAGENTA{XG51};
VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1){XG51};
VA4:=CROSS(BACKSET(CROSS(MACD,0),REF(VA3,1)+2),0.5){XG51};
BD:=BARSLAST(FILTERX(CROSS(0,MACD),BARSCOUNT(C))){XG51};
前低:DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1){XG51};
BDTJ:=IF(MACD<0,FILTERX(MACD=LLV(MACD,BARSLAST(MACD>0)),
BARSCOUNT(C)),DRAWNULL){XG51};
TSBDTJ:=BARSLAST(BDTJ){XG51};
BDZH:=FILTERX(MACD<CONST(LLV(MACD,BD+1)),BARSCOUNT(C)){XG51};
BDTS:=BARSLAST(BDZH){XG51};
本低:IF(BD+1>=1,CONST(LLV(MACD,BD+1)),DRAWNULL){XG51};
BDCL:=CROSS(COUNT(CROSS(MACD>本低/2 AND MACD<0,0.5),TSBDTJ)=1,0.5) AND TSBDTJ>=0{XG51};
终点:=IF(ISLASTBAR AND MACD>0 AND MACD=HHV(MACD,BARSLAST(MACD<0)),1,
IF(FILTERX(QG,BARSCOUNT(C)),2,DRAWNULL)){XG51};
UU:=(终点=1 OR 终点=2) AND MACD>0{XG51};
ZZ:=FILTERX(UU,BARSCOUNT(C)){XG51};
本高:DRAWLINE(ZZ,MACD,REF(ZZ,1),REF(MACD,1),1),COLORRED{XG51};
横线:=CONST(REF(MACD,BARSLAST(ZZ))){XG51};
WW:=MACD>横线{XG51};
起始点:=FILTERX(REFX(BARSLAST(WW),1)=1,BARSCOUNT(C)){XG51};
天数:BARSLAST(起始点),COLORBLUE,NODRAW{XG51};
上横线:DRAWLINE(起始点,横线,ZZ,横线,0),COLORCYAN,DOTLINE{XG51};
下横线:DRAWLINE(BDZH,CONST(LLV(MACD,BD+1)),BDTJ=1,MACD,0),COLOR8080FF,DOTLINE{XG51};
DRAWNUMBER(BDTJ,CONST(LLV(MACD,BD+1))*0.9,BDTS){XG51};
DRAWNUMBER(ZZ,上横线*1.1,天数){XG51};
TJ:=IF(起始点,BARSNEXT(ZZ),DRAWNULL){XG51};
红柱数量:IF(天数>0 AND 天数<=REF(TJ,天数),SUM(MACD>0,天数),DRAWNULL),COLORRED,NODRAW{XG51};
横线起始价:REF(C,天数),NODRAW{XG51};
空间评估:(横线起始价-C)/C*100,NODRAW{XG51};
TT:=BARSLAST(ZZ){XG51};
WQG:=CROSS(COUNT(CROSS(MACD<本高/2 AND MACD>0,0.5),ZZ)=1,0.5) AND ZZ>=0{XG51};
STICKLINE(MACD>前高 AND 本高>前高 AND BARSLAST(CROSS(MACD<本高/2,0.5))>0 AND
MACD>(前高+本高)/2,MACD,前高,1,0),COLORBLUE{XG51};
前高本高二分位:IF(MACD>0 AND 本高!=前高,DRAWLINE(WQG,(前高+本高)/2,REF(WQG,1),REF((前高+本高)/2,1),1)
,DRAWNULL),COLORC0C000,DOTLINE{XG51};
AA:=STRCAT(STRCAT(STRCAT('〖','上升空间'),'〗'),CON2STR(IF(空间评估,空间评估,
DRAWNULL),2)){XG51};
DRAWTEXT(WQG,MACD*1.1,'本高成立'),COLORRED{XG51};
DRAWTEXT(BDCL,MACD*1.1,'本低成立'),COLORRED{XG51};
STICKLINE(MACD>前高,MACD,前高,1,0),COLORBLUE{XG51};
STICKLINE(WQG,MACD,0,1,0),COLORCYAN{XG51};
STICKLINE(MACD<0 AND MACD<前低 AND 前低<0,MACD,前低,1,0),COLORYELLOW{XG51};
B1:=IF(CROSS(MACD<0,0.5),BARSNEXT(BDTJ),DRAWNULL){XG51};
TSB1:=BARSLAST(MACD>0)-1{XG51};
STICKLINE(BARSLAST(BDCL)>=0 AND MACD<前低 AND MACD<0,MACD,前低,1,0),COLORCYAN{XG51};
STICKLINE(BDCL,MACD,0,1,0),COLORRED{XG51};
STICKLINE(MACD>前高 AND 本高>前高 AND BARSLAST(WQG)>0,
MACD,前高,1,0),COLORWHITE{XG51};
DRAWTEXT(VA2 AND VA2!=UU,(MACD/10)*9,'前'){XG51};
DRAWTEXT(VA2 AND VA2!=UU,MACD/10,'高'){XG51};
DRAWTEXT(ZZ,(MACD/10)*9,'本'),COLORRED{XG51};
DRAWTEXT(ZZ,MACD/10,'高'),COLORRED{XG51};
DRAWTEXT(BDTJ,(MACD/10)*9,'低'),COLORWHITE{XG51};
DRAWTEXT(BDTJ,MACD/10,'本'),COLORWHITE{XG51};
IF(BARSLAST(BDCL)>=0,本低/2,DRAWNULL),COLORWHITE,DOTLINE{XG51};
DRAWTEXT_FIX(1,0.05,0.04,0,'【黑马拉升由两个阶段构成：同步上涨阶段（黄芯柱）
和惯性上涨阶段（背离阶段、红芯柱）】'),COLORFFFF00{X*G-5~1*C*N*{};