通达信中短线买卖主图未加密选股指标公式源码

源码正文：

VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))){XG51};
VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))){XG51};
VAR3:=(100 - ma(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)){XG51};
DRAWICON(crOSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.02)),1){XG51};
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.02)),2){XG51};
DIR2:=Abs(CLOSE-REF(CLOSE,10)){XG51};
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10){XG51};
ER2:=DIR2/VIR2{XG51};
CS2:=ER2*(0.8-2/24)+2/24{XG51};
CQ2:=CS2*CS2{XG51};
AMA2:ema(dma(CLOSE,CQ2),2),COLORCYAN,LINETHICK2{XG51};
AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORBLUE,LINETHICK2{XG51};
AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
PT:=REF(H,1)-REF(L,1){XG51};
cdp:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4{XG51};
AH:=CDP+PT{XG51};
AL:=CDP-PT{XG51};
NH:=CDP*2-REF(L,1){XG51};
NL:=CDP*2-REF(H,1){XG51};
强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW{XG51};
阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORGREEN{XG51};
M:=IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL){XG51};
撑:IF(NL<M,CDP-(CDP-M)*0.618,NL)NODRAW{XG51};
底:IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL)NODRAW{XG51};
stICKLINE(((OPEN < CLOSE) AND (VAR2 < MA(VAR3,6))),(CLOSE * 0.998),(OPEN * 1.002),2,0),COLORWHITE{XG51};
A1:=EMA(C,14)COLORRED,LINETHICK1{XG51};
A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW{XG51};
突破:REF(EMA(C,14),1),NODRAW{XG51};
距离:(C-突破)/突破*100,NODRAW{XG51};
出击:IF(A1X>=0,REF(EMA(C,14),BArslAST(CROSS(A1X,0))+1),DRAWNULL)COLORWHITE,LINETHICK2{XG51};
休假:IF(A1X<0,REF(EMA(C,14),BARSLAST(CROSS(0,A1X))+1),DRAWNULL)COLORCYAN,LINETHICK2{XG51};
涨幅:IF(A1X>=0,(C-出击)/出击*100,DRAWNULL)NODRAW{XG51};
跌幅:IF(A1X<0,(C-休假)/休假*100,DRAWNULL)NODRAW{XG51};
♂10%:IF(H>=出击*1.1,出击*1.1,DRAWNULL),COLORWHITE,POINTDOT{XG51};
♂20%:IF(H>=出击*1.2,出击*1.2,DRAWNULL),COLORWHITE,POINTDOT{XG51};
♂30%:IF(H>=出击*1.3,出击*1.3,DRAWNULL),COLORWHITE,POINTDOT{XG51};
♀Ⅰ:IF(L<休假*0.9,休假*0.9,DRAWNULL),COLORCYAN,POINTDOT{XG51};
♀Ⅱ:IF(L<休假*0.8,休假*0.8,DRAWNULL),COLORCYAN,POINTDOT{XG51};
♀Ⅲ:IF(L<休假*0.7,休假*0.7,DRAWNULL),COLORCYAN,POINTDOT{XG51};
STICKLINE(CROSS(A1X,0),C,O,2,0)COLORBLUE{XG51};
STICKLINE(CROSS(0,A1X),C,O,2,0)COLORCYAN{XG51};
STICKLINE(CROSS(A1X,0)OR CROSS(0,A1X),REF(EMA(C,14),1),REF(EMA(C,14),1)*0.998,2,0)COLORRED{XG51};
STICKLINE(ISLASTBAR,REF(EMA(C,14),1),REF(EMA(C,14),1)*0.998,5,0)COLORRED{X~G-5!1~C~N~{};

源码正文：

VAR55:=ema((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,5){XG51};
VAR56:=INDEXC{XG51};
VAR57:=ma(VAR56,5){XG51};
VAR58:=MA(VAR56,20){XG51};
VAR59:=MA(VAR56,30){XG51};
VAR5B:=VAR57>VAR56*1.03 AND VAR58>VAR56*1.13{XG51};
VAR5C:=VAR5B{XG51};
VAR5D:=IF(FILTER(VAR55<6,5)=1,1,0){XG51};
VAR5A:=VAR59>VAR57*1.08 AND VAR58>VAR57*1.055{XG51};
VAR5F:=VAR55<6 AND VAR5C{XG51};
VAR60:=IF(FILTER(VAR5F,1)=1,1,0)*80{XG51};
VAR61:=VAR5F AND VAR5D*80{XG51};
VAR7C:=IF(EMA(CLOSE,5)/EMA(EMA(CLOSE,9),16)<=0.85 AND CLOSE/REF(CLOSE,1)>0.905 AND CLOSE/REF(CLOSE,1)<1.05 AND vol/CAPITAL*100<5,50,0){XG51};
VAR7D:=(-100)*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100{XG51};
VAR7E:=(-100)*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100{XG51};
VAR7F:=(-100)*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100{XG51};
VAR80:=((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5{XG51};
VAR81:=((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5{XG51};
VAR82:=((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5{XG51};
VAR83:=(VAR7D+VAR7E+VAR7F+VAR80+VAR81+VAR82)/6{XG51};
VAR85:=Abs(VAR80-VAR82){XG51};
VAR86:=(VAR83+VAR85)/2{XG51};
VAR87:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50{XG51};
VAR88:=VAR87+VAR86{XG51};
VAR89:=IF(VAR7C>0 AND VAR88<0,200,0){XG51};
VAR8A:=IF(VAR86<0 AND CLOSE=LLV(CLOSE,5) AND CLOSE/REF(CLOSE,1)>0.905 AND CLOSE/REF(CLOSE,1)<1.05 AND VOL/CAPITAL*100<5,-50,0){XG51};
VAR8B:=IF(VAR88<0 AND VAR8A=-50,100,0){XG51};
VAR8D:=REF(CLOSE,2)*0.865{XG51};
VAR8E:=REF(CLOSE,13)*0.772{XG51};
VAR8F:=MIN(VAR8D,VAR8E){XG51};
VAR90:=100*VOL/CAPITAL{XG51};
VAR92:=IF((CLOSE-VAR8F)/CLOSE<0.03 AND SUM(VAR90,5)/5<1.8,1,0){XG51};
VAR96:=(VAR89>0 AND VAR8B>0 AND SUM(VOL/CAPITAL*100,5)/5<1 OR VAR92>0) AND (VAR8A<0 OR VAR7C>0){XG51};
VAR97:=VAR89>0 AND VAR8B>0 AND SUM(VOL/CAPITAL*100,5)/5<1 OR VAR92>0 AND REF(CLOSE,1)/REF(CLOSE,2)>0.902{XG51};
VAR98:=VAR96 OR VAR97{XG51};
PP:(VAR61 OR VAR98)=1{X-G_5*1-C-N-{};