通达信判断大盘趋势主图未加密选股指标公式源码

源码正文：

ma5:ema(C,5),COLORRED{XG51};
工作线:EMA(C,14),COLORF00FF0,LINETHICK1{XG51};
二号线:EMA(C,25),COLOR00FF00,LINETHICK1{XG51};
九号线:EMA(CLOSE,99),LINETHICK1{XG51};
MA120:EMA(CLOSE,120),LINETHICK1{XG51};
生命线:EMA(CLOSE,453),LINETHICK1,COLORWHITE{XG51};
difF:=( EMA(CLOSE,7) - EMA(CLOSE,19)){XG51};
DEA:=EMA(DIFF,9){XG51};
macd:=0.90*(DIFF-DEA){XG51};
TJ:=(DIFF>=DEA){XG51};
TJ1:=(DIFF>=0){XG51};
stICKLINE(TJ,H,L,0.5,0),COLORBLUE{XG51};
STICKLINE(TJ,O,C,4,0),COLORBLUE{XG51};
STICKLINE(TJ1 AND TJ,H,L,0.5,0),COLORF00FF0{XG51};
STICKLINE(TJ1 AND TJ,O,C,4,1),COLORF00FF0{XG51};
STICKLINE(DIFF<DEA,H,L,0.5,0),COLORF0F000{XG51};
STICKLINE(DIFF<DEA,O,C,4,0),COLORF0F000{XG51};
VAR1:=(CLOSE*2+HIGH+LOW)/4{XG51};
SK:= EMA(VAR1,13)-EMA(VAR1,73){XG51};
SD:= EMA(SK,2){XG51};
DRAWTEXT((crOSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)) ,L*0.99,'短线'),COLORCYAN{XG51};
STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),H,L,0.5,0),COLORWHITE{XG51};
STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),O,C,10,1),LINETHICK3,COLORWHITE{X=G~5^1=C=N={};

源码正文：

N:=102;M:=7;M1:=13;N1:=14;M2:=6;N2:=14{XG51};
AA:=ma((2*CLOSE+HIGH+LOW)/4,5);
通道1:=AA*N/100;
通道2:=AA*(200-N)/100;
CC:=Abs((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=dma(CLOSE,CC);
通道3:=(1+M/100)*DD;
通道4:=(1-M/100)*DD{XG51};
LSK1:=L<MIN(通道2,通道4){XG51};
VAR2:=CLOSE*vol{XG51};
VAR3:=ema((expma(VAR2,3)/EXPMA(VOL,3)+EXPMA(VAR2,6)/EXPMA(VOL,6)+EXPMA(VAR2,12)/EXPMA(VOL,12)+EXPMA(VAR2,24)/EXPMA(VOL,24))/4,M1){XG51};
SUP:=1.06*VAR3{XG51};
SDN:=VAR3*0.94{XG51};
VAR4:=EXPMA(CLOSE,9){XG51};
LUP:=EXPMA(VAR4*1.14,5){XG51};
LDN:=EXPMA(VAR4*0.86,5){XG51};
LSK2:=L<LDN*1.01{XG51};
LSK:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N1){XG51};
HD :=HIGH-REF(HIGH,1){XG51};
LD :=REF(LOW,1)-LOW{XG51};
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),N1){XG51};
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),N1){XG51};
pdi:= DMP*100/LSK{XG51};
mdi:= DMM*100/LSK{XG51};
ADX:= EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M2){XG51};
ADXR:=EXPMEMA(ADX,M2){XG51};
LSK3:=ADX>59 AND ADXR>49{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:=(TYP-MA(TYP,N2))/(0.015*AVEDEV(TYP,N2)){XG51};
LSK4:=CCI<-110 AND CCI>-200{XG51};
捡金币:=LSK1 AND LSK2 AND LSK3 AND LSK4 AND (C-O)/O>-0.06 {XG51};
LSK6:=FILTER(捡金币,2){XG51};
杀熊:捡金币 AND LSK6 {X_G!5.1_C_N_{};