通达信红粉佳人主图未加密选股指标公式源码

通达信红粉佳人主图未加密选股指标公式源码

源码正文：

Z1:=stRCAT('【',STRCAT(CODE,STKNAME)){XG51};
Z2:=STRCAT(' 行业：',HYBLOCK){XG51};
Z3:=STRCAT(' 地域：',DYBLOCK){XG51};
Z4:=STRCAT(STRCAT(' 概念：',GNBLOCK),'】 '){XG51};
Z5:=STRCAT(Z1,Z2){XG51};
Z6:=STRCAT(Z3,Z4){XG51};
Z7:=STRCAT(Z5,Z6){XG51};
DRAWTEXT_FIX(1,0,0.0,0,Z7),COLOR00EEEE{XG51};
DRAWTEXT_FIX(1,0,0.06,0,STRCAT('【风格：',STRCAT(FGBLOCK,'】'))),COLOREEEE00{XG51};
ema13:=Ema(C,13),COLORRED{XG51};
EMA21:=EMA(C,21),COLORBLUE{XG51};
EMA34:=EMA(C,34),COLORFF00FF{XG51};
EMA60:=MA(C,60),COLORFFCC66{XG51};
VAR2:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1){XG51};
VAR4:=LLV(LOW,5); VAR5:=HHV(HIGH,4){XG51};
散户:=EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3{XG51};
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3{XG51};
DRAWTEXT(crOSS(散户,庄家) AND 散户<30,L-0.05,'←观望'),COLORLICYAN{XG51};
DRAWTEXT(CROSS(庄家,散户) AND 散户>70,H+0.05,'←减仓'),COLORCYAN{XG51};
DRAWICON(CROSS(散户,庄家) AND 散户<30,L-0.05,1){XG51};
DRAWICON(CROSS(庄家,散户) AND 散户>70,H+0.05,2){XG51};
VAR9:=CLOSE-REF(CLOSE,5){XG51};
VARA:=EMA(EMA(VAR9,5),5)/EMA(EMA(Abs(VAR9),5),5){XG51};
VARC:=EMA(EMA(VAR9,20),20)/EMA(EMA(ABS(VAR9),20),20){XG51};
卖出:=IF(VARA>0 AND CROSS(VARC,VARA),90,100){XG51};
DRAWICON(卖出<0,H+0.05,2); 买线:=EMA(CLOSE,2){XG51};
卖线:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42){XG51};
B1:IF(CROSS(买线,卖线),L-0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORLIMAGENTA{XG51};
S1:IF(CROSS(80,rsi)*30,H+0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORBLUE{XG51};
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{XG51};
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};
STICKLINE(CROSS(A1X,0),H,L,0,0 ),COLOR9933FF{XG51};
STICKLINE(CROSS(A1X,0),C,O,3,0 ),COLOR0000CC{XG51};
STICKLINE(CROSS(A1X,0),C,O,1,0 ),COLOR0033FF{XG51};
STICKLINE(CROSS(0,A1X),L,H,0,0 ),COLOR66CC33{XG51};
DRAWTEXT(CROSS(EMA(CLOSE,2),EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42)),(LOW*0.99),'加仓'),LINETHICK3,COLORF00FF0{XG51};
DRAWTEXT(CROSS(EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42),EMA(CLOSE,2)),(HIGH* 1.01),'↓空仓'),LINETHICK3,COLORFFFFFF{XG51};
STICKLINE((EMA(CLOSE,2) >=EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42)),LOW,HIGH,0.1,0),COLOR0000FF{XG51};
STICKLINE((EMA(CLOSE,2)>=EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42)),CLOSE,OPEN,3,0),COLOR0000AA{XG51};
STICKLINE((EMA(CLOSE,2)>=EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42)),CLOSE,OPEN,2,0),COLOR0000CC{XG51};
STICKLINE((EMA(CLOSE,2)<EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42)),CLOSE,OPEN,2,0),COLORCCCC00{XG51};
STICKLINE((EMA(CLOSE,2)<EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42)),CLOSE,OPEN,3,0),COLORAAAA00{XG51};
STICKLINE((EMA(CLOSE,2)<EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42)),LOW,HIGH,0.1,0),COLORFFFF00{XG51};
STICKLINE((CROSS(EMA(CLOSE,2),EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42)) OR CROSS(EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42),EMA(CLOSE,2))),LOW,HIGH,0.1,0),COLOR00FFFF{XG51};
STICKLINE((CROSS(EMA(CLOSE,2),EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42)) OR CROSS(EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42),EMA(CLOSE,2))),OPEN,CLOSE,3,0),COLOR00AAAA{XG51};
STICKLINE((CROSS(EMA(CLOSE,2),EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42)) OR CROSS(EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42),EMA(CLOSE,2))),OPEN,CLOSE,2,0),COLOR00CCCC{XG51};
MAA5:MA(C,5),COLORFF00FF,LINETHICK5{XG51};
MAA10:=MA(C,10){XG51};
MAA30:MA(C,30),COLORWHITE{XG51};
KS:IF(MAA10>MAA30,MAA10,MAA30),COLORYELLOW{XG51};
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
A4:=SMA(A3,3,1){XG51};
A5:=SMA(A4,3,1){XG51};
A6:=3*A4-2*A5{XG51};
A7:=C-REF(C,1){XG51};
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6){XG51};
买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)){XG51};
DRAWTEXT(FILTER(买=1,5),LOW-0.05,'建仓'),COLORBLUE{X.G^5!1.C.N.{};

通达信新暖气带主图未加密选股指标公式源码

源码正文：

N:=26{XG51};
M:=50{XG51};
P:=13{XG51};
D:=25{XG51};
N1:=6{XG51};
M01:=12{XG51};
M1:ma(C,N),COLORRED,LINETHICK3{XG51};
M2:MA(C,M),LINETHICK3{XG51};
M3:MA(C,P),LINETHICK3{XG51};
M4:MA(C,D),LINETHICK3{XG51};
M5:MA(C,N1),LINETHICK2{XG51};
M6:MA(C,M01),LINETHICK2{XG51};
DRAWBAND(M1,RGB(80,0,0),M2,RGB(0,80,0)){XG51};
DRAWBAND(M3,RGB(115,0,0),M4,RGB(0,115,0)){XG51};
DRAWBAND(M5,RGB(150,0,0),M6,RGB(0,150,0)){XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){XG51};
stICKLINE(M5<M6 AND C<M5,H,L,0,0),COLORBROWN{XG51};
STICKLINE(M5<M6 AND C<M5,O,C,3,1),COLORBROWN{X?G_5!1?C?N?{};