通达信高仿真主图未加密选股指标公式源码

源码正文：

ma1:=ema(C,3){XG51};
MA5:EMA(C,5),COLORFFFFFF{XG51};
MA10:EMA(C,10){XG51};
MA15:=EMA(C,15){XG51};
MA12:=EMA(C,12){XG51};
MA21:EMA(C,21),COLORFF00CC{XG51};
MA60:MA(C,60){XG51};
C0:=(H+L+C)/3{XG51};
A1:=HHV(C0,14){XG51};
A2:=LLV(C0,14){XG51};
A3:=A1-A2{XG51};
A4:=EMA((C0-A2)/A3,2){XG51};
A1X:=A4,COLORBLUE{XG51};
低:=REF(LLV(L,105),3){XG51};
RCC:REFDATE(低,DATE),POINTDOT,COLORBLACK,LINETHICK3{XG51};
RR:RCC*0.95;RE:RR*0.95;RW:RE*0.95;RQ:RW*0.95{XG51};
stICKLINE(RR<RCC,RR,RCC,4,0 ),COLORBB5E00{XG51};
STICKLINE(RE<RR,RR,RE,4,0 ),COLORD56A00{XG51};
STICKLINE(RE>RW,RW,RE,4,0 ),COLORF97C00{XG51};
STICKLINE(RQ<RW,RW,RQ,4,0 ),COLORFF9225{XG51};
DD1:=IF(A1X>0,A1X/1.5+RCC,DRAWNULL),COLORBLUE{XG51};
B:RCC+EMA(C,2)-EMA(C,17),COLORWHITE,LINETHICK0{XG51};
NN:=IF(B>RCC,B,DRAWNULL),COLORCYAN{XG51};
OO:=IF(B>RCC,B,DRAWNULL);OK:=IF(B<RCC,B,DRAWNULL){XG51};
DRAWBAND(DD1,RGB(200,155,0),RCC,RGB(0,0,0)){XG51};
DRAWBAND(OO,RGB(130,30,50),RCC,RGB(0,0,0)){XG51};
DRAWBAND(RCC,RGB(0,170,250),OK,RGB(0,0,0)){XG51};
LL:=IF(MA1>MA15,MA15,DRAWNULL);WW:=IF(MA1>MA21,MA21,DRAWNULL){XG51};
DRAWBAND(MA15,RGB(255,255,0),WW,RGB(0,0,0)){XG51};
DRAWBAND(MA10,RGB(255,0,0),LL,RGB(0,0,0)){XG51};
P:=((2)*(CLOSE) + HIGH + LOW + OPEN)/(5){XG51};
cci:=((P - MA(P,14))*(100))/((1.5)*(AVEDEV(P,14))){XG51};
rsi1:=((SMA(MAX(CLOSE - REF(CLOSE,1),0),6,1))/(SMA(Abs(CLOSE - REF(CLOSE,1)),6,1)))*(100){XG51};
STICKLINE((RSI1 < 25),RCC,RCC-0.12,3,1),COLOR00FFFF{XG51};
STICKLINE((CCI < (-100)),RCC,RCC-0.05,3,0),COLORWHITE,LINETHICK1{XG51};
VAR01:=REF((LOW+OPEN+CLOSE+HIGH)/4,1){XG51};
VAR02:=SMA(ABS(LOW-VAR01),13,1)/SMA(MAX(LOW-VAR01,0),10,1){XG51};
VAR03:=EMA(VAR02,10){XG51};
VAR04:=LLV(LOW,10){XG51};
进场:=EMA(IF(LOW<=VAR04,VAR03,0),3){XG51};
主力进场:=IF(进场>REF(进场,1),进场,0){XG51};
STICKLINE(进场>REF(进场,1),RCC,RCC-0.05,3,1 ),COLORFF00FF{XG51};
STICKLINE(crOSS(C,MA5) AND CROSS(C,MA10) ,RCC,RCC+0.05,3,0),COLOR00FFFF{XG51};
STICKLINE(C<MA12 AND C>MA5 AND C>O,RCC,RCC+0.03,3,0),COLORFFFFFF{XG51};
QQ:EMA(COST(98),1),COLOREE0068,LINETHICK0{XG51};
QW:EMA(COST(83),1),COLOREEAA05,LINETHICK0{XG51};
QA:EMA(COST(95),1),COLOREEAA05,LINETHICK0{XG51};
IF(C<=QQ,QQ,DRAWNULL),COLOREE0068,LINETHICK1{XG51};
IF(C<=QW,QW,DRAWNULL),COLORFFFFFF,LINETHICK1{XG51};
IF(C<=QA,QA,DRAWNULL),COLOREEAA68,LINETHICK1{XG51};
IF(MA5>REF(MA5,1),MA5,DRAWNULL),COLOR00BCFF{XG51};
IF(MA5<REF(MA5,1),MA5,DRAWNULL),COLORFFFF00{XG51};
IF(MA60>REF(MA60,1),MA60,DRAWNULL),COLOR0000FF{XG51};
IF(MA60<REF(MA60,1),MA60,DRAWNULL),COLOR00FF00{XG51};
STICKLINE(CLOSE>= OPEN,OPEN,CLOSE,3,0 ),COLORBC00E8;
STICKLINE(CLOSE>= OPEN ,OPEN,CLOSE,2.6,0 ),COLOREE00FF{XG51};
STICKLINE(CLOSE>= OPEN ,OPEN,CLOSE,2,0 ),COLORFF3CFF{XG51};
STICKLINE(CLOSE>= OPEN ,OPEN,CLOSE,1.2,0 ),COLORFF6FFF{XG51};
STICKLINE(CLOSE>= OPEN ,OPEN,CLOSE,0.4,0 ),COLORFF88FF{XG51};
STICKLINE(CLOSE>=OPEN ,HIGH,LOW,0,0 ),COLORFFA6FF{XG51};
STICKLINE(CLOSE< OPEN ,OPEN,CLOSE,3,0 ),COLOR009000{XG51};
STICKLINE(CLOSE< OPEN ,OPEN,CLOSE,2.6,0 ),COLOR00A300{XG51};
STICKLINE(CLOSE< OPEN ,OPEN,CLOSE,2,0 ),COLOR00B800{XG51};
STICKLINE(CLOSE< OPEN ,OPEN,CLOSE,1.2,0 ),COLOR00D300{XG51};
STICKLINE(CLOSE< OPEN ,OPEN,CLOSE,0.4,0 ),COLOR00F300{XG51};
STICKLINE(CLOSE< OPEN ,HIGH,LOW,0,0 ),COLOR00FF00{X_G*5_1_C_N_{};

源码正文：

VAR1:=ema(HHV(HIGH,500),21){XG51};
VAR2:=Ema(HHV(HIGH,250),21){XG51};
VAR3:=EMA(HHV(HIGH,90),21){XG51};
VAR4:=EMA(LLV(LOW,500),21){XG51};
VAR5:=EMA(LLV(LOW,250),21){XG51};
VAR6:=EMA(LLV(LOW,90),21){XG51};
VAR7:=EMA((VAR4*0.96+VAR5*0.96+VAR6*0.96+VAR1*0.558+VAR2*0.558+VAR3*0.558)/6,21){XG51};
VAR8:=EMA((VAR4*1.25+VAR5*1.23+VAR6*1.2+VAR1*0.55+VAR2*0.55+VAR3*0.65)/6,21){XG51};
VAR9:=EMA((VAR4*1.3+VAR5*1.3+VAR6*1.3+VAR1*0.68+VAR2*0.68+VAR3*0.68)/6,21){XG51};
VARA:=EMA((VAR7*3+VAR8*2+VAR9)/6*1.738,21){XG51};
VARB:=REF(LOW,1){XG51};
VARC:=SMA(Abs(LOW-VARB),3,1)/SMA(MAX(LOW-VARB,0),3,1)*100{XG51};
VARD:=EMA(IF(CLOSE*1.35<=VARA,VARC*10,VARC/10),3){XG51};
VARE:=LLV(LOW,30){XG51};
VARF:=HHV(VARD,30){XG51};
VAR10:=IF(MA(CLOSE,58),1,0){XG51};
火焰山底:EMA(IF(LOW<=VARE,(VARD+VARF*2)/2,0),3)/618*VAR10,COLORBLUE{XG51};
今量:=火焰山底{XG51};
stICKLINE(火焰山底>0,0 ,今量*1.2,3,0 ),COLOR00EEFF{XG51};
STICKLINE(火焰山底>0,0 ,今量*0.8,3,0 ),COLOR00BBFF{XG51};
STICKLINE(火焰山底>0,0 ,今量*0.6,3,0 ),COLOR0099FF{XG51};
STICKLINE(火焰山底>0,0 ,今量*0.4,3,0 ),COLOR0066FF{XG51};
STICKLINE(火焰山底>0,0 ,今量*0.2,3,0 ),COLOR0000FF{XG51};
VARG:=HHV(HIGH,30){XG51};
火焰山顶:EMA(IF(HIGH>=VARG,-(VARD+VARF*2)/2,0),3)/618*VAR10,COLORGREEN{XG51};
STICKLINE(火焰山顶<0,0,火焰山顶,3,0),COLORGREEN{X+G_5.1+C+N+{};