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

源码正文：

VAR1:=ma(WINNER(CLOSE),9)*100;
买！: crOSS(VAR1,2)*30,COLOR0000FF ,LINETHICK3 ;
VAR2:=(1-ema((HHV(HIGH,15)-CLOSE)/(HHV(HIGH,15)-LLV(LOW,15)),15))*100;
VAR3:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
VAR4:=SMA(VAR3,9,1);
VAR5:=SMA(VAR4,9,1);
VAR6:=(CLOSE-SMA(CLOSE,13,1))/SMA(CLOSE,13,1)*(-100);
VAR7:=REF(VAR6,1)>13 AND REF(VAR6,1)/VAR6>1.23 AND CLOSE/REF(CLOSE,1)>1.03;
春笋: IF(VAR7 AND REF(CLOSE,1)<=COst(5),20,0),LINESTICK ,COLOR00FF00,LINETHICK2;
VAR8:=MA(CLOSE,27);
VAR9:=(CLOSE-VAR8)/VAR8*100;
VARA:=MA(VAR9,2);
VARB:=BArslAST(CROSS(-10,VARA)=1);
VARC:=BARSLAST(CROSS(VARA,10)=1);
VARD:=VARA<-10 AND VARB>3;
VARE:=VARA>10 AND VARC>3;
黄金坑: IF(VARD,VARA,0),LINESTICK ,LINETHICK2, COLORBLUE;
财神到: IF(VARE,VARA,0),LINESTICK , COLORCYAN;
贪嘴乐: IF(VARA>REF(VARA,1) AND VARD AND VARA<-15,30,0),LINETHICK2,LINESTICK,COLORFFA2AF;
DRAWICON(贪嘴乐>0,40,1);
VARF:=REF(LOW,1)*0.9;
VAR10:=LOW*0.9;
VAR11:=(VAR10*vol+VARF*(CAPITAL-VOL))/CAPITAL;
VAR12:=EMA(VAR11,30);
VAR13:=CLOSE-REF(CLOSE,1);
VAR14:=MAX(VAR13,0);
VAR15:=Abs(VAR13);
VAR16:=SMA(VAR14,7,1)/SMA(VAR15,7,1)*100;
VAR17:=SMA(VAR14,13,1)/SMA(VAR15,13,1)*100;
VAR18:=BARSCOUNT(CLOSE);
VAR19:=SMA(MAX(VAR13,0),6,1)/SMA(ABS(VAR13),6,1)*100;
VAR1A:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
VAR1B:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
VAR1C:=SMA((SMA(VAR1B,4,1)-50)*2,3,1);
VAR1D:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
VAR1E:=SMA(VAR1D,4,1);
VAR1F:=SMA(VAR1E,3,1);
VAR20:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
VAR21:=VAR19<=25 AND VAR1A<-95 AND VAR20>20 AND VAR1C<-30 AND VAR1F<30 AND VAR12-CLOSE>=-0.25 AND VAR16<22 AND VAR17<28 AND VAR18>50;
血战超跌: STICKLINE(VAR21,0,60,5,0){X*G-5*1*C*N*{};

源码正文：

HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;maDISPLAY:=0{XG51};
AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1){XG51};
QY:=BacKSET(AA,HIGHN+1){XG51};
CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1){XG51};
DRAWICON(CC,H*1.02,2){XG51};
DDD:=BArslAst(CC){XG51};
GDTS:=IF(CC,CURRBARSCOUNT,0){XG51};
DINGBU:=IF(DDD,REF(H,DDD),H){XG51};
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS){XG51};
DINGBU1:=REF(DINGBU,DDD+1){XG51};
GDCS1:=CONST(DINGBUTS){XG51};
DINGBUTS1:=REF(DINGBUTS,DDD+1){XG51};
GDCS2:=CONST(DINGBUTS1){XG51};
DINGBU2:=REF(DINGBU1,DDD+1){XG51};
MM:=IF(CURRBARSCOUNT>GDCS2,0,1){XG51};
高点压力:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) COLORCYAN,LINETHICK2{XG51};
DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT{XG51};
DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORBLUE,POINTDOT{XG51};
AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1){XG51};
QY1:=BACKSET(AA1,LOWN+1){XG51};
CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1){XG51};
DRAWICON(CC1,L*0.98,1){XG51};
DD1:=BARSLAST(CC1){XG51};
DDTS:=IF(CC1,CURRBARSCOUNT,0){XG51};
YDB:=IF(DD1,REF(L,DD1),L){XG51};
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS){XG51};
DDCS1:=CONST(DDTS1){XG51};
ZDB:=REF(YDB,DD1+1){XG51};
DDTS2:=REF(DDTS1,DD1+1){XG51};
DDCS2:=CONST(DDTS2){XG51};
低点支撑:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1) COLORWHITE,LINETHICK2{XG51};
ZGSTAR:=(高点压力+低点支撑)/2{XG51};
ZGEND:=CONST((高点压力+低点支撑)/2){XG51};
STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2){XG51};
中轨:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORFF55BB,LINETHICK2;

DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLORLIMAGENTA,POINTDOT,{XG51};
DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLORGREEN,POINTDOT;

ema13:=EMA(C,13),COLORRED;
EMA21:=EMA(C,21),COLORBLUE;
EMA34:=EMA(C,34),COLORFF00FF;
EMA60:=MA(C,60),COLORFFCC66;
VAR2:=(2*CLOSE+HIGH+LOW)/4;
VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);
VAR4:=LLV(LOW,5); VAR5:=HHV(HIGH,4);
散户:=EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3;
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3;
DRAWTEXT(crOSS(散户,庄家) AND 散户<30,L-0.05,'←低吸'),COLORLICYAN;
DRAWTEXT(CROSS(庄家,散户) AND 散户>70,H+0.05,'←高抛'),COLORCYAN;
DRAWICON(CROSS(散户,庄家) AND 散户<30,L-0.05,1);
DRAWICON(CROSS(庄家,散户) AND 散户>70,H+0.05,2);
VAR9:=CLOSE-REF(CLOSE,5);
VARA:=EMA(EMA(VAR9,5),5)/EMA(EMA(Abs(VAR9),5),5);
VARC:=EMA(EMA(VAR9,20),20)/EMA(EMA(ABS(VAR9),20),20);
卖出:=IF(VARA>0 AND CROSS(VARC,VARA),90,100);
DRAWICON(卖出<0,H+0.05,2); 买线:=EMA(CLOSE,2);
卖线:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42);
B1:IF(CROSS(买线,卖线),L-0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORLIMAGENTA;
S1:IF(CROSS(80,rsi)*30,H+0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORBLUE;
VC:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA (CLOSE,32))/MA(CLOSE,32)*100)/3{XG51};
S2:=IF(VC>20 AND FILTER(VC< REF(VC,1),5),H+0.02,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORCYAN;
A0:=(L+H+C*2)/4{XG51};
A1:EMA(A0,14)COLORYELLOW,LINETHICK2{XG51};
A2:=EMA(A0,25)COLORLIGREEN,LINETHICK2{XG51};
A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW{XG51};
A2X:=(A2-REF(A2,1))/REF(A2,1)*100,NODRAW{XG51};
看多:IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0))),DRAWNULL),COLORLIMAGENTA{XG51};
逃顶:IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,BARSLAST(CROSS(0,A1X))),DRAWNULL),COLORGREEN,{XG51};
买入持股:IF(A1X>=0,A1,DRAWNULL)COLORWHITE,LINETHICK3{XG51};
卖出空仓:IF(A1X<0 AND A2X<0,A1,DRAWNULL)COLORCYAN,LINETHICK3{XG51};
STICKLINE(CROSS(A1X,0),H,L,0,0 ),COLOR9933FF{XG51};
STICKLINE(CROSS(A1X,0),C,O,3,0 ),COLOR0000CC;
STICKLINE(CROSS(A1X,0),C,O,1,0 ),COLOR0033FF;
STICKLINE(CROSS(0,A1X),L,H,0,0 ),COLOR66CC33{X~G_5_1~C~N~{};