通达信杨林黄金柱未加密选股指标公式源码

源码正文：

A1:=ema(C,12)-Ema(C,25){XG51};
A2:=EMA(A1,6){XG51};
★主力:(A2>=0)*A2,COLORRED,LINETHICK0{XG51};
stICKLINE(A2>=0,A2,0,5,0),COLORRED{XG51};
STICKLINE(A2<0,A2,0,5,0),COLORD4FF7F{XG51};
STICKLINE(A1<0,A1,0,5,0),COLORB00058{XG51};
STICKLINE(A1>=0,A1,0,5,0),COLORWHITE{XG51};
VAR8:=vol>2*MA(VOL,30){XG51};
VAR9:="dmi.ADX"(12,6){XG51};
VARA:="DMI.ADXR"(12,6){XG51};
VARB:=CLOSE>MA(CLOSE,30) AND CLOSE<MA(CLOSE,30)*1.04{XG51};
VARC:=MA(CLOSE,30)>REF(MA(CLOSE,30),1){XG51};
VARD:=BArslAST(crOSS(MA(CLOSE,5),MA(CLOSE,10)))<BARSLAST(CROSS(MA(CLOSE,10),MA(CLOSE,5))){XG51};
VARF:=TROUGHBARS(3,15,1)<4{XG51};
VAR10:=EMA(CLOSE,30)>REF(EMA(CLOSE,30),2){XG51};
VAR11:=IF(VARF=1,50,0){XG51};
★机构:EMA((CLOSE-MA((2*CLOSE+HIGH+LOW)/4,30))/MA((2*CLOSE+HIGH+LOW)/4,30)*100,3),COLORRED{XG51};
0,COLORWHITE{XG51};
STICKLINE(FILTER(VARF=1,5) AND ★机构<-10,50,0,15,1),COLORBLUE{XG51};
STICKLINE(FILTER(VARF=1,5),86,0,8,0),COLORWHITE{XG51};
DRAWTEXT(FILTER(VARF=1,3),76,' ★◆ 黄金柱◆ '),COLORBLUE{XG51};
STICKLINE(★机构<-10,0,★机构,0.85,0),COLORCYAN{XG51};
STICKLINE(★机构>10,0,★机构,0.95,0),COLORBLUE{XG51};
★低点:CROSS(rsi,11)*80,COLORYELLOW{XG51};
DRAWTEXT(CURRBARSCOUNT=6,119,'作者 杨林'),COLORBLUE{XG51};
DRAWTEXT(★低点,39,'★低点'),COLOR66FFCC{XG51};
VAR6:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR7:=SMA(Abs(VAR6-H),13,1)/SMA(MAX(VAR6-H,0),10,1);
VAR0:=EMA(IF(H>=VAR9,VAR8,0),3){XG51};
★主出场:IF(VAR0>REF(VAR0,1),-VAR0+100,100),COLORCYAN{XG51};
VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1);
VAR3:=EMA(VAR2,10),COLORCYAN{XG51};
VAR4:=LLV(LOW,33),COLORRED{XG51};
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3){XG51};
★主进场:IF(VAR5>REF(VAR5,1),VAR5,0),COLORWHITE{X!G.5-1!C!N!{};

源码正文：

下轨道:=(SMA(LOW,21,2) * 0.969),COLOR00FFFF{XG51};
ZL:=(Sma(HIGH,21,2) * 1.05){XG51};
XD:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100){XG51};
RRSV:=SMA(XD,3,1){XG51};
KK:=SMA(RRSV,3,1){XG51};
DD:=((3 * RRSV) - (2 * KK)){XG51};
J12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100){XG51};
SV24:=SMA(J12,3,1){XG51};
K2:=SMA(SV24,3,1){XG51};
D2:=((3 * SV24) - (2 * K2)){XG51};
压力Q:=IF(crOSS(D2,DD),HIGH,REF(HIGH,BArslAst(CROSS(D2,DD)))),COLORFFFFFF{XG51};
压力位Q:=IF(ISLASTBAR,压力Q,DRAWNULL),NODRAW{XG51};
压力位:=ISLASTBAR,压力Q,COLORBLUE{XG51};
底部:=LLV(HIGH,30),COLOR00FF00{XG51};
底部位:=IF(ISLASTBAR,底部,DRAWNULL),NODRAW{XG51};
底:=ISLASTBAR,底部{XG51};
短期底部:=LLV(HIGH,30),LINETHICK2,COLOR0000FF{XG51};
短线5%:FILTER(((((LOW < 下轨道) AND (CLOSE > MA(CLOSE,15))) AND (CLOSE > 短期底部)) AND (HIGH < 压力位)),10){X.G.5+1.C.N.{};