通达信发现机构入场未加密选股指标公式源码

通达信发现机构入场未加密选股指标公式源码

源码正文：

VAR1C:=(HIGH - MIN(OPEN,CLOSE)){XG51};
VAR2C:=(CLOSE - OPEN){XG51};
VAR3C:=(MIN(OPEN,CLOSE) - LOW){XG51};
VAR4C:=(HIGH - LOW){XG51};
VAR5C:=((vol * VAR1C) / VAR4C){XG51};
VAR6C:=((VOL * VAR2C) / VAR4C){XG51};
VAR7C:=((VOL * VAR3C) / VAR4C){XG51};
VAR8C:=((VAR5C - VAR6C) - VAR7C){XG51};
VAR4:=ma(CLOSE,5){XG51};
VAR5:=MA(CLOSE,10){XG51};
VAR6:=MA(CLOSE,30){XG51};
VAR7:=MA(CLOSE,60){XG51};
VAR8:=ema(COst(85),7){XG51};
VAR9:=EMA(COST(15),7){XG51};
VARA:=(SUM(((CLOSE * VOL) * 100),4) / SUM((VOL * 100),4)){XG51};
VARB:=(INTPART((VARA * 100)) / 100){XG51};
VARC:=(SUM(((CLOSE * VOL) * 100),7) / SUM((VOL * 100),7)){XG51};
VARD:=(INTPART((VARC * 100)) / 100){XG51};
VARE:=(SUM(((CLOSE * VOL) * 100),28) / SUM((VOL * 100),28)){XG51};
VARF:=(INTPART((VARE * 100)) / 100){XG51};
短线趋势:(EMA(CLOSE,5) - EMA(CLOSE,10)){XG51};
中线趋势:EMA(短线趋势,9){XG51};
VAR10:=((0 - ((100 * (HHV(CLOSE,5) - CLOSE)) / (HHV(CLOSE,5) - LLV(LOW,5)))) + 100){XG51};
VAR11:=((0 - ((100 * (HHV(CLOSE,10) - CLOSE)) / (HHV(CLOSE,10) - LLV(LOW,10)))) + 100){XG51};
VAR12:=((0 - ((100 * (HHV(CLOSE,20) - CLOSE)) / (HHV(CLOSE,20) - LLV(LOW,20)))) + 100){XG51};
VAR13:=((0 - ((100 * (HHV(CLOSE,30) - CLOSE)) / (HHV(CLOSE,30) - LLV(LOW,30)))) + 100){XG51};
VAR14:=REF(中线趋势,1){XG51};
VAR15:=中线趋势{XG51};
VAR16:=(VAR15 - VAR14){XG51};
VAR17:=REF(短线趋势,1){XG51};
VAR18:=短线趋势{XG51};
VAR19:=(VAR18 - VAR17){XG51};
VAR1A:=OPEN{XG51};
VAR1B:=CLOSE{XG51};
发现机构入场:IF((((((((VAR1A <= VAR4) AND (VAR1A <= VAR5)) AND (VAR1A <= VAR6)) AND (VAR1B >= VAR4)) AND (VAR1B >= VARF)) AND (VAR16 > 0)) AND (VAR19 > 0)),5.8,0),LINETHICK2,COLORWHITE{XG51};
短线指标:IF(((((crOSS(短线趋势,中线趋势) AND (短线趋势 < 0)) AND (中线趋势 < (0 - 0.2)+4)) AND (VAR11 > 45)) AND (VAR16 > 0)),2.6,0.1),COLORLIMAGENTA{XG51};
BU:=CROSS(短线趋势,中线趋势){XG51};
DRAWICON(CROSS(短线趋势,中线趋势),中线趋势,1){XG51};
横盘突破:(LAST((H-L)/REF(C,1)<0.1,20,0) AND VOL>REF(VOL,1)*2 AND C>REF(C,1)*1.03
AND dmi.pdi>DMI.mdi AND DMI.ADX>DMI.ADXR ANDDMI.ADXR>DMI.MDI
AND DMI.PDI>DMI.ADX)/2{X^G-5~1^C^N^{};

通达信跟庄建仓优化版未加密选股指标公式源码

源码正文：

A1:=CAPITAL{XG51};
A2:=(((H + L) + O) + C) / 4{XG51};
A3:=(((INDEXH + INDEXL) + INDEXO) + INDEXC) / 4{XG51};
A4:=(A2 - (REF(A2,1))) / (REF(A2,1)){XG51};
A5:=(A3 - (REF(A3,1))) / (REF(A3,1)){XG51};
A6:=(((SUM(A4,10)) + (SUM(A5,10))) / 10) * 1000{XG51};
A7:=IF(((A6 > 0) AND (A6 < 75)),A6,(IF((A6 > 75),75,0))){XG51};
A8:=IF(((A6 < 0) AND (A6 > -75)),REVERSE(A6),(IF((A6 < -75),75,0))){XG51};
stICKLINE(A8,150,(150 - A8),3,1),COLOR825200{XG51};
STICKLINE(A7,150,(150 - A7),3,1),COLOR7A67CF{XG51};
A17:=(SUM((A2 * VOL),16)) / (SUM(VOL,16)){XG51};
A18:=(SUM((A2 * VOL),11)) / (SUM(VOL,11)){XG51};
A19:=(SUM((A2 * VOL),6)) / (SUM(VOL,6)){XG51};
A20:=((SUM((A2 * VOL),7)) - (A2 * VOL)) / ((SUM(VOL,7)) - VOL){XG51};
A21:=((A18 - A17) / A2) * 1000{XG51};
A22:=IF((A21 > 50),50,(IF((A21 < -50),-50,A21))){XG51};
A23:=((A19 - A18) / A2) * 1000{XG51};
A24:=IF((A23 > 50),50,(IF((A23 < -50),-50,A23))){XG51};
A25:=((((A19 - A20) / A20) * 5) / 4) * 1000{XG51};
A26:=IF((A25 > 50),50,(IF((A25 < -50),-50,A25))){XG51};
A27:=(A22 + A24) + A26{XG51};
红柱线:IF((A27 > 0),A27,0),COLOR003ADB,LINETHICK2{XG51};
兰柱线:IF((A27 < 0),REVERSE(A27),0),COLORE99A2C,LINETHICK2{XG51};
A40:=ema((((CLOSE - (LLV(LOW,25))) / ((HHV(HIGH,25)) - (LLV(LOW,25)))) * 4),4){XG51};
{XG51};
macd:=MacD.MACD(12,26,9)*25{XG51};
STICKLINE((MACD>0),MACD,0,3,1),COLOR003ADB,LINETHICK2{XG51};
STICKLINE((MACD < 0),MACD,0,3,1),COLORE99A2C,LINETHICK2{XG51};
STICKLINE(( MACD.MACD(12,26,9)>MACD.dif(12,26,9) AND MACD < 0 ),MACD,0,3,1),COLORFF00FF,LINETHICK2{XG51};
DIF负:IF(MACD.DIF(12,26,9)<0,兰柱线,DRAWNULL),COLORCYAN,LINETHICK2{X_G-5-1_C_N_{};