通达信中短趋势主图未加密选股指标公式源码

源码正文：

短趋势线:ma(CLOSE,13),COLORWHITE,LINETHICK3{XG51};
中线:=MA(CLOSE,33),LINETHICK1{XG51};
中趋势线:MA(CLOSE,55),LINETHICK1,COLORBROWN{XG51};
年线:MA(CLOSE,250),LINETHICK1,COLORBLACK,POINTDOT{XG51};
涨:IF(短趋势线>REF(短趋势线,1),短趋势线,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
平:=IF(短趋势线=REF(短趋势线,1),短趋势线,DRAWNULL),COLOR00FFFF,LINETHICK3{XG51};
跌:IF(短趋势线<REF(短趋势线,1),短趋势线,DRAWNULL),COLORCYAN,LINETHICK3{XG51};
上极限:=((C-REF(MA(CLOSE,20),1))/20+短趋势线)*1.20{XG51};
DRAWTEXT(crOSS(CLOSE,上极限),H*1.02,'减仓'),COLORCYAN{XG51};
DRAWTEXT(CROSS(CLOSE,MA(C,13)) AND 短趋势线<REF(短趋势线 ,1) AND 短趋势线<中趋势线 ,H*1.02,'减仓'),COLORCYAN{XG51};
DRAWTEXT(CROSS(短趋势线,C) AND INDEXC>MA(INDEXC,13) AND 短趋势线>REF(短趋势线 ,1) AND V<REF(V,1) AND 短趋势线>中趋势线 ,L*0.97,'买入'),COLORWHITE{XG51};
stICKLINE(CROSS(短趋势线,C) AND 短趋势线>REF(短趋势线 ,1) AND V<REF(V,1) AND 短趋势线>中趋势线 ,L,L*0.99,2,0),COLORBLUE{XG51};
VAR1:=((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};
DRAWTEXT(VAR1>9 AND V<REF(V,1) AND FILTER(VAR1<REF(VAR1,1),5),H*1.02,'洗盘'),COLORBLUE{XG51};
DRAWTEXT(VAR1>9 AND V>REF(V,1) AND FILTER(VAR1<REF(VAR1,1),5),H*1.02,'减仓'),COLORCYAN{XG51};
DRAWTEXT(VAR1>20 AND FILTER(VAR1<REF(VAR1,1),5),H*1.06,'卖出'),COLORBLUE{XG51};
VAR2:=HHV(VAR1>20,10){XG51};
DRAWTEXT(FILTER(VAR1<-9 AND VAR1>REF(VAR1,1),18) AND V>REF(V,1),L*0.98,'反弹'),COLORWHITE{XG51};
DRAWTEXT(VAR1<-20 AND FILTER(VAR1> REF(VAR1,1),5),L*0.95,'抄底'),COLORBLUE{XG51};
DRAWTEXT(VAR2 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),H*1.1,'危险'),COLORBLUE{XG51};
VAR12:=(HIGH - LOW){XG51};
VAR3:=Abs((OPEN - CLOSE)){XG51};
VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)){XG51};
VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW){XG51};
VAR6:=((VAR3 / VAR12) * vol){XG51};
VAR7:=((VAR4 / VAR12) * VOL){XG51};
VAR8:=((VAR5 / VAR12) * VOL){XG51};
VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))){XG51};
VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100){XG51};
DRAWTEXT((((((VAR6 > (MA(VOL,5) * 2)) AND 短趋势线>REF(短趋势线 ,1) AND (VAR6 >= VAR7)) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)) OR ((VOL > (MA(VOL,5) * 3)) AND VARB)) ,L*0.98,'主力介入'),COLORLIMAGENTA{X+G*5=1+C+N+{};

源码正文：

AX:=PERIOD{XG51};
BL:=IF(AX=0,150,IF(AX=1,50,IF(AX=2,30,IF(AX=3,17,IF(AX=4,15,IF(AX=5,8,
IF(AX=6,3,IF(AX=7,2,IF(AX=8,50,IF(AX=9,3,1.3)))))))))){XG51};
FM:=(ema(CLOSE,1.414*9+1)){XG51};
FCL:=IF(FM<=0.05,Abs(FM)+0.1,0){XG51};
dif:=(Ema(CLOSE,9)-EMA(CLOSE,2*9+2))/(FCL+FM)*60*BL*4+260,COLORLICYAN,LINETHICK1{XG51};
DEA:=EMA(DIF,9*0.75),COLORCYAN,LINETHICK1{XG51};
macd:=2*(DIF-DEA)+200{XG51};
stICKLINE(MacD>200 AND MACD<REF(MACD,1),200,MACD,1,0),COLORCYAN{XG51};
STICKLINE(MACD>200 AND MACD>REF(MACD,1),200,MACD,1,0),COLORLIMAGENTA{XG51};
STICKLINE(MACD<200 AND MACD<REF(MACD,1),200,MACD,1,1),COLORLIBLUE{XG51};
STICKLINE(MACD<200 AND MACD>REF(MACD,1),200,MACD,1,1),COLORFF00FF{XG51};
DRAWBAND(DIF,RGB(200,50,55),DEA,RGB(100,400,100)){XG51};
DRAWTEXT(crOSS(DIF,DEA),DIF*0.93,'B'),COLORBLUE{XG51};
L1:=(CLOSE-LLV(LOW,11))/(HHV(HIGH,11)-LLV(LOW,11))*100*4+10{XG51};
Ｋ:SMA(L1,3,1),COLORBROWN{XG51};
Ｄ:SMA(Ｋ,3,1),COLOR38B0DE{XG51};
W:IF(Ｋ>REF(Ｋ,1),Ｋ,DRAWNULL),COLORLIMAGENTA,LINETHICK2{XG51};
MAXV:=CONST(HHV(vol,100)){XG51};
MAXD:=CONST(MAX(ABS(HHV(DIF,100)),ABS(LLV(DIF,100)))){XG51};
BS:=MAXV/MAXD*1.5{XG51};
CC:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN*0.8/BS,DRAWNULL){XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,CC,0,-1,-1),COLOR00C0C0{XG51};
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)){XG51};
买盘:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+
(CLOSE-LOW)),VOL/2)),NODRAW{XG51};
买:买盘/10000,COLORWHITE,NODRAW{XG51};
卖盘:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,
0-AA*(HIGH-LOW),0-VOL/2)),NODRAW{XG51};
卖:卖盘/10000,COLORCYAN,NODRAW{XG51};
差额:(买盘+卖盘)/10000,COLORRED,NODRAW{XG51};
三日净流入:SUM (差额,3),COLORLIMAGENTA,NODRAW{XG51};
STICKLINE(买盘>0 OR 卖盘<0 ,0,VOL/BS,2,0),COLORLIRED{XG51};
STICKLINE(买盘>0,0,买盘/BS,2,0),COLORWHITE{X_G*5-1_C_N_{};