通达信红包吸筹买入未加密选股指标公式源码

源码正文：

VAR2:=REF(LOW,1){XG51};
VAR3:=SMA(Abs(LOW-VAR2),3,1)/Sma(MAX(LOW-VAR2,0),3,1)*100{XG51};
VAR4:=ema(IF(CLOSE*1.2,VAR3*10,VAR3/10),3){XG51};
VAR5:=LLV(LOW,30){XG51};
VAR6:=HHV(VAR4,30){XG51};
VAR7:=IF(LLV(LOW,58),1,0){XG51};
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7{XG51};
VAR9:=IF(VAR8>100,100,VAR8){XG51};
VAR5X:=LLV(LOW,75){XG51};
VAR6X:=HHV(HIGH,75){XG51};
VAR7X:=(VAR6X-VAR5X)/100{XG51};
VAR8X:=SMA((CLOSE-VAR5X)-VAR7X,20,1){XG51};
VARA:=3*VAR8X-2*SMA(VAR8X,15,1){XG51};
VAR26:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100{XG51};
VAR28:=SMA(VAR26,3,1){XG51};
红包吸筹买入: (CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100,COLOR00FF00{XG51};
底部吸筹指标: (CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100,COLOR00FF00{XG51};
stICKLINE(VAR8,0,VAR8,6,1),COLOR00FF00{XG51};
STICKLINE(crOSS(16.5,红包吸筹买入),40,0,4,0),COLORF00FF0{XG51};
STICKLINE(CROSS(40,红包吸筹买入),40,0,4,0),COLORF00FF0{XG51};
STICKLINE(CROSS(20,红包吸筹买入),40,0,4,0),COLORF00FF0{XG51};
LC:=REF(CLOSE,1){XG51};
rsi5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100){XG51};
TR1:=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) / TR1){XG51};
mdi:=((DMM * 100) / TR1){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,阶段底部,0.3,1),LINETHICK2,COLORCC6600{XG51};
STICKLINE((阶段底部 < 0),0,阶段底部,0.8,1),LINETHICK6,COLORWHITE{XG51};
趋势线上穿零:LLV(阶段底部,1),COLORFFFFFF{XG51};
STICKLINE((趋势线上穿零 >230 ),250,趋势线上穿零,0.8,1),LINETHICK6,COLORCYAN{X?G*5*1?C?N?{};

源码正文：

N:=60{XG51};
BC:=(IF(C>(H+L+C)/3,(H*0.618+L*0.382)*0.382,(H*0.382+L*0.618)*0.382)+(O*0.382+C*0.618)*0.618){XG51};
EMN:ema((ma(BC,N)+SMA(BC,N,N/3))/2,N),COLOR6600FF{XG51};
空头:EMA((EMN-(C-EMN)*C),1),COLORCYAN{XG51};
多头:EMA((EMN+(C-EMN)*C),1),COLORWHITE{XG51};
IF(多头<空头,多头,DRAWNULL),COLORGREEN{XG51};
GO:=EMN+(O-EMN)*O{XG51};
GH:=EMN+(H-EMN)*H,LINETHICK{XG51};
GL:=EMN+(L-EMN)*L,LINETHICK{XG51};
GC:=EMN+(C-EMN)*C,LINETHICK{XG51};
MA3C:=((EMA(GC,19)+EMA(GC,29))/2+EMA(GC,24))/2{XG51};
MA3H:=((EMA(GH,19)+EMA(GH,29))/2+EMA(GH,24))/2{XG51};
MA3L:=((EMA(GL,19)+EMA(GL,29))/2+EMA(GL,24))/2{XG51};
MA3O:=((EMA(GO,19)+EMA(GO,29))/2+EMA(GO,24))/2{XG51};
进出线:=(IF(MA3C>(MA3H+MA3L+MA3C)/3,(MA3H*0.618+MA3L*0.382)*0.382,(MA3H*0.382+MA3L*0.618)*0.382)+(MA3O*0.382+MA3C*0.618)*0.618){XG51};
FS:=2*进出线-REF(进出线,1),COLORRED{XG51};
趋势线:IF(进出线<FS,FS,进出线),COLORRED{XG51};
stICKLINE(GC>=GO,GL,GH,0,0),COLORWHITE{XG51};
STICKLINE(GC>GO,GO,GC,2,0),COLORWHITE{XG51};
STICKLINE(GC>GO,GO,GC,1,0),COLORCC66FF{XG51};
STICKLINE(GC<GO,GO,GC,2,0),COLORAAAA00,COLORYELLOW{XG51};
STICKLINE(GC<GO,GO,GC,1,0),COLORFFCCAA,COLORAAAA00{XG51};
STICKLINE(GC<GO,GL,GH,0,0),COLOR00BB00{X~G=5=1~C~N~{};